+ fixed doslibf.inc header, system unit should compile now on m68k at least

git-svn-id: trunk@5398 -

rtl/amiga/m68k/doslibf.inc

@@ -1,8 +1,11 @@
 {
     This file is part of the Free Pascal run time library.
-    Copyright (c) 2006 by Karoly Balogh
 
-    dos.library functions for AmigaOS 4.x/PowerPC
+    dos functions (V50) for MorphOS/PowerPC
+    Copyright (c) 2002 The MorphOS Development Team, All Rights Reserved.
+
+    Free Pascal conversion
+    Copyright (c) 2004 Karoly Balogh for Genesi S.a.r.l. <www.genesi.lu>
 
     See the file COPYING.FPC, included in this distribution,
     for details about the copyright.
@@ -13,51 +16,671 @@
 
  **********************************************************************}
 
-function Open(name: PChar; accessMode: longint): longint; syscall IDOS 76;
-function dosClose(_file: longint): boolean; syscall IDOS 80;
-function dosRead(_file: longint; buffer: Pointer; length: longint): longint; syscall IDOS 84;
-function dosWrite(_file: longint; buffer: Pointer; length: longint): longint; syscall IDOS 88;
-function dosInput: longint; syscall IDOS 92;
-function dosOutput: longint; syscall IDOS 96;
-function dosSeek(_file: longint;position: longint;offset: longint): longint; syscall IDOS 100;
-function dosDeleteFile(name: PChar): boolean; syscall IDOS 104;
-function dosRename(oldName: PChar;newName: PChar): boolean; syscall IDOS 108;
-function Lock(name: PChar;_type: longint): longint; syscall IDOS 112;
-procedure UnLock(lock: longint); syscall IDOS 116;
 
