开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 操作系统开发 > 查看源码
curdir.c
资源名称：DOS系统的源代码.rar　[点击查看]
上传用户：xiaoan1112
上传日期：2013-04-11
资源大小：19621k
文件大小：2k
源码类别：

操作系统开发

开发平台：

Visual C++

curdir.c：源码内容
  1. /* return text of current directory
  2.  *
  3.  *  Modifications:
  4.  *
  5.  * 29-Oct-1986 mz Lower case output
  6.  * 09-Dec-1986 bw Added DOS 5 support.
  7.  * 30-Oct-1987 bw Change 'DOS5' to 'OS2'
  8.  * 20-Nov-1987 bw Set errno to 19 for invalid drive
  9.  * 03-Mar-1989 bw Set C RTL _doserrno in OS/2.
  10.  * 05-Jul-1989 bw use MAXPATHLEN
  11.  *
  12.  */
  13. #if defined(NT)
  14. #define INCL_DOSERRORS
  15. #include <windows.h>
  16. #elif defined(OS2)
  17. #define INCL_DOSERRORS
  18. #include <os2.h>
  19. #elif defined(DOS)
  20. #include <dos.h>
  21. #endif
  23. #include <stdlib.h>
  24. #include <string.h>
  26. #include "..htools.h"
  28. int curdir (
  29. char *buf,
  30. char drive
  31. ) {
  32. #if defined(DOS)
  34.     union REGS regs;
  35. #if ( defined(M_I86CM) || defined (M_I86LM) || defined (M_I86HM) )
  36.     struct SREGS sregs;
  37. #endif
  39.     /* stick in drive */
  40.     if (drive == 0) {
  41. regs.h.ah = 0x19;
  42. intdos (&regs, &regs);
  43. drive = (char) (regs.h.al + 1);
  44. }
  45.     *buf++ = (char) ('a' + drive - 1);
  46.     *buf++ = ':';
  47.     if (fSwitChr ('/')) *buf++ = '\' ; else *buf++ =  '/';
  48.     // *buf++ = fSwitChr ('/') ? '\' : '/';
  50.     // Get current dir. intdosx(), segread() are used to
  51.     // correctly load segment registers (ds) depending upon
  52.     // the "model".
  54.     regs.h.ah = 0x47;
  55.     regs.h.dl = drive;
  56. #if (defined(M_I86CM) || defined(M_I86LM) || defined(M_I86LM))
  57.     segread( &sregs);
  58.     sregs.ds = FP_SEG(buf);
  59.     regs.x.si = FP_OFF(buf);
  60.     intdosx(&regs, &regs, &sregs);
  61. #else
  62.     regs.x.si = (unsigned) buf;
  63.     intdos (&regs, &regs);
  64. #endif
  65.     if (!regs.x.cflag)
  66. strlwr (buf);
  67.     else
  68. errno = 19;
  69.     return regs.x.cflag;
  71. #elif defined(OS2)
  73.     int  DirPathLen = MAXPATHLEN;
  74.     long LogicalDriveMap;
  76.     if (drive == 0)
  77.     {
  78. DosQCurDisk( (PUSHORT)&drive , (PULONG)&LogicalDriveMap );
  79.     }
  81.     *buf++ = (char) ('a' + drive - 1);
  82.     *buf++ = ':';
  83.     if (fSwitChr ('/')) *buf++ = '\' ; else *buf++ =  '/';
  84.     // *buf++ = fSwitChr ('/') ? '\' : '/';
  86.     if (_doserrno = DosQCurDir( drive, buf, (PUSHORT)&DirPathLen ))
  87.     {
  88. switch (_doserrno) {
  89.     case ERROR_INVALID_DRIVE:
  90. errno = 19;
  91. break;
  92.     case ERROR_BUFFER_OVERFLOW:
  93. errno = 33;
  94. break;
  95.     default:
  96. break;
  97.     }
  98. return 1;
  99.     }
  100.     pname (buf - 3);
  101.     return 0;
  103. #elif defined(NT)
  105.     DWORD dwLength;
  107.     //assert( !drive );
  108.     drive; //NT doesn't use the concept internally
  110.     dwLength = GetCurrentDirectory( MAXPATHLEN, (LPSTR)buf );
  112.     return( !dwLength );
  114. #endif
  115. }