freopen.c
上传用户:nvosite88
上传日期:2007-01-17
资源大小:4983k
文件大小:6k
源码类别:

VxWorks

开发平台:

C/C++

  1. /* freopen.c - reopen a file. stdio.h */
  2. /* Copyright 1992-1993 Wind River Systems, Inc. */
  3. /*
  4. modification history
  5. --------------------
  6. 01c,05mar93,jdi  documentation cleanup for 5.1.
  7. 01b,20sep92,smb  documentation additions
  8. 01a,29jul92,jcf  added memory reclaimation.
  9.    +smb  taken from UCB stdio
  10. */
  11. /*
  12. DESCRIPTION
  13.  * Copyright (c) 1990 The Regents of the University of California.
  14.  * All rights reserved.
  15.  *
  16.  * This code is derived from software contributed to Berkeley by
  17.  * Chris Torek.
  18.  *
  19.  * Redistribution and use in source and binary forms, with or without
  20.  * modification, are permitted provided that the following conditions
  21.  * are met:
  22.  * 1. Redistributions of source code must retain the above copyright
  23.  *    notice, this list of conditions and the following disclaimer.
  24.  * 2. Redistributions in binary form must reproduce the above copyright
  25.  *    notice, this list of conditions and the following disclaimer in the
  26.  *    documentation and/or other materials provided with the distribution.
  27.  * 3. All advertising materials mentioning features or use of this software
  28.  *    must display the following acknowledgement:
  29.  * This product includes software developed by the University of
  30.  * California, Berkeley and its contributors.
  31.  * 4. Neither the name of the University nor the names of its contributors
  32.  *    may be used to endorse or promote products derived from this software
  33.  *    without specific prior written permission.
  34.  *
  35.  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  36.  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  37.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  38.  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  39.  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  40.  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  41.  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  42.  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  43.  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  44.  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  45.  * SUCH DAMAGE.
  46. INCLUDE FILE: stdio.h, sys/types.h, sys/stat.h, fcntl.h, error.h, unistd.h, 
  47.       stdlib.h
  48. SEE ALSO: American National Standard X3.159-1989
  49. NOMANUAL
  50. */
  51. #include "vxWorks.h"
  52. #include "stdio.h"
  53. #include "ioLib.h"
  54. #include "sys/types.h"
  55. #include "sys/stat.h"
  56. #include "fcntl.h"
  57. #include "errno.h"
  58. #include "unistd.h"
  59. #include "stdlib.h"
  60. #include "objLib.h"
  61. #include "private/stdioP.h"
  62. /******************************************************************************
  63. *
  64. * freopen - open a file specified by name (ANSI)
  65. *
  66. * This routine opens a file whose name is the string pointed to by <file>
  67. * and associates it with a specified stream <fp>.
  68. * The <mode> argument is used just as in the fopen() function.
  69. *
  70. * This routine first attempts to close any file that is associated
  71. * with the specified stream.  Failure to close the file successfully is
  72. * ignored. The error and end-of-file indicators for the stream are cleared.
  73. *
  74. * Typically, freopen() is used to attach the already-open streams
  75. * `stdin', `stdout', and `stderr' to other files.
  76. * INCLUDE FILES: stdio.h 
  77. *
  78. * RETURNS:
  79. * The value of <fp>, or a null pointer if the open operation fails.
  80. *
  81. * SEE ALSO: fopen()
  82. */
  83. FILE * freopen
  84.     (
  85.     const char *  file, /* name of file */
  86.     const char *  mode, /* mode */
  87.     FAST FILE *   fp /* stream */
  88.     )
  89.     {
  90.     FAST int f;
  91.     int flags;
  92.     int oflags;
  93.     int sverrno;
  94.     BOOL isopen = TRUE; /* its already open */
  95.     if (OBJ_VERIFY (fp, fpClassId) != OK)
  96. return (NULL);
  97.     if ((flags = __sflags (mode, &oflags)) == 0) 
  98. {
  99. (void) fclose (fp);
  100. return (NULL);
  101. }
  102.     /*
  103.      * There are actually programs that depend on being able to "freopen"
  104.      * descriptors that weren't originally open.  Keep this from breaking.
  105.      * Remember whether the stream was open to begin with, and which file
  106.      * descriptor (if any) was associated with it.  If it was attached to
  107.      * a descriptor, defer closing it; freopen("/dev/stdin", "r", stdin)
  108.      * should work.  This is unnecessary if it was not a Unix file.
  109.      */
  110.     if (fp->_flags & __SWR) /* flush the stream though */
  111. (void) __sflush(fp);  /* ANSI doesn't require this */
  112.     if (fp->_file < 0) /* need to close the fp? */
  113. {
  114. (void) __sclose (fp);
  115. isopen = FALSE;
  116. }
  117.     /* Get a new descriptor to refer to the new file. */
  118.     f = open (file, oflags, DEFFILEMODE);
  119.     if ((f < 0) && isopen)
  120. {
  121. /* If out of fd's close the old one and try again. */
  122. if ((errno == ENFILE) || (errno == EMFILE))
  123.     {
  124.     (void) __sclose (fp);
  125.     isopen = FALSE;
  126.     f = open (file, oflags, DEFFILEMODE);
  127.     }
  128. }
  129.     sverrno = errno;
  130.     /*
  131.      * Finish closing fp.  Even if the open succeeded above, we cannot
  132.      * keep fp->_base: it may be the wrong size.  This loses the effect
  133.      * of any setbuffer calls, but stdio has always done this before.
  134.      */
  135.     if (isopen)
  136. (void) __sclose (fp);
  137.     if (fp->_flags & __SMBF)
  138. free ((char *)fp->_bf._base);
  139.     fp->_w = 0;
  140.     fp->_r = 0;
  141.     fp->_p = NULL;
  142.     fp->_bf._base = NULL;
  143.     fp->_bf._size = 0;
  144.     fp->_lbfsize = 0;
  145.     if (HASUB(fp))
  146. FREEUB(fp);
  147.     fp->_ub._size = 0;
  148.     if (HASLB(fp))
  149. FREELB(fp);
  150.     fp->_lb._size = 0;
  151.     if ((f < 0) && (fp->_flags != 0))
  152. { /* did not get it after all */
  153. fp->_flags = 0; /* set it free */
  154. stdioFpDestroy (fp); /* destroy file pointer */
  155. errno = sverrno; /* restore in case _close clobbered */
  156. return (NULL);
  157. }
  158.     fp->_flags = flags;
  159.     fp->_file = f;
  160.     return (fp);
  161.     }