174 lines
4.2 KiB
C
174 lines
4.2 KiB
C
#pragma cdev cdevMain
|
|
|
|
#include <types.h>
|
|
#include <stddef.h>
|
|
#include <stdio.h>
|
|
#include <gsos.h>
|
|
#include <orca.h>
|
|
#include <quickdraw.h>
|
|
#include <qdaux.h>
|
|
#include <window.h>
|
|
#include <control.h>
|
|
#include <lineedit.h>
|
|
#include <desk.h>
|
|
#include <locator.h>
|
|
#include <tcpip.h>
|
|
#include "mounturl.h"
|
|
|
|
#define MachineCDEV 1
|
|
#define BootCDEV 2
|
|
#define InitCDEV 4
|
|
#define CloseCDEV 5
|
|
#define EventsCDEV 6
|
|
#define CreateCDEV 7
|
|
#define AboutCDEV 8
|
|
#define RectCDEV 9
|
|
#define HitCDEV 10
|
|
#define RunCDEV 11
|
|
#define EditCDEV 12
|
|
|
|
#define imageURLTxt 2
|
|
#define urlLine 3
|
|
#define mountBtn 1
|
|
//#define optionsPopUp 6
|
|
//#define trianglePic 7
|
|
|
|
#define netDiskMissingError 3000
|
|
#define mountURLError 3001
|
|
|
|
extern void FreeAllCDevMem(void);
|
|
|
|
char urlBuf[257];
|
|
|
|
WindowPtr wPtr = NULL;
|
|
|
|
struct MountURLRec mountURLRec = {sizeof(struct MountURLRec)};
|
|
|
|
void DoMount(void)
|
|
{
|
|
char numStr[6] = "";
|
|
char *subs[1] = {numStr};
|
|
static char alertString[200];
|
|
|
|
WaitCursor();
|
|
|
|
GetLETextByID(wPtr, urlLine, (StringPtr)&urlBuf);
|
|
|
|
TCPIPConnect(NULL);
|
|
|
|
mountURLRec.result = NETDISK_NOT_PRESENT;
|
|
mountURLRec.url = urlBuf + 1;
|
|
|
|
SendRequest(MountURL, sendToName|stopAfterOne, (Long)NETDISK_REQUEST_NAME,
|
|
(Long)&mountURLRec, NULL);
|
|
|
|
InitCursor();
|
|
|
|
if (mountURLRec.result != OPERATION_SUCCESSFUL) {
|
|
snprintf(numStr, sizeof(numStr), "%u", mountURLRec.result);
|
|
snprintf(alertString, sizeof(alertString), "42~%.175s~^#0\0",
|
|
ErrorString(mountURLRec.result));
|
|
AlertWindow(awPointer+awCString+awButtonLayout, (Pointer)subs,
|
|
(Ref)alertString);
|
|
|
|
/* Work around issue where parts of LE caret may flash out of sync */
|
|
CtlRecHndl ctl = GetCtlHandleFromID(wPtr, urlLine);
|
|
LEDeactivate((LERecHndl) GetCtlTitle(ctl));
|
|
if (FindTargetCtl() == ctl) {
|
|
LEActivate((LERecHndl) GetCtlTitle(ctl));
|
|
}
|
|
}
|
|
}
|
|
|
|
void DoHit(long ctlID, CtlRecHndl ctlHandle)
|
|
{
|
|
CtlRecHndl oldMenuBar;
|
|
Word menuItem;
|
|
|
|
if (!wPtr) /* shouldn't happen */
|
|
return;
|
|
|
|
if (ctlID == mountBtn) {
|
|
DoMount();
|
|
}
|
|
|
|
return;
|
|
}
|
|
|
|
long DoMachine(void)
|
|
{
|
|
mountURLRec.result = NETDISK_NOT_PRESENT;
|
|
mountURLRec.url = "";
|
|
|
|
SendRequest(MountURL, sendToName|stopAfterOne, (Long)NETDISK_REQUEST_NAME,
|
|
(Long)&mountURLRec, NULL);
|
|
|
|
if (mountURLRec.result == NETDISK_NOT_PRESENT) {
|
|
InitCursor();
|
|
AlertWindow(awResource+awButtonLayout, NULL, netDiskMissingError);
|
|
return 0;
|
|
}
|
|
|
|
return 1;
|
|
}
|
|
|
|
void DoEdit(Word op)
|
|
{
|
|
CtlRecHndl ctl;
|
|
GrafPortPtr port;
|
|
|
|
if (!wPtr)
|
|
return;
|
|
port = GetPort();
|
|
SetPort(wPtr);
|
|
|
|
ctl = FindTargetCtl();
|
|
if (toolerror() || GetCtlID(ctl) != urlLine)
|
|
goto ret;
|
|
|
|
switch (op) {
|
|
case cutAction: LECut((LERecHndl) GetCtlTitle(ctl));
|
|
if (LEGetScrapLen() > 0)
|
|
LEToScrap();
|
|
break;
|
|
case copyAction: LECopy((LERecHndl) GetCtlTitle(ctl));
|
|
if (LEGetScrapLen() > 0)
|
|
LEToScrap();
|
|
break;
|
|
case pasteAction: LEFromScrap();
|
|
LEPaste((LERecHndl) GetCtlTitle(ctl));
|
|
break;
|
|
case clearAction: LEDelete((LERecHndl) GetCtlTitle(ctl));
|
|
break;
|
|
}
|
|
|
|
ret:
|
|
SetPort(port);
|
|
}
|
|
|
|
void DoCreate(WindowPtr windPtr)
|
|
{
|
|
int mode;
|
|
|
|
wPtr = windPtr;
|
|
mode = (GetMasterSCB() & scbColorMode) ? 640 : 320;
|
|
NewControl2(wPtr, resourceToResource, mode);
|
|
}
|
|
|
|
LongWord cdevMain (LongWord data2, LongWord data1, Word message)
|
|
{
|
|
long result = 0;
|
|
|
|
switch(message) {
|
|
case MachineCDEV: result = DoMachine(); break;
|
|
case HitCDEV: DoHit(data2, (CtlRecHndl)data1); break;
|
|
case EditCDEV: DoEdit(data1 & 0xFFFF); break;
|
|
case CreateCDEV: DoCreate((WindowPtr)data1); break;
|
|
case CloseCDEV: wPtr = NULL; break;
|
|
}
|
|
|
|
ret:
|
|
FreeAllCDevMem();
|
|
return result;
|
|
}
|