home *** CD-ROM | disk | FTP | other *** search
/ Oakland CPM Archive / oakcpm.iso / sigm / vol136 / patch.yam < prev    next >
Encoding:
Text File  |  1984-04-29  |  1020 b   |  55 lines
  1. PATCHES TO DISABLE ACCESS TO SYSTEM FILES USING 'Y' FLAG
  2.  
  3.  
  4.     Why 'y'?......Well 'y' not......and it was free.
  5.  
  6.     ey    -   enables access to system files
  7.     dy    -   disables access to system files
  8.  
  9.     particularly useful if, as I have on my bios,
  10. user level 0 system files are PUBLIC to ALL user levels.
  11.     Dramatically reduces cluttering on a large disk by not
  12. (unless you wish to) allowing you to see system files.
  13.     By default system files do NOT exist for YAM.
  14.  
  15.  
  16.  
  17.  
  18. *** INTO YAM.H
  19.  
  20. FLAG Sysfil;        /* does YAM see system files? ('y' flag)  */
  21.  
  22.  
  23.  
  24. *** INTO YAM1.C
  25. *** PROC SETVAL()
  26.  
  27.         case 'y':
  28.             Sysfil=value;
  29.             break;
  30.  
  31.  
  32.  
  33. *** INTO YAM1.C
  34. *** PROC INIT()
  35.  
  36.         ......=Sysfil=FALSE;    add to existing ones.
  37.  
  38.  
  39.  
  40. *** INTO YAM7.C
  41. *** PROC E1XPAND()
  42.  
  43. #ifdef RESTRICTED
  44.         /* check for $SYS or tag bit on 2nd byte of filename (TAG2) */
  45.         if((pfcb->fname[1]&0200) ||(pfcb->ftype[1]&0200))
  46.             goto tryanother;
  47. #else
  48.         /* check for $SYS with Sysfil flag */
  49.         if((pfcb->ftype[1]&0200) && !Sysfil)
  50.             goto tryanother;
  51. #endif
  52.  
  53.  
  54. *
  55.