Merge branch 'stclib:master' into modifiedHEADmodified

1 files changed, 0 insertions, 275 deletions

diff --git a/include/c11/print.h b/include/c11/print.h
deleted file mode 100644
index 7c155875..00000000
--- a/include/c11/print.h
+++ /dev/null
@@ -1,275 +0,0 @@
-#ifndef FMT_H_INCLUDED

-#define FMT_H_INCLUDED

-/* 

-VER 2.1: NEW API:

-void        print(fmt, ...);

-void        println(fmt, ...);

-void        printd(dest, fmt, ...);

-

-void        fmt_print(fmt, ...);

-void        fmt_println(fmt, ...);

-void        fmt_printd(dest, fmt, ...);

-void        fmt_destroy(fmt_buffer* buf);

-

-  dest - destination, one of:

-    FILE* fp        Write to a file

-    char* strbuf    Write to a pre-allocated string buffer

-    fmt_buffer* buf Auto realloc the needed memory (safe).

-                    Set buf->stream=1 for stream-mode.

-                    Call fmt_destroy(buf) after usage.

-

-  fmt - format string

-    {}              Auto-detected format. If :MOD is not specified,

-                    float will use ".8g" format, and double ".16g".

-    {:MOD}          Format modifiers: < left align (replaces -), default for char*, char.

-                                      > right align, default for numbers.

-                    Other than that MOD can be normal printf format modifiers.

-    {{, }}          Print chars {, and }. (note: a single % prints %).

-

-* C11 or higher required.

-* MAX 255 chars fmt string by default. MAX 12 arguments after fmt string.

-* Static linking by default, shared symbols by defining FMT_HEADER / FMT_IMPLEMENT.

-* (c) operamint, 2022, MIT License.

------------------------------------------------------------------------------------

-#include "c11/print.h"

-

-int main() {

-    const double pi = 3.141592653589793;

-    const size_t x = 1234567890;

-    const char* string = "Hello world";

-    const wchar_t* wstr = L"The whole";

-    const char z = 'z';

-    _Bool flag = 1;

-    unsigned char r = 123, g = 214, b = 90, w = 110;

-    char buffer[64];

-

-    print("Color: ({} {} {}), {}\n", r, g, b, flag);

-    println("Wide: {}, {}", wstr, L"wide world");

-    println("{:10} {:10} {:10.2f}", 42ull, 43, pi);

-    println("{:>10} {:>10} {:>10}", z, z, w);

-    printd(stdout, "{:10} {:10} {:10}\n", "Hello", "Mad", "World");

-    printd(stderr, "100%: {:<20} {:.*} {}\n", string, 4, pi, x);

-    printd(buffer, "Precision: {} {:.10} {}", string, pi, x);

-    println("{}", buffer);

-    println("Vector: ({}, {}, {})", 3.2, 3.3, pi);

-

-    fmt_buffer out[1] = {{.stream=1}};

-    printd(out, "{} {}", "Pi is:", pi);

-    print("{}, len={}, cap={}\n", out->data, out->len, out->cap);

-    printd(out, "{} {}", ", Pi squared is:", pi*pi);

-    print("{}, len={}, cap={}\n", out->data, out->len, out->cap);

-    fmt_destroy(out);

-}

-*/

-#include <stdio.h>

-#include <stdint.h>

-#include <assert.h>

-

-#define fmt_OVERLOAD(name, ...) \

-    fmt_JOIN(name, fmt_NUMARGS(__VA_ARGS__))(__VA_ARGS__)

-#define fmt_CONCAT(a, b) a ## b

-#define fmt_JOIN(a, b) fmt_CONCAT(a, b)

-#define fmt_EXPAND(...) __VA_ARGS__

-#define fmt_NUMARGS(...) _fmt_APPLY_ARG_N((__VA_ARGS__, _fmt_RSEQ_N))

-

-#define _fmt_APPLY_ARG_N(args) fmt_EXPAND(_fmt_ARG_N args)

-#define _fmt_RSEQ_N 16, 15, 14, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1, 0

-#define _fmt_ARG_N(_1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, \

-                   _14, _15, _16, N, ...) N

-

-#if defined FMT_HEADER || defined FMT_IMPLEMENT

-#  define FMT_API

-#else

-#  define FMT_API static inline

-#endif

-#if defined FMT_NDEBUG || defined NDEBUG

-#  define fmt_OK(exp) (void)(exp)

-#else

-#  define fmt_OK(exp) assert(exp)

-#endif

-

-typedef struct {

-    char* data;

-    intptr_t cap, len;

-    _Bool stream;

-} fmt_buffer;

-

-FMT_API void fmt_destroy(fmt_buffer* buf);

-FMT_API int  _fmt_parse(char* p, int nargs, const char *fmt, ...);

-FMT_API void _fmt_bprint(fmt_buffer*, const char* fmt, ...);

-

-#ifndef FMT_MAX

-#define FMT_MAX 256

-#endif

-

-#ifndef FMT_NOSHORTS

