gcalctool/get.c

   1
   2 /*  $Header$
   3  *
   4  *  Copyright (c) 1987-2008 Sun Microsystems, Inc. All Rights Reserved.
   5  *
   6  *  This program is free software; you can redistribute it and/or modify
   7  *  it under the terms of the GNU General Public License as published by
   8  *  the Free Software Foundation; either version 2, or (at your option)
   9  *  any later version.
  10  *
  11  *  This program is distributed in the hope that it will be useful, but
  12  *  WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  14  *  General Public License for more details.
  15  *
  16  *  You should have received a copy of the GNU General Public License
  17  *  along with this program; if not, write to the Free Software
  18  *  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
  19  *  02111-1307, USA.
  20  */
  21
  22 #include <stdio.h>
  23 #include <string.h>
  24 #include <ctype.h>
  25 #include <stdlib.h>
  26 #include <unistd.h>
  27 #include <langinfo.h>
  28 #include <locale.h>
  29 #include <sys/types.h>
  30 #include <sys/file.h>
  31 #include <sys/param.h>
  32 #include <assert.h>
  33 #include <gconf/gconf-client.h>
  34
  35 #include "get.h"
  36 #include "display.h"
  37 #include "mp.h"
  38
  39 #define EQUAL(a, b)    (strlen(a)==strlen(b)) & !strcmp(a, b)
  40
  41 /* Various string values read/written as X resources. */
  42
  43 char *Rbstr[MAXBASES]     = { "BIN", "OCT", "DEC", "HEX" };
  44 char *Rdstr[MAXDISPMODES] = { "ENG", "FIX", "SCI" };
  45 char *Rmstr[MAXMODES]     = { "BASIC", "ADVANCED", "FINANCIAL",
  46                               "SCIENTIFIC" };
  47 char *Rtstr[MAXTRIGMODES] = { "DEG", "GRAD", "RAD" };
  48 char *Rsstr[MAXSYNTAX]    = { "ARITHMETIC", "ARITHMETIC_PRECEDENCE" };
  49
  50 static GConfClient *client = NULL;
  51
  52
  53 char *
  54 get_resource(char *key)
  55 {
  56     char key_name[MAXLINE];
  57     SNPRINTF(key_name, MAXLINE, "/apps/%s/%s", v->appname, key);
  58     return(gconf_client_get_string(client, key_name, NULL));
  59 }
  60
  61
  62 void
  63 set_resource(char *key, char *value)
  64 {
  65     char key_name[MAXLINE];
  66     SNPRINTF(key_name, MAXLINE, "/apps/%s/%s", v->appname, key);
  67     gconf_client_set_string(client, key_name, value, NULL);
  68 }
  69
  70
  71 void
  72 set_int_resource(char *key, int value)
  73 {
  74     char intvalue[MAXLINE];
  75     SNPRINTF(intvalue, MAXLINE, "%d", value);
  76     set_resource(key, intvalue);
  77 }
  78
  79
  80 void
  81 set_boolean_resource(char *key, int value)
  82 {
  83     if (value) {
  84         set_resource(key, "true");
  85     } else {
  86         set_resource(key, "false");
  87     }
  88 }
  89
  90
  91 char *
  92 convert(char *line)       /* Convert .gcalctoolcf line to ascii values. */
  93 {
  94     static char output[MAXLINE];   /* Converted output record. */
  95     int i;                  /* Position within input line. */
  96     int len;
  97     int n = 0;              /* Position within output line. */
  98
  99     len = strlen(line);
 100     for (i = 0; i < len; i++) {
 101         if (line[i] == ' ') {
 102             continue;
 103         } else {
 104             output[n++] = line[i];
 105         }
 106     }
 107     output[n] = '\0';
 108
 109     return(output);
 110 }
 111
 112
 113 int
 114 get_boolean_resource(char *key, int *boolval)
 115 {
 116     char *val, tempstr[MAXLINE];
 117     int len, n;
 118
 119     if ((val = get_resource(key)) == NULL) {
 120         g_free(val);
 121         return(0);
 122     }
 123     STRNCPY(tempstr, val, MAXLINE - 1);
 124     g_free(val);
 125     len = strlen(tempstr);
 126     for (n = 0; n < len; n++) {
 127         if (isupper((int) tempstr[n])) {
 128             tempstr[n] = tolower((int) tempstr[n]);
 129         }
 130     }
 131     if (EQUAL(tempstr, "true")) {
 132         *boolval = TRUE;
 133     } else {
 134         *boolval = FALSE;
 135     }
 136
 137     return(1);
 138 }
 139
 140
 141 /* Get integer resource from database. */
 142
 143 int
 144 get_int_resource(char *key, int *intval)
 145 {
 146     char *val;
 147
 148     if ((val = get_resource(key)) == NULL) {
 149         g_free(val);
 150         return(0);
 151     }
 152     *intval = atoi(val);
 153
 154     g_free(val);
 155     return(1);
 156 }
 157
 158
 159 /* Return the radix character. For most locales, this is a period.
 160  * If nl_langinfo(RADIXCHAR) returns an empty string, return ",".
 161  */
 162
 163 const char *
 164 get_radix()
 165 {
 166     char *radix;
 167
 168     setlocale(LC_NUMERIC, "");
 169     if ((radix = nl_langinfo(RADIXCHAR)) != NULL) {
 170         radix = g_locale_to_utf8(radix, -1, NULL, NULL, NULL);
 171     }
 172
 173     if (radix == NULL || radix[0] == '\0') {
 174         return(".");
 175     } else {
 176         return(radix);
 177     }
 178 }
 179
 180
 181 /* Get a string resource from database. */
 182
 183 static int
 184 get_str_resource(char *key, char *strval)
 185 {
 186     char *val;
 187     int i, len;
 188
 189     if ((val = get_resource(key)) == NULL) {
 190         g_free(val);
 191         return(0);
 192     }
 193     STRNCPY(strval, val, MAXLINE - 1);
 194     g_free(val);
 195     len = strlen(strval);
 196     for (i = 0; i < len; i++) {
 197         if (islower((int) strval[i])) {
 198             strval[i] = toupper((int) strval[i]);
 199         }
 200     }
 201
 202     return(1);
 203 }
 204
 205
 206 /* Return the thousands separator string. For most locales, this is a
 207  * comma.
 208  */
 209
 210 const char *
 211 get_tsep()
 212 {
 213     char *tsep;
 214
 215     setlocale(LC_NUMERIC, "");
 216     if ((tsep = nl_langinfo(THOUSEP)) != NULL) {
 217         tsep = g_locale_to_utf8(tsep, -1, NULL, NULL, NULL);
 218     }
 219
 220     if (tsep == NULL) {
 221         return(",");
 222     } else {
 223         return(tsep);
 224     }
 225 }
 226
 227
 228 int
 229 get_tsep_count()
 230 {
 231     return 3;
 232 }
 233
 234
 235 void
 236 read_resources()    /* Read all possible resources from the database. */
 237 {
 238     int boolval, i, intval;
 239     char key[MAXLINE], str[MAXLINE];
 240
 241     if (get_int_resource(R_ACCURACY, &intval)) {
 242         v->accuracy = intval;
 243         if (v->accuracy < 0 || v->accuracy > MAXACC) {
 244             FPRINTF(stderr, _("%s: accuracy should be in the range 0-%d\n"),
 245                     v->progname, MAXACC);
 246             v->accuracy = 9;
 247         }
 248     }
 249
 250     for (i = 0; i < MAX_REGISTERS; i++) {
 251         SNPRINTF(key, MAXLINE, "register%d", i);
 252         if (get_str_resource(key, str)) {
 253             MPstr_to_num(str, DEC, v->MPmvals[i]);
 254         }
 255     }
 256
 257     if (get_str_resource(R_BASE, str)) {
 258         for (i = 0; i < MAXBASES; i++) {
 259             if (EQUAL(str, Rbstr[i])) {
 260                 break;
 261             }
 262         }
 263
 264         if (i == MAXBASES) {
 265             FPRINTF(stderr, _("%s: base should be 2, 8, 10 or 16\n"),
 266                     v->progname);
 267         } else {
 268             v->base = (enum base_type) i;
 269         }
 270     }
 271
 272     if (get_str_resource(R_DISPLAY, str)) {
 273         for (i = 0; i < MAXDISPMODES; i++) {
 274             if (EQUAL(str, Rdstr[i])) {
 275                 break;
 276             }
 277         }
 278
 279         if (i == MAXDISPMODES) {
 280             FPRINTF(stderr, _("%s: invalid display mode [%s]\n"),
 281                     v->progname, str);
 282         } else {
 283             v->dtype = (enum num_type) i;
 284         }
 285     }
 286
 287     if (get_str_resource(R_MODE, str)) {
 288         for (i = 0; i < MAXMODES; i++) {
 289             if (EQUAL(str, Rmstr[i])) {
 290                 break;
 291             }
 292         }
 293
 294         if (i == MAXMODES) {
 295             FPRINTF(stderr, _("%s: invalid mode [%s]\n"), v->progname, str);
 296         } else {
 297             v->modetype = (enum mode_type) i;
 298         }
 299     }
 300
 301     if (get_str_resource(R_TRIG, str)) {
 302         for (i = 0; i < MAXTRIGMODES; i++) {
 303             if (EQUAL(str, Rtstr[i])) {
 304                 break;
 305             }
 306         }
 307
 308         if (i == MAXTRIGMODES) {
 309             FPRINTF(stderr, _("%s: invalid trigonometric mode [%s]\n"),
 310                     v->progname, str);
 311         } else {
 312             v->ttype = (enum trig_type) i;
 313         }
 314     }
 315
 316     /* Set expression (arithmetic precedence) mode as default. */
 317     v->syntax = EXPRS;
 318
 319     if (get_str_resource(R_SYNTAX, str)) {
 320         for (i = 0; i < MAXSYNTAX; i++) {
 321             if (EQUAL(str, Rsstr[i])) {
 322                 break;
 323             }
 324         }
 325
 326         if (i == MAXSYNTAX) {
 327             FPRINTF(stderr, _("%s: invalid syntax mode [%s]\n"),
 328                     v->progname, str);
 329         } else {
 330             v->syntax = i;
 331         }
 332     }
 333
 334     if (get_boolean_resource(R_ZEROES, &boolval)) {
 335         v->show_zeroes = boolval;
 336     }
 337
 338     if (get_boolean_resource(R_TSEP, &boolval)) {
 339         v->show_tsep = boolval;
 340     }
 341 }
 342
 343 void
 344 resources_init()        /* Load gconf configuration database for gcalctool. */
 345 {
 346     char str[MAXLINE];
 347
 348     assert(client == NULL);
 349     SNPRINTF(str, MAXLINE, "/apps/%s", v->appname);
 350     client = gconf_client_get_default();
 351     gconf_client_add_dir(client, str, GCONF_CLIENT_PRELOAD_NONE, NULL);
 352 }