nightmaremail

Unnamed repository; edit this file 'description' to name the repository.
Log | Files | Refs

instpackage.c (344B)


      1 #include "hier.h"
      2 
      3 #include <sys/stat.h>
      4 #include <stddef.h>
      5 #include "open.h"
      6 #include "strerr.h"
      7 
      8 #define FATAL "instpackage: fatal: "
      9 
     10 extern int fdsourcedir;
     11 
     12 int main(void)
     13 {
     14   fdsourcedir = open_read(".");
     15   if (fdsourcedir == -1)
     16     strerr_die2sys(111,FATAL,"unable to open current directory: ");
     17 
     18   umask(077);
     19   hier();
     20   return 0;
     21 }