plomlompom.com Git - plomrogue/blob - src/client/parse.c

   1 /* src/client/parse.c
   2  *
   3  * This file is part of PlomRogue. PlomRogue is licensed under the GPL version 3
   4  * or any later version. For details on its copyright, license, and warranties,
   5  * see the file NOTICE in the root directory of the PlomRogue source package.
   6  */
   7
   8 #define _POSIX_C_SOURCE 200809L /* strdup(), snprintf() */
   9 #include "parse.h"
  10 #include <stddef.h> /* size_t, NULL */
  11 #include <stdio.h> /* FILE, snprintf() */
  12 #include <stdint.h> /* uint8_t, uint32_t */
  13 #include <stdlib.h> /* free() */
  14 #include <string.h> /* strdup(), strlen() */
  15 #include <unistd.h> /* access(), F_OK */
  16 #include "../common/parse_file.h" /* set_err_line_options(), err_line_inc(),
  17                                    * err_line_zero(), token_from_line()
  18                                    */
  19 #include "../common/readwrite.h" /* try_fopen(),try_fclose(),textfile_width() */
  20 #include "../common/rexit.h" /* exit_err(), exit_trouble() */
  21 #include "../common/try_malloc.h" /* try_malloc() */
  22
  23
  24
  25 extern void parse_file(char * path, void (* token_to_entry) (char *, char *))
  26 {
  27     char * prefix = "Failed reading config file: \"";
  28     char * affix = "\". ";
  29     size_t size = strlen(prefix) + strlen(path) + strlen(affix) + 1;
  30     char * errline_intro = try_malloc(size, __func__);
  31     int test = snprintf(errline_intro, size, "%s%s%s", prefix, path, affix);
  32     exit_trouble(test < 0, __func__, "snprintf");
  33     exit_err(access(path, F_OK), errline_intro);
  34     FILE * file = try_fopen(path, "r", __func__);
  35     uint32_t linemax = textfile_width(file);
  36     char * errline_line = try_malloc(linemax + 1, __func__);
  37     set_err_line_options(errline_intro, errline_line, 1);
  38     err_line_zero();
  39     err_line(!linemax, "File is empty.");
  40     char * token0 = NULL; /* For final token_to_entry() if while() stagnates. */
  41     char * token1 = NULL;
  42     char * err_val = "No value given.";
  43     while (try_fgets(errline_line, linemax + 1, file, __func__))
  44     {
  45         err_line_inc();
  46         char * line_copy = strdup(errline_line);
  47         token0 = token_from_line(line_copy);
  48         if (token0)
  49         {
  50             err_line(0 == (token1 = token_from_line(NULL)), err_val);
  51             token_to_entry(token0, token1);
  52             token0 = NULL;
  53         }
  54         free(line_copy);
  55     }
  56     token_to_entry(token0, token1);
  57     try_fclose(file, __func__);
  58     free(errline_line);
  59     free(errline_intro);
  60 }
  61
  62
  63
  64 extern void parsetest_defcontext(uint8_t flags)
  65 {
  66     err_line(!(flags & EDIT_STARTED),"Outside appropriate definition context.");
  67 }
  68
  69
  70
  71 extern void parsetest_too_many_values()
  72 {
  73     err_line(!(!token_from_line(NULL)), "Too many values.");
  74 }
  75
  76
  77
  78 extern void parse_id_uniq(int test)
  79 {
  80     err_line(0 != test, "Declaration of ID already used.");
  81 }
  82
  83
  84
  85 extern void parse_unknown_arg()
  86 {
  87     err_line(1, "Unknown argument.");
  88 }
  89
  90
  91
  92 extern char * parse_init_entry(uint8_t * flags, size_t size)
  93 {
  94     *flags = EDIT_STARTED;
  95     char * p = try_malloc(size, __func__);
  96     memset(p, 0, size);
  97     return p;
  98 }
  99
 100
 101
 102 extern uint8_t parse_flagval(char * token0, char * token1, char * comparand,
 103                              uint8_t * flags, uint8_t set_flag, char type,
 104                              char * element)
 105 {
 106     if (parse_val(token0, token1, comparand, type, element))
 107     {
 108         parsetest_defcontext(*flags);
 109         *flags = *flags | set_flag;
 110         return 1;
 111     }
 112     return 0;
 113 }
 114
 115
 116
 117 extern void parse_and_reduce_to_readyflag(uint8_t * flags, uint8_t ready_flag)
 118 {
 119     char * err_fin = "Last definition block not finished yet.";
 120     err_line((*flags & ready_flag) ^ ready_flag, err_fin);
 121     *flags = ready_flag;
 122 }