#include <stdio.h>

#include <Application.h>
#include <Directory.h>
#include <FindDirectory.h>
#include <Path.h>
#include <File.h>
#include <image.h>
#include <DataIO.h>
#include <Message.h>

int main (int argc, char *argv[])
{
	image_id addon = -1;
	char *transport;

	if (argc < 2) {
		printf("Usage: %s <transport add-on name> [<file to print>]\n", argv[0]);
		return B_ERROR;
	}

	new BApplication("application/x-vnd-OBOS-print_transport_tester");

	transport = argv[1];

	printf("Looking for %s transport addon:\n", transport);

	directory_which which[] = {
		B_USER_ADDONS_DIRECTORY,
		B_COMMON_ADDONS_DIRECTORY,
		B_SYSTEM_ADDONS_DIRECTORY
	};
	BPath path;
	for (uint32 i = 0; i <sizeof(which) / sizeof(which[0]); i++) {
		if (find_directory(which[i], &path, false) != B_OK)
			continue;

		path.Append("Print/transport");
		path.Append(transport);

		printf("\t%s ?\n", path.Path());
		addon = load_add_on(path.Path());
		if (addon >= B_OK)
			break;
	}

	if (addon == B_ERROR) {
		// failed to load transport add-on
		printf("Failed to load \"%s\" print transport add-on!\n", transport);
		return -1;
	}

	printf("Add-on %d = \"%s\" loaded from %s.\n", (int) addon,
		transport, path.Path());

	// get init & exit proc
	BDataIO* (*init_proc)(BMessage*);
	void (*exit_proc)(void);

	get_image_symbol(addon, "init_transport", B_SYMBOL_TYPE_TEXT, (void **) &init_proc);
	get_image_symbol(addon, "exit_transport", B_SYMBOL_TYPE_TEXT, (void **) &exit_proc);

	if (init_proc == NULL || exit_proc == NULL) {
		// transport add-on has not the proper interface
		printf("Invalid print transport add-on API!\n");
		unload_add_on(addon);
		return B_ERROR;
	}

	printf("Initing %s: ", transport);

	// now, initialize the transport add-on
	// request BDataIO object from transport add-on
	BMessage msg('TRIN');
	// TODO: create on the fly a temporary printer folder for testing purpose only
	msg.AddString("printer_file", "/boot/home/config/settings/printers/test");
	BDataIO *io = (*init_proc)(&msg);

	if (io) {
		printf("done.\nTransport parameters msg =>\n");
		msg.PrintToStream();
	} else
		printf("failed!\n");


	if (argc > 2) {
		BFile data(argv[2], B_READ_ONLY);
		if (data.InitCheck() == B_OK) {
			uint8 buffer[B_PAGE_SIZE];
			ssize_t total = 0;
			ssize_t sz;

			printf("Sending data read from %s file...\n", argv[2]);
			while((sz = data.Read(buffer, sizeof(buffer))) > 0) {
				if (io->Write(buffer, sz) < 0) {
					printf("Error writting on the print transport stream!\n");
					break;
				}
				total += sz;
			}	// while
			printf("%ld data bytes sent.\n", total);
		}	// data valid file
	}	// optional data file

	if (exit_proc) {
		printf("Exiting %s...\n", transport);
		(*exit_proc)();
	}

	unload_add_on(addon);
	printf("%s unloaded.\n", transport);

	return B_OK;
}