/jEdit/tags/jedit-4-0-pre5/bsh/BSHAssignment.java
Java | 151 lines | 85 code | 27 blank | 39 comment | 27 complexity | 4d53c5b500cde50a21c99c701af80ab0 MD5 | raw file
Possible License(s): BSD-3-Clause, AGPL-1.0, Apache-2.0, LGPL-2.0, LGPL-3.0, GPL-2.0, CC-BY-SA-3.0, LGPL-2.1, GPL-3.0, MPL-2.0-no-copyleft-exception, IPL-1.0
- /*****************************************************************************
- * *
- * This file is part of the BeanShell Java Scripting distribution. *
- * Documentation and updates may be found at http://www.beanshell.org/ *
- * *
- * Sun Public License Notice: *
- * *
- * The contents of this file are subject to the Sun Public License Version *
- * 1.0 (the "License"); you may not use this file except in compliance with *
- * the License. A copy of the License is available at http://www.sun.com *
- * *
- * The Original Code is BeanShell. The Initial Developer of the Original *
- * Code is Pat Niemeyer. Portions created by Pat Niemeyer are Copyright *
- * (C) 2000. All Rights Reserved. *
- * *
- * GNU Public License Notice: *
- * *
- * Alternatively, the contents of this file may be used under the terms of *
- * the GNU Lesser General Public License (the "LGPL"), in which case the *
- * provisions of LGPL are applicable instead of those above. If you wish to *
- * allow use of your version of this file only under the terms of the LGPL *
- * and not to allow others to use your version of this file under the SPL, *
- * indicate your decision by deleting the provisions above and replace *
- * them with the notice and other provisions required by the LGPL. If you *
- * do not delete the provisions above, a recipient may use your version of *
- * this file under either the SPL or the LGPL. *
- * *
- * Patrick Niemeyer (pat@pat.net) *
- * Author of Learning Java, O'Reilly & Associates *
- * http://www.pat.net/~pat/ *
- * *
- *****************************************************************************/
- package bsh;
- class BSHAssignment extends SimpleNode implements ParserConstants
- {
- public int operator;
- BSHAssignment(int id) { super(id); }
- public Object eval(
- CallStack callstack, Interpreter interpreter)
- throws EvalError
- {
- BSHLHSPrimaryExpression lhsNode =
- (BSHLHSPrimaryExpression)jjtGetChild(0);
- if ( lhsNode == null )
- throw new InterpreterError( "Error, null LHSnode" );
- LHS lhs = lhsNode.toLHS( callstack, interpreter);
- if ( lhs == null )
- throw new InterpreterError( "Error, null LHS" );
- Object rhs = ((SimpleNode)jjtGetChild(1)).eval(callstack, interpreter);
- if ( rhs == Primitive.VOID )
- throw new EvalError("Void assignment.", this);
- switch(operator)
- {
- case ASSIGN:
- try {
- //Interpreter.debug("lhs assign: "+rhs);
- return lhs.assign(rhs);
- } catch ( EvalError e ) {
- e.reThrow(this);
- }
- case PLUSASSIGN:
- return lhs.assign(operation(lhs.getValue(), rhs, PLUS));
- case MINUSASSIGN:
- return lhs.assign(operation(lhs.getValue(), rhs, MINUS));
- case STARASSIGN:
- return lhs.assign(operation(lhs.getValue(), rhs, STAR));
- case SLASHASSIGN:
- return lhs.assign(operation(lhs.getValue(), rhs, SLASH));
- case ANDASSIGN:
- case ANDASSIGNX:
- return lhs.assign(operation(lhs.getValue(), rhs, BIT_AND));
- case ORASSIGN:
- case ORASSIGNX:
- return lhs.assign(operation(lhs.getValue(), rhs, BIT_OR));
- case XORASSIGN:
- return lhs.assign(operation(lhs.getValue(), rhs, XOR));
- case MODASSIGN:
- return lhs.assign(operation(lhs.getValue(), rhs, MOD));
- case LSHIFTASSIGN:
- case LSHIFTASSIGNX:
- return lhs.assign(operation(lhs.getValue(), rhs, LSHIFT));
- case RSIGNEDSHIFTASSIGN:
- case RSIGNEDSHIFTASSIGNX:
- return lhs.assign(operation(lhs.getValue(), rhs, RSIGNEDSHIFT));
- case RUNSIGNEDSHIFTASSIGN:
- case RUNSIGNEDSHIFTASSIGNX:
- return lhs.assign(operation(lhs.getValue(), rhs, RUNSIGNEDSHIFT));
- default:
- throw new InterpreterError("unimplemented operator in assignment BSH");
- }
- }
- private Object operation(Object lhs, Object rhs, int kind)
- throws EvalError
- {
- /*
- Implement String += value;
- According to the JLS, value may be anything.
- In BeanShell, we'll disallow VOID (undefined) values.
- (or should we map them to the empty string?)
- */
- if ( lhs instanceof String && rhs != Primitive.VOID ) {
- if ( kind != PLUS )
- throw new EvalError(
- "Use of non + operator with String LHS", this);
- return (String)lhs + rhs;
- }
- if ( lhs instanceof Primitive || rhs instanceof Primitive )
- if(lhs == Primitive.VOID || rhs == Primitive.VOID)
- throw new EvalError(
- "Illegal use of undefined object or 'void' literal", this);
- else if ( lhs == Primitive.NULL || rhs == Primitive.NULL )
- throw new EvalError(
- "Illegal use of null object or 'null' literal", this);
- if( (lhs instanceof Boolean || lhs instanceof Character ||
- lhs instanceof Number || lhs instanceof Primitive) &&
- (rhs instanceof Boolean || rhs instanceof Character ||
- rhs instanceof Number || rhs instanceof Primitive) )
- {
- return Primitive.binaryOperation(lhs, rhs, kind);
- }
- throw new EvalError("Non primitive value in operator: " +
- lhs.getClass() + " " + tokenImage[kind] + " " + rhs.getClass(), this);
- }
- }