tools/MetaMake/io.c

   1 /* MetaMake - A Make extension
   2    Copyright © 1995-2011, The AROS Development Team. All rights reserved.
   3
   4 This file is part of MetaMake.
   5
   6 MetaMake is free software; you can redistribute it and/or modify
   7 it under the terms of the GNU General Public License as published by
   8 the Free Software Foundation; either version 2, or (at your option)
   9 any later version.
  10
  11 MetaMake is distributed in the hope that it will be useful,
  12 but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 GNU General Public License for more details.
  15
  16 You should have received a copy of the GNU General Public License
  17 along with GNU CC; see the file COPYING.  If not, write to
  18 the Free Software Foundation, 59 Temple Place - Suite 330,
  19 Boston, MA 02111-1307, USA.  */
  20
  21 #include "config.h"
  22
  23 #include <inttypes.h>
  24 #include <stdio.h>
  25 #include <string.h> /* for strlen() */
  26 #ifdef HAVE_NETINET_IN_H
  27 #   include <netinet/in.h> /* for htonl/ntohl() */
  28 #endif
  29 #ifdef _WIN32
  30 #include "winsock2.h"
  31 #endif
  32
  33 #include "mem.h"
  34
  35 int
  36 writestring (FILE * fh, const char * s)
  37 {
  38     uint32_t out;
  39     int32_t len;
  40
  41     if (s != NULL)
  42         len = strlen(s);
  43     else
  44         len = -1;
  45
  46     out = htonl(len);
  47     fwrite(&out, sizeof(out), 1, fh);
  48
  49     if (!ferror(fh) && len>0)
  50         fwrite(s, len, 1, fh);
  51
  52     return !ferror(fh);
  53 }
  54
  55 int
  56 readstring (FILE * fh, char **strptr)
  57 {
  58     uint32_t in;
  59     int32_t len;
  60
  61     fread(&in, sizeof(in), 1, fh);
  62     if (ferror(fh))
  63         return 0;
  64
  65     len = ntohl(in);
  66     if (len>0)
  67     {
  68         *strptr = xmalloc (len+1);
  69         fread (*strptr, len, 1, fh);
  70         if (ferror(fh))
  71         {
  72             xfree (*strptr);
  73             return 0;
  74         }
  75         (*strptr)[len] = 0;
  76     }
  77     else if (len == 0)
  78         *strptr = xstrdup("");
  79     else /* len < 0 */
  80         *strptr = NULL;
  81
  82     return 1;
  83 }
  84
  85 int
  86 writeint32 (FILE * fh, int32_t i)
  87 {
  88     uint32_t out;
  89
  90     out = htonl(i);
  91     fwrite(&out, sizeof(out), 1, fh);
  92
  93     return !ferror(fh);
  94 }
  95
  96 int
  97 readint32 (FILE * fh, int32_t * iptr)
  98 {
  99     uint32_t in;
 100
 101     fread(&in, sizeof(in), 1, fh);
 102     if (!ferror(fh))
 103         *iptr = ntohl(in);
 104
 105     return !ferror(fh);
 106 }
 107
 108 int
 109 writeuint32 (FILE * fh, uint32_t i)
 110 {
 111     uint32_t out;
 112
 113     out = htonl(i);
 114     fwrite(&out, sizeof(out), 1, fh);
 115
 116     return !ferror(fh);
 117 }
 118
 119 int
 120 readuint32 (FILE * fh, uint32_t * iptr)
 121 {
 122     uint32_t in;
 123
 124     fread(&in, sizeof(in), 1, fh);
 125     if (!ferror(fh))
 126         *iptr = ntohl(in);
 127
 128     return !ferror(fh);
 129 }
 130