cosmopolitan/tool/viz/ascii2utf8.c
Jōshin e16a7d8f3b
flip et / noet in modelines
`et` means `expandtab`.

```sh
rg 'vi: .* :vi' -l -0 | \
  xargs -0 sed -i '' 's/vi: \(.*\) et\(.*\)  :vi/vi: \1 xoet\2:vi/'
rg 'vi: .*  :vi' -l -0 | \
  xargs -0 sed -i '' 's/vi: \(.*\)noet\(.*\):vi/vi: \1et\2  :vi/'
rg 'vi: .*  :vi' -l -0 | \
  xargs -0 sed -i '' 's/vi: \(.*\)xoet\(.*\):vi/vi: \1noet\2:vi/'
```
2023-12-07 22:17:11 -05:00

120 lines
4.7 KiB
C
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

/*-*- mode:c;indent-tabs-mode:nil;c-basic-offset:2;tab-width:8;coding:utf-8 -*-│
│ vi: set et ft=c ts=2 sts=2 sw=2 fenc=utf-8 :vi │
╞══════════════════════════════════════════════════════════════════════════════╡
│ Copyright 2020 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/errno.h"
#include "libc/stdio/stdio.h"
/**
@fileoverview Converts ASCII combining marks to UNICODE.
Getting started:
nroff -mandoc -rLL=72n -rLT=78n -Tutf8 <manpage.1 |
o/tool/viz/ascii2utf8.com
ASCII Bold:
- CHAR BACKSPACE CHAR c ++ "\b" ++ c
e.g. AABBCCDD 410841 420842 430843 440844
ASCII Underlines:
- CHAR BACKSPACE LOW LINE c ++ "\b_"
e.g. A_B_C_D_ 41085F 42085F 43085F 44085F
UNICODE Underlines:
- COMBINING LOW LINE U+0332 (\xCC\xB1)
e.g. A̲B̲C̲D̲ (ugly notches) 41CCB2 42CCB2 43CCB2 44CCB2
- COMBINING MACRON BELOW U+0331 (\xCC\xB1)
e.g. A̱ḆC̱Ḏ (too short) 41CCB1 42CCB1 43CCB1 44CCB1
- COMBINING DOUBLE MACRON BELOW U+035F (\xCD\x9F)
e.g. A͟B͟C͟D͟ (too long) 41CD9F 42CD9F 43CD9F 44CD9F
- DOUBLE PLUS COMBINING MACRON BELOW 3×U+035F + 1×U+0331
e.g. A͟B͟C͟Ḏ (too narrow) 41CCB1 42CCB1 43CCB1 44CD9F
- DOUBLE PLUS COMBINING MACRON LOW LINE [it's complicated]
e.g. A͟B͟C͟D̲ (𝑓𝑙𝑎𝑤𝑙𝑒𝑠𝑠) 41CD9F 42CD9F 43CD9F 44CCB2
*/
const wint_t kBackspace = '\b';
const wint_t kCombiningLowLine = L'\u0332';
const wint_t kCombiningDoubleMacronBelow = L'\u035f';
forceinline int PutChar(wint_t (*buf)[3], size_t *i, wint_t *cc, FILE *out) {
if (fputwc((*buf)[0], out) == -1) return -1;
if (*cc != -1) {
if (fputwc(*cc, out) == -1) return -1;
*cc = -1;
}
(*buf)[0] = (*buf)[1];
(*buf)[1] = (*buf)[2];
--*i;
return 0;
}
int CombineAsciiMarks(FILE *in, FILE *out) {
wint_t buf[3], wc = 0, cc = -1;
size_t i = 0;
for (;;) {
while (i < 3) {
if ((wc = fgetwc(in)) == -1) goto InputBreak;
buf[i++] = wc;
}
if (buf[1] == '\b' && cc == -1) {
if (buf[0] == buf[2]) { /* bold */
if (L'0' <= buf[0] && buf[0] <= L'9') {
buf[0] = L'𝟬' + (buf[0] - L'0');
i = 1;
} else if (L'A' <= buf[0] && buf[0] <= L'Z') {
buf[0] = L'𝐀' + (buf[0] - L'A');
i = 1;
} else if ('a' <= buf[0] && buf[0] <= L'z') {
buf[0] = L'𝗮' + (buf[0] - L'a');
i = 1;
} else {
i = 1;
}
} else if (buf[2] == '_') { /* underline */
cc = kCombiningLowLine;
i = 1;
} else if (buf[0] == '_') {
cc = kCombiningLowLine;
buf[0] = buf[2];
i = 1;
}
}
if (i == 3) {
if (PutChar(&buf, &i, &cc, out) == -1) goto OutputBreak;
}
}
InputBreak:
while (i) {
if (PutChar(&buf, &i, &cc, out) == -1) goto OutputBreak;
}
OutputBreak:
return (fclose(in) | fclose(out)) != -1 ? 0 : -1;
}
int main(int argc, char *argv[]) {
return CombineAsciiMarks(stdin, stdout) != -1 ? 0 : errno;
}