home *** CD-ROM | disk | FTP | other *** search
/ Gold Fish 3 / goldfish_volume_3.bin / files / dev / obero / oberon-a / source / amiga / filesysres.mod < prev    next >
Encoding:
Text File  |  1995-06-29  |  2.6 KB  |  70 lines
  1. (***************************************************************************
  2.  
  3.      $RCSfile: FileSysRes.mod $
  4.   Description: Interface to FileSystem.resource
  5.  
  6.    Created by: fjc (Frank Copeland)
  7.     $Revision: 3.8 $
  8.       $Author: fjc $
  9.         $Date: 1995/06/04 23:13:14 $
  10.  
  11.   $VER: filesysres.h 36.4 (3.5.90)
  12.   Includes Release 40.15
  13.  
  14.   (C) Copyright 1985-1993 Commodore-Amiga, Inc.
  15.       All Rights Reserved
  16.  
  17.   Oberon-A interface Copyright © 1994-1995, Frank Copeland.
  18.   This file is part of the Oberon-A Interface.
  19.   See Oberon-A.doc for conditions of use and distribution.
  20.  
  21. ***************************************************************************)
  22.  
  23. <* STANDARD- *>
  24.  
  25. MODULE [2] FileSysRes;
  26.  
  27. IMPORT e := Exec, d := Dos, s := Sets;
  28.  
  29.  
  30. (*
  31. **      FileSystem.resource description
  32. *)
  33.  
  34. CONST
  35.  
  36.   fsrName * = "FileSystem.resource";
  37.  
  38. TYPE
  39.  
  40.   FileSysResourcePtr * = POINTER TO FileSysResource;
  41.   FileSysResource * = RECORD (e.NodeBase)
  42.     node *           : e.Node;    (* on resource list *)
  43.     creator *        : e.LSTRPTR; (* name of creator of this resource *)
  44.     fileSysEntries * : e.List;    (* list of FileSysEntry structs *)
  45.   END; (* FileSysResource *)
  46.  
  47.   FileSysEntryPtr * = POINTER TO FileSysEntry;
  48.   FileSysEntry * = RECORD (e.NodeBase)
  49.     node *       : e.Node;         (* on fsrFileSysEntries list *)
  50.                                    (* lnName is of creator of this entry *)
  51.     dosType *    : e.ULONG;        (* DosType of this FileSys *)
  52.     version *    : e.ULONG;        (* Version of this FileSys *)
  53.     patchFlags * : s.SET32;        (* bits set for those of the following that *)
  54.                                    (*   need to be substituted into a standard *)
  55.                                    (*   device node for this file system: e.g. *)
  56.                                    (*   180H for substitute SegList & GlobalVec *)
  57.     type *       : e.ULONG;        (* device node type: zero *)
  58.     task *       : e.TaskPtr;      (* standard dos "task" field *)
  59.     lock *       : d.FileLockPtr;  (* not used for devices: zero *)
  60.     handler *    : d.BSTR;         (* filename to loadseg (if SegList is null) *)
  61.     stackSize *  : e.ULONG;        (* stacksize to use when starting task *)
  62.     priority *   : LONGINT;        (* task priority when starting task *)
  63.     startup *    : e.BPTR;         (* startup msg: FileSysStartupMsg for disks *)
  64.     segList *    : e.BPTR;         (* code to run to start new task *)
  65.     globalVec *  : e.BPTR;         (* BCPL global vector when starting task *)
  66.     (* no more entries need exist than those implied by fsePatchFlags *)
  67.   END; (* FileSysEntry *)
  68.  
  69. END FileSysRes.
  70.