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

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