-function Examine(lock: longint; fileInfoBlock: PFileInfoBlock): boolean; syscall IDOS 124;
+{ dos.library functions }
+
+function Open(fname     : PChar   location 'd1';
+              accessMode: LongInt location 'd2'): LongInt;
+SysCall AOS_DOSBase 30;
+
+function dosClose(fileh: LongInt location 'd1'): Boolean;
+SysCall AOS_DOSBase 36;
+
+function dosRead(fileh : LongInt location 'd1';
+                 buffer: Pointer location 'd2';
+                 length: LongInt location 'd3'): LongInt;
+SysCall AOS_DOSBase 42;
+
+function dosWrite(fileh : LongInt location 'd1';
+                  buffer: Pointer location 'd2';
+                  length: LongInt location 'd3'): LongInt;
+SysCall AOS_DOSBase 48;
+
+function dosInput: LongInt;
+SysCall AOS_DOSBase 54;
+
+function dosOutput: LongInt;
+SysCall AOS_DOSBase 60;
+
+function dosSeek(fileh   : LongInt location 'd1';
+                 position: LongInt location 'd2';
+                 posmode : LongInt location 'd3'): LongInt;
+SysCall AOS_DOSBase 66;
+
+function dosDeleteFile(fname: PChar location 'd1'): Boolean;
+SysCall AOS_DOSBase 72;
+
+function dosRename(oldName: PChar location 'd1';
+                   newName: PChar location 'd2'): Boolean;
+SysCall AOS_DOSBase 78;
+
+function Lock(lname     : PChar   location 'd1';
+              accessMode: LongInt location 'd2'): LongInt;
+SysCall AOS_DOSBase 84;
+
+procedure Unlock(lock: LongInt location 'd1');
+SysCall AOS_DOSBase 90;
+
+function DupLock(lock: LongInt location 'd1'): LongInt;
+SysCall AOS_DOSBase 096;
+
+function Examine(lock         : LongInt        location 'd1';
+                 fileInfoBlock: PFileInfoBlock location 'd2'): Boolean;
+SysCall AOS_DOSBase 102;
+
+function ExNext(lock         : LongInt        location 'd1';
+                fileInfoBlock: PFileInfoBlock location 'd2'): LongInt;
+SysCall AOS_DOSBase 108;
+
+function Info(lock          : LongInt   location 'd1';
+              parameterBlock: PInfoData location 'd2'): Boolean;
+SysCall AOS_DOSBase 114;
+
+function dosCreateDir(dname: PChar location 'd1'): LongInt;
+SysCall AOS_DOSBase 120;
+
+function CurrentDir(lock: LongInt location 'd1'): LongInt;
+SysCall AOS_DOSBase 126;
+
+function IoErr: LongInt;
+SysCall AOS_DOSBase 132;
+
+function CreateProc(name     : PChar   location 'd1';
+                    pri      : LongInt location 'd2';
+                    segList  : LongInt location 'd3';
+                    stackSize: LongInt location 'd4'): PMsgPort;
+SysCall AOS_DOSBase 138;
+
+procedure dosExit(returnCode: LongInt location 'd1');
+SysCall AOS_DOSBase 144;
+
+function LoadSeg(name: PChar location 'd1'): LongInt;
+SysCall AOS_DOSBase 150;
+
+procedure UnLoadSeg(seglist: LongInt location 'd1');
+SysCall AOS_DOSBase 156;
+
+function DeviceProc(name: PChar location 'd1'): PMsgPort;
+SysCall AOS_DOSBase 174;
+
+function SetComment(name   : PChar location 'd1';
+                    comment: PChar location 'd2'): Boolean;
+SysCall AOS_DOSBase 180;
+
+function SetProtection(name: PChar   location 'd1';
+                       mask: LongInt location 'd2'): Boolean;
+SysCall AOS_DOSBase 186;
+
+function DateStamp(date: PDateStamp location 'd1'): PDateStamp;
+SysCall AOS_DOSBase 192;
+
+procedure Delay(timeout: LongInt location 'd1');
+SysCall AOS_DOSBase 198;
+
+function WaitForChar(file1  : LongInt location 'd1';
+                     timeout: LongInt location 'd2'): Boolean;
+SysCall AOS_DOSBase 204;
+
+function ParentDir(lock: LongInt location 'd1'): LongInt;
+SysCall AOS_DOSBase 210;
+
+function IsInteractive(file1: LongInt location 'd1'): Boolean;
+SysCall AOS_DOSBase 216;
+
+function Execute(string1: PChar   location 'd1';
+                 file1  : LongInt location 'd2';
+                 file2  : LongInt location 'd3'): Boolean;
+SysCall AOS_DOSBase 222;
+
+function AllocDosObject(type1: Cardinal location 'd1';
+                        tags : PTagItem location 'd2'): Pointer;
+SysCall AOS_DOSBase 228;
+
+function AllocDosObjectTagList(type1: Cardinal location 'd1';
+                               tags : PTagItem location 'd2'): Pointer;
+SysCall AOS_DOSBase 228;
+
+procedure FreeDosObject(type1: Cardinal location 'd1';
+                        ptr  : Pointer  location 'd2');
+SysCall AOS_DOSBase 234;
+
+function DoPkt(port  : PMsgPort location 'd1';
+               action: LongInt  location 'd2';
+               arg1  : LongInt  location 'd3';
+               arg2  : LongInt  location 'd4';
+               arg3  : LongInt  location 'd5';
+               arg4  : LongInt  location 'd6';
+               arg5  : LongInt  location 'd7'): LongInt;
+SysCall AOS_DOSBase 240;
+
+function DoPkt0(port  : PMsgPort location 'd1';
+                action: LongInt  location 'd2'): LongInt;
+SysCall AOS_DOSBase 240;
+
+function DoPkt1(port  : PMsgPort location 'd1';
+                action: LongInt  location 'd2';
+                arg1  : LongInt  location 'd3'): LongInt;
+SysCall AOS_DOSBase 240;
+
+function DoPkt2(port  : PMsgPort location 'd1';
+                action: LongInt  location 'd2';
+                arg1  : LongInt  location 'd3';
+                arg2  : LongInt  location 'd4'): LongInt;
+SysCall AOS_DOSBase 240;
+
+function DoPkt3(port  : PMsgPort location 'd1';
+                action: LongInt  location 'd2';
+                arg1  : LongInt  location 'd3';
+                arg2  : LongInt  location 'd4';
+                arg3  : LongInt  location 'd5'): LongInt;
+SysCall AOS_DOSBase 240;
+
+function DoPkt4(port  : PMsgPort location 'd1';
+                action: LongInt  location 'd2';
+                arg1  : LongInt  location 'd3';
+                arg2  : LongInt  location 'd4';
+                arg3  : LongInt  location 'd5';
+                arg4  : LongInt  location 'd6'): LongInt;
+SysCall AOS_DOSBase 240;
+
+procedure SendPkt(dp       : PDosPacket location 'd1';
+                  port     : PMsgPort   location 'd2';
+                  replyport: PMsgPort   location 'd3');
+SysCall AOS_DOSBase 246;
+
+function WaitPkt: PDosPacket;
+SysCall AOS_DOSBase 252;
+
+procedure ReplyPkt(dp  : PDosPacket location 'd1';
+                   res1: LongInt    location 'd2';
+                   res2: LongInt    location 'd3');
+SysCall AOS_DOSBase 258;
+
+procedure AbortPkt(port: PMsgPort   location 'd1';
+                   pkt : PDosPacket location 'd2');
+SysCall AOS_DOSBase 264;
+
+function LockRecord(fh     : LongInt  location 'd1';
+                    offset : Cardinal location 'd2';
+                    length : Cardinal location 'd3';
+                    mode   : Cardinal location 'd4';
+                    timeout: Cardinal location 'd5'): Boolean;
+SysCall AOS_DOSBase 270;
+
+function LockRecords(recArray: PRecordLock location 'd1';
+                     timeout : Cardinal    location 'd2'): Boolean;
+SysCall AOS_DOSBase 276;
+
+function UnLockRecord(fh    : LongInt  location 'd1';
+                      offset: Cardinal location 'd2';
+                      length: Cardinal location 'd3'): Boolean;
+SysCall AOS_DOSBase 282;
+
+function UnLockRecords(recArray: PRecordLock location 'd1'): Boolean;
+SysCall AOS_DOSBase 288;
+
+function SelectInput(fh: LongInt location 'd1'): LongInt;
+SysCall AOS_DOSBase 294;
+
+function SelectOutput(fh: LongInt location 'd1'): LongInt;
+SysCall AOS_DOSBase 300;
+
+function FGetC(fh: LongInt location 'd1'): LongInt;
+SysCall AOS_DOSBase 306;
+
+function FPutC(fh: LongInt location 'd1';
+               ch: LongInt location 'd2'): LongInt;
+SysCall AOS_DOSBase 312;
+
+function UnGetC(fh       : LongInt location 'd1';
+                character: LongInt location 'd2'): LongInt;
+SysCall AOS_DOSBase 318;
+
+function FRead(fh      : LongInt  location 'd1';
+               block   : Pointer  location 'd2';
+               blocklen: Cardinal location 'd3';
+               number  : Cardinal location 'd4'): LongInt;
+SysCall AOS_DOSBase 324;
+
+function FWrite(fh      : LongInt  location 'd1';
+                block   : Pointer  location 'd2';
+                blocklen: Cardinal location 'd3';
+                number  : Cardinal location 'd4'): LongInt;
+SysCall AOS_DOSBase 330;
+
+function FGets(fh    : LongInt  location 'd1';
+               buf   : PChar    location 'd2';
+               buflen: Cardinal location 'd3'): PChar;
+SysCall AOS_DOSBase 336;
+
+function FPuts(fh : LongInt location 'd1';
+               str: PChar   location 'd2'): LongInt;
+SysCall AOS_DOSBase 342;
+
+procedure VFWritef(fh      : LongInt location 'd1';
+                   format  : PChar   location 'd2';
+                   argarray: Pointer location 'd3');
+SysCall AOS_DOSBase 348;
+
+function VFPrintf(fh      : LongInt location 'd1';
+                  format  : PChar   location 'd2';
+                  argarray: Pointer location 'd3'): LongInt;
+SysCall AOS_DOSBase 354;
+
+function dosFlush(fh: LongInt location 'd1'): LongInt;
+SysCall AOS_DOSBase 360;
+
+function SetVBuf(fh   : LongInt location 'd1';
+                 buff : PChar   location 'd2';
+                 type1: LongInt location 'd3';
+                 size : LongInt location 'd4'): LongInt;
+SysCall AOS_DOSBase 366;
+
+function DupLockFromFH(fh: LongInt location 'd1'): LongInt;
+SysCall AOS_DOSBase 372;
+
+function OpenFromLock(lock: LongInt location 'd1'): LongInt;
+SysCall AOS_DOSBase 378;
+
+function ParentOfFH(fh: LongInt location 'd1'): LongInt;
+SysCall AOS_DOSBase 384;
+
+function ExamineFH(fh : LongInt        location 'd1';
+                   fib: PFileInfoBlock location 'd2'): Boolean;
+SysCall AOS_DOSBase 390;
+
+function SetFileDate(name: PChar      location 'd1';
+                     date: PDateStamp location 'd2'): Boolean;
+SysCall AOS_DOSBase 396;
+
+function NameFromLock(lock  : LongInt location 'd1';
+                      buffer: PChar   location 'd2';
+                      len   : LongInt location 'd3'): Boolean;
+SysCall AOS_DOSBase 402;
+
+function NameFromFH(fh    : LongInt location 'd1';
+                    buffer: PChar   location 'd2';
+                    len   : LongInt location 'd3'): LongInt;
+SysCall AOS_DOSBase 408;
+
+function SplitName(name     : PChar    location 'd1';
+                   separator: Cardinal location 'd2';
+                   buf      : PChar    location 'd3';
+                   oldpos   : LongInt  location 'd4';
+                   size     : LongInt  location 'd5'): SmallInt;
+SysCall AOS_DOSBase 414;
+
+function SameLock(lock1: LongInt location 'd1';
+                  lock2: LongInt location 'd2'): LongInt;
+SysCall AOS_DOSBase 420;
+
+function SetMode(fh  : LongInt location 'd1';
+                 mode: LongInt location 'd2'): LongInt;
+SysCall AOS_DOSBase 426;
+
+function ExAll(lock   : LongInt       location 'd1';
+               buffer : PExAllData    location 'd2';
+               size   : LongInt       location 'd3';
+               data   : LongInt       location 'd4';
+               control: PExAllControl location 'd5'): Boolean;
+SysCall AOS_DOSBase 432;
+
+function ReadLink(port  : PMsgPort location 'd1';
+                  lock  : LongInt  location 'd2';
+                  path  : PChar    location 'd3';
+                  buffer: PChar    location 'd4';
+                  size  : Cardinal location 'd5'): Boolean;
+SysCall AOS_DOSBase 438;
+
+function MakeLink(name: PChar   location 'd1';
+                  dest: LongInt location 'd2';
+                  soft: LongInt location 'd3'): Boolean;
+SysCall AOS_DOSBase 444;
+
+function ChangeMode(type1  : LongInt location 'd1';
+                    fh     : LongInt location 'd2';
+                    newmode: LongInt location 'd3'): Boolean;
+SysCall AOS_DOSBase 450;
+
+function SetFileSize(fh  : LongInt location 'd1';
+                     pos : LongInt location 'd2';
+                     mode: LongInt location 'd3'): LongInt;
+SysCall AOS_DOSBase 456;
+
+function SetIoErr(result: LongInt location 'd1'): LongInt;
+SysCall AOS_DOSBase 462;
+
+function Fault(code  : LongInt location 'd1';
+               header: PChar   location 'd2';
+               buffer: PChar   location 'd3';
+               len   : LongInt location 'd4'): Boolean;
+SysCall AOS_DOSBase 468;
+
+function PrintFault(code  : LongInt location 'd1';
+                    header: PChar   location 'd2'): Boolean;
+SysCall AOS_DOSBase 474;
+
+function ErrorReport(code  : LongInt  location 'd1';
+                     type1 : LongInt  location 'd2';
+                     arg1  : Cardinal location 'd3';
+                     device: PMsgPort location 'd4'): Boolean;
+SysCall AOS_DOSBase 480;
+
+function Cli: PCommandLineInterface;
+SysCall AOS_DOSBase 492;
+
+function CreateNewProc(tags: PTagItem location 'd1'): PProcess;
+SysCall AOS_DOSBase 498;
+
+function CreateNewProcTagList(tags: PTagItem location 'd1'): PProcess;
+SysCall AOS_DOSBase 498;
+
+function RunCommand(seg     : LongInt location 'd1';
+                    stack   : LongInt location 'd2';
+                    paramptr: PChar   location 'd3';
+                    paramlen: LongInt location 'd4'): LongInt;
+SysCall AOS_DOSBase 504;
+
+function GetConsoleTask: PMsgPort;
+SysCall AOS_DOSBase 510;
+
+function SetConsoleTask(task: PMsgPort location 'd1'): PMsgPort;
+SysCall AOS_DOSBase 516;
+
+function GetFileSysTask: PMsgPort;
+SysCall AOS_DOSBase 522;
+
+function SetFileSysTask(task: PMsgPort location 'd1'): PMsgPort;
+SysCall AOS_DOSBase 528;
+
+function GetArgStr: PChar;
+SysCall AOS_DOSBase 534;
+
+function SetArgStr(str: PChar location 'd1'): Boolean;
+SysCall AOS_DOSBase 540;
+
+function FindCliProc(num: Cardinal location 'd1'): PProcess;
+SysCall AOS_DOSBase 546;
+
+function MaxCli: Cardinal;
+SysCall AOS_DOSBase 552;
+
+function SetCurrentDirName(name: PChar location 'd1'): Boolean;
+SysCall AOS_DOSBase 558;
+
+function GetCurrentDirName(buf: PChar   location 'd1';
+                           len: LongInt location 'd2'): Boolean;
+SysCall AOS_DOSBase 564;
+
+function SetProgramName(name: PChar location 'd1'): Boolean;
+SysCall AOS_DOSBase 570;
+
+function GetProgramName(buf: PChar   location 'd1';
+                        len: LongInt location 'd2'): Boolean;
+SysCall AOS_DOSBase 576;
+
+function SetPrompt(name: PChar location 'd1'): Boolean;
+SysCall AOS_DOSBase 582;
+
+function GetPrompt(buf: PChar   location 'd1';
+                   len: LongInt location 'd2'): Boolean;
+SysCall AOS_DOSBase 588;
+
+function SetProgramDir(lock: LongInt location 'd1'): LongInt;
+SysCall AOS_DOSBase 594;
+
+function GetProgramDir: LongInt;
+SysCall AOS_DOSBase 600;
+
+function SystemTagList(command: PChar    location 'd1';
+                       tags   : PTagItem location 'd2'): LongInt;
+SysCall AOS_DOSBase 606;
+
+function dosSystem(command: PChar    location 'd1';
+                   tags   : PTagItem location 'd2'): LongInt;
+SysCall AOS_DOSBase 606;
+
+function AssignLock(name: PChar   location 'd1';
+                    lock: LongInt location 'd2'): Boolean;
+SysCall AOS_DOSBase 612;
+
+function AssignLate(name: PChar location 'd1';
+                    path: PChar location 'd2'): Boolean;
+SysCall AOS_DOSBase 618;
+
+function AssignPath(name: PChar location 'd1';
+                    path: PChar location 'd2'): Boolean;
+SysCall AOS_DOSBase 624;
+
+function AssignAdd(name: PChar   location 'd1';
+                   lock: LongInt location 'd2'): Boolean;
+SysCall AOS_DOSBase 630;
+
+function RemAssignList(name: PChar   location 'd1';
+                       lock: LongInt location 'd2'): Boolean;
+SysCall AOS_DOSBase 636;
+
+function GetDeviceProc(name: PChar    location 'd1';
+                       dp  : PDevProc location 'd2'): PDevProc;
+SysCall AOS_DOSBase 642;
+
+procedure FreeDeviceProc(dp: PDevProc location 'd1');
+SysCall AOS_DOSBase 648;
+
+function LockDosList(flags: Cardinal location 'd1'): PDosList;
+SysCall AOS_DOSBase 654;
+
+procedure UnLockDosList(flags: Cardinal location 'd1');
+SysCall AOS_DOSBase 660;
+
+function AttemptLockDosList(flags: Cardinal location 'd1'): PDosList;
+SysCall AOS_DOSBase 666;
+
+function RemDosEntry(dlist: PDosList location 'd1'): Boolean;
+SysCall AOS_DOSBase 672;
+
+function AddDosEntry(dlist: PDosList location 'd1'): LongInt;
+SysCall AOS_DOSBase 678;
+
+function FindDosEntry(dlist: PDosList location 'd1';
+                      name : PChar    location 'd2';
+                      flags: Cardinal location 'd3'): PDosList;
+SysCall AOS_DOSBase 684;
+
+function NextDosEntry(dlist: PDosList location 'd1';
+                      flags: Cardinal location 'd2'): PDosList;
+SysCall AOS_DOSBase 690;
+
+function MakeDosEntry(name : PChar   location 'd1';
+                      type1: LongInt location 'd2'): PDosList;
+SysCall AOS_DOSBase 696;
+
+procedure FreeDosEntry(dlist: PDosList location 'd1');
+SysCall AOS_DOSBase 702;
+
+function IsFileSystem(name: PChar location 'd1'): Boolean;
+SysCall AOS_DOSBase 708;
+
+function Format(filesystem: PChar    location 'd1';
+                volumename: PChar    location 'd2';
+                dostype   : Cardinal location 'd3'): Boolean;
+SysCall AOS_DOSBase 714;
+
+function Relabel(drive  : PChar location 'd1';
+                 newname: PChar location 'd2'): Boolean;
+SysCall AOS_DOSBase 720;
+
+function Inhibit(name : PChar   location 'd1';
+                 onoff: LongInt location 'd2'): Boolean;
+SysCall AOS_DOSBase 726;
+
+function AddBuffers(name  : PChar   location 'd1';
+                    number: LongInt location 'd2'): Boolean;
+SysCall AOS_DOSBase 732;
+
+function CompareDates(date1: PDateStamp location 'd1';
+                      date2: PDateStamp location 'd2'): LongInt;
+SysCall AOS_DOSBase 738;
+
+function DateToStr(datetime: _PDateTime location 'd1'): Boolean;
+SysCall AOS_DOSBase 744;
+
+function StrToDate(datetime: _PDateTime location 'd1'): Boolean;
+SysCall AOS_DOSBase 750;
+
+function InternalLoadSeg(fh           : LongInt location 'd0';
+                         table        : LongInt location 'a0';
+                         var funcarray: LongInt location 'a1';
+                         var stack    : LongInt location 'a2'): LongInt;
+SysCall AOS_DOSBase 756;
+
+function NewLoadSeg(file1: PChar    location 'd1';
+                    tags : PTagItem location 'd2'): LongInt;
+SysCall AOS_DOSBase 768;
+
+function NewLoadSegTagList(file1: PChar    location 'd1';
+                           tags : PTagItem location 'd2'): LongInt;
+SysCall AOS_DOSBase 768;
+
+function AddSegment(name  : PChar   location 'd1';
+                    seg   : LongInt location 'd2';
+                    system: LongInt location 'd3'): Boolean;
+SysCall AOS_DOSBase 774;
+
+function FindSegment(name  : PChar    location 'd1';
+                     seg   : PSegment location 'd2';
+                     system: LongInt  location 'd3'): PSegment;
+SysCall AOS_DOSBase 780;
+
+function RemSegment(seg: PSegment location 'd1'): Boolean;
+SysCall AOS_DOSBase 786;
+
+function CheckSignal(mask: LongInt location 'd1'): LongInt;
+SysCall AOS_DOSBase 792;
+
+function ReadArgs(arg_template: PChar   location 'd1';
+                  var array1  : LongInt location 'd2';
+                  args        : PRDArgs location 'd3'): PRDArgs;
+SysCall AOS_DOSBase 798;
+
+function FindArg(keyword     : PChar location 'd1';
+                 arg_template: PChar location 'd2'): LongInt;
+SysCall AOS_DOSBase 804;
+
+function ReadItem(name    : PChar    location 'd1';
+                  maxchars: LongInt  location 'd2';
+                  cSource : PCSource location 'd3'): LongInt;
+SysCall AOS_DOSBase 810;
+
+function StrToLong(string1  : PChar   location 'd1';
+                   var value: LongInt location 'd2'): LongInt;
+SysCall AOS_DOSBase 816;
+
+function MatchFirst(pat   : PChar       location 'd1';
+                    anchor: PAnchorPath location 'd2'): LongInt;
+SysCall AOS_DOSBase 822;
+
+function MatchNext(anchor: PAnchorPath location 'd1'): LongInt;
+SysCall AOS_DOSBase 828;
+
+procedure MatchEnd(anchor: PAnchorPath location 'd1');
+SysCall AOS_DOSBase 834;
+
+function ParsePattern(pat   : PChar   location 'd1';
+                      buf   : PChar   location 'd2';
+                      buflen: LongInt location 'd3'): LongInt;
+SysCall AOS_DOSBase 840;
+
+function MatchPattern(pat: PChar location 'd1';
+                      str: PChar location 'd2'): Boolean;
+SysCall AOS_DOSBase 846;
+
+procedure FreeArgs(args: pRDArgs location 'd1');
+SysCall AOS_DOSBase 858;
+
+function FilePart(path: PChar location 'd1'): PChar;
+SysCall AOS_DOSBase 870;
+
+function PathPart(path: PChar location 'd1'): PChar;
+SysCall AOS_DOSBase 876;
+
+function AddPart(dirname: PChar    location 'd1';
+                filename: PChar    location 'd2';
+                size    : Cardinal location 'd3'): Boolean;
+SysCall AOS_DOSBase 882;
+
+function StartNotify(notify: PNotifyRequest location 'd1'): Boolean;
+SysCall AOS_DOSBase 888;
+
+procedure EndNotify(notify: PNotifyRequest location 'd1');
+SysCall AOS_DOSBase 894;
+
+function SetVar(name  : PChar   location 'd1';
+                buffer: PChar   location 'd2';
+                size  : LongInt location 'd3';
+                flags : LongInt location 'd4'): Boolean;
+SysCall AOS_DOSBase 900;
+
+function GetVar(name  : PChar   location 'd1';
+                buffer: PChar   location 'd2';
+                size  : LongInt location 'd3';
+                flags : LongInt location 'd4'): LongInt;
+SysCall AOS_DOSBase 906;
+
+function DeleteVar(name : PChar    location 'd1';
+                   flags: Cardinal location 'd2'): Boolean;
+SysCall AOS_DOSBase 912;
+
+function FindVar(name : PChar    location 'd1';
+                 type1: Cardinal location 'd2'): PLocalVar;
+SysCall AOS_DOSBase 918;
+
+function CliInitNewcli(dp: PDosPacket location 'a0'): LongInt;
+SysCall AOS_DOSBase 930;
+
+function CliInitRun(dp: PDosPacket location 'a0'): LongInt;
+SysCall AOS_DOSBase 936;
+
+function WriteChars(buf   : PChar    location 'd1';
+                    buflen: Cardinal location 'd2'): LongInt;
+SysCall AOS_DOSBase 942;
 
