1 files changed, 129 insertions, 0 deletions
diff --git a/src/libixion/formula_functions.hpp b/src/libixion/formula_functions.hpp
new file mode 100644
index 0000000..c4d9d73
--- /dev/null
+++ b/src/libixion/formula_functions.hpp
@@ -0,0 +1,129 @@
+/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
+/*
+ * This Source Code Form is subject to the terms of the Mozilla Public
+ * License, v. 2.0. If a copy of the MPL was not distributed with this
+ * file, You can obtain one at http://mozilla.org/MPL/2.0/.
+ */
+
+#ifndef __IXION_FORMULA_FUNCTIONS_HPP__
+#define __IXION_FORMULA_FUNCTIONS_HPP__
+
+#include "ixion/global.hpp"
+#include "ixion/exceptions.hpp"
+#include "ixion/formula_function_opcode.hpp"
+
+#include "formula_value_stack.hpp"
+
+#include <string>
+#include <vector>
+
+namespace ixion {
+
+struct formula_token;
+
+/**
+ * Collection of built-in cell function implementations.  Note that those
+ * functions that return a string result <i>may</i> modify the state of the
+ * model context when the result string is not yet in the shared string
+ * pool.
+ */
+class formula_functions
+{
+public:
+    class invalid_arg : public general_error
+    {
+    public:
+        invalid_arg(const ::std::string& msg);
+    };
+
+    formula_functions(model_context& cxt, const abs_address_t& pos);
+    ~formula_functions();
+
+    static formula_function_t get_function_opcode(const formula_token& token);
+    static formula_function_t get_function_opcode(std::string_view s);
+    static std::string_view get_function_name(formula_function_t oc);
+
+    void interpret(formula_function_t oc, formula_value_stack& args);
+
+private:
+
+    // category: statistical
+    void fnc_abs(formula_value_stack& args) const;
+    void fnc_average(formula_value_stack& args) const;
+    void fnc_count(formula_value_stack& args) const;
+    void fnc_counta(formula_value_stack& args) const;
+    void fnc_countblank(formula_value_stack& args) const;
+    void fnc_max(formula_value_stack& args) const;
+    void fnc_median(formula_value_stack& args) const;
+    void fnc_min(formula_value_stack& args) const;
+    void fnc_mode(formula_value_stack& args) const;
+    void fnc_pi(formula_value_stack& args) const;
+
+    // category: mathematical
+    void fnc_int(formula_value_stack& args) const;
+    void fnc_mmult(formula_value_stack& args) const;
+    void fnc_subtotal(formula_value_stack& args) const;
+    void fnc_sum(formula_value_stack& args) const;
+
+    // category: logical
+    void fnc_and(formula_value_stack& args) const;
+    void fnc_false(formula_value_stack& args) const;
+    void fnc_if(formula_value_stack& args) const;
+    void fnc_not(formula_value_stack& args) const;
+    void fnc_or(formula_value_stack& args) const;
+    void fnc_true(formula_value_stack& args) const;
+
+    // category: information
+    void fnc_isblank(formula_value_stack& args) const;
+    void fnc_iserror(formula_value_stack& args) const;
+    void fnc_iseven(formula_value_stack& args) const;
+    void fnc_isformula(formula_value_stack& args) const;
+    void fnc_islogical(formula_value_stack& args) const;
+    void fnc_isna(formula_value_stack& args) const;
+    void fnc_isnontext(formula_value_stack& args) const;
+    void fnc_isnumber(formula_value_stack& args) const;
+    void fnc_isodd(formula_value_stack& args) const;
+    void fnc_isref(formula_value_stack& args) const;
+    void fnc_istext(formula_value_stack& args) const;
+    void fnc_n(formula_value_stack& args) const;
+    void fnc_na(formula_value_stack& args) const;
+    void fnc_type(formula_value_stack& args) const;
+
+    // category: text
+    void fnc_concatenate(formula_value_stack& args) const;
+    void fnc_exact(formula_value_stack& args) const;
+    void fnc_find(formula_value_stack& args) const;
+    void fnc_left(formula_value_stack& args) const;
+    void fnc_len(formula_value_stack& args) const;
+    void fnc_mid(formula_value_stack& args) const;
+    void fnc_replace(formula_value_stack& args) const;
+    void fnc_rept(formula_value_stack& args) const;
+    void fnc_right(formula_value_stack& args) const;
+    void fnc_substitute(formula_value_stack& args) const;
+    void fnc_t(formula_value_stack& args) const;
+    void fnc_textjoin(formula_value_stack& args) const;
+    void fnc_trim(formula_value_stack& args) const;
+
+    // category: date & time
+    void fnc_now(formula_value_stack& args) const;
+
+    // cateogry: spreadsheet
+    void fnc_column(formula_value_stack& args) const;
+    void fnc_columns(formula_value_stack& args) const;
+    void fnc_row(formula_value_stack& args) const;
+    void fnc_rows(formula_value_stack& args) const;
+    void fnc_sheet(formula_value_stack& args) const;
+    void fnc_sheets(formula_value_stack& args) const;
+
+    // category: development
+    void fnc_wait(formula_value_stack& args) const;
+
+private:
+    model_context& m_context;
+    abs_address_t m_pos;
+};
+
+}
+
+#endif
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */