home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c082_122 / 5.ddi / CLIBSRC2.ZIP / WRITEA.CAS < prev   
Encoding:
Text File  |  1992-06-10  |  3.3 KB  |  109 lines
  1. /*-----------------------------------------------------------------------*
  2.  * filename - writea.cas
  3.  *
  4.  * function(s)
  5.  *    _write - write to a file (untranslated)
  6.  *-----------------------------------------------------------------------*/
  7.  
  8. /*
  9.  *      C/C++ Run Time Library - Version 5.0
  10.  *
  11.  *      Copyright (c) 1987, 1992 by Borland International
  12.  *      All Rights Reserved.
  13.  *
  14.  */
  15.  
  16.  
  17. #pragma inline
  18. #include <asmrules.h>
  19. #include <io.h>
  20. #include <fcntl.h>
  21. #include <_io.h>
  22. #include <RtlData.h>
  23.  
  24. /*-----------------------------------------------------------------------*
  25.  
  26. Name            _write - writes to a file
  27.  
  28. Usage           int _write(int handle, const void *buf, unsigned nbyte);
  29.  
  30. Prototype in    io.h
  31.  
  32. Description     Both write and _write are functions that write a
  33.                 buffer of data to the file or device named by the given
  34.                 handle.
  35.  
  36.                 handle is a file handle obtained from a creat, open, dup,
  37.                 dup2, or fcntl call.
  38.  
  39.                 These functions attempt to write nbyte bytes from the buffer
  40.                 pointed to by buf to the file associated with handle. Except
  41.                 when write is used to write to a text file, the number of
  42.                 bytes written to the file will be no more than the number
  43.                 requested.
  44.  
  45.                 On text files, when write sees a linefeed (LF) character, it
  46.                 outputs a CR-LF pair. _write does no such translation, since
  47.                 all of its files are binary files.
  48.  
  49.                 If the number of bytes actually written is less than that
  50.                 requested, the condition should be considered an error and
  51.                 probably indicates a full disk.
  52.  
  53.                 For disk or diskette files, writing always proceeds from the
  54.                 current file pointer (see lseek). For devices, bytes are directly
  55.                 sent to the device.
  56.  
  57.                 For files opened with the O_APPEND option, the file pointer is
  58.                 positioned to EOF by write (but not by _write) before writing
  59.                 the data.
  60.  
  61. Return value    The number of bytes written are returned by both
  62.                 functions. A write to a text file does not count generated
  63.                 carriage returns. In case of error, each function returns -1
  64.                 and sets the global variable errno to one of the following:
  65.  
  66.                     EACCES  Permission denied
  67.                     EBADF   Bad file number
  68.  
  69.  
  70. *------------------------------------------------------------------------*/
  71.  
  72. #ifdef _Windows
  73. extern void (*__WriteBufFPtr)(char *Buffer, unsigned Count);
  74. #endif
  75.  
  76. int _CType _FARFUNC _write(int fd, const void *buf, unsigned len)
  77. {
  78.     _QRTLDataBlock;
  79.  
  80.     if (_QRTLInstanceData(_openfd)[fd] & O_RDONLY)
  81.         return __IOerror(e_accessDenied);
  82.  
  83. #ifdef _Windows
  84.     if (__WriteBufFPtr)
  85.         if (isatty(fd))
  86.             {
  87.             __WriteBufFPtr((char *)buf, len);
  88.             return len;
  89.             }
  90. #endif
  91.     pushDS_
  92.     asm mov ah,40h
  93.     asm mov bx,fd
  94.     asm mov cx,len
  95.     asm LDS_    dx, buf
  96.     asm int 21h
  97.         popDS_
  98.     asm jc  _writeFailed
  99.     asm push    ax
  100.  
  101.     _QRTLInstanceData(_openfd) [fd] |= O_CHANGED;
  102.  
  103.     asm pop ax
  104.     return  _AX;
  105.  
  106. _writeFailed:
  107.     return __IOerror (_AX);
  108. }
  109.