File indexing completed on 2024-05-12 16:35:27

 /* This file is part of the KDE project
    Copyright (C) 1998-2002 The KSpread Team <calligra-devel@kde.org>
    Copyright (C) 2006 Brad Hards <bradh@frogmouth.net>
 
    This library is free software; you can redistribute it and/or
    modify it under the terms of the GNU Library General Public
    License as published by the Free Software Foundation; only
    version 2 of the License.
 
    This library is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
    Library General Public License for more details.
 
    You should have received a copy of the GNU Library General Public License
    along with this library; see the file COPYING.LIB.  If not, write to
    the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
    Boston, MA 02110-1301, USA.
 */
 
 // built-in logical functions
 
 #include "BitOpsModule.h"
 
 #include "Function.h"
 #include "FunctionModuleRegistry.h"
 #include "ValueCalc.h"
 #include "ValueConverter.h"
 
 using namespace Calligra::Sheets;
 
 // prototypes (sorted alphabetically)
 Value func_bitand(valVector args, ValueCalc *calc, FuncExtra *);
 Value func_bitor(valVector args, ValueCalc *calc, FuncExtra *);
 Value func_bitxor(valVector args, ValueCalc *calc, FuncExtra *);
 Value func_bitlshift(valVector args, ValueCalc *calc, FuncExtra *);
 Value func_bitrshift(valVector args, ValueCalc *calc, FuncExtra *);
 
 
 CALLIGRA_SHEETS_EXPORT_FUNCTION_MODULE("kspreadbitopsmodule.json", BitOpsModule)
 
 
 BitOpsModule::BitOpsModule(QObject* parent, const QVariantList&)
         : FunctionModule(parent)
 {
     Function *f;
 
     f = new Function("BITAND", func_bitand);
     f->setParamCount(2);
     add(f);
     f = new Function("BITOR", func_bitor);
     f->setParamCount(2);
     add(f);
     f = new Function("BITXOR", func_bitxor);
     f->setParamCount(2);
     add(f);
     f = new Function("BITLSHIFT", func_bitlshift);
     f->setParamCount(2);
     add(f);
     f = new Function("BITRSHIFT", func_bitrshift);
     f->setParamCount(2);
     add(f);
 }
 
 QString BitOpsModule::descriptionFileName() const
 {
     return QString("bitops.xml");
 }
 
 
 // Function: BITAND
 Value func_bitand(valVector args, ValueCalc *, FuncExtra *)
 {
     const quint64 x = args[0].asInteger();
     const quint64 y = args[1].asInteger();
     return Value(static_cast<qint64>(x & y));
 }
 
 // Function: BITOR
 Value func_bitor(valVector args, ValueCalc *, FuncExtra *)
 {
     const quint64 x = args[0].asInteger();
     const quint64 y = args[1].asInteger();
     return Value(static_cast<qint64>(x | y));
 }
 
 // Function: BITXOR
 Value func_bitxor(valVector args, ValueCalc *, FuncExtra *)
 {
     const quint64 x = args[0].asInteger();
     const quint64 y = args[1].asInteger();
     return Value(static_cast<qint64>(x ^ y));
 }
 
 // Function: BITLSHIFT
 Value func_bitlshift(valVector args, ValueCalc *, FuncExtra *)
 {
     const quint64 x = args[0].asInteger();
     const int numshift = args[1].asInteger();
     if (numshift == 0)
         return Value(static_cast<qint64>(x));
     else if (numshift > 0)
         return Value(static_cast<qint64>(x << numshift));
     else // negative left shift, becomes right shift
         return Value(static_cast<qint64>(x >>(-1 * numshift)));
 }
 
 // Function: BITRSHIFT
 Value func_bitrshift(valVector args, ValueCalc *, FuncExtra *)
 {
     const quint64 x = args[0].asInteger();
     const int numshift = args[1].asInteger();
     if (numshift == 0)
         return Value(static_cast<qint64>(x));
     else if (numshift > 0)
         return Value(static_cast<qint64>(x >> numshift));
     else // negative right shift, becomes left shift
         return Value(static_cast<qint64>(x << (-1 * numshift)));
 }
 
 #include "bitops.moc"