Gera hash do CPF no cabeçalho.

[cascardo/declara.git] / lib / gera.c

diff --git a/lib/gera.c b/lib/gera.c
index dc5ca7e..bd70fdc 100644 (file)
--- a/lib/gera.c
+++ b/lib/gera.c
@@ -1,5 +1,5 @@
 /*
- *  Copyright (C) 2015-2016  Thadeu Lima de Souza Cascardo <cascardo@minaslivre.org>
+ *  Copyright (C) 2015-2017  Thadeu Lima de Souza Cascardo <cascardo@minaslivre.org>
  *
  *  This program is free software; you can redistribute it and/or modify
  *  it under the terms of the GNU General Public License as published by
@@ -44,6 +44,8 @@ static void gera_header(struct declaracao *dec, FILE *f)
                fprintf(f, "2500"); /* Código */
        else if (dec->ano == 2016)
                fprintf(f, "2600"); /* Código */
+       else if (dec->ano == 2017)
+               fprintf(f, "2700"); /* Código */
        fprintf(f, "%s", dec->retifica ? "1" : "0"); /* Retificadora */
        fprintf(f, "%s", dec->cpf); /* CPF: 11 dígitos */
        fprintf(f, "   "); /* Filler */
@@ -52,6 +54,8 @@ static void gera_header(struct declaracao *dec, FILE *f)
                fprintf(f, "130"); /* Versão IRPF */
        else if (dec->ano == 2016)
                fprintf(f, "110"); /* Versão IRPF */
+       else if (dec->ano == 2017)
+               fprintf(f, "100"); /* Versão IRPF */
        fprintf(f, "%-60.60s", dec->nome);
        fprintf(f, "%-2.2s", dec->contribuinte.uf ?: "");
        fprintf(f, "%s", "0000000000"); /* FIXME: hash */
@@ -123,7 +127,10 @@ static void gera_header(struct declaracao *dec, FILE *f)
        fprintf(f, "%-11.11s", ""); /* CPF inventariante */
        fprintf(f, "%-40.40s", dec->contribuinte.municipio);
        fprintf(f, "%-60.60s", dec->nome);
-       fprintf(f, "%-11.11s", ""); /* CPF empregada */
+       if (dec->ano == 2017)
+               fprintf(f, "%010u ", crc32(0, dec->cpf, 11)); /* hash CPF */
+       else
+               fprintf(f, "%-11.11s", ""); /* CPF empregada, FILLER */
        fprintf(f, "%-12.12s", sistema_get_mac(dec));
        fprintf(f, "%08d", 0); /* Data saída */
        fprintf(f, "%-11.11s", ""); /* CPF procurador */
@@ -167,7 +174,7 @@ static void gera_header(struct declaracao *dec, FILE *f)
 
        /* Mudanças de 2016 */
 
