Codice

318 volume VI os16
Sorgenti della libreria generale 319
«
105.9.15 lib/stdio/fread.c
Si veda la sezione 98.39.
2610018 | }
2610019 |}
2580001 |#include
2580002 |#include
2580003 |//----------------------------------------------------------------------
2580004 |size_t
2580005 |fread (void *restrict buffer, size_t size, size_t nmemb,
2580006 | FILE *restrict fp)
2580007 |{
2580008 | ssize_t size_read;
2580009 | size_read = read (fp->fdn, buffer, (size_t) (size * nmemb));
2580010 | if (size_read == 0)
2580011 | {
2580012 | fp->eof = 1;
2580013 | return ((size_t) 0);
2580014 | }
2580015 | else if (size_read < 0)
2580016 | {
2580017 | fp->error = 1;
2580018 | return ((size_t) 0);
2580019 | }
2580020 | else
2580021 | {
2580022 | return ((size_t) (size_read / size));
2580023 | }
2580024 |}
105.9.19 lib/stdio/fseeko.c
Si veda la sezione 98.43.
2620001 |#include
2620002 |#include
2620003 |//----------------------------------------------------------------------
2620004 |int
2620005 |fseeko (FILE *fp, off_t offset, int whence)
2620006 |{
2620007 | off_t off_new;
2620008 | off_new = lseek (fp->fdn, offset, whence);
2620009 | if (off_new < 0)
2620010 | {
2620011 | fp->error = 1;
2620012 | return (-1);
2620013 | }
2620014 | else
2620015 | {
2620016 | return (0);
2620017 | }
2620018 |}
«
«
105.9.16 lib/stdio/freopen.c
Si veda la sezione 98.35.
2590001 |#include
2590002 |#include
2590003 |#include
2590004 |#include
2590005 |#include
2590006 |#include
2590007 |#include
2590008 |#include
2590009 |#include
2590010 |
2590011 |//----------------------------------------------------------------------
2590012 |FILE *
2590013 |freopen (const char *restrict path, const char *restrict mode,
2590014 | FILE *restrict fp)
2590015 |{
2590016 | int status;
2590017 | FILE *fp_new;
2590018 | //
2590019 | if (fp == NULL)
2590020 | {
2590021 | return (NULL);
2590022 | }
2590023 | //
2590024 | status = fclose (fp);
2590025 | if (status != 0)
2590026 | {
2590027 | fp->error = 1;
2590028 | return (NULL);
2590029 | }
2590030 | //
2590031 | fp_new = fopen (path, mode);
2590032 | //
2590033 | if (fp_new == NULL)
2590034 | {
2590035 | return (NULL);
2590036 | }
2590037 | //
2590038 | if (fp_new != fp)
2590039 | {
2590040 | fclose (fp_new);
2590041 | return (NULL);
2590042 | }
2590043 | //
2590044 | return (fp_new);
2590045 |}
105.9.20 lib/stdio/fsetpos.c
Si veda la sezione 98.32.
2630001 |#include
2630002 |//----------------------------------------------------------------------
2630003 |int
2630004 |fsetpos (FILE *restrict fp, fpos_t *restrict pos)
2630005 |{
2630006 | long int position;
2630007 | //
2630008 | if (fp != NULL)
2630009 | {
2630010 | position = fseek (fp, (long int) *pos, SEEK_SET);
2630011 | if (position >= 0)
2630012 | {
2630013 | *pos = position;
2630014 | return (0);
2630015 | }
2630016 | }
2630017 | return (-1);
2630018 |}
105.9.21 lib/stdio/ftell.c
Si veda la sezione 98.46.
2640001 |#include
2640002 |#include
2640003 |//----------------------------------------------------------------------
2640004 |long int
2640005 |ftell (FILE *fp)
2640006 |{
2640007 | return ((long int) lseek (fp->fdn, (off_t) 0, SEEK_CUR));
2640008 |}
105.9.22 lib/stdio/ftello.c
Si veda la sezione 98.46.
2650001 |#include
2650002 |#include
2650003 |//----------------------------------------------------------------------
2650004 |off_t
2650005 |ftello (FILE *fp)
2650006 |{
2650007 | return (lseek (fp->fdn, (off_t) 0, SEEK_CUR));
2650008 |}
«
«
«
«
«
105.9.17 lib/stdio/fscanf.c
Si veda la sezione 98.90.
2600001 |#include
2600002 |//----------------------------------------------------------------------
2600003 |int
2600004 |fscanf (FILE *restrict fp, const char *restrict format, ...)
2600005 |{
2600006 | va_list ap;
2600007 | va_start (ap, format);
2600008 | return vfscanf (fp, format, ap);
2600009 |}
105.9.18 lib/stdio/fseek.c
Si veda la sezione 98.43.
2610001 |#include
2610002 |#include
2610003 |//----------------------------------------------------------------------
2610004 |int
2610005 |fseek (FILE *fp, long int offset, int whence)
2610006 |{
2610007 | off_t off_new;
2610008 | off_new = lseek (fp->fdn, (off_t) offset, whence);
2610009 | if (off_new < 0)
2610010 | {
2610011 | fp->error = 1;
2610012 | return (-1);
2610013 | }
2610014 | else
2610015 | {
2610016 | fp->eof = 0;
2610017 | return (0);
105.9.23 lib/stdio/fwrite.c
Si veda la sezione 98.48.
2660001 |#include
2660002 |#include
2660003 |//----------------------------------------------------------------------
2660004 |size_t
2660005 |fwrite (const void *restrict buffer, size_t size, size_t nmemb,
2660006 | FILE *restrict fp)
2660007 |{
2660008 | ssize_t size_written;
2660009 | size_written = write (fp->fdn, buffer, (size_t) (size * nmemb));
2660010 | if (size_written < 0)
2660011 | {
2660012 | fp->error = 1;
2660013 | return ((size_t) 0);
2660014 | }
2660015 | else
2660016 | {
2660017 | return ((size_t) (size_written / size));
2660018 | }
2660019 |}
105.9.24 lib/stdio/getchar.c
Si veda la sezione 98.31.
2670001 |#include
2670002 |#include
2670003 |#include
2670004 |//----------------------------------------------------------------------
2670005 |int
2670006 |getchar (void)
«
«