Each shipping info is retained in its own slot

Slot/enum 0 is reserved for Pikul.
libcurl WRITEFUNCTION callback userData parameter is now used for
the shipping instance, but may also be used for something else in
turns.

1 files changed, 131 insertions, 93 deletions

diff --git a/pikul.c b/pikul.c
index 3c93e33..8ba0cd1 100644
--- a/pikul.c
+++ b/pikul.c
@@ -2,7 +2,7 @@
 #include <stdio.h>
 #endif
 #include <string.h>
-#include <json.h>
+#include <stdbool.h>
 #include "private.h"
 
 #define SELECT \
@@ -14,9 +14,7 @@
 "\t\t\t\t\t\t\t\t\t\t\t\t<option value=\"%s\"%s>%s%s</option>\n"
 #define OPTION_NUM_PARAMS 4
 
-CURL *curl;
-json_tokener *tokener;
-struct shipping shipping;
+struct shipping *shipping_list[PIKUL_END];
 
 const char **anteraja_init(char *[]);
 const char **anteraja_services(const char *, const char *, double);
@@ -35,13 +33,14 @@ static void recurse(struct json_object *outer, const char *trail[], struct json_
 		*last = inner;
 }
 
-static size_t handle(char *contents, size_t size, size_t nmemb, void *data)
+static size_t handle(char *contents, size_t size, size_t nmemb, struct shipping *shipping)
 {
 	size_t realsize = size * nmemb;
 #ifdef DEBUG
 	contents[realsize] = '\0';
 	fprintf(stderr, "%s\n", contents);
 #endif
+	json_tokener *tokener = shipping->tokener;
 	json_object *response = json_tokener_parse_ex(tokener, contents, realsize);
 	enum json_tokener_error error = json_tokener_get_error(tokener);
 	if (!response) {
@@ -54,18 +53,20 @@ static size_t handle(char *contents, size_t size, size_t nmemb, void *data)
 	} else if (!json_object_is_type(response, json_type_object) || error != json_tokener_success)
 		return realsize;
 	struct json_object *status = NULL;
-	recurse(response, shipping.status_trail, &status);
-	if (json_object_get_int(status) != 200)
+	recurse(response, shipping->status_trail, &status);
+	if (json_object_get_int(status) != 200) {
+		shipping->data = NULL;
 		return realsize;
-	switch (shipping.mode) {
+	}
+	switch (shipping->mode) {
 		case SERVICES:
 			;
 			struct json_object *array = NULL;
-			recurse(response, shipping.trail, &array);
+			recurse(response, shipping->trail, &array);
 			size_t length = json_object_array_length(array);
-			shipping.data = malloc((length + 1) * sizeof(struct pikul_service *));
-			struct pikul_service **services  = (struct pikul_service **)shipping.data;
-			const char **attributes = (const char **)data;
+			struct pikul_service **services = malloc(sizeof(struct pikul_service *)
+					* (length + 1));
+			const char **attributes = (const char **)shipping->data;
 			enum { CODE, NAME, ETD, COST };
 			for (size_t i = 0; i < length; i++) {
 				services[i] = malloc(sizeof(struct pikul_service));
@@ -95,13 +96,14 @@ static size_t handle(char *contents, size_t size, size_t nmemb, void *data)
 				}
 			}
 			services[length] = NULL;
+			shipping->data = services;
 			break;
 		case ORDER:
 			;
 			struct json_object *string = NULL;
-			recurse(response, shipping.trail, &string);
-			shipping.data = malloc(json_object_get_string_len(string) + 1);
-			strcpy(shipping.data, json_object_get_string(string));
+			recurse(response, shipping->trail, &string);
+			shipping->data = malloc(json_object_get_string_len(string) + 1);
+			strcpy(shipping->data, json_object_get_string(string));
 			break;
 		default:
 			break;
@@ -111,15 +113,17 @@ static size_t handle(char *contents, size_t size, size_t nmemb, void *data)
 
 void pikul_init(enum pikul_company company, char *provisions[])
 {
-	curl_global_init(CURL_GLOBAL_SSL);
-	curl = curl_easy_init();
+	curl_global_init(CURL_GLOBAL_DEFAULT);
+	struct shipping *shipping = malloc(sizeof(struct shipping));
+	CURL *curl = curl_easy_init();
 	curl_easy_setopt(curl, CURLOPT_WRITEFUNCTION, handle);
+	curl_easy_setopt(curl, CURLOPT_WRITEDATA, shipping);
 #ifdef DEBUG
 	curl_easy_setopt(curl, CURLOPT_VERBOSE, 1L);
 #endif
-	shipping.company = company;
-	shipping.headers = NULL;
+	shipping->headers = NULL;
 	const char **fields;
+	shipping_list[company] = shipping;
 	switch (company) {
 		case PIKUL_ANTERAJA:
 			fields = anteraja_init(provisions);
@@ -130,33 +134,39 @@ void pikul_init(enum pikul_company company, char *provisions[])
 	while (*fields) {
 		char header[strlen(*fields) + strlen(":") + strlen(*provisions) + 1];
 		sprintf(header, "%s:%s", *fields++, *provisions++);
-		shipping.headers = curl_slist_append(shipping.headers, header);
+		shipping->headers = curl_slist_append(shipping->headers, header);
 	}
-	curl_easy_setopt(curl, CURLOPT_HTTPHEADER, shipping.headers);
-	tokener = json_tokener_new();
+	curl_easy_setopt(curl, CURLOPT_HTTPHEADER, shipping->headers);
+	shipping->handle = curl;
+	shipping->tokener = json_tokener_new();
 }
 
-struct pikul_service **pikul_services(const char *origin, const char *destination, double weight)
+struct pikul_service **pikul_services(enum pikul_company company,
+		const char *origin, const char *destination, double weight)
 {
-	shipping.post = NULL;
-	const char **attributes;
-	switch (shipping.company) {
+	struct shipping *shipping = shipping_list[company];
+	shipping->post = NULL;
+	switch (company) {
 		case PIKUL_ANTERAJA:
-			attributes = anteraja_services(origin, destination, weight);
+			shipping->data = anteraja_services(origin, destination, weight);
 			break;
 		default:
 			break;
 	}
-	curl_easy_setopt(curl, CURLOPT_URL, shipping.url);
-	if (shipping.post)
-		curl_easy_setopt(curl, CURLOPT_POSTFIELDS, shipping.post);
-	shipping.mode = SERVICES;
-	curl_easy_setopt(curl, CURLOPT_WRITEDATA, attributes);
+	CURL *curl = shipping->handle;
+	curl_easy_setopt(curl, CURLOPT_URL, shipping->url);
+	if (shipping->post) {
+		curl_easy_setopt(curl, CURLOPT_POSTFIELDS, shipping->post);
+#ifdef DEBUG
+		fprintf(stderr, "POST: %s\n", shipping->post);
+#endif
+	}
+	shipping->mode = SERVICES;
 	curl_easy_perform(curl);
-	if (shipping.post)
-		free(shipping.post);
-	free(shipping.url);
-	return (struct pikul_service **)shipping.data;
+	if (shipping->post)
+		free(shipping->post);
+	free(shipping->url);
+	return (struct pikul_service **)shipping->data;
 }
 
 static inline void free_service(struct pikul_service *service)
@@ -183,58 +193,78 @@ static int servicecmp(const void *service1, const void *service2)
 			(*(struct pikul_service * const *)service2)->code);
 }
 
-char *pikul_html(const char *origin, const char *destination, double weight,
+char *pikul_html(char *origins[], char *destinations[], double weight,
 		const char *widget, const char *extra, const char *name, const char *value,
 		char *code_prefixes[], char *name_prefixes[])
 {
-	struct pikul_service **services = pikul_services(origin, destination, weight);
 	char *html;
+	struct pikul_service **services[PIKUL_END];
+	bool no_service = true;
+	for (enum pikul_company company = PIKUL; company < PIKUL_END; company++) {
+		if (!shipping_list[company])
+			continue;
+		services[company] = pikul_services(company,
+				origins[company], destinations[company], weight);
+		if (services[company] && services[company][0])
+			no_service = false;
+	}
 	if (!strcmp(widget, "select")) {
 		char *options = NULL;
-		if (!services || !services[0]) {
+		if (no_service) {
 			static const char *empty = "<option value=\"\">Not enough information</option>";
 			options = malloc(strlen(empty) + 1);
 			strcpy(options, empty);
-		} else {
-			size_t i = 0;
-			struct pikul_service *service;
-			while ((service = services[i++])) {
-				char *code_prefix = code_prefixes[shipping.company];
-				char *name_prefix = name_prefixes[shipping.company];
-				size_t code_length = strlen(code_prefix) + strlen(service->code);
-				char code[code_length + 1];
-				sprintf(code, "%s%s", code_prefix, service->code);
-				_Bool selected = !strcmp(code, value);
-				size_t length = strlen(OPTION) + code_length
-					+ (selected ? strlen(" selected") : 0)
-					+ strlen(name_prefix) + strlen(service->name)
-					- OPTION_NUM_PARAMS * strlen("%s");
-				char option[length + 1];
-				sprintf(option, OPTION, code, selected ? " selected" : "",
-						name_prefix, service->name);
-				if (options)
-					options = realloc(options, strlen(options) + length + 1);
-				else {
-					options = malloc(length + 1);
-					memset(options, '\0', strlen(options));
+		} else
+			for (enum pikul_company company = PIKUL; company < PIKUL_END; company++) {
+				if (!services[company])
+					continue;
+				if (!services[company][0]) {
+					free(services[company]);
+					continue;
+				}
+				size_t i = 0;
+				struct pikul_service *service;
+				while ((service = services[company][i++])) {
+					char *code_prefix = code_prefixes[company];
+					char *name_prefix = name_prefixes[company];
+					size_t code_length = strlen(code_prefix) + strlen(service->code);
+					char code[code_length + 1];
+					sprintf(code, "%s%s", code_prefix, service->code);
+					_Bool selected = !strcmp(code, value);
+					size_t length = strlen(OPTION) + code_length
+						+ (selected ? strlen(" selected") : 0)
+						+ strlen(name_prefix) + strlen(service->name)
+						- OPTION_NUM_PARAMS * strlen("%s");
+					char option[length + 1];
+					sprintf(option, OPTION, code, selected ? " selected" : "",
+							name_prefix, service->name);
+					if (options)
+						options = realloc(options, strlen(options) + length + 1);
+					else {
+						options = malloc(length + 1);
+						memset(options, '\0', strlen(options));
+					}
+					strcat(options, option);
 				}
-				strcat(options, option);
+				pikul_free_services(services[company]);
 			}
-		}
 		html = malloc(strlen(SELECT) + strlen(name) + (extra ? strlen(extra) : 0) + strlen(options)
 				- SELECT_NUM_PARAMS * strlen("%s") + 1);
 		sprintf(html, SELECT, name, extra ? extra : "", options);
 	}
-	if (services)
-		pikul_free_services(services);
 	return html;
 }
 
-double pikul_cost(const char *origin, const char *destination, double weight, const char *code)
+double pikul_cost(enum pikul_company company, const char *code,
+		const char *origin, const char *destination, double weight)
 {
-	struct pikul_service **services = pikul_services(origin, destination, weight);
-	if (!services || !services[0])
+	struct pikul_service **services = pikul_services(company, origin, destination, weight);
+	if (!services)
+		return .0;
+	if (!services[0]) {
+		free(services);
 		return .0;
+	}
 	size_t length = 0;
 	while (services[length])
 		length++;
@@ -250,14 +280,16 @@ double pikul_cost(const char *origin, const char *destination, double weight, co
 	return cost;
 }
 
-char *pikul_order(const char *order_number, const char *service, const char *sender_name,
-		const char *sender_phone, const char *origin, const char *sender_address,
-		const char *sender_postal, const char *receiver_name, const char *receiver_phone,
-		const char *destination, const char *receiver_address, const char *receiver_postal,
+char *pikul_order(enum pikul_company company, const char *order_number, const char *service,
+		const char *sender_name, const char *sender_phone, const char *origin,
+		const char *sender_address, const char *sender_postal,
+		const char *receiver_name, const char *receiver_phone, const char *destination,
+		const char *receiver_address, const char *receiver_postal,
 		int nitems, char **items[], double subtotal)
 {
-	shipping.post = NULL;
-	switch (shipping.company) {
+	struct shipping *shipping = shipping_list[company];
+	shipping->post = NULL;
+	switch (company) {
 		case PIKUL_ANTERAJA:
 			anteraja_order(order_number, service, sender_name, sender_phone, origin,
 					sender_address, sender_postal, receiver_name, receiver_phone,
@@ -267,33 +299,39 @@ char *pikul_order(const char *order_number, const char *service, const char *sen
 		default:
 			break;
 	}
-	curl_easy_setopt(curl, CURLOPT_URL, shipping.url);
-	if (shipping.post) {
-		curl_easy_setopt(curl, CURLOPT_POSTFIELDS, shipping.post);
+	CURL *curl = shipping->handle;
+	curl_easy_setopt(curl, CURLOPT_URL, shipping->url);
+	if (shipping->post) {
+		curl_easy_setopt(curl, CURLOPT_POSTFIELDS, shipping->post);
 #ifdef DEBUG
-		fprintf(stderr, "POST: %s\n", shipping.post);
+		fprintf(stderr, "POST: %s\n", shipping->post);
 #endif
 	}
-	shipping.mode = ORDER;
+	shipping->mode = ORDER;
 	curl_easy_perform(curl);
-	if (shipping.post)
-		free(shipping.post);
-	free(shipping.url);
-	return (char *)shipping.data;
+	if (shipping->post)
+		free(shipping->post);
+	free(shipping->url);
+	return (char *)shipping->data;
 }
 
 void pikul_cleanup()
 {
-	switch (shipping.company) {
-		case PIKUL_ANTERAJA:
-			anteraja_cleanup();
-			break;
-		default:
-			break;
+	for (enum pikul_company company = PIKUL; company < PIKUL_END; company++) {
+		if (!shipping_list[company])
+			continue;
+		switch (company) {
+			case PIKUL_ANTERAJA:
+				anteraja_cleanup();
+				break;
+			default:
+				break;
+		}
+		struct shipping *shipping = shipping_list[company];
+		free(shipping->base);
+		json_tokener_free(shipping->tokener);
+		curl_slist_free_all(shipping->headers);
+		curl_easy_cleanup(shipping->handle);
 	}
-	free(shipping.base);
-	json_tokener_free(tokener);
-	curl_slist_free_all(shipping.headers);
-	curl_easy_cleanup(curl);
 	curl_global_cleanup();
 }