usr.bin/localedef/numeric.c

   1 /*
   2  * This file and its contents are supplied under the terms of the
   3  * Common Development and Distribution License ("CDDL"), version 1.0.
   4  * You may only use this file in accordance with the terms of version
   5  * 1.0 of the CDDL.
   6  *
   7  * A full copy of the text of the CDDL should have accompanied this
   8  * source.  A copy of the CDDL is also available via the Internet at
   9  * http://www.illumos.org/license/CDDL.
  10  */
  11
  12 /*
  13  * Copyright 2010 Nexenta Systems, Inc.  All rights reserved.
  14  * Copyright 2015 John Marino <draco@marino.st>
  15  */
  16
  17 /*
  18  * LC_NUMERIC database generation routines for localedef.
  19  */
  20
  21 #include <stdio.h>
  22 #include <stdlib.h>
  23 #include <errno.h>
  24 #include <sys/types.h>
  25 #include <string.h>
  26 #include <unistd.h>
  27 #include "localedef.h"
  28 #include "parser.h"
  29 #include "lnumeric.h"
  30
  31 static struct lc_numeric_T numeric;
  32
  33 void
  34 init_numeric(void)
  35 {
  36         (void) memset(&numeric, 0, sizeof (numeric));
  37 }
  38
  39 void
  40 add_numeric_str(wchar_t *wcs)
  41 {
  42         char *str;
  43
  44         if ((str = to_mb_string(wcs)) == NULL) {
  45                 INTERR;
  46                 return;
  47         }
  48         free(wcs);
  49
  50         switch (last_kw) {
  51         case T_DECIMAL_POINT:
  52                 numeric.decimal_point = str;
  53                 break;
  54         case T_THOUSANDS_SEP:
  55                 numeric.thousands_sep = str;
  56                 break;
  57         default:
  58                 free(str);
  59                 INTERR;
  60                 break;
  61         }
  62 }
  63
  64 #pragma GCC diagnostic push
  65 #pragma GCC diagnostic ignored "-Wcast-qual"
  66
  67 void
  68 reset_numeric_group(void)
  69 {
  70         free((char *)numeric.grouping);
  71         numeric.grouping = NULL;
  72 }
  73
  74 void
  75 add_numeric_group(int n)
  76 {
  77         char *s;
  78
  79         if (numeric.grouping == NULL) {
  80                 (void) asprintf(&s, "%d", n);
  81         } else {
  82                 (void) asprintf(&s, "%s;%d", numeric.grouping, n);
  83         }
  84         if (s == NULL)
  85                 fprintf(stderr, "out of memory");
  86
  87         free((char *)numeric.grouping);
  88         numeric.grouping = s;
  89 }
  90
  91 #pragma GCC diagnostic pop
  92
  93 void
  94 dump_numeric(void)
  95 {
  96         FILE *f;
  97
  98         if ((f = open_category()) == NULL) {
  99                 return;
 100         }
 101
 102         if ((putl_category(numeric.decimal_point, f) == EOF) ||
 103             (putl_category(numeric.thousands_sep, f) == EOF) ||
 104             (putl_category(numeric.grouping, f) == EOF)) {
 105                 return;
 106         }
 107         close_category(f);
 108 }