2021-03-28 07:10:17 +00:00
|
|
|
|
/*-*- mode:c;indent-tabs-mode:nil;c-basic-offset:2;tab-width:8;coding:utf-8 -*-│
|
|
|
|
|
│vi: set net ft=c ts=2 sts=2 sw=2 fenc=utf-8 :vi│
|
|
|
|
|
╞══════════════════════════════════════════════════════════════════════════════╡
|
|
|
|
|
│ Copyright 2021 Justine Alexandra Roberts Tunney │
|
|
|
|
|
│ │
|
|
|
|
|
│ Permission to use, copy, modify, and/or distribute this software for │
|
|
|
|
|
│ any purpose with or without fee is hereby granted, provided that the │
|
|
|
|
|
│ above copyright notice and this permission notice appear in all copies. │
|
|
|
|
|
│ │
|
|
|
|
|
│ THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL │
|
|
|
|
|
│ WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED │
|
|
|
|
|
│ WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE │
|
|
|
|
|
│ AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL │
|
|
|
|
|
│ DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR │
|
|
|
|
|
│ PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER │
|
|
|
|
|
│ TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR │
|
|
|
|
|
│ PERFORMANCE OF THIS SOFTWARE. │
|
|
|
|
|
╚─────────────────────────────────────────────────────────────────────────────*/
|
|
|
|
|
#include "libc/mem/mem.h"
|
|
|
|
|
#include "libc/str/str.h"
|
|
|
|
|
#include "libc/str/thompike.h"
|
|
|
|
|
#include "libc/str/tpenc.h"
|
2021-04-23 17:45:19 +00:00
|
|
|
|
#include "net/http/escape.h"
|
2021-03-28 07:10:17 +00:00
|
|
|
|
|
|
|
|
|
/**
|
2022-07-12 19:30:42 +00:00
|
|
|
|
* Makes control codes and trojan source plainly viewable.
|
2021-03-28 07:10:17 +00:00
|
|
|
|
*
|
|
|
|
|
* This is useful for logging data like HTTP messages, where we don't
|
|
|
|
|
* want full blown C string literal escaping, but we don't want things
|
|
|
|
|
* like raw ANSI control codes from untrusted devices in our terminals.
|
|
|
|
|
*
|
2021-04-23 17:45:19 +00:00
|
|
|
|
* This function also canonicalizes overlong encodings. Therefore it
|
|
|
|
|
* isn't necessary to say VisualizeControlCodes(Underlong(𝑥))) since
|
|
|
|
|
* VisualizeControlCodes(𝑥) will do the same thing.
|
|
|
|
|
*
|
2021-03-28 07:10:17 +00:00
|
|
|
|
* @param data is input value
|
|
|
|
|
* @param size if -1 implies strlen
|
2021-04-18 18:34:59 +00:00
|
|
|
|
* @param out_size if non-NULL receives output length
|
2021-03-28 07:10:17 +00:00
|
|
|
|
* @return allocated NUL-terminated buffer, or NULL w/ errno
|
|
|
|
|
*/
|
|
|
|
|
char *VisualizeControlCodes(const char *data, size_t size, size_t *out_size) {
|
|
|
|
|
uint64_t w;
|
|
|
|
|
char *r, *q;
|
|
|
|
|
unsigned i, n;
|
|
|
|
|
wint_t x, a, b;
|
|
|
|
|
const char *p, *e;
|
2021-04-18 18:34:59 +00:00
|
|
|
|
if (size == -1) size = data ? strlen(data) : 0;
|
2021-03-28 07:10:17 +00:00
|
|
|
|
if ((r = malloc(size * 6 + 1))) {
|
|
|
|
|
q = r;
|
|
|
|
|
p = data;
|
|
|
|
|
e = p + size;
|
|
|
|
|
while (p < e) {
|
|
|
|
|
x = *p++ & 0xff;
|
|
|
|
|
if (x >= 0300) {
|
|
|
|
|
a = ThomPikeByte(x);
|
|
|
|
|
n = ThomPikeLen(x) - 1;
|
|
|
|
|
if (p + n <= e) {
|
|
|
|
|
for (i = 0;;) {
|
|
|
|
|
b = p[i] & 0xff;
|
|
|
|
|
if (!ThomPikeCont(b)) break;
|
|
|
|
|
a = ThomPikeMerge(a, b);
|
|
|
|
|
if (++i == n) {
|
|
|
|
|
x = a;
|
|
|
|
|
p += i;
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
2022-07-12 19:30:42 +00:00
|
|
|
|
|
|
|
|
|
// remap trojan source characters
|
|
|
|
|
if (x == 0x2028) {
|
|
|
|
|
x = L'↵'; // line separator
|
|
|
|
|
} else if (x == 0x2029) {
|
|
|
|
|
x = L'¶'; // paragraph separator
|
|
|
|
|
} else if (x == 0x202A) {
|
|
|
|
|
x = L'⟫'; // left-to-right embedding
|
|
|
|
|
} else if (x == 0x202B) {
|
|
|
|
|
x = L'⟪'; // right-to-left embedding
|
|
|
|
|
} else if (x == 0x202D) {
|
|
|
|
|
x = L'❯'; // left-to-right override
|
|
|
|
|
} else if (x == 0x202E) {
|
|
|
|
|
x = L'❮'; // right-to-left override
|
|
|
|
|
} else if (x == 0x2066) {
|
|
|
|
|
x = L'⟩'; // left-to-right isolate
|
|
|
|
|
} else if (x == 0x2067) {
|
|
|
|
|
x = L'⟨'; // right-to-left isolate
|
|
|
|
|
} else if (x == 0x2068) {
|
|
|
|
|
x = L'⧽'; // first strong isolate
|
|
|
|
|
} else if (x == 0x202C) {
|
|
|
|
|
x = L'⇮'; // pop directional formatting
|
|
|
|
|
} else if (x == 0x2069) {
|
|
|
|
|
x = L'⇯'; // pop directional isolate
|
|
|
|
|
}
|
|
|
|
|
|
2021-03-28 07:10:17 +00:00
|
|
|
|
if (0x80 <= x && x < 0xA0) {
|
|
|
|
|
q[0] = '\\';
|
|
|
|
|
q[1] = 'u';
|
|
|
|
|
q[2] = '0';
|
|
|
|
|
q[3] = '0';
|
|
|
|
|
q[4] = "0123456789abcdef"[(x & 0xF0) >> 4];
|
|
|
|
|
q[5] = "0123456789abcdef"[(x & 0x0F) >> 0];
|
|
|
|
|
q += 6;
|
|
|
|
|
} else {
|
|
|
|
|
if (0x00 <= x && x < 0x20) {
|
|
|
|
|
if (x != '\t' && x != '\r' && x != '\n') {
|
|
|
|
|
x += 0x2400; /* Control Pictures */
|
|
|
|
|
}
|
|
|
|
|
} else if (x == 0x7F) {
|
|
|
|
|
x = 0x2421;
|
|
|
|
|
}
|
|
|
|
|
w = tpenc(x);
|
|
|
|
|
do {
|
|
|
|
|
*q++ = w;
|
|
|
|
|
} while ((w >>= 8));
|
|
|
|
|
}
|
|
|
|
|
}
|
2021-04-18 18:34:59 +00:00
|
|
|
|
n = q - r;
|
2021-03-28 07:10:17 +00:00
|
|
|
|
*q++ = '\0';
|
|
|
|
|
if ((q = realloc(r, q - r))) r = q;
|
2021-04-18 18:34:59 +00:00
|
|
|
|
} else {
|
|
|
|
|
n = 0;
|
|
|
|
|
}
|
|
|
|
|
if (out_size) {
|
|
|
|
|
*out_size = n;
|
2021-03-28 07:10:17 +00:00
|
|
|
|
}
|
|
|
|
|
return r;
|
|
|
|
|
}
|