Add more fields to the first message.
[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 int rnet_encode(struct rnet_decfile *decfile, struct rnet_message **msg)
30 {
31         int r;
32
33         uint32_t tp_arq;
34         uint32_t id_dec;
35         char *cpf;
36         char *codigo_recnet;
37         char *ano;
38         char *exerc;
39         char *uf;
40
41         *msg = rnet_message_new();
42         if (*msg == NULL) {
43                 return -ENOMEM;
44         }
45
46         codigo_recnet = rnet_decfile_get_header_field(decfile, "codigo_recnet");
47         tp_arq = strtoul(codigo_recnet, NULL, 10);
48         id_dec = strtoul(rnet_decfile_get_header_field(decfile, "hash"), NULL, 10);
49         cpf = rnet_decfile_get_header_field(decfile, "cpf");
50         ano = rnet_decfile_get_header_field(decfile, "ano");
51         exerc = rnet_decfile_get_header_field(decfile, "exerc");
52         uf = rnet_decfile_get_header_field(decfile, "uf");
53
54         (*msg)->buffer[0] = 0x40;
55         (*msg)->len = 1;
56         r = rnet_message_add_u32(*msg, "a_comp", 0);
57         r = rnet_message_add_u32(*msg, "tp_arq", tp_arq);
58         r = rnet_message_add_u32(*msg, "id_dec", id_dec);
59         r = rnet_message_add_ascii(*msg, "exercicio", ano);
60         r = rnet_message_add_ascii(*msg, "exercicio_pgd", exerc);
61         r = rnet_message_add_ascii(*msg, "ni", cpf);
62         r = rnet_message_add_ascii(*msg, "tipo_ni", "CPF");
63         r = rnet_message_add_u8(*msg, "num_ass", 0);
64         r = rnet_message_add_u32(*msg, "p_comp", 0);
65         r = rnet_message_add_u8(*msg, "ret", 0);
66         r = rnet_message_add_ascii(*msg, "uf", uf);
67         r = rnet_message_add_u8(*msg, "vrs_des_pa", 0);
68
69         if (r < 0)
70                 return r;
71         return 0;
72 }