/*
- * Copyright (C) 2012-2013 Thadeu Lima de Souza Cascardo <cascardo@minaslivre.org>
+ * Copyright (C) 2012-2014 Thadeu Lima de Souza Cascardo <cascardo@minaslivre.org>
+ * Copyright (C) 2014 Alexandre Oliva <lxoliva@fsfla.org>
+ * Copyright (C) 2014 Sergio Durigan Junior <sergiodj@sergiodj.net>
*
* 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
#include <stdio.h>
#include <stdlib.h>
#include <errno.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <fcntl.h>
#include <unistd.h>
#include <sys/socket.h>
#include <netinet/in.h>
"Send the Brazilian Income Tax Report to the Brazilian "
"Tax Authority";
static const char rnetclient_args_doc[] =
- "[-d|--declaration] FILE";
+ "[-d|--declaration] FILE [-o|--output-dir DIRECTORY]";
/* Description and definition of each option accepted by the program. */
static const struct argp_option rnetclient_options_desc[] = {
- { "declaration", 'd', "FILE", OPTION_ARG_OPTIONAL,
+ { "declaration", 'd', "FILE", 0,
"The Income Tax Report file that will be sent.",
0 },
+ { "output-dir", 'o', "DIRECTORY", 0,
+ "The directory where you wish to save the receipt.",
+ 0 },
+
{ NULL },
};
struct rnetclient_args {
/* File representing the declaration. */
char *input_file;
+
+ /* Output directory to save the receipt. */
+ char *output_dir;
};
/* Parser for command line arguments. */
a->input_file = arg;
break;
+ case 'o':
+ a->output_dir = arg;
+ break;
+
case ARGP_KEY_ARG:
/* The user has possibly provided a filename without
using any switches (e.g., by running './rnetclient
deflateEnd(&zstrm);
return -1;
}
- zstrm.next_in = buffer;
+ zstrm.next_in = (z_const Bytef *) buffer;
zstrm.avail_in = len;
- zstrm.next_out = *out + 6;
+ zstrm.next_out = (Bytef *) *out + 6;
zstrm.avail_out = len * 2 + 30;
while ((r = deflate(&zstrm, Z_FINISH)) != Z_STREAM_END &&
zstrm.avail_out > 0);
zstrm.opaque = Z_NULL;
if ((r = inflateInit(&zstrm)) != Z_OK)
return -1;
- *olen = chars2len(buffer+3);
+ *olen = chars2len((unsigned char *) buffer+3);
*out = malloc(*olen);
if (!out) {
inflateEnd(&zstrm);
return -1;
}
- zstrm.next_in = buffer + 6;
+ zstrm.next_in = (z_const Bytef *) buffer + 6;
zstrm.avail_in = len - 6;
- zstrm.next_out = *out;
+ zstrm.next_out = (Bytef *) *out;
zstrm.avail_out = *olen;
while ((r = inflate(&zstrm, Z_FINISH)) != Z_STREAM_END &&
zstrm.avail_out > 0);
struct addrinfo *addresses;
struct addrinfo *addr;
struct addrinfo hint;
- struct sockaddr_in saddr;
int r;
int fd = *c = -1;
- int i;
memset(&hint, 0, sizeof(hint));
hint.ai_family = AF_UNSPEC;
hint.ai_socktype = SOCK_STREAM;
This chunk size worked at the first try, uploading a
~100KiB file, so let's stick with it. */
- const int maxc = 64472;
+ const unsigned int maxc = 64472;
if (header && len > maxc)
return -1;
{
char *out;
size_t olen;
- int r;
char *buffer;
size_t len;
rnet_message_expand(message, 6);
buffer = (*message)->buffer;
- r = gnutls_record_recv(session, buffer, 6);
+ gnutls_record_recv(session, buffer, 6);
if (buffer[0] == 0x01) {
- len = chars2len(buffer+1);
+ len = chars2len((unsigned char *) buffer+1);
rnet_message_expand(message, len);
buffer = (*message)->buffer + 6;
- r = gnutls_record_recv(session, buffer, len);
+ gnutls_record_recv(session, buffer, len);
inflateRecord(buffer - 6, len + 6, &out, &olen);
rnet_message_del(*message);
*message = NULL;
(*message)->len = olen;
free(out);
} else {
- len = chars2len(buffer+1);
+ len = chars2len((unsigned char *) buffer+1);
rnet_message_expand(message, len - 1);
buffer = (*message)->buffer + 6;
- r = gnutls_record_recv(session, buffer, len - 1);
+ gnutls_record_recv(session, buffer, len - 1);
(*message)->len = len + 4;
rnet_message_strip(*message, 4);
}
return 0;
}
-static void save_rec_file(char *cpf, char *buffer, int len)
+static void save_rec_file(char *cpf, char *buffer, int len, const struct rnetclient_args *args)
{
int fd;
- char *filename;
- char *home, *tmpdir;
- mode_t mask;
- size_t fnlen;
- int r;
- home = getenv("HOME");
- if (!home) {
- tmpdir = getenv("TMPDIR");
- if (!tmpdir)
- tmpdir = "/tmp";
- home = tmpdir;
+ char cwd[PATH_MAX];
+ char *path, *fname, *tmp;
+ size_t fname_len;
+ ssize_t r;
+ /* If the user provided the output directory where she wishes
+ to save the receipt, then we use it. Otherwise, we save
+ the file in the current working directory (CWD). */
+ if (args->output_dir == NULL)
+ path = getcwd(cwd, PATH_MAX);
+ else {
+ struct stat st;
+ if (stat(args->output_dir, &st) < 0) {
+ fprintf(stderr, "Could not stat directory \"%s\": %s\n", args->output_dir, strerror(errno));
+ return;
+ }
+ if (!S_ISDIR(st.st_mode)) {
+ fprintf(stderr, "Error: \"%s\" is a not a directory.\n", args->output_dir);
+ return;
+ }
+ path = args->output_dir;
}
- fnlen = strlen(home) + strlen(cpf) + 13;
- filename = malloc(fnlen);
- snprintf(filename, fnlen, "%s/%s.REC.XXXXXX", home, cpf);
- mask = umask(0177);
- fd = mkstemp(filename);
- if (fd < 0) {
- fprintf(stderr, "Could not create receipt file: %s\n",
- strerror(errno));
- goto out;
+ /* Now it's time to decide which filename to write. We use
+ the declaration's filename as a base layout, because the
+ proprietary version of the IRPF program only recognizes
+ receipts if they have the same name as the declaration
+ files (disconsidering the extensions). For example, if the
+ declaration file is named "123.DEC", the receipt should be
+ named "123.REC". Therefore, if the declaration file has
+ the ".DEC" extension, we strip it out and add the ".REC".
+ Otherwise, we use the default template, which is to save
+ the receipt with the name "$CPF.REC". */
+ tmp = strstr(args->input_file, ".DEC");
+ if (tmp != NULL && tmp[sizeof(".DEC") - 1] == '\0') {
+ const char *p;
+ /* We found the ".REC" extension. */
+ p = strdup(args->input_file);
+ /* Replacing the ".DEC" by ".REC". Fortunately, we
+ just have to change one letter. */
+ tmp = strstr(p, ".DEC");
+ tmp[1] = 'R';
+ fname_len = strlen(p) + strlen(path) + 2;
+ fname = alloca(fname_len);
+ snprintf(fname, fname_len, "%s/%s", path, p);
+ } else {
+ /* The declaration filename does not follow the
+ convention, so we will not use it as a template.
+ We just generate a filename using "$CPF.REC". */
+ fname_len = strlen(cpf) + strlen(path) + sizeof(".REC") + 2;
+ fname = alloca(fname_len);
+ snprintf(fname, fname_len, "%s/%s.REC", path, cpf);
}
- r = write(fd, buffer, len);
- if (r != len) {
- fprintf(stderr, "Could not write to receipt file%s%s\n",
- r < 0 ? ": " : ".",
- r < 0 ? strerror(errno) : "");
- goto out;
+ /* Now, open the file and write. */
+ fd = open(fname, O_CREAT | O_WRONLY | O_EXCL, S_IRUSR | S_IWUSR);
+ if (fd < 0) {
+ fprintf(stderr, "Could not create receipt file \"%s\": %s\n", fname, strerror(errno));
+ return;
}
- fprintf(stderr, "Wrote the receipt to %s.\n", filename);
-out:
+ do {
+ r = write(fd, buffer, len);
+ } while (r < 0 && errno == EAGAIN);
+ if (r != len)
+ fprintf(stderr, "Could not write to receipt file: %s", strerror(errno));
+ else
+ fprintf(stderr, "Wrote the receipt file to %s.\n", fname);
close(fd);
- free(filename);
- umask(mask);
}
-static void handle_response_text_and_file(char *cpf, struct rnet_message *message)
+static void handle_response_text_and_file(char *cpf, struct rnet_message *message, const struct rnetclient_args *args)
{
char *value;
int vlen;
if (!rnet_message_parse(message, "texto", &value, &vlen))
fprintf(stderr, "%.*s\n", vlen, value);
if (!rnet_message_parse(message, "arquivo", &value, &vlen))
- save_rec_file(cpf, value, vlen);
+ save_rec_file(cpf, value, vlen, args);
}
-static void handle_response_already_found(char *cpf, struct rnet_message *message)
+static void handle_response_already_found(char *cpf, struct rnet_message *message, const struct rnetclient_args *args)
{
- handle_response_text_and_file(cpf, message);
+ handle_response_text_and_file(cpf, message, args);
}
static void handle_response_error(struct rnet_message *message)
}
switch (message->buffer[0]) {
case 1: /* go ahead */
- handle_response_text_and_file(cpf, message);
+ handle_response_text_and_file(cpf, message, &rnet_args);
break;
case 3: /* error */
handle_response_error(message);
finish = 1;
break;
case 4:
- handle_response_already_found(cpf, message);
+ handle_response_already_found(cpf, message, &rnet_args);
finish = 1;
break;
case 2:
case 5:
- handle_response_text_and_file(cpf, message);
+ handle_response_text_and_file(cpf, message, &rnet_args);
finish = 1;
break;
}
case 4:
case 5:
case 1:
- handle_response_text_and_file(cpf, message);
+ handle_response_text_and_file(cpf, message, &rnet_args);
break;
}