Calcula imposto retido e a pagar.
[cascardo/declara.git] / 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 "util.h"
26
27 SET_INT(ano);
28 SET_STRING(cpf);
29 SET_STRING(nome);
30 SET_STRING(recibo);
31 SET_STRING(retifica);
32
33 static int run_resumo(struct declaracao *dec, char **args, int argc)
34 {
35         if (dec->retifica)
36                 printf("retificadora\n");
37         printf("pago: %lld.%02d\n", dec->pago / 100, dec->pago % 100);
38         printf("retido: %lld.%02d\n", dec->retido / 100, dec->retido % 100);
39         printf("devido: %lld.%02d\n", dec->devido / 100, dec->devido % 100);
40         if (dec->restituicao > 0)
41                 printf("restituicao: %lld.%02d\n", dec->restituicao / 100, dec->restituicao % 100);
42         if (dec->pagar > 0)
43                 printf("a pagar: %lld.%02d\n", dec->pagar / 100, dec->pagar % 100);
44         return 0;
45 }
46
47 static void salva(struct declaracao *dec, FILE *f)
48 {
49         fprintf(f, "ano %d\n", dec->ano);
50         if (dec->cpf)
51                 fprintf(f, "cpf \"%s\"\n", dec->cpf);
52         if (dec->nome)
53                 fprintf(f, "nome \"%s\"\n", dec->nome);
54         if (dec->recibo)
55                 fprintf(f, "recibo \"%s\"\n", dec->recibo);
56         if (dec->retifica)
57                 fprintf(f, "retifica \"%s\"\n", dec->retifica);
58         contribuinte_salva(dec, f);
59         rendimento_salva(dec, f);
60 }
61
62 static int run_salva(struct declaracao *dec, char **args, int argc)
63 {
64         FILE *f;
65         char *filename;
66         if (argc != 2)
67                 return -EINVAL;
68         filename = args[1];
69         f = fopen(filename, "w");
70         if (!f)
71                 return -errno;
72         salva(dec, f);
73         fclose(f);
74         return 0;
75 }
76
77 static struct cmd cmd_salva = {
78         .name = "salva",
79         .run = run_salva,
80 };
81
82 static struct cmd cmd_resumo = {
83         .name = "resumo",
84         .run = run_resumo,
85 };
86
87 int base_cmd_init(void)
88 {
89         cmd_add(&cmd_salva);
90         cmd_add(&cmd_resumo);
91         cmd_add(&cmd_ano);
92         cmd_add(&cmd_cpf);
93         cmd_add(&cmd_recibo);
94         cmd_add(&cmd_retifica);
95         cmd_add(&cmd_nome);
96         return 0;
97 }