/*
 * Copyright (c) 2013 Oracle and/or its affiliates. All rights reserved. This
 * code is released under a tri EPL/GPL/LGPL license. You can use it,
 * redistribute it and/or modify it under the terms of the:
 *
 * Eclipse Public License version 1.0
 * GNU General Public License version 2
 * GNU Lesser General Public License version 2.1
 */
package com.oracle.truffle.ruby.nodes.control;

import com.oracle.truffle.api.*;
import com.oracle.truffle.api.frame.*;
import com.oracle.truffle.api.nodes.*;
import com.oracle.truffle.api.utilities.*;
import com.oracle.truffle.ruby.nodes.*;
import com.oracle.truffle.ruby.nodes.cast.*;
import com.oracle.truffle.ruby.runtime.*;
import com.oracle.truffle.ruby.runtime.control.*;

/**
 * Represents a Ruby {@code while} statement.
 */
@NodeInfo(shortName = "while")
public class WhileNode extends RubyNode {

    @Child protected BooleanCastNode condition;
    @Child protected RubyNode body;

    private final BranchProfile breakProfile = new BranchProfile();
    private final BranchProfile nextProfile = new BranchProfile();
    private final BranchProfile redoProfile = new BranchProfile();

    public WhileNode(RubyContext context, SourceSection sourceSection, BooleanCastNode condition, RubyNode body) {
        super(context, sourceSection);
        this.condition = adoptChild(condition);
        this.body = adoptChild(body);
    }

    @Override
    public Object execute(VirtualFrame frame) {
        outer: while (condition.executeBoolean(frame)) {
            while (true) {
                try {
                    body.execute(frame);
                    continue outer;
                } catch (BreakException e) {
                    breakProfile.enter();
                    return e.getResult();
                } catch (NextException e) {
                    nextProfile.enter();
                    continue outer;
                } catch (RedoException e) {
                    redoProfile.enter();
                }
            }
        }

        return NilPlaceholder.INSTANCE;
    }

}