-       if (dec->ano == 2016) {
+       if (dec->ano >= 2016) {
                /* CNPJ maior pagamento dedutível */
                fprintf(f, "%-14.14s", pagamento_cnpj_ordenado(dec, 0));
                /* CNPJ maior pagamento dedutível */
@@ -209,7 +216,7 @@ static void gera_contribuinte(struct declaracao *dec, FILE *f)
                fprintf(f, "%-100.100s", ""); /* FILLER3 */
                fprintf(f, "%-4.4s", ""); /* FILLER1 */
                fprintf(f, "%-8.8s", ""); /* FILLER2 */
-       } else if (dec->ano == 2016) {
+       } else if (dec->ano >= 2016) {
                fprintf(f, "%-90.90s", ""); /* FILLER3 */
                /* TODO: NIT/PIS/PASEP de Pessoa Física no exterior */
                fprintf(f, "%-11.11s", "");
@@ -241,8 +248,12 @@ static void gera_contribuinte(struct declaracao *dec, FILE *f)
        fprintf(f, "%-10.10s", dec->recibo ?: ""); /* Recibo última declaração ano anterior */
        fprintf(f, "A"); /* Declaração de Ajuste */
        fprintf(f, "%-11.11s", ""); /* TODO: CPF procurador */
-       if (dec->ano == 2016)
+       if (dec->ano >= 2016)
                fprintf(f, "%-20.20s", ""); /* TODO: registro profissional */
+       if (dec->ano >= 2017) {
+               fprintf(f, "%-11.11s", ""); /* TODO: celular */
+               fprintf(f, "%s", dec->conjuge.cpf ? "S" : "N");
+       }
 }
 
 static void gera_simples(struct declaracao *dec, FILE *f)
@@ -251,8 +262,8 @@ static void gera_simples(struct declaracao *dec, FILE *f)
        fprintf(f, "%s", dec->cpf); /* CPF: 11 dígitos */
        fprintf(f, "%013lld", 0); /* TODO: carnê leão */
        fprintf(f, "%013lld", 0); /* TODO: lucros e dividendos */
-       /* rendimentos isentos */
-       fprintf(f, "%013lld", totais_get(dec, "ISENTOS"));
+       /* rendimentos isentos titular */
+       fprintf(f, "%013lld", totais_get(dec, "ISENTOSTIT"));
        /* rendimentos tributação exclusiva, exceto décimo terceiro */
        fprintf(f, "%013lld", totais_get(dec, "EXCLUSIVOS_SEM_13o"));
        /* 13o. */
@@ -260,8 +271,10 @@ static void gera_simples(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", 0); /* TODO: retido na fonte (Lei 11.033) */
        fprintf(f, "%013lld", 0); /* TODO: 13o. dependentes */
        fprintf(f, "%013lld", 0); /* TODO: lucros dependentes */
-       fprintf(f, "%013lld", 0); /* TODO: isentos dependentes */
-       fprintf(f, "%013lld", 0); /* TODO: exclusivos dependentes */
+       /* BUG IRPF: O IRPF imprime 0 aqui mesmo com doações e poupança. */
+       /* fprintf(f, "%013lld", totais_get(dec, "ISENTOSDEP")); */
+       fprintf(f, "%013lld", 0); /* isentos dependentes */
+       fprintf(f, "%013lld", totais_get(dec, "EXCLUSIVOSDEP")); /* exclusivos dependentes */
        fprintf(f, "%-13.13s", ""); /* FILLER */
        fprintf(f, "%-13.13s", ""); /* FILLER */
        fprintf(f, "%013lld", 0); /* TODO: rendimentos PF */
@@ -270,7 +283,7 @@ static void gera_simples(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", 0); /* TODO: rendimentos PF ext. depend. */
        fprintf(f, "%013lld", 0); /* TODO: carnê-leão PF? */
        fprintf(f, "%013lld", 0); /* TODO: carnê-leão dependentes */
-       fprintf(f, "%013lld", totais_get(dec, "DEPENDENTES")); /* TODO: dedução dependentes */
+       fprintf(f, "%013lld", totais_get(dec, "DEPENDENTES")); /* dedução dependentes */
        fprintf(f, "%013lld", 0); /* TODO: previdência RRA */
        fprintf(f, "%013lld", 0); /* TODO: previdência RRA dependentes */
        fprintf(f, "%013lld", 0); /* TODO: pensão RRA */
@@ -302,7 +315,7 @@ static void gera_totais_simples(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", totais_get(dec, "EXCLUSIVOS")); /* rendimentos tributação exclusiva */
        if (dec->ano == 2015) {
                fprintf(f, "%013lld", dec->conjuge.total); /* conjuge */
-       } else if (dec->ano == 2016) {
+       } else if (dec->ano >= 2016) {
                fprintf(f, "%013lld", 0); /* FILLER */
        }
        fprintf(f, "%013lld", 0); /* TODO: rendimento PJ dependente */
@@ -314,10 +327,10 @@ static void gera_totais_simples(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", totais_get(dec, "BENSANTERIOR")); /* total bens ano anterior */
        fprintf(f, "%013lld", totais_get(dec, "BENS")); /* total bens ano base */
        fprintf(f, "%013lld", totais_get(dec, "ISENTOSTIT")); /* rendimentos isentos titular */
-       fprintf(f, "%013lld", 0); /* TODO: rendimentos isentos dependentes */
-       fprintf(f, "%013lld", totais_get(dec, "EXCLUSIVOSTIT")); /* TODO: tributação exclusiva titular */
-       fprintf(f, "%013lld", 0); /* TODO: tributação exclusiva dependentes */
-       fprintf(f, "%013lld", 0); /* TODO: total não tributável */
+       fprintf(f, "%013lld", totais_get(dec, "ISENTOSDEP")); /* rendimentos isentos dependentes */
+       fprintf(f, "%013lld", totais_get(dec, "EXCLUSIVOSTIT")); /* tributação exclusiva titular */
+       fprintf(f, "%013lld", totais_get(dec, "EXCLUSIVOSDEP")); /* tributação exclusiva dependentes */
+       fprintf(f, "%013lld", 0); /* TODO: total não tributável AR */
        fprintf(f, "%013lld", 0); /* TODO: total dívidas ano anterior */
        fprintf(f, "%013lld", 0); /* TODO: total dívidas ano base */
        fprintf(f, "%013lld", 0); /* TODO: retido fonte Lei 11.033 */
@@ -368,7 +381,7 @@ static void gera_completa(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", 0);
        fprintf(f, "%013lld", totais_get(dec, "DECIMOTERCEIRO")); /* TODO: 13o titular */
        fprintf(f, "%013lld", 0); /* TODO: 13o dependente */
-       fprintf(f, "%05d", 0); /* TODO: dependentes com instrucao */
+       fprintf(f, "%05d", totais_get(dec, "DEPSINSTRUCAO")); /* dependentes com instrucao */
        fprintf(f, "%05d", 0); /* TODO: alimentandos com instrucao */
        fprintf(f, "%013lld", 0); /* TODO: rendimentos PF titular */
        fprintf(f, "%013lld", 0); /* TODO: rendimentos PF dependente */
@@ -377,7 +390,7 @@ static void gera_completa(struct declaracao *dec, FILE *f)
        /* IRPF-2015-1.3 gera este valor como 0, antes era dec->devido */
        fprintf(f, "%013lld", 0); /* TODO: imposto devido sem rendimento exterior */
        fprintf(f, "%013lld", 0); /* TODO: limite imposto pago exterior */
-       if (dec->ano == 2016) {
+       if (dec->ano >= 2016) {
                /* TODO: valor até o limite da FUNPRESP */
                fprintf(f, "%013lld", 0);
                /* TODO: valor acima do limite da FUNPRESP */
@@ -400,7 +413,7 @@ static void gera_totais_completa(struct declaracao *dec, FILE *f)
        /* TODO (2016): somar FUNPRESP acima do limite */
        fprintf(f, "%013lld", totais_get(dec, "PREVIDENCIA")); /* previdencia privada */
        fprintf(f, "%013lld", totais_get(dec, "DEPENDENTES")); /* deducao dependentes */
-       fprintf(f, "%013lld", 0); /* TODO: deducao instrucao */
+       fprintf(f, "%013lld", totais_get(dec, "INSTRUCAO")); /* deducao instrucao */
        fprintf(f, "%013lld", totais_get(dec, "MEDICAS")); /* despesas medicas */
        fprintf(f, "%013lld", 0); /* TODO: pensao */
        fprintf(f, "%013lld", 0); /* TODO: pensao escritura publica */
@@ -431,7 +444,7 @@ static void gera_totais_completa(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", 0); /* TODO: total dívidas ano base */
        if (dec->ano == 2015) {
                fprintf(f, "%013lld", dec->conjuge.total); /* conjuge */
-       } else if (dec->ano == 2016) {
+       } else if (dec->ano >= 2016) {
                fprintf(f, "%013lld", 0); /* FILLER */
        }
        fprintf(f, "%013lld", totais_get(dec, "ISENTOS")); /* rendimentos isentos */
@@ -445,9 +458,9 @@ static void gera_totais_completa(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", 0); /* TODO: imposto moeda estrangeira */
        fprintf(f, "%013lld", 0); /* TODO: imposto ganhos capital moeda */
        fprintf(f, "%013lld", totais_get(dec, "ISENTOSTIT")); /* rendimentos isentos titular */
-       fprintf(f, "%013lld", 0); /* TODO: rendimentos isentos dependentes */
+       fprintf(f, "%013lld", totais_get(dec, "ISENTOSDEP")); /* rendimentos isentos dependentes */
        fprintf(f, "%013lld", totais_get(dec, "EXCLUSIVOSTIT")); /* TODO: tributação exclusiva titular */
-       fprintf(f, "%013lld", 0); /* TODO: tributação exclusiva dependentes */
+       fprintf(f, "%013lld", totais_get(dec, "EXCLUSIVOSDEP")); /* tributação exclusiva dependentes */
        fprintf(f, "%013lld", 0); /* TODO: doações campanha */
        fprintf(f, "%013lld", 0); /* TODO: rendimentos PF exigibilidade suspensa titular */
        fprintf(f, "%013lld", 0); /* TODO: rendimentos PF exigibilidade suspensa dependentes */
@@ -477,7 +490,7 @@ static void gera_isentos(struct declaracao *dec, FILE *f)
        fprintf(f, "%-11.11s", dec->cpf);
        fprintf(f, "%013lld", 0); /* TODO: bolsa de estudo */
        fprintf(f, "%013lld", 0); /* TODO: pecúlio de previdência privada */
-       fprintf(f, "%013lld", 0); /* TODO: FGTS, aviso prévio indenizado */
+       fprintf(f, "%013lld", totais_get(dec, "INDENIZACOES")); /* FGTS, aviso prévio indenizado */
        fprintf(f, "%013lld", 0); /* TODO: ganho de capital isento */
        fprintf(f, "%013lld", 0); /* TODO: lucros e dividendos */
        fprintf(f, "%013lld", 0); /* TODO: atividade rural */
@@ -485,7 +498,7 @@ static void gera_isentos(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", 0); /* TODO: pensão por invalidez */
        fprintf(f, "%013lld", totais_get(dec, "POUPANCA"));
        fprintf(f, "%013lld", 0); /* TODO: sócio ou titular de empresa */
-       fprintf(f, "%013lld", 0); /* TODO: herança, transferências patrimoniais */
+       fprintf(f, "%013lld", totais_get(dec, "DOACOES")); /* herança, transferências patrimoniais */
        fprintf(f, "%013lld", 0); /* TODO: outros rendimentos isentos */
        fprintf(f, "%-60.60s", ""); /* FILLER1 */
        fprintf(f, "%-13.13s", ""); /* FILLER2 */
@@ -500,7 +513,7 @@ static void gera_isentos(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", 0); /* TODO: GC total informado */
        fprintf(f, "%013lld", 0); /* TODO: GC total transportado */
        fprintf(f, "%013lld", 0); /* TODO: imposto renda anos anteriores */
-       fprintf(f, "%013lld", 0); /* TODO: rencimentos assalariados moeda estrangeira */
+       fprintf(f, "%013lld", 0); /* TODO: rendimentos assalariados moeda estrangeira */
        fprintf(f, "%013lld", 0); /* TODO: bonificações ações */
        fprintf(f, "%013lld", 0); /* TODO: médicos residentes */
        fprintf(f, "%013lld", 0); /* TODO: volutários da Copa */
@@ -655,19 +668,19 @@ static void gera_pagamento(struct declaracao *dec, FILE *f)
        fprintf(f, "26");
        fprintf(f, "%s", dec->cpf);
        fprintf(f, "%02d", p->codigo);
-       fprintf(f, "%05d", 0); /* TODO: chave dependente */
+       fprintf(f, "%05d", p->dependente);
        fprintf(f, "%-14.14s", p->cnpj);
        fprintf(f, "%-60.60s", p->nome);
        fprintf(f, "%-11.11s", ""); /* TODO: NIT */
        fprintf(f, "%013lld", p->pagamento);
        fprintf(f, "%013lld", p->reembolso);
-       if (dec->ano == 2016) {
+       if (dec->ano >= 2016) {
                /* TODO: contribuição do ente público patrocinador (FUNPRESP?) */
                fprintf(f, "%013lld", 0);
        }
        fprintf(f, "%d", strlen(p->cnpj) == 11 ? 1 : 2);
-       /* Titular (T), Dependente (D), Alimentando (A), FIXME */
-       fprintf(f, "T");
+       /* Titular (T), Dependente (D), Alimentando (A), FIXME Alimentando */
+       fprintf(f, "%c", p->dependente ? 'D' : 'T');
 }
 
 static void gera_isento(struct declaracao *dec, FILE *f, int codigo)
@@ -675,13 +688,30 @@ static void gera_isento(struct declaracao *dec, FILE *f, int codigo)
        struct isento *i;
        i = isento_get(dec, codigo, dec->linhas[codigo]);
        fprintf(f, "%02d", codigo);
-       fprintf(f, "%-11.11s", dec->cpf); /* Titular, TODO: dependente */
+       fprintf(f, "%-11.11s", dec->cpf); /* Titular */
        fprintf(f, "%05d", dec->linhas[codigo] + 1); /* Chave */
-       fprintf(f, "%c", 'T'); /* FIXME: dependente */
+       /* Titular (T), Dependente (D), Alimentando (A), FIXME Alimentando */
+       fprintf(f, "%c", i->dependente ? 'D' : 'T');
        fprintf(f, "%-14.14s", i->cnpj);
        fprintf(f, "%-60.60s", i->nome);
        fprintf(f, "%013lld", i->valor);
-       fprintf(f, "%-11.11s", dec->cpf);
+       if (i->dependente) {
+               struct dependente *d;
+               d = list_get(dec->dependentes, i->dependente - 1);
+               fprintf(f, "%-11.11s", d ? d->cpf : "");
+       } else {
+               fprintf(f, "%-11.11s", dec->cpf);
+       }
+}
+
+static void gera_doacao(struct declaracao *dec, FILE *f)
+{
+       gera_isento(dec, f, 82);
+}
+
+static void gera_indenizacoes(struct declaracao *dec, FILE *f)
+{
+       gera_isento(dec, f, 93);
 }
 
 static void gera_plr(struct declaracao *dec, FILE *f)
@@ -713,7 +743,7 @@ static void gera_dependente(struct declaracao *dec, FILE *f)
        fprintf(f, "%-11.11s", d->cpf);
        /* TODO: Indicador de saída */
        fprintf(f, " ");
-       if (dec->ano == 2016) {
+       if (dec->ano >= 2016) {
                /* TODO: NIT/PIS/PASEP de Pessoa Física no exterior */
                fprintf(f, "%-11.11s", "");
        }
@@ -820,7 +850,7 @@ static void insert_hash(struct declaracao *dec, char *irpf)
 static int gera(struct declaracao *dec, char *filename)
 {
        FILE *f;
-       int r;
+       int r = 0;
        int i;
        struct rendimento *rendimento;
        struct isento *isento;
@@ -845,8 +875,12 @@ static int gera(struct declaracao *dec, char *filename)
        } while (0);
 
        f = fopen(filename, "w");
-       if (!f)
+       if (!f) {
+               r = -errno;
+               dec_set_error(dec, "Não foi possível abrir arquivo %s: %s.",
+                             filename, strerror(errno));
                goto out_file;
+       }
        memset(dec->linhas, 0, sizeof(dec->linhas));
        W(gera_header);
        W(gera_contribuinte);
@@ -888,6 +922,8 @@ static int gera(struct declaracao *dec, char *filename)
                        break; \
                W(fn); \
        }
+       IW(gera_doacao, 82);
+       IW(gera_indenizacoes, 93);
        IW(gera_plr, 96);
        IW(gera_poupanca, 98);
        IW(gera_aplicacoes, 99);
@@ -914,10 +950,16 @@ out_file:
 
 static int run_gera(struct declaracao *dec, char **args, int argc)
 {
-       if (argc != 2)
+       if (argc != 2) {
+               dec_set_error(dec, "Comando %s recebe um nome de arquivo como parâmetro.",
+                             args[0]);
                return -EINVAL;
-       if (!ANO_VALIDO(dec->ano))
+       }
+       if (!ANO_VALIDO(dec->ano)) {
+               dec_set_error(dec, "Comando %s não suporta ano %d.",
+                             args[0], dec->ano);
                return -EINVAL;
+       }
        return gera(dec, args[1]);
 }