home *** CD-ROM | disk | FTP | other *** search
- *char DOSNAME = "dos.library";
-
- ulong
- MODE_READWRITE = 1004,
- MODE_READONLY = 1005,
- MODE_OLDFILE = 1005,
- MODE_NEWFILE = 1006;
-
- long
- OFFSET_BEGINNING = -1,
- OFFSET_BEGINING = OFFSET_BEGINNING,
- OFFSET_CURRENT = 0,
- OFFSET_END = 1,
-
- SHARED_LOCK = -2,
- ACCESS_READ = -2,
- EXCLUSIVE_LOCK = -1,
- ACCESS_WRITE = -1;
-
- type
- BPTR = ulong,
- Handle_t = BPTR,
- Lock_t = BPTR,
- Segment_t = BPTR,
-
- DateStamp_t = struct {
- ulong ds_Days;
- ulong ds_Minute;
- ulong ds_Tick;
- };
-
- ulong
- TICKS_PER_SECOND = 50;
-
- type
- FileInfoBlock_t = struct {
- ulong fib_DiskKey;
- ulong fib_DirEntryType;
- [108]char fib_FileName;
- ulong fib_Protection;
- ulong fib_EntryType;
- ulong fib_Size;
- ulong fib_NumBlocks;
- DateStamp_t fib_Date;
- [116]char fib_Comment;
- };
-
- ulong
- FIBB_ARCHIVE = 4,
- FIBB_READ = 3,
- FIBB_WRITE = 2,
- FIBB_EXECUTE = 1,
- FIBB_DELETE = 0,
- FIBF_ARCHIVE = 1 << FIBB_ARCHIVE,
- FIBF_READ = 1 << FIBB_READ,
- FIBF_WRITE = 1 << FIBB_WRITE,
- FIBF_EXECUTE = 1 << FIBB_EXECUTE,
- FIBF_DELETE = 1 << FIBB_DELETE;
-
- type
- InfoData_t = struct {
- ulong id_NumSoftErrors;
- ulong id_UnitNumber;
- ulong id_DiskState;
- ulong id_NumBlocks;
- ulong id_NumBlocksUsed;
- ulong id_BytesPerBlock;
- ulong id_DiskType;
- BPTR id_VolumeNode;
- ulong id_InUse;
- };
-
- ulong
- ID_WRITE_PROTECTED = 80,
- ID_VALIDATING = 81,
- ID_VALIDATED = 82,
-
- ID_NO_DISK_PRESENT = 0xffffffff,
- ID_UNREADABLE_DISK = ('B' - '\e') << 24 | ('A' - '\e') << 16 |
- ('D' - '\e') << 8,
- ID_DOS_DISK = ('D' - '\e') << 24 | ('O' - '\e') << 16 |
- ('S' - '\e') << 8,
- ID_NOT_REALLY_DOS = ('N' - '\e') << 24 | ('D' - '\e') << 16 |
- ('O' - '\e') << 8 | ('S' - '\e'),
- ID_KICKSTART_DISK = ('K' - '\e') << 24 | ('I' - '\e') << 16 |
- ('C' - '\e') << 8 | ('K' - '\e'),
-
- ERROR_NO_FREE_STORE = 103,
- ERROR_TASK_TABLE_FULL = 105,
- ERROR_LINE_TOO_LONG = 120,
- ERROR_FILE_NOT_OBJECT = 121,
- ERROR_INVALID_RESIDENT_LIBRARY = 122,
- ERROR_NO_DEFAULT_DIR = 201,
- ERROR_OBJECT_IN_USE = 202,
- ERROR_OBJECT_EXISTS = 203,
- ERROR_DIR_NOT_FOUND = 204,
- ERROR_OBJECT_NOT_FOUND = 205,
- ERROR_BAD_STREAM_NAME = 206,
- ERROR_OBJECT_TOO_LARGE = 207,
- ERROR_ACTION_NOT_KNOWN = 209,
- ERROR_INVALID_COMPONENT_NAME = 210,
- ERROR_INVALID_LOCK = 211,
- ERROR_OBJECT_WRONG_TYPE = 212,
- ERROR_DISK_NOT_VALIDATED = 213,
- ERROR_DISK_WRITE_PROTECTED = 214,
- ERROR_RENAME_ACROSS_DEVICES = 215,
- ERROR_DIRECTORY_NOT_EMPTY = 216,
- ERROR_TOO_MANY_LEVELS = 217,
- ERROR_DEVICE_NOT_MOUNTED = 218,
- ERROR_SEEK_ERROR = 219,
- ERROR_COMMENT_TOO_BIG = 220,
- ERROR_DISK_FULL = 221,
- ERROR_DELETE_PROTECTED = 222,
- ERROR_WRITE_PROTECTED = 223,
- ERROR_READ_PROTECTED = 224,
- ERROR_NOT_A_DOS_DISK = 225,
- ERROR_NO_DISK = 226,
- ERROR_NO_MORE_ENTRIES = 232,
-
- RETURN_OK = 0,
- RETURN_WARN = 5,
- RETURN_ERROR = 10,
- RETURN_FAIL = 20,
-
- SIGBREAKB_CTRL_C = 12,
- SIGBREAKB_CTRL_D = 13,
- SIGBREAKB_CTRL_E = 14,
- SIGBREAKB_CTRL_F = 15,
-
- SIGBREAKF_CTRL_C = 1 << SIGBREAKB_CTRL_C,
- SIGBREAKF_CTRL_D = 1 << SIGBREAKB_CTRL_D,
- SIGBREAKF_CTRL_E = 1 << SIGBREAKB_CTRL_E,
- SIGBREAKF_CTRL_F = 1 << SIGBREAKB_CTRL_F;
-
- extern
- OpenDosLibrary(ulong version)*DosLibrary_t,
- CloseDosLibrary()void,
-
- Close(Handle_t fd)void,
- CreateDir(*char name)Lock_t,
- CurrentDir(Lock_t lock)Lock_t,
- DeleteFile(*char name)bool,
- DupLock(Lock_t lock)Lock_t,
- Examine(Lock_t lock; *FileInfoBlock_t fib)bool,
- ExNext(Lock_t lock; *FileInfoBlock_t fib)bool,
- Info(Lock_t lock; *InfoData_t id)bool,
- Input()Handle_t,
- IoErr()ulong,
- IsInteractive(Handle_t fd)bool,
- Lock(*char name; long accessMode)Lock_t,
- Open(*char name; ulong accessMode)Handle_t,
- Output()Handle_t,
- ParentDir(Lock_t lock)Lock_t,
- Read(Handle_t fd; *byte buffer; ulong length)ulong,
- Rename(*char oldName, newName)bool,
- Seek(Handle_t fd; long position, seekMode)long,
- SetComment(*char name, comment)bool,
- SetProtection(*char name; ulong mask)bool,
- UnLock(Lock_t lock)void,
- WaitForChar(Handle_t fd; ulong timeout)bool,
- Write(Handle_t fd; *byte buffer; ulong length)ulong,
-
- CreateProc(*char name; long pri; Segment_t seg; ulong stackSize)*MsgPort_t,
- DateStamp(*DateStamp_t ds)void,
- Delay(ulong timeout)void,
- DeviceProc(*char name)*MsgPort_t,
- Exit(ulong returnCode)void,
-
- Execute(*char commandString; Handle_t inputFd, outputFd)bool,
- LoadSeg(*char name)Segment_t,
- UnLoadSeg(Segment_t segment)bool;
-