/* 
  * UAE - The Un*x Amiga Emulator
  * 
  * AppWindow interface
  * 
  * Copyright 1997 Samuel Devulder.
  */

/****************************************************************************/

#include <workbench/startup.h>

#include <exec/execbase.h>
#include <exec/memory.h>

#include <dos/dos.h>

#include <proto/intuition.h>
#include <proto/exec.h>
#include <proto/dos.h>
#include <proto/wb.h>

/****************************************************************************/

#include "sysconfig.h"
#include "sysdeps.h"
#include "options.h"
#include "uaeexe.h"

/****************************************************************************/

#define LEN 256

struct Library          *WorkbenchBase;

static struct AppWindow *AppWin;
static struct MsgPort   *AppPort;

int  appw_init(struct Window *W);
void appw_exit(void);
void appw_events(void);

/****************************************************************************/

int appw_init(struct Window *W)
{
    WorkbenchBase = (void*)OpenLibrary("workbench.library",36L);
    if(WorkbenchBase) {
        AppPort = CreatePort(0,0);
        if(AppPort) {
            AppWin = AddAppWindow(0,0,W,AppPort,NULL);
            if(AppWin) {
                write_log("AppWindow started.\n");
                return 1;
            }
        }
    }
    write_log("Failed to start AppWindow.\n");

    return 0;
}

/****************************************************************************/

void appw_exit(void)
{
    if(AppPort) {
        void *msg;
        while((msg=GetMsg(AppPort))) ReplyMsg(msg);
        DeletePort(AppPort);
        AppPort = NULL;
    }
    if(AppWin) {
        RemoveAppWindow(AppWin);
        AppWin = NULL;
    }
    if(WorkbenchBase) {
        CloseLibrary((void*)WorkbenchBase);
        WorkbenchBase = NULL;
    }
}

/***************************************************************************/

static void addcmd(char *cmd, int len, ULONG lock, char *name)
{
    len -= strlen(cmd); if(len<=0) return; while(*cmd) ++cmd;

    *cmd++ = ' '; if(--len<=0) return;

    NameFromLock(lock,cmd,len);
    len -= strlen(cmd);if(len<=0) return;while(*cmd) ++cmd;
    if(cmd[-1]!=':') {*cmd++='/'; len -= 1;if(len<=0) return;}
    strncpy(cmd,name,len);
    while(*cmd) {++cmd; if(--len<=0) *cmd='\0';}
}

/***************************************************************************/

void appw_events(void)
{
    if(AppWin) {
        struct AppMessage *msg;
        struct WBArg *arg;
        while((msg=(void*)GetMsg(AppPort))) {
            char cmd[LEN];
            int  i;

            arg = msg->am_ArgList;

            strcpy(cmd,"cd ");
            NameFromLock(arg[0].wa_Lock,&cmd[3],LEN-3);
            if(!uaeexe(cmd)) {
	       strcpy(cmd,"run ");strcpy(cmd+4,arg[0].wa_Name);
               for(i=1;i<msg->am_NumArgs;++i)
                   addcmd(cmd,LEN-2,arg[i].wa_Lock,arg[i].wa_Name);
                   /*             ^        */
                   /* 2 bytes for security */
               uaeexe(cmd);
            }
            ReplyMsg((void*)msg);
        }
    }
}