[BACK]Return to parse.y CVS log [TXT][DIR] Up to [local] / blind

Diff for /blind/parse.y between version 1.12 and 1.17

version 1.12, 2022/03/29 21:15:15 version 1.17, 2022/04/10 21:04:06
Line 25 
Line 25 
 #include "config.h"  #include "config.h"
 #include "log.h"  #include "log.h"
   
 static struct file {  #define START_EXPAND    1
         FILE                    *stream;  #define DONE_EXPAND     2
         char                    *name;  
         size_t                   ungetpos;  
         size_t                   ungetsize;  
         u_char                  *ungetbuf;  
         int                      eof_reached;  
         int                      lineno;  
 } *f;  
   
   static struct file *f;
   
 int             lookup(char *);  int             lookup(char *);
 int             igetc(void);  int             igetc(void);
 int             lgetc(int);  int             lgetc(int);
Line 49  int  yyerror(const char *, ...)
Line 44  int  yyerror(const char *, ...)
   
 int             config_load(struct blind *);  int             config_load(struct blind *);
 struct file    *config_push(const char *);  struct file    *config_push(const char *);
 int             config_pop(void);  int             config_close(void);
   
   static int      expanding;
   static int      errors = 0;
   struct blind   *env = NULL;
   
 TAILQ_HEAD(symhead, sym)         symhead = TAILQ_HEAD_INITIALIZER(symhead);  TAILQ_HEAD(symhead, sym)         symhead = TAILQ_HEAD_INITIALIZER(symhead);
 struct sym {  struct sym {
         TAILQ_ENTRY(sym)         entry;          TAILQ_ENTRY(sym)         entry;
Line 59  struct sym {
Line 58  struct sym {
         char                    *nam;          char                    *nam;
         char                    *val;          char                    *val;
 };  };
   
 char           *symget(const char *);  char           *symget(const char *);
   
 struct blind   *env = NULL;  
 static int      errors = 0;  
   
 typedef struct {  typedef struct {
         union {          union {
                 int64_t  number;                  int64_t  number;
Line 148  lookup(char *s)
Line 145  lookup(char *s)
                 return (STRING);                  return (STRING);
 }  }
   
 #define START_EXPAND    1  
 #define DONE_EXPAND     2  
   
 static int      expanding;  
   
 char *  char *
 symget(const char *nam)  symget(const char *nam)
 {  {
Line 173  igetc(void)
Line 165  igetc(void)
         int     c;          int     c;
   
         while (1) {          while (1) {
                 if (f->ungetpos > 0)                  if (f->unpos > 0)
                         c = f->ungetbuf[--f->ungetpos];                          c = f->unbuf[--f->unpos];
                 else                  else
                         c = getc(f->stream);                          c = getc(f->stream);
   
Line 197  lgetc(int quotec)
Line 189  lgetc(int quotec)
                 if ((c = igetc()) == EOF) {                  if ((c = igetc()) == EOF) {
                         yyerror("reached end of file while parsing "                          yyerror("reached end of file while parsing "
                             "quoted string");                              "quoted string");
                         if (config_pop() == EOF)                          if (config_close() == EOF)
                                 return (EOF);                                  return (EOF);
                         return (quotec);                          return (quotec);
                 }                  }
Line 220  lgetc(int quotec)
Line 212  lgetc(int quotec)
                  * count right if last line in included file is syntactically                   * count right if last line in included file is syntactically
                  * invalid and has no newline.                   * invalid and has no newline.
                  */                   */
                 if (f->eof_reached == 0) {                  if (f->eof == 0) {
                         f->eof_reached = 1;                          f->eof = 1;
                         return ('\n');                          return ('\n');
                 }                  }
                 while (c == EOF) {                  while (c == EOF) {
                         if (config_pop() == EOF)                          if (config_close() == EOF)
                                 return (EOF);                                  return (EOF);
                         c = igetc();                          c = igetc();
                 }                  }
Line 239  lungetc(int c)
Line 231  lungetc(int c)
         if (c == EOF)          if (c == EOF)
                 return;                  return;
   
         if (f->ungetpos >= f->ungetsize) {          if (f->unpos >= f->unsize) {
                 void *p = reallocarray(f->ungetbuf, f->ungetsize, 2);                  void *p = reallocarray(f->unbuf, f->unsize, 2);
                 if (p == NULL)                  if (p == NULL)
                         log_fatal("cannot reallocate memory");                          log_fatal("cannot reallocate memory");
                 f->ungetbuf = p;                  f->unbuf = p;
                 f->ungetsize *= 2;                  f->unsize *= 2;
         }          }
         f->ungetbuf[f->ungetpos++] = c;          f->unbuf[f->unpos++] = c;
 }  }
   
 int  int
Line 362  top:
Line 354  top:
         if (c == '-' || isdigit(c)) {          if (c == '-' || isdigit(c)) {
                 do {                  do {
                         *p++ = c;                          *p++ = c;
                         if ((size_t)(p-buf) >= sizeof(buf)) {                                  if ((size_t)(p-buf) >= sizeof(buf)) {
                                 yyerror("string too long");                                  yyerror("string too long");
                                 return (findeol());                                  return (findeol());
                         }                          }
Line 432  nodigits:
Line 424  nodigits:
 int  int
 config_load(struct blind *temp)  config_load(struct blind *temp)
 {  {
         env = temp;          env = temp;
         errors = 0;          errors = 0;
   
         if ((f = config_push(env->bl_conf)) == NULL) {          if ((f = calloc(1, sizeof(struct file))) == NULL) {
                 //       config_purge(PURGE_ALL);                  log_debug("cannot allocate memory");
                 return (-1);                  return (-1);
           }
           if ((f->name = strdup(env->bl_conf)) == NULL) {
                   log_debug("cannot duplicate name");
                   free(f);
                   return (-1);
         }          }
           if ((f->stream = fopen(f->name, "r")) == NULL) {
                   log_debug("cannot open config file");
                   free(f->name);
                   free(f);
                   return (-1);
           }
           if (config_perm(fileno(f->stream), f->name)) {
                   fclose(f->stream);
                   free(f->name);
                   free(f);
                   return (-1);
           }
           f->lineno = 1;
           f->unsize = 16;
           if ((f->unbuf = malloc(f->unsize)) == NULL) {
                   log_debug("cannot allocate buffer");
                   fclose(f->stream);
                   free(f->name);
                   free(f);
                   return (-1);
           }
   
         yyparse();          yyparse();
           // setup
   
         // setup          if (errors)
                   return (-1);
   
         if (errors) {          return (0);
                 //      config_purge(PURGE_ALL);  
                 return (-1);  
         }  
   
         return (0);  
 }  }
   
 struct file *  
 config_push(const char *name)  
 {  
         struct file *nf;  
   
         if ((nf = calloc(1, sizeof(struct file))) == NULL) {  
                 log_debug("cannot allocate memory");  
                 return (NULL);  
         }  
         if ((nf->name = strdup(name)) == NULL) {  
                 log_debug("cannot duplicate name");  
                 free(nf);  
                 return (NULL);  
         }  
         if ((nf->stream = fopen(nf->name, "r")) == NULL) {  
                 log_debug("cannot open config file");  
                 free(nf->name);  
                 free(nf);  
                 return (NULL);  
         }  
         if (config_perm(fileno(nf->stream), nf->name)) {  
                 fclose(nf->stream);  
                 free(nf->name);  
                 free(nf);  
                 return (NULL);  
         }  
         nf->lineno = 1;  
         nf->ungetsize = 16;  
         nf->ungetbuf = malloc(nf->ungetsize);  
         if (nf->ungetbuf == NULL) {  
                 log_debug("cannot allocate buffer");  
                 fclose(nf->stream);  
                 free(nf->name);  
                 free(nf);  
                 return (NULL);  
         }  
   
         return (nf);  
 }  
   
 int  int
 config_pop(void)  config_close(void)
 {  {
         fclose(f->stream);          fclose(f->stream);
         free(f->name);          free(f->name);
         free(f->ungetbuf);          free(f->unbuf);
         free(f);          free(f);
   
         return (EOF);          return (EOF);
 }  }
Legend:
Removed from v.1.12  
changed lines
  Added in v.1.17
https://cvs.kroczynski.net