home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Misc / OB3.2D3.DMS / in.adf / Interfaces / FileSysRes.mod < prev    next >
Encoding:
Text File  |  1992-11-02  |  2.3 KB  |  50 lines
  1. (*-------------------------------------------------------------------------*)
  2. (*                                                                         *)
  3. (*  Amiga Oberon Interface Module:                    Date: 02-Nov-92      *)
  4. (*                                                                         *)
  5. (*   © 1992 by Fridtjof Siebert                                            *)
  6. (*                                                                         *)
  7. (*-------------------------------------------------------------------------*)
  8.  
  9. MODULE FileSysRes;   (* $Implementation- *)
  10.  
  11. IMPORT e * := Exec,
  12.        d * := Dos;
  13.  
  14. CONST
  15.   fsrName * = "FileSystem.resource";
  16.  
  17. TYPE
  18.   FileSysResourcePtr * = UNTRACED POINTER TO FileSysResource;
  19.   FileSysResource * = STRUCT (node * : e.Node)   (* on resource list *)
  20.     creator * : e.STRPTR;          (* name of creator of this resource *)
  21.     fileSysEntries * : e.List;     (* list of FileSysEntry structs *)
  22.   END;
  23.  
  24.  
  25.   FileSysEntryPtr * = UNTRACED POINTER TO FileSysEntry;
  26.   FileSysEntry * = STRUCT (node * : e.Node)
  27.                                 (* on fsr_FileSysEntries list *)
  28.                                 (* ln_Name is of creator of this entry *)
  29.     dosType * : LONGINT;        (* DosType of this FileSys *)
  30.     version * : LONGINT;        (* Version of this FileSys *)
  31.     patchFlags * : LONGSET;     (* bits set for those of the following that *)
  32.                                 (*   need to be substituted into a standard *)
  33.                                 (*   device node for this file system: e.g. *)
  34.                                 (*   0x180 for substitute SegList & GlobalVec *)
  35.     type * : LONGINT;           (* device node type: zero *)
  36.     task * : e.TaskPtr;         (* standard dos "task" field *)
  37.     lock * : d.FileLockPtr;     (* not used for devices: zero *)
  38.     handler * : d.BSTR;         (* filename to loadseg (if SegList is null) *)
  39.     stackSize * : LONGINT;      (* stacksize to use when starting task *)
  40.     priority * : LONGINT;       (* task priority when starting task *)
  41.     startup * : e.BPTR;         (* startup msg: FileSysStartupMsg for disks *)
  42.     segList * : e.BPTR;         (* code to run to start new task *)
  43.     globalVec * : e.BPTR;       (* BCPL global vector when starting task *)
  44.     (* no more entries need exist than those implied by fse_PatchFlags *)
  45.   END;
  46.  
  47. END FileSysRes.
  48.  
  49.  
  50.