Suporta carnê leão
[cascardo/declara.git] / lib / base.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 "cmd.h"
20 #include <stdio.h>
21 #include <stdlib.h>
22 #include <string.h>
23 #include <errno.h>
24 #include "rendimento.h"
25 #include "carne.h"
26 #include "pagamento.h"
27 #include "bem.h"
28 #include "isento.h"
29 #include "dependente.h"
30 #include "conjuge.h"
31 #include "sistema.h"
32 #include "totais.h"
33 #include "util.h"
34
35 SET_INT(ano);
36 SET_STRING(cpf);
37 SET_STRING(nome);
38 SET_STRING(recibo);
39 SET_STRING(retifica);
40
41 SET_STRING(banco);
42 SET_STRING(agencia);
43 SET_STRING(contacorrente);
44 SET_STRING(dvconta);
45
46 static int run_resumo(struct declaracao *dec, char **args, int argc)
47 {
48         if (dec->retifica)
49                 printf("retificadora\n");
50         if (dec->obrigatoria)
51                 printf("obrigatoria\n");
52         switch (dec->tipo) {
53         case SIMPLES:
54                 printf("simples\n");
55                 break;
56         case COMPLETA:
57                 printf("completa\n");
58                 break;
59         }
60         printf("pago: "FMT_R"\n", R(dec->pago));
61         printf("retido: "FMT_R"\n", R(dec->retido));
62         printf("devido: "FMT_R"\n", R(dec->devido));
63         if (dec->restituicao > 0)
64                 printf("restituicao: "FMT_R"\n", R(dec->restituicao));
65         if (dec->pagar > 0)
66                 printf("a pagar: "FMT_R"\n", R(dec->pagar));
67         printf("base de cálculo: "FMT_R"\n",
68                 R(totais_get(dec, "BASE")));
69         printf("isentos: "FMT_R"\n",
70                 R(totais_get(dec, "ISENTOS")));
71         printf("exclusivos: "FMT_R"\n",
72                 R(totais_get(dec, "EXCLUSIVOS")));
73         printf("bens: "FMT_R"\n",
74                 R(totais_get(dec, "BENS")));
75         printf("bens: "FMT_R"\n",
76                 R(totais_get(dec, "BENSANTERIOR")));
77         printf("hash: %010ld\n", dec->hash);
78         return 0;
79 }
80
81 static int run_verbose(struct declaracao *dec, char **args, int argc)
82 {
83         if (argc != 1)
84                 return -EINVAL;
85         dec->verbose = 1;
86         return 0;
87 }
88
89 static void salva(struct declaracao *dec, FILE *f)
90 {
91         fprintf(f, "ano %d\n", dec->ano);
92         if (dec->cpf)
93                 fprintf(f, "cpf \"%s\"\n", dec->cpf);
94         if (dec->nome)
95                 fprintf(f, "nome \"%s\"\n", dec->nome);
96         if (dec->recibo)
97                 fprintf(f, "recibo \"%s\"\n", dec->recibo);
98         if (dec->retifica)
99                 fprintf(f, "retifica \"%s\"\n", dec->retifica);
100         if (dec->banco)
101                 fprintf(f, "banco \"%s\"\n", dec->banco);
102         if (dec->agencia)
103                 fprintf(f, "agencia \"%s\"\n", dec->agencia);
104         if (dec->contacorrente)
105                 fprintf(f, "contacorrente \"%s\"\n", dec->contacorrente);
106         if (dec->dvconta)
107                 fprintf(f, "dvconta \"%s\"\n", dec->dvconta);
108         contribuinte_salva(dec, f);
109         rendimento_salva(dec, f);
110         carne_salva(dec, f);
111         pagamento_salva(dec, f);
112         bem_salva(dec, f);
113         isento_salva(dec, f);
114         dependente_salva(dec, f);
115         conjuge_salva(dec, f);
116         sistema_salva(dec, f);
117 }
118
119 static int run_salva(struct declaracao *dec, char **args, int argc)
120 {
121         FILE *f;
122         char *filename;
123         if (argc != 2)
124                 return -EINVAL;
125         filename = args[1];
126         f = fopen(filename, "w");
127         if (!f)
128                 return -errno;
129         salva(dec, f);
130         fclose(f);
131         return 0;
132 }
133
134 static int run_simples(struct declaracao *dec, char **args, int argc)
135 {
136         if (argc != 1)
137                 return -EINVAL;
138         dec->tipo = FORCA_SIMPLES;
139         return 0;
140 }
141
142 static int run_completa(struct declaracao *dec, char **args, int argc)
143 {
144         if (argc != 1)
145                 return -EINVAL;
146         dec->tipo = FORCA_COMPLETA;
147         return 0;
148 }
149
150 static struct cmd cmd_salva = {
151         .name = "salva",
152         .run = run_salva,
153 };
154
155 static struct cmd cmd_resumo = {
156         .name = "resumo",
157         .run = run_resumo,
158 };
159
160 static struct cmd cmd_verbose = {
161         .name = "verbose",
162         .run = run_verbose,
163 };
164
165 static struct cmd cmd_simples = {
166         .name = "simples",
167         .run = run_simples,
168 };
169
170 static struct cmd cmd_completa = {
171         .name = "completa",
172         .run = run_completa,
173 };
174
175 int base_cmd_init(void)
176 {
177         cmd_add(&cmd_salva);
178         cmd_add(&cmd_resumo);
179
180         cmd_add(&cmd_ano);
181         cmd_add(&cmd_cpf);
182         cmd_add(&cmd_recibo);
183         cmd_add(&cmd_retifica);
184         cmd_add(&cmd_nome);
185
186         cmd_add(&cmd_banco);
187         cmd_add(&cmd_agencia);
188         cmd_add(&cmd_contacorrente);
189         cmd_add(&cmd_dvconta);
190
191         cmd_add(&cmd_verbose);
192         cmd_add(&cmd_simples);
193         cmd_add(&cmd_completa);
194
195         return 0;
196 }