tools/toollib/stringcb.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <string.h>
   7 #include <errno.h>
   8 #include <toollib/error.h>
   9 #include <toollib/stringcb.h>
  10
  11 static int
  12 StringGetCB (StringStream * ss, int dummy, CBD data)
  13 {
  14     int c;
  15
  16     if (ss->pos == ss->max)
  17     {
  18         errno = 0;
  19         c = -1;
  20     }
  21     else
  22         c = ss->string[ss->pos++];
  23
  24     if (c == '\n')
  25         Str_NextLine (ss);
  26
  27     return c;
  28 }
  29
  30 static int
  31 StringUngetCB (StringStream * ss, int c, CBD data)
  32 {
  33     if (!ss->pos)
  34     {
  35         errno = EINVAL;
  36         c = -2;
  37     }
  38     else if (c != -1)
  39     {
  40         ss->pos --;
  41
  42         if (c != ss->string[ss->pos])
  43         {
  44             errno = EINVAL;
  45             c = -2;
  46         }
  47     }
  48     else /* EOF */
  49     {
  50         if (ss->pos != ss->max)
  51         {
  52             errno = EINVAL;
  53             c = -2;
  54         }
  55     }
  56
  57     return c;
  58 }
  59
  60 static int
  61 StringPutCB (StringStream * ss, int c, CBD data)
  62 {
  63     if (!ss->out)
  64         ss->out = VS_New (NULL);
  65
  66     VS_AppendChar (ss->out, c);
  67
  68     return c;
  69 }
  70
  71 static int
  72 StringPutsCB (StringStream * ss, const char * str, CBD data)
  73 {
  74     if (!ss->out)
  75         ss->out = VS_New (NULL);
  76
  77     VS_AppendString (ss->out, str);
  78
  79     return 1;
  80 }
  81
  82 StringStream *
  83 StrStr_New (const char * string)
  84 {
  85     StringStream * ss = new (StringStream);
  86
  87     Str_Init (&ss->stream, "string");
  88
  89     ss->stream.get   = (CB) StringGetCB;
  90     ss->stream.unget = (CB) StringUngetCB;
  91     ss->stream.put   = (CB) StringPutCB;
  92     ss->stream.puts  = (CB) StringPutsCB;
  93
  94     ss->string = string;
  95     ss->out    = NULL;
  96     ss->pos    = 0;
  97     ss->max    = strlen (string);
  98
  99     return ss;
 100 }
 101
 102 void
 103 StrStr_Delete (StringStream * ss)
 104 {
 105     if (ss->out)
 106         VS_Delete (ss->out);
 107
 108     Str_Delete (&ss->stream);
 109
 110     xfree (ss);
 111 }
 112