Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Blame | Last modification | View Log | Download | RSS feed

  1. /****************************************************************************
  2. *
  3. *                            Open Watcom Project
  4. *
  5. *    Portions Copyright (c) 1983-2002 Sybase, Inc. All Rights Reserved.
  6. *
  7. *  ========================================================================
  8. *
  9. *    This file contains Original Code and/or Modifications of Original
  10. *    Code as defined in and that are subject to the Sybase Open Watcom
  11. *    Public License version 1.0 (the 'License'). You may not use this file
  12. *    except in compliance with the License. BY USING THIS FILE YOU AGREE TO
  13. *    ALL TERMS AND CONDITIONS OF THE LICENSE. A copy of the License is
  14. *    provided with the Original Code and Modifications, and is also
  15. *    available at www.sybase.com/developer/opensource.
  16. *
  17. *    The Original Code and all software distributed under the License are
  18. *    distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  19. *    EXPRESS OR IMPLIED, AND SYBASE AND ALL CONTRIBUTORS HEREBY DISCLAIM
  20. *    ALL SUCH WARRANTIES, INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF
  21. *    MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR
  22. *    NON-INFRINGEMENT. Please see the License for the specific language
  23. *    governing rights and limitations under the License.
  24. *
  25. *  ========================================================================
  26. *
  27. * Description:  I/O streams shutdown.
  28. *
  29. ****************************************************************************/
  30.  
  31.  
  32. #include "variety.h"
  33. #include <stdio.h>
  34. #include "rtdata.h"
  35.  
  36. extern void     __purgefp(void);
  37. extern int      __shutdown_stream( FILE *fp, int );
  38.  
  39. static int docloseall( unsigned dont_close )
  40. {
  41.     FILE            *fp;
  42.     int             number_of_files_closed;
  43.     __stream_link   *link;
  44.     __stream_link   *next;
  45.     FILE            *bottom;
  46.     FILE            *standards;
  47.     int             close_handle;
  48.  
  49.     bottom = &_RWD_iob[dont_close];
  50.     standards = &_RWD_iob[NUM_STD_STREAMS];
  51.     number_of_files_closed = 0;
  52.     for( link = _RWD_ostream; link != NULL; link = next ) {
  53.         next = link->next;
  54.         fp = link->stream;
  55.         close_handle = 1;
  56.         if ((fp->_flag & _DYNAMIC) || (fp->_flag & _TMPFIL))
  57.         {
  58.             __shutdown_stream( fp, close_handle );
  59.             ++number_of_files_closed;
  60.         }
  61.         else if( fp >= bottom ) {
  62. #ifndef __NETWARE__
  63.             /* close the file, but leave the handle open */
  64.             if( fp < standards ) {
  65.                 close_handle = 0;
  66.             }
  67. #endif
  68.             __shutdown_stream( fp, close_handle );
  69.             ++number_of_files_closed;
  70.         }
  71.     }
  72.     return( number_of_files_closed );
  73. }
  74.  
  75. _WCRTLINK int fcloseall( void )
  76. {
  77.     return( docloseall( NUM_STD_STREAMS ) );
  78. }
  79.  
  80. void __full_io_exit( void )
  81. {
  82.     docloseall( 0 );
  83.     __purgefp();
  84. }
  85.