update CLib

git-svn-id: svn://kolibrios.org@614 a494cfbc-eb01-0410-851d-a64ba20cac60
2007-08-28 10:31:46 +00:00
parent 52facee6d5
commit 3be3768ce0
98 changed files with 9908 additions and 0 deletions
--- a/watcom/trunk/clib/streamio/flush.c
+++ b/watcom/trunk/clib/streamio/flush.c
@@ -0,0 +1,113 @@
+/****************************************************************************
+*
+*                            Open Watcom Project
+*
+*    Portions Copyright (c) 1983-2002 Sybase, Inc. All Rights Reserved.
+*
+*  ========================================================================
+*
+*    This file contains Original Code and/or Modifications of Original
+*    Code as defined in and that are subject to the Sybase Open Watcom
+*    Public License version 1.0 (the 'License'). You may not use this file
+*    except in compliance with the License. BY USING THIS FILE YOU AGREE TO
+*    ALL TERMS AND CONDITIONS OF THE LICENSE. A copy of the License is
+*    provided with the Original Code and Modifications, and is also
+*    available at www.sybase.com/developer/opensource.
+*
+*    The Original Code and all software distributed under the License are
+*    distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
+*    EXPRESS OR IMPLIED, AND SYBASE AND ALL CONTRIBUTORS HEREBY DISCLAIM
+*    ALL SUCH WARRANTIES, INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF
+*    MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR
+*    NON-INFRINGEMENT. Please see the License for the specific language
+*    governing rights and limitations under the License.
+*
+*  ========================================================================
+*
+* Description:  Implementation of fflush() helper routine.
+*
+****************************************************************************/
+
+
+#include "variety.h"
+#include <stdio.h>
+#include <unistd.h>
+#include <errno.h>
+#include <fcntl.h>
+#include "fileacc.h"
+#include "rtdata.h"
+#include "seterrno.h"
+#include "qwrite.h"
+#include "lseek.h"
+#include "flush.h"
+
+#if defined( __NETWARE__ ) && defined( _THIN_LIB )
+
+/* Take flush from LibC */
+_WCRTLINK int __flush( FILE *fp )
+{
+    return( fflush( fp ) );
+}
+
+#else
+
+_WCRTLINK int __flush( FILE *fp )
+{
+    int         len;
+    long        offset;
+    int         ret;
+    char        *ptr;
+    unsigned    amount;
+
+    ret = 0;
+    _AccessFile( fp );
+    if( fp->_flag & _DIRTY ) {
+        fp->_flag &= ~_DIRTY;
+        if( (fp->_flag & _WRITE) && (_FP_BASE(fp) != NULL) ) {
+            ptr = _FP_BASE(fp);
+            amount = fp->_cnt;
+            while( amount != 0 && ret == 0 ) {
+                len = __qwrite( fileno( fp ), ptr, amount );    /* 02-aug-90 */
+                if( len == -1 ) {
+                    fp->_flag |= _SFERR;
+                    ret = EOF;
+                }
+#ifndef __UNIX__
+                else if( len == 0 ) {
+                    __set_errno( ENOSPC );                      /* 12-nov-88 */
+                    fp->_flag |= _SFERR;
+                    ret = EOF;
+                }
+#endif
+                ptr += len;
+                amount -= len;
+            }
+        }
+    } else if( _FP_BASE(fp) != NULL ) {         /* not dirty */
+        /* fseek( fp, ftell(fp), SEEK_SET ); */
+        fp->_flag &= ~_EOF;
+        if( !(fp->_flag & _ISTTY) ) {
+            offset = fp->_cnt;
+            if( offset != 0 ) { /* 10-aug-89 JD */
+                offset = __lseek( fileno( fp ), -offset, SEEK_CUR );
+            }
+            if( offset == -1 ) {
+                fp->_flag |= _SFERR;
+                ret = EOF;
+            }
+        }
+    }
+    fp->_ptr = _FP_BASE(fp);   /* reset ptr to start of buffer */
+    fp->_cnt = 0;
+#if !defined( __NETWARE__ ) && !defined( __OSI__ )
+    if( ret == 0  &&  (_FP_EXTFLAGS(fp) & _COMMIT) ) {
+        if( fsync( fileno( fp ) ) == -1 ) {
+            ret = EOF;
+        }
+    }
+#endif
+    _ReleaseFile( fp );
+    return( ret );
+}
+
+#endif