pjs/js/js2/vmtypes.cpp

/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*-
 *
 * The contents of this file are subject to the Netscape Public
 * License Version 1.1 (the "License"); you may not use this file
 * except in compliance with the License. You may obtain a copy of
 * the License at http://www.mozilla.org/NPL/
 *
 * Software distributed under the License is distributed on an "AS
 * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express oqr
 * implied. See the License for the specific language governing
 * rights and limitations under the License.
 *
 * The Original Code is the JavaScript 2 Prototype.
 *
 * The Initial Developer of the Original Code is Netscape
 * Communications Corporation.  Portions created by Netscape are
 * Copyright (C) 1998 Netscape Communications Corporation. All
 * Rights Reserved.
 *
 * Contributor(s): 
 *
 * Alternatively, the contents of this file may be used under the
 * terms of the GNU Public License (the "GPL"), in which case the
 * provisions of the GPL are applicable instead of those above.
 * If you wish to allow use of your version of this file only
 * under the terms of the GPL and not to allow others to use your
 * version of this file under the NPL, indicate your decision by
 * deleting the provisions above and replace them with the notice
 * and other provisions required by the GPL.  If you do not delete
 * the provisions above, a recipient may use your version of this
 * file under either the NPL or the GPL.
 */

#include "utilities.h"
#include "vmtypes.h"

namespace JavaScript {
namespace VM {

using namespace JSTypes;

#define OPCODE_NAMES
#include "icode.h"

Formatter& operator<< (Formatter& f, Instruction& i)
{
    return i.print(f);
}

Formatter& operator<< (Formatter& f, RegisterList& rl)
{
    TypedRegister* e = rl.end();
    
    f << "(";
    for (RegisterList::iterator r = rl.begin(); r != e; r++) {
        f << "R" << r->first; 
        if ((r + 1) != e)
            f << ", ";
    }
    f << ")";
    
    return f;
}

Formatter& operator<< (Formatter& f, const ArgList& al)
{
    const RegisterList& rl = al.mList;
    const JSValues& registers = al.mRegisters;
    f << "(";
    RegisterList::const_iterator i = rl.begin(), e = rl.end();
    if (i != e) {
        TypedRegister r = *i++;
        f << "R" << r.first << '=' << registers[r.first];
        while (i != e) {
            r = *i++;
            f << ", R" << r.first << '=' << registers[r.first];
        }
    }
    f << ")";
    
    return f;
}

Formatter& operator<< (Formatter& f, TypedRegister& r)
{
    if (r.first == NotARegister)
        f << "<NaR>";
    else
        f << "R" << r.first;
    return f;
}

Formatter& operator<< (Formatter &f, InstructionStream &is)
{

    for (InstructionIterator i = is.begin(); 
         i != is.end(); i++) {
        /*
        bool isLabel = false;

        for (LabelList::iterator k = labels.begin(); 
             k != labels.end(); k++)
            if ((ptrdiff_t)(*k)->mOffset == (i - is.begin())) {
                f << "#" << (uint32)(i - is.begin()) << "\t";
                isLabel = true;
                break;
            }

        if (!isLabel)
            f << "\t";

        f << **i << "\n";
        */

        printFormat(stdOut, "%04u", (uint32)(i - is.begin()));
        f << ": " << **i << "\n";
    
    }

    return f;
}

BinaryOperator::BinaryOp BinaryOperator::mapICodeOp(ICodeOp op) {
    // a table later... or maybe we need a grand opcode re-unification 
    switch (op) {
    case ADD        : return Add;
    case SUBTRACT   : return Subtract;
    case MULTIPLY   : return Multiply;
    case DIVIDE     : return Divide;
    case REMAINDER  : return Remainder;
    case SHIFTLEFT  : return LeftShift;
    case SHIFTRIGHT : return RightShift;
    case USHIFTRIGHT: return LogicalRightShift;

    case AND        : return BitwiseAnd;
    case OR         : return BitwiseOr;
    case XOR        : return BitwiseXor;
    
    case COMPARE_LT : return Less;
    case COMPARE_LE : return LessOrEqual;
    case COMPARE_EQ : return Equal;
    case STRICT_EQ  : return Identical;
    default :
        NOT_REACHED("Unsupported binary op");
        return (BinaryOp)-1;
    }
}

Formatter& operator<< (Formatter &f, BinaryOperator::BinaryOp &b)
{
    switch (b) {
    case BinaryOperator::Add:               return f << "Add";
    case BinaryOperator::Subtract:          return f << "Subtract";
    case BinaryOperator::Multiply:          return f << "Multiply";
    case BinaryOperator::Divide:            return f << "Divide";
    case BinaryOperator::Remainder:         return f << "Remainder";
    case BinaryOperator::LeftShift:         return f << "LeftShift";
    case BinaryOperator::RightShift:        return f << "RightShift";
    case BinaryOperator::LogicalRightShift: return f << "LogicalRightShift";

    case BinaryOperator::BitwiseAnd:        return f << "BitwiseAnd";
    case BinaryOperator::BitwiseOr:         return f << "BitwiseOr";
    case BinaryOperator::BitwiseXor:        return f << "BitwiseXor";
    
    case BinaryOperator::Less:              return f << "Less";
    case BinaryOperator::LessOrEqual:       return f << "LessOrEqual";
    case BinaryOperator::Equal:             return f << "Equal";
    case BinaryOperator::Identical:         return f << "Identical";
    default :
        NOT_REACHED("inner peace, either");
        return f;
    }
}

} /* namespace VM */
} /* namespace JavaScript */