kc3-lang/libbsd/src/fpurge.c

• Show log

  Commit

• Hash : d5d91869
  Author :
  Date : 2012-01-03T09:08:35
  

  Base fpurge() implementation on __fpurge presence instead of glibc

Download

• src/fpurge.c

• /*
   * Copyright © 2011 Guillem Jover
   *
   * Redistribution and use in source and binary forms, with or without
   * modification, are permitted provided that the following conditions
   * are met:
   * 1. Redistributions of source code must retain the above copyright
   *    notice, this list of conditions and the following disclaimer.
   * 2. Redistributions in binary form must reproduce the above copyright
   *    notice, this list of conditions and the following disclaimer in the
   *    documentation and/or other materials provided with the distribution.
   * 3. The name of the author may not be used to endorse or promote products
   *    derived from this software without specific prior written permission.
   *
   * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
   * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
   * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL
   * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
   * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
   * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
   * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
   * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
   * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
   * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
   */
  
  #include <errno.h>
  #include <stdio.h>
  #include <stdio_ext.h>
  
  #ifdef HAVE___FPURGE
  int
  fpurge(FILE *fp)
  {
  	if (fp == NULL || fileno(fp) < 0) {
  		errno = EBADF;
  		return EOF;
  	}
  
  	__fpurge(fp);
  
  	return 0;
  }
  #else
  #error "Function fpurge() needs to be ported."
  #endif
  
  #ifdef TEST
  int
  main()
  {
  	static FILE fp_bad;
  	FILE *fp;
  
  	if (fpurge(&fp_bad) == 0)
  		return 1;
  
  	fp = fopen("/dev/zero", "r");
  	if (fpurge(fp) < 0)
  		return 1;
  
  	fclose(fp);
  
  	return 0;
  }
  #endif
  

Download