2017-10-21 23:40:19 +00:00
|
|
|
/********************************************
|
|
|
|
|
*
|
|
|
|
|
* Loader
|
|
|
|
|
*
|
|
|
|
|
* Copyright Apple Computer, Inc.1986-90
|
|
|
|
|
* All Rights Reserved
|
|
|
|
|
*
|
|
|
|
|
* Copyright 1992, Byte Works, Inc.
|
|
|
|
|
*
|
|
|
|
|
********************************************/
|
|
|
|
|
|
|
|
|
|
#ifndef __TYPES__
|
|
|
|
|
#include <TYPES.h>
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
#ifndef __LOADER__
|
|
|
|
|
#define __LOADER__
|
|
|
|
|
|
|
|
|
|
/* Error Codes */
|
|
|
|
|
#define idNotFound 0x1101 /* segment/application/entry not found */
|
|
|
|
|
#define idPathnameErr 0x1103
|
|
|
|
|
#define idNotLoadFile 0x1104 /* file is not a load file */
|
|
|
|
|
#define idBusyErr 0x1105 /* system loader is busy */
|
|
|
|
|
#define idFilVersErr 0x1107 /* file version error */
|
|
|
|
|
#define idUserIDErr 0x1108 /* user ID error */
|
|
|
|
|
#define idSequenceErr 0x1109 /* segnum out of sequence */
|
|
|
|
|
#define idBadRecordErr 0x110A /* illegal load record found */
|
|
|
|
|
#define idForeignSegErr 0x110B /* segment is foreign */
|
|
|
|
|
|
|
|
|
|
struct InitialLoadOutputRec {
|
|
|
|
|
Word userID;
|
|
|
|
|
Pointer startAddr;
|
|
|
|
|
Word dPageAddr;
|
|
|
|
|
Word buffSize;
|
|
|
|
|
};
|
|
|
|
|
typedef struct InitialLoadOutputRec InitialLoadOutputRec, *InitialLoadOutputRecPtr;
|
|
|
|
|
|
|
|
|
|
struct RestartOutRec {
|
|
|
|
|
Word userID;
|
|
|
|
|
Pointer startAddr;
|
|
|
|
|
Word dPageAddr;
|
|
|
|
|
Word buffSize;
|
|
|
|
|
};
|
|
|
|
|
typedef struct RestartOutRec RestartOutRec, *RestartOutRecPtr;
|
|
|
|
|
|
|
|
|
|
struct LoadSegNameOut {
|
|
|
|
|
Pointer segAddr;
|
|
|
|
|
Word userID;
|
|
|
|
|
Word fileNum;
|
|
|
|
|
Word segNum;
|
|
|
|
|
};
|
|
|
|
|
typedef struct LoadSegNameOut LoadSegNameOut, *LoadSegNameOutPtr;
|
|
|
|
|
|
|
|
|
|
struct UnloadSegOutRec {
|
|
|
|
|
Word userID;
|
|
|
|
|
Word fileNum;
|
|
|
|
|
Word segNum;
|
|
|
|
|
};
|
|
|
|
|
typedef struct UnloadSegOutRec UnloadSegOutRec, *UnloadSegOutRecPtr;
|
|
|
|
|
|
|
|
|
|
extern pascal void GetLoadSegInfo(Word, Word, Word, Pointer) inline(0x0F11,dispatcher);
|
|
|
|
|
extern pascal Word GetUserID(Pointer) inline(0x1011,dispatcher);
|
|
|
|
|
extern pascal Word GetUserID2(Pointer) inline(0x2111,dispatcher);
|
|
|
|
|
extern InitialLoadOutputRec InitialLoad(Word, Pointer, Word);
|
|
|
|
|
extern InitialLoadOutputRec InitialLoad2(Word, Pointer, Word, Word);
|
|
|
|
|
extern pascal Pointer LGetPathname(Word, Word) inline(0x1111,dispatcher);
|
|
|
|
|
extern pascal Pointer LGetPathname2(Word, Word) inline(0x2211,dispatcher);
|
|
|
|
|
extern pascal void LoaderInitialization(void) inline(0x0111,dispatcher);
|
|
|
|
|
extern pascal void LoaderReset(void) inline(0x0511,dispatcher);
|
|
|
|
|
extern pascal void LoaderShutDown(void) inline(0x0311,dispatcher);
|
|
|
|
|
extern pascal void LoaderStartUp(void) inline(0x0211,dispatcher);
|
|
|
|
|
extern pascal Boolean LoaderStatus(void) inline(0x0611,dispatcher);
|
|
|
|
|
extern pascal Word LoaderVersion(void) inline(0x0411,dispatcher);
|
|
|
|
|
extern LoadSegNameOut LoadSegName(Word, Pointer, Pointer);
|
|
|
|
|
extern pascal Pointer LoadSegNum(Word, Word, Word) inline(0x0B11,dispatcher);
|
|
|
|
|
extern pascal void RenamePathname(Pointer, Pointer) inline(0x1311,dispatcher);
|
|
|
|
|
extern RestartOutRec Restart(Word);
|
|
|
|
|
extern UnloadSegOutRec UnloadSeg(Longword);
|
|
|
|
|
extern pascal void UnloadSegNum(Word, Word, Word) inline(0x0C11,dispatcher);
|
|
|
|
|
extern pascal Word UserShutDown(Word, Word) inline(0x1211,dispatcher);
|
|
|
|
|
|
|
|
|
|
/* Not documented.
|
|
|
|
|
extern pascal Pointer GetPathname() inline(0x1111,dispatcher);
|
|
|
|
|
extern pascal Pointer GetPathname2() inline(0x2211,dispatcher);
|
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
#endif
|