-#define print(...) fmt_printd(stdout, __VA_ARGS__)

-#define println(...) fmt_printd((fmt_buffer*)0, __VA_ARGS__)

-#define printd fmt_printd

-#endif

-

-#define fmt_print(...) fmt_printd(stdout, __VA_ARGS__)

-#define fmt_println(...) fmt_printd((fmt_buffer*)0, __VA_ARGS__)

-#define fmt_printd(...) fmt_OVERLOAD(fmt_printd, __VA_ARGS__)

-

-/* Primary function. */

-#define fmt_printd2(to, fmt) \

-    do { char _fs[FMT_MAX]; int _n = _fmt_parse(_fs, 0, fmt); \

-        fmt_OK(_n == 0); _fmt_fn(to)(to, fmt); } while (0)

-#define fmt_printd3(to, fmt, c) \

-    do { char _fs[FMT_MAX]; int _n = _fmt_parse(_fs, 1, fmt, _fc(c)); \

-        fmt_OK(_n == 1); _fmt_fn(to)(to, _fs, c); } while (0)

-#define fmt_printd4(to, fmt, c, d) \

-    do { char _fs[FMT_MAX]; int _n = _fmt_parse(_fs, 2, fmt, _fc(c), _fc(d)); \

-        fmt_OK(_n == 2); _fmt_fn(to)(to, _fs, c, d); } while (0)

-#define fmt_printd5(to, fmt, c, d, e) \

-    do { char _fs[FMT_MAX]; int _n = _fmt_parse(_fs, 3, fmt, _fc(c), _fc(d), _fc(e)); \

-        fmt_OK(_n == 3); _fmt_fn(to)(to, _fs, c, d, e); } while (0)

-#define fmt_printd6(to, fmt, c, d, e, f) \

-    do { char _fs[FMT_MAX]; int _n = _fmt_parse(_fs, 4, fmt, _fc(c), _fc(d), _fc(e), _fc(f)); \

-        fmt_OK(_n == 4); _fmt_fn(to)(to, _fs, c, d, e, f); } while (0)

-#define fmt_printd7(to, fmt, c, d, e, f, g) \

-    do { char _fs[FMT_MAX]; int _n = _fmt_parse(_fs, 5, fmt, _fc(c), _fc(d), _fc(e), _fc(f), _fc(g)); \

-        fmt_OK(_n == 5); _fmt_fn(to)(to, _fs, c, d, e, f, g); } while (0)

-#define fmt_printd8(to, fmt, c, d, e, f, g, h) \

-    do { char _fs[FMT_MAX]; int _n = _fmt_parse(_fs, 6, fmt, _fc(c), _fc(d), _fc(e), _fc(f), _fc(g), _fc(h)); \

-        fmt_OK(_n == 6); _fmt_fn(to)(to, _fs, c, d, e, f, g, h); } while (0)

-#define fmt_printd9(to, fmt, c, d, e, f, g, h, i) \

-    do { char _fs[FMT_MAX]; int _n = _fmt_parse(_fs, 7, fmt, _fc(c), _fc(d), _fc(e), _fc(f), _fc(g), _fc(h), _fc(i)); \

-        fmt_OK(_n == 7); _fmt_fn(to)(to, _fs, c, d, e, f, g, h, i); } while (0)

-#define fmt_printd10(to, fmt, c, d, e, f, g, h, i, j) \

-    do { char _fs[FMT_MAX]; int _n = _fmt_parse(_fs, 8, fmt, _fc(c), _fc(d), _fc(e), _fc(f), _fc(g), _fc(h), \

-                                                                     _fc(i), _fc(j)); \

-        fmt_OK(_n == 8); _fmt_fn(to)(to, _fs, c, d, e, f, g, h, i, j); } while (0)

-#define fmt_printd11(to, fmt, c, d, e, f, g, h, i, j, k) \

-    do { char _fs[FMT_MAX]; int _n = _fmt_parse(_fs, 9, fmt, _fc(c), _fc(d), _fc(e), _fc(f), _fc(g), _fc(h), \

-                                                                     _fc(i), _fc(j), _fc(k)); \

-        fmt_OK(_n == 9); _fmt_fn(to)(to, _fs, c, d, e, f, g, h, i, j, k); } while (0)

-#define fmt_printd12(to, fmt, c, d, e, f, g, h, i, j, k, m) \

-    do { char _fs[FMT_MAX]; int _n = _fmt_parse(_fs, 10, fmt, _fc(c), _fc(d), _fc(e), _fc(f), _fc(g), _fc(h), \

-                                                                      _fc(i), _fc(j), _fc(k), _fc(m)); \

-        fmt_OK(_n == 10); _fmt_fn(to)(to, _fs, c, d, e, f, g, h, i, j, k, m); } while (0)

-#define fmt_printd13(to, fmt, c, d, e, f, g, h, i, j, k, m, n) \

