#define MAINDEBUG 0
#include <FL/Fl.H>
#include <FL/Fl_Window.H>
#include <FL/Fl_Box.H>
#include "ui_hd24connect.h"
#include <hd24fs.h>
#include <hd24utils.h>
#include <FL/x.H> //dave
#ifdef LINUX
#include <X11/xpm.h> //dave
#endif
#include "images/hd24connect_64x64.xpm" //dave
#include <iostream>
#include <string>
#include <stdlib.h>
#include <hd24utils.h>
#ifndef MAX_PATH
#define MAX_PATH 127
#endif

#ifdef WINDOWS
#include <windows.h>
#define IDI_ICON1 101
#endif
string device;
string headerfilename;
int force;
int maintmode;
int wavefixmode;
int testmode;
#ifdef LINUX
#define TIMEOUT 0.03
#endif
#define ARGDEV "--dev="
#define ARGHEADER "--header="
#define ARGFORCE "--force"
#define ARGMAINT "--maint"
#define ARGWAVEFIX "--wavefix"
#define ARGTEST "--test"

#include "selftest.cpp"

int parsecommandline(int argc, char ** argv) 
{
	int invalid=0;
	force=0;
	maintmode=0;
	wavefixmode=0;
	testmode=0;
	device="";
	for (int c=1;c<argc;c++) {

		string arg=argv[c];
		if (arg.substr(0,1)=="-") {
			if (arg.substr(1,1)!="-") {
				continue; // skip single-dash arguments
				// for instance to skip -display
				// and to skip macOS process number
			}
		}
		if (arg.substr(0,strlen(ARGTEST))==ARGTEST) {
			testmode=1;
			continue;
		}
		if (arg.substr(0,strlen(ARGDEV))==ARGDEV) {
			device=arg.substr(strlen(ARGDEV));
			continue;
		}
		if (arg.substr(0,strlen(ARGMAINT))==ARGMAINT) {
			maintmode=1;
#if (MAINDEBUG==1)
			cout << "Running in maintenance mode." << endl;
#endif
			continue;
		}
		if (arg.substr(0,strlen(ARGWAVEFIX))==ARGWAVEFIX) {
			wavefixmode=1;
#if (MAINDEBUG==1)
			cout << "Running in wavefix mode." << endl;
#endif
			continue;
		}
		if (arg.substr(0,strlen(ARGHEADER))==ARGHEADER) {
			headerfilename=arg.substr(strlen(ARGHEADER));
			continue;
		}
		if (arg.substr(0,strlen(ARGFORCE))==(ARGFORCE)) {
			force=1;
			continue;
		}
#ifdef DARWIN
		// on MacOS ignore all crap on the command line
		// (system adds process ID info etc)
		continue;
#endif

#if (MAINDEBUG==1)
		cout << "Invalid argument: " << arg << endl;
#endif
		invalid=1;
	}
	return invalid;
}

int isabsolutepath(const char* pathname) {
  if (pathname[0]=='/') return (1==1);
  if (pathname[0]=='\\') return (1==1);
  if (pathname[1]==':') return (1==1);
  return (1==0);
}

void getprogdir(const char* currpath,const char* callpath,char* result) {
        if (isabsolutepath(callpath)) {
                strncpy(result,callpath,strlen(callpath)+1);
                return;
        }
        strcat(result,currpath);
#ifdef WINDOWS
        strcat(result,"\\\0");
#else
        strcat(result,"/\0");
#endif

        if (strcmp(callpath,"./")!=0) {
                strcat(result,callpath);
        }
        return;
}


