compiler/arossupport/readstring.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Read one C string from a streamhook
   6     Lang: english
   7 */
   8
   9 #include <proto/dos.h>
  10 #include <exec/memory.h>
  11 #include <proto/exec.h>
  12
  13 /******************************************************************************
  14
  15     NAME */
  16 #include <stdio.h>
  17 #include <string.h>
  18 #include <aros/bigendianio.h>
  19 #include <proto/alib.h>
  20
  21         BOOL ReadString (
  22
  23 /*  SYNOPSIS */
  24         struct Hook * hook,
  25         STRPTR      * dataptr,
  26         void        * stream)
  27
  28 /*  FUNCTION
  29         Reads one C string from a streamhook.
  30
  31     INPUTS
  32         hook - Streamhook
  33         dataptr - Put the data here. If you don't need the string anymore,
  34             call FreeVec() to free it.
  35         stream - Read from this stream
  36
  37     RESULT
  38         The function returns TRUE on success. On success, the string
  39         read is written into dataptr. On failure, FALSE is returned and the
  40         contents of dataptr are not changed. The string must be freed with
  41         FreeVec().
  42
  43     NOTES
  44         This function reads big endian values from a streamhook even on
  45         little endian machines.
  46
  47     EXAMPLE
  48
  49     BUGS
  50
  51     SEE ALSO
  52         ReadByte(), ReadWord(), ReadLong(), ReadFloat(), ReadDouble(),
  53         ReadString(), ReadStruct(), WriteByte(), WriteWord(), WriteLong(),
  54         WriteFloat(), WriteDouble(), WriteString(), WriteStruct()
  55
  56     HISTORY
  57         14.09.93    ada created
  58
  59 ******************************************************************************/
  60 {
  61     STRPTR buffer;
  62     LONG   size, maxsize;
  63     LONG   c;
  64
  65     size = maxsize = 0;
  66     buffer = NULL;
  67
  68     for (;;)
  69     {
  70       struct BEIOM_Read rd = {BEIO_READ};
  71         c = CallHookA (hook, stream, &rd);
  72
  73         if (c == EOF)
  74         {
  75             FreeVec (buffer);
  76             return FALSE;
  77         }
  78
  79         if (size == maxsize)
  80         {
  81             STRPTR tmp;
  82
  83             tmp = AllocVec (maxsize + 16, MEMF_ANY);
  84
  85             if (!tmp)
  86             {
  87                 FreeVec (buffer);
  88                 return FALSE;
  89             }
  90
  91             if (buffer)
  92             {
  93                 memcpy (tmp, buffer, maxsize);
  94                 FreeVec (buffer);
  95             }
  96
  97             maxsize += 16;
  98
  99             buffer = tmp;
 100         }
 101
 102         buffer[size ++] = c;
 103
 104         if (!c)
 105             break;
 106     }
 107
 108     *dataptr = buffer;
 109
 110     return TRUE;
 111 } /* ReadString */