src/declara.c

   1 /*
   2  *  Copyright (C) 2015  Thadeu Lima de Souza Cascardo <cascardo@cascardo.eti.br>
   3  *
   4  *  This program is free software; you can redistribute it and/or modify
   5  *  it under the terms of the GNU General Public License as published by
   6  *  the Free Software Foundation; either version 3 of the License, or
   7  *  (at your option) any later version.
   8  *
   9  *  This program is distributed in the hope that it will be useful,
  10  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  *  GNU General Public License for more details.
  13  *
  14  *  You should have received a copy of the GNU General Public License along
  15  *  with this program; if not, write to the Free Software Foundation, Inc.,
  16  *  51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  17  */
  18
  19 #include <stdio.h>
  20 #include <stdlib.h>
  21 #include <string.h>
  22 #include <errno.h>
  23 #include <fcntl.h>
  24 #include <unistd.h>
  25
  26 #include "declaracao.h"
  27 #include "cmd.h"
  28 #include "base.h"
  29 #include "contribuinte.h"
  30 #include "rendimento.h"
  31 #include "isento.h"
  32 #include "pagamento.h"
  33 #include "bem.h"
  34 #include "calcula.h"
  35 #include "gera.h"
  36
  37 static int realprocess(struct declaracao *dec, int fd)
  38 {
  39         char *line = NULL;
  40         size_t lsz = 0;
  41         FILE *f;
  42         int r;
  43         int n = 1;
  44         f = fdopen(fd, "r");
  45         if (!f)
  46                 return -errno;
  47         while ((r = getline(&line, &lsz, f)) > 0) {
  48                 r = cmd_run(dec, line);
  49                 if (r < 0) {
  50                         fprintf(stderr, "Não foi possível executar comando na linha %d: %s\n",
  51                                 n, strerror(-r));
  52                 }
  53                 n++;
  54         }
  55         free(line);
  56         return r;
  57 }
  58
  59 static int process(char *filename)
  60 {
  61         int r = 0;
  62         int fd;
  63         struct declaracao *dec;
  64         dec = declaracao_new(-1);
  65         if (!dec)
  66                 return -errno;
  67         fd = open(filename, O_RDONLY);
  68         if (fd < 0) {
  69                 r = -errno;
  70                 goto out_open;
  71         }
  72         realprocess(dec, fd);
  73         close(fd);
  74 out_open:
  75         declaracao_free(dec);
  76         return r;
  77 }
  78
  79 static void usage(void)
  80 {
  81         fprintf(stderr, "declara <filename>\n");
  82         exit(1);
  83 }
  84
  85 int main(int argc, char **argv)
  86 {
  87         char *filename;
  88         int r;
  89         if (argc < 2)
  90                 usage();
  91
  92         cmd_init();
  93         base_cmd_init();
  94         contribuinte_cmd_init();
  95         rendimento_cmd_init();
  96         isento_cmd_init();
  97         pagamento_cmd_init();
  98         bem_cmd_init();
  99         calcula_cmd_init();
 100         gera_cmd_init();
 101         sistema_cmd_init();
 102
 103         filename = argv[1];
 104         r = process(filename);
 105         if (r)
 106                 return 1;
 107         return 0;
 108 }