1 files changed, 141 insertions, 0 deletions
diff --git a/src/util/xstring.c b/src/util/xstring.c
new file mode 100644
index 0000000..02959f6
--- /dev/null
+++ b/src/util/xstring.c
@@ -0,0 +1,141 @@
+#ifndef _plan9_
+#include <string.h>
+#include <stdlib.h>
+#else
+#include <u.h>
+#include <libc.h>
+#endif
+
+#include <xio.h>
+#include <misc-f.h>
+struct fr {
+    char *string;
+    int pos;
+    int allocedsize;
+    int stringsize;
+};
+
+char *mystrdup(const char *c)
+{
+    int l = strlen(c);
+    char *d = malloc(l + 1);
+    if (!d)
+	return NULL;
+    memcpy(d, c, l + 1);
+    return d;
+}
+
+static int sputc(int c, xio_file s)
+{
+    struct fr *f = (struct fr *) s->data;
+    if (f->pos >= f->allocedsize - 1) {
+	char *c = (char *) realloc(f->string, f->allocedsize * 2);
+	if (!c)
+	    return XIO_EOF;
+	f->string = c;
+	f->allocedsize *= 2;
+    }
+    f->string[f->pos++] = c;
+    if (f->pos >= f->stringsize)
+	f->string[f->pos] = 0, f->stringsize = f->pos;
+    return 0;
+}
+
+static int sputs(CONST char *c, xio_file s)
+{
+    int l = strlen(c);
+    struct fr *f = (struct fr *) s->data;
+    while (f->pos + l >= f->allocedsize - 1) {
+	char *c = (char *) realloc(f->string, f->allocedsize * 2);
+	if (!c)
+	    return XIO_EOF;
+	f->string = c;
+	f->allocedsize *= 2;
+    }
+    memcpy(f->string + f->pos, c, l);
+    f->pos += l;
+    if (f->pos >= f->stringsize)
+	f->string[f->pos] = 0, f->stringsize = f->pos;
+    return 0;
+}
+
+static int sungetc(int c, xio_file s)
+{
+    struct fr *f = (struct fr *) s->data;
+    f->pos--;
+    /*f->string[f->pos]=c; */
+    return 0;
+}
+
+static int sgetc(xio_file s)
+{
+    struct fr *f = (struct fr *) s->data;
+    if (f->pos == f->stringsize)
+	return XIO_EOF;
+    return f->string[f->pos++];
+}
+
+static int sfeof(xio_file s)
+{
+    struct fr *f = (struct fr *) s->data;
+    return (f->pos == f->stringsize);
+}
+
+static int srclose(xio_file s)
+{
+    struct fr *f = (struct fr *) s->data;
+    free(f->string);
+    free(f);
+    free(s);
+    return 0;
+}
+
+static int swclose(xio_file s)
+{
+    struct fr *f = (struct fr *) s->data;
+    f->string = (char *) realloc(f->string, f->stringsize + 1);
+    /*free(s);
+       free(f); */
+    return 0;
+}
+
+char *xio_getstring(xio_file s)
+{
+    struct fr *f = (struct fr *) s->data;
+    char *c = f->string;
+    free(f);
+    free(s);
+    return c;
+}
+
+xio_file xio_strropen(CONST char *string)
+{
+    xio_file s = (xio_file) calloc(1, sizeof(*s));
+    struct fr *f = (struct fr *) calloc(1, sizeof(*f));
+    s->data = f;
+    f->pos = 0;
+    f->string = (char *) string;
+    f->stringsize = strlen(string);
+    s->fclose = srclose;
+    s->xeof = sfeof;
+    s->fgetc = sgetc;
+    s->fungetc = sungetc;
+    return s;
+}
+
+#define PAGE 4096
+xio_file xio_strwopen(void)
+{
+    xio_file s = (xio_file) calloc(1, sizeof(*s));
+    struct fr *f = (struct fr *) calloc(1, sizeof(*f));
+    s->data = f;
+    f->pos = 0;
+    f->string = (char *) malloc(PAGE);
+    f->allocedsize = PAGE;
+    f->stringsize = 0;
+    s->fputc = sputc;
+    s->fputs = sputs;
+    s->fclose = swclose;
+    s->flush = NULL;
+    return s;
+}