home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / pd_share / code / unixlib / !UnixLib / src / unix / c / mkdir < prev    next >
Encoding:
Text File  |  1994-09-30  |  481 b   |  35 lines

  1. static char sccs_id[] = "@(#) mkdir.c 1.2 " __DATE__ " HJR";
  2.  
  3. /* mkdir.c (c) Copyright 1990 H.Rogers */
  4.  
  5. #include <errno.h>
  6.  
  7. #include "sys/types.h"
  8. #include "sys/unix.h"
  9. #include "sys/os.h"
  10.  
  11. int
  12. mkdir (register char *dir)
  13. {
  14.   int r[6];
  15.   os_error *e;
  16.  
  17.   dir = __uname (dir, 1);
  18.  
  19.   if (!os_file (0x05, dir, r))
  20.     {
  21.       if (r[0])
  22.     {
  23.       errno = EEXIST;
  24.       return (-1);
  25.     }
  26.     }
  27.   if (e = os_file (0x08, dir, r))
  28.     {
  29.       __seterr (e);
  30.       return (-1);
  31.     }
  32.  
  33.   return (0);
  34. }
  35.