Encode some fields in the first protocol 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         uint32_t tp_arq;
33         uint32_t id_dec;
34         char *cpf;
35         char *codigo_recnet;
36         char *ano;
37         char *exerc;
38         *msg = rnet_message_new();
39         if (*msg == NULL) {
40                 return -ENOMEM;
41         }
42
43         codigo_recnet = rnet_decfile_get_header_field(decfile, "codigo_recnet");
44         tp_arq = strtoul(codigo_recnet, NULL, 10);
45         id_dec = strtoul(rnet_decfile_get_header_field(decfile, "hash"), NULL, 10);
46         cpf = rnet_decfile_get_header_field(decfile, "cpf");
47         ano = rnet_decfile_get_header_field(decfile, "ano");
48         exerc = rnet_decfile_get_header_field(decfile, "exerc");
49
50         (*msg)->buffer[0] = 0x40;
51         (*msg)->len = 1;
52         r = rnet_message_add_u32(*msg, "a_comp", 0);
53         r = rnet_message_add_u32(*msg, "tp_arq", tp_arq);
54         r = rnet_message_add_u32(*msg, "id_dec", id_dec);
55         r = rnet_message_add_ascii(*msg, "exercicio", ano);
56         r = rnet_message_add_ascii(*msg, "exercicio_pgd", exerc);
57         r = rnet_message_add_ascii(*msg, "ni", cpf);
58         r = rnet_message_add_ascii(*msg, "tipo_ni", "CPF");
59         if (r < 0)
60                 return r;
61         return 0;
62 }