2 * Copyright (C) 2012-2013 Thadeu Lima de Souza Cascardo <cascardo@minaslivre.org>
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.
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.
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.
33 struct pmhash *header;
37 * line should be an allocated buffer given to append_line
38 * this means, free(line) will be called when decfile is released
40 static int append_line(struct rnet_decfile *decfile, char *line)
44 decfile->lines_len += 1;
45 len = sizeof(*decfile->lines) * decfile->lines_len;
46 old_lines = decfile->lines;
47 decfile->lines = realloc(decfile->lines, len);
48 if (!decfile->lines) {
49 decfile->lines = old_lines;
52 decfile->lines[decfile->lines_len - 1] = line;
55 decfile->lines_len -= 1;
59 static void decfile_release_lines(struct rnet_decfile *decfile)
62 for (i = 0; i < decfile->lines_len; i++)
63 free(decfile->lines[i]);
65 decfile->lines = NULL;
68 static char * get_header(struct rnet_decfile *decfile);
69 static int parse_header(struct pmhash *hash, char *buffer);
71 static int decfile_parse_header(struct rnet_decfile *decfile)
73 char *buffer = get_header(decfile);
74 if (!buffer || strlen(buffer) != 765)
76 return parse_header(decfile->header, buffer);
79 static int decfile_parse(struct rnet_decfile *decfile)
84 while ((r = getline(&buffer, &len, decfile->file)) > 0) {
85 r = append_line(decfile, buffer);
93 if (!decfile_parse_header(decfile))
96 decfile_release_lines(decfile);
100 struct rnet_decfile * rnet_decfile_open(char *filename)
102 struct rnet_decfile *decfile;
103 decfile = malloc(sizeof(*decfile));
106 decfile->header = pmhash_new();
107 if (!decfile->header)
109 decfile->filename = strdup(filename);
110 if (!decfile->filename)
112 decfile->file = fopen(filename, "r");
115 decfile->lines_len = 0;
116 decfile->lines = NULL;
117 if (decfile_parse(decfile))
121 fclose(decfile->file);
123 free(decfile->filename);
125 pmhash_del(decfile->header);
131 void rnet_decfile_close(struct rnet_decfile *decfile)
133 decfile_release_lines(decfile);
134 fclose(decfile->file);
135 free(decfile->filename);
139 static char * get_header(struct rnet_decfile *decfile)
142 for (i = 0; i < decfile->lines_len; i++) {
143 if (!strncmp(decfile->lines[i], "IRPF", 4)) {
144 return decfile->lines[i];
150 static int parse_header(struct pmhash *hash, char *buffer)
156 #define parse(field, sz) \
157 val = malloc(sz + 1); \
161 memcpy(val, p, sz); \
163 key = strdup(field); \
166 if (pmhash_add(&hash, key, val)) \
172 parse("codigo_recnet", 4);
177 parse("nr_versao", 3);
185 parse("in_gerada", 1);
186 parse("nr_recibo_anterior", 10);
189 parse("versao_so", 7);
191 parse("nr_recibo", 10);
192 parse("municipio", 4);
193 parse("conjuge", 11);
195 parse("impdevido", 13);
196 parse("nr_recibo", 10);
206 parse("data_julgado", 8);
207 parse("imppagar", 13);
208 parse("tribfonte", 1);
210 parse("trib_rra", 1);
211 parse("cpf_rra2", 11);
212 parse("trib_3rra", 1);
213 parse("cpf_rra3", 11);
214 parse("vr_doacao", 13);
219 parse("cpf_dep1", 11);
220 parse("dnas_dep1", 8);
221 parse("cpf_dep2", 11);
222 parse("dnas_dep2", 8);
223 parse("cpf_dep3", 11);
224 parse("dnas_dep3", 8);
225 parse("cpf_dep4", 11);
226 parse("dnas_dep4", 8);
227 parse("cpf_dep5", 11);
228 parse("dnas_dep5", 8);
229 parse("cpf_dep6", 11);
230 parse("dnas_dep6", 8);
231 parse("cnpj_med1", 14);
232 parse("cnpj_med2", 14);
233 parse("cpf_alim", 11);
234 parse("cpf_invent", 11);
235 parse("municipio", 40);
236 parse("contribuinte", 60);
237 parse("cpf_empregada", 11);
238 parse("hashcode", 12);
239 parse("data_nao_residente", 8);
240 parse("cpf_procurador", 11);
241 parse("obrigatoriedade", 3);
242 parse("rendtrib", 13);
243 parse("cnpj_prev", 14);
244 parse("cnpj_prev2", 14);
245 parse("vr_totisentos", 13);
246 parse("vr_totexclusivo", 13);
247 parse("vr_totpagamentos", 13);
248 parse("versaotestpgd", 3);
249 parse("controle", 10);
260 char *rnet_decfile_get_header_field(struct rnet_decfile *decfile, char *field)
262 return pmhash_get(decfile->header, field);