-    do { char _fs[FMT_MAX]; int _n = _fmt_parse(_fs, 11, fmt, _fc(c), _fc(d), _fc(e), _fc(f), _fc(g), _fc(h), \

-                                                                      _fc(i), _fc(j), _fc(k), _fc(m), _fc(n)); \

-        fmt_OK(_n == 11); _fmt_fn(to)(to, _fs, c, d, e, f, g, h, i, j, k, m, n); } while (0)

-#define fmt_printd14(to, fmt, c, d, e, f, g, h, i, j, k, m, n, o) \

-    do { char _fs[FMT_MAX]; int _n = _fmt_parse(_fs, 12, fmt, _fc(c), _fc(d), _fc(e), _fc(f), _fc(g), _fc(h), \

-                                                                      _fc(i), _fc(j), _fc(k), _fc(m), _fc(n), _fc(o)); \

-        fmt_OK(_n == 12); _fmt_fn(to)(to, _fs, c, d, e, f, g, h, i, j, k, m, n, o); } while (0)

-

-#define _fmt_fn(x) _Generic ((x), \

-    FILE*: fprintf, \

-    char*: sprintf, \

-    fmt_buffer*: _fmt_bprint)

-

-#if defined(_MSC_VER) && !defined(__clang__)

-#  define _signed_char_hhd

-#else

-#  define _signed_char_hhd signed char: "hhd",

-#endif

-

-#define _fc(x) _Generic (x, \

-    _Bool: "d", \

-    unsigned char: "hhu", \

-    _signed_char_hhd \

-    char: "c", \

-    short: "hd", \

-    unsigned short: "hu", \

-    int: "d", \

-    unsigned: "u", \

-    long: "ld", \

-    unsigned long: "lu", \

-    long long: "lld", \

-    unsigned long long: "llu", \

-    float: "g", \

-    double: "@g", \

-    long double: "@Lg", \

-    char*: "s", \

-    wchar_t*: "ls", \

-    void*: "p", \

-    const char*: "s", \

-    const wchar_t*: "ls", \

-    const void*: "p")

-

-#if defined FMT_IMPLEMENT || !(defined FMT_HEADER || defined FMT_IMPLEMENT)

-

-#include <stdlib.h>

-#include <stdarg.h>

-#include <string.h>

-

-FMT_API void fmt_destroy(fmt_buffer* buf) {

-    free(buf->data);

-}

-

-FMT_API void _fmt_bprint(fmt_buffer* buf, const char* fmt, ...) {

-    va_list args, args2;

-    va_start(args, fmt);

-    if (buf == NULL) {

-        vprintf(fmt, args); putchar('\n');

-        goto done1;

-    }

-    va_copy(args2, args);

-    const int n = vsnprintf(NULL, 0U, fmt, args);

-    if (n < 0) goto done2;

-    const intptr_t pos = buf->stream ? buf->len : 0;

-    buf->len = pos + n;

-    if (buf->len > buf->cap) {

-        buf->cap = buf->len + buf->cap/2;

-        buf->data = (char*)realloc(buf->data, (size_t)buf->cap + 1U);

-    }

-    vsprintf(buf->data + pos, fmt, args2);

-    done2: va_end(args2);

-    done1: va_end(args);

-}

-

-FMT_API int _fmt_parse(char* p, int nargs, const char *fmt, ...) {

-    char *arg, *p0, ch;

-    int n = 0, empty;

-    va_list args;

-    va_start(args, fmt);

-    do {

-        switch ((ch = *fmt)) {

-        case '%':

-            *p++ = '%';

-            break;

-        case '}':

-            if (*++fmt == '}') break; /* ok */

-            n = 99;

-            continue;

-        case '{':

-            if (*++fmt == '{') break; /* ok */

-            if (++n > nargs) continue;

-            if (*fmt != ':' && *fmt != '}') n = 99;

-            fmt += (*fmt == ':');

-            empty = *fmt == '}';

-            arg = va_arg(args, char *);

-            *p++ = '%', p0 = p;

-            while (1) switch (*fmt) {

-                case '\0': n = 99; /* nobreak */

-                case '}': goto done;

-                case '<': *p++ = '-', ++fmt; break;

-                case '>': p0 = NULL; /* nobreak */

-                case '-': ++fmt; break;

-                case '*': if (++n <= nargs) arg = va_arg(args, char *); /* nobreak */

-                default: *p++ = *fmt++;

-            }

-            done:

-            switch (*arg) {

-            case 'g': if (empty) memcpy(p, ".8", 2), p += 2; break;

-            case '@': ++arg; if (empty) memcpy(p, ".16", 3), p += 3; break;

-            }

-            if (!strchr("csdioxXufFeEaAgGnp", fmt[-1]))

-                while (*arg) *p++ = *arg++;

-            if (p0 && (p[-1] == 's' || p[-1] == 'c')) /* left-align str */

-                memmove(p0 + 1, p0, (size_t)(p++ - p0)), *p0 = '-';

-            fmt += *fmt == '}';

-            continue;

-        }

-        *p++ = *fmt++;

-    } while (ch);

-    va_end(args);

-    return n;

-}

-#endif

-#endif