--- /dev/null
+/*\r
+ * This source file is part of the bstring string library. This code was\r
+ * written by Paul Hsieh in 2002-2008, and is covered by the BSD open source \r
+ * license and the GPL. Refer to the accompanying documentation for details \r
+ * on usage and license.\r
+ */\r
+\r
+/*!\r
+ * @file\r
+ * This file is the core module for implementing the bstring functions.\r
+ */\r
+\r
+#ifndef BSTRLIB_INCLUDE\r
+#define BSTRLIB_INCLUDE\r
+\r
+#ifdef __cplusplus\r
+extern "C" {\r
+#endif\r
+\r
+#include <stdarg.h>\r
+#include <string.h>\r
+#include <limits.h>\r
+#include <ctype.h>\r
+\r
+#if !defined (BSTRLIB_VSNP_OK) && !defined (BSTRLIB_NOVSNP)\r
+# if defined (__TURBOC__) && !defined (__BORLANDC__)\r
+# define BSTRLIB_NOVSNP\r
+# endif\r
+#endif\r
+\r
+#define BSTR_ERR (-1)\r
+#define BSTR_OK (0)\r
+#define BSTR_BS_BUFF_LENGTH_GET (0)\r
+\r
+typedef struct tagbstring * bstring;\r
+typedef const struct tagbstring * const_bstring;\r
+\r
+/* Copy functions */\r
+#define cstr2bstr bfromcstr\r
+extern bstring bfromcstr (const char * str);\r
+extern bstring bfromcstralloc (int mlen, const char * str);\r
+extern bstring blk2bstr (const void * blk, int len);\r
+extern char * bstr2cstr (const_bstring s, char z);\r
+extern int bcstrfree (char * s);\r
+extern bstring bstrcpy (const_bstring b1);\r
+extern int bassign (bstring a, const_bstring b);\r
+extern int bassignmidstr (bstring a, const_bstring b, int left, int len);\r
+extern int bassigncstr (bstring a, const char * str);\r
+extern int bassignblk (bstring a, const void * s, int len);\r
+\r
+/* Destroy function */\r
+extern int bdestroy (bstring b);\r
+\r
+/* Space allocation hinting functions */\r
+extern int balloc (bstring s, int len);\r
+extern int ballocmin (bstring b, int len);\r
+\r
+/* Substring extraction */\r
+extern bstring bmidstr (const_bstring b, int left, int len);\r
+\r
+/* Various standard manipulations */\r
+extern int bconcat (bstring b0, const_bstring b1);\r
+extern int bconchar (bstring b0, char c);\r
+extern int bcatcstr (bstring b, const char * s);\r
+extern int bcatblk (bstring b, const void * s, int len);\r
+extern int binsert (bstring s1, int pos, const_bstring s2, unsigned char fill);\r
+extern int binsertch (bstring s1, int pos, int len, unsigned char fill);\r
+extern int breplace (bstring b1, int pos, int len, const_bstring b2, unsigned char fill);\r
+extern int bdelete (bstring s1, int pos, int len);\r
+extern int bsetstr (bstring b0, int pos, const_bstring b1, unsigned char fill);\r
+extern int btrunc (bstring b, int n);\r
+\r
+/* Scan/search functions */\r
+extern int bstricmp (const_bstring b0, const_bstring b1);\r
+extern int bstrnicmp (const_bstring b0, const_bstring b1, int n);\r
+extern int biseqcaseless (const_bstring b0, const_bstring b1);\r
+extern int bisstemeqcaselessblk (const_bstring b0, const void * blk, int len);\r
+extern int biseq (const_bstring b0, const_bstring b1);\r
+extern int bisstemeqblk (const_bstring b0, const void * blk, int len);\r
+extern int biseqcstr (const_bstring b, const char * s);\r
+extern int biseqcstrcaseless (const_bstring b, const char * s);\r
+extern int bstrcmp (const_bstring b0, const_bstring b1);\r
+extern int bstrncmp (const_bstring b0, const_bstring b1, int n);\r
+extern int binstr (const_bstring s1, int pos, const_bstring s2);\r
+extern int binstrr (const_bstring s1, int pos, const_bstring s2);\r
+extern int binstrcaseless (const_bstring s1, int pos, const_bstring s2);\r
+extern int binstrrcaseless (const_bstring s1, int pos, const_bstring s2);\r
+extern int bstrchrp (const_bstring b, int c, int pos);\r
+extern int bstrrchrp (const_bstring b, int c, int pos);\r
+#define bstrchr(b,c) bstrchrp ((b), (c), 0)\r
+#define bstrrchr(b,c) bstrrchrp ((b), (c), blength(b)-1)\r
+extern int binchr (const_bstring b0, int pos, const_bstring b1);\r
+extern int binchrr (const_bstring b0, int pos, const_bstring b1);\r
+extern int bninchr (const_bstring b0, int pos, const_bstring b1);\r
+extern int bninchrr (const_bstring b0, int pos, const_bstring b1);\r
+extern int bfindreplace (bstring b, const_bstring find, const_bstring repl, int pos);\r
+extern int bfindreplacecaseless (bstring b, const_bstring find, const_bstring repl, int pos);\r
+\r
+/* List of string container functions */\r
+struct bstrList {\r
+ int qty, mlen;\r
+ bstring * entry;\r
+};\r
+extern struct bstrList * bstrListCreate (void);\r
+extern int bstrListDestroy (struct bstrList * sl);\r
+extern int bstrListAlloc (struct bstrList * sl, int msz);\r
+extern int bstrListAllocMin (struct bstrList * sl, int msz);\r
+\r
+/* String split and join functions */\r
+extern struct bstrList * bsplit (const_bstring str, unsigned char splitChar);\r
+extern struct bstrList * bsplits (const_bstring str, const_bstring splitStr);\r
+extern struct bstrList * bsplitstr (const_bstring str, const_bstring splitStr);\r
+extern bstring bjoin (const struct bstrList * bl, const_bstring sep);\r
+extern int bsplitcb (const_bstring str, unsigned char splitChar, int pos,\r
+ int (* cb) (void * parm, int ofs, int len), void * parm);\r
+extern int bsplitscb (const_bstring str, const_bstring splitStr, int pos,\r
+ int (* cb) (void * parm, int ofs, int len), void * parm);\r
+extern int bsplitstrcb (const_bstring str, const_bstring splitStr, int pos,\r
+ int (* cb) (void * parm, int ofs, int len), void * parm);\r
+\r
+/* Miscellaneous functions */\r
+extern int bpattern (bstring b, int len);\r
+extern int btoupper (bstring b);\r
+extern int btolower (bstring b);\r
+extern int bltrimws (bstring b);\r
+extern int brtrimws (bstring b);\r
+extern int btrimws (bstring b);\r
+\r
+#if !defined (BSTRLIB_NOVSNP)\r
+extern bstring bformat (const char * fmt, ...);\r
+extern int bformata (bstring b, const char * fmt, ...);\r
+extern int bassignformat (bstring b, const char * fmt, ...);\r
+extern int bvcformata (bstring b, int count, const char * fmt, va_list arglist);\r
+\r
+#define bvformata(ret, b, fmt, lastarg) { \\r
+bstring bstrtmp_b = (b); \\r
+const char * bstrtmp_fmt = (fmt); \\r
+int bstrtmp_r = BSTR_ERR, bstrtmp_sz = 16; \\r
+ for (;;) { \\r
+ va_list bstrtmp_arglist; \\r
+ va_start (bstrtmp_arglist, lastarg); \\r
+ bstrtmp_r = bvcformata (bstrtmp_b, bstrtmp_sz, bstrtmp_fmt, bstrtmp_arglist); \\r
+ va_end (bstrtmp_arglist); \\r
+ if (bstrtmp_r >= 0) { /* Everything went ok */ \\r
+ bstrtmp_r = BSTR_OK; \\r
+ break; \\r
+ } else if (-bstrtmp_r <= bstrtmp_sz) { /* A real error? */ \\r
+ bstrtmp_r = BSTR_ERR; \\r
+ break; \\r
+ } \\r
+ bstrtmp_sz = -bstrtmp_r; /* Doubled or target size */ \\r
+ } \\r
+ ret = bstrtmp_r; \\r
+}\r
+\r
+#endif\r
+\r
+typedef int (*bNgetc) (void *parm);\r
+typedef size_t (* bNread) (void *buff, size_t elsize, size_t nelem, void *parm);\r
+\r
+/* Input functions */\r
+extern bstring bgets (bNgetc getcPtr, void * parm, char terminator);\r
+extern bstring bread (bNread readPtr, void * parm);\r
+extern int bgetsa (bstring b, bNgetc getcPtr, void * parm, char terminator);\r
+extern int bassigngets (bstring b, bNgetc getcPtr, void * parm, char terminator);\r
+extern int breada (bstring b, bNread readPtr, void * parm);\r
+\r
+/* Stream functions */\r
+extern struct bStream * bsopen (bNread readPtr, void * parm);\r
+extern void * bsclose (struct bStream * s);\r
+extern int bsbufflength (struct bStream * s, int sz);\r
+extern int bsreadln (bstring b, struct bStream * s, char terminator);\r
+extern int bsreadlns (bstring r, struct bStream * s, const_bstring term);\r
+extern int bsread (bstring b, struct bStream * s, int n);\r
+extern int bsreadlna (bstring b, struct bStream * s, char terminator);\r
+extern int bsreadlnsa (bstring r, struct bStream * s, const_bstring term);\r
+extern int bsreada (bstring b, struct bStream * s, int n);\r
+extern int bsunread (struct bStream * s, const_bstring b);\r
+extern int bspeek (bstring r, const struct bStream * s);\r
+extern int bssplitscb (struct bStream * s, const_bstring splitStr, \r
+ int (* cb) (void * parm, int ofs, const_bstring entry), void * parm);\r
+extern int bssplitstrcb (struct bStream * s, const_bstring splitStr, \r
+ int (* cb) (void * parm, int ofs, const_bstring entry), void * parm);\r
+extern int bseof (const struct bStream * s);\r
+\r
+struct tagbstring {\r
+ int mlen;\r
+ int slen;\r
+ unsigned char * data;\r
+};\r
+\r
+/* Accessor macros */\r
+#define blengthe(b, e) (((b) == (void *)0 || (b)->slen < 0) ? (int)(e) : ((b)->slen))\r
+#define blength(b) (blengthe ((b), 0))\r
+#define bdataofse(b, o, e) (((b) == (void *)0 || (b)->data == (void*)0) ? (char *)(e) : ((char *)(b)->data) + (o))\r
+#define bdataofs(b, o) (bdataofse ((b), (o), (void *)0))\r
+#define bdatae(b, e) (bdataofse (b, 0, e))\r
+#define bdata(b) (bdataofs (b, 0))\r
+#define bchare(b, p, e) ((((unsigned)(p)) < (unsigned)blength(b)) ? ((b)->data[(p)]) : (e))\r
+#define bchar(b, p) bchare ((b), (p), '\0')\r
+\r
+/* Static constant string initialization macro */\r
+#define bsStaticMlen(q,m) {(m), (int) sizeof(q)-1, (unsigned char *) ("" q "")}\r
+#if defined(_MSC_VER)\r
+# define bsStatic(q) bsStaticMlen(q,-32)\r
+#endif\r
+#ifndef bsStatic\r
+# define bsStatic(q) bsStaticMlen(q,-__LINE__)\r
+#endif\r
+\r
+/* Static constant block parameter pair */\r
+#define bsStaticBlkParms(q) ((void *)("" q "")), ((int) sizeof(q)-1)\r
+\r
+/* Reference building macros */\r
+#define cstr2tbstr btfromcstr\r
+#define btfromcstr(t,s) { \\r
+ (t).data = (unsigned char *) (s); \\r
+ (t).slen = ((t).data) ? ((int) (strlen) ((char *)(t).data)) : 0; \\r
+ (t).mlen = -1; \\r
+}\r
+#define blk2tbstr(t,s,l) { \\r
+ (t).data = (unsigned char *) (s); \\r
+ (t).slen = l; \\r
+ (t).mlen = -1; \\r
+}\r
+#define btfromblk(t,s,l) blk2tbstr(t,s,l)\r
+#define bmid2tbstr(t,b,p,l) { \\r
+ const_bstring bstrtmp_s = (b); \\r
+ if (bstrtmp_s && bstrtmp_s->data && bstrtmp_s->slen >= 0) { \\r
+ int bstrtmp_left = (p); \\r
+ int bstrtmp_len = (l); \\r
+ if (bstrtmp_left < 0) { \\r
+ bstrtmp_len += bstrtmp_left; \\r
+ bstrtmp_left = 0; \\r
+ } \\r
+ if (bstrtmp_len > bstrtmp_s->slen - bstrtmp_left) \\r
+ bstrtmp_len = bstrtmp_s->slen - bstrtmp_left; \\r
+ if (bstrtmp_len <= 0) { \\r
+ (t).data = (unsigned char *)""; \\r
+ (t).slen = 0; \\r
+ } else { \\r
+ (t).data = bstrtmp_s->data + bstrtmp_left; \\r
+ (t).slen = bstrtmp_len; \\r
+ } \\r
+ } else { \\r
+ (t).data = (unsigned char *)""; \\r
+ (t).slen = 0; \\r
+ } \\r
+ (t).mlen = -__LINE__; \\r
+}\r
+#define btfromblkltrimws(t,s,l) { \\r
+ int bstrtmp_idx = 0, bstrtmp_len = (l); \\r
+ unsigned char * bstrtmp_s = (s); \\r
+ if (bstrtmp_s && bstrtmp_len >= 0) { \\r
+ for (; bstrtmp_idx < bstrtmp_len; bstrtmp_idx++) { \\r
+ if (!isspace (bstrtmp_s[bstrtmp_idx])) break; \\r
+ } \\r
+ } \\r
+ (t).data = bstrtmp_s + bstrtmp_idx; \\r
+ (t).slen = bstrtmp_len - bstrtmp_idx; \\r
+ (t).mlen = -__LINE__; \\r
+}\r
+#define btfromblkrtrimws(t,s,l) { \\r
+ int bstrtmp_len = (l) - 1; \\r
+ unsigned char * bstrtmp_s = (s); \\r
+ if (bstrtmp_s && bstrtmp_len >= 0) { \\r
+ for (; bstrtmp_len >= 0; bstrtmp_len--) { \\r
+ if (!isspace (bstrtmp_s[bstrtmp_len])) break; \\r
+ } \\r
+ } \\r
+ (t).data = bstrtmp_s; \\r
+ (t).slen = bstrtmp_len + 1; \\r
+ (t).mlen = -__LINE__; \\r
+}\r
+#define btfromblktrimws(t,s,l) { \\r
+ int bstrtmp_idx = 0, bstrtmp_len = (l) - 1; \\r
+ unsigned char * bstrtmp_s = (s); \\r
+ if (bstrtmp_s && bstrtmp_len >= 0) { \\r
+ for (; bstrtmp_idx <= bstrtmp_len; bstrtmp_idx++) { \\r
+ if (!isspace (bstrtmp_s[bstrtmp_idx])) break; \\r
+ } \\r
+ for (; bstrtmp_len >= bstrtmp_idx; bstrtmp_len--) { \\r
+ if (!isspace (bstrtmp_s[bstrtmp_len])) break; \\r
+ } \\r
+ } \\r
+ (t).data = bstrtmp_s + bstrtmp_idx; \\r
+ (t).slen = bstrtmp_len + 1 - bstrtmp_idx; \\r
+ (t).mlen = -__LINE__; \\r
+}\r
+\r
+/* Write protection macros */\r
+#define bwriteprotect(t) { if ((t).mlen >= 0) (t).mlen = -1; }\r
+#define bwriteallow(t) { if ((t).mlen == -1) (t).mlen = (t).slen + ((t).slen == 0); }\r
+#define biswriteprotected(t) ((t).mlen <= 0)\r
+\r
+#ifdef __cplusplus\r
+}\r
+#endif\r
+\r
+#endif\r
projects / netatalk.git / blobdiff