aboutsummaryrefslogtreecommitdiff
path: root/cordhelpers.c
diff options
context:
space:
mode:
authorBruce Hill <bruce@bruce-hill.com>2025-03-21 21:43:51 -0400
committerBruce Hill <bruce@bruce-hill.com>2025-03-21 21:43:51 -0400
commitdcf266228512e100e779fe72f2d4e9ebb605ffe6 (patch)
tree6fb3cac1ee3647f08bca219949ed8dc61b5861f2 /cordhelpers.c
parent9acea1807f5945c55445a16259386e4979203a1e (diff)
Move files into src/ and build into build/
Diffstat (limited to 'cordhelpers.c')
-rw-r--r--cordhelpers.c71
1 files changed, 0 insertions, 71 deletions
diff --git a/cordhelpers.c b/cordhelpers.c
deleted file mode 100644
index 57189a8f..00000000
--- a/cordhelpers.c
+++ /dev/null
@@ -1,71 +0,0 @@
-// Some helper functions for the GC Cord library
-
-#include <gc/cord.h>
-#include <stdarg.h>
-
-#include "stdlib/util.h"
-
-__attribute__((format(printf, 1, 2)))
-public CORD CORD_asprintf(CORD fmt, ...)
-{
- va_list args;
- va_start(args, fmt);
- CORD c = NULL;
- CORD_vsprintf(&c, fmt, args);
- va_end(args);
- return c;
-}
-
-public CORD CORD_quoted(CORD str)
-{
- CORD quoted = "\"";
- CORD_pos i;
-#pragma GCC diagnostic push
-#pragma GCC diagnostic ignored "-Wsign-conversion"
- CORD_FOR(i, str) {
-#pragma GCC diagnostic pop
- char c = CORD_pos_fetch(i);
- switch (c) {
- case '\a': quoted = CORD_cat(quoted, "\\a"); break;
- case '\b': quoted = CORD_cat(quoted, "\\b"); break;
- case '\x1b': quoted = CORD_cat(quoted, "\\e"); break;
- case '\f': quoted = CORD_cat(quoted, "\\f"); break;
- case '\n': quoted = CORD_cat(quoted, "\\n"); break;
- case '\r': quoted = CORD_cat(quoted, "\\r"); break;
- case '\t': quoted = CORD_cat(quoted, "\\t"); break;
- case '\v': quoted = CORD_cat(quoted, "\\v"); break;
- case '"': quoted = CORD_cat(quoted, "\\\""); break;
- case '\\': quoted = CORD_cat(quoted, "\\\\"); break;
- case '\x00' ... '\x06': case '\x0E' ... '\x1A':
- case '\x1C' ... '\x1F': case '\x7F' ... '\x7F':
- CORD_sprintf(&quoted, "%r\\x%02X", quoted, c);
- break;
- default: quoted = CORD_cat_char(quoted, c); break;
- }
- }
- quoted = CORD_cat_char(quoted, '"');
- return quoted;
-}
-
-public CORD CORD_replace(CORD c, CORD to_replace, CORD replacement)
-{
- size_t len = CORD_len(c);
- size_t replaced_len = CORD_len(to_replace);
- size_t pos = 0;
- CORD ret = CORD_EMPTY;
- while (pos < len) {
- size_t found = CORD_str(c, pos, to_replace);
- if (found == CORD_NOT_FOUND) {
- if (pos < len)
- ret = CORD_cat(ret, CORD_substr(c, pos, len));
- return ret;
- }
- if (found > pos)
- ret = CORD_cat(ret, CORD_substr(c, pos, found-pos));
- ret = CORD_cat(ret, replacement);
- pos = found + replaced_len;
- }
- return ret;
-}
-
-// vim: ts=4 sw=0 et cino=L2,l1,(0,W4,m1,\:0