1 files changed, 98 insertions, 0 deletions
diff --git a/src/mate-calc-cmd.c b/src/mate-calc-cmd.c
new file mode 100644
index 0000000..9af9a58
--- /dev/null
+++ b/src/mate-calc-cmd.c
@@ -0,0 +1,98 @@
+/*  $Header$
+ *
+ *  Copyright (c) 2009 Rich Burridge
+ *           
+ *  This program is free software; you can redistribute it and/or modify
+ *  it under the terms of the GNU General Public License as published by
+ *  the Free Software Foundation; either version 2, or (at your option)
+ *  any later version.
+ *           
+ *  This program 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 
+ *  General Public License for more details.
+ *           
+ *  You should have received a copy of the GNU General Public License
+ *  along with this program; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+ *  02111-1307, USA.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <sys/types.h>
+#include <time.h>
+
+#include "mp-equation.h"
+
+#define MAXLINE 1024
+
+static void
+solve(const char *equation)
+{
+    int ret;
+    MPEquationOptions options;
+    MPNumber z;
+    char result_str[MAXLINE];
+    
+    memset(&options, 0, sizeof(options));
+    options.base = 10;
+    options.wordlen = 32;
+    options.angle_units = MP_DEGREES;
+    
+    ret = mp_equation_parse(equation, &options, &z, NULL);
+
+    if (ret == PARSER_ERR_MP)
+        fprintf(stderr, "Error %s\n", mp_get_error());
+    else if (ret)        
+        fprintf(stderr, "Error %d\n", ret);
+    else {
+        mp_cast_to_string(&z, 10, 10, 9, 1, result_str, MAXLINE);
+        printf("%s\n", result_str);
+    }
+}
+
+
+/* Adjust user input equation string before solving it. */
+static void
+str_adjust(char *str)
+{
+    int i, j = 0;
+
+    str[strlen(str)-1] = '\0';        /* Remove newline at end of string. */
+    for (i = 0; str[i] != '\0'; i++) {        /* Remove whitespace. */
+        if (str[i] != ' ' && str[i] != '\t')
+            str[j++] = str[i];
+    }
+    str[j] = '\0';
+    if (j > 0 && str[j-1] == '=')     /* Remove trailing '=' (if present). */
+        str[j-1] = '\0';
+}
+
+int
+main(int argc, char **argv)
+{
+    char *equation, *line;
+    size_t nbytes = MAXLINE;
+
+    /* Seed random number generator. */
+    srand48((long) time((time_t *) 0));
+
+    equation = (char *) malloc(MAXLINE * sizeof(char));
+    while (1) {
+        printf("> ");
+        line = fgets(equation, nbytes, stdin);
+
+        if (line != NULL)
+            str_adjust(equation);
+
+        if (line == NULL || strcmp(equation, "exit") == 0 || strcmp(equation, "quit") == 0 || strlen(equation) == 0)
+            break;
+
+        solve(equation);
+    }
+    free(equation);
+
+    return 0;
+}