int main(int argc, char **argv) {

	int result=0;

	/* First, the program will figure out its own
	   absolute program path. This will be used
           for loading libraries after program startup,
           rather than having hard dependencies *during*. */
	char* currentworkingdir=(char*)malloc(2048);
#if (MAINDEBUG==1)
	cout << "Welcome to HD24connect" << endl;
#endif
        string currname=argv[0];
        string rawname="";
#if (MAINDEBUG==1)
	cout << "Currname=" << currname << endl;
#endif
        do {
                string lastchar="";
                lastchar+=currname.substr(currname.length()-1,1);
                if ((lastchar=="/") || (lastchar=="\\")) {
                        break;
                }
                rawname=currname.substr(currname.length()-1,1)+rawname;
                currname=currname.substr(0,currname.length()-1);
           
                if (currname=="") break;
        } while (1==1);
        // currname=path given on commandline
	
        char cwd[2048];
        char* mycwd=getcwd(&cwd[0],2048);
	mycwd=&cwd[0];
#if (MAINDEBUG==1)
	cout << "cwd=" << cwd << endl;
#endif
        char absprogpath[2048];
        char fullname[2048];
	absprogpath[0]='\0';
        getprogdir(&cwd[0],currname.c_str(),&absprogpath[0]);

#if (MAINDEBUG==1)
	cout << "absprogpath=" << absprogpath << endl;
#endif
        free(currentworkingdir);

	/*
         * Either absprogpath now contains absolute program path
         * (if called from current path or by specifying path)
         * or we need to traverse the OS PATH.
         */
	strncpy(fullname,absprogpath,2048);
        strcat(fullname,rawname.c_str());
#if (MAINDEBUG==1)
	cout << "fullname=" << fullname << endl;
#endif
        if (!(hd24utils::fileExists(fullname))) {
		/* File according to full name does not exist. */
#if (MAINDEBUG==1)
		cout << "rawname=" << rawname << ", path=" << getenv("PATH") << endl;
#endif
        	hd24utils::findfile(&rawname[0],getenv("PATH"),&absprogpath[0]);
		if (strlen(absprogpath)==0) {
			cout << "Cannot find executable. "<< endl;
			return 0;
		}
	}
	// The final word on which path contains the exe is absprogpath.
#if (MAINDEBUG==1) 
	cout << "The final word on where the exe is, is: " << absprogpath << endl;
	cout << "main debugmode enabled." << endl;
	cout << " Sizeof float=" << sizeof(float) << endl;
#endif	
	char initial_path[MAX_PATH];
	mycwd=getcwd(initial_path,MAX_PATH);
	// This prints the path+filename to ourselves:
	// If we run from current dir, argv is just filename;
	// otherwise missing part of path+filename.
	// So initial path+filename always renders the complete path.
	int invalid=parsecommandline(argc,argv);
	if (invalid!=0) {
		return invalid;
	}
	//force=0;

	hd24fs* sysob=NULL;
	if (testmode==1)
	{
#ifdef LINUX
		fl_open_display();
#endif
		HD24UserInterface ui(argc,argv,absprogpath);
		// testmode active- run self test.
		result=runselftest(&ui);
		cout << "Selftest run complete - Thank you for using HD24connect." << endl;
		ui.finish();
		return result;
	}	
	
	string* imagedir=hd24utils::getlastdir("driveimagedir");
#if (MAINDEBUG==1) 
	cout << "imagedir="<<*imagedir<< endl;
#endif		
	if (device=="") {
		sysob=new hd24fs(imagedir->c_str(),hd24fs::MODE_RDWR);
	} else {
		cout << "Trying to use " << device << " as hd24 device." << endl;
		sysob=new hd24fs(imagedir->c_str(),hd24fs::MODE_RDWR,&device,(force==1));
		if (!(sysob->isOpen())) 
		{
			if (!force) {
				cout << "Cannot open hd24 device" << endl;
				delete sysob;
				return 1;
			}
		}
	}
	delete imagedir;
	if (headerfilename!="") 
	{
		if (!(sysob->useheaderfile(headerfilename))) 
		{
			cout << "Couldn't load header file "<<headerfilename << endl;
		};
	}
#if (MAINDEBUG==1) 
	cout << "mdb(2)" << endl;
#endif	
//	Fl::scheme("gtk+");
#ifdef LINUX
	fl_open_display();
#endif
	HD24UserInterface ui(argc,argv,absprogpath);
#if (MAINDEBUG==1) 
	cout << "mdb(3b)" << endl;
#endif	
	sysob->setmaintenancemode(maintmode);
	sysob->setwavefixmode(wavefixmode);
#if (MAINDEBUG==1) 
	cout << "mdb(3c)" << endl;
#endif	
	Fl_Window *window = ui.make_window(sysob);
#if (MAINDEBUG==1) 
	cout << "mdb(3d)" << endl;
#endif	
#ifdef WINDOWS

	window->icon((char *)LoadIcon(fl_display,MAKEINTRESOURCE(IDI_ICON1)));
#endif
	window->end();
	window->show(); //argc, argv);

#ifdef LINUX //dave
        Pixmap p, mask;
        XpmCreatePixmapFromData(fl_display,DefaultRootWindow(fl_display),(char **)hd24connect_xpm, &p, &mask, NULL);

/*
FLTK support for transparent background is broken. So instead of this:
window->icon((char *)p);
We will write the following: */
XWMHints *hints=NULL;
hints = XGetWMHints(fl_display, fl_xid(window));
hints->icon_pixmap = p;
hints->icon_mask = mask;
hints->flags = IconPixmapHint | IconMaskHint;
XSetWMHints(fl_display, fl_xid(window), hints);
/* -- end of transparency fix */
#endif
#if (MAINDEBUG==1) 
	cout << "mdb(3)" << endl;
#endif	
#if (MAINDEBUG==1) 
	cout << "mdb(4)" << endl;
#endif	
	if (!(sysob->isOpen())) 
	{
		window->deactivate();
		fl_message("No valid HD24 drive is connected to the system.\nUse the File menu to resolve this problem.");
		window->activate();
	}
	// run normally.
	result= Fl::run(); 
	ui.control->ready(0);
#ifndef WINDOWS
	cout << "Thank you for using HD24connect." << endl;
#endif
//	ui.finish();
	
#ifdef hints
	if (hints!=NULL)
	{
		delete hints;
	}
#endif
	return result;
}