2bf705a7b834d587a6c8905786e6f610e53f9a58
[cascardo/libreceita.git] / rnet_encode.c
1 /*
2  *  Copyright (C) 2013  Thadeu Lima de Souza Cascardo <cascardo@minaslivre.org>
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 "rnet_encode.h"
20 #include <unistd.h>
21 #include <stdio.h>
22 #include <stdlib.h>
23 #include <string.h>
24 #include <errno.h>
25 #include <fcntl.h>
26 #include "rnet_message.h"
27 #include "decfile.h"
28
29 #define RNET_HEADER_START_2013 111
30 #define RNET_HEADER_END_2013 (RNET_HEADER_SIZE_2013 - 15)
31 #define RNET_HEADER_START_2014 111
32 #define RNET_HEADER_END_2014 (RNET_HEADER_SIZE_2014 - 15)
33
34 int rnet_encode(struct rnet_decfile *decfile, struct rnet_message **msg)
35 {
36         int r;
37
38         uint32_t tp_arq;
39         uint32_t id_dec;
40         char *cpf;
41         char *codigo_recnet;
42         char *ano;
43         char *exerc;
44         char *uf;
45         uint16_t versao_pgd;
46         uint64_t file_len;
47         char *hash;
48         char *header;
49         uint8_t ret;
50
51         size_t header_start, header_end;
52
53         *msg = rnet_message_new();
54         if (*msg == NULL) {
55                 return -ENOMEM;
56         }
57
58         file_len = rnet_decfile_get_file(decfile)->len;
59         hash = rnet_decfile_get_file_hash(decfile);
60         if (!hash)
61                 return -1;
62         header = rnet_decfile_get_header(decfile);
63
64         codigo_recnet = rnet_decfile_get_header_field(decfile, "codigo_recnet");
65         tp_arq = strtoul(codigo_recnet, NULL, 10);
66         id_dec = strtoul(rnet_decfile_get_header_field(decfile, "hash"), NULL, 10);
67         cpf = rnet_decfile_get_header_field(decfile, "cpf");
68         ano = rnet_decfile_get_header_field(decfile, "ano");
69         exerc = rnet_decfile_get_header_field(decfile, "exerc");
70         uf = rnet_decfile_get_header_field(decfile, "uf");
71         versao_pgd = strtoul(rnet_decfile_get_header_field(decfile, "nr_versao"), NULL, 10);
72         ret = strtoul(rnet_decfile_get_header_field(decfile, "in_ret"), NULL, 10);
73
74         if (!strcmp(exerc, "2014")) {
75                 header_start = RNET_HEADER_START_2014;
76                 header_end = RNET_HEADER_END_2014;
77         } else if (!strcmp(exerc, "2013")) {
78                 header_start = RNET_HEADER_START_2013;
79                 header_end = RNET_HEADER_END_2013;
80         } else {
81                 return -EINVAL;
82         }
83
84         (*msg)->buffer[0] = 0x40;
85         (*msg)->len = 1;
86         r = rnet_message_add_u32(msg, "a_comp", 0);
87         r = rnet_message_add_u32(msg, "tp_arq", tp_arq);
88         r = rnet_message_add_u32(msg, "id_dec", id_dec);
89         r = rnet_message_add_ascii(msg, "exercicio", ano);
90         r = rnet_message_add_ascii(msg, "exercicio_pgd", exerc);
91         r = rnet_message_add_buffer(msg, "hash_arq", hash, 16);
92         r = rnet_message_add_buffer(msg, "hash_trans", hash, 16);
93         r = rnet_message_add_ascii(msg, "ni", cpf);
94         r = rnet_message_add_ascii(msg, "tp_ni", "CPF");
95         r = rnet_message_add_u8(msg, "num_ass", 0);
96         r = rnet_message_add_u32(msg, "p_comp", 0);
97         r = rnet_message_add_u8(msg, "ret", ret);
98         r = rnet_message_add_u64(msg, "tam_arq", file_len);
99         r = rnet_message_add_u64(msg, "tam_assinado", file_len);
100         r = rnet_message_add_u64(msg, "tam_trans", file_len);
101         r = rnet_message_add_ascii(msg, "uf", uf);
102         r = rnet_message_add_u8(msg, "vrs_des_pa", 0);
103         r = rnet_message_add_u16(msg, "versao_pgd", versao_pgd);
104         r = rnet_message_add_u8(msg, "critica_validador", 0x06);
105         r = rnet_message_add_ascii(msg, "ip_loc", "127.0.0.1");
106         r = rnet_message_add_ascii(msg, "versao_java", "1.5.0-gij;Free Software rnetclient pretending to be GNU Interpreter for Java");
107         r = rnet_message_add_ascii(msg, "origem", "JA2R");
108         r = rnet_message_add_ascii(msg, "so", "GNU");
109         r = rnet_message_add_ascii(msg, "cliente", "201105");
110         r = rnet_message_add_buffer(msg, "dados_val", header + header_start, header_end - header_start);
111         r = rnet_message_add_u32(msg, "tam_dados_val", 0);
112         r = rnet_message_add_u32(msg, "tam_dados_val_chave", 0);
113         r = rnet_message_add_u32(msg, "arquivos_restantes", 0);
114
115         free(hash);
116
117         if (r < 0)
118                 return r;
119         return 0;
120 }