1 files changed, 183 insertions, 0 deletions
diff --git a/kspread/kspread_functions_logic.cpp b/kspread/kspread_functions_logic.cpp
new file mode 100644
index 00000000..87dd26d4
--- /dev/null
+++ b/kspread/kspread_functions_logic.cpp
@@ -0,0 +1,183 @@
+/* This file is part of the KDE project
+   Copyright (C) 1998-2002 The KSpread Team
+                           www.koffice.org/kspread
+   Copyright (C) 2005 Tomas Mecir <[email protected]>
+
+   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; either
+   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 "functions.h"
+#include "valuecalc.h"
+#include "valueconverter.h"
+
+using namespace KSpread;
+
+// prototypes (sorted alphabetically)
+Value func_and (valVector args, ValueCalc *calc, FuncExtra *);
+Value func_false (valVector args, ValueCalc *calc, FuncExtra *);
+Value func_if (valVector args, ValueCalc *calc, FuncExtra *);
+Value func_nand (valVector args, ValueCalc *calc, FuncExtra *);
+Value func_nor (valVector args, ValueCalc *calc, FuncExtra *);
+Value func_not (valVector args, ValueCalc *calc, FuncExtra *);
+Value func_or (valVector args, ValueCalc *calc, FuncExtra *);
+Value func_true (valVector args, ValueCalc *calc, FuncExtra *);
+Value func_xor (valVector args, ValueCalc *calc, FuncExtra *);
+
+// registers all logic functions
+void RegisterLogicFunctions()
+{
+  FunctionRepository* repo = FunctionRepository::self();
+  Function *f;
+
+  f = new Function ("FALSE", func_false);
+  f->setParamCount (0);
+  repo->add (f);
+  f = new Function ("TRUE", func_true);
+  f->setParamCount (0);
+  repo->add (f);
+  f = new Function ("NOT", func_not);
+  f->setParamCount (1);
+  repo->add (f);
+  f = new Function ("AND", func_and);
+  f->setParamCount (1, -1);
+  f->setAcceptArray ();
+  repo->add (f);
+  f = new Function ("NAND", func_nand);
+  f->setParamCount (1, -1);
+  f->setAcceptArray ();
+  repo->add (f);
+  f = new Function ("NOR", func_nor);
+  f->setParamCount (1, -1);
+  f->setAcceptArray ();
+  repo->add (f);
+  f = new Function ("OR", func_or);
+  f->setParamCount (1, -1);
+  f->setAcceptArray ();
+  repo->add (f);
+  f = new Function ("XOR", func_xor);
+  f->setParamCount (1, -1);
+  f->setAcceptArray ();
+  repo->add (f);
+  f = new Function ("IF", func_if);
+  f->setParamCount (3);
+  repo->add (f);
+}
+
+// Function: FALSE
+Value func_false (valVector, ValueCalc *, FuncExtra *)
+{
+  return Value (false);
+}
+
+// Function: TRUE
+Value func_true (valVector, ValueCalc *, FuncExtra *)
+{
+  return Value (true);
+}
+
+// helper for most logical functions
+bool asBool (Value val, ValueCalc *calc)
+{
+  return calc->conv()->asBoolean (val).asBoolean ();
+}
+
+// Function: NOT
+Value func_not (valVector args, ValueCalc *calc, FuncExtra *)
+{
+  bool val = asBool (args[0], calc) ? false : true;
+  return Value (val);
+}
+
+// Function: OR
+void awOr (ValueCalc *calc, Value &res, Value value, Value)
+{
+  if (! res.asBoolean())
+    res = Value ( asBool (value, calc) );
+}
+Value func_or (valVector args, ValueCalc *calc, FuncExtra *)
+{
+  Value result(false);
+  int cnt = args.count();
+  for (int i = 0; i < cnt; ++i) {
+    calc->arrayWalk (args[i], result, awOr, 0);
+    if (result.asBoolean())
+      // if any value is true, return true
+      return result;
+  }
+  // nothing is true -> return false
+  return result;
+}
+
+// Function: NOR
+Value func_nor (valVector args, ValueCalc *calc, FuncExtra *extra)
+{
+  // OR in reverse
+  return Value(! func_or(args, calc, extra).asBoolean());
+}
+
+// Function: AND
+void awAnd (ValueCalc *calc, Value &res, Value value, Value)
+{
+  if (res.asBoolean())
+    res = Value ( asBool (value, calc) );
+}
+Value func_and (valVector args, ValueCalc *calc, FuncExtra *)
+{
+  Value result(true);
+  int cnt = args.count();
+  for (int i = 0; i < cnt; ++i) {
+    calc->arrayWalk (args[i], result, awAnd, 0);
+    if (! result.asBoolean())
+      // if any value is false, return false
+      return result;
+  }
+  // nothing is false -> return true
+  return result;
+}
+
+// Function: NAND
+Value func_nand (valVector args, ValueCalc *calc, FuncExtra *extra)
+{
+  // AND in reverse
+  return Value(! func_and(args, calc, extra).asBoolean());
+}
+
+// Function: XOR
+void awXor (ValueCalc *calc, Value &count, Value value, Value)
+{
+  if (asBool (value, calc))
+    count = Value( count.asInteger() + 1 );
+}
+Value func_xor (valVector args, ValueCalc *calc, FuncExtra *)
+{
+  // exclusive OR - exactly one value must be true
+  int cnt = args.count();
+  Value count(0);
+  for (int i = 0; i < cnt; ++i)
+    calc->arrayWalk (args[i], count, awXor, 0);
+  return Value (count.asInteger() == 1);
+}
+
+// Function: IF
+Value func_if (valVector args, ValueCalc *calc, FuncExtra *)
+{
+  if (asBool (args[0], calc))
+    return args[1];
+  else
+    return args[2];
+}