X-Git-Url: http://git.cascardo.eti.br/?p=cascardo%2Flibreceita.git;a=blobdiff_plain;f=rnetclient.c;h=53c1fbf896ea13c176c26a90bce2a24888aab99a;hp=741b840e9895681a479705da0f34d9f3f921bd93;hb=2459755a51dfddf1217c270efe87074e669a35e7;hpb=7ad049978b03e11fa0cc10ceb625c670dfe1afd4

diff --git a/rnetclient.c b/rnetclient.c
index 741b840..53c1fbf 100644
--- a/rnetclient.c
+++ b/rnetclient.c
@@ -174,16 +174,112 @@ static void usage(void)
 	exit(1);
 }
 
+static int rnet_send(gnutls_session_t session, char *buffer, size_t len)
+{
+	char *out;
+	size_t olen;
+	deflateRecord(buffer, len, &out, &olen);
+	gnutls_record_send(session, out, olen);
+	free(out);
+	return 0;
+}
+
+static int rnet_recv(gnutls_session_t session, struct rnet_message **message)
+{
+	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);
+	len = (buffer[1] << 8 | buffer[2]);
+	rnet_message_expand(message, len);
+	buffer = (*message)->buffer + 6;
+	r = gnutls_record_recv(session, buffer, len);
+	inflateRecord(buffer - 6, len + 6, &out, &olen);
+	rnet_message_del(*message);
+	*message = NULL;
+	rnet_message_expand(message, olen);
+	memcpy((*message)->buffer, out, olen);
+	(*message)->len = olen;
+	free(out);
+	return 0;
+}
+
+static void save_rec_file(char *cpf, char *buffer, int len)
+{
+	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;
+	}
+	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;
+	}
+	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;
+	}
+	fprintf(stderr, "Wrote the receipt to %s.\n", filename);
+out:
+	close(fd);
+	free(filename);
+	umask(mask);
+}
+
+static void handle_response_text_and_file(char *cpf, struct rnet_message *message)
+{
+	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);
+}
+
+static void handle_response_already_found(char *cpf, struct rnet_message *message)
+{
+	handle_response_text_and_file(cpf, message);
+}
+
+static void handle_response_error(struct rnet_message *message)
+{
+	char *value;
+	int vlen;
+	if (!rnet_message_parse(message, "texto", &value, &vlen))
+		fprintf(stderr, "%.*s\n", vlen, value);
+	fprintf(stderr, "Error transmiting DEC file.\n");
+}
+
 int main(int argc, char **argv)
 {
 	int c;
 	int r;
-	char buffer[2048];
-	char *out;
-	size_t olen;
 	struct rnet_decfile *decfile;
 	struct rnet_message *message = NULL;
 	gnutls_session_t session;
+	int finish = 0;
+	char *cpf;
 	
 	if (argc < 2) {
 		usage();
@@ -195,6 +291,8 @@ int main(int argc, char **argv)
 		exit(1);
 	}
 
+	cpf = rnet_decfile_get_header_field(decfile, "cpf");
+
 	gnutls_global_init();
 
 	session_new(&session);
@@ -214,16 +312,63 @@ int main(int argc, char **argv)
 				gnutls_strerror(r));
 
 	rnet_encode(decfile, &message);
-	deflateRecord(message->buffer, message->len, &out, &olen);
-	gnutls_record_send(session, out, olen);
-	free(out);
+	rnet_send(session, message->buffer, message->len);
+	rnet_message_del(message);
 
-	while ((r = gnutls_record_recv(session, buffer, sizeof(buffer))) > 0)
-		write(1, buffer, r);
-	close(c);
+	message = NULL;
+	r = rnet_recv(session, &message);
+	if (r || !message || message->len == 0) {
+		fprintf(stderr, "error when receiving response\n");
+		goto out;
+	}
+	switch (message->buffer[0]) {
+	case 1: /* go ahead */
+		handle_response_text_and_file(cpf, message);
+		break;
+	case 3: /* error */
+		handle_response_error(message);
+		finish = 1;
+		break;
+	case 4:
+		handle_response_already_found(cpf, message);
+		finish = 1;
+		break;
+	case 2:
+	case 5:
+		handle_response_text_and_file(cpf, message);
+		finish = 1;
+		break;
+	}
+	rnet_message_del(message);
 
-	rnet_decfile_close(decfile);
+	if (finish)
+		goto out;
+
+	message = rnet_decfile_get_file(decfile);
+	rnet_send(session, message->buffer, message->len);
 
+	message = NULL;
+	r = rnet_recv(session, &message);
+	if (r || !message || message->len == 0) {
+		fprintf(stderr, "error when receiving response\n");
+		goto out;
+	}
+	switch (message->buffer[0]) {
+	case 3: /* error */
+		handle_response_error(message);
+		break;
+	case 2:
+	case 4:
+	case 5:
+	case 1:
+		handle_response_text_and_file(cpf, message);
+		break;
+	}
+	
+out:
+	gnutls_bye(session, GNUTLS_SHUT_RDWR);
+	close(c);
+	rnet_decfile_close(decfile);
 	gnutls_global_deinit();
 
 	return 0;