-function Info(lock: longint; parameterBlock: PInfoData): boolean; syscall IDOS 132;
-function dosCreateDir(name: PChar): longint; syscall IDOS 136;
-function CurrentDir(lock: longint): longint; syscall IDOS 140;
-function IoErr: longint; syscall IDOS 144;
+function PutStr(str: PChar location 'd1'): LongInt;
+SysCall AOS_DOSBase 948;
 
-function SetProtection(name: PChar; protect: longword): boolean; syscall IDOS 180;
-function DateStamp(date: PDateStamp): PDateStamp; syscall IDOS 184;
+function VPrintf(format  : PChar   location 'd1';
+                 argarray: Pointer location 'd2'): LongInt;
+SysCall AOS_DOSBase 954;
 
-function SetFileDate(name: PChar; date: PDateStamp): boolean; syscall IDOS 356;
-function NameFromLock(lock: longint; buffer: PChar; len: longint): boolean; syscall IDOS 360;
-function NameFromFH(fh: longint; buffer: PChar; len: longint): longint; syscall IDOS 364;
+function ParsePatternNoCase(pat   : PChar   location 'd1';
+                            buf   : PChar   location 'd2';
+                            buflen: LongInt location 'd3'): LongInt;
+SysCall AOS_DOSBase 966;
 
