1 /*
   2  * Copyright (c) 1999, Oracle and/or its affiliates. All rights reserved.
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * This code is free software; you can redistribute it and/or modify it
   6  * under the terms of the GNU General Public License version 2 only, as
   7  * published by the Free Software Foundation.  Oracle designates this
   8  * particular file as subject to the "Classpath" exception as provided
   9  * by Oracle in the LICENSE file that accompanied this code.
  10  *
  11  * This code is distributed in the hope that it will be useful, but WITHOUT
  12  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  13  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  14  * version 2 for more details (a copy is included in the LICENSE file that
  15  * accompanied this code).
  16  *
  17  * You should have received a copy of the GNU General Public License version
  18  * 2 along with this work; if not, write to the Free Software Foundation,
  19  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  20  *
  21  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
  22  * or visit www.oracle.com if you need additional information or have any
  23  * questions.
  24  */
  25 /*
  26  * COMPONENT_NAME: idl.parser
  27  *
  28  * ORIGINS: 27
  29  *
  30  * Licensed Materials - Property of IBM
  31  * 5639-D57 (C) COPYRIGHT International Business Machines Corp. 1997, 1999
  32  * RMI-IIOP v1.0
  33  *
  34  */
  35 
  36 package com.sun.tools.corba.se.idl.constExpr;
  37 
  38 // NOTES:
  39 
  40 import com.sun.tools.corba.se.idl.Util;
  41 import java.math.BigInteger;
  42 
  43 public class ShiftRight extends BinaryExpr
  44 {
  45   protected ShiftRight (Expression leftOperand, Expression rightOperand)
  46   {
  47     super (">>", leftOperand, rightOperand);
  48   } // ctor
  49 
  50   public Object evaluate () throws EvaluationException
  51   {
  52     try
  53     {
  54       Number l = (Number)left ().evaluate ();
  55       Number r = (Number)right ().evaluate ();
  56 
  57       if (l instanceof Float || l instanceof Double || r instanceof Float || r instanceof Double)
  58       {
  59         String[] parameters = {Util.getMessage ("EvaluationException.right"), left ().value ().getClass ().getName (), right ().value ().getClass ().getName ()};
  60         throw new EvaluationException (Util.getMessage ("EvaluationException.1", parameters));
  61       }
  62       else
  63       {
  64         // Shift right (>>)
  65         //daz        value (new Long (l.longValue () >> r.longValue ()));
  66         BigInteger bL = (BigInteger)coerceToTarget ((BigInteger)l);
  67         BigInteger bR = (BigInteger)r;
  68 
  69         // Change signed to unsigned (Clear sign bit--can be done when setting bL!)
  70         if (bL.signum () == -1)
  71           if (type ().equals ("short"))
  72             bL = bL.add (twoPow16);
  73           else if (type ().equals ("long"))
  74             bL = bL.add (twoPow32);
  75           else if (type ().equals ("long long"))
  76             bL = bL.add (twoPow64);
  77 
  78         value (bL.shiftRight (bR.intValue ()));
  79       }
  80     }
  81     catch (ClassCastException e)
  82     {
  83       String[] parameters = {Util.getMessage ("EvaluationException.right"), left ().value ().getClass ().getName (), right ().value ().getClass ().getName ()};
  84       throw new EvaluationException (Util.getMessage ("EvaluationException.1", parameters));
  85     }
  86     return value ();
  87   } // evaluate
  88 } // class ShiftRight