// This file is under GNU General Public License 3.0

 // see LICENSE.txt

 #pragma once

 #include "platform.h"

 #include <errno.h>

 #include <stdarg.h>

 #include <stdio.h>

 #include <fcntl.h>

 static inline FILE * Fopen(const char *filename, const char *mode)

 {

     FILE * f;

     do {

         f = fopen(filename, mode);

     } while (f == NULL && errno == EINTR);

     return f;

 }

 static inline FILE * Fdopen(int fildes, const char *mode)

 {

     FILE * f;

     do {

         f = fdopen(fildes, mode);

     } while (f == NULL && errno == EINTR);

     return f;

 }

 static inline char *Fgets(char * str, int size, FILE * stream)

 {

     char * s;

     do {

         s = fgets(str, size, stream);

     } while (s == NULL && errno == EINTR);

     return s;

 }

 static inline int Fputs(const char *str, FILE * stream)

 {

     int r;

     do {

         r = fputs(str, stream);

     } while (r == EOF && errno == EINTR);

     return r;

 }

 static inline int Fclose(FILE *stream)

 {

     int r;

     do {

         r = fclose(stream);

     } while (r == EOF && errno == EINTR);

     return r;

 }

 static inline FILE * Freopen(

         const char *filename,

         const char *mode,

         FILE * stream

     )

 {

     FILE * f;

     do {

         f = freopen(filename, mode, stream);

     } while (f == NULL && errno == EINTR);

     return f;

 }

 static inline int Fprintf(FILE * stream, const char * format, ...)

 {

     int n;

     va_list arglist;

     va_start(arglist, format);

     do {

         n = vfprintf(stream, format, arglist);

     } while (n < 0 && errno == EINTR);

     va_end( arglist );

     return n;

 }

 static inline size_t Fwrite(const void *ptr, size_t size, size_t nitems, FILE *stream)

 {

     size_t r = 0;

     do {

         clearerr(stream);

         size_t n = fwrite((char *) ptr + r, size, nitems, stream);

         nitems -= n;

         r += n * size;

     } while (nitems && ferror(stream) == EINTR);

     return r;

 }

 static inline size_t Fread(void *ptr, size_t size, size_t nitems, FILE *stream)

 {

     size_t r = 0;

     do {

         clearerr(stream);

         size_t n = fread((char *) ptr + r, size, nitems, stream);

         nitems -= n;

         r += n * size;

     } while (!feof(stream) && nitems && ferror(stream) == EINTR);

     return r;

 }

 static inline int Fflush(FILE *stream)

 {

     int r;

     do {

         r = fflush(stream);

     } while (r == -1 && errno == EINTR);

     return r;

 }

 static inline int Mkstemp(char *template)

 {

     int fd;

     do {

         fd = mkstemp(template);

     } while (fd == -1 && errno == EINTR);

     return fd;

 }

 static inline int Close(int fildes)

 {

     int r;

     do {

         r = close(fildes);

     } while (r == -1 && errno == EINTR);

     return r;

 }