-function SetFileSize(fh: longint; pos: longint; mode: longint): longint; syscall IDOS 396;
+function MatchPatternNoCase(pat: PChar location 'd1';
+                            str: PChar location 'd2'): Boolean;
+SysCall AOS_DOSBase 972;
 
-function GetArgStr: PChar; syscall IDOS 456;
-function SetArgStr(_string: PChar): PChar; syscall IDOS 460;
+function SameDevice(lock1: LongInt location 'd1';
+                    lock2: LongInt location 'd2'): Boolean;
+SysCall AOS_DOSBase 984;
 
-function GetCurrentDirName(buf: PChar; len: longint): boolean; syscall IDOS 476;
+procedure ExAllEnd(lock   : LongInt       location 'd1';
+                   buffer : PExAllData    location 'd2';
+                   size   : LongInt       location 'd3';
+                   data   : LongInt       location 'd4';
+                   control: PExAllControl location 'd5');
+SysCall AOS_DOSBase 990;
 
-function GetProgramName(buf: PChar; len: longint): boolean; syscall IDOS 484;
+function SetOwner(name      : PChar   location 'd1';
+                  owner_info: LongInt location 'd2'): Boolean;
+SysCall AOS_DOSBase 996;
 
-function GetProgramDir: longint; syscall IDOS 500;
-function SystemTagList(command: PChar; tags: PTagItem): longint; syscall IDOS 504;
+function AddSegmentTagList(tags: PTagItem location 'a0'): LongInt;
+SysCall AOS_DOSBase 1002;
 
-function LockDosList(flags: longword): PDosList; syscall IDOS 544;
-procedure UnLockDosList(flags: longword); syscall IDOS 548;
+function FindSegmentTagList(tags: PTagItem location 'a0'): PSegment;
+SysCall AOS_DOSBase 1008;
 
-function NextDosEntry(dlist: PDosList; flags: longword): PDosList; syscall IDOS 568;
 
-function MatchFirst(pat: PChar; anchor: PAnchorPath): longint; syscall IDOS 664;
-function MatchNext(anchor: PAnchorPath): longint; syscall IDOS 668;
-procedure MatchEnd(anchor: PAnchorPath); syscall IDOS 672;
 
-function GetVar(name: PChar; buffer: PChar; size: longint; flags: longword): longint; syscall IDOS 720;