Commit 05d8b565ad1a1d6c0c1e93dc47f1d828043fcafc | zig

author	Alex Rønne Petersen <alex@alexrp.com> 2025-02-16 03:35:35+01:00
committer	Alex Rønne Petersen <alex@alexrp.com> 2025-02-21 09:23:50+01:00
log	05d8b565ad1a1d6c0c1e93dc47f1d828043fcafc
tree	db8e6ccad3d8e192617f57343886ed59e3954765
parent	31e7c95bd20801c6cb0cfbc47074333754f82ad5

wasi-libc: Deduplicate sources and headers with regards to upstream musl.

Unfortunately some duplicate files must remain in lib/libc/wasi/libc-top-half
because they include internal headers *in the same directory* which have edits
relative to upstream musl. Because C is an amazing language, there is no way to
make it so that e.g. upstream musl's src/stdio/fputc.c includes wasi-libc's
src/stdio/putc.h instead of the upstream putc.h. The preprocessor always
searches the current directory first for quote includes.

Anyway, this still takes us from 2.9M to 1.4M for the combination of
lib/libc/wasi and lib/libc/include/wasm-wasi-musl, so I still call it a win.

777 files changed, 650 insertions(+), 44229 deletions(-)

lib
- libc
  - include
    wasm-wasi-musl
    alloca.h
    ar.h
    arpa
    ftp.h
    telnet.h
    assert.h
    bits
    float.h
    hwcap.h
    io.h
    ioctl_fix.h
    ipcstat.h
    mman.h
    poll.h
    reg.h
    resource.h
    socket.h
    byteswap.h
    cpio.h
    crypt.h
    ctype.h
    endian.h
    err.h
    features.h
    fmtmsg.h
    fnmatch.h
    getopt.h
    iconv.h
    iso646.h
    langinfo.h
    libgen.h
    memory.h
    monetary.h
    mqueue.h
    netinet
    icmp6.h
    igmp.h
    in_systm.h
    ip.h
    ip6.h
    ip_icmp.h
    tcp.h
    udp.h
    netpacket
    packet.h
    nl_types.h
    regex.h
    search.h
    semaphore.h
    stdalign.h
    stdbool.h
    stdint.h
    stdio_ext.h
    stdnoreturn.h
    stropts.h
    sys
    dir.h
    errno.h
    eventfd.h
    fcntl.h
    file.h
    poll.h
    reg.h
    signal.h
    stropts.h
    sysinfo.h
    timeb.h
    timex.h
    ttydefaults.h
    utsname.h
    syscall.h
    sysexits.h
    tar.h
    tgmath.h
    threads.h
    uchar.h
    utime.h
    values.h
    wctype.h
  - wasi
    libc-top-half
    musl
    arch
    generic
    bits
    dirent.h
    errno.h
    fcntl.h
    fenv.h
    hwcap.h
    io.h
    ioctl.h
    ioctl_fix.h
    ipc.h
    ipcstat.h
    kd.h
    limits.h
    link.h
    mman.h
    msg.h
    poll.h
    ptrace.h
    resource.h
    sem.h
    shm.h
    socket.h
    soundcard.h
    statfs.h
    termios.h
    vt.h
    fp_arch.h
    include
    alloca.h
    ar.h
    arpa
    ftp.h
    nameser_compat.h
    telnet.h
    tftp.h
    assert.h
    byteswap.h
    cpio.h
    crypt.h
    ctype.h
    endian.h
    err.h
    features.h
    fenv.h
    fmtmsg.h
    fnmatch.h
    getopt.h
    iconv.h
    ifaddrs.h
    iso646.h
    langinfo.h
    libgen.h
    memory.h
    monetary.h
    mqueue.h
    netinet
    icmp6.h
    igmp.h
    in_systm.h
    ip.h
    ip6.h
    ip_icmp.h
    tcp.h
    udp.h
    netpacket
    packet.h
    nl_types.h
    regex.h
    search.h
    semaphore.h
    stdalign.h
    stdbool.h
    stdint.h
    stdio_ext.h
    stdnoreturn.h
    stropts.h
    sys
    dir.h
    errno.h
    eventfd.h
    fcntl.h
    file.h
    poll.h
    reg.h
    signal.h
    stropts.h
    sysinfo.h
    timeb.h
    timex.h
    ttydefaults.h
    utsname.h
    syscall.h
    sysexits.h
    tar.h
    tgmath.h
    threads.h
    uchar.h
    utime.h
    values.h
    wctype.h
    src
    complex
    __cexp.c
    __cexpf.c
    cabs.c
    cabsf.c
    cabsl.c
    cacos.c
    cacosf.c
    cacosh.c
    cacoshf.c
    cacoshl.c
    cacosl.c
    carg.c
    cargf.c
    cargl.c
    casin.c
    casinf.c
    casinh.c
    casinhf.c
    casinhl.c
    casinl.c
    catan.c
    catanf.c
    catanh.c
    catanhf.c
    catanhl.c
    catanl.c
    ccos.c
    ccosf.c
    ccosh.c
    ccoshf.c
    ccoshl.c
    ccosl.c
    cexp.c
    cexpf.c
    cexpl.c
    clog.c
    clogf.c
    clogl.c
    conj.c
    conjf.c
    conjl.c
    cpow.c
    cpowf.c
    cpowl.c
    cproj.c
    cprojf.c
    cprojl.c
    csin.c
    csinf.c
    csinh.c
    csinhf.c
    csinhl.c
    csinl.c
    csqrt.c
    csqrtf.c
    csqrtl.c
    ctan.c
    ctanf.c
    ctanh.c
    ctanhf.c
    ctanhl.c
    ctanl.c
    conf
    legacy.c
    pathconf.c
    crypt
    crypt.c
    crypt_blowfish.c
    crypt_des.c
    crypt_des.h
    crypt_md5.c
    crypt_r.c
    crypt_sha256.c
    crypt_sha512.c
    encrypt.c
    ctype
    __ctype_b_loc.c
    __ctype_get_mb_cur_max.c
    __ctype_tolower_loc.c
    __ctype_toupper_loc.c
    alpha.h
    casemap.h
    isalnum.c
    isalpha.c
    isascii.c
    isblank.c
    iscntrl.c
    isdigit.c
    isgraph.c
    islower.c
    isprint.c
    ispunct.c
    isspace.c
    isupper.c
    iswalnum.c
    iswalpha.c
    iswblank.c
    iswcntrl.c
    iswctype.c
    iswdigit.c
    iswgraph.c
    iswlower.c
    iswprint.c
    iswpunct.c
    iswspace.c
    iswupper.c
    iswxdigit.c
    isxdigit.c
    nonspacing.h
    punct.h
    toascii.c
    tolower.c
    toupper.c
    towctrans.c
    wcswidth.c
    wctrans.c
    wcwidth.c
    wide.h
    dirent
    __dirent.h
    env
    setenv.c
    exit
    assert.c
    quick_exit.c
    fenv
    fegetexceptflag.c
    feholdexcept.c
    fenv.c
    fesetexceptflag.c
    fesetround.c
    feupdateenv.c
    include
    arpa
    inet.h
    crypt.h
    features.h
    langinfo.h
    stdlib.h
    string.h
    sys
    mman.h
    sysinfo.h
    time.h
    time.h
    internal
    aio_impl.h
    atomic.h
    dynlink.h
    fdpic_crt.h
    futex.h
    intscan.h
    legacy
    getpagesize.c
    locale
    __lctrans.c
    __mo_lookup.c
    big5.h
    c_locale.c
    codepages.h
    duplocale.c
    freelocale.c
    gb18030.h
    hkscs.h
    iconv.c
    iconv_close.c
    jis0208.h
    ksc.h
    langinfo.c
    legacychars.h
    localeconv.c
    pleval.c
    pleval.h
    revjis.h
    setlocale.c
    strcoll.c
    strfmon.c
    strtod_l.c
    strxfrm.c
    wcscoll.c
    wcsxfrm.c
    math
    __cos.c
    __cosdf.c
    __cosl.c
    __invtrigl.c
    __invtrigl.h
    __math_divzero.c
    __math_divzerof.c
    __math_invalid.c
    __math_invalidf.c
    __math_invalidl.c
    __math_oflow.c
    __math_oflowf.c
    __math_uflow.c
    __math_uflowf.c
    __math_xflow.c
    __math_xflowf.c
    __polevll.c
    __rem_pio2_large.c
    __sin.c
    __sindf.c
    __sinl.c
    __tan.c
    __tandf.c
    __tanl.c
    acos.c
    acosf.c
    acosh.c
    acoshf.c
    acoshl.c
    acosl.c
    asin.c
    asinf.c
    asinh.c
    asinhf.c
    asinhl.c
    asinl.c
    atan.c
    atan2.c
    atan2f.c
    atan2l.c
    atanf.c
    atanh.c
    atanhf.c
    atanhl.c
    atanl.c
    cbrt.c
    cbrtf.c
    cbrtl.c
    ceill.c
    copysignl.c
    cos.c
    cosf.c
    coshl.c
    cosl.c
    erf.c
    erff.c
    erfl.c
    exp.c
    exp10.c
    exp10f.c
    exp10l.c
    exp2.c
    exp2f.c
    exp2f_data.c
    exp2f_data.h
    exp2l.c
    exp_data.c
    exp_data.h
    expf.c
    expl.c
    expm1.c
    expm1f.c
    expm1l.c
    fabsl.c
    fdim.c
    fdimf.c
    fdiml.c
    finite.c
    finitef.c
    floorl.c
    fma.c
    fmaf.c
    fmaxl.c
    fminl.c
    fmod.c
    fmodf.c
    fmodl.c
    frexp.c
    frexpf.c
    frexpl.c
    hypot.c
    hypotf.c
    hypotl.c
    ilogb.c
    ilogbf.c
    ilogbl.c
    j0.c
    j0f.c
    j1.c
    j1f.c
    jn.c
    jnf.c
    ldexp.c
    ldexpf.c
    ldexpl.c
    lgamma.c
    lgamma_r.c
    lgammaf.c
    lgammaf_r.c
    lgammal.c
    llrint.c
    llrintf.c
    llrintl.c
    llround.c
    llroundf.c
    llroundl.c
    log.c
    log10.c
    log10f.c
    log10l.c
    log1p.c
    log1pf.c
    log1pl.c
    log2.c
    log2_data.c
    log2_data.h
    log2f.c
    log2f_data.c
    log2f_data.h
    log2l.c
    log_data.c
    log_data.h
    logb.c
    logbf.c
    logbl.c
    logf.c
    logf_data.c
    logf_data.h
    logl.c
    lrint.c
    lrintf.c
    lrintl.c
    lround.c
    lroundf.c
    lroundl.c
    modf.c
    modff.c
    modfl.c
    nan.c
    nanf.c
    nanl.c
    nearbyintl.c
    nextafter.c
    nextafterf.c
    nextafterl.c
    nexttoward.c
    nexttowardf.c
    nexttowardl.c
    pow.c
    pow_data.c
    pow_data.h
    powf.c
    powf_data.c
    powf_data.h
    remainder.c
    remainderf.c
    remainderl.c
    remquo.c
    remquof.c
    remquol.c
    rintl.c
    round.c
    roundf.c
    roundl.c
    scalb.c
    scalbf.c
    scalbln.c
    scalblnf.c
    scalblnl.c
    scalbn.c
    scalbnf.c
    scalbnl.c
    signgam.c
    significand.c
    significandf.c
    sin.c
    sincos.c
    sincosf.c
    sincosl.c
    sinf.c
    sinhl.c
    sinl.c
    sqrt_data.c
    sqrt_data.h
    sqrtl.c
    tan.c
    tanf.c
    tanh.c
    tanhf.c
    tanhl.c
    tanl.c
    tgamma.c
    tgammaf.c
    tgammal.c
    truncl.c
    misc
    a64l.c
    basename.c
    dirname.c
    ffs.c
    ffsl.c
    ffsll.c
    getdomainname.c
    gethostid.c
    getopt.c
    getopt_long.c
    getsubopt.c
    realpath.c
    multibyte
    btowc.c
    c16rtomb.c
    c32rtomb.c
    internal.c
    internal.h
    mblen.c
    mbrlen.c
    mbrtoc16.c
    mbrtoc32.c
    mbrtowc.c
    mbsinit.c
    mbsnrtowcs.c
    mbsrtowcs.c
    mbstowcs.c
    mbtowc.c
    wcrtomb.c
    wcsnrtombs.c
    wcsrtombs.c
    wcstombs.c
    wctob.c
    wctomb.c
    network
    htonl.c
    htons.c
    in6addr_any.c
    in6addr_loopback.c
    inet_aton.c
    inet_ntop.c
    inet_pton.c
    lookup.h
    netlink.h
    ntohl.c
    ntohs.c
    prng
    __rand48_step.c
    __seed48.c
    drand48.c
    lcong48.c
    lrand48.c
    mrand48.c
    rand.c
    rand48.h
    rand_r.c
    seed48.c
    srand48.c
    regex
    fnmatch.c
    regerror.c
    search
    hsearch.c
    insque.c
    lsearch.c
    tdelete.c
    tdestroy.c
    tfind.c
    tsearch.c
    tsearch.h
    twalk.c
    signal
    psignal.c
    stdio
    __fclose_ca.c
    __fmodeflags.c
    __overflow.c
    __stdio_exit.c
    __toread.c
    __towrite.c
    __uflow.c
    asprintf.c
    clearerr.c
    dprintf.c
    ext.c
    ext2.c
    fclose.c
    feof.c
    ferror.c
    fflush.c
    fgetln.c
    fgets.c
    fgetwc.c
    fgetws.c
    fileno.c
    fopencookie.c
    fprintf.c
    fputs.c
    fputwc.c
    fputws.c
    fread.c
    fscanf.c
    fwide.c
    fwprintf.c
    fwrite.c
    fwscanf.c
    getc_unlocked.c
    getchar_unlocked.c
    getdelim.c
    getline.c
    getw.c
    getwc.c
    getwchar.c
    ofl_add.c
    perror.c
    putc_unlocked.c
    putchar_unlocked.c
    puts.c
    putw.c
    putwc.c
    putwchar.c
    rewind.c
    scanf.c
    setbuf.c
    setbuffer.c
    setlinebuf.c
    setvbuf.c
    snprintf.c
    sprintf.c
    sscanf.c
    swprintf.c
    swscanf.c
    ungetwc.c
    vasprintf.c
    vprintf.c
    vscanf.c
    vsprintf.c
    vwprintf.c
    vwscanf.c
    wprintf.c
    wscanf.c
    stdlib
    abs.c
    atof.c
    atoi.c
    atol.c
    atoll.c
    bsearch.c
    div.c
    ecvt.c
    fcvt.c
    gcvt.c
    imaxabs.c
    imaxdiv.c
    labs.c
    ldiv.c
    llabs.c
    lldiv.c
    qsort.c
    qsort_nr.c
    string
    bcmp.c
    bcopy.c
    bzero.c
    explicit_bzero.c
    index.c
    memccpy.c
    memchr.c
    memcmp.c
    memmem.c
    mempcpy.c
    memrchr.c
    rindex.c
    stpcpy.c
    stpncpy.c
    strcasecmp.c
    strcasestr.c
    strcat.c
    strchr.c
    strchrnul.c
    strcmp.c
    strcpy.c
    strcspn.c
    strdup.c
    strerror_r.c
    strlcat.c
    strlcpy.c
    strlen.c
    strncasecmp.c
    strncat.c
    strncmp.c
    strncpy.c
    strndup.c
    strnlen.c
    strpbrk.c
    strrchr.c
    strsep.c
    strsignal.c
    strspn.c
    strstr.c
    strtok.c
    strtok_r.c
    strverscmp.c
    swab.c
    wcpcpy.c
    wcpncpy.c
    wcscasecmp.c
    wcscasecmp_l.c
    wcscat.c
    wcschr.c
    wcscmp.c
    wcscpy.c
    wcscspn.c
    wcsdup.c
    wcslen.c
    wcsncasecmp.c
    wcsncasecmp_l.c
    wcsncat.c
    wcsncmp.c
    wcsncpy.c
    wcsnlen.c
    wcspbrk.c
    wcsrchr.c
    wcsspn.c
    wcsstr.c
    wcstok.c
    wcswcs.c
    wmemchr.c
    wmemcmp.c
    wmemcpy.c
    wmemmove.c
    wmemset.c
    thread
    thrd_sleep.c
    time
    __month_to_secs.c
    __year_to_secs.c
    asctime.c
    asctime_r.c
    ctime.c
    ctime_r.c
    difftime.c
    ftime.c
    strptime.c
    timespec_get.c
    unistd
    posix_close.c
src
- wasi_libc.zig

lib/libc/include/wasm-wasi-musl/alloca.h deleted-19

...	@@ -1,19 +0,0 @@
1	#ifndef _ALLOCA_H
2	#define _ALLOCA_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#define __NEED_size_t
9	#include <bits/alltypes.h>
10
11	void *alloca(size_t);
12
13	#define alloca __builtin_alloca
14
15	#ifdef __cplusplus
16	}
17	#endif
18
19	#endif

lib/libc/include/wasm-wasi-musl/ar.h deleted-25

...	@@ -1,25 +0,0 @@
1	#ifndef _AR_H
2	#define _AR_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#define ARMAG "!<arch>\n"
9	#define SARMAG 8
10	#define ARFMAG "`\n"
11
12	struct ar_hdr {
13	char ar_name[16];
14	char ar_date[12];
15	char ar_uid[6], ar_gid[6];
16	char ar_mode[8];
17	char ar_size[10];
18	char ar_fmag[2];
19	};
20
21	#ifdef __cplusplus
22	}
23	#endif
24
25	#endif

lib/libc/include/wasm-wasi-musl/arpa/ftp.h deleted-35

...	@@ -1,35 +0,0 @@
1	#ifndef _ARPA_FTP_H
2	#define _ARPA_FTP_H
3	#define PRELIM 1
4	#define COMPLETE 2
5	#define CONTINUE 3
6	#define TRANSIENT 4
7	#define ERROR 5
8	#define TYPE_A 1
9	#define TYPE_E 2
10	#define TYPE_I 3
11	#define TYPE_L 4
12	#define FORM_N 1
13	#define FORM_T 2
14	#define FORM_C 3
15	#define STRU_F 1
16	#define STRU_R 2
17	#define STRU_P 3
18	#define MODE_S 1
19	#define MODE_B 2
20	#define MODE_C 3
21	#define REC_ESC '\377'
22	#define REC_EOR '\001'
23	#define REC_EOF '\002'
24	#define BLK_EOR 0x80
25	#define BLK_EOF 0x40
26	#define BLK_ERRORS 0x20
27	#define BLK_RESTART 0x10
28	#define BLK_BYTECOUNT 2
29	#ifdef FTP_NAMES
30	char *modenames[] = {"0", "Stream", "Block", "Compressed" };
31	char *strunames[] = {"0", "File", "Record", "Page" };
32	char *typenames[] = {"0", "ASCII", "EBCDIC", "Image", "Local" };
33	char *formnames[] = {"0", "Nonprint", "Telnet", "Carriage-control" };
34	#endif
35	#endif

lib/libc/include/wasm-wasi-musl/arpa/telnet.h deleted-251

...	@@ -1,251 +0,0 @@
1	#ifndef _ARPA_TELNET_H
2	#define _ARPA_TELNET_H
3
4	#define IAC 255
5	#define DONT 254
6	#define DO 253
7	#define WONT 252
8	#define WILL 251
9	#define SB 250
10	#define GA 249
11	#define EL 248
12	#define EC 247
13	#define AYT 246
14	#define AO 245
15	#define IP 244
16	#define BREAK 243
17	#define DM 242
18	#define NOP 241
19	#define SE 240
20	#define EOR 239
21	#define ABORT 238
22	#define SUSP 237
23	#define xEOF 236
24
25	#define SYNCH 242
26
27	#define telcmds ((char [][6]){ "EOF", "SUSP", "ABORT", "EOR", "SE", "NOP", "DMARK", "BRK", "IP", "AO", "AYT", "EC", "EL", "GA", "SB", "WILL", "WONT", "DO", "DONT", "IAC", 0 })
28
29	#define TELCMD_FIRST xEOF
30	#define TELCMD_LAST IAC
31	#define TELCMD_OK(x) ((unsigned int)(x) <= TELCMD_LAST && \
32	(unsigned int)(x) >= TELCMD_FIRST)
33	#define TELCMD(x) telcmds[(x)-TELCMD_FIRST]
34
35	#define TELOPT_BINARY 0
36	#define TELOPT_ECHO 1
37	#define TELOPT_RCP 2
38	#define TELOPT_SGA 3
39	#define TELOPT_NAMS 4
40	#define TELOPT_STATUS 5
41	#define TELOPT_TM 6
42	#define TELOPT_RCTE 7
43	#define TELOPT_NAOL 8
44	#define TELOPT_NAOP 9
45	#define TELOPT_NAOCRD 10
46	#define TELOPT_NAOHTS 11
47	#define TELOPT_NAOHTD 12
48	#define TELOPT_NAOFFD 13
49	#define TELOPT_NAOVTS 14
50	#define TELOPT_NAOVTD 15
51	#define TELOPT_NAOLFD 16
52	#define TELOPT_XASCII 17
53	#define TELOPT_LOGOUT 18
54	#define TELOPT_BM 19
55	#define TELOPT_DET 20
56	#define TELOPT_SUPDUP 21
57	#define TELOPT_SUPDUPOUTPUT 22
58	#define TELOPT_SNDLOC 23
59	#define TELOPT_TTYPE 24
60	#define TELOPT_EOR 25
61	#define TELOPT_TUID 26
62	#define TELOPT_OUTMRK 27
63	#define TELOPT_TTYLOC 28
64	#define TELOPT_3270REGIME 29
65	#define TELOPT_X3PAD 30
66	#define TELOPT_NAWS 31
67	#define TELOPT_TSPEED 32
68	#define TELOPT_LFLOW 33
69	#define TELOPT_LINEMODE 34
70	#define TELOPT_XDISPLOC 35
71	#define TELOPT_OLD_ENVIRON 36
72	#define TELOPT_AUTHENTICATION 37/* Authenticate */
73	#define TELOPT_ENCRYPT 38
74	#define TELOPT_NEW_ENVIRON 39
75	#define TELOPT_EXOPL 255
76
77
78	#define NTELOPTS (1+TELOPT_NEW_ENVIRON)
79	#ifdef TELOPTS
80	char *telopts[NTELOPTS+1] = {
81	"BINARY", "ECHO", "RCP", "SUPPRESS GO AHEAD", "NAME",
82	"STATUS", "TIMING MARK", "RCTE", "NAOL", "NAOP",
83	"NAOCRD", "NAOHTS", "NAOHTD", "NAOFFD", "NAOVTS",
84	"NAOVTD", "NAOLFD", "EXTEND ASCII", "LOGOUT", "BYTE MACRO",
85	"DATA ENTRY TERMINAL", "SUPDUP", "SUPDUP OUTPUT",
86	"SEND LOCATION", "TERMINAL TYPE", "END OF RECORD",
87	"TACACS UID", "OUTPUT MARKING", "TTYLOC",
88	"3270 REGIME", "X.3 PAD", "NAWS", "TSPEED", "LFLOW",
89	"LINEMODE", "XDISPLOC", "OLD-ENVIRON", "AUTHENTICATION",
90	"ENCRYPT", "NEW-ENVIRON",
91	0,
92	};
93	#define TELOPT_FIRST TELOPT_BINARY
94	#define TELOPT_LAST TELOPT_NEW_ENVIRON
95	#define TELOPT_OK(x) ((unsigned int)(x) <= TELOPT_LAST)
96	#define TELOPT(x) telopts[(x)-TELOPT_FIRST]
97	#endif
98
99	#define TELQUAL_IS 0
100	#define TELQUAL_SEND 1
101	#define TELQUAL_INFO 2
102	#define TELQUAL_REPLY 2
103	#define TELQUAL_NAME 3
104
105	#define LFLOW_OFF 0
106	#define LFLOW_ON 1
107	#define LFLOW_RESTART_ANY 2
108	#define LFLOW_RESTART_XON 3
109
110
111	#define LM_MODE 1
112	#define LM_FORWARDMASK 2
113	#define LM_SLC 3
114
115	#define MODE_EDIT 0x01
116	#define MODE_TRAPSIG 0x02
117	#define MODE_ACK 0x04
118	#define MODE_SOFT_TAB 0x08
119	#define MODE_LIT_ECHO 0x10
120
121	#define MODE_MASK 0x1f
122
123	#define MODE_FLOW 0x0100
124	#define MODE_ECHO 0x0200
125	#define MODE_INBIN 0x0400
126	#define MODE_OUTBIN 0x0800
127	#define MODE_FORCE 0x1000
128
129	#define SLC_SYNCH 1
130	#define SLC_BRK 2
131	#define SLC_IP 3
132	#define SLC_AO 4
133	#define SLC_AYT 5
134	#define SLC_EOR 6
135	#define SLC_ABORT 7
136	#define SLC_EOF 8
137	#define SLC_SUSP 9
138	#define SLC_EC 10
139	#define SLC_EL 11
140	#define SLC_EW 12
141	#define SLC_RP 13
142	#define SLC_LNEXT 14
143	#define SLC_XON 15
144	#define SLC_XOFF 16
145	#define SLC_FORW1 17
146	#define SLC_FORW2 18
147
148	#define NSLC 18
149
150	#define SLC_NAMELIST "0", "SYNCH", "BRK", "IP", "AO", "AYT", "EOR", \
151	"ABORT", "EOF", "SUSP", "EC", "EL", "EW", "RP", \
152	"LNEXT", "XON", "XOFF", "FORW1", "FORW2", 0,
153	#ifdef SLC_NAMES
154	char *slc_names[] = {
155	SLC_NAMELIST
156	};
157	#else
158	extern char *slc_names[];
159	#define SLC_NAMES SLC_NAMELIST
160	#endif
161
162	#define SLC_NAME_OK(x) ((unsigned int)(x) <= NSLC)
163	#define SLC_NAME(x) slc_names[x]
164
165	#define SLC_NOSUPPORT 0
166	#define SLC_CANTCHANGE 1
167	#define SLC_VARIABLE 2
168	#define SLC_DEFAULT 3
169	#define SLC_LEVELBITS 0x03
170
171	#define SLC_FUNC 0
172	#define SLC_FLAGS 1
173	#define SLC_VALUE 2
174
175	#define SLC_ACK 0x80
176	#define SLC_FLUSHIN 0x40
177	#define SLC_FLUSHOUT 0x20
178
179	#define OLD_ENV_VAR 1
180	#define OLD_ENV_VALUE 0
181	#define NEW_ENV_VAR 0
182	#define NEW_ENV_VALUE 1
183	#define ENV_ESC 2
184	#define ENV_USERVAR 3
185
186	#define AUTH_WHO_CLIENT 0
187	#define AUTH_WHO_SERVER 1
188	#define AUTH_WHO_MASK 1
189
190	#define AUTH_HOW_ONE_WAY 0
191	#define AUTH_HOW_MUTUAL 2
192	#define AUTH_HOW_MASK 2
193
194	#define AUTHTYPE_NULL 0
195	#define AUTHTYPE_KERBEROS_V4 1
196	#define AUTHTYPE_KERBEROS_V5 2
197	#define AUTHTYPE_SPX 3
198	#define AUTHTYPE_MINK 4
199	#define AUTHTYPE_CNT 5
200
201	#define AUTHTYPE_TEST 99
202
203	#ifdef AUTH_NAMES
204	char *authtype_names[] = {
205	"NULL", "KERBEROS_V4", "KERBEROS_V5", "SPX", "MINK", 0,
206	};
207	#else
208	extern char *authtype_names[];
209	#endif
210
211	#define AUTHTYPE_NAME_OK(x) ((unsigned int)(x) < AUTHTYPE_CNT)
212	#define AUTHTYPE_NAME(x) authtype_names[x]
213
214	#define ENCRYPT_IS 0
215	#define ENCRYPT_SUPPORT 1
216	#define ENCRYPT_REPLY 2
217	#define ENCRYPT_START 3
218	#define ENCRYPT_END 4
219	#define ENCRYPT_REQSTART 5
220	#define ENCRYPT_REQEND 6
221	#define ENCRYPT_ENC_KEYID 7
222	#define ENCRYPT_DEC_KEYID 8
223	#define ENCRYPT_CNT 9
224
225	#define ENCTYPE_ANY 0
226	#define ENCTYPE_DES_CFB64 1
227	#define ENCTYPE_DES_OFB64 2
228	#define ENCTYPE_CNT 3
229
230	#ifdef ENCRYPT_NAMES
231	char *encrypt_names[] = {
232	"IS", "SUPPORT", "REPLY", "START", "END",
233	"REQUEST-START", "REQUEST-END", "ENC-KEYID", "DEC-KEYID",
234	0,
235	};
236	char *enctype_names[] = {
237	"ANY", "DES_CFB64", "DES_OFB64", 0,
238	};
239	#else
240	extern char *encrypt_names[];
241	extern char *enctype_names[];
242	#endif
243
244
245	#define ENCRYPT_NAME_OK(x) ((unsigned int)(x) < ENCRYPT_CNT)
246	#define ENCRYPT_NAME(x) encrypt_names[x]
247
248	#define ENCTYPE_NAME_OK(x) ((unsigned int)(x) < ENCTYPE_CNT)
249	#define ENCTYPE_NAME(x) enctype_names[x]
250
251	#endif

lib/libc/include/wasm-wasi-musl/assert.h deleted-23

...	@@ -1,23 +0,0 @@
1	#include <features.h>
2
3	#undef assert
4
5	#ifdef NDEBUG
6	#define assert(x) (void)0
7	#else
8	#define assert(x) ((void)((x) \|\| (__assert_fail(#x, __FILE__, __LINE__, __func__),0)))
9	#endif
10
11	#if __STDC_VERSION__ >= 201112L && !defined(__cplusplus)
12	#define static_assert _Static_assert
13	#endif
14
15	#ifdef __cplusplus
16	extern "C" {
17	#endif
18
19	_Noreturn void __assert_fail (const char , const char , int, const char *);
20
21	#ifdef __cplusplus
22	}
23	#endif

lib/libc/include/wasm-wasi-musl/bits/float.h deleted-16

...	@@ -1,16 +0,0 @@
1	#define FLT_EVAL_METHOD 0
2
3	#define LDBL_TRUE_MIN 6.47517511943802511092443895822764655e-4966L
4	#define LDBL_MIN 3.36210314311209350626267781732175260e-4932L
5	#define LDBL_MAX 1.18973149535723176508575932662800702e+4932L
6	#define LDBL_EPSILON 1.92592994438723585305597794258492732e-34L
7
8	#define LDBL_MANT_DIG 113
9	#define LDBL_MIN_EXP (-16381)
10	#define LDBL_MAX_EXP 16384
11
12	#define LDBL_DIG 33
13	#define LDBL_MIN_10_EXP (-4931)
14	#define LDBL_MAX_10_EXP 4932
15
16	#define DECIMAL_DIG 36

lib/libc/include/wasm-wasi-musl/bits/hwcap.h deleted

lib/libc/include/wasm-wasi-musl/bits/io.h deleted

lib/libc/include/wasm-wasi-musl/bits/ioctl_fix.h deleted

lib/libc/include/wasm-wasi-musl/bits/ipcstat.h deleted-1

...	@@ -1 +0,0 @@
1	#define IPC_STAT 2

lib/libc/include/wasm-wasi-musl/bits/mman.h deleted

lib/libc/include/wasm-wasi-musl/bits/poll.h deleted

lib/libc/include/wasm-wasi-musl/bits/reg.h deleted-2

...	@@ -1,2 +0,0 @@
1	#undef __WORDSIZE
2	#define __WORDSIZE 64

lib/libc/include/wasm-wasi-musl/bits/resource.h deleted

lib/libc/include/wasm-wasi-musl/bits/socket.h deleted

lib/libc/include/wasm-wasi-musl/byteswap.h deleted-26

...	@@ -1,26 +0,0 @@
1	#ifndef _BYTESWAP_H
2	#define _BYTESWAP_H
3
4	#include <features.h>
5	#include <stdint.h>
6
7	static __inline uint16_t __bswap_16(uint16_t __x)
8	{
9	return __x<<8 \| __x>>8;
10	}
11
12	static __inline uint32_t __bswap_32(uint32_t __x)
13	{
14	return __x>>24 \| __x>>8&0xff00 \| __x<<8&0xff0000 \| __x<<24;
15	}
16
17	static __inline uint64_t __bswap_64(uint64_t __x)
18	{
19	return __bswap_32(__x)+0ULL<<32 \| __bswap_32(__x>>32);
20	}
21
22	#define bswap_16(x) __bswap_16(x)
23	#define bswap_32(x) __bswap_32(x)
24	#define bswap_64(x) __bswap_64(x)
25
26	#endif

lib/libc/include/wasm-wasi-musl/cpio.h deleted-29

...	@@ -1,29 +0,0 @@
1	#ifndef _CPIO_H
2	#define _CPIO_H
3
4	#define MAGIC "070707"
5
6	#define C_IRUSR 000400
7	#define C_IWUSR 000200
8	#define C_IXUSR 000100
9	#define C_IRGRP 000040
10	#define C_IWGRP 000020
11	#define C_IXGRP 000010
12	#define C_IROTH 000004
13	#define C_IWOTH 000002
14	#define C_IXOTH 000001
15
16	#define C_ISUID 004000
17	#define C_ISGID 002000
18	#define C_ISVTX 001000
19
20	#define C_ISBLK 060000
21	#define C_ISCHR 020000
22	#define C_ISDIR 040000
23	#define C_ISFIFO 010000
24	#define C_ISSOCK 0140000
25	#define C_ISLNK 0120000
26	#define C_ISCTG 0110000
27	#define C_ISREG 0100000
28
29	#endif

lib/libc/include/wasm-wasi-musl/crypt.h deleted-20

...	@@ -1,20 +0,0 @@
1	#ifndef _CRYPT_H
2	#define _CRYPT_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	struct crypt_data {
9	int initialized;
10	char __buf[256];
11	};
12
13	char crypt(const char , const char *);
14	char crypt_r(const char , const char , struct crypt_data );
15
16	#ifdef __cplusplus
17	}
18	#endif
19
20	#endif

lib/libc/include/wasm-wasi-musl/ctype.h deleted-77

...	@@ -1,77 +0,0 @@
1	#ifndef _CTYPE_H
2	#define _CTYPE_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9
10	int isalnum(int);
11	int isalpha(int);
12	int isblank(int);
13	int iscntrl(int);
14	int isdigit(int);
15	int isgraph(int);
16	int islower(int);
17	int isprint(int);
18	int ispunct(int);
19	int isspace(int);
20	int isupper(int);
21	int isxdigit(int);
22	int tolower(int);
23	int toupper(int);
24
25	#ifndef __cplusplus
26	static __inline int __isspace(int _c)
27	{
28	return _c == ' ' \|\| (unsigned)_c-'\t' < 5;
29	}
30
31	#define isalpha(a) (0 ? isalpha(a) : (((unsigned)(a)\|32)-'a') < 26)
32	#define isdigit(a) (0 ? isdigit(a) : ((unsigned)(a)-'0') < 10)
33	#define islower(a) (0 ? islower(a) : ((unsigned)(a)-'a') < 26)
34	#define isupper(a) (0 ? isupper(a) : ((unsigned)(a)-'A') < 26)
35	#define isprint(a) (0 ? isprint(a) : ((unsigned)(a)-0x20) < 0x5f)
36	#define isgraph(a) (0 ? isgraph(a) : ((unsigned)(a)-0x21) < 0x5e)
37	#define isspace(a) __isspace(a)
38	#endif
39
40
41	#if defined(_POSIX_SOURCE) \|\| defined(_POSIX_C_SOURCE) \
42	\|\| defined(_XOPEN_SOURCE) \|\| defined(_GNU_SOURCE) \
43	\|\| defined(_BSD_SOURCE)
44
45	#define __NEED_locale_t
46	#include <bits/alltypes.h>
47
48	int isalnum_l(int, locale_t);
49	int isalpha_l(int, locale_t);
50	int isblank_l(int, locale_t);
51	int iscntrl_l(int, locale_t);
52	int isdigit_l(int, locale_t);
53	int isgraph_l(int, locale_t);
54	int islower_l(int, locale_t);
55	int isprint_l(int, locale_t);
56	int ispunct_l(int, locale_t);
57	int isspace_l(int, locale_t);
58	int isupper_l(int, locale_t);
59	int isxdigit_l(int, locale_t);
60	int tolower_l(int, locale_t);
61	int toupper_l(int, locale_t);
62
63	int isascii(int);
64	int toascii(int);
65	#define _tolower(a) ((a)\|0x20)
66	#define _toupper(a) ((a)&0x5f)
67	#ifndef __cplusplus
68	#define isascii(a) (0 ? isascii(a) : (unsigned)(a) < 128)
69	#endif
70
71	#endif
72
73	#ifdef __cplusplus
74	}
75	#endif
76
77	#endif

lib/libc/include/wasm-wasi-musl/endian.h deleted-80

...	@@ -1,80 +0,0 @@
1	#ifndef _ENDIAN_H
2	#define _ENDIAN_H
3
4	#include <features.h>
5
6	#define __NEED_uint16_t
7	#define __NEED_uint32_t
8	#define __NEED_uint64_t
9
10	#include <bits/alltypes.h>
11
12	#define __PDP_ENDIAN 3412
13
14	#define BIG_ENDIAN __BIG_ENDIAN
15	#define LITTLE_ENDIAN __LITTLE_ENDIAN
16	#define PDP_ENDIAN __PDP_ENDIAN
17	#define BYTE_ORDER __BYTE_ORDER
18
19	static __inline uint16_t __bswap16(uint16_t __x)
20	{
21	return __x<<8 \| __x>>8;
22	}
23
24	static __inline uint32_t __bswap32(uint32_t __x)
25	{
26	return __x>>24 \| __x>>8&0xff00 \| __x<<8&0xff0000 \| __x<<24;
27	}
28
29	static __inline uint64_t __bswap64(uint64_t __x)
30	{
31	return __bswap32(__x)+0ULL<<32 \| __bswap32(__x>>32);
32	}
33
34	#if __BYTE_ORDER == __LITTLE_ENDIAN
35	#define htobe16(x) __bswap16(x)
36	#define be16toh(x) __bswap16(x)
37	#define htobe32(x) __bswap32(x)
38	#define be32toh(x) __bswap32(x)
39	#define htobe64(x) __bswap64(x)
40	#define be64toh(x) __bswap64(x)
41	#define htole16(x) (uint16_t)(x)
42	#define le16toh(x) (uint16_t)(x)
43	#define htole32(x) (uint32_t)(x)
44	#define le32toh(x) (uint32_t)(x)
45	#define htole64(x) (uint64_t)(x)
46	#define le64toh(x) (uint64_t)(x)
47	#else
48	#define htobe16(x) (uint16_t)(x)
49	#define be16toh(x) (uint16_t)(x)
50	#define htobe32(x) (uint32_t)(x)
51	#define be32toh(x) (uint32_t)(x)
52	#define htobe64(x) (uint64_t)(x)
53	#define be64toh(x) (uint64_t)(x)
54	#define htole16(x) __bswap16(x)
55	#define le16toh(x) __bswap16(x)
56	#define htole32(x) __bswap32(x)
57	#define le32toh(x) __bswap32(x)
58	#define htole64(x) __bswap64(x)
59	#define le64toh(x) __bswap64(x)
60	#endif
61
62	#if defined(_GNU_SOURCE) \|\| defined(_BSD_SOURCE)
63	#if __BYTE_ORDER == __LITTLE_ENDIAN
64	#define betoh16(x) __bswap16(x)
65	#define betoh32(x) __bswap32(x)
66	#define betoh64(x) __bswap64(x)
67	#define letoh16(x) (uint16_t)(x)
68	#define letoh32(x) (uint32_t)(x)
69	#define letoh64(x) (uint64_t)(x)
70	#else
71	#define betoh16(x) (uint16_t)(x)
72	#define betoh32(x) (uint32_t)(x)
73	#define betoh64(x) (uint64_t)(x)
74	#define letoh16(x) __bswap16(x)
75	#define letoh32(x) __bswap32(x)
76	#define letoh64(x) __bswap64(x)
77	#endif
78	#endif
79
80	#endif

lib/libc/include/wasm-wasi-musl/err.h deleted-25

...	@@ -1,25 +0,0 @@
1	#ifndef _ERR_H
2	#define _ERR_H
3
4	#include <features.h>
5	#include <stdarg.h>
6
7	#ifdef __cplusplus
8	extern "C" {
9	#endif
10
11	void warn(const char *, ...);
12	void vwarn(const char *, va_list);
13	void warnx(const char *, ...);
14	void vwarnx(const char *, va_list);
15
16	_Noreturn void err(int, const char *, ...);
17	_Noreturn void verr(int, const char *, va_list);
18	_Noreturn void errx(int, const char *, ...);
19	_Noreturn void verrx(int, const char *, va_list);
20
21	#ifdef __cplusplus
22	}
23	#endif
24
25	#endif

lib/libc/include/wasm-wasi-musl/features.h deleted-40

...	@@ -1,40 +0,0 @@
1	#ifndef _FEATURES_H
2	#define _FEATURES_H
3
4	#if defined(_ALL_SOURCE) && !defined(_GNU_SOURCE)
5	#define _GNU_SOURCE 1
6	#endif
7
8	#if defined(_DEFAULT_SOURCE) && !defined(_BSD_SOURCE)
9	#define _BSD_SOURCE 1
10	#endif
11
12	#if !defined(_POSIX_SOURCE) && !defined(_POSIX_C_SOURCE) \
13	&& !defined(_XOPEN_SOURCE) && !defined(_GNU_SOURCE) \
14	&& !defined(_BSD_SOURCE) && !defined(__STRICT_ANSI__)
15	#define _BSD_SOURCE 1
16	#define _XOPEN_SOURCE 700
17	#endif
18
19	#if __STDC_VERSION__ >= 199901L
20	#define __restrict restrict
21	#elif !defined(__GNUC__)
22	#define __restrict
23	#endif
24
25	#if __STDC_VERSION__ >= 199901L \|\| defined(__cplusplus)
26	#define __inline inline
27	#elif !defined(__GNUC__)
28	#define __inline
29	#endif
30
31	#if __STDC_VERSION__ >= 201112L
32	#elif defined(__GNUC__)
33	#define _Noreturn __attribute__((__noreturn__))
34	#else
35	#define _Noreturn
36	#endif
37
38	#define __REDIR(x,y) __typeof__(x) x __asm__(#y)
39
40	#endif

lib/libc/include/wasm-wasi-musl/fmtmsg.h deleted-47

...	@@ -1,47 +0,0 @@
1	#ifndef _FMTMSG_H
2	#define _FMTMSG_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#define MM_HARD 1
9	#define MM_SOFT 2
10	#define MM_FIRM 4
11
12	#define MM_APPL 8
13	#define MM_UTIL 16
14	#define MM_OPSYS 32
15
16	#define MM_RECOVER 64
17	#define MM_NRECOV 128
18
19	#define MM_PRINT 256
20	#define MM_CONSOLE 512
21
22	#define MM_NULLMC 0L
23
24	#define MM_HALT 1
25	#define MM_ERROR 2
26	#define MM_WARNING 3
27	#define MM_INFO 4
28	#define MM_NOSEV 0
29
30	#define MM_OK 0
31	#define MM_NOTOK (-1)
32	#define MM_NOMSG 1
33	#define MM_NOCON 4
34
35	#define MM_NULLLBL ((char*)0)
36	#define MM_NULLTXT ((char*)0)
37	#define MM_NULLACT ((char*)0)
38	#define MM_NULLTAG ((char*)0)
39	#define MM_NULLSEV 0
40
41	int fmtmsg(long, const char , int, const char , const char , const char );
42
43	#ifdef __cplusplus
44	}
45	#endif
46
47	#endif

lib/libc/include/wasm-wasi-musl/fnmatch.h deleted-24

...	@@ -1,24 +0,0 @@
1	#ifndef _FNMATCH_H
2	#define _FNMATCH_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#define FNM_PATHNAME 0x1
9	#define FNM_NOESCAPE 0x2
10	#define FNM_PERIOD 0x4
11	#define FNM_LEADING_DIR 0x8
12	#define FNM_CASEFOLD 0x10
13	#define FNM_FILE_NAME FNM_PATHNAME
14
15	#define FNM_NOMATCH 1
16	#define FNM_NOSYS (-1)
17
18	int fnmatch(const char , const char , int);
19
20	#ifdef __cplusplus
21	}
22	#endif
23
24	#endif

lib/libc/include/wasm-wasi-musl/getopt.h deleted-30

...	@@ -1,30 +0,0 @@
1	#ifndef _GETOPT_H
2	#define _GETOPT_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	int getopt(int, char * const [], const char *);
9	extern char *optarg;
10	extern int optind, opterr, optopt, optreset;
11
12	struct option {
13	const char *name;
14	int has_arg;
15	int *flag;
16	int val;
17	};
18
19	int getopt_long(int, char const , const char , const struct option , int *);
20	int getopt_long_only(int, char const , const char , const struct option , int *);
21
22	#define no_argument 0
23	#define required_argument 1
24	#define optional_argument 2
25
26	#ifdef __cplusplus
27	}
28	#endif
29
30	#endif

lib/libc/include/wasm-wasi-musl/iconv.h deleted-24

...	@@ -1,24 +0,0 @@
1	#ifndef _ICONV_H
2	#define _ICONV_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9
10	#define __NEED_size_t
11
12	#include <bits/alltypes.h>
13
14	typedef void *iconv_t;
15
16	iconv_t iconv_open(const char , const char );
17	size_t iconv(iconv_t, char *__restrict, size_t __restrict, char *__restrict, size_t __restrict);
18	int iconv_close(iconv_t);
19
20	#ifdef __cplusplus
21	}
22	#endif
23
24	#endif

lib/libc/include/wasm-wasi-musl/iso646.h deleted-20

...	@@ -1,20 +0,0 @@
1	#ifndef _ISO646_H
2	#define _ISO646_H
3
4	#ifndef __cplusplus
5
6	#define and &&
7	#define and_eq &=
8	#define bitand &
9	#define bitor \|
10	#define compl ~
11	#define not !
12	#define not_eq !=
13	#define or \|\|
14	#define or_eq \|=
15	#define xor ^
16	#define xor_eq ^=
17
18	#endif
19
20	#endif

lib/libc/include/wasm-wasi-musl/langinfo.h deleted-98

...	@@ -1,98 +0,0 @@
1	#ifndef _LANGINFO_H
2	#define _LANGINFO_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9	#include <nl_types.h>
10
11	#define __NEED_locale_t
12
13	#include <bits/alltypes.h>
14
15	#define ABDAY_1 0x20000
16	#define ABDAY_2 0x20001
17	#define ABDAY_3 0x20002
18	#define ABDAY_4 0x20003
19	#define ABDAY_5 0x20004
20	#define ABDAY_6 0x20005
21	#define ABDAY_7 0x20006
22
23	#define DAY_1 0x20007
24	#define DAY_2 0x20008
25	#define DAY_3 0x20009
26	#define DAY_4 0x2000A
27	#define DAY_5 0x2000B
28	#define DAY_6 0x2000C
29	#define DAY_7 0x2000D
30
31	#define ABMON_1 0x2000E
32	#define ABMON_2 0x2000F
33	#define ABMON_3 0x20010
34	#define ABMON_4 0x20011
35	#define ABMON_5 0x20012
36	#define ABMON_6 0x20013
37	#define ABMON_7 0x20014
38	#define ABMON_8 0x20015
39	#define ABMON_9 0x20016
40	#define ABMON_10 0x20017
41	#define ABMON_11 0x20018
42	#define ABMON_12 0x20019
43
44	#define MON_1 0x2001A
45	#define MON_2 0x2001B
46	#define MON_3 0x2001C
47	#define MON_4 0x2001D
48	#define MON_5 0x2001E
49	#define MON_6 0x2001F
50	#define MON_7 0x20020
51	#define MON_8 0x20021
52	#define MON_9 0x20022
53	#define MON_10 0x20023
54	#define MON_11 0x20024
55	#define MON_12 0x20025
56
57	#define AM_STR 0x20026
58	#define PM_STR 0x20027
59
60	#define D_T_FMT 0x20028
61	#define D_FMT 0x20029
62	#define T_FMT 0x2002A
63	#define T_FMT_AMPM 0x2002B
64
65	#define ERA 0x2002C
66	#define ERA_D_FMT 0x2002E
67	#define ALT_DIGITS 0x2002F
68	#define ERA_D_T_FMT 0x20030
69	#define ERA_T_FMT 0x20031
70
71	#define CODESET 14
72
73	#define CRNCYSTR 0x4000F
74
75	#define RADIXCHAR 0x10000
76	#define THOUSEP 0x10001
77	#define YESEXPR 0x50000
78	#define NOEXPR 0x50001
79
80	#define _NL_LOCALE_NAME(cat) (((cat)<<16) \| 0xffff)
81
82	#if defined(_GNU_SOURCE)
83	#define NL_LOCALE_NAME(cat) _NL_LOCALE_NAME(cat)
84	#endif
85
86	#if defined(_GNU_SOURCE) \|\| defined(_BSD_SOURCE)
87	#define YESSTR 0x50002
88	#define NOSTR 0x50003
89	#endif
90
91	char *nl_langinfo(nl_item);
92	char *nl_langinfo_l(nl_item, locale_t);
93
94	#ifdef __cplusplus
95	}
96	#endif
97
98	#endif

lib/libc/include/wasm-wasi-musl/libgen.h deleted-15

...	@@ -1,15 +0,0 @@
1	#ifndef _LIBGEN_H
2	#define _LIBGEN_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	char dirname(char );
9	char basename(char );
10
11	#ifdef __cplusplus
12	}
13	#endif
14
15	#endif

lib/libc/include/wasm-wasi-musl/memory.h deleted-1

...	@@ -1 +0,0 @@
1	#include <string.h>

lib/libc/include/wasm-wasi-musl/monetary.h deleted-23

...	@@ -1,23 +0,0 @@
1	#ifndef _MONETARY_H
2	#define _MONETARY_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9
10	#define __NEED_ssize_t
11	#define __NEED_size_t
12	#define __NEED_locale_t
13
14	#include <bits/alltypes.h>
15
16	ssize_t strfmon(char __restrict, size_t, const char __restrict, ...);
17	ssize_t strfmon_l(char __restrict, size_t, locale_t, const char __restrict, ...);
18
19	#ifdef __cplusplus
20	}
21	#endif
22
23	#endif

lib/libc/include/wasm-wasi-musl/mqueue.h deleted-41

...	@@ -1,41 +0,0 @@
1	#ifndef _MQUEUE_H
2	#define _MQUEUE_H
3	#ifdef __cplusplus
4	extern "C" {
5	#endif
6
7	#include <features.h>
8
9	#define __NEED_size_t
10	#define __NEED_ssize_t
11	#define __NEED_pthread_attr_t
12	#define __NEED_time_t
13	#define __NEED_struct_timespec
14	#include <bits/alltypes.h>
15
16	typedef int mqd_t;
17	struct mq_attr {
18	long mq_flags, mq_maxmsg, mq_msgsize, mq_curmsgs, __unused[4];
19	};
20	struct sigevent;
21
22	int mq_close(mqd_t);
23	int mq_getattr(mqd_t, struct mq_attr *);
24	int mq_notify(mqd_t, const struct sigevent *);
25	mqd_t mq_open(const char *, int, ...);
26	ssize_t mq_receive(mqd_t, char , size_t, unsigned );
27	int mq_send(mqd_t, const char *, size_t, unsigned);
28	int mq_setattr(mqd_t, const struct mq_attr __restrict, struct mq_attr __restrict);
29	ssize_t mq_timedreceive(mqd_t, char __restrict, size_t, unsigned __restrict, const struct timespec *__restrict);
30	int mq_timedsend(mqd_t, const char , size_t, unsigned, const struct timespec );
31	int mq_unlink(const char *);
32
33	#if _REDIR_TIME64
34	__REDIR(mq_timedreceive, __mq_timedreceive_time64);
35	__REDIR(mq_timedsend, __mq_timedsend_time64);
36	#endif
37
38	#ifdef __cplusplus
39	}
40	#endif
41	#endif

lib/libc/include/wasm-wasi-musl/netinet/icmp6.h deleted-305

...	@@ -1,305 +0,0 @@
1	#ifndef _NETINET_ICMP6_H
2	#define _NETINET_ICMP6_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <stdint.h>
9	#include <string.h>
10	#include <sys/types.h>
11	#include <netinet/in.h>
12
13	#define ICMP6_FILTER 1
14
15	#define ICMP6_FILTER_BLOCK 1
16	#define ICMP6_FILTER_PASS 2
17	#define ICMP6_FILTER_BLOCKOTHERS 3
18	#define ICMP6_FILTER_PASSONLY 4
19
20	struct icmp6_filter {
21	uint32_t icmp6_filt[8];
22	};
23
24	struct icmp6_hdr {
25	uint8_t icmp6_type;
26	uint8_t icmp6_code;
27	uint16_t icmp6_cksum;
28	union {
29	uint32_t icmp6_un_data32[1];
30	uint16_t icmp6_un_data16[2];
31	uint8_t icmp6_un_data8[4];
32	} icmp6_dataun;
33	};
34
35	#define icmp6_data32 icmp6_dataun.icmp6_un_data32
36	#define icmp6_data16 icmp6_dataun.icmp6_un_data16
37	#define icmp6_data8 icmp6_dataun.icmp6_un_data8
38	#define icmp6_pptr icmp6_data32[0]
39	#define icmp6_mtu icmp6_data32[0]
40	#define icmp6_id icmp6_data16[0]
41	#define icmp6_seq icmp6_data16[1]
42	#define icmp6_maxdelay icmp6_data16[0]
43
44	#define ICMP6_DST_UNREACH 1
45	#define ICMP6_PACKET_TOO_BIG 2
46	#define ICMP6_TIME_EXCEEDED 3
47	#define ICMP6_PARAM_PROB 4
48
49	#define ICMP6_INFOMSG_MASK 0x80
50
51	#define ICMP6_ECHO_REQUEST 128
52	#define ICMP6_ECHO_REPLY 129
53	#define MLD_LISTENER_QUERY 130
54	#define MLD_LISTENER_REPORT 131
55	#define MLD_LISTENER_REDUCTION 132
56
57	#define ICMP6_DST_UNREACH_NOROUTE 0
58	#define ICMP6_DST_UNREACH_ADMIN 1
59	#define ICMP6_DST_UNREACH_BEYONDSCOPE 2
60	#define ICMP6_DST_UNREACH_ADDR 3
61	#define ICMP6_DST_UNREACH_NOPORT 4
62
63	#define ICMP6_TIME_EXCEED_TRANSIT 0
64	#define ICMP6_TIME_EXCEED_REASSEMBLY 1
65
66	#define ICMP6_PARAMPROB_HEADER 0
67	#define ICMP6_PARAMPROB_NEXTHEADER 1
68	#define ICMP6_PARAMPROB_OPTION 2
69
70	#define ICMP6_FILTER_WILLPASS(type, filterp) \
71	((((filterp)->icmp6_filt[(type) >> 5]) & (1 << ((type) & 31))) == 0)
72
73	#define ICMP6_FILTER_WILLBLOCK(type, filterp) \
74	((((filterp)->icmp6_filt[(type) >> 5]) & (1 << ((type) & 31))) != 0)
75
76	#define ICMP6_FILTER_SETPASS(type, filterp) \
77	((((filterp)->icmp6_filt[(type) >> 5]) &= ~(1 << ((type) & 31))))
78
79	#define ICMP6_FILTER_SETBLOCK(type, filterp) \
80	((((filterp)->icmp6_filt[(type) >> 5]) \|= (1 << ((type) & 31))))
81
82	#define ICMP6_FILTER_SETPASSALL(filterp) \
83	memset (filterp, 0, sizeof (struct icmp6_filter));
84
85	#define ICMP6_FILTER_SETBLOCKALL(filterp) \
86	memset (filterp, 0xFF, sizeof (struct icmp6_filter));
87
88	#define ND_ROUTER_SOLICIT 133
89	#define ND_ROUTER_ADVERT 134
90	#define ND_NEIGHBOR_SOLICIT 135
91	#define ND_NEIGHBOR_ADVERT 136
92	#define ND_REDIRECT 137
93
94	struct nd_router_solicit {
95	struct icmp6_hdr nd_rs_hdr;
96	};
97
98	#define nd_rs_type nd_rs_hdr.icmp6_type
99	#define nd_rs_code nd_rs_hdr.icmp6_code
100	#define nd_rs_cksum nd_rs_hdr.icmp6_cksum
101	#define nd_rs_reserved nd_rs_hdr.icmp6_data32[0]
102
103	struct nd_router_advert {
104	struct icmp6_hdr nd_ra_hdr;
105	uint32_t nd_ra_reachable;
106	uint32_t nd_ra_retransmit;
107	};
108
109	#define nd_ra_type nd_ra_hdr.icmp6_type
110	#define nd_ra_code nd_ra_hdr.icmp6_code
111	#define nd_ra_cksum nd_ra_hdr.icmp6_cksum
112	#define nd_ra_curhoplimit nd_ra_hdr.icmp6_data8[0]
113	#define nd_ra_flags_reserved nd_ra_hdr.icmp6_data8[1]
114	#define ND_RA_FLAG_MANAGED 0x80
115	#define ND_RA_FLAG_OTHER 0x40
116	#define ND_RA_FLAG_HOME_AGENT 0x20
117	#define nd_ra_router_lifetime nd_ra_hdr.icmp6_data16[1]
118
119	struct nd_neighbor_solicit {
120	struct icmp6_hdr nd_ns_hdr;
121	struct in6_addr nd_ns_target;
122	};
123
124	#define nd_ns_type nd_ns_hdr.icmp6_type
125	#define nd_ns_code nd_ns_hdr.icmp6_code
126	#define nd_ns_cksum nd_ns_hdr.icmp6_cksum
127	#define nd_ns_reserved nd_ns_hdr.icmp6_data32[0]
128
129	struct nd_neighbor_advert {
130	struct icmp6_hdr nd_na_hdr;
131	struct in6_addr nd_na_target;
132	};
133
134	#define nd_na_type nd_na_hdr.icmp6_type
135	#define nd_na_code nd_na_hdr.icmp6_code
136	#define nd_na_cksum nd_na_hdr.icmp6_cksum
137	#define nd_na_flags_reserved nd_na_hdr.icmp6_data32[0]
138	#if __BYTE_ORDER == __BIG_ENDIAN
139	#define ND_NA_FLAG_ROUTER 0x80000000
140	#define ND_NA_FLAG_SOLICITED 0x40000000
141	#define ND_NA_FLAG_OVERRIDE 0x20000000
142	#else
143	#define ND_NA_FLAG_ROUTER 0x00000080
144	#define ND_NA_FLAG_SOLICITED 0x00000040
145	#define ND_NA_FLAG_OVERRIDE 0x00000020
146	#endif
147
148	struct nd_redirect {
149	struct icmp6_hdr nd_rd_hdr;
150	struct in6_addr nd_rd_target;
151	struct in6_addr nd_rd_dst;
152	};
153
154	#define nd_rd_type nd_rd_hdr.icmp6_type
155	#define nd_rd_code nd_rd_hdr.icmp6_code
156	#define nd_rd_cksum nd_rd_hdr.icmp6_cksum
157	#define nd_rd_reserved nd_rd_hdr.icmp6_data32[0]
158
159	struct nd_opt_hdr {
160	uint8_t nd_opt_type;
161	uint8_t nd_opt_len;
162	};
163
164	#define ND_OPT_SOURCE_LINKADDR 1
165	#define ND_OPT_TARGET_LINKADDR 2
166	#define ND_OPT_PREFIX_INFORMATION 3
167	#define ND_OPT_REDIRECTED_HEADER 4
168	#define ND_OPT_MTU 5
169	#define ND_OPT_RTR_ADV_INTERVAL 7
170	#define ND_OPT_HOME_AGENT_INFO 8
171
172	struct nd_opt_prefix_info {
173	uint8_t nd_opt_pi_type;
174	uint8_t nd_opt_pi_len;
175	uint8_t nd_opt_pi_prefix_len;
176	uint8_t nd_opt_pi_flags_reserved;
177	uint32_t nd_opt_pi_valid_time;
178	uint32_t nd_opt_pi_preferred_time;
179	uint32_t nd_opt_pi_reserved2;
180	struct in6_addr nd_opt_pi_prefix;
181	};
182
183	#define ND_OPT_PI_FLAG_ONLINK 0x80
184	#define ND_OPT_PI_FLAG_AUTO 0x40
185	#define ND_OPT_PI_FLAG_RADDR 0x20
186
187	struct nd_opt_rd_hdr {
188	uint8_t nd_opt_rh_type;
189	uint8_t nd_opt_rh_len;
190	uint16_t nd_opt_rh_reserved1;
191	uint32_t nd_opt_rh_reserved2;
192	};
193
194	struct nd_opt_mtu {
195	uint8_t nd_opt_mtu_type;
196	uint8_t nd_opt_mtu_len;
197	uint16_t nd_opt_mtu_reserved;
198	uint32_t nd_opt_mtu_mtu;
199	};
200
201	struct mld_hdr {
202	struct icmp6_hdr mld_icmp6_hdr;
203	struct in6_addr mld_addr;
204	};
205
206	#define mld_type mld_icmp6_hdr.icmp6_type
207	#define mld_code mld_icmp6_hdr.icmp6_code
208	#define mld_cksum mld_icmp6_hdr.icmp6_cksum
209	#define mld_maxdelay mld_icmp6_hdr.icmp6_data16[0]
210	#define mld_reserved mld_icmp6_hdr.icmp6_data16[1]
211
212	#define ICMP6_ROUTER_RENUMBERING 138
213
214	struct icmp6_router_renum {
215	struct icmp6_hdr rr_hdr;
216	uint8_t rr_segnum;
217	uint8_t rr_flags;
218	uint16_t rr_maxdelay;
219	uint32_t rr_reserved;
220	};
221
222	#define rr_type rr_hdr.icmp6_type
223	#define rr_code rr_hdr.icmp6_code
224	#define rr_cksum rr_hdr.icmp6_cksum
225	#define rr_seqnum rr_hdr.icmp6_data32[0]
226
227	#define ICMP6_RR_FLAGS_TEST 0x80
228	#define ICMP6_RR_FLAGS_REQRESULT 0x40
229	#define ICMP6_RR_FLAGS_FORCEAPPLY 0x20
230	#define ICMP6_RR_FLAGS_SPECSITE 0x10
231	#define ICMP6_RR_FLAGS_PREVDONE 0x08
232
233	struct rr_pco_match {
234	uint8_t rpm_code;
235	uint8_t rpm_len;
236	uint8_t rpm_ordinal;
237	uint8_t rpm_matchlen;
238	uint8_t rpm_minlen;
239	uint8_t rpm_maxlen;
240	uint16_t rpm_reserved;
241	struct in6_addr rpm_prefix;
242	};
243
244	#define RPM_PCO_ADD 1
245	#define RPM_PCO_CHANGE 2
246	#define RPM_PCO_SETGLOBAL 3
247
248	struct rr_pco_use {
249	uint8_t rpu_uselen;
250	uint8_t rpu_keeplen;
251	uint8_t rpu_ramask;
252	uint8_t rpu_raflags;
253	uint32_t rpu_vltime;
254	uint32_t rpu_pltime;
255	uint32_t rpu_flags;
256	struct in6_addr rpu_prefix;
257	};
258
259	#define ICMP6_RR_PCOUSE_RAFLAGS_ONLINK 0x20
260	#define ICMP6_RR_PCOUSE_RAFLAGS_AUTO 0x10
261
262	#if __BYTE_ORDER == __BIG_ENDIAN
263	#define ICMP6_RR_PCOUSE_FLAGS_DECRVLTIME 0x80000000
264	#define ICMP6_RR_PCOUSE_FLAGS_DECRPLTIME 0x40000000
265	#else
266	#define ICMP6_RR_PCOUSE_FLAGS_DECRVLTIME 0x80
267	#define ICMP6_RR_PCOUSE_FLAGS_DECRPLTIME 0x40
268	#endif
269
270	struct rr_result {
271	uint16_t rrr_flags;
272	uint8_t rrr_ordinal;
273	uint8_t rrr_matchedlen;
274	uint32_t rrr_ifid;
275	struct in6_addr rrr_prefix;
276	};
277
278	#if __BYTE_ORDER == __BIG_ENDIAN
279	#define ICMP6_RR_RESULT_FLAGS_OOB 0x0002
280	#define ICMP6_RR_RESULT_FLAGS_FORBIDDEN 0x0001
281	#else
282	#define ICMP6_RR_RESULT_FLAGS_OOB 0x0200
283	#define ICMP6_RR_RESULT_FLAGS_FORBIDDEN 0x0100
284	#endif
285
286	struct nd_opt_adv_interval {
287	uint8_t nd_opt_adv_interval_type;
288	uint8_t nd_opt_adv_interval_len;
289	uint16_t nd_opt_adv_interval_reserved;
290	uint32_t nd_opt_adv_interval_ival;
291	};
292
293	struct nd_opt_home_agent_info {
294	uint8_t nd_opt_home_agent_info_type;
295	uint8_t nd_opt_home_agent_info_len;
296	uint16_t nd_opt_home_agent_info_reserved;
297	uint16_t nd_opt_home_agent_info_preference;
298	uint16_t nd_opt_home_agent_info_lifetime;
299	};
300
301	#ifdef __cplusplus
302	}
303	#endif
304
305	#endif

lib/libc/include/wasm-wasi-musl/netinet/igmp.h deleted-45

...	@@ -1,45 +0,0 @@
1	#ifndef _NETINET_IGMP_H
2	#define _NETINET_IGMP_H
3
4	#include <stdint.h>
5	#include <netinet/in.h>
6
7	struct igmp {
8	uint8_t igmp_type;
9	uint8_t igmp_code;
10	uint16_t igmp_cksum;
11	struct in_addr igmp_group;
12	};
13
14	#define IGMP_MINLEN 8
15
16	#define IGMP_MEMBERSHIP_QUERY 0x11
17	#define IGMP_V1_MEMBERSHIP_REPORT 0x12
18	#define IGMP_V2_MEMBERSHIP_REPORT 0x16
19	#define IGMP_V2_LEAVE_GROUP 0x17
20
21	#define IGMP_DVMRP 0x13
22	#define IGMP_PIM 0x14
23	#define IGMP_TRACE 0x15
24
25	#define IGMP_MTRACE_RESP 0x1e
26	#define IGMP_MTRACE 0x1f
27
28	#define IGMP_MAX_HOST_REPORT_DELAY 10
29	#define IGMP_TIMER_SCALE 10
30
31	#define IGMP_DELAYING_MEMBER 1
32	#define IGMP_IDLE_MEMBER 2
33	#define IGMP_LAZY_MEMBER 3
34	#define IGMP_SLEEPING_MEMBER 4
35	#define IGMP_AWAKENING_MEMBER 5
36
37	#define IGMP_v1_ROUTER 1
38	#define IGMP_v2_ROUTER 2
39
40	#define IGMP_HOST_MEMBERSHIP_QUERY IGMP_MEMBERSHIP_QUERY
41	#define IGMP_HOST_MEMBERSHIP_REPORT IGMP_V1_MEMBERSHIP_REPORT
42	#define IGMP_HOST_NEW_MEMBERSHIP_REPORT IGMP_V2_MEMBERSHIP_REPORT
43	#define IGMP_HOST_LEAVE_MESSAGE IGMP_V2_LEAVE_GROUP
44
45	#endif

lib/libc/include/wasm-wasi-musl/netinet/in_systm.h deleted-9

...	@@ -1,9 +0,0 @@
1	#ifndef _NETINET_IN_SYSTM_H
2	#define _NETINET_IN_SYSTM_H
3
4	#include <stdint.h>
5
6	typedef uint16_t n_short;
7	typedef uint32_t n_long, n_time;
8
9	#endif

lib/libc/include/wasm-wasi-musl/netinet/ip.h deleted-199

...	@@ -1,199 +0,0 @@
1	#ifndef _NETINET_IP_H
2	#define _NETINET_IP_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <stdint.h>
9	#include <netinet/in.h>
10
11	struct timestamp {
12	uint8_t len;
13	uint8_t ptr;
14	#if __BYTE_ORDER == __LITTLE_ENDIAN
15	unsigned int flags:4;
16	unsigned int overflow:4;
17	#else
18	unsigned int overflow:4;
19	unsigned int flags:4;
20	#endif
21	uint32_t data[9];
22	};
23
24	struct iphdr {
25	#if __BYTE_ORDER == __LITTLE_ENDIAN
26	unsigned int ihl:4;
27	unsigned int version:4;
28	#else
29	unsigned int version:4;
30	unsigned int ihl:4;
31	#endif
32	uint8_t tos;
33	uint16_t tot_len;
34	uint16_t id;
35	uint16_t frag_off;
36	uint8_t ttl;
37	uint8_t protocol;
38	uint16_t check;
39	uint32_t saddr;
40	uint32_t daddr;
41	};
42
43	struct ip {
44	#if __BYTE_ORDER == __LITTLE_ENDIAN
45	unsigned int ip_hl:4;
46	unsigned int ip_v:4;
47	#else
48	unsigned int ip_v:4;
49	unsigned int ip_hl:4;
50	#endif
51	uint8_t ip_tos;
52	uint16_t ip_len;
53	uint16_t ip_id;
54	uint16_t ip_off;
55	uint8_t ip_ttl;
56	uint8_t ip_p;
57	uint16_t ip_sum;
58	struct in_addr ip_src, ip_dst;
59	};
60
61	#define IP_RF 0x8000
62	#define IP_DF 0x4000
63	#define IP_MF 0x2000
64	#define IP_OFFMASK 0x1fff
65
66	struct ip_timestamp {
67	uint8_t ipt_code;
68	uint8_t ipt_len;
69	uint8_t ipt_ptr;
70	#if __BYTE_ORDER == __LITTLE_ENDIAN
71	unsigned int ipt_flg:4;
72	unsigned int ipt_oflw:4;
73	#else
74	unsigned int ipt_oflw:4;
75	unsigned int ipt_flg:4;
76	#endif
77	uint32_t data[9];
78	};
79
80	#define IPVERSION 4
81	#define IP_MAXPACKET 65535
82
83	#define IPTOS_ECN_MASK 0x03
84	#define IPTOS_ECN(x) ((x) & IPTOS_ECN_MASK)
85	#define IPTOS_ECN_NOT_ECT 0x00
86	#define IPTOS_ECN_ECT1 0x01
87	#define IPTOS_ECN_ECT0 0x02
88	#define IPTOS_ECN_CE 0x03
89
90	#define IPTOS_DSCP_MASK 0xfc
91	#define IPTOS_DSCP(x) ((x) & IPTOS_DSCP_MASK)
92	#define IPTOS_DSCP_AF11 0x28
93	#define IPTOS_DSCP_AF12 0x30
94	#define IPTOS_DSCP_AF13 0x38
95	#define IPTOS_DSCP_AF21 0x48
96	#define IPTOS_DSCP_AF22 0x50
97	#define IPTOS_DSCP_AF23 0x58
98	#define IPTOS_DSCP_AF31 0x68
99	#define IPTOS_DSCP_AF32 0x70
100	#define IPTOS_DSCP_AF33 0x78
101	#define IPTOS_DSCP_AF41 0x88
102	#define IPTOS_DSCP_AF42 0x90
103	#define IPTOS_DSCP_AF43 0x98
104	#define IPTOS_DSCP_EF 0xb8
105
106	#define IPTOS_CLASS_MASK 0xe0
107	#define IPTOS_CLASS(x) ((x) & IPTOS_CLASS_MASK)
108	#define IPTOS_CLASS_CS0 0x00
109	#define IPTOS_CLASS_CS1 0x20
110	#define IPTOS_CLASS_CS2 0x40
111	#define IPTOS_CLASS_CS3 0x60
112	#define IPTOS_CLASS_CS4 0x80
113	#define IPTOS_CLASS_CS5 0xa0
114	#define IPTOS_CLASS_CS6 0xc0
115	#define IPTOS_CLASS_CS7 0xe0
116	#define IPTOS_CLASS_DEFAULT IPTOS_CLASS_CS0
117
118	#define IPTOS_TOS_MASK 0x1E
119	#define IPTOS_TOS(tos) ((tos) & IPTOS_TOS_MASK)
120	#define IPTOS_LOWDELAY 0x10
121	#define IPTOS_THROUGHPUT 0x08
122	#define IPTOS_RELIABILITY 0x04
123	#define IPTOS_LOWCOST 0x02
124	#define IPTOS_MINCOST IPTOS_LOWCOST
125
126	#define IPTOS_PREC_MASK 0xe0
127	#define IPTOS_PREC(tos) ((tos) & IPTOS_PREC_MASK)
128	#define IPTOS_PREC_NETCONTROL 0xe0
129	#define IPTOS_PREC_INTERNETCONTROL 0xc0
130	#define IPTOS_PREC_CRITIC_ECP 0xa0
131	#define IPTOS_PREC_FLASHOVERRIDE 0x80
132	#define IPTOS_PREC_FLASH 0x60
133	#define IPTOS_PREC_IMMEDIATE 0x40
134	#define IPTOS_PREC_PRIORITY 0x20
135	#define IPTOS_PREC_ROUTINE 0x00
136
137	#define IPOPT_COPY 0x80
138	#define IPOPT_CLASS_MASK 0x60
139	#define IPOPT_NUMBER_MASK 0x1f
140
141	#define IPOPT_COPIED(o) ((o) & IPOPT_COPY)
142	#define IPOPT_CLASS(o) ((o) & IPOPT_CLASS_MASK)
143	#define IPOPT_NUMBER(o) ((o) & IPOPT_NUMBER_MASK)
144
145	#define IPOPT_CONTROL 0x00
146	#define IPOPT_RESERVED1 0x20
147	#define IPOPT_DEBMEAS 0x40
148	#define IPOPT_MEASUREMENT IPOPT_DEBMEAS
149	#define IPOPT_RESERVED2 0x60
150
151	#define IPOPT_EOL 0
152	#define IPOPT_END IPOPT_EOL
153	#define IPOPT_NOP 1
154	#define IPOPT_NOOP IPOPT_NOP
155
156	#define IPOPT_RR 7
157	#define IPOPT_TS 68
158	#define IPOPT_TIMESTAMP IPOPT_TS
159	#define IPOPT_SECURITY 130
160	#define IPOPT_SEC IPOPT_SECURITY
161	#define IPOPT_LSRR 131
162	#define IPOPT_SATID 136
163	#define IPOPT_SID IPOPT_SATID
164	#define IPOPT_SSRR 137
165	#define IPOPT_RA 148
166
167	#define IPOPT_OPTVAL 0
168	#define IPOPT_OLEN 1
169	#define IPOPT_OFFSET 2
170	#define IPOPT_MINOFF 4
171
172	#define MAX_IPOPTLEN 40
173
174	#define IPOPT_TS_TSONLY 0
175	#define IPOPT_TS_TSANDADDR 1
176	#define IPOPT_TS_PRESPEC 3
177
178	#define IPOPT_SECUR_UNCLASS 0x0000
179	#define IPOPT_SECUR_CONFID 0xf135
180	#define IPOPT_SECUR_EFTO 0x789a
181	#define IPOPT_SECUR_MMMM 0xbc4d
182	#define IPOPT_SECUR_RESTR 0xaf13
183	#define IPOPT_SECUR_SECRET 0xd788
184	#define IPOPT_SECUR_TOPSECRET 0x6bc5
185
186	#define MAXTTL 255
187	#define IPDEFTTL 64
188	#define IPFRAGTTL 60
189	#define IPTTLDEC 1
190
191	#define IP_MSS 576
192
193	#define __UAPI_DEF_IPHDR 0
194
195	#ifdef __cplusplus
196	}
197	#endif
198
199	#endif

lib/libc/include/wasm-wasi-musl/netinet/ip6.h deleted-141

...	@@ -1,141 +0,0 @@
1	#ifndef _NETINET_IP6_H
2	#define _NETINET_IP6_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <stdint.h>
9	#include <netinet/in.h>
10
11	struct ip6_hdr {
12	union {
13	struct ip6_hdrctl {
14	uint32_t ip6_un1_flow;
15	uint16_t ip6_un1_plen;
16	uint8_t ip6_un1_nxt;
17	uint8_t ip6_un1_hlim;
18	} ip6_un1;
19	uint8_t ip6_un2_vfc;
20	} ip6_ctlun;
21	struct in6_addr ip6_src;
22	struct in6_addr ip6_dst;
23	};
24
25	#define ip6_vfc ip6_ctlun.ip6_un2_vfc
26	#define ip6_flow ip6_ctlun.ip6_un1.ip6_un1_flow
27	#define ip6_plen ip6_ctlun.ip6_un1.ip6_un1_plen
28	#define ip6_nxt ip6_ctlun.ip6_un1.ip6_un1_nxt
29	#define ip6_hlim ip6_ctlun.ip6_un1.ip6_un1_hlim
30	#define ip6_hops ip6_ctlun.ip6_un1.ip6_un1_hlim
31
32	struct ip6_ext {
33	uint8_t ip6e_nxt;
34	uint8_t ip6e_len;
35	};
36
37	struct ip6_hbh {
38	uint8_t ip6h_nxt;
39	uint8_t ip6h_len;
40	};
41
42	struct ip6_dest {
43	uint8_t ip6d_nxt;
44	uint8_t ip6d_len;
45	};
46
47	struct ip6_rthdr {
48	uint8_t ip6r_nxt;
49	uint8_t ip6r_len;
50	uint8_t ip6r_type;
51	uint8_t ip6r_segleft;
52	};
53
54	struct ip6_rthdr0 {
55	uint8_t ip6r0_nxt;
56	uint8_t ip6r0_len;
57	uint8_t ip6r0_type;
58	uint8_t ip6r0_segleft;
59	uint8_t ip6r0_reserved;
60	uint8_t ip6r0_slmap[3];
61	struct in6_addr ip6r0_addr[];
62	};
63
64	struct ip6_frag {
65	uint8_t ip6f_nxt;
66	uint8_t ip6f_reserved;
67	uint16_t ip6f_offlg;
68	uint32_t ip6f_ident;
69	};
70
71	#if __BYTE_ORDER == __BIG_ENDIAN
72	#define IP6F_OFF_MASK 0xfff8
73	#define IP6F_RESERVED_MASK 0x0006
74	#define IP6F_MORE_FRAG 0x0001
75	#else
76	#define IP6F_OFF_MASK 0xf8ff
77	#define IP6F_RESERVED_MASK 0x0600
78	#define IP6F_MORE_FRAG 0x0100
79	#endif
80
81	struct ip6_opt {
82	uint8_t ip6o_type;
83	uint8_t ip6o_len;
84	};
85
86	#define IP6OPT_TYPE(o) ((o) & 0xc0)
87	#define IP6OPT_TYPE_SKIP 0x00
88	#define IP6OPT_TYPE_DISCARD 0x40
89	#define IP6OPT_TYPE_FORCEICMP 0x80
90	#define IP6OPT_TYPE_ICMP 0xc0
91	#define IP6OPT_TYPE_MUTABLE 0x20
92
93	#define IP6OPT_PAD1 0
94	#define IP6OPT_PADN 1
95
96	#define IP6OPT_JUMBO 0xc2
97	#define IP6OPT_NSAP_ADDR 0xc3
98	#define IP6OPT_TUNNEL_LIMIT 0x04
99	#define IP6OPT_ROUTER_ALERT 0x05
100
101	struct ip6_opt_jumbo {
102	uint8_t ip6oj_type;
103	uint8_t ip6oj_len;
104	uint8_t ip6oj_jumbo_len[4];
105	};
106	#define IP6OPT_JUMBO_LEN 6
107
108	struct ip6_opt_nsap {
109	uint8_t ip6on_type;
110	uint8_t ip6on_len;
111	uint8_t ip6on_src_nsap_len;
112	uint8_t ip6on_dst_nsap_len;
113	};
114
115	struct ip6_opt_tunnel {
116	uint8_t ip6ot_type;
117	uint8_t ip6ot_len;
118	uint8_t ip6ot_encap_limit;
119	};
120
121	struct ip6_opt_router {
122	uint8_t ip6or_type;
123	uint8_t ip6or_len;
124	uint8_t ip6or_value[2];
125	};
126
127	#if __BYTE_ORDER == __BIG_ENDIAN
128	#define IP6_ALERT_MLD 0x0000
129	#define IP6_ALERT_RSVP 0x0001
130	#define IP6_ALERT_AN 0x0002
131	#else
132	#define IP6_ALERT_MLD 0x0000
133	#define IP6_ALERT_RSVP 0x0100
134	#define IP6_ALERT_AN 0x0200
135	#endif
136
137	#ifdef __cplusplus
138	}
139	#endif
140
141	#endif

lib/libc/include/wasm-wasi-musl/netinet/ip_icmp.h deleted-193

...	@@ -1,193 +0,0 @@
1	#ifndef _NETINET_IP_ICMP_H
2	#define _NETINET_IP_ICMP_H
3
4	#include <stdint.h>
5	#include <netinet/in.h>
6	#include <netinet/ip.h>
7
8	#ifdef __cplusplus
9	extern "C" {
10	#endif
11
12	struct icmphdr {
13	uint8_t type;
14	uint8_t code;
15	uint16_t checksum;
16	union {
17	struct {
18	uint16_t id;
19	uint16_t sequence;
20	} echo;
21	uint32_t gateway;
22	struct {
23	uint16_t __unused;
24	uint16_t mtu;
25	} frag;
26	uint8_t reserved[4];
27	} un;
28	};
29
30	#define ICMP_ECHOREPLY 0
31	#define ICMP_DEST_UNREACH 3
32	#define ICMP_SOURCE_QUENCH 4
33	#define ICMP_REDIRECT 5
34	#define ICMP_ECHO 8
35	#define ICMP_TIME_EXCEEDED 11
36	#define ICMP_PARAMETERPROB 12
37	#define ICMP_TIMESTAMP 13
38	#define ICMP_TIMESTAMPREPLY 14
39	#define ICMP_INFO_REQUEST 15
40	#define ICMP_INFO_REPLY 16
41	#define ICMP_ADDRESS 17
42	#define ICMP_ADDRESSREPLY 18
43	#define NR_ICMP_TYPES 18
44
45
46	#define ICMP_NET_UNREACH 0
47	#define ICMP_HOST_UNREACH 1
48	#define ICMP_PROT_UNREACH 2
49	#define ICMP_PORT_UNREACH 3
50	#define ICMP_FRAG_NEEDED 4
51	#define ICMP_SR_FAILED 5
52	#define ICMP_NET_UNKNOWN 6
53	#define ICMP_HOST_UNKNOWN 7
54	#define ICMP_HOST_ISOLATED 8
55	#define ICMP_NET_ANO 9
56	#define ICMP_HOST_ANO 10
57	#define ICMP_NET_UNR_TOS 11
58	#define ICMP_HOST_UNR_TOS 12
59	#define ICMP_PKT_FILTERED 13
60	#define ICMP_PREC_VIOLATION 14
61	#define ICMP_PREC_CUTOFF 15
62	#define NR_ICMP_UNREACH 15
63
64	#define ICMP_REDIR_NET 0
65	#define ICMP_REDIR_HOST 1
66	#define ICMP_REDIR_NETTOS 2
67	#define ICMP_REDIR_HOSTTOS 3
68
69	#define ICMP_EXC_TTL 0
70	#define ICMP_EXC_FRAGTIME 1
71
72
73	struct icmp_ra_addr {
74	uint32_t ira_addr;
75	uint32_t ira_preference;
76	};
77
78	struct icmp {
79	uint8_t icmp_type;
80	uint8_t icmp_code;
81	uint16_t icmp_cksum;
82	union {
83	uint8_t ih_pptr;
84	struct in_addr ih_gwaddr;
85	struct ih_idseq {
86	uint16_t icd_id;
87	uint16_t icd_seq;
88	} ih_idseq;
89	uint32_t ih_void;
90
91	struct ih_pmtu {
92	uint16_t ipm_void;
93	uint16_t ipm_nextmtu;
94	} ih_pmtu;
95
96	struct ih_rtradv {
97	uint8_t irt_num_addrs;
98	uint8_t irt_wpa;
99	uint16_t irt_lifetime;
100	} ih_rtradv;
101	} icmp_hun;
102	union {
103	struct {
104	uint32_t its_otime;
105	uint32_t its_rtime;
106	uint32_t its_ttime;
107	} id_ts;
108	struct {
109	struct ip idi_ip;
110	} id_ip;
111	struct icmp_ra_addr id_radv;
112	uint32_t id_mask;
113	uint8_t id_data[1];
114	} icmp_dun;
115	};
116
117	#define icmp_pptr icmp_hun.ih_pptr
118	#define icmp_gwaddr icmp_hun.ih_gwaddr
119	#define icmp_id icmp_hun.ih_idseq.icd_id
120	#define icmp_seq icmp_hun.ih_idseq.icd_seq
121	#define icmp_void icmp_hun.ih_void
122	#define icmp_pmvoid icmp_hun.ih_pmtu.ipm_void
123	#define icmp_nextmtu icmp_hun.ih_pmtu.ipm_nextmtu
124	#define icmp_num_addrs icmp_hun.ih_rtradv.irt_num_addrs
125	#define icmp_wpa icmp_hun.ih_rtradv.irt_wpa
126	#define icmp_lifetime icmp_hun.ih_rtradv.irt_lifetime
127	#define icmp_otime icmp_dun.id_ts.its_otime
128	#define icmp_rtime icmp_dun.id_ts.its_rtime
129	#define icmp_ttime icmp_dun.id_ts.its_ttime
130	#define icmp_ip icmp_dun.id_ip.idi_ip
131	#define icmp_radv icmp_dun.id_radv
132	#define icmp_mask icmp_dun.id_mask
133	#define icmp_data icmp_dun.id_data
134
135	#define ICMP_MINLEN 8
136	#define ICMP_TSLEN (8 + 3 * sizeof (n_time))
137	#define ICMP_MASKLEN 12
138	#define ICMP_ADVLENMIN (8 + sizeof (struct ip) + 8)
139	#define ICMP_ADVLEN(p) (8 + ((p)->icmp_ip.ip_hl << 2) + 8)
140
141	#define ICMP_UNREACH 3
142	#define ICMP_SOURCEQUENCH 4
143	#define ICMP_ROUTERADVERT 9
144	#define ICMP_ROUTERSOLICIT 10
145	#define ICMP_TIMXCEED 11
146	#define ICMP_PARAMPROB 12
147	#define ICMP_TSTAMP 13
148	#define ICMP_TSTAMPREPLY 14
149	#define ICMP_IREQ 15
150	#define ICMP_IREQREPLY 16
151	#define ICMP_MASKREQ 17
152	#define ICMP_MASKREPLY 18
153	#define ICMP_MAXTYPE 18
154
155	#define ICMP_UNREACH_NET 0
156	#define ICMP_UNREACH_HOST 1
157	#define ICMP_UNREACH_PROTOCOL 2
158	#define ICMP_UNREACH_PORT 3
159	#define ICMP_UNREACH_NEEDFRAG 4
160	#define ICMP_UNREACH_SRCFAIL 5
161	#define ICMP_UNREACH_NET_UNKNOWN 6
162	#define ICMP_UNREACH_HOST_UNKNOWN 7
163	#define ICMP_UNREACH_ISOLATED 8
164	#define ICMP_UNREACH_NET_PROHIB 9
165	#define ICMP_UNREACH_HOST_PROHIB 10
166	#define ICMP_UNREACH_TOSNET 11
167	#define ICMP_UNREACH_TOSHOST 12
168	#define ICMP_UNREACH_FILTER_PROHIB 13
169	#define ICMP_UNREACH_HOST_PRECEDENCE 14
170	#define ICMP_UNREACH_PRECEDENCE_CUTOFF 15
171
172	#define ICMP_REDIRECT_NET 0
173	#define ICMP_REDIRECT_HOST 1
174	#define ICMP_REDIRECT_TOSNET 2
175	#define ICMP_REDIRECT_TOSHOST 3
176
177	#define ICMP_TIMXCEED_INTRANS 0
178	#define ICMP_TIMXCEED_REASS 1
179
180	#define ICMP_PARAMPROB_OPTABSENT 1
181
182	#define ICMP_INFOTYPE(type) \
183	((type) == ICMP_ECHOREPLY \|\| (type) == ICMP_ECHO \|\| \
184	(type) == ICMP_ROUTERADVERT \|\| (type) == ICMP_ROUTERSOLICIT \|\| \
185	(type) == ICMP_TSTAMP \|\| (type) == ICMP_TSTAMPREPLY \|\| \
186	(type) == ICMP_IREQ \|\| (type) == ICMP_IREQREPLY \|\| \
187	(type) == ICMP_MASKREQ \|\| (type) == ICMP_MASKREPLY)
188
189	#ifdef __cplusplus
190	}
191	#endif
192
193	#endif

lib/libc/include/wasm-wasi-musl/netinet/tcp.h deleted-305

...	@@ -1,305 +0,0 @@
1	#ifndef _NETINET_TCP_H
2	#define _NETINET_TCP_H
3
4	#include <features.h>
5
6	#define TCP_NODELAY 1
7	#define TCP_MAXSEG 2
8	#define TCP_CORK 3
9	#define TCP_KEEPIDLE 4
10	#define TCP_KEEPINTVL 5
11	#define TCP_KEEPCNT 6
12	#define TCP_SYNCNT 7
13	#define TCP_LINGER2 8
14	#define TCP_DEFER_ACCEPT 9
15	#define TCP_WINDOW_CLAMP 10
16	#define TCP_INFO 11
17	#define TCP_QUICKACK 12
18	#define TCP_CONGESTION 13
19	#define TCP_MD5SIG 14
20	#define TCP_THIN_LINEAR_TIMEOUTS 16
21	#define TCP_THIN_DUPACK 17
22	#define TCP_USER_TIMEOUT 18
23	#define TCP_REPAIR 19
24	#define TCP_REPAIR_QUEUE 20
25	#define TCP_QUEUE_SEQ 21
26	#define TCP_REPAIR_OPTIONS 22
27	#define TCP_FASTOPEN 23
28	#define TCP_TIMESTAMP 24
29	#define TCP_NOTSENT_LOWAT 25
30	#define TCP_CC_INFO 26
31	#define TCP_SAVE_SYN 27
32	#define TCP_SAVED_SYN 28
33	#define TCP_REPAIR_WINDOW 29
34	#define TCP_FASTOPEN_CONNECT 30
35	#define TCP_ULP 31
36	#define TCP_MD5SIG_EXT 32
37	#define TCP_FASTOPEN_KEY 33
38	#define TCP_FASTOPEN_NO_COOKIE 34
39	#define TCP_ZEROCOPY_RECEIVE 35
40	#define TCP_INQ 36
41	#define TCP_TX_DELAY 37
42
43	#define TCP_CM_INQ TCP_INQ
44
45	#define TCP_ESTABLISHED 1
46	#define TCP_SYN_SENT 2
47	#define TCP_SYN_RECV 3
48	#define TCP_FIN_WAIT1 4
49	#define TCP_FIN_WAIT2 5
50	#define TCP_TIME_WAIT 6
51	#define TCP_CLOSE 7
52	#define TCP_CLOSE_WAIT 8
53	#define TCP_LAST_ACK 9
54	#define TCP_LISTEN 10
55	#define TCP_CLOSING 11
56
57	enum {
58	TCP_NLA_PAD,
59	TCP_NLA_BUSY,
60	TCP_NLA_RWND_LIMITED,
61	TCP_NLA_SNDBUF_LIMITED,
62	TCP_NLA_DATA_SEGS_OUT,
63	TCP_NLA_TOTAL_RETRANS,
64	TCP_NLA_PACING_RATE,
65	TCP_NLA_DELIVERY_RATE,
66	TCP_NLA_SND_CWND,
67	TCP_NLA_REORDERING,
68	TCP_NLA_MIN_RTT,
69	TCP_NLA_RECUR_RETRANS,
70	TCP_NLA_DELIVERY_RATE_APP_LMT,
71	TCP_NLA_SNDQ_SIZE,
72	TCP_NLA_CA_STATE,
73	TCP_NLA_SND_SSTHRESH,
74	TCP_NLA_DELIVERED,
75	TCP_NLA_DELIVERED_CE,
76	TCP_NLA_BYTES_SENT,
77	TCP_NLA_BYTES_RETRANS,
78	TCP_NLA_DSACK_DUPS,
79	TCP_NLA_REORD_SEEN,
80	TCP_NLA_SRTT,
81	TCP_NLA_TIMEOUT_REHASH,
82	TCP_NLA_BYTES_NOTSENT,
83	TCP_NLA_EDT,
84	TCP_NLA_TTL,
85	};
86
87	#if defined(_GNU_SOURCE) \|\| defined(_BSD_SOURCE)
88	#define TCPOPT_EOL 0
89	#define TCPOPT_NOP 1
90	#define TCPOPT_MAXSEG 2
91	#define TCPOPT_WINDOW 3
92	#define TCPOPT_SACK_PERMITTED 4
93	#define TCPOPT_SACK 5
94	#define TCPOPT_TIMESTAMP 8
95	#define TCPOLEN_SACK_PERMITTED 2
96	#define TCPOLEN_WINDOW 3
97	#define TCPOLEN_MAXSEG 4
98	#define TCPOLEN_TIMESTAMP 10
99
100	#define SOL_TCP 6
101
102	#include <sys/types.h>
103	#include <sys/socket.h>
104	#include <stdint.h>
105
106	typedef uint32_t tcp_seq;
107
108	#define TH_FIN 0x01
109	#define TH_SYN 0x02
110	#define TH_RST 0x04
111	#define TH_PUSH 0x08
112	#define TH_ACK 0x10
113	#define TH_URG 0x20
114
115	struct tcphdr {
116	#ifdef _GNU_SOURCE
117	#ifdef __GNUC__
118	__extension__
119	#endif
120	union { struct {
121
122	uint16_t source;
123	uint16_t dest;
124	uint32_t seq;
125	uint32_t ack_seq;
126	#if __BYTE_ORDER == __LITTLE_ENDIAN
127	uint16_t res1:4;
128	uint16_t doff:4;
129	uint16_t fin:1;
130	uint16_t syn:1;
131	uint16_t rst:1;
132	uint16_t psh:1;
133	uint16_t ack:1;
134	uint16_t urg:1;
135	uint16_t res2:2;
136	#else
137	uint16_t doff:4;
138	uint16_t res1:4;
139	uint16_t res2:2;
140	uint16_t urg:1;
141	uint16_t ack:1;
142	uint16_t psh:1;
143	uint16_t rst:1;
144	uint16_t syn:1;
145	uint16_t fin:1;
146	#endif
147	uint16_t window;
148	uint16_t check;
149	uint16_t urg_ptr;
150
151	}; struct {
152	#endif
153
154	uint16_t th_sport;
155	uint16_t th_dport;
156	uint32_t th_seq;
157	uint32_t th_ack;
158	#if __BYTE_ORDER == __LITTLE_ENDIAN
159	uint8_t th_x2:4;
160	uint8_t th_off:4;
161	#else
162	uint8_t th_off:4;
163	uint8_t th_x2:4;
164	#endif
165	uint8_t th_flags;
166	uint16_t th_win;
167	uint16_t th_sum;
168	uint16_t th_urp;
169
170	#ifdef _GNU_SOURCE
171	}; };
172	#endif
173	};
174	#endif
175
176	#ifdef _GNU_SOURCE
177	#define TCPI_OPT_TIMESTAMPS 1
178	#define TCPI_OPT_SACK 2
179	#define TCPI_OPT_WSCALE 4
180	#define TCPI_OPT_ECN 8
181
182	#define TCP_CA_Open 0
183	#define TCP_CA_Disorder 1
184	#define TCP_CA_CWR 2
185	#define TCP_CA_Recovery 3
186	#define TCP_CA_Loss 4
187
188	enum tcp_fastopen_client_fail {
189	TFO_STATUS_UNSPEC,
190	TFO_COOKIE_UNAVAILABLE,
191	TFO_DATA_NOT_ACKED,
192	TFO_SYN_RETRANSMITTED,
193	};
194
195	struct tcp_info {
196	uint8_t tcpi_state;
197	uint8_t tcpi_ca_state;
198	uint8_t tcpi_retransmits;
199	uint8_t tcpi_probes;
200	uint8_t tcpi_backoff;
201	uint8_t tcpi_options;
202	uint8_t tcpi_snd_wscale : 4, tcpi_rcv_wscale : 4;
203	uint8_t tcpi_delivery_rate_app_limited : 1, tcpi_fastopen_client_fail : 2;
204	uint32_t tcpi_rto;
205	uint32_t tcpi_ato;
206	uint32_t tcpi_snd_mss;
207	uint32_t tcpi_rcv_mss;
208	uint32_t tcpi_unacked;
209	uint32_t tcpi_sacked;
210	uint32_t tcpi_lost;
211	uint32_t tcpi_retrans;
212	uint32_t tcpi_fackets;
213	uint32_t tcpi_last_data_sent;
214	uint32_t tcpi_last_ack_sent;
215	uint32_t tcpi_last_data_recv;
216	uint32_t tcpi_last_ack_recv;
217	uint32_t tcpi_pmtu;
218	uint32_t tcpi_rcv_ssthresh;
219	uint32_t tcpi_rtt;
220	uint32_t tcpi_rttvar;
221	uint32_t tcpi_snd_ssthresh;
222	uint32_t tcpi_snd_cwnd;
223	uint32_t tcpi_advmss;
224	uint32_t tcpi_reordering;
225	uint32_t tcpi_rcv_rtt;
226	uint32_t tcpi_rcv_space;
227	uint32_t tcpi_total_retrans;
228	uint64_t tcpi_pacing_rate;
229	uint64_t tcpi_max_pacing_rate;
230	uint64_t tcpi_bytes_acked;
231	uint64_t tcpi_bytes_received;
232	uint32_t tcpi_segs_out;
233	uint32_t tcpi_segs_in;
234	uint32_t tcpi_notsent_bytes;
235	uint32_t tcpi_min_rtt;
236	uint32_t tcpi_data_segs_in;
237	uint32_t tcpi_data_segs_out;
238	uint64_t tcpi_delivery_rate;
239	uint64_t tcpi_busy_time;
240	uint64_t tcpi_rwnd_limited;
241	uint64_t tcpi_sndbuf_limited;
242	uint32_t tcpi_delivered;
243	uint32_t tcpi_delivered_ce;
244	uint64_t tcpi_bytes_sent;
245	uint64_t tcpi_bytes_retrans;
246	uint32_t tcpi_dsack_dups;
247	uint32_t tcpi_reord_seen;
248	uint32_t tcpi_rcv_ooopack;
249	uint32_t tcpi_snd_wnd;
250	};
251
252	#define TCP_MD5SIG_MAXKEYLEN 80
253
254	#define TCP_MD5SIG_FLAG_PREFIX 0x1
255	#define TCP_MD5SIG_FLAG_IFINDEX 0x2
256
257	struct tcp_md5sig {
258	struct sockaddr_storage tcpm_addr;
259	uint8_t tcpm_flags;
260	uint8_t tcpm_prefixlen;
261	uint16_t tcpm_keylen;
262	int tcpm_ifindex;
263	uint8_t tcpm_key[TCP_MD5SIG_MAXKEYLEN];
264	};
265
266	struct tcp_diag_md5sig {
267	uint8_t tcpm_family;
268	uint8_t tcpm_prefixlen;
269	uint16_t tcpm_keylen;
270	uint32_t tcpm_addr[4];
271	uint8_t tcpm_key[TCP_MD5SIG_MAXKEYLEN];
272	};
273
274	#define TCP_REPAIR_ON 1
275	#define TCP_REPAIR_OFF 0
276	#define TCP_REPAIR_OFF_NO_WP -1
277
278	struct tcp_repair_window {
279	uint32_t snd_wl1;
280	uint32_t snd_wnd;
281	uint32_t max_window;
282	uint32_t rcv_wnd;
283	uint32_t rcv_wup;
284	};
285
286	#define TCP_RECEIVE_ZEROCOPY_FLAG_TLB_CLEAN_HINT 0x1
287
288	struct tcp_zerocopy_receive {
289	uint64_t address;
290	uint32_t length;
291	uint32_t recv_skip_hint;
292	uint32_t inq;
293	int32_t err;
294	uint64_t copybuf_address;
295	int32_t copybuf_len;
296	uint32_t flags;
297	uint64_t msg_control;
298	uint64_t msg_controllen;
299	uint32_t msg_flags;
300	uint32_t reserved;
301	};
302
303	#endif
304
305	#endif

lib/libc/include/wasm-wasi-musl/netinet/udp.h deleted-46

...	@@ -1,46 +0,0 @@
1	#ifndef _NETINET_UDP_H
2	#define _NETINET_UDP_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9	#include <stdint.h>
10
11	#ifdef _GNU_SOURCE
12	#define uh_sport source
13	#define uh_dport dest
14	#define uh_ulen len
15	#define uh_sum check
16	#endif
17
18	struct udphdr {
19	uint16_t uh_sport;
20	uint16_t uh_dport;
21	uint16_t uh_ulen;
22	uint16_t uh_sum;
23	};
24
25	#define UDP_CORK 1
26	#define UDP_ENCAP 100
27	#define UDP_NO_CHECK6_TX 101
28	#define UDP_NO_CHECK6_RX 102
29	#define UDP_SEGMENT 103
30	#define UDP_GRO 104
31
32	#define UDP_ENCAP_ESPINUDP_NON_IKE 1
33	#define UDP_ENCAP_ESPINUDP 2
34	#define UDP_ENCAP_L2TPINUDP 3
35	#define UDP_ENCAP_GTP0 4
36	#define UDP_ENCAP_GTP1U 5
37	#define UDP_ENCAP_RXRPC 6
38	#define TCP_ENCAP_ESPINTCP 7
39
40	#define SOL_UDP 17
41
42	#ifdef __cplusplus
43	}
44	#endif
45
46	#endif

lib/libc/include/wasm-wasi-musl/netpacket/packet.h deleted-62

...	@@ -1,62 +0,0 @@
1	#ifndef _NETPACKET_PACKET_H
2	#define _NETPACKET_PACKET_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	struct sockaddr_ll {
9	unsigned short sll_family, sll_protocol;
10	int sll_ifindex;
11	unsigned short sll_hatype;
12	unsigned char sll_pkttype, sll_halen;
13	unsigned char sll_addr[8];
14	};
15
16	struct packet_mreq {
17	int mr_ifindex;
18	unsigned short int mr_type, mr_alen;
19	unsigned char mr_address[8];
20	};
21
22	#define PACKET_HOST 0
23	#define PACKET_BROADCAST 1
24	#define PACKET_MULTICAST 2
25	#define PACKET_OTHERHOST 3
26	#define PACKET_OUTGOING 4
27	#define PACKET_LOOPBACK 5
28	#define PACKET_FASTROUTE 6
29
30	#define PACKET_ADD_MEMBERSHIP 1
31	#define PACKET_DROP_MEMBERSHIP 2
32	#define PACKET_RECV_OUTPUT 3
33	#define PACKET_RX_RING 5
34	#define PACKET_STATISTICS 6
35	#define PACKET_COPY_THRESH 7
36	#define PACKET_AUXDATA 8
37	#define PACKET_ORIGDEV 9
38	#define PACKET_VERSION 10
39	#define PACKET_HDRLEN 11
40	#define PACKET_RESERVE 12
41	#define PACKET_TX_RING 13
42	#define PACKET_LOSS 14
43	#define PACKET_VNET_HDR 15
44	#define PACKET_TX_TIMESTAMP 16
45	#define PACKET_TIMESTAMP 17
46	#define PACKET_FANOUT 18
47	#define PACKET_TX_HAS_OFF 19
48	#define PACKET_QDISC_BYPASS 20
49	#define PACKET_ROLLOVER_STATS 21
50	#define PACKET_FANOUT_DATA 22
51	#define PACKET_IGNORE_OUTGOING 23
52
53	#define PACKET_MR_MULTICAST 0
54	#define PACKET_MR_PROMISC 1
55	#define PACKET_MR_ALLMULTI 2
56	#define PACKET_MR_UNICAST 3
57
58	#ifdef __cplusplus
59	}
60	#endif
61
62	#endif

lib/libc/include/wasm-wasi-musl/nl_types.h deleted-22

...	@@ -1,22 +0,0 @@
1	#ifndef _NL_TYPES_H
2	#define _NL_TYPES_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#define NL_SETD 1
9	#define NL_CAT_LOCALE 1
10
11	typedef int nl_item;
12	typedef void *nl_catd;
13
14	nl_catd catopen (const char *, int);
15	char catgets (nl_catd, int, int, const char );
16	int catclose (nl_catd);
17
18	#ifdef __cplusplus
19	}
20	#endif
21
22	#endif

lib/libc/include/wasm-wasi-musl/regex.h deleted-62

...	@@ -1,62 +0,0 @@
1	#ifndef _REGEX_H
2	#define _REGEX_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9
10	#define __NEED_regoff_t
11	#define __NEED_size_t
12
13	#include <bits/alltypes.h>
14
15	typedef struct re_pattern_buffer {
16	size_t re_nsub;
17	void __opaque, __padding[4];
18	size_t __nsub2;
19	char __padding2;
20	} regex_t;
21
22	typedef struct {
23	regoff_t rm_so;
24	regoff_t rm_eo;
25	} regmatch_t;
26
27	#define REG_EXTENDED 1
28	#define REG_ICASE 2
29	#define REG_NEWLINE 4
30	#define REG_NOSUB 8
31
32	#define REG_NOTBOL 1
33	#define REG_NOTEOL 2
34
35	#define REG_OK 0
36	#define REG_NOMATCH 1
37	#define REG_BADPAT 2
38	#define REG_ECOLLATE 3
39	#define REG_ECTYPE 4
40	#define REG_EESCAPE 5
41	#define REG_ESUBREG 6
42	#define REG_EBRACK 7
43	#define REG_EPAREN 8
44	#define REG_EBRACE 9
45	#define REG_BADBR 10
46	#define REG_ERANGE 11
47	#define REG_ESPACE 12
48	#define REG_BADRPT 13
49
50	#define REG_ENOSYS -1
51
52	int regcomp(regex_t __restrict, const char __restrict, int);
53	int regexec(const regex_t __restrict, const char __restrict, size_t, regmatch_t *__restrict, int);
54	void regfree(regex_t *);
55
56	size_t regerror(int, const regex_t __restrict, char __restrict, size_t);
57
58	#ifdef __cplusplus
59	}
60	#endif
61
62	#endif

lib/libc/include/wasm-wasi-musl/search.h deleted-63

...	@@ -1,63 +0,0 @@
1	#ifndef _SEARCH_H
2	#define _SEARCH_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9
10	#define __NEED_size_t
11	#include <bits/alltypes.h>
12
13	typedef enum { FIND, ENTER } ACTION;
14	typedef enum { preorder, postorder, endorder, leaf } VISIT;
15
16	typedef struct entry {
17	char *key;
18	void *data;
19	} ENTRY;
20
21	int hcreate(size_t);
22	void hdestroy(void);
23	ENTRY *hsearch(ENTRY, ACTION);
24
25	#ifdef _GNU_SOURCE
26	struct hsearch_data {
27	struct __tab *__tab;
28	unsigned int __unused1;
29	unsigned int __unused2;
30	};
31
32	int hcreate_r(size_t, struct hsearch_data *);
33	void hdestroy_r(struct hsearch_data *);
34	int hsearch_r(ENTRY, ACTION, ENTRY *, struct hsearch_data );
35	#endif
36
37	void insque(void , void );
38	void remque(void *);
39
40	void lsearch(const void , void , size_t , size_t,
41	int ()(const void , const void *));
42	void lfind(const void , const void , size_t , size_t,
43	int ()(const void , const void *));
44
45	void tdelete(const void __restrict, void *__restrict, int()(const void , const void ));
46	void tfind(const void , void const , int()(const void , const void *));
47	void tsearch(const void , void *, int ()(const void , const void ));
48	void twalk(const void , void ()(const void *, VISIT, int));
49
50	#ifdef _GNU_SOURCE
51	struct qelem {
52	struct qelem q_forw, q_back;
53	char q_data[1];
54	};
55
56	void tdestroy(void , void ()(void *));
57	#endif
58
59	#ifdef __cplusplus
60	}
61	#endif
62
63	#endif

lib/libc/include/wasm-wasi-musl/semaphore.h deleted-39

...	@@ -1,39 +0,0 @@
1	#ifndef _SEMAPHORE_H
2	#define _SEMAPHORE_H
3	#ifdef __cplusplus
4	extern "C" {
5	#endif
6
7	#include <features.h>
8
9	#define __NEED_time_t
10	#define __NEED_struct_timespec
11	#include <bits/alltypes.h>
12
13	#include <fcntl.h>
14
15	#define SEM_FAILED ((sem_t *)0)
16
17	typedef struct {
18	volatile int __val[4*sizeof(long)/sizeof(int)];
19	} sem_t;
20
21	int sem_close(sem_t *);
22	int sem_destroy(sem_t *);
23	int sem_getvalue(sem_t __restrict, int __restrict);
24	int sem_init(sem_t *, int, unsigned);
25	sem_t sem_open(const char , int, ...);
26	int sem_post(sem_t *);
27	int sem_timedwait(sem_t __restrict, const struct timespec __restrict);
28	int sem_trywait(sem_t *);
29	int sem_unlink(const char *);
30	int sem_wait(sem_t *);
31
32	#if _REDIR_TIME64
33	__REDIR(sem_timedwait, __sem_timedwait_time64);
34	#endif
35
36	#ifdef __cplusplus
37	}
38	#endif
39	#endif

lib/libc/include/wasm-wasi-musl/stdalign.h deleted-20

...	@@ -1,20 +0,0 @@
1	#ifndef _STDALIGN_H
2	#define _STDALIGN_H
3
4	#ifndef __cplusplus
5
6	/* this whole header only works in C11 or with compiler extensions */
7	#if __STDC_VERSION__ < 201112L && defined( __GNUC__)
8	#define _Alignas(t) __attribute__((__aligned__(t)))
9	#define _Alignof(t) __alignof__(t)
10	#endif
11
12	#define alignas _Alignas
13	#define alignof _Alignof
14
15	#endif
16
17	#define __alignas_is_defined 1
18	#define __alignof_is_defined 1
19
20	#endif

lib/libc/include/wasm-wasi-musl/stdbool.h deleted-14

...	@@ -1,14 +0,0 @@
1	#ifndef _STDBOOL_H
2	#define _STDBOOL_H
3
4	#ifndef __cplusplus
5
6	#define true 1
7	#define false 0
8	#define bool _Bool
9
10	#endif
11
12	#define __bool_true_false_are_defined 1
13
14	#endif

lib/libc/include/wasm-wasi-musl/stdint.h deleted-117

...	@@ -1,117 +0,0 @@
1	#ifndef _STDINT_H
2	#define _STDINT_H
3
4	#define __NEED_int8_t
5	#define __NEED_int16_t
6	#define __NEED_int32_t
7	#define __NEED_int64_t
8
9	#define __NEED_uint8_t
10	#define __NEED_uint16_t
11	#define __NEED_uint32_t
12	#define __NEED_uint64_t
13
14	#define __NEED_intptr_t
15	#define __NEED_uintptr_t
16
17	#define __NEED_intmax_t
18	#define __NEED_uintmax_t
19
20	#include <bits/alltypes.h>
21
22	typedef int8_t int_fast8_t;
23	typedef int64_t int_fast64_t;
24
25	typedef int8_t int_least8_t;
26	typedef int16_t int_least16_t;
27	typedef int32_t int_least32_t;
28	typedef int64_t int_least64_t;
29
30	typedef uint8_t uint_fast8_t;
31	typedef uint64_t uint_fast64_t;
32
33	typedef uint8_t uint_least8_t;
34	typedef uint16_t uint_least16_t;
35	typedef uint32_t uint_least32_t;
36	typedef uint64_t uint_least64_t;
37
38	#define INT8_MIN (-1-0x7f)
39	#define INT16_MIN (-1-0x7fff)
40	#define INT32_MIN (-1-0x7fffffff)
41	#define INT64_MIN (-1-0x7fffffffffffffff)
42
43	#define INT8_MAX (0x7f)
44	#define INT16_MAX (0x7fff)
45	#define INT32_MAX (0x7fffffff)
46	#define INT64_MAX (0x7fffffffffffffff)
47
48	#define UINT8_MAX (0xff)
49	#define UINT16_MAX (0xffff)
50	#define UINT32_MAX (0xffffffffu)
51	#define UINT64_MAX (0xffffffffffffffffu)
52
53	#define INT_FAST8_MIN INT8_MIN
54	#define INT_FAST64_MIN INT64_MIN
55
56	#define INT_LEAST8_MIN INT8_MIN
57	#define INT_LEAST16_MIN INT16_MIN
58	#define INT_LEAST32_MIN INT32_MIN
59	#define INT_LEAST64_MIN INT64_MIN
60
61	#define INT_FAST8_MAX INT8_MAX
62	#define INT_FAST64_MAX INT64_MAX
63
64	#define INT_LEAST8_MAX INT8_MAX
65	#define INT_LEAST16_MAX INT16_MAX
66	#define INT_LEAST32_MAX INT32_MAX
67	#define INT_LEAST64_MAX INT64_MAX
68
69	#define UINT_FAST8_MAX UINT8_MAX
70	#define UINT_FAST64_MAX UINT64_MAX
71
72	#define UINT_LEAST8_MAX UINT8_MAX
73	#define UINT_LEAST16_MAX UINT16_MAX
74	#define UINT_LEAST32_MAX UINT32_MAX
75	#define UINT_LEAST64_MAX UINT64_MAX
76
77	#define INTMAX_MIN INT64_MIN
78	#define INTMAX_MAX INT64_MAX
79	#define UINTMAX_MAX UINT64_MAX
80
81	#define WINT_MIN 0U
82	#define WINT_MAX UINT32_MAX
83
84	#if L'\0'-1 > 0
85	#define WCHAR_MAX (0xffffffffu+L'\0')
86	#define WCHAR_MIN (0+L'\0')
87	#else
88	#define WCHAR_MAX (0x7fffffff+L'\0')
89	#define WCHAR_MIN (-1-0x7fffffff+L'\0')
90	#endif
91
92	#define SIG_ATOMIC_MIN INT32_MIN
93	#define SIG_ATOMIC_MAX INT32_MAX
94
95	#include <bits/stdint.h>
96
97	#define INT8_C(c) c
98	#define INT16_C(c) c
99	#define INT32_C(c) c
100
101	#define UINT8_C(c) c
102	#define UINT16_C(c) c
103	#define UINT32_C(c) c ## U
104
105	#if UINTPTR_MAX == UINT64_MAX
106	#define INT64_C(c) c ## L
107	#define UINT64_C(c) c ## UL
108	#define INTMAX_C(c) c ## L
109	#define UINTMAX_C(c) c ## UL
110	#else
111	#define INT64_C(c) c ## LL
112	#define UINT64_C(c) c ## ULL
113	#define INTMAX_C(c) c ## LL
114	#define UINTMAX_C(c) c ## ULL
115	#endif
116
117	#endif

lib/libc/include/wasm-wasi-musl/stdio_ext.h deleted-34

...	@@ -1,34 +0,0 @@
1	#ifndef _STDIO_EXT_H
2	#define _STDIO_EXT_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <stdio.h>
9
10	#define FSETLOCKING_QUERY 0
11	#define FSETLOCKING_INTERNAL 1
12	#define FSETLOCKING_BYCALLER 2
13
14	void _flushlbf(void);
15	int __fsetlocking(FILE *, int);
16	int __fwriting(FILE *);
17	int __freading(FILE *);
18	int __freadable(FILE *);
19	int __fwritable(FILE *);
20	int __flbf(FILE *);
21	size_t __fbufsize(FILE *);
22	size_t __fpending(FILE *);
23	int __fpurge(FILE *);
24
25	size_t __freadahead(FILE *);
26	const char __freadptr(FILE , size_t *);
27	void __freadptrinc(FILE *, size_t);
28	void __fseterr(FILE *);
29
30	#ifdef __cplusplus
31	}
32	#endif
33
34	#endif

lib/libc/include/wasm-wasi-musl/stdnoreturn.h deleted-7

...	@@ -1,7 +0,0 @@
1	#ifndef _STDNORETURN_H
2	#define _STDNORETURN_H
3	#ifndef __cplusplus
4	#include <features.h>
5	#define noreturn _Noreturn
6	#endif
7	#endif

lib/libc/include/wasm-wasi-musl/stropts.h deleted-139

...	@@ -1,139 +0,0 @@
1	#ifndef _STROPTS_H
2	#define _STROPTS_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#define __SID ('S' << 8)
9
10	#define I_NREAD (__SID \| 1)
11	#define I_PUSH (__SID \| 2)
12	#define I_POP (__SID \| 3)
13	#define I_LOOK (__SID \| 4)
14	#define I_FLUSH (__SID \| 5)
15	#define I_SRDOPT (__SID \| 6)
16	#define I_GRDOPT (__SID \| 7)
17	#define I_STR (__SID \| 8)
18	#define I_SETSIG (__SID \| 9)
19	#define I_GETSIG (__SID \|10)
20	#define I_FIND (__SID \|11)
21	#define I_LINK (__SID \|12)
22	#define I_UNLINK (__SID \|13)
23	#define I_PEEK (__SID \|15)
24	#define I_FDINSERT (__SID \|16)
25	#define I_SENDFD (__SID \|17)
26	#define I_RECVFD (__SID \|14)
27	#define I_SWROPT (__SID \|19)
28	#define I_GWROPT (__SID \|20)
29	#define I_LIST (__SID \|21)
30	#define I_PLINK (__SID \|22)
31	#define I_PUNLINK (__SID \|23)
32	#define I_FLUSHBAND (__SID \|28)
33	#define I_CKBAND (__SID \|29)
34	#define I_GETBAND (__SID \|30)
35	#define I_ATMARK (__SID \|31)
36	#define I_SETCLTIME (__SID \|32)
37	#define I_GETCLTIME (__SID \|33)
38	#define I_CANPUT (__SID \|34)
39
40	#define FMNAMESZ 8
41
42	#define FLUSHR 0x01
43	#define FLUSHW 0x02
44	#define FLUSHRW 0x03
45	#define FLUSHBAND 0x04
46
47	#define S_INPUT 0x0001
48	#define S_HIPRI 0x0002
49	#define S_OUTPUT 0x0004
50	#define S_MSG 0x0008
51	#define S_ERROR 0x0010
52	#define S_HANGUP 0x0020
53	#define S_RDNORM 0x0040
54	#define S_WRNORM S_OUTPUT
55	#define S_RDBAND 0x0080
56	#define S_WRBAND 0x0100
57	#define S_BANDURG 0x0200
58
59	#define RS_HIPRI 0x01
60
61	#define RNORM 0x0000
62	#define RMSGD 0x0001
63	#define RMSGN 0x0002
64	#define RPROTDAT 0x0004
65	#define RPROTDIS 0x0008
66	#define RPROTNORM 0x0010
67	#define RPROTMASK 0x001C
68
69	#define SNDZERO 0x001
70	#define SNDPIPE 0x002
71
72	#define ANYMARK 0x01
73	#define LASTMARK 0x02
74
75	#define MUXID_ALL (-1)
76
77	#define MSG_HIPRI 0x01
78	#define MSG_ANY 0x02
79	#define MSG_BAND 0x04
80
81	#define MORECTL 1
82	#define MOREDATA 2
83
84	struct bandinfo {
85	unsigned char bi_pri;
86	int bi_flag;
87	};
88
89	struct strbuf {
90	int maxlen;
91	int len;
92	char *buf;
93	};
94
95	struct strpeek {
96	struct strbuf ctlbuf;
97	struct strbuf databuf;
98	unsigned flags;
99	};
100
101	struct strfdinsert {
102	struct strbuf ctlbuf;
103	struct strbuf databuf;
104	unsigned flags;
105	int fildes;
106	int offset;
107	};
108
109	struct strioctl {
110	int ic_cmd;
111	int ic_timout;
112	int ic_len;
113	char *ic_dp;
114	};
115
116	struct strrecvfd {
117	int fd;
118	int uid;
119	int gid;
120	char __fill[8];
121	};
122
123	struct str_mlist {
124	char l_name[FMNAMESZ + 1];
125	};
126
127	struct str_list {
128	int sl_nmods;
129	struct str_mlist *sl_modlist;
130	};
131
132	int isastream(int);
133	int ioctl(int, int, ...);
134
135	#ifdef __cplusplus
136	}
137	#endif
138
139	#endif

lib/libc/include/wasm-wasi-musl/sys/dir.h deleted-2

...	@@ -1,2 +0,0 @@
1	#include <dirent.h>
2	#define direct dirent

lib/libc/include/wasm-wasi-musl/sys/errno.h deleted-2

...	@@ -1,2 +0,0 @@
1	#warning redirecting incorrect #include <sys/errno.h> to <errno.h>
2	#include <errno.h>

lib/libc/include/wasm-wasi-musl/sys/eventfd.h deleted-26

...	@@ -1,26 +0,0 @@
1	#ifndef _SYS_EVENTFD_H
2	#define _SYS_EVENTFD_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <stdint.h>
9	#include <fcntl.h>
10
11	typedef uint64_t eventfd_t;
12
13	#define EFD_SEMAPHORE 1
14	#define EFD_CLOEXEC O_CLOEXEC
15	#define EFD_NONBLOCK O_NONBLOCK
16
17	int eventfd(unsigned int, int);
18	int eventfd_read(int, eventfd_t *);
19	int eventfd_write(int, eventfd_t);
20
21
22	#ifdef __cplusplus
23	}
24	#endif
25
26	#endif /* sys/eventfd.h */

lib/libc/include/wasm-wasi-musl/sys/fcntl.h deleted-2

...	@@ -1,2 +0,0 @@
1	#warning redirecting incorrect #include <sys/fcntl.h> to <fcntl.h>
2	#include <fcntl.h>

lib/libc/include/wasm-wasi-musl/sys/file.h deleted-21

...	@@ -1,21 +0,0 @@
1	#ifndef _SYS_FILE_H
2	#define _SYS_FILE_H
3	#ifdef __cplusplus
4	extern "C" {
5	#endif
6
7	#define LOCK_SH 1
8	#define LOCK_EX 2
9	#define LOCK_NB 4
10	#define LOCK_UN 8
11
12	#define L_SET 0
13	#define L_INCR 1
14	#define L_XTND 2
15
16	int flock(int, int);
17
18	#ifdef __cplusplus
19	}
20	#endif
21	#endif

lib/libc/include/wasm-wasi-musl/sys/poll.h deleted-2

...	@@ -1,2 +0,0 @@
1	#warning redirecting incorrect #include <sys/poll.h> to <poll.h>
2	#include <poll.h>

lib/libc/include/wasm-wasi-musl/sys/reg.h deleted-9

...	@@ -1,9 +0,0 @@
1	#ifndef _SYS_REG_H
2	#define _SYS_REG_H
3
4	#include <limits.h>
5	#include <unistd.h>
6
7	#include <bits/reg.h>
8
9	#endif

lib/libc/include/wasm-wasi-musl/sys/signal.h deleted-2

...	@@ -1,2 +0,0 @@
1	#warning redirecting incorrect #include <sys/signal.h> to <signal.h>
2	#include <signal.h>

lib/libc/include/wasm-wasi-musl/sys/stropts.h deleted-1

...	@@ -1 +0,0 @@
1	#include <stropts.h>

lib/libc/include/wasm-wasi-musl/sys/sysinfo.h deleted-36

...	@@ -1,36 +0,0 @@
1	#ifndef _SYS_SYSINFO_H
2	#define _SYS_SYSINFO_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#define SI_LOAD_SHIFT 16
9
10	struct sysinfo {
11	unsigned long uptime;
12	unsigned long loads[3];
13	unsigned long totalram;
14	unsigned long freeram;
15	unsigned long sharedram;
16	unsigned long bufferram;
17	unsigned long totalswap;
18	unsigned long freeswap;
19	unsigned short procs, pad;
20	unsigned long totalhigh;
21	unsigned long freehigh;
22	unsigned mem_unit;
23	char __reserved[256];
24	};
25
26	int sysinfo (struct sysinfo *);
27	int get_nprocs_conf (void);
28	int get_nprocs (void);
29	long get_phys_pages (void);
30	long get_avphys_pages (void);
31
32	#ifdef __cplusplus
33	}
34	#endif
35
36	#endif

lib/libc/include/wasm-wasi-musl/sys/timeb.h deleted-28

...	@@ -1,28 +0,0 @@
1	#ifndef _SYS_TIMEB_H
2	#define _SYS_TIMEB_H
3	#ifdef __cplusplus
4	extern "C" {
5	#endif
6
7	#include <features.h>
8
9	#define __NEED_time_t
10
11	#include <bits/alltypes.h>
12
13	struct timeb {
14	time_t time;
15	unsigned short millitm;
16	short timezone, dstflag;
17	};
18
19	int ftime(struct timeb *);
20
21	#if _REDIR_TIME64
22	__REDIR(ftime, __ftime64);
23	#endif
24
25	#ifdef __cplusplus
26	}
27	#endif
28	#endif

lib/libc/include/wasm-wasi-musl/sys/timex.h deleted-103

...	@@ -1,103 +0,0 @@
1	#ifndef _SYS_TIMEX_H
2	#define _SYS_TIMEX_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#define __NEED_clockid_t
9
10	#include <bits/alltypes.h>
11
12	#include <sys/time.h>
13
14	struct ntptimeval {
15	struct timeval time;
16	long maxerror, esterror;
17	};
18
19	struct timex {
20	unsigned modes;
21	long offset, freq, maxerror, esterror;
22	int status;
23	long constant, precision, tolerance;
24	struct timeval time;
25	long tick, ppsfreq, jitter;
26	int shift;
27	long stabil, jitcnt, calcnt, errcnt, stbcnt;
28	int tai;
29	int __padding[11];
30	};
31
32	#define ADJ_OFFSET 0x0001
33	#define ADJ_FREQUENCY 0x0002
34	#define ADJ_MAXERROR 0x0004
35	#define ADJ_ESTERROR 0x0008
36	#define ADJ_STATUS 0x0010
37	#define ADJ_TIMECONST 0x0020
38	#define ADJ_TAI 0x0080
39	#define ADJ_SETOFFSET 0x0100
40	#define ADJ_MICRO 0x1000
41	#define ADJ_NANO 0x2000
42	#define ADJ_TICK 0x4000
43	#define ADJ_OFFSET_SINGLESHOT 0x8001
44	#define ADJ_OFFSET_SS_READ 0xa001
45
46	#define MOD_OFFSET ADJ_OFFSET
47	#define MOD_FREQUENCY ADJ_FREQUENCY
48	#define MOD_MAXERROR ADJ_MAXERROR
49	#define MOD_ESTERROR ADJ_ESTERROR
50	#define MOD_STATUS ADJ_STATUS
51	#define MOD_TIMECONST ADJ_TIMECONST
52	#define MOD_CLKB ADJ_TICK
53	#define MOD_CLKA ADJ_OFFSET_SINGLESHOT
54	#define MOD_TAI ADJ_TAI
55	#define MOD_MICRO ADJ_MICRO
56	#define MOD_NANO ADJ_NANO
57
58	#define STA_PLL 0x0001
59	#define STA_PPSFREQ 0x0002
60	#define STA_PPSTIME 0x0004
61	#define STA_FLL 0x0008
62
63	#define STA_INS 0x0010
64	#define STA_DEL 0x0020
65	#define STA_UNSYNC 0x0040
66	#define STA_FREQHOLD 0x0080
67
68	#define STA_PPSSIGNAL 0x0100
69	#define STA_PPSJITTER 0x0200
70	#define STA_PPSWANDER 0x0400
71	#define STA_PPSERROR 0x0800
72
73	#define STA_CLOCKERR 0x1000
74	#define STA_NANO 0x2000
75	#define STA_MODE 0x4000
76	#define STA_CLK 0x8000
77
78	#define STA_RONLY (STA_PPSSIGNAL \| STA_PPSJITTER \| STA_PPSWANDER \| \
79	STA_PPSERROR \| STA_CLOCKERR \| STA_NANO \| STA_MODE \| STA_CLK)
80
81	#define TIME_OK 0
82	#define TIME_INS 1
83	#define TIME_DEL 2
84	#define TIME_OOP 3
85	#define TIME_WAIT 4
86	#define TIME_ERROR 5
87	#define TIME_BAD TIME_ERROR
88
89	#define MAXTC 6
90
91	int adjtimex(struct timex *);
92	int clock_adjtime(clockid_t, struct timex *);
93
94	#if _REDIR_TIME64
95	__REDIR(adjtimex, __adjtimex_time64);
96	__REDIR(clock_adjtime, __clock_adjtime64);
97	#endif
98
99	#ifdef __cplusplus
100	}
101	#endif
102
103	#endif

lib/libc/include/wasm-wasi-musl/sys/ttydefaults.h deleted-34

...	@@ -1,34 +0,0 @@
1	#ifndef _SYS_TTYDEFAULTS_H
2	#define _SYS_TTYDEFAULTS_H
3
4	#define TTYDEF_IFLAG (BRKINT \| ISTRIP \| ICRNL \| IMAXBEL \| IXON \| IXANY)
5	#define TTYDEF_OFLAG (OPOST \| ONLCR \| XTABS)
6	#define TTYDEF_LFLAG (ECHO \| ICANON \| ISIG \| IEXTEN \| ECHOE\|ECHOKE\|ECHOCTL)
7	#define TTYDEF_CFLAG (CREAD \| CS7 \| PARENB \| HUPCL)
8	#define TTYDEF_SPEED (B9600)
9	#define CTRL(x) ((x)&037)
10	#define CEOF CTRL('d')
11
12	#define CEOL '\0'
13	#define CSTATUS '\0'
14
15	#define CERASE 0177
16	#define CINTR CTRL('c')
17	#define CKILL CTRL('u')
18	#define CMIN 1
19	#define CQUIT 034
20	#define CSUSP CTRL('z')
21	#define CTIME 0
22	#define CDSUSP CTRL('y')
23	#define CSTART CTRL('q')
24	#define CSTOP CTRL('s')
25	#define CLNEXT CTRL('v')
26	#define CDISCARD CTRL('o')
27	#define CWERASE CTRL('w')
28	#define CREPRINT CTRL('r')
29	#define CEOT CEOF
30	#define CBRK CEOL
31	#define CRPRNT CREPRINT
32	#define CFLUSH CDISCARD
33
34	#endif

lib/libc/include/wasm-wasi-musl/sys/utsname.h deleted-29

...	@@ -1,29 +0,0 @@
1	#ifndef _SYS_UTSNAME_H
2	#define _SYS_UTSNAME_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9
10	struct utsname {
11	char sysname[65];
12	char nodename[65];
13	char release[65];
14	char version[65];
15	char machine[65];
16	#ifdef _GNU_SOURCE
17	char domainname[65];
18	#else
19	char __domainname[65];
20	#endif
21	};
22
23	int uname (struct utsname *);
24
25	#ifdef __cplusplus
26	}
27	#endif
28
29	#endif

lib/libc/include/wasm-wasi-musl/syscall.h deleted-1

...	@@ -1 +0,0 @@
1	#include <sys/syscall.h>

lib/libc/include/wasm-wasi-musl/sysexits.h deleted-21

...	@@ -1,21 +0,0 @@
1	#ifndef _SYSEXITS_H
2	#define _SYSEXITS_H
3	#define EX_OK 0
4	#define EX__BASE 64
5	#define EX_USAGE 64
6	#define EX_DATAERR 65
7	#define EX_NOINPUT 66
8	#define EX_NOUSER 67
9	#define EX_NOHOST 68
10	#define EX_UNAVAILABLE 69
11	#define EX_SOFTWARE 70
12	#define EX_OSERR 71
13	#define EX_OSFILE 72
14	#define EX_CANTCREAT 73
15	#define EX_IOERR 74
16	#define EX_TEMPFAIL 75
17	#define EX_PROTOCOL 76
18	#define EX_NOPERM 77
19	#define EX_CONFIG 78
20	#define EX__MAX 78
21	#endif

lib/libc/include/wasm-wasi-musl/tar.h deleted-33

...	@@ -1,33 +0,0 @@
1	#ifndef _TAR_H
2	#define _TAR_H
3
4	#define TSUID 04000
5	#define TSGID 02000
6	#define TSVTX 01000
7	#define TUREAD 00400
8	#define TUWRITE 00200
9	#define TUEXEC 00100
10	#define TGREAD 00040
11	#define TGWRITE 00020
12	#define TGEXEC 00010
13	#define TOREAD 00004
14	#define TOWRITE 00002
15	#define TOEXEC 00001
16
17	#define REGTYPE '0'
18	#define AREGTYPE '\0'
19	#define LNKTYPE '1'
20	#define SYMTYPE '2'
21	#define CHRTYPE '3'
22	#define BLKTYPE '4'
23	#define DIRTYPE '5'
24	#define FIFOTYPE '6'
25	#define CONTTYPE '7'
26
27	#define TMAGIC "ustar"
28	#define TMAGLEN 6
29
30	#define TVERSION "00"
31	#define TVERSLEN 2
32
33	#endif

lib/libc/include/wasm-wasi-musl/tgmath.h deleted-270

...	@@ -1,270 +0,0 @@
1	#ifndef _TGMATH_H
2	#define _TGMATH_H
3
4	/*
5	the return types are only correct with gcc (__GNUC__)
6	otherwise they are long double or long double complex
7
8	the long double version of a function is never chosen when
9	sizeof(double) == sizeof(long double)
10	(but the return type is set correctly with gcc)
11	*/
12
13	#include <math.h>
14	#include <complex.h>
15
16	#define __IS_FP(x) (sizeof((x)+1ULL) == sizeof((x)+1.0f))
17	#define __IS_CX(x) (__IS_FP(x) && sizeof(x) == sizeof((x)+I))
18	#define __IS_REAL(x) (__IS_FP(x) && 2*sizeof(x) == sizeof((x)+I))
19
20	#define __FLT(x) (__IS_REAL(x) && sizeof(x) == sizeof(float))
21	#define __LDBL(x) (__IS_REAL(x) && sizeof(x) == sizeof(long double) && sizeof(long double) != sizeof(double))
22
23	#define __FLTCX(x) (__IS_CX(x) && sizeof(x) == sizeof(float complex))
24	#define __DBLCX(x) (__IS_CX(x) && sizeof(x) == sizeof(double complex))
25	#define __LDBLCX(x) (__IS_CX(x) && sizeof(x) == sizeof(long double complex) && sizeof(long double) != sizeof(double))
26
27	/* return type */
28
29	#ifdef __GNUC__
30	/*
31	the result must be casted to the right type
32	(otherwise the result type is determined by the conversion
33	rules applied to all the function return types so it is long
34	double or long double complex except for integral functions)
35
36	this cannot be done in c99, so the typeof gcc extension is
37	used and that the type of ?: depends on wether an operand is
38	a null pointer constant or not
39	(in c11 _Generic can be used)
40
41	the c arguments below must be integer constant expressions
42	so they can be in null pointer constants
43	(__IS_FP above was carefully chosen this way)
44	*/
45	/* if c then t else void */
46	#define __type1(c,t) __typeof__((0?(t)0:(void*)!(c)))
47	/* if c then t1 else t2 */
48	#define __type2(c,t1,t2) __typeof__((0?(__type1(c,t1))0:(__type1(!(c),t2)*)0))
49	/* cast to double when x is integral, otherwise use typeof(x) */
50	#define __RETCAST(x) ( \
51	__type2(__IS_FP(x), __typeof__(x), double))
52	/* 2 args case, should work for complex types (cpow) */
53	#define __RETCAST_2(x, y) ( \
54	__type2(__IS_FP(x) && __IS_FP(y), \
55	__typeof__((x)+(y)), \
56	__typeof__((x)+(y)+1.0)))
57	/* 3 args case (fma only) */
58	#define __RETCAST_3(x, y, z) ( \
59	__type2(__IS_FP(x) && __IS_FP(y) && __IS_FP(z), \
60	__typeof__((x)+(y)+(z)), \
61	__typeof__((x)+(y)+(z)+1.0)))
62	/* drop complex from the type of x */
63	/* TODO: wrong when sizeof(long double)==sizeof(double) */
64	#define __RETCAST_REAL(x) ( \
65	__type2(__IS_FP(x) && sizeof((x)+I) == sizeof(float complex), float, \
66	__type2(sizeof((x)+1.0+I) == sizeof(double complex), double, \
67	long double)))
68	/* add complex to the type of x */
69	#define __RETCAST_CX(x) (__typeof__(__RETCAST(x)0+I))
70	#else
71	#define __RETCAST(x)
72	#define __RETCAST_2(x, y)
73	#define __RETCAST_3(x, y, z)
74	#define __RETCAST_REAL(x)
75	#define __RETCAST_CX(x)
76	#endif
77
78	/* function selection */
79
80	#define __tg_real_nocast(fun, x) ( \
81	__FLT(x) ? fun ## f (x) : \
82	__LDBL(x) ? fun ## l (x) : \
83	fun(x) )
84
85	#define __tg_real(fun, x) (__RETCAST(x)__tg_real_nocast(fun, x))
86
87	#define __tg_real_2_1(fun, x, y) (__RETCAST(x)( \
88	__FLT(x) ? fun ## f (x, y) : \
89	__LDBL(x) ? fun ## l (x, y) : \
90	fun(x, y) ))
91
92	#define __tg_real_2(fun, x, y) (__RETCAST_2(x, y)( \
93	__FLT(x) && __FLT(y) ? fun ## f (x, y) : \
94	__LDBL((x)+(y)) ? fun ## l (x, y) : \
95	fun(x, y) ))
96
97	#define __tg_complex(fun, x) (__RETCAST_CX(x)( \
98	__FLTCX((x)+I) && __IS_FP(x) ? fun ## f (x) : \
99	__LDBLCX((x)+I) ? fun ## l (x) : \
100	fun(x) ))
101
102	#define __tg_complex_retreal(fun, x) (__RETCAST_REAL(x)( \
103	__FLTCX((x)+I) && __IS_FP(x) ? fun ## f (x) : \
104	__LDBLCX((x)+I) ? fun ## l (x) : \
105	fun(x) ))
106
107	#define __tg_real_complex(fun, x) (__RETCAST(x)( \
108	__FLTCX(x) ? c ## fun ## f (x) : \
109	__DBLCX(x) ? c ## fun (x) : \
110	__LDBLCX(x) ? c ## fun ## l (x) : \
111	__FLT(x) ? fun ## f (x) : \
112	__LDBL(x) ? fun ## l (x) : \
113	fun(x) ))
114
115	/* special cases */
116
117	#define __tg_real_remquo(x, y, z) (__RETCAST_2(x, y)( \
118	__FLT(x) && __FLT(y) ? remquof(x, y, z) : \
119	__LDBL((x)+(y)) ? remquol(x, y, z) : \
120	remquo(x, y, z) ))
121
122	#define __tg_real_fma(x, y, z) (__RETCAST_3(x, y, z)( \
123	__FLT(x) && __FLT(y) && __FLT(z) ? fmaf(x, y, z) : \
124	__LDBL((x)+(y)+(z)) ? fmal(x, y, z) : \
125	fma(x, y, z) ))
126
127	#define __tg_real_complex_pow(x, y) (__RETCAST_2(x, y)( \
128	__FLTCX((x)+(y)) && __IS_FP(x) && __IS_FP(y) ? cpowf(x, y) : \
129	__FLTCX((x)+(y)) ? cpow(x, y) : \
130	__DBLCX((x)+(y)) ? cpow(x, y) : \
131	__LDBLCX((x)+(y)) ? cpowl(x, y) : \
132	__FLT(x) && __FLT(y) ? powf(x, y) : \
133	__LDBL((x)+(y)) ? powl(x, y) : \
134	pow(x, y) ))
135
136	#define __tg_real_complex_fabs(x) (__RETCAST_REAL(x)( \
137	__FLTCX(x) ? cabsf(x) : \
138	__DBLCX(x) ? cabs(x) : \
139	__LDBLCX(x) ? cabsl(x) : \
140	__FLT(x) ? fabsf(x) : \
141	__LDBL(x) ? fabsl(x) : \
142	fabs(x) ))
143
144	/* suppress any macros in math.h or complex.h */
145
146	#undef acos
147	#undef acosh
148	#undef asin
149	#undef asinh
150	#undef atan
151	#undef atan2
152	#undef atanh
153	#undef carg
154	#undef cbrt
155	#undef ceil
156	#undef cimag
157	#undef conj
158	#undef copysign
159	#undef cos
160	#undef cosh
161	#undef cproj
162	#undef creal
163	#undef erf
164	#undef erfc
165	#undef exp
166	#undef exp2
167	#undef expm1
168	#undef fabs
169	#undef fdim
170	#undef floor
171	#undef fma
172	#undef fmax
173	#undef fmin
174	#undef fmod
175	#undef frexp
176	#undef hypot
177	#undef ilogb
178	#undef ldexp
179	#undef lgamma
180	#undef llrint
181	#undef llround
182	#undef log
183	#undef log10
184	#undef log1p
185	#undef log2
186	#undef logb
187	#undef lrint
188	#undef lround
189	#undef nearbyint
190	#undef nextafter
191	#undef nexttoward
192	#undef pow
193	#undef remainder
194	#undef remquo
195	#undef rint
196	#undef round
197	#undef scalbln
198	#undef scalbn
199	#undef sin
200	#undef sinh
201	#undef sqrt
202	#undef tan
203	#undef tanh
204	#undef tgamma
205	#undef trunc
206
207	/* tg functions */
208
209	#define acos(x) __tg_real_complex(acos, (x))
210	#define acosh(x) __tg_real_complex(acosh, (x))
211	#define asin(x) __tg_real_complex(asin, (x))
212	#define asinh(x) __tg_real_complex(asinh, (x))
213	#define atan(x) __tg_real_complex(atan, (x))
214	#define atan2(x,y) __tg_real_2(atan2, (x), (y))
215	#define atanh(x) __tg_real_complex(atanh, (x))
216	#define carg(x) __tg_complex_retreal(carg, (x))
217	#define cbrt(x) __tg_real(cbrt, (x))
218	#define ceil(x) __tg_real(ceil, (x))
219	#define cimag(x) __tg_complex_retreal(cimag, (x))
220	#define conj(x) __tg_complex(conj, (x))
221	#define copysign(x,y) __tg_real_2(copysign, (x), (y))
222	#define cos(x) __tg_real_complex(cos, (x))
223	#define cosh(x) __tg_real_complex(cosh, (x))
224	#define cproj(x) __tg_complex(cproj, (x))
225	#define creal(x) __tg_complex_retreal(creal, (x))
226	#define erf(x) __tg_real(erf, (x))
227	#define erfc(x) __tg_real(erfc, (x))
228	#define exp(x) __tg_real_complex(exp, (x))
229	#define exp2(x) __tg_real(exp2, (x))
230	#define expm1(x) __tg_real(expm1, (x))
231	#define fabs(x) __tg_real_complex_fabs(x)
232	#define fdim(x,y) __tg_real_2(fdim, (x), (y))
233	#define floor(x) __tg_real(floor, (x))
234	#define fma(x,y,z) __tg_real_fma((x), (y), (z))
235	#define fmax(x,y) __tg_real_2(fmax, (x), (y))
236	#define fmin(x,y) __tg_real_2(fmin, (x), (y))
237	#define fmod(x,y) __tg_real_2(fmod, (x), (y))
238	#define frexp(x,y) __tg_real_2_1(frexp, (x), (y))
239	#define hypot(x,y) __tg_real_2(hypot, (x), (y))
240	#define ilogb(x) __tg_real_nocast(ilogb, (x))
241	#define ldexp(x,y) __tg_real_2_1(ldexp, (x), (y))
242	#define lgamma(x) __tg_real(lgamma, (x))
243	#define llrint(x) __tg_real_nocast(llrint, (x))
244	#define llround(x) __tg_real_nocast(llround, (x))
245	#define log(x) __tg_real_complex(log, (x))
246	#define log10(x) __tg_real(log10, (x))
247	#define log1p(x) __tg_real(log1p, (x))
248	#define log2(x) __tg_real(log2, (x))
249	#define logb(x) __tg_real(logb, (x))
250	#define lrint(x) __tg_real_nocast(lrint, (x))
251	#define lround(x) __tg_real_nocast(lround, (x))
252	#define nearbyint(x) __tg_real(nearbyint, (x))
253	#define nextafter(x,y) __tg_real_2(nextafter, (x), (y))
254	#define nexttoward(x,y) __tg_real_2(nexttoward, (x), (y))
255	#define pow(x,y) __tg_real_complex_pow((x), (y))
256	#define remainder(x,y) __tg_real_2(remainder, (x), (y))
257	#define remquo(x,y,z) __tg_real_remquo((x), (y), (z))
258	#define rint(x) __tg_real(rint, (x))
259	#define round(x) __tg_real(round, (x))
260	#define scalbln(x,y) __tg_real_2_1(scalbln, (x), (y))
261	#define scalbn(x,y) __tg_real_2_1(scalbn, (x), (y))
262	#define sin(x) __tg_real_complex(sin, (x))
263	#define sinh(x) __tg_real_complex(sinh, (x))
264	#define sqrt(x) __tg_real_complex(sqrt, (x))
265	#define tan(x) __tg_real_complex(tan, (x))
266	#define tanh(x) __tg_real_complex(tanh, (x))
267	#define tgamma(x) __tg_real(tgamma, (x))
268	#define trunc(x) __tg_real(trunc, (x))
269
270	#endif

lib/libc/include/wasm-wasi-musl/threads.h deleted-93

...	@@ -1,93 +0,0 @@
1	#ifndef _THREADS_H
2	#define _THREADS_H
3
4	#include <features.h>
5	#include <time.h>
6
7	#ifdef __cplusplus
8	extern "C" {
9	typedef unsigned long thrd_t;
10	#else
11	typedef struct __pthread *thrd_t;
12	#define thread_local _Thread_local
13	#endif
14
15	typedef int once_flag;
16	typedef unsigned tss_t;
17	typedef int (thrd_start_t)(void );
18	typedef void (tss_dtor_t)(void );
19
20	#define __NEED_cnd_t
21	#define __NEED_mtx_t
22
23	#include <bits/alltypes.h>
24
25	#define TSS_DTOR_ITERATIONS 4
26
27	enum {
28	thrd_success = 0,
29	thrd_busy = 1,
30	thrd_error = 2,
31	thrd_nomem = 3,
32	thrd_timedout = 4,
33	};
34
35	enum {
36	mtx_plain = 0,
37	mtx_recursive = 1,
38	mtx_timed = 2,
39	};
40
41	#define ONCE_FLAG_INIT 0
42
43	int thrd_create(thrd_t , thrd_start_t, void );
44	_Noreturn void thrd_exit(int);
45
46	int thrd_detach(thrd_t);
47	int thrd_join(thrd_t, int *);
48
49	int thrd_sleep(const struct timespec , struct timespec );
50	void thrd_yield(void);
51
52	thrd_t thrd_current(void);
53	int thrd_equal(thrd_t, thrd_t);
54	#ifndef __cplusplus
55	#define thrd_equal(A, B) ((A) == (B))
56	#endif
57
58	void call_once(once_flag , void ()(void));
59
60	int mtx_init(mtx_t *, int);
61	void mtx_destroy(mtx_t *);
62
63	int mtx_lock(mtx_t *);
64	int mtx_timedlock(mtx_t __restrict, const struct timespec __restrict);
65	int mtx_trylock(mtx_t *);
66	int mtx_unlock(mtx_t *);
67
68	int cnd_init(cnd_t *);
69	void cnd_destroy(cnd_t *);
70
71	int cnd_broadcast(cnd_t *);
72	int cnd_signal(cnd_t *);
73
74	int cnd_timedwait(cnd_t __restrict, mtx_t __restrict, const struct timespec *__restrict);
75	int cnd_wait(cnd_t , mtx_t );
76
77	int tss_create(tss_t *, tss_dtor_t);
78	void tss_delete(tss_t);
79
80	int tss_set(tss_t, void *);
81	void *tss_get(tss_t);
82
83	#if _REDIR_TIME64
84	__REDIR(thrd_sleep, __thrd_sleep_time64);
85	__REDIR(mtx_timedlock, __mtx_timedlock_time64);
86	__REDIR(cnd_timedwait, __cnd_timedwait_time64);
87	#endif
88
89	#ifdef __cplusplus
90	}
91	#endif
92
93	#endif

lib/libc/include/wasm-wasi-musl/uchar.h deleted-29

...	@@ -1,29 +0,0 @@
1	#ifndef _UCHAR_H
2	#define _UCHAR_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#if __cplusplus < 201103L
9	typedef unsigned short char16_t;
10	typedef unsigned char32_t;
11	#endif
12
13	#define __NEED_mbstate_t
14	#define __NEED_size_t
15
16	#include <features.h>
17	#include <bits/alltypes.h>
18
19	size_t c16rtomb(char __restrict, char16_t, mbstate_t __restrict);
20	size_t mbrtoc16(char16_t __restrict, const char __restrict, size_t, mbstate_t *__restrict);
21
22	size_t c32rtomb(char __restrict, char32_t, mbstate_t __restrict);
23	size_t mbrtoc32(char32_t __restrict, const char __restrict, size_t, mbstate_t *__restrict);
24
25	#ifdef __cplusplus
26	}
27	#endif
28
29	#endif

lib/libc/include/wasm-wasi-musl/utime.h deleted-29

...	@@ -1,29 +0,0 @@
1	#ifndef _UTIME_H
2	#define _UTIME_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9
10	#define __NEED_time_t
11
12	#include <bits/alltypes.h>
13
14	struct utimbuf {
15	time_t actime;
16	time_t modtime;
17	};
18
19	int utime (const char , const struct utimbuf );
20
21	#if _REDIR_TIME64
22	__REDIR(utime, __utime64);
23	#endif
24
25	#ifdef __cplusplus
26	}
27	#endif
28
29	#endif

lib/libc/include/wasm-wasi-musl/values.h deleted-39

...	@@ -1,39 +0,0 @@
1	#ifndef _VALUES_H
2	#define _VALUES_H
3
4	#include <limits.h>
5
6	#define CHARBITS (sizeof(char) * 8)
7	#define SHORTBITS (sizeof(short) * 8)
8	#define INTBITS (sizeof(int) * 8)
9	#define LONGBITS (sizeof(long) * 8)
10	#define PTRBITS (sizeof(char ) 8)
11	#define DOUBLEBITS (sizeof(double) * 8)
12	#define FLOATBITS (sizeof(float) * 8)
13
14	#define MINSHORT SHRT_MIN
15	#define MININT INT_MIN
16	#define MINLONG LONG_MIN
17
18	#define MAXSHORT SHRT_MAX
19	#define MAXINT INT_MAX
20	#define MAXLONG LONG_MAX
21
22	#define HIBITS MINSHORT
23	#define HIBITL MINLONG
24
25	#include <float.h>
26
27	#define MAXDOUBLE DBL_MAX
28	#undef MAXFLOAT
29	#define MAXFLOAT FLT_MAX
30	#define MINDOUBLE DBL_MIN
31	#define MINFLOAT FLT_MIN
32	#define DMINEXP DBL_MIN_EXP
33	#define FMINEXP FLT_MIN_EXP
34	#define DMAXEXP DBL_MAX_EXP
35	#define FMAXEXP FLT_MAX_EXP
36
37	#define BITSPERBYTE CHAR_BIT
38
39	#endif

lib/libc/include/wasm-wasi-musl/wctype.h deleted-79

...	@@ -1,79 +0,0 @@
1	#ifndef _WCTYPE_H
2	#define _WCTYPE_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9
10	#define __NEED_wint_t
11	#define __NEED_wctype_t
12
13	#if defined(_POSIX_SOURCE) \|\| defined(_POSIX_C_SOURCE) \
14	\|\| defined(_XOPEN_SOURCE) \|\| defined(_GNU_SOURCE) \|\| defined(_BSD_SOURCE)
15	#define __NEED_locale_t
16	#endif
17
18	#include <bits/alltypes.h>
19
20	typedef const int * wctrans_t;
21
22	#undef WEOF
23	#define WEOF 0xffffffffU
24
25	#undef iswdigit
26
27	int iswalnum(wint_t);
28	int iswalpha(wint_t);
29	int iswblank(wint_t);
30	int iswcntrl(wint_t);
31	int iswdigit(wint_t);
32	int iswgraph(wint_t);
33	int iswlower(wint_t);
34	int iswprint(wint_t);
35	int iswpunct(wint_t);
36	int iswspace(wint_t);
37	int iswupper(wint_t);
38	int iswxdigit(wint_t);
39	int iswctype(wint_t, wctype_t);
40	wint_t towctrans(wint_t, wctrans_t);
41	wint_t towlower(wint_t);
42	wint_t towupper(wint_t);
43	wctrans_t wctrans(const char *);
44	wctype_t wctype(const char *);
45
46	#ifndef __cplusplus
47	#undef iswdigit
48	#define iswdigit(a) (0 ? iswdigit(a) : ((unsigned)(a)-'0') < 10)
49	#endif
50
51	#if defined(_POSIX_SOURCE) \|\| defined(_POSIX_C_SOURCE) \
52	\|\| defined(_XOPEN_SOURCE) \|\| defined(_GNU_SOURCE) \|\| defined(_BSD_SOURCE)
53
54	int iswalnum_l(wint_t, locale_t);
55	int iswalpha_l(wint_t, locale_t);
56	int iswblank_l(wint_t, locale_t);
57	int iswcntrl_l(wint_t, locale_t);
58	int iswdigit_l(wint_t, locale_t);
59	int iswgraph_l(wint_t, locale_t);
60	int iswlower_l(wint_t, locale_t);
61	int iswprint_l(wint_t, locale_t);
62	int iswpunct_l(wint_t, locale_t);
63	int iswspace_l(wint_t, locale_t);
64	int iswupper_l(wint_t, locale_t);
65	int iswxdigit_l(wint_t, locale_t);
66	int iswctype_l(wint_t, wctype_t, locale_t);
67	wint_t towlower_l(wint_t, locale_t);
68	wint_t towupper_l(wint_t, locale_t);
69	wint_t towctrans_l(wint_t, wctrans_t, locale_t);
70	wctrans_t wctrans_l(const char *, locale_t);
71	wctype_t wctype_l(const char *, locale_t);
72
73	#endif
74
75	#ifdef __cplusplus
76	}
77	#endif
78
79	#endif

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/dirent.h deleted-11

...	@@ -1,11 +0,0 @@
1	#define _DIRENT_HAVE_D_RECLEN
2	#define _DIRENT_HAVE_D_OFF
3	#define _DIRENT_HAVE_D_TYPE
4
5	struct dirent {
6	ino_t d_ino;
7	off_t d_off;
8	unsigned short d_reclen;
9	unsigned char d_type;
10	char d_name[256];
11	};

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/errno.h deleted-134

...	@@ -1,134 +0,0 @@
1	#define EPERM 1
2	#define ENOENT 2
3	#define ESRCH 3
4	#define EINTR 4
5	#define EIO 5
6	#define ENXIO 6
7	#define E2BIG 7
8	#define ENOEXEC 8
9	#define EBADF 9
10	#define ECHILD 10
11	#define EAGAIN 11
12	#define ENOMEM 12
13	#define EACCES 13
14	#define EFAULT 14
15	#define ENOTBLK 15
16	#define EBUSY 16
17	#define EEXIST 17
18	#define EXDEV 18
19	#define ENODEV 19
20	#define ENOTDIR 20
21	#define EISDIR 21
22	#define EINVAL 22
23	#define ENFILE 23
24	#define EMFILE 24
25	#define ENOTTY 25
26	#define ETXTBSY 26
27	#define EFBIG 27
28	#define ENOSPC 28
29	#define ESPIPE 29
30	#define EROFS 30
31	#define EMLINK 31
32	#define EPIPE 32
33	#define EDOM 33
34	#define ERANGE 34
35	#define EDEADLK 35
36	#define ENAMETOOLONG 36
37	#define ENOLCK 37
38	#define ENOSYS 38
39	#define ENOTEMPTY 39
40	#define ELOOP 40
41	#define EWOULDBLOCK EAGAIN
42	#define ENOMSG 42
43	#define EIDRM 43
44	#define ECHRNG 44
45	#define EL2NSYNC 45
46	#define EL3HLT 46
47	#define EL3RST 47
48	#define ELNRNG 48
49	#define EUNATCH 49
50	#define ENOCSI 50
51	#define EL2HLT 51
52	#define EBADE 52
53	#define EBADR 53
54	#define EXFULL 54
55	#define ENOANO 55
56	#define EBADRQC 56
57	#define EBADSLT 57
58	#define EDEADLOCK EDEADLK
59	#define EBFONT 59
60	#define ENOSTR 60
61	#define ENODATA 61
62	#define ETIME 62
63	#define ENOSR 63
64	#define ENONET 64
65	#define ENOPKG 65
66	#define EREMOTE 66
67	#define ENOLINK 67
68	#define EADV 68
69	#define ESRMNT 69
70	#define ECOMM 70
71	#define EPROTO 71
72	#define EMULTIHOP 72
73	#define EDOTDOT 73
74	#define EBADMSG 74
75	#define EOVERFLOW 75
76	#define ENOTUNIQ 76
77	#define EBADFD 77
78	#define EREMCHG 78
79	#define ELIBACC 79
80	#define ELIBBAD 80
81	#define ELIBSCN 81
82	#define ELIBMAX 82
83	#define ELIBEXEC 83
84	#define EILSEQ 84
85	#define ERESTART 85
86	#define ESTRPIPE 86
87	#define EUSERS 87
88	#define ENOTSOCK 88
89	#define EDESTADDRREQ 89
90	#define EMSGSIZE 90
91	#define EPROTOTYPE 91
92	#define ENOPROTOOPT 92
93	#define EPROTONOSUPPORT 93
94	#define ESOCKTNOSUPPORT 94
95	#define EOPNOTSUPP 95
96	#define ENOTSUP EOPNOTSUPP
97	#define EPFNOSUPPORT 96
98	#define EAFNOSUPPORT 97
99	#define EADDRINUSE 98
100	#define EADDRNOTAVAIL 99
101	#define ENETDOWN 100
102	#define ENETUNREACH 101
103	#define ENETRESET 102
104	#define ECONNABORTED 103
105	#define ECONNRESET 104
106	#define ENOBUFS 105
107	#define EISCONN 106
108	#define ENOTCONN 107
109	#define ESHUTDOWN 108
110	#define ETOOMANYREFS 109
111	#define ETIMEDOUT 110
112	#define ECONNREFUSED 111
113	#define EHOSTDOWN 112
114	#define EHOSTUNREACH 113
115	#define EALREADY 114
116	#define EINPROGRESS 115
117	#define ESTALE 116
118	#define EUCLEAN 117
119	#define ENOTNAM 118
120	#define ENAVAIL 119
121	#define EISNAM 120
122	#define EREMOTEIO 121
123	#define EDQUOT 122
124	#define ENOMEDIUM 123
125	#define EMEDIUMTYPE 124
126	#define ECANCELED 125
127	#define ENOKEY 126
128	#define EKEYEXPIRED 127
129	#define EKEYREVOKED 128
130	#define EKEYREJECTED 129
131	#define EOWNERDEAD 130
132	#define ENOTRECOVERABLE 131
133	#define ERFKILL 132
134	#define EHWPOISON 133

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/fcntl.h deleted-46

...	@@ -1,46 +0,0 @@
1	#define O_CREAT 0100
2	#define O_EXCL 0200
3	#define O_NOCTTY 0400
4	#define O_TRUNC 01000
5	#define O_APPEND 02000
6	#define O_NONBLOCK 04000
7	#define O_DSYNC 010000
8	#define O_SYNC 04010000
9	#define O_RSYNC 04010000
10	#define O_DIRECTORY 0200000
11	#define O_NOFOLLOW 0400000
12	#define O_CLOEXEC 02000000
13
14	#define O_ASYNC 020000
15	#define O_DIRECT 040000
16	#define O_LARGEFILE 0100000
17	#define O_NOATIME 01000000
18	#define O_PATH 010000000
19	#define O_TMPFILE 020200000
20	#define O_NDELAY O_NONBLOCK
21
22	#define F_DUPFD 0
23	#define F_GETFD 1
24	#define F_SETFD 2
25	#define F_GETFL 3
26	#define F_SETFL 4
27
28	#define F_SETOWN 8
29	#define F_GETOWN 9
30	#define F_SETSIG 10
31	#define F_GETSIG 11
32
33	#if __LONG_MAX == 0x7fffffffL
34	#define F_GETLK 12
35	#define F_SETLK 13
36	#define F_SETLKW 14
37	#else
38	#define F_GETLK 5
39	#define F_SETLK 6
40	#define F_SETLKW 7
41	#endif
42
43	#define F_SETOWN_EX 15
44	#define F_GETOWN_EX 16
45
46	#define F_GETOWNER_UIDS 17

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/fenv.h deleted-10

...	@@ -1,10 +0,0 @@
1	#define FE_ALL_EXCEPT 0
2	#define FE_TONEAREST 0
3
4	typedef unsigned long fexcept_t;
5
6	typedef struct {
7	unsigned long __cw;
8	} fenv_t;
9
10	#define FE_DFL_ENV ((const fenv_t *) -1)

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/hwcap.h deleted

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/io.h deleted

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/ioctl.h deleted-115

...	@@ -1,115 +0,0 @@
1	#define _IOC(a,b,c,d) ( ((a)<<30) \| ((b)<<8) \| (c) \| ((d)<<16) )
2	#define _IOC_NONE 0U
3	#define _IOC_WRITE 1U
4	#define _IOC_READ 2U
5
6	#define _IO(a,b) _IOC(_IOC_NONE,(a),(b),0)
7	#define _IOW(a,b,c) _IOC(_IOC_WRITE,(a),(b),sizeof(c))
8	#define _IOR(a,b,c) _IOC(_IOC_READ,(a),(b),sizeof(c))
9	#define _IOWR(a,b,c) _IOC(_IOC_READ\|_IOC_WRITE,(a),(b),sizeof(c))
10
11	#define TCGETS 0x5401
12	#define TCSETS 0x5402
13	#define TCSETSW 0x5403
14	#define TCSETSF 0x5404
15	#define TCGETA 0x5405
16	#define TCSETA 0x5406
17	#define TCSETAW 0x5407
18	#define TCSETAF 0x5408
19	#define TCSBRK 0x5409
20	#define TCXONC 0x540A
21	#define TCFLSH 0x540B
22	#define TIOCEXCL 0x540C
23	#define TIOCNXCL 0x540D
24	#define TIOCSCTTY 0x540E
25	#define TIOCGPGRP 0x540F
26	#define TIOCSPGRP 0x5410
27	#define TIOCOUTQ 0x5411
28	#define TIOCSTI 0x5412
29	#define TIOCGWINSZ 0x5413
30	#define TIOCSWINSZ 0x5414
31	#define TIOCMGET 0x5415
32	#define TIOCMBIS 0x5416
33	#define TIOCMBIC 0x5417
34	#define TIOCMSET 0x5418
35	#define TIOCGSOFTCAR 0x5419
36	#define TIOCSSOFTCAR 0x541A
37	#define FIONREAD 0x541B
38	#define TIOCINQ FIONREAD
39	#define TIOCLINUX 0x541C
40	#define TIOCCONS 0x541D
41	#define TIOCGSERIAL 0x541E
42	#define TIOCSSERIAL 0x541F
43	#define TIOCPKT 0x5420
44	#define FIONBIO 0x5421
45	#define TIOCNOTTY 0x5422
46	#define TIOCSETD 0x5423
47	#define TIOCGETD 0x5424
48	#define TCSBRKP 0x5425
49	#define TIOCSBRK 0x5427
50	#define TIOCCBRK 0x5428
51	#define TIOCGSID 0x5429
52	#define TIOCGRS485 0x542E
53	#define TIOCSRS485 0x542F
54	#define TIOCGPTN 0x80045430
55	#define TIOCSPTLCK 0x40045431
56	#define TIOCGDEV 0x80045432
57	#define TCGETX 0x5432
58	#define TCSETX 0x5433
59	#define TCSETXF 0x5434
60	#define TCSETXW 0x5435
61	#define TIOCSIG 0x40045436
62	#define TIOCVHANGUP 0x5437
63	#define TIOCGPKT 0x80045438
64	#define TIOCGPTLCK 0x80045439
65	#define TIOCGEXCL 0x80045440
66	#define TIOCGPTPEER 0x5441
67	#define TIOCGISO7816 0x80285442
68	#define TIOCSISO7816 0xc0285443
69
70	#define FIONCLEX 0x5450
71	#define FIOCLEX 0x5451
72	#define FIOASYNC 0x5452
73	#define TIOCSERCONFIG 0x5453
74	#define TIOCSERGWILD 0x5454
75	#define TIOCSERSWILD 0x5455
76	#define TIOCGLCKTRMIOS 0x5456
77	#define TIOCSLCKTRMIOS 0x5457
78	#define TIOCSERGSTRUCT 0x5458
79	#define TIOCSERGETLSR 0x5459
80	#define TIOCSERGETMULTI 0x545A
81	#define TIOCSERSETMULTI 0x545B
82
83	#define TIOCMIWAIT 0x545C
84	#define TIOCGICOUNT 0x545D
85	#define FIOQSIZE 0x5460
86
87	#define TIOCM_LE 0x001
88	#define TIOCM_DTR 0x002
89	#define TIOCM_RTS 0x004
90	#define TIOCM_ST 0x008
91	#define TIOCM_SR 0x010
92	#define TIOCM_CTS 0x020
93	#define TIOCM_CAR 0x040
94	#define TIOCM_RNG 0x080
95	#define TIOCM_DSR 0x100
96	#define TIOCM_CD TIOCM_CAR
97	#define TIOCM_RI TIOCM_RNG
98	#define TIOCM_OUT1 0x2000
99	#define TIOCM_OUT2 0x4000
100	#define TIOCM_LOOP 0x8000
101
102	#define FIOSETOWN 0x8901
103	#define SIOCSPGRP 0x8902
104	#define FIOGETOWN 0x8903
105	#define SIOCGPGRP 0x8904
106	#define SIOCATMARK 0x8905
107	#if __LONG_MAX == 0x7fffffff
108	#define SIOCGSTAMP _IOR(0x89, 6, char[16])
109	#define SIOCGSTAMPNS _IOR(0x89, 7, char[16])
110	#else
111	#define SIOCGSTAMP 0x8906
112	#define SIOCGSTAMPNS 0x8907
113	#endif
114
115	#include <bits/ioctl_fix.h>

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/ioctl_fix.h deleted

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/ipc.h deleted-11

...	@@ -1,11 +0,0 @@
1	struct ipc_perm {
2	key_t __ipc_perm_key;
3	uid_t uid;
4	gid_t gid;
5	uid_t cuid;
6	gid_t cgid;
7	mode_t mode;
8	int __ipc_perm_seq;
9	long __pad1;
10	long __pad2;
11	};

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/ipcstat.h deleted-1

...	@@ -1 +0,0 @@
1	#define IPC_STAT 2

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/kd.h deleted-1

...	@@ -1 +0,0 @@
1	#include <linux/kd.h>

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/limits.h deleted

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/link.h deleted-1

...	@@ -1 +0,0 @@
1	typedef uint32_t Elf_Symndx;

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/mman.h deleted

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/msg.h deleted-12

...	@@ -1,12 +0,0 @@
1	struct msqid_ds {
2	struct ipc_perm msg_perm;
3	time_t msg_stime;
4	time_t msg_rtime;
5	time_t msg_ctime;
6	unsigned long msg_cbytes;
7	msgqnum_t msg_qnum;
8	msglen_t msg_qbytes;
9	pid_t msg_lspid;
10	pid_t msg_lrpid;
11	unsigned long __unused[2];
12	};

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/poll.h deleted

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/ptrace.h deleted

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/resource.h deleted

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/sem.h deleted-14

...	@@ -1,14 +0,0 @@
1	struct semid_ds {
2	struct ipc_perm sem_perm;
3	time_t sem_otime;
4	time_t sem_ctime;
5	#if __BYTE_ORDER == __LITTLE_ENDIAN
6	unsigned short sem_nsems;
7	char __sem_nsems_pad[sizeof(long)-sizeof(short)];
8	#else
9	char __sem_nsems_pad[sizeof(long)-sizeof(short)];
10	unsigned short sem_nsems;
11	#endif
12	long __unused3;
13	long __unused4;
14	};

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/shm.h deleted-24

...	@@ -1,24 +0,0 @@
1	#define SHMLBA 4096
2
3	struct shmid_ds {
4	struct ipc_perm shm_perm;
5	size_t shm_segsz;
6	time_t shm_atime;
7	time_t shm_dtime;
8	time_t shm_ctime;
9	pid_t shm_cpid;
10	pid_t shm_lpid;
11	unsigned long shm_nattch;
12	unsigned long __pad1;
13	unsigned long __pad2;
14	};
15
16	struct shminfo {
17	unsigned long shmmax, shmmin, shmmni, shmseg, shmall, __unused[4];
18	};
19
20	struct shm_info {
21	int __used_ids;
22	unsigned long shm_tot, shm_rss, shm_swp;
23	unsigned long __swap_attempts, __swap_successes;
24	};

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/socket.h deleted

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/soundcard.h deleted-1

...	@@ -1 +0,0 @@
1	#include <linux/soundcard.h>

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/statfs.h deleted-7

...	@@ -1,7 +0,0 @@
1	struct statfs {
2	unsigned long f_type, f_bsize;
3	fsblkcnt_t f_blocks, f_bfree, f_bavail;
4	fsfilcnt_t f_files, f_ffree;
5	fsid_t f_fsid;
6	unsigned long f_namelen, f_frsize, f_flags, f_spare[4];
7	};

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/termios.h deleted-166

...	@@ -1,166 +0,0 @@
1	struct termios {
2	tcflag_t c_iflag;
3	tcflag_t c_oflag;
4	tcflag_t c_cflag;
5	tcflag_t c_lflag;
6	cc_t c_line;
7	cc_t c_cc[NCCS];
8	speed_t __c_ispeed;
9	speed_t __c_ospeed;
10	};
11
12	#define VINTR 0
13	#define VQUIT 1
14	#define VERASE 2
15	#define VKILL 3
16	#define VEOF 4
17	#define VTIME 5
18	#define VMIN 6
19	#define VSWTC 7
20	#define VSTART 8
21	#define VSTOP 9
22	#define VSUSP 10
23	#define VEOL 11
24	#define VREPRINT 12
25	#define VDISCARD 13
26	#define VWERASE 14
27	#define VLNEXT 15
28	#define VEOL2 16
29
30	#define IGNBRK 0000001
31	#define BRKINT 0000002
32	#define IGNPAR 0000004
33	#define PARMRK 0000010
34	#define INPCK 0000020
35	#define ISTRIP 0000040
36	#define INLCR 0000100
37	#define IGNCR 0000200
38	#define ICRNL 0000400
39	#define IUCLC 0001000
40	#define IXON 0002000
41	#define IXANY 0004000
42	#define IXOFF 0010000
43	#define IMAXBEL 0020000
44	#define IUTF8 0040000
45
46	#define OPOST 0000001
47	#define OLCUC 0000002
48	#define ONLCR 0000004
49	#define OCRNL 0000010
50	#define ONOCR 0000020
51	#define ONLRET 0000040
52	#define OFILL 0000100
53	#define OFDEL 0000200
54	#if defined(_GNU_SOURCE) \|\| defined(_BSD_SOURCE) \|\| defined(_XOPEN_SOURCE)
55	#define NLDLY 0000400
56	#define NL0 0000000
57	#define NL1 0000400
58	#define CRDLY 0003000
59	#define CR0 0000000
60	#define CR1 0001000
61	#define CR2 0002000
62	#define CR3 0003000
63	#define TABDLY 0014000
64	#define TAB0 0000000
65	#define TAB1 0004000
66	#define TAB2 0010000
67	#define TAB3 0014000
68	#define BSDLY 0020000
69	#define BS0 0000000
70	#define BS1 0020000
71	#define FFDLY 0100000
72	#define FF0 0000000
73	#define FF1 0100000
74	#endif
75
76	#define VTDLY 0040000
77	#define VT0 0000000
78	#define VT1 0040000
79
80	#define B0 0000000
81	#define B50 0000001
82	#define B75 0000002
83	#define B110 0000003
84	#define B134 0000004
85	#define B150 0000005
86	#define B200 0000006
87	#define B300 0000007
88	#define B600 0000010
89	#define B1200 0000011
90	#define B1800 0000012
91	#define B2400 0000013
92	#define B4800 0000014
93	#define B9600 0000015
94	#define B19200 0000016
95	#define B38400 0000017
96
97	#define B57600 0010001
98	#define B115200 0010002
99	#define B230400 0010003
100	#define B460800 0010004
101	#define B500000 0010005
102	#define B576000 0010006
103	#define B921600 0010007
104	#define B1000000 0010010
105	#define B1152000 0010011
106	#define B1500000 0010012
107	#define B2000000 0010013
108	#define B2500000 0010014
109	#define B3000000 0010015
110	#define B3500000 0010016
111	#define B4000000 0010017
112
113	#define CSIZE 0000060
114	#define CS5 0000000
115	#define CS6 0000020
116	#define CS7 0000040
117	#define CS8 0000060
118	#define CSTOPB 0000100
119	#define CREAD 0000200
120	#define PARENB 0000400
121	#define PARODD 0001000
122	#define HUPCL 0002000
123	#define CLOCAL 0004000
124
125	#define ISIG 0000001
126	#define ICANON 0000002
127	#define ECHO 0000010
128	#define ECHOE 0000020
129	#define ECHOK 0000040
130	#define ECHONL 0000100
131	#define NOFLSH 0000200
132	#define TOSTOP 0000400
133	#define IEXTEN 0100000
134
135	#define TCOOFF 0
136	#define TCOON 1
137	#define TCIOFF 2
138	#define TCION 3
139
140	#define TCIFLUSH 0
141	#define TCOFLUSH 1
142	#define TCIOFLUSH 2
143
144	#define TCSANOW 0
145	#define TCSADRAIN 1
146	#define TCSAFLUSH 2
147
148	#if defined(_GNU_SOURCE) \|\| defined(_BSD_SOURCE)
149	#define EXTA 0000016
150	#define EXTB 0000017
151	#define CBAUD 0010017
152	#define CBAUDEX 0010000
153	#define CIBAUD 002003600000
154	#define CMSPAR 010000000000
155	#define CRTSCTS 020000000000
156
157	#define XCASE 0000004
158	#define ECHOCTL 0001000
159	#define ECHOPRT 0002000
160	#define ECHOKE 0004000
161	#define FLUSHO 0010000
162	#define PENDIN 0040000
163	#define EXTPROC 0200000
164
165	#define XTABS 0014000
166	#endif

lib/libc/wasi/libc-top-half/musl/arch/generic/bits/vt.h deleted-1

...	@@ -1 +0,0 @@
1	#include <linux/vt.h>

lib/libc/wasi/libc-top-half/musl/arch/generic/fp_arch.h deleted

lib/libc/wasi/libc-top-half/musl/include/alloca.h deleted-19

...	@@ -1,19 +0,0 @@
1	#ifndef _ALLOCA_H
2	#define _ALLOCA_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#define __NEED_size_t
9	#include <bits/alltypes.h>
10
11	void *alloca(size_t);
12
13	#define alloca __builtin_alloca
14
15	#ifdef __cplusplus
16	}
17	#endif
18
19	#endif

lib/libc/wasi/libc-top-half/musl/include/ar.h deleted-25

...	@@ -1,25 +0,0 @@
1	#ifndef _AR_H
2	#define _AR_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#define ARMAG "!<arch>\n"
9	#define SARMAG 8
10	#define ARFMAG "`\n"
11
12	struct ar_hdr {
13	char ar_name[16];
14	char ar_date[12];
15	char ar_uid[6], ar_gid[6];
16	char ar_mode[8];
17	char ar_size[10];
18	char ar_fmag[2];
19	};
20
21	#ifdef __cplusplus
22	}
23	#endif
24
25	#endif

lib/libc/wasi/libc-top-half/musl/include/arpa/ftp.h deleted-35

...	@@ -1,35 +0,0 @@
1	#ifndef _ARPA_FTP_H
2	#define _ARPA_FTP_H
3	#define PRELIM 1
4	#define COMPLETE 2
5	#define CONTINUE 3
6	#define TRANSIENT 4
7	#define ERROR 5
8	#define TYPE_A 1
9	#define TYPE_E 2
10	#define TYPE_I 3
11	#define TYPE_L 4
12	#define FORM_N 1
13	#define FORM_T 2
14	#define FORM_C 3
15	#define STRU_F 1
16	#define STRU_R 2
17	#define STRU_P 3
18	#define MODE_S 1
19	#define MODE_B 2
20	#define MODE_C 3
21	#define REC_ESC '\377'
22	#define REC_EOR '\001'
23	#define REC_EOF '\002'
24	#define BLK_EOR 0x80
25	#define BLK_EOF 0x40
26	#define BLK_ERRORS 0x20
27	#define BLK_RESTART 0x10
28	#define BLK_BYTECOUNT 2
29	#ifdef FTP_NAMES
30	char *modenames[] = {"0", "Stream", "Block", "Compressed" };
31	char *strunames[] = {"0", "File", "Record", "Page" };
32	char *typenames[] = {"0", "ASCII", "EBCDIC", "Image", "Local" };
33	char *formnames[] = {"0", "Nonprint", "Telnet", "Carriage-control" };
34	#endif
35	#endif

lib/libc/wasi/libc-top-half/musl/include/arpa/nameser_compat.h deleted-2

...	@@ -1,2 +0,0 @@
1	#include <arpa/nameser.h>
2

lib/libc/wasi/libc-top-half/musl/include/arpa/telnet.h deleted-251

...	@@ -1,251 +0,0 @@
1	#ifndef _ARPA_TELNET_H
2	#define _ARPA_TELNET_H
3
4	#define IAC 255
5	#define DONT 254
6	#define DO 253
7	#define WONT 252
8	#define WILL 251
9	#define SB 250
10	#define GA 249
11	#define EL 248
12	#define EC 247
13	#define AYT 246
14	#define AO 245
15	#define IP 244
16	#define BREAK 243
17	#define DM 242
18	#define NOP 241
19	#define SE 240
20	#define EOR 239
21	#define ABORT 238
22	#define SUSP 237
23	#define xEOF 236
24
25	#define SYNCH 242
26
27	#define telcmds ((char [][6]){ "EOF", "SUSP", "ABORT", "EOR", "SE", "NOP", "DMARK", "BRK", "IP", "AO", "AYT", "EC", "EL", "GA", "SB", "WILL", "WONT", "DO", "DONT", "IAC", 0 })
28
29	#define TELCMD_FIRST xEOF
30	#define TELCMD_LAST IAC
31	#define TELCMD_OK(x) ((unsigned int)(x) <= TELCMD_LAST && \
32	(unsigned int)(x) >= TELCMD_FIRST)
33	#define TELCMD(x) telcmds[(x)-TELCMD_FIRST]
34
35	#define TELOPT_BINARY 0
36	#define TELOPT_ECHO 1
37	#define TELOPT_RCP 2
38	#define TELOPT_SGA 3
39	#define TELOPT_NAMS 4
40	#define TELOPT_STATUS 5
41	#define TELOPT_TM 6
42	#define TELOPT_RCTE 7
43	#define TELOPT_NAOL 8
44	#define TELOPT_NAOP 9
45	#define TELOPT_NAOCRD 10
46	#define TELOPT_NAOHTS 11
47	#define TELOPT_NAOHTD 12
48	#define TELOPT_NAOFFD 13
49	#define TELOPT_NAOVTS 14
50	#define TELOPT_NAOVTD 15
51	#define TELOPT_NAOLFD 16
52	#define TELOPT_XASCII 17
53	#define TELOPT_LOGOUT 18
54	#define TELOPT_BM 19
55	#define TELOPT_DET 20
56	#define TELOPT_SUPDUP 21
57	#define TELOPT_SUPDUPOUTPUT 22
58	#define TELOPT_SNDLOC 23
59	#define TELOPT_TTYPE 24
60	#define TELOPT_EOR 25
61	#define TELOPT_TUID 26
62	#define TELOPT_OUTMRK 27
63	#define TELOPT_TTYLOC 28
64	#define TELOPT_3270REGIME 29
65	#define TELOPT_X3PAD 30
66	#define TELOPT_NAWS 31
67	#define TELOPT_TSPEED 32
68	#define TELOPT_LFLOW 33
69	#define TELOPT_LINEMODE 34
70	#define TELOPT_XDISPLOC 35
71	#define TELOPT_OLD_ENVIRON 36
72	#define TELOPT_AUTHENTICATION 37/* Authenticate */
73	#define TELOPT_ENCRYPT 38
74	#define TELOPT_NEW_ENVIRON 39
75	#define TELOPT_EXOPL 255
76
77
78	#define NTELOPTS (1+TELOPT_NEW_ENVIRON)
79	#ifdef TELOPTS
80	char *telopts[NTELOPTS+1] = {
81	"BINARY", "ECHO", "RCP", "SUPPRESS GO AHEAD", "NAME",
82	"STATUS", "TIMING MARK", "RCTE", "NAOL", "NAOP",
83	"NAOCRD", "NAOHTS", "NAOHTD", "NAOFFD", "NAOVTS",
84	"NAOVTD", "NAOLFD", "EXTEND ASCII", "LOGOUT", "BYTE MACRO",
85	"DATA ENTRY TERMINAL", "SUPDUP", "SUPDUP OUTPUT",
86	"SEND LOCATION", "TERMINAL TYPE", "END OF RECORD",
87	"TACACS UID", "OUTPUT MARKING", "TTYLOC",
88	"3270 REGIME", "X.3 PAD", "NAWS", "TSPEED", "LFLOW",
89	"LINEMODE", "XDISPLOC", "OLD-ENVIRON", "AUTHENTICATION",
90	"ENCRYPT", "NEW-ENVIRON",
91	0,
92	};
93	#define TELOPT_FIRST TELOPT_BINARY
94	#define TELOPT_LAST TELOPT_NEW_ENVIRON
95	#define TELOPT_OK(x) ((unsigned int)(x) <= TELOPT_LAST)
96	#define TELOPT(x) telopts[(x)-TELOPT_FIRST]
97	#endif
98
99	#define TELQUAL_IS 0
100	#define TELQUAL_SEND 1
101	#define TELQUAL_INFO 2
102	#define TELQUAL_REPLY 2
103	#define TELQUAL_NAME 3
104
105	#define LFLOW_OFF 0
106	#define LFLOW_ON 1
107	#define LFLOW_RESTART_ANY 2
108	#define LFLOW_RESTART_XON 3
109
110
111	#define LM_MODE 1
112	#define LM_FORWARDMASK 2
113	#define LM_SLC 3
114
115	#define MODE_EDIT 0x01
116	#define MODE_TRAPSIG 0x02
117	#define MODE_ACK 0x04
118	#define MODE_SOFT_TAB 0x08
119	#define MODE_LIT_ECHO 0x10
120
121	#define MODE_MASK 0x1f
122
123	#define MODE_FLOW 0x0100
124	#define MODE_ECHO 0x0200
125	#define MODE_INBIN 0x0400
126	#define MODE_OUTBIN 0x0800
127	#define MODE_FORCE 0x1000
128
129	#define SLC_SYNCH 1
130	#define SLC_BRK 2
131	#define SLC_IP 3
132	#define SLC_AO 4
133	#define SLC_AYT 5
134	#define SLC_EOR 6
135	#define SLC_ABORT 7
136	#define SLC_EOF 8
137	#define SLC_SUSP 9
138	#define SLC_EC 10
139	#define SLC_EL 11
140	#define SLC_EW 12
141	#define SLC_RP 13
142	#define SLC_LNEXT 14
143	#define SLC_XON 15
144	#define SLC_XOFF 16
145	#define SLC_FORW1 17
146	#define SLC_FORW2 18
147
148	#define NSLC 18
149
150	#define SLC_NAMELIST "0", "SYNCH", "BRK", "IP", "AO", "AYT", "EOR", \
151	"ABORT", "EOF", "SUSP", "EC", "EL", "EW", "RP", \
152	"LNEXT", "XON", "XOFF", "FORW1", "FORW2", 0,
153	#ifdef SLC_NAMES
154	char *slc_names[] = {
155	SLC_NAMELIST
156	};
157	#else
158	extern char *slc_names[];
159	#define SLC_NAMES SLC_NAMELIST
160	#endif
161
162	#define SLC_NAME_OK(x) ((unsigned int)(x) <= NSLC)
163	#define SLC_NAME(x) slc_names[x]
164
165	#define SLC_NOSUPPORT 0
166	#define SLC_CANTCHANGE 1
167	#define SLC_VARIABLE 2
168	#define SLC_DEFAULT 3
169	#define SLC_LEVELBITS 0x03
170
171	#define SLC_FUNC 0
172	#define SLC_FLAGS 1
173	#define SLC_VALUE 2
174
175	#define SLC_ACK 0x80
176	#define SLC_FLUSHIN 0x40
177	#define SLC_FLUSHOUT 0x20
178
179	#define OLD_ENV_VAR 1
180	#define OLD_ENV_VALUE 0
181	#define NEW_ENV_VAR 0
182	#define NEW_ENV_VALUE 1
183	#define ENV_ESC 2
184	#define ENV_USERVAR 3
185
186	#define AUTH_WHO_CLIENT 0
187	#define AUTH_WHO_SERVER 1
188	#define AUTH_WHO_MASK 1
189
190	#define AUTH_HOW_ONE_WAY 0
191	#define AUTH_HOW_MUTUAL 2
192	#define AUTH_HOW_MASK 2
193
194	#define AUTHTYPE_NULL 0
195	#define AUTHTYPE_KERBEROS_V4 1
196	#define AUTHTYPE_KERBEROS_V5 2
197	#define AUTHTYPE_SPX 3
198	#define AUTHTYPE_MINK 4
199	#define AUTHTYPE_CNT 5
200
201	#define AUTHTYPE_TEST 99
202
203	#ifdef AUTH_NAMES
204	char *authtype_names[] = {
205	"NULL", "KERBEROS_V4", "KERBEROS_V5", "SPX", "MINK", 0,
206	};
207	#else
208	extern char *authtype_names[];
209	#endif
210
211	#define AUTHTYPE_NAME_OK(x) ((unsigned int)(x) < AUTHTYPE_CNT)
212	#define AUTHTYPE_NAME(x) authtype_names[x]
213
214	#define ENCRYPT_IS 0
215	#define ENCRYPT_SUPPORT 1
216	#define ENCRYPT_REPLY 2
217	#define ENCRYPT_START 3
218	#define ENCRYPT_END 4
219	#define ENCRYPT_REQSTART 5
220	#define ENCRYPT_REQEND 6
221	#define ENCRYPT_ENC_KEYID 7
222	#define ENCRYPT_DEC_KEYID 8
223	#define ENCRYPT_CNT 9
224
225	#define ENCTYPE_ANY 0
226	#define ENCTYPE_DES_CFB64 1
227	#define ENCTYPE_DES_OFB64 2
228	#define ENCTYPE_CNT 3
229
230	#ifdef ENCRYPT_NAMES
231	char *encrypt_names[] = {
232	"IS", "SUPPORT", "REPLY", "START", "END",
233	"REQUEST-START", "REQUEST-END", "ENC-KEYID", "DEC-KEYID",
234	0,
235	};
236	char *enctype_names[] = {
237	"ANY", "DES_CFB64", "DES_OFB64", 0,
238	};
239	#else
240	extern char *encrypt_names[];
241	extern char *enctype_names[];
242	#endif
243
244
245	#define ENCRYPT_NAME_OK(x) ((unsigned int)(x) < ENCRYPT_CNT)
246	#define ENCRYPT_NAME(x) encrypt_names[x]
247
248	#define ENCTYPE_NAME_OK(x) ((unsigned int)(x) < ENCTYPE_CNT)
249	#define ENCTYPE_NAME(x) enctype_names[x]
250
251	#endif

lib/libc/wasi/libc-top-half/musl/include/arpa/tftp.h deleted-31

...	@@ -1,31 +0,0 @@
1	#ifndef _ARPA_TFTP_H
2	#define _ARPA_TFTP_H
3	#define SEGSIZE 512
4	#define RRQ 01
5	#define WRQ 02
6	#define DATA 03
7	#define ACK 04
8	#define ERROR 05
9	struct tftphdr {
10	short th_opcode;
11	union {
12	unsigned short tu_block;
13	short tu_code;
14	char tu_stuff[1];
15	} th_u;
16	char th_data[1];
17	};
18	#define th_block th_u.tu_block
19	#define th_code th_u.tu_code
20	#define th_stuff th_u.tu_stuff
21	#define th_msg th_data
22	#define EUNDEF 0
23	#define ENOTFOUND 1
24	#define EACCESS 2
25	#define ENOSPACE 3
26	#define EBADOP 4
27	#define EBADID 5
28	#define EEXISTS 6
29	#define ENOUSER 7
30	#endif
31

lib/libc/wasi/libc-top-half/musl/include/assert.h deleted-23

...	@@ -1,23 +0,0 @@
1	#include <features.h>
2
3	#undef assert
4
5	#ifdef NDEBUG
6	#define assert(x) (void)0
7	#else
8	#define assert(x) ((void)((x) \|\| (__assert_fail(#x, __FILE__, __LINE__, __func__),0)))
9	#endif
10
11	#if __STDC_VERSION__ >= 201112L && !defined(__cplusplus)
12	#define static_assert _Static_assert
13	#endif
14
15	#ifdef __cplusplus
16	extern "C" {
17	#endif
18
19	_Noreturn void __assert_fail (const char , const char , int, const char *);
20
21	#ifdef __cplusplus
22	}
23	#endif

lib/libc/wasi/libc-top-half/musl/include/byteswap.h deleted-26

...	@@ -1,26 +0,0 @@
1	#ifndef _BYTESWAP_H
2	#define _BYTESWAP_H
3
4	#include <features.h>
5	#include <stdint.h>
6
7	static __inline uint16_t __bswap_16(uint16_t __x)
8	{
9	return __x<<8 \| __x>>8;
10	}
11
12	static __inline uint32_t __bswap_32(uint32_t __x)
13	{
14	return __x>>24 \| __x>>8&0xff00 \| __x<<8&0xff0000 \| __x<<24;
15	}
16
17	static __inline uint64_t __bswap_64(uint64_t __x)
18	{
19	return __bswap_32(__x)+0ULL<<32 \| __bswap_32(__x>>32);
20	}
21
22	#define bswap_16(x) __bswap_16(x)
23	#define bswap_32(x) __bswap_32(x)
24	#define bswap_64(x) __bswap_64(x)
25
26	#endif

lib/libc/wasi/libc-top-half/musl/include/cpio.h deleted-29

...	@@ -1,29 +0,0 @@
1	#ifndef _CPIO_H
2	#define _CPIO_H
3
4	#define MAGIC "070707"
5
6	#define C_IRUSR 000400
7	#define C_IWUSR 000200
8	#define C_IXUSR 000100
9	#define C_IRGRP 000040
10	#define C_IWGRP 000020
11	#define C_IXGRP 000010
12	#define C_IROTH 000004
13	#define C_IWOTH 000002
14	#define C_IXOTH 000001
15
16	#define C_ISUID 004000
17	#define C_ISGID 002000
18	#define C_ISVTX 001000
19
20	#define C_ISBLK 060000
21	#define C_ISCHR 020000
22	#define C_ISDIR 040000
23	#define C_ISFIFO 010000
24	#define C_ISSOCK 0140000
25	#define C_ISLNK 0120000
26	#define C_ISCTG 0110000
27	#define C_ISREG 0100000
28
29	#endif

lib/libc/wasi/libc-top-half/musl/include/crypt.h deleted-20

...	@@ -1,20 +0,0 @@
1	#ifndef _CRYPT_H
2	#define _CRYPT_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	struct crypt_data {
9	int initialized;
10	char __buf[256];
11	};
12
13	char crypt(const char , const char *);
14	char crypt_r(const char , const char , struct crypt_data );
15
16	#ifdef __cplusplus
17	}
18	#endif
19
20	#endif

lib/libc/wasi/libc-top-half/musl/include/ctype.h deleted-77

...	@@ -1,77 +0,0 @@
1	#ifndef _CTYPE_H
2	#define _CTYPE_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9
10	int isalnum(int);
11	int isalpha(int);
12	int isblank(int);
13	int iscntrl(int);
14	int isdigit(int);
15	int isgraph(int);
16	int islower(int);
17	int isprint(int);
18	int ispunct(int);
19	int isspace(int);
20	int isupper(int);
21	int isxdigit(int);
22	int tolower(int);
23	int toupper(int);
24
25	#ifndef __cplusplus
26	static __inline int __isspace(int _c)
27	{
28	return _c == ' ' \|\| (unsigned)_c-'\t' < 5;
29	}
30
31	#define isalpha(a) (0 ? isalpha(a) : (((unsigned)(a)\|32)-'a') < 26)
32	#define isdigit(a) (0 ? isdigit(a) : ((unsigned)(a)-'0') < 10)
33	#define islower(a) (0 ? islower(a) : ((unsigned)(a)-'a') < 26)
34	#define isupper(a) (0 ? isupper(a) : ((unsigned)(a)-'A') < 26)
35	#define isprint(a) (0 ? isprint(a) : ((unsigned)(a)-0x20) < 0x5f)
36	#define isgraph(a) (0 ? isgraph(a) : ((unsigned)(a)-0x21) < 0x5e)
37	#define isspace(a) __isspace(a)
38	#endif
39
40
41	#if defined(_POSIX_SOURCE) \|\| defined(_POSIX_C_SOURCE) \
42	\|\| defined(_XOPEN_SOURCE) \|\| defined(_GNU_SOURCE) \
43	\|\| defined(_BSD_SOURCE)
44
45	#define __NEED_locale_t
46	#include <bits/alltypes.h>
47
48	int isalnum_l(int, locale_t);
49	int isalpha_l(int, locale_t);
50	int isblank_l(int, locale_t);
51	int iscntrl_l(int, locale_t);
52	int isdigit_l(int, locale_t);
53	int isgraph_l(int, locale_t);
54	int islower_l(int, locale_t);
55	int isprint_l(int, locale_t);
56	int ispunct_l(int, locale_t);
57	int isspace_l(int, locale_t);
58	int isupper_l(int, locale_t);
59	int isxdigit_l(int, locale_t);
60	int tolower_l(int, locale_t);
61	int toupper_l(int, locale_t);
62
63	int isascii(int);
64	int toascii(int);
65	#define _tolower(a) ((a)\|0x20)
66	#define _toupper(a) ((a)&0x5f)
67	#ifndef __cplusplus
68	#define isascii(a) (0 ? isascii(a) : (unsigned)(a) < 128)
69	#endif
70
71	#endif
72
73	#ifdef __cplusplus
74	}
75	#endif
76
77	#endif

lib/libc/wasi/libc-top-half/musl/include/endian.h deleted-80

...	@@ -1,80 +0,0 @@
1	#ifndef _ENDIAN_H
2	#define _ENDIAN_H
3
4	#include <features.h>
5
6	#define __NEED_uint16_t
7	#define __NEED_uint32_t
8	#define __NEED_uint64_t
9
10	#include <bits/alltypes.h>
11
12	#define __PDP_ENDIAN 3412
13
14	#define BIG_ENDIAN __BIG_ENDIAN
15	#define LITTLE_ENDIAN __LITTLE_ENDIAN
16	#define PDP_ENDIAN __PDP_ENDIAN
17	#define BYTE_ORDER __BYTE_ORDER
18
19	static __inline uint16_t __bswap16(uint16_t __x)
20	{
21	return __x<<8 \| __x>>8;
22	}
23
24	static __inline uint32_t __bswap32(uint32_t __x)
25	{
26	return __x>>24 \| __x>>8&0xff00 \| __x<<8&0xff0000 \| __x<<24;
27	}
28
29	static __inline uint64_t __bswap64(uint64_t __x)
30	{
31	return __bswap32(__x)+0ULL<<32 \| __bswap32(__x>>32);
32	}
33
34	#if __BYTE_ORDER == __LITTLE_ENDIAN
35	#define htobe16(x) __bswap16(x)
36	#define be16toh(x) __bswap16(x)
37	#define htobe32(x) __bswap32(x)
38	#define be32toh(x) __bswap32(x)
39	#define htobe64(x) __bswap64(x)
40	#define be64toh(x) __bswap64(x)
41	#define htole16(x) (uint16_t)(x)
42	#define le16toh(x) (uint16_t)(x)
43	#define htole32(x) (uint32_t)(x)
44	#define le32toh(x) (uint32_t)(x)
45	#define htole64(x) (uint64_t)(x)
46	#define le64toh(x) (uint64_t)(x)
47	#else
48	#define htobe16(x) (uint16_t)(x)
49	#define be16toh(x) (uint16_t)(x)
50	#define htobe32(x) (uint32_t)(x)
51	#define be32toh(x) (uint32_t)(x)
52	#define htobe64(x) (uint64_t)(x)
53	#define be64toh(x) (uint64_t)(x)
54	#define htole16(x) __bswap16(x)
55	#define le16toh(x) __bswap16(x)
56	#define htole32(x) __bswap32(x)
57	#define le32toh(x) __bswap32(x)
58	#define htole64(x) __bswap64(x)
59	#define le64toh(x) __bswap64(x)
60	#endif
61
62	#if defined(_GNU_SOURCE) \|\| defined(_BSD_SOURCE)
63	#if __BYTE_ORDER == __LITTLE_ENDIAN
64	#define betoh16(x) __bswap16(x)
65	#define betoh32(x) __bswap32(x)
66	#define betoh64(x) __bswap64(x)
67	#define letoh16(x) (uint16_t)(x)
68	#define letoh32(x) (uint32_t)(x)
69	#define letoh64(x) (uint64_t)(x)
70	#else
71	#define betoh16(x) (uint16_t)(x)
72	#define betoh32(x) (uint32_t)(x)
73	#define betoh64(x) (uint64_t)(x)
74	#define letoh16(x) __bswap16(x)
75	#define letoh32(x) __bswap32(x)
76	#define letoh64(x) __bswap64(x)
77	#endif
78	#endif
79
80	#endif

lib/libc/wasi/libc-top-half/musl/include/err.h deleted-25

...	@@ -1,25 +0,0 @@
1	#ifndef _ERR_H
2	#define _ERR_H
3
4	#include <features.h>
5	#include <stdarg.h>
6
7	#ifdef __cplusplus
8	extern "C" {
9	#endif
10
11	void warn(const char *, ...);
12	void vwarn(const char *, va_list);
13	void warnx(const char *, ...);
14	void vwarnx(const char *, va_list);
15
16	_Noreturn void err(int, const char *, ...);
17	_Noreturn void verr(int, const char *, va_list);
18	_Noreturn void errx(int, const char *, ...);
19	_Noreturn void verrx(int, const char *, va_list);
20
21	#ifdef __cplusplus
22	}
23	#endif
24
25	#endif

lib/libc/wasi/libc-top-half/musl/include/features.h deleted-40

...	@@ -1,40 +0,0 @@
1	#ifndef _FEATURES_H
2	#define _FEATURES_H
3
4	#if defined(_ALL_SOURCE) && !defined(_GNU_SOURCE)
5	#define _GNU_SOURCE 1
6	#endif
7
8	#if defined(_DEFAULT_SOURCE) && !defined(_BSD_SOURCE)
9	#define _BSD_SOURCE 1
10	#endif
11
12	#if !defined(_POSIX_SOURCE) && !defined(_POSIX_C_SOURCE) \
13	&& !defined(_XOPEN_SOURCE) && !defined(_GNU_SOURCE) \
14	&& !defined(_BSD_SOURCE) && !defined(__STRICT_ANSI__)
15	#define _BSD_SOURCE 1
16	#define _XOPEN_SOURCE 700
17	#endif
18
19	#if __STDC_VERSION__ >= 199901L
20	#define __restrict restrict
21	#elif !defined(__GNUC__)
22	#define __restrict
23	#endif
24
25	#if __STDC_VERSION__ >= 199901L \|\| defined(__cplusplus)
26	#define __inline inline
27	#elif !defined(__GNUC__)
28	#define __inline
29	#endif
30
31	#if __STDC_VERSION__ >= 201112L
32	#elif defined(__GNUC__)
33	#define _Noreturn __attribute__((__noreturn__))
34	#else
35	#define _Noreturn
36	#endif
37
38	#define __REDIR(x,y) __typeof__(x) x __asm__(#y)
39
40	#endif

lib/libc/wasi/libc-top-half/musl/include/fenv.h deleted-28

...	@@ -1,28 +0,0 @@
1	#ifndef _FENV_H
2	#define _FENV_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <bits/fenv.h>
9
10	int feclearexcept(int);
11	int fegetexceptflag(fexcept_t *, int);
12	int feraiseexcept(int);
13	int fesetexceptflag(const fexcept_t *, int);
14	int fetestexcept(int);
15
16	int fegetround(void);
17	int fesetround(int);
18
19	int fegetenv(fenv_t *);
20	int feholdexcept(fenv_t *);
21	int fesetenv(const fenv_t *);
22	int feupdateenv(const fenv_t *);
23
24	#ifdef __cplusplus
25	}
26	#endif
27	#endif
28

lib/libc/wasi/libc-top-half/musl/include/fmtmsg.h deleted-47

...	@@ -1,47 +0,0 @@
1	#ifndef _FMTMSG_H
2	#define _FMTMSG_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#define MM_HARD 1
9	#define MM_SOFT 2
10	#define MM_FIRM 4
11
12	#define MM_APPL 8
13	#define MM_UTIL 16
14	#define MM_OPSYS 32
15
16	#define MM_RECOVER 64
17	#define MM_NRECOV 128
18
19	#define MM_PRINT 256
20	#define MM_CONSOLE 512
21
22	#define MM_NULLMC 0L
23
24	#define MM_HALT 1
25	#define MM_ERROR 2
26	#define MM_WARNING 3
27	#define MM_INFO 4
28	#define MM_NOSEV 0
29
30	#define MM_OK 0
31	#define MM_NOTOK (-1)
32	#define MM_NOMSG 1
33	#define MM_NOCON 4
34
35	#define MM_NULLLBL ((char*)0)
36	#define MM_NULLTXT ((char*)0)
37	#define MM_NULLACT ((char*)0)
38	#define MM_NULLTAG ((char*)0)
39	#define MM_NULLSEV 0
40
41	int fmtmsg(long, const char , int, const char , const char , const char );
42
43	#ifdef __cplusplus
44	}
45	#endif
46
47	#endif

lib/libc/wasi/libc-top-half/musl/include/fnmatch.h deleted-24

...	@@ -1,24 +0,0 @@
1	#ifndef _FNMATCH_H
2	#define _FNMATCH_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#define FNM_PATHNAME 0x1
9	#define FNM_NOESCAPE 0x2
10	#define FNM_PERIOD 0x4
11	#define FNM_LEADING_DIR 0x8
12	#define FNM_CASEFOLD 0x10
13	#define FNM_FILE_NAME FNM_PATHNAME
14
15	#define FNM_NOMATCH 1
16	#define FNM_NOSYS (-1)
17
18	int fnmatch(const char , const char , int);
19
20	#ifdef __cplusplus
21	}
22	#endif
23
24	#endif

lib/libc/wasi/libc-top-half/musl/include/getopt.h deleted-30

...	@@ -1,30 +0,0 @@
1	#ifndef _GETOPT_H
2	#define _GETOPT_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	int getopt(int, char * const [], const char *);
9	extern char *optarg;
10	extern int optind, opterr, optopt, optreset;
11
12	struct option {
13	const char *name;
14	int has_arg;
15	int *flag;
16	int val;
17	};
18
19	int getopt_long(int, char const , const char , const struct option , int *);
20	int getopt_long_only(int, char const , const char , const struct option , int *);
21
22	#define no_argument 0
23	#define required_argument 1
24	#define optional_argument 2
25
26	#ifdef __cplusplus
27	}
28	#endif
29
30	#endif

lib/libc/wasi/libc-top-half/musl/include/iconv.h deleted-24

...	@@ -1,24 +0,0 @@
1	#ifndef _ICONV_H
2	#define _ICONV_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9
10	#define __NEED_size_t
11
12	#include <bits/alltypes.h>
13
14	typedef void *iconv_t;
15
16	iconv_t iconv_open(const char , const char );
17	size_t iconv(iconv_t, char *__restrict, size_t __restrict, char *__restrict, size_t __restrict);
18	int iconv_close(iconv_t);
19
20	#ifdef __cplusplus
21	}
22	#endif
23
24	#endif

lib/libc/wasi/libc-top-half/musl/include/ifaddrs.h deleted-35

...	@@ -1,35 +0,0 @@
1	#ifndef _IFADDRS_H
2	#define _IFADDRS_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9	#include <netinet/in.h>
10	#include <sys/socket.h>
11
12	struct ifaddrs {
13	struct ifaddrs *ifa_next;
14	char *ifa_name;
15	unsigned ifa_flags;
16	struct sockaddr *ifa_addr;
17	struct sockaddr *ifa_netmask;
18	union {
19	struct sockaddr *ifu_broadaddr;
20	struct sockaddr *ifu_dstaddr;
21	} ifa_ifu;
22	void *ifa_data;
23	};
24	#define ifa_broadaddr ifa_ifu.ifu_broadaddr
25	#define ifa_dstaddr ifa_ifu.ifu_dstaddr
26
27	void freeifaddrs(struct ifaddrs *);
28	int getifaddrs(struct ifaddrs **);
29
30	#ifdef __cplusplus
31	}
32	#endif
33
34	#endif
35

lib/libc/wasi/libc-top-half/musl/include/iso646.h deleted-20

...	@@ -1,20 +0,0 @@
1	#ifndef _ISO646_H
2	#define _ISO646_H
3
4	#ifndef __cplusplus
5
6	#define and &&
7	#define and_eq &=
8	#define bitand &
9	#define bitor \|
10	#define compl ~
11	#define not !
12	#define not_eq !=
13	#define or \|\|
14	#define or_eq \|=
15	#define xor ^
16	#define xor_eq ^=
17
18	#endif
19
20	#endif

lib/libc/wasi/libc-top-half/musl/include/langinfo.h deleted-98

...	@@ -1,98 +0,0 @@
1	#ifndef _LANGINFO_H
2	#define _LANGINFO_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9	#include <nl_types.h>
10
11	#define __NEED_locale_t
12
13	#include <bits/alltypes.h>
14
15	#define ABDAY_1 0x20000
16	#define ABDAY_2 0x20001
17	#define ABDAY_3 0x20002
18	#define ABDAY_4 0x20003
19	#define ABDAY_5 0x20004
20	#define ABDAY_6 0x20005
21	#define ABDAY_7 0x20006
22
23	#define DAY_1 0x20007
24	#define DAY_2 0x20008
25	#define DAY_3 0x20009
26	#define DAY_4 0x2000A
27	#define DAY_5 0x2000B
28	#define DAY_6 0x2000C
29	#define DAY_7 0x2000D
30
31	#define ABMON_1 0x2000E
32	#define ABMON_2 0x2000F
33	#define ABMON_3 0x20010
34	#define ABMON_4 0x20011
35	#define ABMON_5 0x20012
36	#define ABMON_6 0x20013
37	#define ABMON_7 0x20014
38	#define ABMON_8 0x20015
39	#define ABMON_9 0x20016
40	#define ABMON_10 0x20017
41	#define ABMON_11 0x20018
42	#define ABMON_12 0x20019
43
44	#define MON_1 0x2001A
45	#define MON_2 0x2001B
46	#define MON_3 0x2001C
47	#define MON_4 0x2001D
48	#define MON_5 0x2001E
49	#define MON_6 0x2001F
50	#define MON_7 0x20020
51	#define MON_8 0x20021
52	#define MON_9 0x20022
53	#define MON_10 0x20023
54	#define MON_11 0x20024
55	#define MON_12 0x20025
56
57	#define AM_STR 0x20026
58	#define PM_STR 0x20027
59
60	#define D_T_FMT 0x20028
61	#define D_FMT 0x20029
62	#define T_FMT 0x2002A
63	#define T_FMT_AMPM 0x2002B
64
65	#define ERA 0x2002C
66	#define ERA_D_FMT 0x2002E
67	#define ALT_DIGITS 0x2002F
68	#define ERA_D_T_FMT 0x20030
69	#define ERA_T_FMT 0x20031
70
71	#define CODESET 14
72
73	#define CRNCYSTR 0x4000F
74
75	#define RADIXCHAR 0x10000
76	#define THOUSEP 0x10001
77	#define YESEXPR 0x50000
78	#define NOEXPR 0x50001
79
80	#define _NL_LOCALE_NAME(cat) (((cat)<<16) \| 0xffff)
81
82	#if defined(_GNU_SOURCE)
83	#define NL_LOCALE_NAME(cat) _NL_LOCALE_NAME(cat)
84	#endif
85
86	#if defined(_GNU_SOURCE) \|\| defined(_BSD_SOURCE)
87	#define YESSTR 0x50002
88	#define NOSTR 0x50003
89	#endif
90
91	char *nl_langinfo(nl_item);
92	char *nl_langinfo_l(nl_item, locale_t);
93
94	#ifdef __cplusplus
95	}
96	#endif
97
98	#endif

lib/libc/wasi/libc-top-half/musl/include/libgen.h deleted-15

...	@@ -1,15 +0,0 @@
1	#ifndef _LIBGEN_H
2	#define _LIBGEN_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	char dirname(char );
9	char basename(char );
10
11	#ifdef __cplusplus
12	}
13	#endif
14
15	#endif

lib/libc/wasi/libc-top-half/musl/include/memory.h deleted-1

...	@@ -1 +0,0 @@
1	#include <string.h>

lib/libc/wasi/libc-top-half/musl/include/monetary.h deleted-23

...	@@ -1,23 +0,0 @@
1	#ifndef _MONETARY_H
2	#define _MONETARY_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9
10	#define __NEED_ssize_t
11	#define __NEED_size_t
12	#define __NEED_locale_t
13
14	#include <bits/alltypes.h>
15
16	ssize_t strfmon(char __restrict, size_t, const char __restrict, ...);
17	ssize_t strfmon_l(char __restrict, size_t, locale_t, const char __restrict, ...);
18
19	#ifdef __cplusplus
20	}
21	#endif
22
23	#endif

lib/libc/wasi/libc-top-half/musl/include/mqueue.h deleted-41

...	@@ -1,41 +0,0 @@
1	#ifndef _MQUEUE_H
2	#define _MQUEUE_H
3	#ifdef __cplusplus
4	extern "C" {
5	#endif
6
7	#include <features.h>
8
9	#define __NEED_size_t
10	#define __NEED_ssize_t
11	#define __NEED_pthread_attr_t
12	#define __NEED_time_t
13	#define __NEED_struct_timespec
14	#include <bits/alltypes.h>
15
16	typedef int mqd_t;
17	struct mq_attr {
18	long mq_flags, mq_maxmsg, mq_msgsize, mq_curmsgs, __unused[4];
19	};
20	struct sigevent;
21
22	int mq_close(mqd_t);
23	int mq_getattr(mqd_t, struct mq_attr *);
24	int mq_notify(mqd_t, const struct sigevent *);
25	mqd_t mq_open(const char *, int, ...);
26	ssize_t mq_receive(mqd_t, char , size_t, unsigned );
27	int mq_send(mqd_t, const char *, size_t, unsigned);
28	int mq_setattr(mqd_t, const struct mq_attr __restrict, struct mq_attr __restrict);
29	ssize_t mq_timedreceive(mqd_t, char __restrict, size_t, unsigned __restrict, const struct timespec *__restrict);
30	int mq_timedsend(mqd_t, const char , size_t, unsigned, const struct timespec );
31	int mq_unlink(const char *);
32
33	#if _REDIR_TIME64
34	__REDIR(mq_timedreceive, __mq_timedreceive_time64);
35	__REDIR(mq_timedsend, __mq_timedsend_time64);
36	#endif
37
38	#ifdef __cplusplus
39	}
40	#endif
41	#endif

lib/libc/wasi/libc-top-half/musl/include/netinet/icmp6.h deleted-305

...	@@ -1,305 +0,0 @@
1	#ifndef _NETINET_ICMP6_H
2	#define _NETINET_ICMP6_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <stdint.h>
9	#include <string.h>
10	#include <sys/types.h>
11	#include <netinet/in.h>
12
13	#define ICMP6_FILTER 1
14
15	#define ICMP6_FILTER_BLOCK 1
16	#define ICMP6_FILTER_PASS 2
17	#define ICMP6_FILTER_BLOCKOTHERS 3
18	#define ICMP6_FILTER_PASSONLY 4
19
20	struct icmp6_filter {
21	uint32_t icmp6_filt[8];
22	};
23
24	struct icmp6_hdr {
25	uint8_t icmp6_type;
26	uint8_t icmp6_code;
27	uint16_t icmp6_cksum;
28	union {
29	uint32_t icmp6_un_data32[1];
30	uint16_t icmp6_un_data16[2];
31	uint8_t icmp6_un_data8[4];
32	} icmp6_dataun;
33	};
34
35	#define icmp6_data32 icmp6_dataun.icmp6_un_data32
36	#define icmp6_data16 icmp6_dataun.icmp6_un_data16
37	#define icmp6_data8 icmp6_dataun.icmp6_un_data8
38	#define icmp6_pptr icmp6_data32[0]
39	#define icmp6_mtu icmp6_data32[0]
40	#define icmp6_id icmp6_data16[0]
41	#define icmp6_seq icmp6_data16[1]
42	#define icmp6_maxdelay icmp6_data16[0]
43
44	#define ICMP6_DST_UNREACH 1
45	#define ICMP6_PACKET_TOO_BIG 2
46	#define ICMP6_TIME_EXCEEDED 3
47	#define ICMP6_PARAM_PROB 4
48
49	#define ICMP6_INFOMSG_MASK 0x80
50
51	#define ICMP6_ECHO_REQUEST 128
52	#define ICMP6_ECHO_REPLY 129
53	#define MLD_LISTENER_QUERY 130
54	#define MLD_LISTENER_REPORT 131
55	#define MLD_LISTENER_REDUCTION 132
56
57	#define ICMP6_DST_UNREACH_NOROUTE 0
58	#define ICMP6_DST_UNREACH_ADMIN 1
59	#define ICMP6_DST_UNREACH_BEYONDSCOPE 2
60	#define ICMP6_DST_UNREACH_ADDR 3
61	#define ICMP6_DST_UNREACH_NOPORT 4
62
63	#define ICMP6_TIME_EXCEED_TRANSIT 0
64	#define ICMP6_TIME_EXCEED_REASSEMBLY 1
65
66	#define ICMP6_PARAMPROB_HEADER 0
67	#define ICMP6_PARAMPROB_NEXTHEADER 1
68	#define ICMP6_PARAMPROB_OPTION 2
69
70	#define ICMP6_FILTER_WILLPASS(type, filterp) \
71	((((filterp)->icmp6_filt[(type) >> 5]) & (1 << ((type) & 31))) == 0)
72
73	#define ICMP6_FILTER_WILLBLOCK(type, filterp) \
74	((((filterp)->icmp6_filt[(type) >> 5]) & (1 << ((type) & 31))) != 0)
75
76	#define ICMP6_FILTER_SETPASS(type, filterp) \
77	((((filterp)->icmp6_filt[(type) >> 5]) &= ~(1 << ((type) & 31))))
78
79	#define ICMP6_FILTER_SETBLOCK(type, filterp) \
80	((((filterp)->icmp6_filt[(type) >> 5]) \|= (1 << ((type) & 31))))
81
82	#define ICMP6_FILTER_SETPASSALL(filterp) \
83	memset (filterp, 0, sizeof (struct icmp6_filter));
84
85	#define ICMP6_FILTER_SETBLOCKALL(filterp) \
86	memset (filterp, 0xFF, sizeof (struct icmp6_filter));
87
88	#define ND_ROUTER_SOLICIT 133
89	#define ND_ROUTER_ADVERT 134
90	#define ND_NEIGHBOR_SOLICIT 135
91	#define ND_NEIGHBOR_ADVERT 136
92	#define ND_REDIRECT 137
93
94	struct nd_router_solicit {
95	struct icmp6_hdr nd_rs_hdr;
96	};
97
98	#define nd_rs_type nd_rs_hdr.icmp6_type
99	#define nd_rs_code nd_rs_hdr.icmp6_code
100	#define nd_rs_cksum nd_rs_hdr.icmp6_cksum
101	#define nd_rs_reserved nd_rs_hdr.icmp6_data32[0]
102
103	struct nd_router_advert {
104	struct icmp6_hdr nd_ra_hdr;
105	uint32_t nd_ra_reachable;
106	uint32_t nd_ra_retransmit;
107	};
108
109	#define nd_ra_type nd_ra_hdr.icmp6_type
110	#define nd_ra_code nd_ra_hdr.icmp6_code
111	#define nd_ra_cksum nd_ra_hdr.icmp6_cksum
112	#define nd_ra_curhoplimit nd_ra_hdr.icmp6_data8[0]
113	#define nd_ra_flags_reserved nd_ra_hdr.icmp6_data8[1]
114	#define ND_RA_FLAG_MANAGED 0x80
115	#define ND_RA_FLAG_OTHER 0x40
116	#define ND_RA_FLAG_HOME_AGENT 0x20
117	#define nd_ra_router_lifetime nd_ra_hdr.icmp6_data16[1]
118
119	struct nd_neighbor_solicit {
120	struct icmp6_hdr nd_ns_hdr;
121	struct in6_addr nd_ns_target;
122	};
123
124	#define nd_ns_type nd_ns_hdr.icmp6_type
125	#define nd_ns_code nd_ns_hdr.icmp6_code
126	#define nd_ns_cksum nd_ns_hdr.icmp6_cksum
127	#define nd_ns_reserved nd_ns_hdr.icmp6_data32[0]
128
129	struct nd_neighbor_advert {
130	struct icmp6_hdr nd_na_hdr;
131	struct in6_addr nd_na_target;
132	};
133
134	#define nd_na_type nd_na_hdr.icmp6_type
135	#define nd_na_code nd_na_hdr.icmp6_code
136	#define nd_na_cksum nd_na_hdr.icmp6_cksum
137	#define nd_na_flags_reserved nd_na_hdr.icmp6_data32[0]
138	#if __BYTE_ORDER == __BIG_ENDIAN
139	#define ND_NA_FLAG_ROUTER 0x80000000
140	#define ND_NA_FLAG_SOLICITED 0x40000000
141	#define ND_NA_FLAG_OVERRIDE 0x20000000
142	#else
143	#define ND_NA_FLAG_ROUTER 0x00000080
144	#define ND_NA_FLAG_SOLICITED 0x00000040
145	#define ND_NA_FLAG_OVERRIDE 0x00000020
146	#endif
147
148	struct nd_redirect {
149	struct icmp6_hdr nd_rd_hdr;
150	struct in6_addr nd_rd_target;
151	struct in6_addr nd_rd_dst;
152	};
153
154	#define nd_rd_type nd_rd_hdr.icmp6_type
155	#define nd_rd_code nd_rd_hdr.icmp6_code
156	#define nd_rd_cksum nd_rd_hdr.icmp6_cksum
157	#define nd_rd_reserved nd_rd_hdr.icmp6_data32[0]
158
159	struct nd_opt_hdr {
160	uint8_t nd_opt_type;
161	uint8_t nd_opt_len;
162	};
163
164	#define ND_OPT_SOURCE_LINKADDR 1
165	#define ND_OPT_TARGET_LINKADDR 2
166	#define ND_OPT_PREFIX_INFORMATION 3
167	#define ND_OPT_REDIRECTED_HEADER 4
168	#define ND_OPT_MTU 5
169	#define ND_OPT_RTR_ADV_INTERVAL 7
170	#define ND_OPT_HOME_AGENT_INFO 8
171
172	struct nd_opt_prefix_info {
173	uint8_t nd_opt_pi_type;
174	uint8_t nd_opt_pi_len;
175	uint8_t nd_opt_pi_prefix_len;
176	uint8_t nd_opt_pi_flags_reserved;
177	uint32_t nd_opt_pi_valid_time;
178	uint32_t nd_opt_pi_preferred_time;
179	uint32_t nd_opt_pi_reserved2;
180	struct in6_addr nd_opt_pi_prefix;
181	};
182
183	#define ND_OPT_PI_FLAG_ONLINK 0x80
184	#define ND_OPT_PI_FLAG_AUTO 0x40
185	#define ND_OPT_PI_FLAG_RADDR 0x20
186
187	struct nd_opt_rd_hdr {
188	uint8_t nd_opt_rh_type;
189	uint8_t nd_opt_rh_len;
190	uint16_t nd_opt_rh_reserved1;
191	uint32_t nd_opt_rh_reserved2;
192	};
193
194	struct nd_opt_mtu {
195	uint8_t nd_opt_mtu_type;
196	uint8_t nd_opt_mtu_len;
197	uint16_t nd_opt_mtu_reserved;
198	uint32_t nd_opt_mtu_mtu;
199	};
200
201	struct mld_hdr {
202	struct icmp6_hdr mld_icmp6_hdr;
203	struct in6_addr mld_addr;
204	};
205
206	#define mld_type mld_icmp6_hdr.icmp6_type
207	#define mld_code mld_icmp6_hdr.icmp6_code
208	#define mld_cksum mld_icmp6_hdr.icmp6_cksum
209	#define mld_maxdelay mld_icmp6_hdr.icmp6_data16[0]
210	#define mld_reserved mld_icmp6_hdr.icmp6_data16[1]
211
212	#define ICMP6_ROUTER_RENUMBERING 138
213
214	struct icmp6_router_renum {
215	struct icmp6_hdr rr_hdr;
216	uint8_t rr_segnum;
217	uint8_t rr_flags;
218	uint16_t rr_maxdelay;
219	uint32_t rr_reserved;
220	};
221
222	#define rr_type rr_hdr.icmp6_type
223	#define rr_code rr_hdr.icmp6_code
224	#define rr_cksum rr_hdr.icmp6_cksum
225	#define rr_seqnum rr_hdr.icmp6_data32[0]
226
227	#define ICMP6_RR_FLAGS_TEST 0x80
228	#define ICMP6_RR_FLAGS_REQRESULT 0x40
229	#define ICMP6_RR_FLAGS_FORCEAPPLY 0x20
230	#define ICMP6_RR_FLAGS_SPECSITE 0x10
231	#define ICMP6_RR_FLAGS_PREVDONE 0x08
232
233	struct rr_pco_match {
234	uint8_t rpm_code;
235	uint8_t rpm_len;
236	uint8_t rpm_ordinal;
237	uint8_t rpm_matchlen;
238	uint8_t rpm_minlen;
239	uint8_t rpm_maxlen;
240	uint16_t rpm_reserved;
241	struct in6_addr rpm_prefix;
242	};
243
244	#define RPM_PCO_ADD 1
245	#define RPM_PCO_CHANGE 2
246	#define RPM_PCO_SETGLOBAL 3
247
248	struct rr_pco_use {
249	uint8_t rpu_uselen;
250	uint8_t rpu_keeplen;
251	uint8_t rpu_ramask;
252	uint8_t rpu_raflags;
253	uint32_t rpu_vltime;
254	uint32_t rpu_pltime;
255	uint32_t rpu_flags;
256	struct in6_addr rpu_prefix;
257	};
258
259	#define ICMP6_RR_PCOUSE_RAFLAGS_ONLINK 0x20
260	#define ICMP6_RR_PCOUSE_RAFLAGS_AUTO 0x10
261
262	#if __BYTE_ORDER == __BIG_ENDIAN
263	#define ICMP6_RR_PCOUSE_FLAGS_DECRVLTIME 0x80000000
264	#define ICMP6_RR_PCOUSE_FLAGS_DECRPLTIME 0x40000000
265	#else
266	#define ICMP6_RR_PCOUSE_FLAGS_DECRVLTIME 0x80
267	#define ICMP6_RR_PCOUSE_FLAGS_DECRPLTIME 0x40
268	#endif
269
270	struct rr_result {
271	uint16_t rrr_flags;
272	uint8_t rrr_ordinal;
273	uint8_t rrr_matchedlen;
274	uint32_t rrr_ifid;
275	struct in6_addr rrr_prefix;
276	};
277
278	#if __BYTE_ORDER == __BIG_ENDIAN
279	#define ICMP6_RR_RESULT_FLAGS_OOB 0x0002
280	#define ICMP6_RR_RESULT_FLAGS_FORBIDDEN 0x0001
281	#else
282	#define ICMP6_RR_RESULT_FLAGS_OOB 0x0200
283	#define ICMP6_RR_RESULT_FLAGS_FORBIDDEN 0x0100
284	#endif
285
286	struct nd_opt_adv_interval {
287	uint8_t nd_opt_adv_interval_type;
288	uint8_t nd_opt_adv_interval_len;
289	uint16_t nd_opt_adv_interval_reserved;
290	uint32_t nd_opt_adv_interval_ival;
291	};
292
293	struct nd_opt_home_agent_info {
294	uint8_t nd_opt_home_agent_info_type;
295	uint8_t nd_opt_home_agent_info_len;
296	uint16_t nd_opt_home_agent_info_reserved;
297	uint16_t nd_opt_home_agent_info_preference;
298	uint16_t nd_opt_home_agent_info_lifetime;
299	};
300
301	#ifdef __cplusplus
302	}
303	#endif
304
305	#endif

lib/libc/wasi/libc-top-half/musl/include/netinet/igmp.h deleted-45

...	@@ -1,45 +0,0 @@
1	#ifndef _NETINET_IGMP_H
2	#define _NETINET_IGMP_H
3
4	#include <stdint.h>
5	#include <netinet/in.h>
6
7	struct igmp {
8	uint8_t igmp_type;
9	uint8_t igmp_code;
10	uint16_t igmp_cksum;
11	struct in_addr igmp_group;
12	};
13
14	#define IGMP_MINLEN 8
15
16	#define IGMP_MEMBERSHIP_QUERY 0x11
17	#define IGMP_V1_MEMBERSHIP_REPORT 0x12
18	#define IGMP_V2_MEMBERSHIP_REPORT 0x16
19	#define IGMP_V2_LEAVE_GROUP 0x17
20
21	#define IGMP_DVMRP 0x13
22	#define IGMP_PIM 0x14
23	#define IGMP_TRACE 0x15
24
25	#define IGMP_MTRACE_RESP 0x1e
26	#define IGMP_MTRACE 0x1f
27
28	#define IGMP_MAX_HOST_REPORT_DELAY 10
29	#define IGMP_TIMER_SCALE 10
30
31	#define IGMP_DELAYING_MEMBER 1
32	#define IGMP_IDLE_MEMBER 2
33	#define IGMP_LAZY_MEMBER 3
34	#define IGMP_SLEEPING_MEMBER 4
35	#define IGMP_AWAKENING_MEMBER 5
36
37	#define IGMP_v1_ROUTER 1
38	#define IGMP_v2_ROUTER 2
39
40	#define IGMP_HOST_MEMBERSHIP_QUERY IGMP_MEMBERSHIP_QUERY
41	#define IGMP_HOST_MEMBERSHIP_REPORT IGMP_V1_MEMBERSHIP_REPORT
42	#define IGMP_HOST_NEW_MEMBERSHIP_REPORT IGMP_V2_MEMBERSHIP_REPORT
43	#define IGMP_HOST_LEAVE_MESSAGE IGMP_V2_LEAVE_GROUP
44
45	#endif

lib/libc/wasi/libc-top-half/musl/include/netinet/in_systm.h deleted-9

...	@@ -1,9 +0,0 @@
1	#ifndef _NETINET_IN_SYSTM_H
2	#define _NETINET_IN_SYSTM_H
3
4	#include <stdint.h>
5
6	typedef uint16_t n_short;
7	typedef uint32_t n_long, n_time;
8
9	#endif

lib/libc/wasi/libc-top-half/musl/include/netinet/ip.h deleted-199

...	@@ -1,199 +0,0 @@
1	#ifndef _NETINET_IP_H
2	#define _NETINET_IP_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <stdint.h>
9	#include <netinet/in.h>
10
11	struct timestamp {
12	uint8_t len;
13	uint8_t ptr;
14	#if __BYTE_ORDER == __LITTLE_ENDIAN
15	unsigned int flags:4;
16	unsigned int overflow:4;
17	#else
18	unsigned int overflow:4;
19	unsigned int flags:4;
20	#endif
21	uint32_t data[9];
22	};
23
24	struct iphdr {
25	#if __BYTE_ORDER == __LITTLE_ENDIAN
26	unsigned int ihl:4;
27	unsigned int version:4;
28	#else
29	unsigned int version:4;
30	unsigned int ihl:4;
31	#endif
32	uint8_t tos;
33	uint16_t tot_len;
34	uint16_t id;
35	uint16_t frag_off;
36	uint8_t ttl;
37	uint8_t protocol;
38	uint16_t check;
39	uint32_t saddr;
40	uint32_t daddr;
41	};
42
43	struct ip {
44	#if __BYTE_ORDER == __LITTLE_ENDIAN
45	unsigned int ip_hl:4;
46	unsigned int ip_v:4;
47	#else
48	unsigned int ip_v:4;
49	unsigned int ip_hl:4;
50	#endif
51	uint8_t ip_tos;
52	uint16_t ip_len;
53	uint16_t ip_id;
54	uint16_t ip_off;
55	uint8_t ip_ttl;
56	uint8_t ip_p;
57	uint16_t ip_sum;
58	struct in_addr ip_src, ip_dst;
59	};
60
61	#define IP_RF 0x8000
62	#define IP_DF 0x4000
63	#define IP_MF 0x2000
64	#define IP_OFFMASK 0x1fff
65
66	struct ip_timestamp {
67	uint8_t ipt_code;
68	uint8_t ipt_len;
69	uint8_t ipt_ptr;
70	#if __BYTE_ORDER == __LITTLE_ENDIAN
71	unsigned int ipt_flg:4;
72	unsigned int ipt_oflw:4;
73	#else
74	unsigned int ipt_oflw:4;
75	unsigned int ipt_flg:4;
76	#endif
77	uint32_t data[9];
78	};
79
80	#define IPVERSION 4
81	#define IP_MAXPACKET 65535
82
83	#define IPTOS_ECN_MASK 0x03
84	#define IPTOS_ECN(x) ((x) & IPTOS_ECN_MASK)
85	#define IPTOS_ECN_NOT_ECT 0x00
86	#define IPTOS_ECN_ECT1 0x01
87	#define IPTOS_ECN_ECT0 0x02
88	#define IPTOS_ECN_CE 0x03
89
90	#define IPTOS_DSCP_MASK 0xfc
91	#define IPTOS_DSCP(x) ((x) & IPTOS_DSCP_MASK)
92	#define IPTOS_DSCP_AF11 0x28
93	#define IPTOS_DSCP_AF12 0x30
94	#define IPTOS_DSCP_AF13 0x38
95	#define IPTOS_DSCP_AF21 0x48
96	#define IPTOS_DSCP_AF22 0x50
97	#define IPTOS_DSCP_AF23 0x58
98	#define IPTOS_DSCP_AF31 0x68
99	#define IPTOS_DSCP_AF32 0x70
100	#define IPTOS_DSCP_AF33 0x78
101	#define IPTOS_DSCP_AF41 0x88
102	#define IPTOS_DSCP_AF42 0x90
103	#define IPTOS_DSCP_AF43 0x98
104	#define IPTOS_DSCP_EF 0xb8
105
106	#define IPTOS_CLASS_MASK 0xe0
107	#define IPTOS_CLASS(x) ((x) & IPTOS_CLASS_MASK)
108	#define IPTOS_CLASS_CS0 0x00
109	#define IPTOS_CLASS_CS1 0x20
110	#define IPTOS_CLASS_CS2 0x40
111	#define IPTOS_CLASS_CS3 0x60
112	#define IPTOS_CLASS_CS4 0x80
113	#define IPTOS_CLASS_CS5 0xa0
114	#define IPTOS_CLASS_CS6 0xc0
115	#define IPTOS_CLASS_CS7 0xe0
116	#define IPTOS_CLASS_DEFAULT IPTOS_CLASS_CS0
117
118	#define IPTOS_TOS_MASK 0x1E
119	#define IPTOS_TOS(tos) ((tos) & IPTOS_TOS_MASK)
120	#define IPTOS_LOWDELAY 0x10
121	#define IPTOS_THROUGHPUT 0x08
122	#define IPTOS_RELIABILITY 0x04
123	#define IPTOS_LOWCOST 0x02
124	#define IPTOS_MINCOST IPTOS_LOWCOST
125
126	#define IPTOS_PREC_MASK 0xe0
127	#define IPTOS_PREC(tos) ((tos) & IPTOS_PREC_MASK)
128	#define IPTOS_PREC_NETCONTROL 0xe0
129	#define IPTOS_PREC_INTERNETCONTROL 0xc0
130	#define IPTOS_PREC_CRITIC_ECP 0xa0
131	#define IPTOS_PREC_FLASHOVERRIDE 0x80
132	#define IPTOS_PREC_FLASH 0x60
133	#define IPTOS_PREC_IMMEDIATE 0x40
134	#define IPTOS_PREC_PRIORITY 0x20
135	#define IPTOS_PREC_ROUTINE 0x00
136
137	#define IPOPT_COPY 0x80
138	#define IPOPT_CLASS_MASK 0x60
139	#define IPOPT_NUMBER_MASK 0x1f
140
141	#define IPOPT_COPIED(o) ((o) & IPOPT_COPY)
142	#define IPOPT_CLASS(o) ((o) & IPOPT_CLASS_MASK)
143	#define IPOPT_NUMBER(o) ((o) & IPOPT_NUMBER_MASK)
144
145	#define IPOPT_CONTROL 0x00
146	#define IPOPT_RESERVED1 0x20
147	#define IPOPT_DEBMEAS 0x40
148	#define IPOPT_MEASUREMENT IPOPT_DEBMEAS
149	#define IPOPT_RESERVED2 0x60
150
151	#define IPOPT_EOL 0
152	#define IPOPT_END IPOPT_EOL
153	#define IPOPT_NOP 1
154	#define IPOPT_NOOP IPOPT_NOP
155
156	#define IPOPT_RR 7
157	#define IPOPT_TS 68
158	#define IPOPT_TIMESTAMP IPOPT_TS
159	#define IPOPT_SECURITY 130
160	#define IPOPT_SEC IPOPT_SECURITY
161	#define IPOPT_LSRR 131
162	#define IPOPT_SATID 136
163	#define IPOPT_SID IPOPT_SATID
164	#define IPOPT_SSRR 137
165	#define IPOPT_RA 148
166
167	#define IPOPT_OPTVAL 0
168	#define IPOPT_OLEN 1
169	#define IPOPT_OFFSET 2
170	#define IPOPT_MINOFF 4
171
172	#define MAX_IPOPTLEN 40
173
174	#define IPOPT_TS_TSONLY 0
175	#define IPOPT_TS_TSANDADDR 1
176	#define IPOPT_TS_PRESPEC 3
177
178	#define IPOPT_SECUR_UNCLASS 0x0000
179	#define IPOPT_SECUR_CONFID 0xf135
180	#define IPOPT_SECUR_EFTO 0x789a
181	#define IPOPT_SECUR_MMMM 0xbc4d
182	#define IPOPT_SECUR_RESTR 0xaf13
183	#define IPOPT_SECUR_SECRET 0xd788
184	#define IPOPT_SECUR_TOPSECRET 0x6bc5
185
186	#define MAXTTL 255
187	#define IPDEFTTL 64
188	#define IPFRAGTTL 60
189	#define IPTTLDEC 1
190
191	#define IP_MSS 576
192
193	#define __UAPI_DEF_IPHDR 0
194
195	#ifdef __cplusplus
196	}
197	#endif
198
199	#endif

lib/libc/wasi/libc-top-half/musl/include/netinet/ip6.h deleted-141

...	@@ -1,141 +0,0 @@
1	#ifndef _NETINET_IP6_H
2	#define _NETINET_IP6_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <stdint.h>
9	#include <netinet/in.h>
10
11	struct ip6_hdr {
12	union {
13	struct ip6_hdrctl {
14	uint32_t ip6_un1_flow;
15	uint16_t ip6_un1_plen;
16	uint8_t ip6_un1_nxt;
17	uint8_t ip6_un1_hlim;
18	} ip6_un1;
19	uint8_t ip6_un2_vfc;
20	} ip6_ctlun;
21	struct in6_addr ip6_src;
22	struct in6_addr ip6_dst;
23	};
24
25	#define ip6_vfc ip6_ctlun.ip6_un2_vfc
26	#define ip6_flow ip6_ctlun.ip6_un1.ip6_un1_flow
27	#define ip6_plen ip6_ctlun.ip6_un1.ip6_un1_plen
28	#define ip6_nxt ip6_ctlun.ip6_un1.ip6_un1_nxt
29	#define ip6_hlim ip6_ctlun.ip6_un1.ip6_un1_hlim
30	#define ip6_hops ip6_ctlun.ip6_un1.ip6_un1_hlim
31
32	struct ip6_ext {
33	uint8_t ip6e_nxt;
34	uint8_t ip6e_len;
35	};
36
37	struct ip6_hbh {
38	uint8_t ip6h_nxt;
39	uint8_t ip6h_len;
40	};
41
42	struct ip6_dest {
43	uint8_t ip6d_nxt;
44	uint8_t ip6d_len;
45	};
46
47	struct ip6_rthdr {
48	uint8_t ip6r_nxt;
49	uint8_t ip6r_len;
50	uint8_t ip6r_type;
51	uint8_t ip6r_segleft;
52	};
53
54	struct ip6_rthdr0 {
55	uint8_t ip6r0_nxt;
56	uint8_t ip6r0_len;
57	uint8_t ip6r0_type;
58	uint8_t ip6r0_segleft;
59	uint8_t ip6r0_reserved;
60	uint8_t ip6r0_slmap[3];
61	struct in6_addr ip6r0_addr[];
62	};
63
64	struct ip6_frag {
65	uint8_t ip6f_nxt;
66	uint8_t ip6f_reserved;
67	uint16_t ip6f_offlg;
68	uint32_t ip6f_ident;
69	};
70
71	#if __BYTE_ORDER == __BIG_ENDIAN
72	#define IP6F_OFF_MASK 0xfff8
73	#define IP6F_RESERVED_MASK 0x0006
74	#define IP6F_MORE_FRAG 0x0001
75	#else
76	#define IP6F_OFF_MASK 0xf8ff
77	#define IP6F_RESERVED_MASK 0x0600
78	#define IP6F_MORE_FRAG 0x0100
79	#endif
80
81	struct ip6_opt {
82	uint8_t ip6o_type;
83	uint8_t ip6o_len;
84	};
85
86	#define IP6OPT_TYPE(o) ((o) & 0xc0)
87	#define IP6OPT_TYPE_SKIP 0x00
88	#define IP6OPT_TYPE_DISCARD 0x40
89	#define IP6OPT_TYPE_FORCEICMP 0x80
90	#define IP6OPT_TYPE_ICMP 0xc0
91	#define IP6OPT_TYPE_MUTABLE 0x20
92
93	#define IP6OPT_PAD1 0
94	#define IP6OPT_PADN 1
95
96	#define IP6OPT_JUMBO 0xc2
97	#define IP6OPT_NSAP_ADDR 0xc3
98	#define IP6OPT_TUNNEL_LIMIT 0x04
99	#define IP6OPT_ROUTER_ALERT 0x05
100
101	struct ip6_opt_jumbo {
102	uint8_t ip6oj_type;
103	uint8_t ip6oj_len;
104	uint8_t ip6oj_jumbo_len[4];
105	};
106	#define IP6OPT_JUMBO_LEN 6
107
108	struct ip6_opt_nsap {
109	uint8_t ip6on_type;
110	uint8_t ip6on_len;
111	uint8_t ip6on_src_nsap_len;
112	uint8_t ip6on_dst_nsap_len;
113	};
114
115	struct ip6_opt_tunnel {
116	uint8_t ip6ot_type;
117	uint8_t ip6ot_len;
118	uint8_t ip6ot_encap_limit;
119	};
120
121	struct ip6_opt_router {
122	uint8_t ip6or_type;
123	uint8_t ip6or_len;
124	uint8_t ip6or_value[2];
125	};
126
127	#if __BYTE_ORDER == __BIG_ENDIAN
128	#define IP6_ALERT_MLD 0x0000
129	#define IP6_ALERT_RSVP 0x0001
130	#define IP6_ALERT_AN 0x0002
131	#else
132	#define IP6_ALERT_MLD 0x0000
133	#define IP6_ALERT_RSVP 0x0100
134	#define IP6_ALERT_AN 0x0200
135	#endif
136
137	#ifdef __cplusplus
138	}
139	#endif
140
141	#endif

lib/libc/wasi/libc-top-half/musl/include/netinet/ip_icmp.h deleted-193

...	@@ -1,193 +0,0 @@
1	#ifndef _NETINET_IP_ICMP_H
2	#define _NETINET_IP_ICMP_H
3
4	#include <stdint.h>
5	#include <netinet/in.h>
6	#include <netinet/ip.h>
7
8	#ifdef __cplusplus
9	extern "C" {
10	#endif
11
12	struct icmphdr {
13	uint8_t type;
14	uint8_t code;
15	uint16_t checksum;
16	union {
17	struct {
18	uint16_t id;
19	uint16_t sequence;
20	} echo;
21	uint32_t gateway;
22	struct {
23	uint16_t __unused;
24	uint16_t mtu;
25	} frag;
26	uint8_t reserved[4];
27	} un;
28	};
29
30	#define ICMP_ECHOREPLY 0
31	#define ICMP_DEST_UNREACH 3
32	#define ICMP_SOURCE_QUENCH 4
33	#define ICMP_REDIRECT 5
34	#define ICMP_ECHO 8
35	#define ICMP_TIME_EXCEEDED 11
36	#define ICMP_PARAMETERPROB 12
37	#define ICMP_TIMESTAMP 13
38	#define ICMP_TIMESTAMPREPLY 14
39	#define ICMP_INFO_REQUEST 15
40	#define ICMP_INFO_REPLY 16
41	#define ICMP_ADDRESS 17
42	#define ICMP_ADDRESSREPLY 18
43	#define NR_ICMP_TYPES 18
44
45
46	#define ICMP_NET_UNREACH 0
47	#define ICMP_HOST_UNREACH 1
48	#define ICMP_PROT_UNREACH 2
49	#define ICMP_PORT_UNREACH 3
50	#define ICMP_FRAG_NEEDED 4
51	#define ICMP_SR_FAILED 5
52	#define ICMP_NET_UNKNOWN 6
53	#define ICMP_HOST_UNKNOWN 7
54	#define ICMP_HOST_ISOLATED 8
55	#define ICMP_NET_ANO 9
56	#define ICMP_HOST_ANO 10
57	#define ICMP_NET_UNR_TOS 11
58	#define ICMP_HOST_UNR_TOS 12
59	#define ICMP_PKT_FILTERED 13
60	#define ICMP_PREC_VIOLATION 14
61	#define ICMP_PREC_CUTOFF 15
62	#define NR_ICMP_UNREACH 15
63
64	#define ICMP_REDIR_NET 0
65	#define ICMP_REDIR_HOST 1
66	#define ICMP_REDIR_NETTOS 2
67	#define ICMP_REDIR_HOSTTOS 3
68
69	#define ICMP_EXC_TTL 0
70	#define ICMP_EXC_FRAGTIME 1
71
72
73	struct icmp_ra_addr {
74	uint32_t ira_addr;
75	uint32_t ira_preference;
76	};
77
78	struct icmp {
79	uint8_t icmp_type;
80	uint8_t icmp_code;
81	uint16_t icmp_cksum;
82	union {
83	uint8_t ih_pptr;
84	struct in_addr ih_gwaddr;
85	struct ih_idseq {
86	uint16_t icd_id;
87	uint16_t icd_seq;
88	} ih_idseq;
89	uint32_t ih_void;
90
91	struct ih_pmtu {
92	uint16_t ipm_void;
93	uint16_t ipm_nextmtu;
94	} ih_pmtu;
95
96	struct ih_rtradv {
97	uint8_t irt_num_addrs;
98	uint8_t irt_wpa;
99	uint16_t irt_lifetime;
100	} ih_rtradv;
101	} icmp_hun;
102	union {
103	struct {
104	uint32_t its_otime;
105	uint32_t its_rtime;
106	uint32_t its_ttime;
107	} id_ts;
108	struct {
109	struct ip idi_ip;
110	} id_ip;
111	struct icmp_ra_addr id_radv;
112	uint32_t id_mask;
113	uint8_t id_data[1];
114	} icmp_dun;
115	};
116
117	#define icmp_pptr icmp_hun.ih_pptr
118	#define icmp_gwaddr icmp_hun.ih_gwaddr
119	#define icmp_id icmp_hun.ih_idseq.icd_id
120	#define icmp_seq icmp_hun.ih_idseq.icd_seq
121	#define icmp_void icmp_hun.ih_void
122	#define icmp_pmvoid icmp_hun.ih_pmtu.ipm_void
123	#define icmp_nextmtu icmp_hun.ih_pmtu.ipm_nextmtu
124	#define icmp_num_addrs icmp_hun.ih_rtradv.irt_num_addrs
125	#define icmp_wpa icmp_hun.ih_rtradv.irt_wpa
126	#define icmp_lifetime icmp_hun.ih_rtradv.irt_lifetime
127	#define icmp_otime icmp_dun.id_ts.its_otime
128	#define icmp_rtime icmp_dun.id_ts.its_rtime
129	#define icmp_ttime icmp_dun.id_ts.its_ttime
130	#define icmp_ip icmp_dun.id_ip.idi_ip
131	#define icmp_radv icmp_dun.id_radv
132	#define icmp_mask icmp_dun.id_mask
133	#define icmp_data icmp_dun.id_data
134
135	#define ICMP_MINLEN 8
136	#define ICMP_TSLEN (8 + 3 * sizeof (n_time))
137	#define ICMP_MASKLEN 12
138	#define ICMP_ADVLENMIN (8 + sizeof (struct ip) + 8)
139	#define ICMP_ADVLEN(p) (8 + ((p)->icmp_ip.ip_hl << 2) + 8)
140
141	#define ICMP_UNREACH 3
142	#define ICMP_SOURCEQUENCH 4
143	#define ICMP_ROUTERADVERT 9
144	#define ICMP_ROUTERSOLICIT 10
145	#define ICMP_TIMXCEED 11
146	#define ICMP_PARAMPROB 12
147	#define ICMP_TSTAMP 13
148	#define ICMP_TSTAMPREPLY 14
149	#define ICMP_IREQ 15
150	#define ICMP_IREQREPLY 16
151	#define ICMP_MASKREQ 17
152	#define ICMP_MASKREPLY 18
153	#define ICMP_MAXTYPE 18
154
155	#define ICMP_UNREACH_NET 0
156	#define ICMP_UNREACH_HOST 1
157	#define ICMP_UNREACH_PROTOCOL 2
158	#define ICMP_UNREACH_PORT 3
159	#define ICMP_UNREACH_NEEDFRAG 4
160	#define ICMP_UNREACH_SRCFAIL 5
161	#define ICMP_UNREACH_NET_UNKNOWN 6
162	#define ICMP_UNREACH_HOST_UNKNOWN 7
163	#define ICMP_UNREACH_ISOLATED 8
164	#define ICMP_UNREACH_NET_PROHIB 9
165	#define ICMP_UNREACH_HOST_PROHIB 10
166	#define ICMP_UNREACH_TOSNET 11
167	#define ICMP_UNREACH_TOSHOST 12
168	#define ICMP_UNREACH_FILTER_PROHIB 13
169	#define ICMP_UNREACH_HOST_PRECEDENCE 14
170	#define ICMP_UNREACH_PRECEDENCE_CUTOFF 15
171
172	#define ICMP_REDIRECT_NET 0
173	#define ICMP_REDIRECT_HOST 1
174	#define ICMP_REDIRECT_TOSNET 2
175	#define ICMP_REDIRECT_TOSHOST 3
176
177	#define ICMP_TIMXCEED_INTRANS 0
178	#define ICMP_TIMXCEED_REASS 1
179
180	#define ICMP_PARAMPROB_OPTABSENT 1
181
182	#define ICMP_INFOTYPE(type) \
183	((type) == ICMP_ECHOREPLY \|\| (type) == ICMP_ECHO \|\| \
184	(type) == ICMP_ROUTERADVERT \|\| (type) == ICMP_ROUTERSOLICIT \|\| \
185	(type) == ICMP_TSTAMP \|\| (type) == ICMP_TSTAMPREPLY \|\| \
186	(type) == ICMP_IREQ \|\| (type) == ICMP_IREQREPLY \|\| \
187	(type) == ICMP_MASKREQ \|\| (type) == ICMP_MASKREPLY)
188
189	#ifdef __cplusplus
190	}
191	#endif
192
193	#endif

lib/libc/wasi/libc-top-half/musl/include/netinet/tcp.h deleted-305

...	@@ -1,305 +0,0 @@
1	#ifndef _NETINET_TCP_H
2	#define _NETINET_TCP_H
3
4	#include <features.h>
5
6	#define TCP_NODELAY 1
7	#define TCP_MAXSEG 2
8	#define TCP_CORK 3
9	#define TCP_KEEPIDLE 4
10	#define TCP_KEEPINTVL 5
11	#define TCP_KEEPCNT 6
12	#define TCP_SYNCNT 7
13	#define TCP_LINGER2 8
14	#define TCP_DEFER_ACCEPT 9
15	#define TCP_WINDOW_CLAMP 10
16	#define TCP_INFO 11
17	#define TCP_QUICKACK 12
18	#define TCP_CONGESTION 13
19	#define TCP_MD5SIG 14
20	#define TCP_THIN_LINEAR_TIMEOUTS 16
21	#define TCP_THIN_DUPACK 17
22	#define TCP_USER_TIMEOUT 18
23	#define TCP_REPAIR 19
24	#define TCP_REPAIR_QUEUE 20
25	#define TCP_QUEUE_SEQ 21
26	#define TCP_REPAIR_OPTIONS 22
27	#define TCP_FASTOPEN 23
28	#define TCP_TIMESTAMP 24
29	#define TCP_NOTSENT_LOWAT 25
30	#define TCP_CC_INFO 26
31	#define TCP_SAVE_SYN 27
32	#define TCP_SAVED_SYN 28
33	#define TCP_REPAIR_WINDOW 29
34	#define TCP_FASTOPEN_CONNECT 30
35	#define TCP_ULP 31
36	#define TCP_MD5SIG_EXT 32
37	#define TCP_FASTOPEN_KEY 33
38	#define TCP_FASTOPEN_NO_COOKIE 34
39	#define TCP_ZEROCOPY_RECEIVE 35
40	#define TCP_INQ 36
41	#define TCP_TX_DELAY 37
42
43	#define TCP_CM_INQ TCP_INQ
44
45	#define TCP_ESTABLISHED 1
46	#define TCP_SYN_SENT 2
47	#define TCP_SYN_RECV 3
48	#define TCP_FIN_WAIT1 4
49	#define TCP_FIN_WAIT2 5
50	#define TCP_TIME_WAIT 6
51	#define TCP_CLOSE 7
52	#define TCP_CLOSE_WAIT 8
53	#define TCP_LAST_ACK 9
54	#define TCP_LISTEN 10
55	#define TCP_CLOSING 11
56
57	enum {
58	TCP_NLA_PAD,
59	TCP_NLA_BUSY,
60	TCP_NLA_RWND_LIMITED,
61	TCP_NLA_SNDBUF_LIMITED,
62	TCP_NLA_DATA_SEGS_OUT,
63	TCP_NLA_TOTAL_RETRANS,
64	TCP_NLA_PACING_RATE,
65	TCP_NLA_DELIVERY_RATE,
66	TCP_NLA_SND_CWND,
67	TCP_NLA_REORDERING,
68	TCP_NLA_MIN_RTT,
69	TCP_NLA_RECUR_RETRANS,
70	TCP_NLA_DELIVERY_RATE_APP_LMT,
71	TCP_NLA_SNDQ_SIZE,
72	TCP_NLA_CA_STATE,
73	TCP_NLA_SND_SSTHRESH,
74	TCP_NLA_DELIVERED,
75	TCP_NLA_DELIVERED_CE,
76	TCP_NLA_BYTES_SENT,
77	TCP_NLA_BYTES_RETRANS,
78	TCP_NLA_DSACK_DUPS,
79	TCP_NLA_REORD_SEEN,
80	TCP_NLA_SRTT,
81	TCP_NLA_TIMEOUT_REHASH,
82	TCP_NLA_BYTES_NOTSENT,
83	TCP_NLA_EDT,
84	TCP_NLA_TTL,
85	};
86
87	#if defined(_GNU_SOURCE) \|\| defined(_BSD_SOURCE)
88	#define TCPOPT_EOL 0
89	#define TCPOPT_NOP 1
90	#define TCPOPT_MAXSEG 2
91	#define TCPOPT_WINDOW 3
92	#define TCPOPT_SACK_PERMITTED 4
93	#define TCPOPT_SACK 5
94	#define TCPOPT_TIMESTAMP 8
95	#define TCPOLEN_SACK_PERMITTED 2
96	#define TCPOLEN_WINDOW 3
97	#define TCPOLEN_MAXSEG 4
98	#define TCPOLEN_TIMESTAMP 10
99
100	#define SOL_TCP 6
101
102	#include <sys/types.h>
103	#include <sys/socket.h>
104	#include <stdint.h>
105
106	typedef uint32_t tcp_seq;
107
108	#define TH_FIN 0x01
109	#define TH_SYN 0x02
110	#define TH_RST 0x04
111	#define TH_PUSH 0x08
112	#define TH_ACK 0x10
113	#define TH_URG 0x20
114
115	struct tcphdr {
116	#ifdef _GNU_SOURCE
117	#ifdef __GNUC__
118	__extension__
119	#endif
120	union { struct {
121
122	uint16_t source;
123	uint16_t dest;
124	uint32_t seq;
125	uint32_t ack_seq;
126	#if __BYTE_ORDER == __LITTLE_ENDIAN
127	uint16_t res1:4;
128	uint16_t doff:4;
129	uint16_t fin:1;
130	uint16_t syn:1;
131	uint16_t rst:1;
132	uint16_t psh:1;
133	uint16_t ack:1;
134	uint16_t urg:1;
135	uint16_t res2:2;
136	#else
137	uint16_t doff:4;
138	uint16_t res1:4;
139	uint16_t res2:2;
140	uint16_t urg:1;
141	uint16_t ack:1;
142	uint16_t psh:1;
143	uint16_t rst:1;
144	uint16_t syn:1;
145	uint16_t fin:1;
146	#endif
147	uint16_t window;
148	uint16_t check;
149	uint16_t urg_ptr;
150
151	}; struct {
152	#endif
153
154	uint16_t th_sport;
155	uint16_t th_dport;
156	uint32_t th_seq;
157	uint32_t th_ack;
158	#if __BYTE_ORDER == __LITTLE_ENDIAN
159	uint8_t th_x2:4;
160	uint8_t th_off:4;
161	#else
162	uint8_t th_off:4;
163	uint8_t th_x2:4;
164	#endif
165	uint8_t th_flags;
166	uint16_t th_win;
167	uint16_t th_sum;
168	uint16_t th_urp;
169
170	#ifdef _GNU_SOURCE
171	}; };
172	#endif
173	};
174	#endif
175
176	#ifdef _GNU_SOURCE
177	#define TCPI_OPT_TIMESTAMPS 1
178	#define TCPI_OPT_SACK 2
179	#define TCPI_OPT_WSCALE 4
180	#define TCPI_OPT_ECN 8
181
182	#define TCP_CA_Open 0
183	#define TCP_CA_Disorder 1
184	#define TCP_CA_CWR 2
185	#define TCP_CA_Recovery 3
186	#define TCP_CA_Loss 4
187
188	enum tcp_fastopen_client_fail {
189	TFO_STATUS_UNSPEC,
190	TFO_COOKIE_UNAVAILABLE,
191	TFO_DATA_NOT_ACKED,
192	TFO_SYN_RETRANSMITTED,
193	};
194
195	struct tcp_info {
196	uint8_t tcpi_state;
197	uint8_t tcpi_ca_state;
198	uint8_t tcpi_retransmits;
199	uint8_t tcpi_probes;
200	uint8_t tcpi_backoff;
201	uint8_t tcpi_options;
202	uint8_t tcpi_snd_wscale : 4, tcpi_rcv_wscale : 4;
203	uint8_t tcpi_delivery_rate_app_limited : 1, tcpi_fastopen_client_fail : 2;
204	uint32_t tcpi_rto;
205	uint32_t tcpi_ato;
206	uint32_t tcpi_snd_mss;
207	uint32_t tcpi_rcv_mss;
208	uint32_t tcpi_unacked;
209	uint32_t tcpi_sacked;
210	uint32_t tcpi_lost;
211	uint32_t tcpi_retrans;
212	uint32_t tcpi_fackets;
213	uint32_t tcpi_last_data_sent;
214	uint32_t tcpi_last_ack_sent;
215	uint32_t tcpi_last_data_recv;
216	uint32_t tcpi_last_ack_recv;
217	uint32_t tcpi_pmtu;
218	uint32_t tcpi_rcv_ssthresh;
219	uint32_t tcpi_rtt;
220	uint32_t tcpi_rttvar;
221	uint32_t tcpi_snd_ssthresh;
222	uint32_t tcpi_snd_cwnd;
223	uint32_t tcpi_advmss;
224	uint32_t tcpi_reordering;
225	uint32_t tcpi_rcv_rtt;
226	uint32_t tcpi_rcv_space;
227	uint32_t tcpi_total_retrans;
228	uint64_t tcpi_pacing_rate;
229	uint64_t tcpi_max_pacing_rate;
230	uint64_t tcpi_bytes_acked;
231	uint64_t tcpi_bytes_received;
232	uint32_t tcpi_segs_out;
233	uint32_t tcpi_segs_in;
234	uint32_t tcpi_notsent_bytes;
235	uint32_t tcpi_min_rtt;
236	uint32_t tcpi_data_segs_in;
237	uint32_t tcpi_data_segs_out;
238	uint64_t tcpi_delivery_rate;
239	uint64_t tcpi_busy_time;
240	uint64_t tcpi_rwnd_limited;
241	uint64_t tcpi_sndbuf_limited;
242	uint32_t tcpi_delivered;
243	uint32_t tcpi_delivered_ce;
244	uint64_t tcpi_bytes_sent;
245	uint64_t tcpi_bytes_retrans;
246	uint32_t tcpi_dsack_dups;
247	uint32_t tcpi_reord_seen;
248	uint32_t tcpi_rcv_ooopack;
249	uint32_t tcpi_snd_wnd;
250	};
251
252	#define TCP_MD5SIG_MAXKEYLEN 80
253
254	#define TCP_MD5SIG_FLAG_PREFIX 0x1
255	#define TCP_MD5SIG_FLAG_IFINDEX 0x2
256
257	struct tcp_md5sig {
258	struct sockaddr_storage tcpm_addr;
259	uint8_t tcpm_flags;
260	uint8_t tcpm_prefixlen;
261	uint16_t tcpm_keylen;
262	int tcpm_ifindex;
263	uint8_t tcpm_key[TCP_MD5SIG_MAXKEYLEN];
264	};
265
266	struct tcp_diag_md5sig {
267	uint8_t tcpm_family;
268	uint8_t tcpm_prefixlen;
269	uint16_t tcpm_keylen;
270	uint32_t tcpm_addr[4];
271	uint8_t tcpm_key[TCP_MD5SIG_MAXKEYLEN];
272	};
273
274	#define TCP_REPAIR_ON 1
275	#define TCP_REPAIR_OFF 0
276	#define TCP_REPAIR_OFF_NO_WP -1
277
278	struct tcp_repair_window {
279	uint32_t snd_wl1;
280	uint32_t snd_wnd;
281	uint32_t max_window;
282	uint32_t rcv_wnd;
283	uint32_t rcv_wup;
284	};
285
286	#define TCP_RECEIVE_ZEROCOPY_FLAG_TLB_CLEAN_HINT 0x1
287
288	struct tcp_zerocopy_receive {
289	uint64_t address;
290	uint32_t length;
291	uint32_t recv_skip_hint;
292	uint32_t inq;
293	int32_t err;
294	uint64_t copybuf_address;
295	int32_t copybuf_len;
296	uint32_t flags;
297	uint64_t msg_control;
298	uint64_t msg_controllen;
299	uint32_t msg_flags;
300	uint32_t reserved;
301	};
302
303	#endif
304
305	#endif

lib/libc/wasi/libc-top-half/musl/include/netinet/udp.h deleted-46

...	@@ -1,46 +0,0 @@
1	#ifndef _NETINET_UDP_H
2	#define _NETINET_UDP_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9	#include <stdint.h>
10
11	#ifdef _GNU_SOURCE
12	#define uh_sport source
13	#define uh_dport dest
14	#define uh_ulen len
15	#define uh_sum check
16	#endif
17
18	struct udphdr {
19	uint16_t uh_sport;
20	uint16_t uh_dport;
21	uint16_t uh_ulen;
22	uint16_t uh_sum;
23	};
24
25	#define UDP_CORK 1
26	#define UDP_ENCAP 100
27	#define UDP_NO_CHECK6_TX 101
28	#define UDP_NO_CHECK6_RX 102
29	#define UDP_SEGMENT 103
30	#define UDP_GRO 104
31
32	#define UDP_ENCAP_ESPINUDP_NON_IKE 1
33	#define UDP_ENCAP_ESPINUDP 2
34	#define UDP_ENCAP_L2TPINUDP 3
35	#define UDP_ENCAP_GTP0 4
36	#define UDP_ENCAP_GTP1U 5
37	#define UDP_ENCAP_RXRPC 6
38	#define TCP_ENCAP_ESPINTCP 7
39
40	#define SOL_UDP 17
41
42	#ifdef __cplusplus
43	}
44	#endif
45
46	#endif

lib/libc/wasi/libc-top-half/musl/include/netpacket/packet.h deleted-62

...	@@ -1,62 +0,0 @@
1	#ifndef _NETPACKET_PACKET_H
2	#define _NETPACKET_PACKET_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	struct sockaddr_ll {
9	unsigned short sll_family, sll_protocol;
10	int sll_ifindex;
11	unsigned short sll_hatype;
12	unsigned char sll_pkttype, sll_halen;
13	unsigned char sll_addr[8];
14	};
15
16	struct packet_mreq {
17	int mr_ifindex;
18	unsigned short int mr_type, mr_alen;
19	unsigned char mr_address[8];
20	};
21
22	#define PACKET_HOST 0
23	#define PACKET_BROADCAST 1
24	#define PACKET_MULTICAST 2
25	#define PACKET_OTHERHOST 3
26	#define PACKET_OUTGOING 4
27	#define PACKET_LOOPBACK 5
28	#define PACKET_FASTROUTE 6
29
30	#define PACKET_ADD_MEMBERSHIP 1
31	#define PACKET_DROP_MEMBERSHIP 2
32	#define PACKET_RECV_OUTPUT 3
33	#define PACKET_RX_RING 5
34	#define PACKET_STATISTICS 6
35	#define PACKET_COPY_THRESH 7
36	#define PACKET_AUXDATA 8
37	#define PACKET_ORIGDEV 9
38	#define PACKET_VERSION 10
39	#define PACKET_HDRLEN 11
40	#define PACKET_RESERVE 12
41	#define PACKET_TX_RING 13
42	#define PACKET_LOSS 14
43	#define PACKET_VNET_HDR 15
44	#define PACKET_TX_TIMESTAMP 16
45	#define PACKET_TIMESTAMP 17
46	#define PACKET_FANOUT 18
47	#define PACKET_TX_HAS_OFF 19
48	#define PACKET_QDISC_BYPASS 20
49	#define PACKET_ROLLOVER_STATS 21
50	#define PACKET_FANOUT_DATA 22
51	#define PACKET_IGNORE_OUTGOING 23
52
53	#define PACKET_MR_MULTICAST 0
54	#define PACKET_MR_PROMISC 1
55	#define PACKET_MR_ALLMULTI 2
56	#define PACKET_MR_UNICAST 3
57
58	#ifdef __cplusplus
59	}
60	#endif
61
62	#endif

lib/libc/wasi/libc-top-half/musl/include/nl_types.h deleted-22

...	@@ -1,22 +0,0 @@
1	#ifndef _NL_TYPES_H
2	#define _NL_TYPES_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#define NL_SETD 1
9	#define NL_CAT_LOCALE 1
10
11	typedef int nl_item;
12	typedef void *nl_catd;
13
14	nl_catd catopen (const char *, int);
15	char catgets (nl_catd, int, int, const char );
16	int catclose (nl_catd);
17
18	#ifdef __cplusplus
19	}
20	#endif
21
22	#endif

lib/libc/wasi/libc-top-half/musl/include/regex.h deleted-62

...	@@ -1,62 +0,0 @@
1	#ifndef _REGEX_H
2	#define _REGEX_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9
10	#define __NEED_regoff_t
11	#define __NEED_size_t
12
13	#include <bits/alltypes.h>
14
15	typedef struct re_pattern_buffer {
16	size_t re_nsub;
17	void __opaque, __padding[4];
18	size_t __nsub2;
19	char __padding2;
20	} regex_t;
21
22	typedef struct {
23	regoff_t rm_so;
24	regoff_t rm_eo;
25	} regmatch_t;
26
27	#define REG_EXTENDED 1
28	#define REG_ICASE 2
29	#define REG_NEWLINE 4
30	#define REG_NOSUB 8
31
32	#define REG_NOTBOL 1
33	#define REG_NOTEOL 2
34
35	#define REG_OK 0
36	#define REG_NOMATCH 1
37	#define REG_BADPAT 2
38	#define REG_ECOLLATE 3
39	#define REG_ECTYPE 4
40	#define REG_EESCAPE 5
41	#define REG_ESUBREG 6
42	#define REG_EBRACK 7
43	#define REG_EPAREN 8
44	#define REG_EBRACE 9
45	#define REG_BADBR 10
46	#define REG_ERANGE 11
47	#define REG_ESPACE 12
48	#define REG_BADRPT 13
49
50	#define REG_ENOSYS -1
51
52	int regcomp(regex_t __restrict, const char __restrict, int);
53	int regexec(const regex_t __restrict, const char __restrict, size_t, regmatch_t *__restrict, int);
54	void regfree(regex_t *);
55
56	size_t regerror(int, const regex_t __restrict, char __restrict, size_t);
57
58	#ifdef __cplusplus
59	}
60	#endif
61
62	#endif

lib/libc/wasi/libc-top-half/musl/include/search.h deleted-63

...	@@ -1,63 +0,0 @@
1	#ifndef _SEARCH_H
2	#define _SEARCH_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9
10	#define __NEED_size_t
11	#include <bits/alltypes.h>
12
13	typedef enum { FIND, ENTER } ACTION;
14	typedef enum { preorder, postorder, endorder, leaf } VISIT;
15
16	typedef struct entry {
17	char *key;
18	void *data;
19	} ENTRY;
20
21	int hcreate(size_t);
22	void hdestroy(void);
23	ENTRY *hsearch(ENTRY, ACTION);
24
25	#ifdef _GNU_SOURCE
26	struct hsearch_data {
27	struct __tab *__tab;
28	unsigned int __unused1;
29	unsigned int __unused2;
30	};
31
32	int hcreate_r(size_t, struct hsearch_data *);
33	void hdestroy_r(struct hsearch_data *);
34	int hsearch_r(ENTRY, ACTION, ENTRY *, struct hsearch_data );
35	#endif
36
37	void insque(void , void );
38	void remque(void *);
39
40	void lsearch(const void , void , size_t , size_t,
41	int ()(const void , const void *));
42	void lfind(const void , const void , size_t , size_t,
43	int ()(const void , const void *));
44
45	void tdelete(const void __restrict, void *__restrict, int()(const void , const void ));
46	void tfind(const void , void const , int()(const void , const void *));
47	void tsearch(const void , void *, int ()(const void , const void ));
48	void twalk(const void , void ()(const void *, VISIT, int));
49
50	#ifdef _GNU_SOURCE
51	struct qelem {
52	struct qelem q_forw, q_back;
53	char q_data[1];
54	};
55
56	void tdestroy(void , void ()(void *));
57	#endif
58
59	#ifdef __cplusplus
60	}
61	#endif
62
63	#endif

lib/libc/wasi/libc-top-half/musl/include/semaphore.h deleted-39

...	@@ -1,39 +0,0 @@
1	#ifndef _SEMAPHORE_H
2	#define _SEMAPHORE_H
3	#ifdef __cplusplus
4	extern "C" {
5	#endif
6
7	#include <features.h>
8
9	#define __NEED_time_t
10	#define __NEED_struct_timespec
11	#include <bits/alltypes.h>
12
13	#include <fcntl.h>
14
15	#define SEM_FAILED ((sem_t *)0)
16
17	typedef struct {
18	volatile int __val[4*sizeof(long)/sizeof(int)];
19	} sem_t;
20
21	int sem_close(sem_t *);
22	int sem_destroy(sem_t *);
23	int sem_getvalue(sem_t __restrict, int __restrict);
24	int sem_init(sem_t *, int, unsigned);
25	sem_t sem_open(const char , int, ...);
26	int sem_post(sem_t *);
27	int sem_timedwait(sem_t __restrict, const struct timespec __restrict);
28	int sem_trywait(sem_t *);
29	int sem_unlink(const char *);
30	int sem_wait(sem_t *);
31
32	#if _REDIR_TIME64
33	__REDIR(sem_timedwait, __sem_timedwait_time64);
34	#endif
35
36	#ifdef __cplusplus
37	}
38	#endif
39	#endif

lib/libc/wasi/libc-top-half/musl/include/stdalign.h deleted-20

...	@@ -1,20 +0,0 @@
1	#ifndef _STDALIGN_H
2	#define _STDALIGN_H
3
4	#ifndef __cplusplus
5
6	/* this whole header only works in C11 or with compiler extensions */
7	#if __STDC_VERSION__ < 201112L && defined( __GNUC__)
8	#define _Alignas(t) __attribute__((__aligned__(t)))
9	#define _Alignof(t) __alignof__(t)
10	#endif
11
12	#define alignas _Alignas
13	#define alignof _Alignof
14
15	#endif
16
17	#define __alignas_is_defined 1
18	#define __alignof_is_defined 1
19
20	#endif

lib/libc/wasi/libc-top-half/musl/include/stdbool.h deleted-14

...	@@ -1,14 +0,0 @@
1	#ifndef _STDBOOL_H
2	#define _STDBOOL_H
3
4	#ifndef __cplusplus
5
6	#define true 1
7	#define false 0
8	#define bool _Bool
9
10	#endif
11
12	#define __bool_true_false_are_defined 1
13
14	#endif

lib/libc/wasi/libc-top-half/musl/include/stdint.h deleted-117

...	@@ -1,117 +0,0 @@
1	#ifndef _STDINT_H
2	#define _STDINT_H
3
4	#define __NEED_int8_t
5	#define __NEED_int16_t
6	#define __NEED_int32_t
7	#define __NEED_int64_t
8
9	#define __NEED_uint8_t
10	#define __NEED_uint16_t
11	#define __NEED_uint32_t
12	#define __NEED_uint64_t
13
14	#define __NEED_intptr_t
15	#define __NEED_uintptr_t
16
17	#define __NEED_intmax_t
18	#define __NEED_uintmax_t
19
20	#include <bits/alltypes.h>
21
22	typedef int8_t int_fast8_t;
23	typedef int64_t int_fast64_t;
24
25	typedef int8_t int_least8_t;
26	typedef int16_t int_least16_t;
27	typedef int32_t int_least32_t;
28	typedef int64_t int_least64_t;
29
30	typedef uint8_t uint_fast8_t;
31	typedef uint64_t uint_fast64_t;
32
33	typedef uint8_t uint_least8_t;
34	typedef uint16_t uint_least16_t;
35	typedef uint32_t uint_least32_t;
36	typedef uint64_t uint_least64_t;
37
38	#define INT8_MIN (-1-0x7f)
39	#define INT16_MIN (-1-0x7fff)
40	#define INT32_MIN (-1-0x7fffffff)
41	#define INT64_MIN (-1-0x7fffffffffffffff)
42
43	#define INT8_MAX (0x7f)
44	#define INT16_MAX (0x7fff)
45	#define INT32_MAX (0x7fffffff)
46	#define INT64_MAX (0x7fffffffffffffff)
47
48	#define UINT8_MAX (0xff)
49	#define UINT16_MAX (0xffff)
50	#define UINT32_MAX (0xffffffffu)
51	#define UINT64_MAX (0xffffffffffffffffu)
52
53	#define INT_FAST8_MIN INT8_MIN
54	#define INT_FAST64_MIN INT64_MIN
55
56	#define INT_LEAST8_MIN INT8_MIN
57	#define INT_LEAST16_MIN INT16_MIN
58	#define INT_LEAST32_MIN INT32_MIN
59	#define INT_LEAST64_MIN INT64_MIN
60
61	#define INT_FAST8_MAX INT8_MAX
62	#define INT_FAST64_MAX INT64_MAX
63
64	#define INT_LEAST8_MAX INT8_MAX
65	#define INT_LEAST16_MAX INT16_MAX
66	#define INT_LEAST32_MAX INT32_MAX
67	#define INT_LEAST64_MAX INT64_MAX
68
69	#define UINT_FAST8_MAX UINT8_MAX
70	#define UINT_FAST64_MAX UINT64_MAX
71
72	#define UINT_LEAST8_MAX UINT8_MAX
73	#define UINT_LEAST16_MAX UINT16_MAX
74	#define UINT_LEAST32_MAX UINT32_MAX
75	#define UINT_LEAST64_MAX UINT64_MAX
76
77	#define INTMAX_MIN INT64_MIN
78	#define INTMAX_MAX INT64_MAX
79	#define UINTMAX_MAX UINT64_MAX
80
81	#define WINT_MIN 0U
82	#define WINT_MAX UINT32_MAX
83
84	#if L'\0'-1 > 0
85	#define WCHAR_MAX (0xffffffffu+L'\0')
86	#define WCHAR_MIN (0+L'\0')
87	#else
88	#define WCHAR_MAX (0x7fffffff+L'\0')
89	#define WCHAR_MIN (-1-0x7fffffff+L'\0')
90	#endif
91
92	#define SIG_ATOMIC_MIN INT32_MIN
93	#define SIG_ATOMIC_MAX INT32_MAX
94
95	#include <bits/stdint.h>
96
97	#define INT8_C(c) c
98	#define INT16_C(c) c
99	#define INT32_C(c) c
100
101	#define UINT8_C(c) c
102	#define UINT16_C(c) c
103	#define UINT32_C(c) c ## U
104
105	#if UINTPTR_MAX == UINT64_MAX
106	#define INT64_C(c) c ## L
107	#define UINT64_C(c) c ## UL
108	#define INTMAX_C(c) c ## L
109	#define UINTMAX_C(c) c ## UL
110	#else
111	#define INT64_C(c) c ## LL
112	#define UINT64_C(c) c ## ULL
113	#define INTMAX_C(c) c ## LL
114	#define UINTMAX_C(c) c ## ULL
115	#endif
116
117	#endif

lib/libc/wasi/libc-top-half/musl/include/stdio_ext.h deleted-34

...	@@ -1,34 +0,0 @@
1	#ifndef _STDIO_EXT_H
2	#define _STDIO_EXT_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <stdio.h>
9
10	#define FSETLOCKING_QUERY 0
11	#define FSETLOCKING_INTERNAL 1
12	#define FSETLOCKING_BYCALLER 2
13
14	void _flushlbf(void);
15	int __fsetlocking(FILE *, int);
16	int __fwriting(FILE *);
17	int __freading(FILE *);
18	int __freadable(FILE *);
19	int __fwritable(FILE *);
20	int __flbf(FILE *);
21	size_t __fbufsize(FILE *);
22	size_t __fpending(FILE *);
23	int __fpurge(FILE *);
24
25	size_t __freadahead(FILE *);
26	const char __freadptr(FILE , size_t *);
27	void __freadptrinc(FILE *, size_t);
28	void __fseterr(FILE *);
29
30	#ifdef __cplusplus
31	}
32	#endif
33
34	#endif

lib/libc/wasi/libc-top-half/musl/include/stdnoreturn.h deleted-7

...	@@ -1,7 +0,0 @@
1	#ifndef _STDNORETURN_H
2	#define _STDNORETURN_H
3	#ifndef __cplusplus
4	#include <features.h>
5	#define noreturn _Noreturn
6	#endif
7	#endif

lib/libc/wasi/libc-top-half/musl/include/stropts.h deleted-139

...	@@ -1,139 +0,0 @@
1	#ifndef _STROPTS_H
2	#define _STROPTS_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#define __SID ('S' << 8)
9
10	#define I_NREAD (__SID \| 1)
11	#define I_PUSH (__SID \| 2)
12	#define I_POP (__SID \| 3)
13	#define I_LOOK (__SID \| 4)
14	#define I_FLUSH (__SID \| 5)
15	#define I_SRDOPT (__SID \| 6)
16	#define I_GRDOPT (__SID \| 7)
17	#define I_STR (__SID \| 8)
18	#define I_SETSIG (__SID \| 9)
19	#define I_GETSIG (__SID \|10)
20	#define I_FIND (__SID \|11)
21	#define I_LINK (__SID \|12)
22	#define I_UNLINK (__SID \|13)
23	#define I_PEEK (__SID \|15)
24	#define I_FDINSERT (__SID \|16)
25	#define I_SENDFD (__SID \|17)
26	#define I_RECVFD (__SID \|14)
27	#define I_SWROPT (__SID \|19)
28	#define I_GWROPT (__SID \|20)
29	#define I_LIST (__SID \|21)
30	#define I_PLINK (__SID \|22)
31	#define I_PUNLINK (__SID \|23)
32	#define I_FLUSHBAND (__SID \|28)
33	#define I_CKBAND (__SID \|29)
34	#define I_GETBAND (__SID \|30)
35	#define I_ATMARK (__SID \|31)
36	#define I_SETCLTIME (__SID \|32)
37	#define I_GETCLTIME (__SID \|33)
38	#define I_CANPUT (__SID \|34)
39
40	#define FMNAMESZ 8
41
42	#define FLUSHR 0x01
43	#define FLUSHW 0x02
44	#define FLUSHRW 0x03
45	#define FLUSHBAND 0x04
46
47	#define S_INPUT 0x0001
48	#define S_HIPRI 0x0002
49	#define S_OUTPUT 0x0004
50	#define S_MSG 0x0008
51	#define S_ERROR 0x0010
52	#define S_HANGUP 0x0020
53	#define S_RDNORM 0x0040
54	#define S_WRNORM S_OUTPUT
55	#define S_RDBAND 0x0080
56	#define S_WRBAND 0x0100
57	#define S_BANDURG 0x0200
58
59	#define RS_HIPRI 0x01
60
61	#define RNORM 0x0000
62	#define RMSGD 0x0001
63	#define RMSGN 0x0002
64	#define RPROTDAT 0x0004
65	#define RPROTDIS 0x0008
66	#define RPROTNORM 0x0010
67	#define RPROTMASK 0x001C
68
69	#define SNDZERO 0x001
70	#define SNDPIPE 0x002
71
72	#define ANYMARK 0x01
73	#define LASTMARK 0x02
74
75	#define MUXID_ALL (-1)
76
77	#define MSG_HIPRI 0x01
78	#define MSG_ANY 0x02
79	#define MSG_BAND 0x04
80
81	#define MORECTL 1
82	#define MOREDATA 2
83
84	struct bandinfo {
85	unsigned char bi_pri;
86	int bi_flag;
87	};
88
89	struct strbuf {
90	int maxlen;
91	int len;
92	char *buf;
93	};
94
95	struct strpeek {
96	struct strbuf ctlbuf;
97	struct strbuf databuf;
98	unsigned flags;
99	};
100
101	struct strfdinsert {
102	struct strbuf ctlbuf;
103	struct strbuf databuf;
104	unsigned flags;
105	int fildes;
106	int offset;
107	};
108
109	struct strioctl {
110	int ic_cmd;
111	int ic_timout;
112	int ic_len;
113	char *ic_dp;
114	};
115
116	struct strrecvfd {
117	int fd;
118	int uid;
119	int gid;
120	char __fill[8];
121	};
122
123	struct str_mlist {
124	char l_name[FMNAMESZ + 1];
125	};
126
127	struct str_list {
128	int sl_nmods;
129	struct str_mlist *sl_modlist;
130	};
131
132	int isastream(int);
133	int ioctl(int, int, ...);
134
135	#ifdef __cplusplus
136	}
137	#endif
138
139	#endif

lib/libc/wasi/libc-top-half/musl/include/sys/dir.h deleted-2

...	@@ -1,2 +0,0 @@
1	#include <dirent.h>
2	#define direct dirent

lib/libc/wasi/libc-top-half/musl/include/sys/errno.h deleted-2

...	@@ -1,2 +0,0 @@
1	#warning redirecting incorrect #include <sys/errno.h> to <errno.h>
2	#include <errno.h>

lib/libc/wasi/libc-top-half/musl/include/sys/eventfd.h deleted-26

...	@@ -1,26 +0,0 @@
1	#ifndef _SYS_EVENTFD_H
2	#define _SYS_EVENTFD_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <stdint.h>
9	#include <fcntl.h>
10
11	typedef uint64_t eventfd_t;
12
13	#define EFD_SEMAPHORE 1
14	#define EFD_CLOEXEC O_CLOEXEC
15	#define EFD_NONBLOCK O_NONBLOCK
16
17	int eventfd(unsigned int, int);
18	int eventfd_read(int, eventfd_t *);
19	int eventfd_write(int, eventfd_t);
20
21
22	#ifdef __cplusplus
23	}
24	#endif
25
26	#endif /* sys/eventfd.h */

lib/libc/wasi/libc-top-half/musl/include/sys/fcntl.h deleted-2

...	@@ -1,2 +0,0 @@
1	#warning redirecting incorrect #include <sys/fcntl.h> to <fcntl.h>
2	#include <fcntl.h>

lib/libc/wasi/libc-top-half/musl/include/sys/file.h deleted-21

...	@@ -1,21 +0,0 @@
1	#ifndef _SYS_FILE_H
2	#define _SYS_FILE_H
3	#ifdef __cplusplus
4	extern "C" {
5	#endif
6
7	#define LOCK_SH 1
8	#define LOCK_EX 2
9	#define LOCK_NB 4
10	#define LOCK_UN 8
11
12	#define L_SET 0
13	#define L_INCR 1
14	#define L_XTND 2
15
16	int flock(int, int);
17
18	#ifdef __cplusplus
19	}
20	#endif
21	#endif

lib/libc/wasi/libc-top-half/musl/include/sys/poll.h deleted-2

...	@@ -1,2 +0,0 @@
1	#warning redirecting incorrect #include <sys/poll.h> to <poll.h>
2	#include <poll.h>

lib/libc/wasi/libc-top-half/musl/include/sys/reg.h deleted-9

...	@@ -1,9 +0,0 @@
1	#ifndef _SYS_REG_H
2	#define _SYS_REG_H
3
4	#include <limits.h>
5	#include <unistd.h>
6
7	#include <bits/reg.h>
8
9	#endif

lib/libc/wasi/libc-top-half/musl/include/sys/signal.h deleted-2

...	@@ -1,2 +0,0 @@
1	#warning redirecting incorrect #include <sys/signal.h> to <signal.h>
2	#include <signal.h>

lib/libc/wasi/libc-top-half/musl/include/sys/stropts.h deleted-1

...	@@ -1 +0,0 @@
1	#include <stropts.h>

lib/libc/wasi/libc-top-half/musl/include/sys/sysinfo.h deleted-36

...	@@ -1,36 +0,0 @@
1	#ifndef _SYS_SYSINFO_H
2	#define _SYS_SYSINFO_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#define SI_LOAD_SHIFT 16
9
10	struct sysinfo {
11	unsigned long uptime;
12	unsigned long loads[3];
13	unsigned long totalram;
14	unsigned long freeram;
15	unsigned long sharedram;
16	unsigned long bufferram;
17	unsigned long totalswap;
18	unsigned long freeswap;
19	unsigned short procs, pad;
20	unsigned long totalhigh;
21	unsigned long freehigh;
22	unsigned mem_unit;
23	char __reserved[256];
24	};
25
26	int sysinfo (struct sysinfo *);
27	int get_nprocs_conf (void);
28	int get_nprocs (void);
29	long get_phys_pages (void);
30	long get_avphys_pages (void);
31
32	#ifdef __cplusplus
33	}
34	#endif
35
36	#endif

lib/libc/wasi/libc-top-half/musl/include/sys/timeb.h deleted-28

...	@@ -1,28 +0,0 @@
1	#ifndef _SYS_TIMEB_H
2	#define _SYS_TIMEB_H
3	#ifdef __cplusplus
4	extern "C" {
5	#endif
6
7	#include <features.h>
8
9	#define __NEED_time_t
10
11	#include <bits/alltypes.h>
12
13	struct timeb {
14	time_t time;
15	unsigned short millitm;
16	short timezone, dstflag;
17	};
18
19	int ftime(struct timeb *);
20
21	#if _REDIR_TIME64
22	__REDIR(ftime, __ftime64);
23	#endif
24
25	#ifdef __cplusplus
26	}
27	#endif
28	#endif

lib/libc/wasi/libc-top-half/musl/include/sys/timex.h deleted-103

...	@@ -1,103 +0,0 @@
1	#ifndef _SYS_TIMEX_H
2	#define _SYS_TIMEX_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#define __NEED_clockid_t
9
10	#include <bits/alltypes.h>
11
12	#include <sys/time.h>
13
14	struct ntptimeval {
15	struct timeval time;
16	long maxerror, esterror;
17	};
18
19	struct timex {
20	unsigned modes;
21	long offset, freq, maxerror, esterror;
22	int status;
23	long constant, precision, tolerance;
24	struct timeval time;
25	long tick, ppsfreq, jitter;
26	int shift;
27	long stabil, jitcnt, calcnt, errcnt, stbcnt;
28	int tai;
29	int __padding[11];
30	};
31
32	#define ADJ_OFFSET 0x0001
33	#define ADJ_FREQUENCY 0x0002
34	#define ADJ_MAXERROR 0x0004
35	#define ADJ_ESTERROR 0x0008
36	#define ADJ_STATUS 0x0010
37	#define ADJ_TIMECONST 0x0020
38	#define ADJ_TAI 0x0080
39	#define ADJ_SETOFFSET 0x0100
40	#define ADJ_MICRO 0x1000
41	#define ADJ_NANO 0x2000
42	#define ADJ_TICK 0x4000
43	#define ADJ_OFFSET_SINGLESHOT 0x8001
44	#define ADJ_OFFSET_SS_READ 0xa001
45
46	#define MOD_OFFSET ADJ_OFFSET
47	#define MOD_FREQUENCY ADJ_FREQUENCY
48	#define MOD_MAXERROR ADJ_MAXERROR
49	#define MOD_ESTERROR ADJ_ESTERROR
50	#define MOD_STATUS ADJ_STATUS
51	#define MOD_TIMECONST ADJ_TIMECONST
52	#define MOD_CLKB ADJ_TICK
53	#define MOD_CLKA ADJ_OFFSET_SINGLESHOT
54	#define MOD_TAI ADJ_TAI
55	#define MOD_MICRO ADJ_MICRO
56	#define MOD_NANO ADJ_NANO
57
58	#define STA_PLL 0x0001
59	#define STA_PPSFREQ 0x0002
60	#define STA_PPSTIME 0x0004
61	#define STA_FLL 0x0008
62
63	#define STA_INS 0x0010
64	#define STA_DEL 0x0020
65	#define STA_UNSYNC 0x0040
66	#define STA_FREQHOLD 0x0080
67
68	#define STA_PPSSIGNAL 0x0100
69	#define STA_PPSJITTER 0x0200
70	#define STA_PPSWANDER 0x0400
71	#define STA_PPSERROR 0x0800
72
73	#define STA_CLOCKERR 0x1000
74	#define STA_NANO 0x2000
75	#define STA_MODE 0x4000
76	#define STA_CLK 0x8000
77
78	#define STA_RONLY (STA_PPSSIGNAL \| STA_PPSJITTER \| STA_PPSWANDER \| \
79	STA_PPSERROR \| STA_CLOCKERR \| STA_NANO \| STA_MODE \| STA_CLK)
80
81	#define TIME_OK 0
82	#define TIME_INS 1
83	#define TIME_DEL 2
84	#define TIME_OOP 3
85	#define TIME_WAIT 4
86	#define TIME_ERROR 5
87	#define TIME_BAD TIME_ERROR
88
89	#define MAXTC 6
90
91	int adjtimex(struct timex *);
92	int clock_adjtime(clockid_t, struct timex *);
93
94	#if _REDIR_TIME64
95	__REDIR(adjtimex, __adjtimex_time64);
96	__REDIR(clock_adjtime, __clock_adjtime64);
97	#endif
98
99	#ifdef __cplusplus
100	}
101	#endif
102
103	#endif

lib/libc/wasi/libc-top-half/musl/include/sys/ttydefaults.h deleted-34

...	@@ -1,34 +0,0 @@
1	#ifndef _SYS_TTYDEFAULTS_H
2	#define _SYS_TTYDEFAULTS_H
3
4	#define TTYDEF_IFLAG (BRKINT \| ISTRIP \| ICRNL \| IMAXBEL \| IXON \| IXANY)
5	#define TTYDEF_OFLAG (OPOST \| ONLCR \| XTABS)
6	#define TTYDEF_LFLAG (ECHO \| ICANON \| ISIG \| IEXTEN \| ECHOE\|ECHOKE\|ECHOCTL)
7	#define TTYDEF_CFLAG (CREAD \| CS7 \| PARENB \| HUPCL)
8	#define TTYDEF_SPEED (B9600)
9	#define CTRL(x) ((x)&037)
10	#define CEOF CTRL('d')
11
12	#define CEOL '\0'
13	#define CSTATUS '\0'
14
15	#define CERASE 0177
16	#define CINTR CTRL('c')
17	#define CKILL CTRL('u')
18	#define CMIN 1
19	#define CQUIT 034
20	#define CSUSP CTRL('z')
21	#define CTIME 0
22	#define CDSUSP CTRL('y')
23	#define CSTART CTRL('q')
24	#define CSTOP CTRL('s')
25	#define CLNEXT CTRL('v')
26	#define CDISCARD CTRL('o')
27	#define CWERASE CTRL('w')
28	#define CREPRINT CTRL('r')
29	#define CEOT CEOF
30	#define CBRK CEOL
31	#define CRPRNT CREPRINT
32	#define CFLUSH CDISCARD
33
34	#endif

lib/libc/wasi/libc-top-half/musl/include/sys/utsname.h deleted-29

...	@@ -1,29 +0,0 @@
1	#ifndef _SYS_UTSNAME_H
2	#define _SYS_UTSNAME_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9
10	struct utsname {
11	char sysname[65];
12	char nodename[65];
13	char release[65];
14	char version[65];
15	char machine[65];
16	#ifdef _GNU_SOURCE
17	char domainname[65];
18	#else
19	char __domainname[65];
20	#endif
21	};
22
23	int uname (struct utsname *);
24
25	#ifdef __cplusplus
26	}
27	#endif
28
29	#endif

lib/libc/wasi/libc-top-half/musl/include/syscall.h deleted-1

...	@@ -1 +0,0 @@
1	#include <sys/syscall.h>

lib/libc/wasi/libc-top-half/musl/include/sysexits.h deleted-21

...	@@ -1,21 +0,0 @@
1	#ifndef _SYSEXITS_H
2	#define _SYSEXITS_H
3	#define EX_OK 0
4	#define EX__BASE 64
5	#define EX_USAGE 64
6	#define EX_DATAERR 65
7	#define EX_NOINPUT 66
8	#define EX_NOUSER 67
9	#define EX_NOHOST 68
10	#define EX_UNAVAILABLE 69
11	#define EX_SOFTWARE 70
12	#define EX_OSERR 71
13	#define EX_OSFILE 72
14	#define EX_CANTCREAT 73
15	#define EX_IOERR 74
16	#define EX_TEMPFAIL 75
17	#define EX_PROTOCOL 76
18	#define EX_NOPERM 77
19	#define EX_CONFIG 78
20	#define EX__MAX 78
21	#endif

lib/libc/wasi/libc-top-half/musl/include/tar.h deleted-33

...	@@ -1,33 +0,0 @@
1	#ifndef _TAR_H
2	#define _TAR_H
3
4	#define TSUID 04000
5	#define TSGID 02000
6	#define TSVTX 01000
7	#define TUREAD 00400
8	#define TUWRITE 00200
9	#define TUEXEC 00100
10	#define TGREAD 00040
11	#define TGWRITE 00020
12	#define TGEXEC 00010
13	#define TOREAD 00004
14	#define TOWRITE 00002
15	#define TOEXEC 00001
16
17	#define REGTYPE '0'
18	#define AREGTYPE '\0'
19	#define LNKTYPE '1'
20	#define SYMTYPE '2'
21	#define CHRTYPE '3'
22	#define BLKTYPE '4'
23	#define DIRTYPE '5'
24	#define FIFOTYPE '6'
25	#define CONTTYPE '7'
26
27	#define TMAGIC "ustar"
28	#define TMAGLEN 6
29
30	#define TVERSION "00"
31	#define TVERSLEN 2
32
33	#endif

lib/libc/wasi/libc-top-half/musl/include/tgmath.h deleted-270

...	@@ -1,270 +0,0 @@
1	#ifndef _TGMATH_H
2	#define _TGMATH_H
3
4	/*
5	the return types are only correct with gcc (__GNUC__)
6	otherwise they are long double or long double complex
7
8	the long double version of a function is never chosen when
9	sizeof(double) == sizeof(long double)
10	(but the return type is set correctly with gcc)
11	*/
12
13	#include <math.h>
14	#include <complex.h>
15
16	#define __IS_FP(x) (sizeof((x)+1ULL) == sizeof((x)+1.0f))
17	#define __IS_CX(x) (__IS_FP(x) && sizeof(x) == sizeof((x)+I))
18	#define __IS_REAL(x) (__IS_FP(x) && 2*sizeof(x) == sizeof((x)+I))
19
20	#define __FLT(x) (__IS_REAL(x) && sizeof(x) == sizeof(float))
21	#define __LDBL(x) (__IS_REAL(x) && sizeof(x) == sizeof(long double) && sizeof(long double) != sizeof(double))
22
23	#define __FLTCX(x) (__IS_CX(x) && sizeof(x) == sizeof(float complex))
24	#define __DBLCX(x) (__IS_CX(x) && sizeof(x) == sizeof(double complex))
25	#define __LDBLCX(x) (__IS_CX(x) && sizeof(x) == sizeof(long double complex) && sizeof(long double) != sizeof(double))
26
27	/* return type */
28
29	#ifdef __GNUC__
30	/*
31	the result must be casted to the right type
32	(otherwise the result type is determined by the conversion
33	rules applied to all the function return types so it is long
34	double or long double complex except for integral functions)
35
36	this cannot be done in c99, so the typeof gcc extension is
37	used and that the type of ?: depends on wether an operand is
38	a null pointer constant or not
39	(in c11 _Generic can be used)
40
41	the c arguments below must be integer constant expressions
42	so they can be in null pointer constants
43	(__IS_FP above was carefully chosen this way)
44	*/
45	/* if c then t else void */
46	#define __type1(c,t) __typeof__((0?(t)0:(void*)!(c)))
47	/* if c then t1 else t2 */
48	#define __type2(c,t1,t2) __typeof__((0?(__type1(c,t1))0:(__type1(!(c),t2)*)0))
49	/* cast to double when x is integral, otherwise use typeof(x) */
50	#define __RETCAST(x) ( \
51	__type2(__IS_FP(x), __typeof__(x), double))
52	/* 2 args case, should work for complex types (cpow) */
53	#define __RETCAST_2(x, y) ( \
54	__type2(__IS_FP(x) && __IS_FP(y), \
55	__typeof__((x)+(y)), \
56	__typeof__((x)+(y)+1.0)))
57	/* 3 args case (fma only) */
58	#define __RETCAST_3(x, y, z) ( \
59	__type2(__IS_FP(x) && __IS_FP(y) && __IS_FP(z), \
60	__typeof__((x)+(y)+(z)), \
61	__typeof__((x)+(y)+(z)+1.0)))
62	/* drop complex from the type of x */
63	/* TODO: wrong when sizeof(long double)==sizeof(double) */
64	#define __RETCAST_REAL(x) ( \
65	__type2(__IS_FP(x) && sizeof((x)+I) == sizeof(float complex), float, \
66	__type2(sizeof((x)+1.0+I) == sizeof(double complex), double, \
67	long double)))
68	/* add complex to the type of x */
69	#define __RETCAST_CX(x) (__typeof__(__RETCAST(x)0+I))
70	#else
71	#define __RETCAST(x)
72	#define __RETCAST_2(x, y)
73	#define __RETCAST_3(x, y, z)
74	#define __RETCAST_REAL(x)
75	#define __RETCAST_CX(x)
76	#endif
77
78	/* function selection */
79
80	#define __tg_real_nocast(fun, x) ( \
81	__FLT(x) ? fun ## f (x) : \
82	__LDBL(x) ? fun ## l (x) : \
83	fun(x) )
84
85	#define __tg_real(fun, x) (__RETCAST(x)__tg_real_nocast(fun, x))
86
87	#define __tg_real_2_1(fun, x, y) (__RETCAST(x)( \
88	__FLT(x) ? fun ## f (x, y) : \
89	__LDBL(x) ? fun ## l (x, y) : \
90	fun(x, y) ))
91
92	#define __tg_real_2(fun, x, y) (__RETCAST_2(x, y)( \
93	__FLT(x) && __FLT(y) ? fun ## f (x, y) : \
94	__LDBL((x)+(y)) ? fun ## l (x, y) : \
95	fun(x, y) ))
96
97	#define __tg_complex(fun, x) (__RETCAST_CX(x)( \
98	__FLTCX((x)+I) && __IS_FP(x) ? fun ## f (x) : \
99	__LDBLCX((x)+I) ? fun ## l (x) : \
100	fun(x) ))
101
102	#define __tg_complex_retreal(fun, x) (__RETCAST_REAL(x)( \
103	__FLTCX((x)+I) && __IS_FP(x) ? fun ## f (x) : \
104	__LDBLCX((x)+I) ? fun ## l (x) : \
105	fun(x) ))
106
107	#define __tg_real_complex(fun, x) (__RETCAST(x)( \
108	__FLTCX(x) ? c ## fun ## f (x) : \
109	__DBLCX(x) ? c ## fun (x) : \
110	__LDBLCX(x) ? c ## fun ## l (x) : \
111	__FLT(x) ? fun ## f (x) : \
112	__LDBL(x) ? fun ## l (x) : \
113	fun(x) ))
114
115	/* special cases */
116
117	#define __tg_real_remquo(x, y, z) (__RETCAST_2(x, y)( \
118	__FLT(x) && __FLT(y) ? remquof(x, y, z) : \
119	__LDBL((x)+(y)) ? remquol(x, y, z) : \
120	remquo(x, y, z) ))
121
122	#define __tg_real_fma(x, y, z) (__RETCAST_3(x, y, z)( \
123	__FLT(x) && __FLT(y) && __FLT(z) ? fmaf(x, y, z) : \
124	__LDBL((x)+(y)+(z)) ? fmal(x, y, z) : \
125	fma(x, y, z) ))
126
127	#define __tg_real_complex_pow(x, y) (__RETCAST_2(x, y)( \
128	__FLTCX((x)+(y)) && __IS_FP(x) && __IS_FP(y) ? cpowf(x, y) : \
129	__FLTCX((x)+(y)) ? cpow(x, y) : \
130	__DBLCX((x)+(y)) ? cpow(x, y) : \
131	__LDBLCX((x)+(y)) ? cpowl(x, y) : \
132	__FLT(x) && __FLT(y) ? powf(x, y) : \
133	__LDBL((x)+(y)) ? powl(x, y) : \
134	pow(x, y) ))
135
136	#define __tg_real_complex_fabs(x) (__RETCAST_REAL(x)( \
137	__FLTCX(x) ? cabsf(x) : \
138	__DBLCX(x) ? cabs(x) : \
139	__LDBLCX(x) ? cabsl(x) : \
140	__FLT(x) ? fabsf(x) : \
141	__LDBL(x) ? fabsl(x) : \
142	fabs(x) ))
143
144	/* suppress any macros in math.h or complex.h */
145
146	#undef acos
147	#undef acosh
148	#undef asin
149	#undef asinh
150	#undef atan
151	#undef atan2
152	#undef atanh
153	#undef carg
154	#undef cbrt
155	#undef ceil
156	#undef cimag
157	#undef conj
158	#undef copysign
159	#undef cos
160	#undef cosh
161	#undef cproj
162	#undef creal
163	#undef erf
164	#undef erfc
165	#undef exp
166	#undef exp2
167	#undef expm1
168	#undef fabs
169	#undef fdim
170	#undef floor
171	#undef fma
172	#undef fmax
173	#undef fmin
174	#undef fmod
175	#undef frexp
176	#undef hypot
177	#undef ilogb
178	#undef ldexp
179	#undef lgamma
180	#undef llrint
181	#undef llround
182	#undef log
183	#undef log10
184	#undef log1p
185	#undef log2
186	#undef logb
187	#undef lrint
188	#undef lround
189	#undef nearbyint
190	#undef nextafter
191	#undef nexttoward
192	#undef pow
193	#undef remainder
194	#undef remquo
195	#undef rint
196	#undef round
197	#undef scalbln
198	#undef scalbn
199	#undef sin
200	#undef sinh
201	#undef sqrt
202	#undef tan
203	#undef tanh
204	#undef tgamma
205	#undef trunc
206
207	/* tg functions */
208
209	#define acos(x) __tg_real_complex(acos, (x))
210	#define acosh(x) __tg_real_complex(acosh, (x))
211	#define asin(x) __tg_real_complex(asin, (x))
212	#define asinh(x) __tg_real_complex(asinh, (x))
213	#define atan(x) __tg_real_complex(atan, (x))
214	#define atan2(x,y) __tg_real_2(atan2, (x), (y))
215	#define atanh(x) __tg_real_complex(atanh, (x))
216	#define carg(x) __tg_complex_retreal(carg, (x))
217	#define cbrt(x) __tg_real(cbrt, (x))
218	#define ceil(x) __tg_real(ceil, (x))
219	#define cimag(x) __tg_complex_retreal(cimag, (x))
220	#define conj(x) __tg_complex(conj, (x))
221	#define copysign(x,y) __tg_real_2(copysign, (x), (y))
222	#define cos(x) __tg_real_complex(cos, (x))
223	#define cosh(x) __tg_real_complex(cosh, (x))
224	#define cproj(x) __tg_complex(cproj, (x))
225	#define creal(x) __tg_complex_retreal(creal, (x))
226	#define erf(x) __tg_real(erf, (x))
227	#define erfc(x) __tg_real(erfc, (x))
228	#define exp(x) __tg_real_complex(exp, (x))
229	#define exp2(x) __tg_real(exp2, (x))
230	#define expm1(x) __tg_real(expm1, (x))
231	#define fabs(x) __tg_real_complex_fabs(x)
232	#define fdim(x,y) __tg_real_2(fdim, (x), (y))
233	#define floor(x) __tg_real(floor, (x))
234	#define fma(x,y,z) __tg_real_fma((x), (y), (z))
235	#define fmax(x,y) __tg_real_2(fmax, (x), (y))
236	#define fmin(x,y) __tg_real_2(fmin, (x), (y))
237	#define fmod(x,y) __tg_real_2(fmod, (x), (y))
238	#define frexp(x,y) __tg_real_2_1(frexp, (x), (y))
239	#define hypot(x,y) __tg_real_2(hypot, (x), (y))
240	#define ilogb(x) __tg_real_nocast(ilogb, (x))
241	#define ldexp(x,y) __tg_real_2_1(ldexp, (x), (y))
242	#define lgamma(x) __tg_real(lgamma, (x))
243	#define llrint(x) __tg_real_nocast(llrint, (x))
244	#define llround(x) __tg_real_nocast(llround, (x))
245	#define log(x) __tg_real_complex(log, (x))
246	#define log10(x) __tg_real(log10, (x))
247	#define log1p(x) __tg_real(log1p, (x))
248	#define log2(x) __tg_real(log2, (x))
249	#define logb(x) __tg_real(logb, (x))
250	#define lrint(x) __tg_real_nocast(lrint, (x))
251	#define lround(x) __tg_real_nocast(lround, (x))
252	#define nearbyint(x) __tg_real(nearbyint, (x))
253	#define nextafter(x,y) __tg_real_2(nextafter, (x), (y))
254	#define nexttoward(x,y) __tg_real_2(nexttoward, (x), (y))
255	#define pow(x,y) __tg_real_complex_pow((x), (y))
256	#define remainder(x,y) __tg_real_2(remainder, (x), (y))
257	#define remquo(x,y,z) __tg_real_remquo((x), (y), (z))
258	#define rint(x) __tg_real(rint, (x))
259	#define round(x) __tg_real(round, (x))
260	#define scalbln(x,y) __tg_real_2_1(scalbln, (x), (y))
261	#define scalbn(x,y) __tg_real_2_1(scalbn, (x), (y))
262	#define sin(x) __tg_real_complex(sin, (x))
263	#define sinh(x) __tg_real_complex(sinh, (x))
264	#define sqrt(x) __tg_real_complex(sqrt, (x))
265	#define tan(x) __tg_real_complex(tan, (x))
266	#define tanh(x) __tg_real_complex(tanh, (x))
267	#define tgamma(x) __tg_real(tgamma, (x))
268	#define trunc(x) __tg_real(trunc, (x))
269
270	#endif

lib/libc/wasi/libc-top-half/musl/include/threads.h deleted-93

...	@@ -1,93 +0,0 @@
1	#ifndef _THREADS_H
2	#define _THREADS_H
3
4	#include <features.h>
5	#include <time.h>
6
7	#ifdef __cplusplus
8	extern "C" {
9	typedef unsigned long thrd_t;
10	#else
11	typedef struct __pthread *thrd_t;
12	#define thread_local _Thread_local
13	#endif
14
15	typedef int once_flag;
16	typedef unsigned tss_t;
17	typedef int (thrd_start_t)(void );
18	typedef void (tss_dtor_t)(void );
19
20	#define __NEED_cnd_t
21	#define __NEED_mtx_t
22
23	#include <bits/alltypes.h>
24
25	#define TSS_DTOR_ITERATIONS 4
26
27	enum {
28	thrd_success = 0,
29	thrd_busy = 1,
30	thrd_error = 2,
31	thrd_nomem = 3,
32	thrd_timedout = 4,
33	};
34
35	enum {
36	mtx_plain = 0,
37	mtx_recursive = 1,
38	mtx_timed = 2,
39	};
40
41	#define ONCE_FLAG_INIT 0
42
43	int thrd_create(thrd_t , thrd_start_t, void );
44	_Noreturn void thrd_exit(int);
45
46	int thrd_detach(thrd_t);
47	int thrd_join(thrd_t, int *);
48
49	int thrd_sleep(const struct timespec , struct timespec );
50	void thrd_yield(void);
51
52	thrd_t thrd_current(void);
53	int thrd_equal(thrd_t, thrd_t);
54	#ifndef __cplusplus
55	#define thrd_equal(A, B) ((A) == (B))
56	#endif
57
58	void call_once(once_flag , void ()(void));
59
60	int mtx_init(mtx_t *, int);
61	void mtx_destroy(mtx_t *);
62
63	int mtx_lock(mtx_t *);
64	int mtx_timedlock(mtx_t __restrict, const struct timespec __restrict);
65	int mtx_trylock(mtx_t *);
66	int mtx_unlock(mtx_t *);
67
68	int cnd_init(cnd_t *);
69	void cnd_destroy(cnd_t *);
70
71	int cnd_broadcast(cnd_t *);
72	int cnd_signal(cnd_t *);
73
74	int cnd_timedwait(cnd_t __restrict, mtx_t __restrict, const struct timespec *__restrict);
75	int cnd_wait(cnd_t , mtx_t );
76
77	int tss_create(tss_t *, tss_dtor_t);
78	void tss_delete(tss_t);
79
80	int tss_set(tss_t, void *);
81	void *tss_get(tss_t);
82
83	#if _REDIR_TIME64
84	__REDIR(thrd_sleep, __thrd_sleep_time64);
85	__REDIR(mtx_timedlock, __mtx_timedlock_time64);
86	__REDIR(cnd_timedwait, __cnd_timedwait_time64);
87	#endif
88
89	#ifdef __cplusplus
90	}
91	#endif
92
93	#endif

lib/libc/wasi/libc-top-half/musl/include/uchar.h deleted-29

...	@@ -1,29 +0,0 @@
1	#ifndef _UCHAR_H
2	#define _UCHAR_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#if __cplusplus < 201103L
9	typedef unsigned short char16_t;
10	typedef unsigned char32_t;
11	#endif
12
13	#define __NEED_mbstate_t
14	#define __NEED_size_t
15
16	#include <features.h>
17	#include <bits/alltypes.h>
18
19	size_t c16rtomb(char __restrict, char16_t, mbstate_t __restrict);
20	size_t mbrtoc16(char16_t __restrict, const char __restrict, size_t, mbstate_t *__restrict);
21
22	size_t c32rtomb(char __restrict, char32_t, mbstate_t __restrict);
23	size_t mbrtoc32(char32_t __restrict, const char __restrict, size_t, mbstate_t *__restrict);
24
25	#ifdef __cplusplus
26	}
27	#endif
28
29	#endif

lib/libc/wasi/libc-top-half/musl/include/utime.h deleted-29

...	@@ -1,29 +0,0 @@
1	#ifndef _UTIME_H
2	#define _UTIME_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9
10	#define __NEED_time_t
11
12	#include <bits/alltypes.h>
13
14	struct utimbuf {
15	time_t actime;
16	time_t modtime;
17	};
18
19	int utime (const char , const struct utimbuf );
20
21	#if _REDIR_TIME64
22	__REDIR(utime, __utime64);
23	#endif
24
25	#ifdef __cplusplus
26	}
27	#endif
28
29	#endif

lib/libc/wasi/libc-top-half/musl/include/values.h deleted-39

...	@@ -1,39 +0,0 @@
1	#ifndef _VALUES_H
2	#define _VALUES_H
3
4	#include <limits.h>
5
6	#define CHARBITS (sizeof(char) * 8)
7	#define SHORTBITS (sizeof(short) * 8)
8	#define INTBITS (sizeof(int) * 8)
9	#define LONGBITS (sizeof(long) * 8)
10	#define PTRBITS (sizeof(char ) 8)
11	#define DOUBLEBITS (sizeof(double) * 8)
12	#define FLOATBITS (sizeof(float) * 8)
13
14	#define MINSHORT SHRT_MIN
15	#define MININT INT_MIN
16	#define MINLONG LONG_MIN
17
18	#define MAXSHORT SHRT_MAX
19	#define MAXINT INT_MAX
20	#define MAXLONG LONG_MAX
21
22	#define HIBITS MINSHORT
23	#define HIBITL MINLONG
24
25	#include <float.h>
26
27	#define MAXDOUBLE DBL_MAX
28	#undef MAXFLOAT
29	#define MAXFLOAT FLT_MAX
30	#define MINDOUBLE DBL_MIN
31	#define MINFLOAT FLT_MIN
32	#define DMINEXP DBL_MIN_EXP
33	#define FMINEXP FLT_MIN_EXP
34	#define DMAXEXP DBL_MAX_EXP
35	#define FMAXEXP FLT_MAX_EXP
36
37	#define BITSPERBYTE CHAR_BIT
38
39	#endif

lib/libc/wasi/libc-top-half/musl/include/wctype.h deleted-79

...	@@ -1,79 +0,0 @@
1	#ifndef _WCTYPE_H
2	#define _WCTYPE_H
3
4	#ifdef __cplusplus
5	extern "C" {
6	#endif
7
8	#include <features.h>
9
10	#define __NEED_wint_t
11	#define __NEED_wctype_t
12
13	#if defined(_POSIX_SOURCE) \|\| defined(_POSIX_C_SOURCE) \
14	\|\| defined(_XOPEN_SOURCE) \|\| defined(_GNU_SOURCE) \|\| defined(_BSD_SOURCE)
15	#define __NEED_locale_t
16	#endif
17
18	#include <bits/alltypes.h>
19
20	typedef const int * wctrans_t;
21
22	#undef WEOF
23	#define WEOF 0xffffffffU
24
25	#undef iswdigit
26
27	int iswalnum(wint_t);
28	int iswalpha(wint_t);
29	int iswblank(wint_t);
30	int iswcntrl(wint_t);
31	int iswdigit(wint_t);
32	int iswgraph(wint_t);
33	int iswlower(wint_t);
34	int iswprint(wint_t);
35	int iswpunct(wint_t);
36	int iswspace(wint_t);
37	int iswupper(wint_t);
38	int iswxdigit(wint_t);
39	int iswctype(wint_t, wctype_t);
40	wint_t towctrans(wint_t, wctrans_t);
41	wint_t towlower(wint_t);
42	wint_t towupper(wint_t);
43	wctrans_t wctrans(const char *);
44	wctype_t wctype(const char *);
45
46	#ifndef __cplusplus
47	#undef iswdigit
48	#define iswdigit(a) (0 ? iswdigit(a) : ((unsigned)(a)-'0') < 10)
49	#endif
50
51	#if defined(_POSIX_SOURCE) \|\| defined(_POSIX_C_SOURCE) \
52	\|\| defined(_XOPEN_SOURCE) \|\| defined(_GNU_SOURCE) \|\| defined(_BSD_SOURCE)
53
54	int iswalnum_l(wint_t, locale_t);
55	int iswalpha_l(wint_t, locale_t);
56	int iswblank_l(wint_t, locale_t);
57	int iswcntrl_l(wint_t, locale_t);
58	int iswdigit_l(wint_t, locale_t);
59	int iswgraph_l(wint_t, locale_t);
60	int iswlower_l(wint_t, locale_t);
61	int iswprint_l(wint_t, locale_t);
62	int iswpunct_l(wint_t, locale_t);
63	int iswspace_l(wint_t, locale_t);
64	int iswupper_l(wint_t, locale_t);
65	int iswxdigit_l(wint_t, locale_t);
66	int iswctype_l(wint_t, wctype_t, locale_t);
67	wint_t towlower_l(wint_t, locale_t);
68	wint_t towupper_l(wint_t, locale_t);
69	wint_t towctrans_l(wint_t, wctrans_t, locale_t);
70	wctrans_t wctrans_l(const char *, locale_t);
71	wctype_t wctype_l(const char *, locale_t);
72
73	#endif
74
75	#ifdef __cplusplus
76	}
77	#endif
78
79	#endif

lib/libc/wasi/libc-top-half/musl/src/complex/__cexp.c deleted-87

...	@@ -1,87 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/k_exp.c */
2	/*-
3	* Copyright (c) 2011 David Schultz <das@FreeBSD.ORG>
4	* All rights reserved.
5	*
6	* Redistribution and use in source and binary forms, with or without
7	* modification, are permitted provided that the following conditions
8	* are met:
9	* 1. Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.
11	* 2. Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.
14	*
15	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25	* SUCH DAMAGE.
26	*/
27
28	#include "complex_impl.h"
29
30	static const uint32_t k = 1799; /* constant for reduction */
31	static const double kln2 = 1246.97177782734161156; /* k * ln2 */
32
33	/*
34	* Compute exp(x), scaled to avoid spurious overflow. An exponent is
35	* returned separately in 'expt'.
36	*
37	* Input: ln(DBL_MAX) <= x < ln(2 * DBL_MAX / DBL_MIN_DENORM) ~= 1454.91
38	* Output: 21023 <= y < 21024
39	*/
40	static double __frexp_exp(double x, int *expt)
41	{
42	double exp_x;
43	uint32_t hx;
44
45	/*
46	* We use exp(x) = exp(x - kln2) * 2**k, carefully chosen to
47	* minimize \|exp(kln2) - 2**k\|. We also scale the exponent of
48	* exp_x to MAX_EXP so that the result can be multiplied by
49	* a tiny number without losing accuracy due to denormalization.
50	*/
51	exp_x = exp(x - kln2);
52	GET_HIGH_WORD(hx, exp_x);
53	*expt = (hx >> 20) - (0x3ff + 1023) + k;
54	SET_HIGH_WORD(exp_x, (hx & 0xfffff) \| ((0x3ff + 1023) << 20));
55	return exp_x;
56	}
57
58	/*
59	* __ldexp_cexp(x, expt) compute exp(x) * 2**expt.
60	* It is intended for large arguments (real part >= ln(DBL_MAX))
61	* where care is needed to avoid overflow.
62	*
63	* The present implementation is narrowly tailored for our hyperbolic and
64	* exponential functions. We assume expt is small (0 or -1), and the caller
65	* has filtered out very large x, for which overflow would be inevitable.
66	*/
67	double complex __ldexp_cexp(double complex z, int expt)
68	{
69	double x, y, exp_x, scale1, scale2;
70	int ex_expt, half_expt;
71
72	x = creal(z);
73	y = cimag(z);
74	exp_x = __frexp_exp(x, &ex_expt);
75	expt += ex_expt;
76
77	/*
78	* Arrange so that scale1 * scale2 == 2**expt. We use this to
79	* compensate for scalbn being horrendously slow.
80	*/
81	half_expt = expt / 2;
82	INSERT_WORDS(scale1, (0x3ff + half_expt) << 20, 0);
83	half_expt = expt - half_expt;
84	INSERT_WORDS(scale2, (0x3ff + half_expt) << 20, 0);
85
86	return CMPLX(cos(y) * exp_x * scale1 * scale2, sin(y) * exp_x * scale1 * scale2);
87	}

lib/libc/wasi/libc-top-half/musl/src/complex/__cexpf.c deleted-68

...	@@ -1,68 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/k_expf.c */
2	/*-
3	* Copyright (c) 2011 David Schultz <das@FreeBSD.ORG>
4	* All rights reserved.
5	*
6	* Redistribution and use in source and binary forms, with or without
7	* modification, are permitted provided that the following conditions
8	* are met:
9	* 1. Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.
11	* 2. Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.
14	*
15	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25	* SUCH DAMAGE.
26	*/
27
28	#include "complex_impl.h"
29
30	static const uint32_t k = 235; /* constant for reduction */
31	static const float kln2 = 162.88958740F; /* k * ln2 */
32
33	/*
34	* See __cexp.c for details.
35	*
36	* Input: ln(FLT_MAX) <= x < ln(2 * FLT_MAX / FLT_MIN_DENORM) ~= 192.7
37	* Output: 2127 <= y < 2128
38	*/
39	static float __frexp_expf(float x, int *expt)
40	{
41	float exp_x;
42	uint32_t hx;
43
44	exp_x = expf(x - kln2);
45	GET_FLOAT_WORD(hx, exp_x);
46	*expt = (hx >> 23) - (0x7f + 127) + k;
47	SET_FLOAT_WORD(exp_x, (hx & 0x7fffff) \| ((0x7f + 127) << 23));
48	return exp_x;
49	}
50
51	float complex __ldexp_cexpf(float complex z, int expt)
52	{
53	float x, y, exp_x, scale1, scale2;
54	int ex_expt, half_expt;
55
56	x = crealf(z);
57	y = cimagf(z);
58	exp_x = __frexp_expf(x, &ex_expt);
59	expt += ex_expt;
60
61	half_expt = expt / 2;
62	SET_FLOAT_WORD(scale1, (0x7f + half_expt) << 23);
63	half_expt = expt - half_expt;
64	SET_FLOAT_WORD(scale2, (0x7f + half_expt) << 23);
65
66	return CMPLXF(cosf(y) * exp_x * scale1 * scale2,
67	sinf(y) * exp_x * scale1 * scale2);
68	}

lib/libc/wasi/libc-top-half/musl/src/complex/cabs.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "complex_impl.h"
2
3	double cabs(double complex z)
4	{
5	return hypot(creal(z), cimag(z));
6	}

lib/libc/wasi/libc-top-half/musl/src/complex/cabsf.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "complex_impl.h"
2
3	float cabsf(float complex z)
4	{
5	return hypotf(crealf(z), cimagf(z));
6	}

lib/libc/wasi/libc-top-half/musl/src/complex/cabsl.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include "complex_impl.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double cabsl(long double complex z)
5	{
6	return cabs(z);
7	}
8	#else
9	long double cabsl(long double complex z)
10	{
11	return hypotl(creall(z), cimagl(z));
12	}
13	#endif

lib/libc/wasi/libc-top-half/musl/src/complex/cacos.c deleted-11

...	@@ -1,11 +0,0 @@
1	#include "complex_impl.h"
2
3	// FIXME: Hull et al. "Implementing the complex arcsine and arccosine functions using exception handling" 1997
4
5	/* acos(z) = pi/2 - asin(z) */
6
7	double complex cacos(double complex z)
8	{
9	z = casin(z);
10	return CMPLX(M_PI_2 - creal(z), -cimag(z));
11	}

lib/libc/wasi/libc-top-half/musl/src/complex/cacosf.c deleted-11

...	@@ -1,11 +0,0 @@
1	#include "complex_impl.h"
2
3	// FIXME
4
5	static const float float_pi_2 = M_PI_2;
6
7	float complex cacosf(float complex z)
8	{
9	z = casinf(z);
10	return CMPLXF(float_pi_2 - crealf(z), -cimagf(z));
11	}

lib/libc/wasi/libc-top-half/musl/src/complex/cacosh.c deleted-12

...	@@ -1,12 +0,0 @@
1	#include "complex_impl.h"
2
3	/* acosh(z) = i acos(z) */
4
5	double complex cacosh(double complex z)
6	{
7	int zineg = signbit(cimag(z));
8
9	z = cacos(z);
10	if (zineg) return CMPLX(cimag(z), -creal(z));
11	else return CMPLX(-cimag(z), creal(z));
12	}

lib/libc/wasi/libc-top-half/musl/src/complex/cacoshf.c deleted-10

...	@@ -1,10 +0,0 @@
1	#include "complex_impl.h"
2
3	float complex cacoshf(float complex z)
4	{
5	int zineg = signbit(cimagf(z));
6
7	z = cacosf(z);
8	if (zineg) return CMPLXF(cimagf(z), -crealf(z));
9	else return CMPLXF(-cimagf(z), crealf(z));
10	}

lib/libc/wasi/libc-top-half/musl/src/complex/cacoshl.c deleted-17

...	@@ -1,17 +0,0 @@
1	#include "complex_impl.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double complex cacoshl(long double complex z)
5	{
6	return cacosh(z);
7	}
8	#else
9	long double complex cacoshl(long double complex z)
10	{
11	int zineg = signbit(cimagl(z));
12
13	z = cacosl(z);
14	if (zineg) return CMPLXL(cimagl(z), -creall(z));
15	else return CMPLXL(-cimagl(z), creall(z));
16	}
17	#endif

lib/libc/wasi/libc-top-half/musl/src/complex/cacosl.c deleted-16

...	@@ -1,16 +0,0 @@
1	#include "complex_impl.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double complex cacosl(long double complex z)
5	{
6	return cacos(z);
7	}
8	#else
9	// FIXME
10	#define PI_2 1.57079632679489661923132169163975144L
11	long double complex cacosl(long double complex z)
12	{
13	z = casinl(z);
14	return CMPLXL(PI_2 - creall(z), -cimagl(z));
15	}
16	#endif

lib/libc/wasi/libc-top-half/musl/src/complex/carg.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "complex_impl.h"
2
3	double carg(double complex z)
4	{
5	return atan2(cimag(z), creal(z));
6	}

lib/libc/wasi/libc-top-half/musl/src/complex/cargf.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "complex_impl.h"
2
3	float cargf(float complex z)
4	{
5	return atan2f(cimagf(z), crealf(z));
6	}

lib/libc/wasi/libc-top-half/musl/src/complex/cargl.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include "complex_impl.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double cargl(long double complex z)
5	{
6	return carg(z);
7	}
8	#else
9	long double cargl(long double complex z)
10	{
11	return atan2l(cimagl(z), creall(z));
12	}
13	#endif

lib/libc/wasi/libc-top-half/musl/src/complex/casin.c deleted-17

...	@@ -1,17 +0,0 @@
1	#include "complex_impl.h"
2
3	// FIXME
4
5	/* asin(z) = -i log(i z + sqrt(1 - zz)) /
6
7	double complex casin(double complex z)
8	{
9	double complex w;
10	double x, y;
11
12	x = creal(z);
13	y = cimag(z);
14	w = CMPLX(1.0 - (x - y)(x + y), -2.0x*y);
15	double complex r = clog(CMPLX(-y, x) + csqrt(w));
16	return CMPLX(cimag(r), -creal(r));
17	}

lib/libc/wasi/libc-top-half/musl/src/complex/casinf.c deleted-15

...	@@ -1,15 +0,0 @@
1	#include "complex_impl.h"
2
3	// FIXME
4
5	float complex casinf(float complex z)
6	{
7	float complex w;
8	float x, y;
9
10	x = crealf(z);
11	y = cimagf(z);
12	w = CMPLXF(1.0 - (x - y)(x + y), -2.0x*y);
13	float complex r = clogf(CMPLXF(-y, x) + csqrtf(w));
14	return CMPLXF(cimagf(r), -crealf(r));
15	}

lib/libc/wasi/libc-top-half/musl/src/complex/casinh.c deleted-9

...	@@ -1,9 +0,0 @@
1	#include "complex_impl.h"
2
3	/* asinh(z) = -i asin(i z) */
4
5	double complex casinh(double complex z)
6	{
7	z = casin(CMPLX(-cimag(z), creal(z)));
8	return CMPLX(cimag(z), -creal(z));
9	}

lib/libc/wasi/libc-top-half/musl/src/complex/casinhf.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include "complex_impl.h"
2
3	float complex casinhf(float complex z)
4	{
5	z = casinf(CMPLXF(-cimagf(z), crealf(z)));
6	return CMPLXF(cimagf(z), -crealf(z));
7	}

lib/libc/wasi/libc-top-half/musl/src/complex/casinhl.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include "complex_impl.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double complex casinhl(long double complex z)
5	{
6	return casinh(z);
7	}
8	#else
9	long double complex casinhl(long double complex z)
10	{
11	z = casinl(CMPLXL(-cimagl(z), creall(z)));
12	return CMPLXL(cimagl(z), -creall(z));
13	}
14	#endif

lib/libc/wasi/libc-top-half/musl/src/complex/casinl.c deleted-21

...	@@ -1,21 +0,0 @@
1	#include "complex_impl.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double complex casinl(long double complex z)
5	{
6	return casin(z);
7	}
8	#else
9	// FIXME
10	long double complex casinl(long double complex z)
11	{
12	long double complex w;
13	long double x, y;
14
15	x = creall(z);
16	y = cimagl(z);
17	w = CMPLXL(1.0 - (x - y)(x + y), -2.0x*y);
18	long double complex r = clogl(CMPLXL(-y, x) + csqrtl(w));
19	return CMPLXL(cimagl(r), -creall(r));
20	}
21	#endif

lib/libc/wasi/libc-top-half/musl/src/complex/catan.c deleted-107

...	@@ -1,107 +0,0 @@
1	/* origin: OpenBSD /usr/src/lib/libm/src/s_catan.c */
2	/*
3	* Copyright (c) 2008 Stephen L. Moshier <steve@moshier.net>
4	*
5	* Permission to use, copy, modify, and distribute this software for any
6	* purpose with or without fee is hereby granted, provided that the above
7	* copyright notice and this permission notice appear in all copies.
8	*
9	* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10	* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11	* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12	* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13	* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14	* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15	* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16	*/
17	/*
18	* Complex circular arc tangent
19	*
20	*
21	* SYNOPSIS:
22	*
23	* double complex catan();
24	* double complex z, w;
25	*
26	* w = catan (z);
27	*
28	*
29	* DESCRIPTION:
30	*
31	* If
32	* z = x + iy,
33	*
34	* then
35	* 1 ( 2x )
36	* Re w = - arctan(-----------) + k PI
37	* 2 ( 2 2)
38	* (1 - x - y )
39	*
40	* ( 2 2)
41	* 1 (x + (y+1) )
42	* Im w = - log(------------)
43	* 4 ( 2 2)
44	* (x + (y-1) )
45	*
46	* Where k is an arbitrary integer.
47	*
48	* catan(z) = -i catanh(iz).
49	*
50	* ACCURACY:
51	*
52	* Relative error:
53	* arithmetic domain # trials peak rms
54	* DEC -10,+10 5900 1.3e-16 7.8e-18
55	* IEEE -10,+10 30000 2.3e-15 8.5e-17
56	* The check catan( ctan(z) ) = z, with \|x\| and \|y\| < PI/2,
57	* had peak relative error 1.5e-16, rms relative error
58	* 2.9e-17. See also clog().
59	*/
60
61	#include "complex_impl.h"
62
63	#define MAXNUM 1.0e308
64
65	static const double DP1 = 3.14159265160560607910E0;
66	static const double DP2 = 1.98418714791870343106E-9;
67	static const double DP3 = 1.14423774522196636802E-17;
68
69	static double _redupi(double x)
70	{
71	double t;
72	long i;
73
74	t = x/M_PI;
75	if (t >= 0.0)
76	t += 0.5;
77	else
78	t -= 0.5;
79
80	i = t; /* the multiple */
81	t = i;
82	t = ((x - t * DP1) - t * DP2) - t * DP3;
83	return t;
84	}
85
86	double complex catan(double complex z)
87	{
88	double complex w;
89	double a, t, x, x2, y;
90
91	x = creal(z);
92	y = cimag(z);
93
94	x2 = x * x;
95	a = 1.0 - x2 - (y * y);
96
97	t = 0.5 * atan2(2.0 * x, a);
98	w = _redupi(t);
99
100	t = y - 1.0;
101	a = x2 + (t * t);
102
103	t = y + 1.0;
104	a = (x2 + t * t)/a;
105	w = CMPLX(w, 0.25 * log(a));
106	return w;
107	}

lib/libc/wasi/libc-top-half/musl/src/complex/catanf.c deleted-105

...	@@ -1,105 +0,0 @@
1	/* origin: OpenBSD /usr/src/lib/libm/src/s_catanf.c */
2	/*
3	* Copyright (c) 2008 Stephen L. Moshier <steve@moshier.net>
4	*
5	* Permission to use, copy, modify, and distribute this software for any
6	* purpose with or without fee is hereby granted, provided that the above
7	* copyright notice and this permission notice appear in all copies.
8	*
9	* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10	* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11	* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12	* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13	* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14	* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15	* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16	*/
17	/*
18	* Complex circular arc tangent
19	*
20	*
21	* SYNOPSIS:
22	*
23	* float complex catanf();
24	* float complex z, w;
25	*
26	* w = catanf( z );
27	*
28	*
29	* DESCRIPTION:
30	*
31	* If
32	* z = x + iy,
33	*
34	* then
35	* 1 ( 2x )
36	* Re w = - arctan(-----------) + k PI
37	* 2 ( 2 2)
38	* (1 - x - y )
39	*
40	* ( 2 2)
41	* 1 (x + (y+1) )
42	* Im w = - log(------------)
43	* 4 ( 2 2)
44	* (x + (y-1) )
45	*
46	* Where k is an arbitrary integer.
47	*
48	*
49	* ACCURACY:
50	*
51	* Relative error:
52	* arithmetic domain # trials peak rms
53	* IEEE -10,+10 30000 2.3e-6 5.2e-8
54	*/
55
56	#include "complex_impl.h"
57
58	#define MAXNUMF 1.0e38F
59
60	static const double DP1 = 3.140625;
61	static const double DP2 = 9.67502593994140625E-4;
62	static const double DP3 = 1.509957990978376432E-7;
63
64	static const float float_pi = M_PI;
65
66	static float _redupif(float xx)
67	{
68	float x, t;
69	long i;
70
71	x = xx;
72	t = x/float_pi;
73	if (t >= 0.0f)
74	t += 0.5f;
75	else
76	t -= 0.5f;
77
78	i = t; /* the multiple */
79	t = i;
80	t = ((x - t * DP1) - t * DP2) - t * DP3;
81	return t;
82	}
83
84	float complex catanf(float complex z)
85	{
86	float complex w;
87	float a, t, x, x2, y;
88
89	x = crealf(z);
90	y = cimagf(z);
91
92	x2 = x * x;
93	a = 1.0f - x2 - (y * y);
94
95	t = 0.5f * atan2f(2.0f * x, a);
96	w = _redupif(t);
97
98	t = y - 1.0f;
99	a = x2 + (t * t);
100
101	t = y + 1.0f;
102	a = (x2 + (t * t))/a;
103	w = CMPLXF(w, 0.25f * logf(a));
104	return w;
105	}

lib/libc/wasi/libc-top-half/musl/src/complex/catanh.c deleted-9

...	@@ -1,9 +0,0 @@
1	#include "complex_impl.h"
2
3	/* atanh = -i atan(i z) */
4
5	double complex catanh(double complex z)
6	{
7	z = catan(CMPLX(-cimag(z), creal(z)));
8	return CMPLX(cimag(z), -creal(z));
9	}

lib/libc/wasi/libc-top-half/musl/src/complex/catanhf.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include "complex_impl.h"
2
3	float complex catanhf(float complex z)
4	{
5	z = catanf(CMPLXF(-cimagf(z), crealf(z)));
6	return CMPLXF(cimagf(z), -crealf(z));
7	}

lib/libc/wasi/libc-top-half/musl/src/complex/catanhl.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include "complex_impl.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double complex catanhl(long double complex z)
5	{
6	return catanh(z);
7	}
8	#else
9	long double complex catanhl(long double complex z)
10	{
11	z = catanl(CMPLXL(-cimagl(z), creall(z)));
12	return CMPLXL(cimagl(z), -creall(z));
13	}
14	#endif

lib/libc/wasi/libc-top-half/musl/src/complex/catanl.c deleted-114

...	@@ -1,114 +0,0 @@
1	/* origin: OpenBSD /usr/src/lib/libm/src/s_catanl.c */
2	/*
3	* Copyright (c) 2008 Stephen L. Moshier <steve@moshier.net>
4	*
5	* Permission to use, copy, modify, and distribute this software for any
6	* purpose with or without fee is hereby granted, provided that the above
7	* copyright notice and this permission notice appear in all copies.
8	*
9	* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10	* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11	* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12	* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13	* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14	* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15	* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16	*/
17	/*
18	* Complex circular arc tangent
19	*
20	*
21	* SYNOPSIS:
22	*
23	* long double complex catanl();
24	* long double complex z, w;
25	*
26	* w = catanl( z );
27	*
28	*
29	* DESCRIPTION:
30	*
31	* If
32	* z = x + iy,
33	*
34	* then
35	* 1 ( 2x )
36	* Re w = - arctan(-----------) + k PI
37	* 2 ( 2 2)
38	* (1 - x - y )
39	*
40	* ( 2 2)
41	* 1 (x + (y+1) )
42	* Im w = - log(------------)
43	* 4 ( 2 2)
44	* (x + (y-1) )
45	*
46	* Where k is an arbitrary integer.
47	*
48	*
49	* ACCURACY:
50	*
51	* Relative error:
52	* arithmetic domain # trials peak rms
53	* DEC -10,+10 5900 1.3e-16 7.8e-18
54	* IEEE -10,+10 30000 2.3e-15 8.5e-17
55	* The check catan( ctan(z) ) = z, with \|x\| and \|y\| < PI/2,
56	* had peak relative error 1.5e-16, rms relative error
57	* 2.9e-17. See also clog().
58	*/
59
60	#include <complex.h>
61	#include <float.h>
62	#include "complex_impl.h"
63
64	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
65	long double complex catanl(long double complex z)
66	{
67	return catan(z);
68	}
69	#else
70	static const long double PIL = 3.141592653589793238462643383279502884197169L;
71	static const long double DP1 = 3.14159265358979323829596852490908531763125L;
72	static const long double DP2 = 1.6667485837041756656403424829301998703007e-19L;
73	static const long double DP3 = 1.8830410776607851167459095484560349402753e-39L;
74
75	static long double redupil(long double x)
76	{
77	long double t;
78	long i;
79
80	t = x / PIL;
81	if (t >= 0.0L)
82	t += 0.5L;
83	else
84	t -= 0.5L;
85
86	i = t; /* the multiple */
87	t = i;
88	t = ((x - t * DP1) - t * DP2) - t * DP3;
89	return t;
90	}
91
92	long double complex catanl(long double complex z)
93	{
94	long double complex w;
95	long double a, t, x, x2, y;
96
97	x = creall(z);
98	y = cimagl(z);
99
100	x2 = x * x;
101	a = 1.0L - x2 - (y * y);
102
103	t = atan2l(2.0L * x, a) * 0.5L;
104	w = redupil(t);
105
106	t = y - 1.0L;
107	a = x2 + (t * t);
108
109	t = y + 1.0L;
110	a = (x2 + (t * t)) / a;
111	w = CMPLXF(w, 0.25L * logl(a));
112	return w;
113	}
114	#endif

lib/libc/wasi/libc-top-half/musl/src/complex/ccos.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include "complex_impl.h"
2
3	/* cos(z) = cosh(i z) */
4
5	double complex ccos(double complex z)
6	{
7	return ccosh(CMPLX(-cimag(z), creal(z)));
8	}

lib/libc/wasi/libc-top-half/musl/src/complex/ccosf.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "complex_impl.h"
2
3	float complex ccosf(float complex z)
4	{
5	return ccoshf(CMPLXF(-cimagf(z), crealf(z)));
6	}

lib/libc/wasi/libc-top-half/musl/src/complex/ccosh.c deleted-140

...	@@ -1,140 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_ccosh.c */
2	/*-
3	* Copyright (c) 2005 Bruce D. Evans and Steven G. Kargl
4	* All rights reserved.
5	*
6	* Redistribution and use in source and binary forms, with or without
7	* modification, are permitted provided that the following conditions
8	* are met:
9	* 1. Redistributions of source code must retain the above copyright
10	* notice unmodified, this list of conditions, and the following
11	* disclaimer.
12	* 2. Redistributions in binary form must reproduce the above copyright
13	* notice, this list of conditions and the following disclaimer in the
14	* documentation and/or other materials provided with the distribution.
15	*
16	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26	*/
27	/*
28	* Hyperbolic cosine of a complex argument z = x + i y.
29	*
30	* cosh(z) = cosh(x+iy)
31	* = cosh(x) cos(y) + i sinh(x) sin(y).
32	*
33	* Exceptional values are noted in the comments within the source code.
34	* These values and the return value were taken from n1124.pdf.
35	*/
36
37	#include "complex_impl.h"
38
39	static const double huge = 0x1p1023;
40
41	double complex ccosh(double complex z)
42	{
43	double x, y, h;
44	int32_t hx, hy, ix, iy, lx, ly;
45
46	x = creal(z);
47	y = cimag(z);
48
49	EXTRACT_WORDS(hx, lx, x);
50	EXTRACT_WORDS(hy, ly, y);
51
52	ix = 0x7fffffff & hx;
53	iy = 0x7fffffff & hy;
54
55	/* Handle the nearly-non-exceptional cases where x and y are finite. */
56	if (ix < 0x7ff00000 && iy < 0x7ff00000) {
57	if ((iy \| ly) == 0)
58	return CMPLX(cosh(x), x * y);
59	if (ix < 0x40360000) /* small x: normal case */
60	return CMPLX(cosh(x) * cos(y), sinh(x) * sin(y));
61
62	/* \|x\| >= 22, so cosh(x) ~= exp(\|x\|) */
63	if (ix < 0x40862e42) {
64	/* x < 710: exp(\|x\|) won't overflow */
65	h = exp(fabs(x)) * 0.5;
66	return CMPLX(h * cos(y), copysign(h, x) * sin(y));
67	} else if (ix < 0x4096bbaa) {
68	/* x < 1455: scale to avoid overflow */
69	z = __ldexp_cexp(CMPLX(fabs(x), y), -1);
70	return CMPLX(creal(z), cimag(z) * copysign(1, x));
71	} else {
72	/* x >= 1455: the result always overflows */
73	h = huge * x;
74	return CMPLX(h * h * cos(y), h * sin(y));
75	}
76	}
77
78	/*
79	* cosh(+-0 +- I Inf) = dNaN + I sign(d(+-0, dNaN))0.
80	* The sign of 0 in the result is unspecified. Choice = normally
81	* the same as dNaN. Raise the invalid floating-point exception.
82	*
83	* cosh(+-0 +- I NaN) = d(NaN) + I sign(d(+-0, NaN))0.
84	* The sign of 0 in the result is unspecified. Choice = normally
85	* the same as d(NaN).
86	*/
87	if ((ix \| lx) == 0 && iy >= 0x7ff00000)
88	return CMPLX(y - y, copysign(0, x * (y - y)));
89
90	/*
91	* cosh(+-Inf +- I 0) = +Inf + I (+-)(+-)0.
92	*
93	* cosh(NaN +- I 0) = d(NaN) + I sign(d(NaN, +-0))0.
94	* The sign of 0 in the result is unspecified.
95	*/
96	if ((iy \| ly) == 0 && ix >= 0x7ff00000) {
97	if (((hx & 0xfffff) \| lx) == 0)
98	return CMPLX(x * x, copysign(0, x) * y);
99	return CMPLX(x * x, copysign(0, (x + x) * y));
100	}
101
102	/*
103	* cosh(x +- I Inf) = dNaN + I dNaN.
104	* Raise the invalid floating-point exception for finite nonzero x.
105	*
106	* cosh(x + I NaN) = d(NaN) + I d(NaN).
107	* Optionally raises the invalid floating-point exception for finite
108	* nonzero x. Choice = don't raise (except for signaling NaNs).
109	*/
110	if (ix < 0x7ff00000 && iy >= 0x7ff00000)
111	return CMPLX(y - y, x * (y - y));
112
113	/*
114	* cosh(+-Inf + I NaN) = +Inf + I d(NaN).
115	*
116	* cosh(+-Inf +- I Inf) = +Inf + I dNaN.
117	* The sign of Inf in the result is unspecified. Choice = always +.
118	* Raise the invalid floating-point exception.
119	*
120	* cosh(+-Inf + I y) = +Inf cos(y) +- I Inf sin(y)
121	*/
122	if (ix >= 0x7ff00000 && ((hx & 0xfffff) \| lx) == 0) {
123	if (iy >= 0x7ff00000)
124	return CMPLX(x * x, x * (y - y));
125	return CMPLX((x * x) * cos(y), x * sin(y));
126	}
127
128	/*
129	* cosh(NaN + I NaN) = d(NaN) + I d(NaN).
130	*
131	* cosh(NaN +- I Inf) = d(NaN) + I d(NaN).
132	* Optionally raises the invalid floating-point exception.
133	* Choice = raise.
134	*
135	* cosh(NaN + I y) = d(NaN) + I d(NaN).
136	* Optionally raises the invalid floating-point exception for finite
137	* nonzero y. Choice = don't raise (except for signaling NaNs).
138	*/
139	return CMPLX((x * x) * (y - y), (x + x) * (y - y));
140	}

lib/libc/wasi/libc-top-half/musl/src/complex/ccoshf.c deleted-90

...	@@ -1,90 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_ccoshf.c */
2	/*-
3	* Copyright (c) 2005 Bruce D. Evans and Steven G. Kargl
4	* All rights reserved.
5	*
6	* Redistribution and use in source and binary forms, with or without
7	* modification, are permitted provided that the following conditions
8	* are met:
9	* 1. Redistributions of source code must retain the above copyright
10	* notice unmodified, this list of conditions, and the following
11	* disclaimer.
12	* 2. Redistributions in binary form must reproduce the above copyright
13	* notice, this list of conditions and the following disclaimer in the
14	* documentation and/or other materials provided with the distribution.
15	*
16	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26	*/
27	/*
28	* Hyperbolic cosine of a complex argument. See s_ccosh.c for details.
29	*/
30
31	#include "complex_impl.h"
32
33	static const float huge = 0x1p127;
34
35	float complex ccoshf(float complex z)
36	{
37	float x, y, h;
38	int32_t hx, hy, ix, iy;
39
40	x = crealf(z);
41	y = cimagf(z);
42
43	GET_FLOAT_WORD(hx, x);
44	GET_FLOAT_WORD(hy, y);
45
46	ix = 0x7fffffff & hx;
47	iy = 0x7fffffff & hy;
48
49	if (ix < 0x7f800000 && iy < 0x7f800000) {
50	if (iy == 0)
51	return CMPLXF(coshf(x), x * y);
52	if (ix < 0x41100000) /* small x: normal case */
53	return CMPLXF(coshf(x) * cosf(y), sinhf(x) * sinf(y));
54
55	/* \|x\| >= 9, so cosh(x) ~= exp(\|x\|) */
56	if (ix < 0x42b17218) {
57	/* x < 88.7: expf(\|x\|) won't overflow */
58	h = expf(fabsf(x)) * 0.5f;
59	return CMPLXF(h * cosf(y), copysignf(h, x) * sinf(y));
60	} else if (ix < 0x4340b1e7) {
61	/* x < 192.7: scale to avoid overflow */
62	z = __ldexp_cexpf(CMPLXF(fabsf(x), y), -1);
63	return CMPLXF(crealf(z), cimagf(z) * copysignf(1, x));
64	} else {
65	/* x >= 192.7: the result always overflows */
66	h = huge * x;
67	return CMPLXF(h * h * cosf(y), h * sinf(y));
68	}
69	}
70
71	if (ix == 0 && iy >= 0x7f800000)
72	return CMPLXF(y - y, copysignf(0, x * (y - y)));
73
74	if (iy == 0 && ix >= 0x7f800000) {
75	if ((hx & 0x7fffff) == 0)
76	return CMPLXF(x * x, copysignf(0, x) * y);
77	return CMPLXF(x * x, copysignf(0, (x + x) * y));
78	}
79
80	if (ix < 0x7f800000 && iy >= 0x7f800000)
81	return CMPLXF(y - y, x * (y - y));
82
83	if (ix >= 0x7f800000 && (hx & 0x7fffff) == 0) {
84	if (iy >= 0x7f800000)
85	return CMPLXF(x * x, x * (y - y));
86	return CMPLXF((x * x) * cosf(y), x * sinf(y));
87	}
88
89	return CMPLXF((x * x) * (y - y), (x + x) * (y - y));
90	}

lib/libc/wasi/libc-top-half/musl/src/complex/ccoshl.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include "complex_impl.h"
2
3	//FIXME
4	long double complex ccoshl(long double complex z)
5	{
6	return ccosh(z);
7	}

lib/libc/wasi/libc-top-half/musl/src/complex/ccosl.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include "complex_impl.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double complex ccosl(long double complex z)
5	{
6	return ccos(z);
7	}
8	#else
9	long double complex ccosl(long double complex z)
10	{
11	return ccoshl(CMPLXL(-cimagl(z), creall(z)));
12	}
13	#endif

lib/libc/wasi/libc-top-half/musl/src/complex/cexp.c deleted-83

...	@@ -1,83 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_cexp.c */
2	/*-
3	* Copyright (c) 2011 David Schultz <das@FreeBSD.ORG>
4	* All rights reserved.
5	*
6	* Redistribution and use in source and binary forms, with or without
7	* modification, are permitted provided that the following conditions
8	* are met:
9	* 1. Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.
11	* 2. Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.
14	*
15	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25	* SUCH DAMAGE.
26	*/
27
28	#include "complex_impl.h"
29
30	static const uint32_t
31	exp_ovfl = 0x40862e42, /* high bits of MAX_EXP * ln2 ~= 710 */
32	cexp_ovfl = 0x4096b8e4; /* (MAX_EXP - MIN_DENORM_EXP) * ln2 */
33
34	double complex cexp(double complex z)
35	{
36	double x, y, exp_x;
37	uint32_t hx, hy, lx, ly;
38
39	x = creal(z);
40	y = cimag(z);
41
42	EXTRACT_WORDS(hy, ly, y);
43	hy &= 0x7fffffff;
44
45	/* cexp(x + I 0) = exp(x) + I 0 */
46	if ((hy \| ly) == 0)
47	return CMPLX(exp(x), y);
48	EXTRACT_WORDS(hx, lx, x);
49	/* cexp(0 + I y) = cos(y) + I sin(y) */
50	if (((hx & 0x7fffffff) \| lx) == 0)
51	return CMPLX(cos(y), sin(y));
52
53	if (hy >= 0x7ff00000) {
54	if (lx != 0 \|\| (hx & 0x7fffffff) != 0x7ff00000) {
55	/* cexp(finite\|NaN +- I Inf\|NaN) = NaN + I NaN */
56	return CMPLX(y - y, y - y);
57	} else if (hx & 0x80000000) {
58	/* cexp(-Inf +- I Inf\|NaN) = 0 + I 0 */
59	return CMPLX(0.0, 0.0);
60	} else {
61	/* cexp(+Inf +- I Inf\|NaN) = Inf + I NaN */
62	return CMPLX(x, y - y);
63	}
64	}
65
66	if (hx >= exp_ovfl && hx <= cexp_ovfl) {
67	/*
68	* x is between 709.7 and 1454.3, so we must scale to avoid
69	* overflow in exp(x).
70	*/
71	return __ldexp_cexp(z, 0);
72	} else {
73	/*
74	* Cases covered here:
75	* - x < exp_ovfl and exp(x) won't overflow (common case)
76	* - x > cexp_ovfl, so exp(x) * s overflows for all s > 0
77	* - x = +-Inf (generated by exp())
78	* - x = NaN (spurious inexact exception from y)
79	*/
80	exp_x = exp(x);
81	return CMPLX(exp_x * cos(y), exp_x * sin(y));
82	}
83	}

lib/libc/wasi/libc-top-half/musl/src/complex/cexpf.c deleted-83

...	@@ -1,83 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_cexpf.c */
2	/*-
3	* Copyright (c) 2011 David Schultz <das@FreeBSD.ORG>
4	* All rights reserved.
5	*
6	* Redistribution and use in source and binary forms, with or without
7	* modification, are permitted provided that the following conditions
8	* are met:
9	* 1. Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.
11	* 2. Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.
14	*
15	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25	* SUCH DAMAGE.
26	*/
27
28	#include "complex_impl.h"
29
30	static const uint32_t
31	exp_ovfl = 0x42b17218, /* MAX_EXP * ln2 ~= 88.722839355 */
32	cexp_ovfl = 0x43400074; /* (MAX_EXP - MIN_DENORM_EXP) * ln2 */
33
34	float complex cexpf(float complex z)
35	{
36	float x, y, exp_x;
37	uint32_t hx, hy;
38
39	x = crealf(z);
40	y = cimagf(z);
41
42	GET_FLOAT_WORD(hy, y);
43	hy &= 0x7fffffff;
44
45	/* cexp(x + I 0) = exp(x) + I 0 */
46	if (hy == 0)
47	return CMPLXF(expf(x), y);
48	GET_FLOAT_WORD(hx, x);
49	/* cexp(0 + I y) = cos(y) + I sin(y) */
50	if ((hx & 0x7fffffff) == 0)
51	return CMPLXF(cosf(y), sinf(y));
52
53	if (hy >= 0x7f800000) {
54	if ((hx & 0x7fffffff) != 0x7f800000) {
55	/* cexp(finite\|NaN +- I Inf\|NaN) = NaN + I NaN */
56	return CMPLXF(y - y, y - y);
57	} else if (hx & 0x80000000) {
58	/* cexp(-Inf +- I Inf\|NaN) = 0 + I 0 */
59	return CMPLXF(0.0, 0.0);
60	} else {
61	/* cexp(+Inf +- I Inf\|NaN) = Inf + I NaN */
62	return CMPLXF(x, y - y);
63	}
64	}
65
66	if (hx >= exp_ovfl && hx <= cexp_ovfl) {
67	/*
68	* x is between 88.7 and 192, so we must scale to avoid
69	* overflow in expf(x).
70	*/
71	return __ldexp_cexpf(z, 0);
72	} else {
73	/*
74	* Cases covered here:
75	* - x < exp_ovfl and exp(x) won't overflow (common case)
76	* - x > cexp_ovfl, so exp(x) * s overflows for all s > 0
77	* - x = +-Inf (generated by exp())
78	* - x = NaN (spurious inexact exception from y)
79	*/
80	exp_x = expf(x);
81	return CMPLXF(exp_x * cosf(y), exp_x * sinf(y));
82	}
83	}

lib/libc/wasi/libc-top-half/musl/src/complex/cexpl.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include "complex_impl.h"
2
3	//FIXME
4	long double complex cexpl(long double complex z)
5	{
6	return cexp(z);
7	}

lib/libc/wasi/libc-top-half/musl/src/complex/clog.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include "complex_impl.h"
2
3	// FIXME
4
5	/* log(z) = log(\|z\|) + i arg(z) */
6
7	double complex clog(double complex z)
8	{
9	double r, phi;
10
11	r = cabs(z);
12	phi = carg(z);
13	return CMPLX(log(r), phi);
14	}

lib/libc/wasi/libc-top-half/musl/src/complex/clogf.c deleted-12

...	@@ -1,12 +0,0 @@
1	#include "complex_impl.h"
2
3	// FIXME
4
5	float complex clogf(float complex z)
6	{
7	float r, phi;
8
9	r = cabsf(z);
10	phi = cargf(z);
11	return CMPLXF(logf(r), phi);
12	}

lib/libc/wasi/libc-top-half/musl/src/complex/clogl.c deleted-18

...	@@ -1,18 +0,0 @@
1	#include "complex_impl.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double complex clogl(long double complex z)
5	{
6	return clog(z);
7	}
8	#else
9	// FIXME
10	long double complex clogl(long double complex z)
11	{
12	long double r, phi;
13
14	r = cabsl(z);
15	phi = cargl(z);
16	return CMPLXL(logl(r), phi);
17	}
18	#endif

lib/libc/wasi/libc-top-half/musl/src/complex/conj.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "complex_impl.h"
2
3	double complex conj(double complex z)
4	{
5	return CMPLX(creal(z), -cimag(z));
6	}

lib/libc/wasi/libc-top-half/musl/src/complex/conjf.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "complex_impl.h"
2
3	float complex conjf(float complex z)
4	{
5	return CMPLXF(crealf(z), -cimagf(z));
6	}

lib/libc/wasi/libc-top-half/musl/src/complex/conjl.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "complex_impl.h"
2
3	long double complex conjl(long double complex z)
4	{
5	return CMPLXL(creall(z), -cimagl(z));
6	}

lib/libc/wasi/libc-top-half/musl/src/complex/cpow.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include "complex_impl.h"
2
3	/* pow(z, c) = exp(c log(z)), See C99 G.6.4.1 */
4
5	double complex cpow(double complex z, double complex c)
6	{
7	return cexp(c * clog(z));
8	}

lib/libc/wasi/libc-top-half/musl/src/complex/cpowf.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "complex_impl.h"
2
3	float complex cpowf(float complex z, float complex c)
4	{
5	return cexpf(c * clogf(z));
6	}

lib/libc/wasi/libc-top-half/musl/src/complex/cpowl.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include "complex_impl.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double complex cpowl(long double complex z, long double complex c)
5	{
6	return cpow(z, c);
7	}
8	#else
9	long double complex cpowl(long double complex z, long double complex c)
10	{
11	return cexpl(c * clogl(z));
12	}
13	#endif

lib/libc/wasi/libc-top-half/musl/src/complex/cproj.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include "complex_impl.h"
2
3	double complex cproj(double complex z)
4	{
5	if (isinf(creal(z)) \|\| isinf(cimag(z)))
6	return CMPLX(INFINITY, copysign(0.0, cimag(z)));
7	return z;
8	}

lib/libc/wasi/libc-top-half/musl/src/complex/cprojf.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include "complex_impl.h"
2
3	float complex cprojf(float complex z)
4	{
5	if (isinf(crealf(z)) \|\| isinf(cimagf(z)))
6	return CMPLXF(INFINITY, copysignf(0.0, cimagf(z)));
7	return z;
8	}

lib/libc/wasi/libc-top-half/musl/src/complex/cprojl.c deleted-15

...	@@ -1,15 +0,0 @@
1	#include "complex_impl.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double complex cprojl(long double complex z)
5	{
6	return cproj(z);
7	}
8	#else
9	long double complex cprojl(long double complex z)
10	{
11	if (isinf(creall(z)) \|\| isinf(cimagl(z)))
12	return CMPLXL(INFINITY, copysignl(0.0, cimagl(z)));
13	return z;
14	}
15	#endif

lib/libc/wasi/libc-top-half/musl/src/complex/csin.c deleted-9

...	@@ -1,9 +0,0 @@
1	#include "complex_impl.h"
2
3	/* sin(z) = -i sinh(i z) */
4
5	double complex csin(double complex z)
6	{
7	z = csinh(CMPLX(-cimag(z), creal(z)));
8	return CMPLX(cimag(z), -creal(z));
9	}

lib/libc/wasi/libc-top-half/musl/src/complex/csinf.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include "complex_impl.h"
2
3	float complex csinf(float complex z)
4	{
5	z = csinhf(CMPLXF(-cimagf(z), crealf(z)));
6	return CMPLXF(cimagf(z), -crealf(z));
7	}

lib/libc/wasi/libc-top-half/musl/src/complex/csinh.c deleted-141

...	@@ -1,141 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_csinh.c */
2	/*-
3	* Copyright (c) 2005 Bruce D. Evans and Steven G. Kargl
4	* All rights reserved.
5	*
6	* Redistribution and use in source and binary forms, with or without
7	* modification, are permitted provided that the following conditions
8	* are met:
9	* 1. Redistributions of source code must retain the above copyright
10	* notice unmodified, this list of conditions, and the following
11	* disclaimer.
12	* 2. Redistributions in binary form must reproduce the above copyright
13	* notice, this list of conditions and the following disclaimer in the
14	* documentation and/or other materials provided with the distribution.
15	*
16	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26	*/
27	/*
28	* Hyperbolic sine of a complex argument z = x + i y.
29	*
30	* sinh(z) = sinh(x+iy)
31	* = sinh(x) cos(y) + i cosh(x) sin(y).
32	*
33	* Exceptional values are noted in the comments within the source code.
34	* These values and the return value were taken from n1124.pdf.
35	*/
36
37	#include "complex_impl.h"
38
39	static const double huge = 0x1p1023;
40
41	double complex csinh(double complex z)
42	{
43	double x, y, h;
44	int32_t hx, hy, ix, iy, lx, ly;
45
46	x = creal(z);
47	y = cimag(z);
48
49	EXTRACT_WORDS(hx, lx, x);
50	EXTRACT_WORDS(hy, ly, y);
51
52	ix = 0x7fffffff & hx;
53	iy = 0x7fffffff & hy;
54
55	/* Handle the nearly-non-exceptional cases where x and y are finite. */
56	if (ix < 0x7ff00000 && iy < 0x7ff00000) {
57	if ((iy \| ly) == 0)
58	return CMPLX(sinh(x), y);
59	if (ix < 0x40360000) /* small x: normal case */
60	return CMPLX(sinh(x) * cos(y), cosh(x) * sin(y));
61
62	/* \|x\| >= 22, so cosh(x) ~= exp(\|x\|) */
63	if (ix < 0x40862e42) {
64	/* x < 710: exp(\|x\|) won't overflow */
65	h = exp(fabs(x)) * 0.5;
66	return CMPLX(copysign(h, x) * cos(y), h * sin(y));
67	} else if (ix < 0x4096bbaa) {
68	/* x < 1455: scale to avoid overflow */
69	z = __ldexp_cexp(CMPLX(fabs(x), y), -1);
70	return CMPLX(creal(z) * copysign(1, x), cimag(z));
71	} else {
72	/* x >= 1455: the result always overflows */
73	h = huge * x;
74	return CMPLX(h * cos(y), h * h * sin(y));
75	}
76	}
77
78	/*
79	* sinh(+-0 +- I Inf) = sign(d(+-0, dNaN))0 + I dNaN.
80	* The sign of 0 in the result is unspecified. Choice = normally
81	* the same as dNaN. Raise the invalid floating-point exception.
82	*
83	* sinh(+-0 +- I NaN) = sign(d(+-0, NaN))0 + I d(NaN).
84	* The sign of 0 in the result is unspecified. Choice = normally
85	* the same as d(NaN).
86	*/
87	if ((ix \| lx) == 0 && iy >= 0x7ff00000)
88	return CMPLX(copysign(0, x * (y - y)), y - y);
89
90	/*
91	* sinh(+-Inf +- I 0) = +-Inf + I +-0.
92	*
93	* sinh(NaN +- I 0) = d(NaN) + I +-0.
94	*/
95	if ((iy \| ly) == 0 && ix >= 0x7ff00000) {
96	if (((hx & 0xfffff) \| lx) == 0)
97	return CMPLX(x, y);
98	return CMPLX(x, copysign(0, y));
99	}
100
101	/*
102	* sinh(x +- I Inf) = dNaN + I dNaN.
103	* Raise the invalid floating-point exception for finite nonzero x.
104	*
105	* sinh(x + I NaN) = d(NaN) + I d(NaN).
106	* Optionally raises the invalid floating-point exception for finite
107	* nonzero x. Choice = don't raise (except for signaling NaNs).
108	*/
109	if (ix < 0x7ff00000 && iy >= 0x7ff00000)
110	return CMPLX(y - y, x * (y - y));
111
112	/*
113	* sinh(+-Inf + I NaN) = +-Inf + I d(NaN).
114	* The sign of Inf in the result is unspecified. Choice = normally
115	* the same as d(NaN).
116	*
117	* sinh(+-Inf +- I Inf) = +Inf + I dNaN.
118	* The sign of Inf in the result is unspecified. Choice = always +.
119	* Raise the invalid floating-point exception.
120	*
121	* sinh(+-Inf + I y) = +-Inf cos(y) + I Inf sin(y)
122	*/
123	if (ix >= 0x7ff00000 && ((hx & 0xfffff) \| lx) == 0) {
124	if (iy >= 0x7ff00000)
125	return CMPLX(x * x, x * (y - y));
126	return CMPLX(x * cos(y), INFINITY * sin(y));
127	}
128
129	/*
130	* sinh(NaN + I NaN) = d(NaN) + I d(NaN).
131	*
132	* sinh(NaN +- I Inf) = d(NaN) + I d(NaN).
133	* Optionally raises the invalid floating-point exception.
134	* Choice = raise.
135	*
136	* sinh(NaN + I y) = d(NaN) + I d(NaN).
137	* Optionally raises the invalid floating-point exception for finite
138	* nonzero y. Choice = don't raise (except for signaling NaNs).
139	*/
140	return CMPLX((x * x) * (y - y), (x + x) * (y - y));
141	}

lib/libc/wasi/libc-top-half/musl/src/complex/csinhf.c deleted-90

...	@@ -1,90 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_csinhf.c */
2	/*-
3	* Copyright (c) 2005 Bruce D. Evans and Steven G. Kargl
4	* All rights reserved.
5	*
6	* Redistribution and use in source and binary forms, with or without
7	* modification, are permitted provided that the following conditions
8	* are met:
9	* 1. Redistributions of source code must retain the above copyright
10	* notice unmodified, this list of conditions, and the following
11	* disclaimer.
12	* 2. Redistributions in binary form must reproduce the above copyright
13	* notice, this list of conditions and the following disclaimer in the
14	* documentation and/or other materials provided with the distribution.
15	*
16	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26	*/
27	/*
28	* Hyperbolic sine of a complex argument z. See s_csinh.c for details.
29	*/
30
31	#include "complex_impl.h"
32
33	static const float huge = 0x1p127;
34
35	float complex csinhf(float complex z)
36	{
37	float x, y, h;
38	int32_t hx, hy, ix, iy;
39
40	x = crealf(z);
41	y = cimagf(z);
42
43	GET_FLOAT_WORD(hx, x);
44	GET_FLOAT_WORD(hy, y);
45
46	ix = 0x7fffffff & hx;
47	iy = 0x7fffffff & hy;
48
49	if (ix < 0x7f800000 && iy < 0x7f800000) {
50	if (iy == 0)
51	return CMPLXF(sinhf(x), y);
52	if (ix < 0x41100000) /* small x: normal case */
53	return CMPLXF(sinhf(x) * cosf(y), coshf(x) * sinf(y));
54
55	/* \|x\| >= 9, so cosh(x) ~= exp(\|x\|) */
56	if (ix < 0x42b17218) {
57	/* x < 88.7: expf(\|x\|) won't overflow */
58	h = expf(fabsf(x)) * 0.5f;
59	return CMPLXF(copysignf(h, x) * cosf(y), h * sinf(y));
60	} else if (ix < 0x4340b1e7) {
61	/* x < 192.7: scale to avoid overflow */
62	z = __ldexp_cexpf(CMPLXF(fabsf(x), y), -1);
63	return CMPLXF(crealf(z) * copysignf(1, x), cimagf(z));
64	} else {
65	/* x >= 192.7: the result always overflows */
66	h = huge * x;
67	return CMPLXF(h * cosf(y), h * h * sinf(y));
68	}
69	}
70
71	if (ix == 0 && iy >= 0x7f800000)
72	return CMPLXF(copysignf(0, x * (y - y)), y - y);
73
74	if (iy == 0 && ix >= 0x7f800000) {
75	if ((hx & 0x7fffff) == 0)
76	return CMPLXF(x, y);
77	return CMPLXF(x, copysignf(0, y));
78	}
79
80	if (ix < 0x7f800000 && iy >= 0x7f800000)
81	return CMPLXF(y - y, x * (y - y));
82
83	if (ix >= 0x7f800000 && (hx & 0x7fffff) == 0) {
84	if (iy >= 0x7f800000)
85	return CMPLXF(x * x, x * (y - y));
86	return CMPLXF(x * cosf(y), INFINITY * sinf(y));
87	}
88
89	return CMPLXF((x * x) * (y - y), (x + x) * (y - y));
90	}

lib/libc/wasi/libc-top-half/musl/src/complex/csinhl.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include "complex_impl.h"
2
3	//FIXME
4	long double complex csinhl(long double complex z)
5	{
6	return csinh(z);
7	}

lib/libc/wasi/libc-top-half/musl/src/complex/csinl.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include "complex_impl.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double complex csinl(long double complex z)
5	{
6	return csin(z);
7	}
8	#else
9	long double complex csinl(long double complex z)
10	{
11	z = csinhl(CMPLXL(-cimagl(z), creall(z)));
12	return CMPLXL(cimagl(z), -creall(z));
13	}
14	#endif

lib/libc/wasi/libc-top-half/musl/src/complex/csqrt.c deleted-100

...	@@ -1,100 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_csqrt.c */
2	/*-
3	* Copyright (c) 2007 David Schultz <das@FreeBSD.ORG>
4	* All rights reserved.
5	*
6	* Redistribution and use in source and binary forms, with or without
7	* modification, are permitted provided that the following conditions
8	* are met:
9	* 1. Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.
11	* 2. Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.
14	*
15	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25	* SUCH DAMAGE.
26	*/
27
28	#include "complex_impl.h"
29
30	/*
31	* gcc doesn't implement complex multiplication or division correctly,
32	* so we need to handle infinities specially. We turn on this pragma to
33	* notify conforming c99 compilers that the fast-but-incorrect code that
34	* gcc generates is acceptable, since the special cases have already been
35	* handled.
36	*/
37	#pragma STDC CX_LIMITED_RANGE ON
38
39	/* We risk spurious overflow for components >= DBL_MAX / (1 + sqrt(2)). */
40	#define THRESH 0x1.a827999fcef32p+1022
41
42	double complex csqrt(double complex z)
43	{
44	double complex result;
45	double a, b;
46	double t;
47	int scale;
48
49	a = creal(z);
50	b = cimag(z);
51
52	/* Handle special cases. */
53	if (z == 0)
54	return CMPLX(0, b);
55	if (isinf(b))
56	return CMPLX(INFINITY, b);
57	if (isnan(a)) {
58	t = (b - b) / (b - b); /* raise invalid if b is not a NaN */
59	return CMPLX(a, t); /* return NaN + NaN i */
60	}
61	if (isinf(a)) {
62	/*
63	* csqrt(inf + NaN i) = inf + NaN i
64	* csqrt(inf + y i) = inf + 0 i
65	* csqrt(-inf + NaN i) = NaN +- inf i
66	* csqrt(-inf + y i) = 0 + inf i
67	*/
68	if (signbit(a))
69	return CMPLX(fabs(b - b), copysign(a, b));
70	else
71	return CMPLX(a, copysign(b - b, b));
72	}
73	/*
74	* The remaining special case (b is NaN) is handled just fine by
75	* the normal code path below.
76	*/
77
78	/* Scale to avoid overflow. */
79	if (fabs(a) >= THRESH \|\| fabs(b) >= THRESH) {
80	a *= 0.25;
81	b *= 0.25;
82	scale = 1;
83	} else {
84	scale = 0;
85	}
86
87	/* Algorithm 312, CACM vol 10, Oct 1967. */
88	if (a >= 0) {
89	t = sqrt((a + hypot(a, b)) * 0.5);
90	result = CMPLX(t, b / (2 * t));
91	} else {
92	t = sqrt((-a + hypot(a, b)) * 0.5);
93	result = CMPLX(fabs(b) / (2 * t), copysign(t, b));
94	}
95
96	/* Rescale. */
97	if (scale)
98	result *= 2;
99	return result;
100	}

lib/libc/wasi/libc-top-half/musl/src/complex/csqrtf.c deleted-82

...	@@ -1,82 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_csqrtf.c */
2	/*-
3	* Copyright (c) 2007 David Schultz <das@FreeBSD.ORG>
4	* All rights reserved.
5	*
6	* Redistribution and use in source and binary forms, with or without
7	* modification, are permitted provided that the following conditions
8	* are met:
9	* 1. Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.
11	* 2. Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.
14	*
15	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25	* SUCH DAMAGE.
26	*/
27
28	#include "complex_impl.h"
29
30	/*
31	* gcc doesn't implement complex multiplication or division correctly,
32	* so we need to handle infinities specially. We turn on this pragma to
33	* notify conforming c99 compilers that the fast-but-incorrect code that
34	* gcc generates is acceptable, since the special cases have already been
35	* handled.
36	*/
37	#pragma STDC CX_LIMITED_RANGE ON
38
39	float complex csqrtf(float complex z)
40	{
41	float a = crealf(z), b = cimagf(z);
42	double t;
43
44	/* Handle special cases. */
45	if (z == 0)
46	return CMPLXF(0, b);
47	if (isinf(b))
48	return CMPLXF(INFINITY, b);
49	if (isnan(a)) {
50	t = (b - b) / (b - b); /* raise invalid if b is not a NaN */
51	return CMPLXF(a, t); /* return NaN + NaN i */
52	}
53	if (isinf(a)) {
54	/*
55	* csqrtf(inf + NaN i) = inf + NaN i
56	* csqrtf(inf + y i) = inf + 0 i
57	* csqrtf(-inf + NaN i) = NaN +- inf i
58	* csqrtf(-inf + y i) = 0 + inf i
59	*/
60	if (signbit(a))
61	return CMPLXF(fabsf(b - b), copysignf(a, b));
62	else
63	return CMPLXF(a, copysignf(b - b, b));
64	}
65	/*
66	* The remaining special case (b is NaN) is handled just fine by
67	* the normal code path below.
68	*/
69
70	/*
71	* We compute t in double precision to avoid overflow and to
72	* provide correct rounding in nearly all cases.
73	* This is Algorithm 312, CACM vol 10, Oct 1967.
74	*/
75	if (a >= 0) {
76	t = sqrt((a + hypot(a, b)) * 0.5);
77	return CMPLXF(t, b / (2.0 * t));
78	} else {
79	t = sqrt((-a + hypot(a, b)) * 0.5);
80	return CMPLXF(fabsf(b) / (2.0 * t), copysignf(t, b));
81	}
82	}

lib/libc/wasi/libc-top-half/musl/src/complex/csqrtl.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include "complex_impl.h"
2
3	//FIXME
4	long double complex csqrtl(long double complex z)
5	{
6	return csqrt(z);
7	}

lib/libc/wasi/libc-top-half/musl/src/complex/ctan.c deleted-9

...	@@ -1,9 +0,0 @@
1	#include "complex_impl.h"
2
3	/* tan(z) = -i tanh(i z) */
4
5	double complex ctan(double complex z)
6	{
7	z = ctanh(CMPLX(-cimag(z), creal(z)));
8	return CMPLX(cimag(z), -creal(z));
9	}

lib/libc/wasi/libc-top-half/musl/src/complex/ctanf.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include "complex_impl.h"
2
3	float complex ctanf(float complex z)
4	{
5	z = ctanhf(CMPLXF(-cimagf(z), crealf(z)));
6	return CMPLXF(cimagf(z), -crealf(z));
7	}

lib/libc/wasi/libc-top-half/musl/src/complex/ctanh.c deleted-129

...	@@ -1,129 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_ctanh.c */
2	/*-
3	* Copyright (c) 2011 David Schultz
4	* All rights reserved.
5	*
6	* Redistribution and use in source and binary forms, with or without
7	* modification, are permitted provided that the following conditions
8	* are met:
9	* 1. Redistributions of source code must retain the above copyright
10	* notice unmodified, this list of conditions, and the following
11	* disclaimer.
12	* 2. Redistributions in binary form must reproduce the above copyright
13	* notice, this list of conditions and the following disclaimer in the
14	* documentation and/or other materials provided with the distribution.
15	*
16	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26	*/
27	/*
28	* Hyperbolic tangent of a complex argument z = x + i y.
29	*
30	* The algorithm is from:
31	*
32	* W. Kahan. Branch Cuts for Complex Elementary Functions or Much
33	* Ado About Nothing's Sign Bit. In The State of the Art in
34	* Numerical Analysis, pp. 165 ff. Iserles and Powell, eds., 1987.
35	*
36	* Method:
37	*
38	* Let t = tan(x)
39	* beta = 1/cos^2(y)
40	* s = sinh(x)
41	* rho = cosh(x)
42	*
43	* We have:
44	*
45	* tanh(z) = sinh(z) / cosh(z)
46	*
47	* sinh(x) cos(y) + i cosh(x) sin(y)
48	* = ---------------------------------
49	* cosh(x) cos(y) + i sinh(x) sin(y)
50	*
51	* cosh(x) sinh(x) / cos^2(y) + i tan(y)
52	* = -------------------------------------
53	* 1 + sinh^2(x) / cos^2(y)
54	*
55	* beta rho s + i t
56	* = ----------------
57	* 1 + beta s^2
58	*
59	* Modifications:
60	*
61	* I omitted the original algorithm's handling of overflow in tan(x) after
62	* verifying with nearpi.c that this can't happen in IEEE single or double
63	* precision. I also handle large x differently.
64	*/
65
66	#include "complex_impl.h"
67
68	double complex ctanh(double complex z)
69	{
70	double x, y;
71	double t, beta, s, rho, denom;
72	uint32_t hx, ix, lx;
73
74	x = creal(z);
75	y = cimag(z);
76
77	EXTRACT_WORDS(hx, lx, x);
78	ix = hx & 0x7fffffff;
79
80	/*
81	* ctanh(NaN + i 0) = NaN + i 0
82	*
83	* ctanh(NaN + i y) = NaN + i NaN for y != 0
84	*
85	* The imaginary part has the sign of xsin(2y), but there's no
86	* special effort to get this right.
87	*
88	* ctanh(+-Inf +- i Inf) = +-1 +- 0
89	*
90	* ctanh(+-Inf + i y) = +-1 + 0 sin(2y) for y finite
91	*
92	* The imaginary part of the sign is unspecified. This special
93	* case is only needed to avoid a spurious invalid exception when
94	* y is infinite.
95	*/
96	if (ix >= 0x7ff00000) {
97	if ((ix & 0xfffff) \| lx) /* x is NaN */
98	return CMPLX(x, (y == 0 ? y : x * y));
99	SET_HIGH_WORD(x, hx - 0x40000000); /* x = copysign(1, x) */
100	return CMPLX(x, copysign(0, isinf(y) ? y : sin(y) * cos(y)));
101	}
102
103	/*
104	* ctanh(+-0 + i NAN) = +-0 + i NaN
105	* ctanh(+-0 +- i Inf) = +-0 + i NaN
106	* ctanh(x + i NAN) = NaN + i NaN
107	* ctanh(x +- i Inf) = NaN + i NaN
108	*/
109	if (!isfinite(y))
110	return CMPLX(x ? y - y : x, y - y);
111
112	/*
113	* ctanh(+-huge + i +-y) ~= +-1 +- i 2sin(2y)/exp(2x), using the
114	* approximation sinh^2(huge) ~= exp(2*huge) / 4.
115	* We use a modified formula to avoid spurious overflow.
116	*/
117	if (ix >= 0x40360000) { /* x >= 22 */
118	double exp_mx = exp(-fabs(x));
119	return CMPLX(copysign(1, x), 4 * sin(y) * cos(y) * exp_mx * exp_mx);
120	}
121
122	/* Kahan's algorithm */
123	t = tan(y);
124	beta = 1.0 + t * t; /* = 1 / cos^2(y) */
125	s = sinh(x);
126	rho = sqrt(1 + s * s); /* = cosh(x) */
127	denom = 1 + beta * s * s;
128	return CMPLX((beta * rho * s) / denom, t / denom);
129	}

lib/libc/wasi/libc-top-half/musl/src/complex/ctanhf.c deleted-66

...	@@ -1,66 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_ctanhf.c */
2	/*-
3	* Copyright (c) 2011 David Schultz
4	* All rights reserved.
5	*
6	* Redistribution and use in source and binary forms, with or without
7	* modification, are permitted provided that the following conditions
8	* are met:
9	* 1. Redistributions of source code must retain the above copyright
10	* notice unmodified, this list of conditions, and the following
11	* disclaimer.
12	* 2. Redistributions in binary form must reproduce the above copyright
13	* notice, this list of conditions and the following disclaimer in the
14	* documentation and/or other materials provided with the distribution.
15	*
16	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26	*/
27	/*
28	* Hyperbolic tangent of a complex argument z. See s_ctanh.c for details.
29	*/
30
31	#include "complex_impl.h"
32
33	float complex ctanhf(float complex z)
34	{
35	float x, y;
36	float t, beta, s, rho, denom;
37	uint32_t hx, ix;
38
39	x = crealf(z);
40	y = cimagf(z);
41
42	GET_FLOAT_WORD(hx, x);
43	ix = hx & 0x7fffffff;
44
45	if (ix >= 0x7f800000) {
46	if (ix & 0x7fffff)
47	return CMPLXF(x, (y == 0 ? y : x * y));
48	SET_FLOAT_WORD(x, hx - 0x40000000);
49	return CMPLXF(x, copysignf(0, isinf(y) ? y : sinf(y) * cosf(y)));
50	}
51
52	if (!isfinite(y))
53	return CMPLXF(ix ? y - y : x, y - y);
54
55	if (ix >= 0x41300000) { /* x >= 11 */
56	float exp_mx = expf(-fabsf(x));
57	return CMPLXF(copysignf(1, x), 4 * sinf(y) * cosf(y) * exp_mx * exp_mx);
58	}
59
60	t = tanf(y);
61	beta = 1.0 + t * t;
62	s = sinhf(x);
63	rho = sqrtf(1 + s * s);
64	denom = 1 + beta * s * s;
65	return CMPLXF((beta * rho * s) / denom, t / denom);
66	}

lib/libc/wasi/libc-top-half/musl/src/complex/ctanhl.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include "complex_impl.h"
2
3	//FIXME
4	long double complex ctanhl(long double complex z)
5	{
6	return ctanh(z);
7	}

lib/libc/wasi/libc-top-half/musl/src/complex/ctanl.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include "complex_impl.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double complex ctanl(long double complex z)
5	{
6	return ctan(z);
7	}
8	#else
9	long double complex ctanl(long double complex z)
10	{
11	z = ctanhl(CMPLXL(-cimagl(z), creall(z)));
12	return CMPLXL(cimagl(z), -creall(z));
13	}
14	#endif

lib/libc/wasi/libc-top-half/musl/src/conf/legacy.c deleted-22

...	@@ -1,22 +0,0 @@
1	#include <sys/sysinfo.h>
2	#include <unistd.h>
3
4	int get_nprocs_conf()
5	{
6	return sysconf(_SC_NPROCESSORS_CONF);
7	}
8
9	int get_nprocs()
10	{
11	return sysconf(_SC_NPROCESSORS_ONLN);
12	}
13
14	long get_phys_pages()
15	{
16	return sysconf(_SC_PHYS_PAGES);
17	}
18
19	long get_avphys_pages()
20	{
21	return sysconf(_SC_AVPHYS_PAGES);
22	}

lib/libc/wasi/libc-top-half/musl/src/conf/pathconf.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <unistd.h>
2
3	long pathconf(const char *path, int name)
4	{
5	return fpathconf(-1, name);
6	}

lib/libc/wasi/libc-top-half/musl/src/crypt/crypt.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <unistd.h>
2	#include <crypt.h>
3
4	char crypt(const char key, const char *salt)
5	{
6	/* This buffer is sufficiently large for all
7	* currently-supported hash types. It needs to be updated if
8	* longer hashes are added. The cast to struct crypt_data * is
9	* purely to meet the public API requirements of the crypt_r
10	* function; the implementation of crypt_r uses the object
11	* purely as a char buffer. */
12	static char buf[128];
13	return __crypt_r(key, salt, (struct crypt_data *)buf);
14	}

lib/libc/wasi/libc-top-half/musl/src/crypt/crypt_blowfish.c deleted-806

...	@@ -1,806 +0,0 @@
1	/* Modified by Rich Felker in for inclusion in musl libc, based on
2	* Solar Designer's second size-optimized version sent to the musl
3	* mailing list. */
4
5	/*
6	* The crypt_blowfish homepage is:
7	*
8	* http://www.openwall.com/crypt/
9	*
10	* This code comes from John the Ripper password cracker, with reentrant
11	* and crypt(3) interfaces added, but optimizations specific to password
12	* cracking removed.
13	*
14	* Written by Solar Designer <solar at openwall.com> in 1998-2012.
15	* No copyright is claimed, and the software is hereby placed in the public
16	* domain. In case this attempt to disclaim copyright and place the software
17	* in the public domain is deemed null and void, then the software is
18	* Copyright (c) 1998-2014 Solar Designer and it is hereby released to the
19	* general public under the following terms:
20	*
21	* Redistribution and use in source and binary forms, with or without
22	* modification, are permitted.
23	*
24	* There's ABSOLUTELY NO WARRANTY, express or implied.
25	*
26	* It is my intent that you should be able to use this on your system,
27	* as part of a software package, or anywhere else to improve security,
28	* ensure compatibility, or for any other purpose. I would appreciate
29	* it if you give credit where it is due and keep your modifications in
30	* the public domain as well, but I don't require that in order to let
31	* you place this code and any modifications you make under a license
32	* of your choice.
33	*
34	* This implementation is fully compatible with OpenBSD's bcrypt.c for prefix
35	* "$2b$", originally by Niels Provos <provos at citi.umich.edu>, and it uses
36	* some of his ideas. The password hashing algorithm was designed by David
37	* Mazieres <dm at lcs.mit.edu>. For information on the level of
38	* compatibility for bcrypt hash prefixes other than "$2b$", please refer to
39	* the comments in BF_set_key() below and to the included crypt(3) man page.
40	*
41	* There's a paper on the algorithm that explains its design decisions:
42	*
43	* http://www.usenix.org/events/usenix99/provos.html
44	*
45	* Some of the tricks in BF_ROUND might be inspired by Eric Young's
46	* Blowfish library (I can't be sure if I would think of something if I
47	* hadn't seen his code).
48	*/
49
50	#include <string.h>
51	#include <stdint.h>
52
53	typedef uint32_t BF_word;
54	typedef int32_t BF_word_signed;
55
56	/* Number of Blowfish rounds, this is also hardcoded into a few places */
57	#define BF_N 16
58
59	typedef BF_word BF_key[BF_N + 2];
60
61	typedef union {
62	struct {
63	BF_key P;
64	BF_word S[4][0x100];
65	} s;
66	BF_word PS[BF_N + 2 + 4 * 0x100];
67	} BF_ctx;
68
69	/*
70	* Magic IV for 64 Blowfish encryptions that we do at the end.
71	* The string is "OrpheanBeholderScryDoubt" on big-endian.
72	*/
73	static const BF_word BF_magic_w[6] = {
74	0x4F727068, 0x65616E42, 0x65686F6C,
75	0x64657253, 0x63727944, 0x6F756274
76	};
77
78	/*
79	* P-box and S-box tables initialized with digits of Pi.
80	*/
81	static const BF_ctx BF_init_state = {{
82	{
83	0x243f6a88, 0x85a308d3, 0x13198a2e, 0x03707344,
84	0xa4093822, 0x299f31d0, 0x082efa98, 0xec4e6c89,
85	0x452821e6, 0x38d01377, 0xbe5466cf, 0x34e90c6c,
86	0xc0ac29b7, 0xc97c50dd, 0x3f84d5b5, 0xb5470917,
87	0x9216d5d9, 0x8979fb1b
88	}, {
89	{
90	0xd1310ba6, 0x98dfb5ac, 0x2ffd72db, 0xd01adfb7,
91	0xb8e1afed, 0x6a267e96, 0xba7c9045, 0xf12c7f99,
92	0x24a19947, 0xb3916cf7, 0x0801f2e2, 0x858efc16,
93	0x636920d8, 0x71574e69, 0xa458fea3, 0xf4933d7e,
94	0x0d95748f, 0x728eb658, 0x718bcd58, 0x82154aee,
95	0x7b54a41d, 0xc25a59b5, 0x9c30d539, 0x2af26013,
96	0xc5d1b023, 0x286085f0, 0xca417918, 0xb8db38ef,
97	0x8e79dcb0, 0x603a180e, 0x6c9e0e8b, 0xb01e8a3e,
98	0xd71577c1, 0xbd314b27, 0x78af2fda, 0x55605c60,
99	0xe65525f3, 0xaa55ab94, 0x57489862, 0x63e81440,
100	0x55ca396a, 0x2aab10b6, 0xb4cc5c34, 0x1141e8ce,
101	0xa15486af, 0x7c72e993, 0xb3ee1411, 0x636fbc2a,
102	0x2ba9c55d, 0x741831f6, 0xce5c3e16, 0x9b87931e,
103	0xafd6ba33, 0x6c24cf5c, 0x7a325381, 0x28958677,
104	0x3b8f4898, 0x6b4bb9af, 0xc4bfe81b, 0x66282193,
105	0x61d809cc, 0xfb21a991, 0x487cac60, 0x5dec8032,
106	0xef845d5d, 0xe98575b1, 0xdc262302, 0xeb651b88,
107	0x23893e81, 0xd396acc5, 0x0f6d6ff3, 0x83f44239,
108	0x2e0b4482, 0xa4842004, 0x69c8f04a, 0x9e1f9b5e,
109	0x21c66842, 0xf6e96c9a, 0x670c9c61, 0xabd388f0,
110	0x6a51a0d2, 0xd8542f68, 0x960fa728, 0xab5133a3,
111	0x6eef0b6c, 0x137a3be4, 0xba3bf050, 0x7efb2a98,
112	0xa1f1651d, 0x39af0176, 0x66ca593e, 0x82430e88,
113	0x8cee8619, 0x456f9fb4, 0x7d84a5c3, 0x3b8b5ebe,
114	0xe06f75d8, 0x85c12073, 0x401a449f, 0x56c16aa6,
115	0x4ed3aa62, 0x363f7706, 0x1bfedf72, 0x429b023d,
116	0x37d0d724, 0xd00a1248, 0xdb0fead3, 0x49f1c09b,
117	0x075372c9, 0x80991b7b, 0x25d479d8, 0xf6e8def7,
118	0xe3fe501a, 0xb6794c3b, 0x976ce0bd, 0x04c006ba,
119	0xc1a94fb6, 0x409f60c4, 0x5e5c9ec2, 0x196a2463,
120	0x68fb6faf, 0x3e6c53b5, 0x1339b2eb, 0x3b52ec6f,
121	0x6dfc511f, 0x9b30952c, 0xcc814544, 0xaf5ebd09,
122	0xbee3d004, 0xde334afd, 0x660f2807, 0x192e4bb3,
123	0xc0cba857, 0x45c8740f, 0xd20b5f39, 0xb9d3fbdb,
124	0x5579c0bd, 0x1a60320a, 0xd6a100c6, 0x402c7279,
125	0x679f25fe, 0xfb1fa3cc, 0x8ea5e9f8, 0xdb3222f8,
126	0x3c7516df, 0xfd616b15, 0x2f501ec8, 0xad0552ab,
127	0x323db5fa, 0xfd238760, 0x53317b48, 0x3e00df82,
128	0x9e5c57bb, 0xca6f8ca0, 0x1a87562e, 0xdf1769db,
129	0xd542a8f6, 0x287effc3, 0xac6732c6, 0x8c4f5573,
130	0x695b27b0, 0xbbca58c8, 0xe1ffa35d, 0xb8f011a0,
131	0x10fa3d98, 0xfd2183b8, 0x4afcb56c, 0x2dd1d35b,
132	0x9a53e479, 0xb6f84565, 0xd28e49bc, 0x4bfb9790,
133	0xe1ddf2da, 0xa4cb7e33, 0x62fb1341, 0xcee4c6e8,
134	0xef20cada, 0x36774c01, 0xd07e9efe, 0x2bf11fb4,
135	0x95dbda4d, 0xae909198, 0xeaad8e71, 0x6b93d5a0,
136	0xd08ed1d0, 0xafc725e0, 0x8e3c5b2f, 0x8e7594b7,
137	0x8ff6e2fb, 0xf2122b64, 0x8888b812, 0x900df01c,
138	0x4fad5ea0, 0x688fc31c, 0xd1cff191, 0xb3a8c1ad,
139	0x2f2f2218, 0xbe0e1777, 0xea752dfe, 0x8b021fa1,
140	0xe5a0cc0f, 0xb56f74e8, 0x18acf3d6, 0xce89e299,
141	0xb4a84fe0, 0xfd13e0b7, 0x7cc43b81, 0xd2ada8d9,
142	0x165fa266, 0x80957705, 0x93cc7314, 0x211a1477,
143	0xe6ad2065, 0x77b5fa86, 0xc75442f5, 0xfb9d35cf,
144	0xebcdaf0c, 0x7b3e89a0, 0xd6411bd3, 0xae1e7e49,
145	0x00250e2d, 0x2071b35e, 0x226800bb, 0x57b8e0af,
146	0x2464369b, 0xf009b91e, 0x5563911d, 0x59dfa6aa,
147	0x78c14389, 0xd95a537f, 0x207d5ba2, 0x02e5b9c5,
148	0x83260376, 0x6295cfa9, 0x11c81968, 0x4e734a41,
149	0xb3472dca, 0x7b14a94a, 0x1b510052, 0x9a532915,
150	0xd60f573f, 0xbc9bc6e4, 0x2b60a476, 0x81e67400,
151	0x08ba6fb5, 0x571be91f, 0xf296ec6b, 0x2a0dd915,
152	0xb6636521, 0xe7b9f9b6, 0xff34052e, 0xc5855664,
153	0x53b02d5d, 0xa99f8fa1, 0x08ba4799, 0x6e85076a
154	}, {
155	0x4b7a70e9, 0xb5b32944, 0xdb75092e, 0xc4192623,
156	0xad6ea6b0, 0x49a7df7d, 0x9cee60b8, 0x8fedb266,
157	0xecaa8c71, 0x699a17ff, 0x5664526c, 0xc2b19ee1,
158	0x193602a5, 0x75094c29, 0xa0591340, 0xe4183a3e,
159	0x3f54989a, 0x5b429d65, 0x6b8fe4d6, 0x99f73fd6,
160	0xa1d29c07, 0xefe830f5, 0x4d2d38e6, 0xf0255dc1,
161	0x4cdd2086, 0x8470eb26, 0x6382e9c6, 0x021ecc5e,
162	0x09686b3f, 0x3ebaefc9, 0x3c971814, 0x6b6a70a1,
163	0x687f3584, 0x52a0e286, 0xb79c5305, 0xaa500737,
164	0x3e07841c, 0x7fdeae5c, 0x8e7d44ec, 0x5716f2b8,
165	0xb03ada37, 0xf0500c0d, 0xf01c1f04, 0x0200b3ff,
166	0xae0cf51a, 0x3cb574b2, 0x25837a58, 0xdc0921bd,
167	0xd19113f9, 0x7ca92ff6, 0x94324773, 0x22f54701,
168	0x3ae5e581, 0x37c2dadc, 0xc8b57634, 0x9af3dda7,
169	0xa9446146, 0x0fd0030e, 0xecc8c73e, 0xa4751e41,
170	0xe238cd99, 0x3bea0e2f, 0x3280bba1, 0x183eb331,
171	0x4e548b38, 0x4f6db908, 0x6f420d03, 0xf60a04bf,
172	0x2cb81290, 0x24977c79, 0x5679b072, 0xbcaf89af,
173	0xde9a771f, 0xd9930810, 0xb38bae12, 0xdccf3f2e,
174	0x5512721f, 0x2e6b7124, 0x501adde6, 0x9f84cd87,
175	0x7a584718, 0x7408da17, 0xbc9f9abc, 0xe94b7d8c,
176	0xec7aec3a, 0xdb851dfa, 0x63094366, 0xc464c3d2,
177	0xef1c1847, 0x3215d908, 0xdd433b37, 0x24c2ba16,
178	0x12a14d43, 0x2a65c451, 0x50940002, 0x133ae4dd,
179	0x71dff89e, 0x10314e55, 0x81ac77d6, 0x5f11199b,
180	0x043556f1, 0xd7a3c76b, 0x3c11183b, 0x5924a509,
181	0xf28fe6ed, 0x97f1fbfa, 0x9ebabf2c, 0x1e153c6e,
182	0x86e34570, 0xeae96fb1, 0x860e5e0a, 0x5a3e2ab3,
183	0x771fe71c, 0x4e3d06fa, 0x2965dcb9, 0x99e71d0f,
184	0x803e89d6, 0x5266c825, 0x2e4cc978, 0x9c10b36a,
185	0xc6150eba, 0x94e2ea78, 0xa5fc3c53, 0x1e0a2df4,
186	0xf2f74ea7, 0x361d2b3d, 0x1939260f, 0x19c27960,
187	0x5223a708, 0xf71312b6, 0xebadfe6e, 0xeac31f66,
188	0xe3bc4595, 0xa67bc883, 0xb17f37d1, 0x018cff28,
189	0xc332ddef, 0xbe6c5aa5, 0x65582185, 0x68ab9802,
190	0xeecea50f, 0xdb2f953b, 0x2aef7dad, 0x5b6e2f84,
191	0x1521b628, 0x29076170, 0xecdd4775, 0x619f1510,
192	0x13cca830, 0xeb61bd96, 0x0334fe1e, 0xaa0363cf,
193	0xb5735c90, 0x4c70a239, 0xd59e9e0b, 0xcbaade14,
194	0xeecc86bc, 0x60622ca7, 0x9cab5cab, 0xb2f3846e,
195	0x648b1eaf, 0x19bdf0ca, 0xa02369b9, 0x655abb50,
196	0x40685a32, 0x3c2ab4b3, 0x319ee9d5, 0xc021b8f7,
197	0x9b540b19, 0x875fa099, 0x95f7997e, 0x623d7da8,
198	0xf837889a, 0x97e32d77, 0x11ed935f, 0x16681281,
199	0x0e358829, 0xc7e61fd6, 0x96dedfa1, 0x7858ba99,
200	0x57f584a5, 0x1b227263, 0x9b83c3ff, 0x1ac24696,
201	0xcdb30aeb, 0x532e3054, 0x8fd948e4, 0x6dbc3128,
202	0x58ebf2ef, 0x34c6ffea, 0xfe28ed61, 0xee7c3c73,
203	0x5d4a14d9, 0xe864b7e3, 0x42105d14, 0x203e13e0,
204	0x45eee2b6, 0xa3aaabea, 0xdb6c4f15, 0xfacb4fd0,
205	0xc742f442, 0xef6abbb5, 0x654f3b1d, 0x41cd2105,
206	0xd81e799e, 0x86854dc7, 0xe44b476a, 0x3d816250,
207	0xcf62a1f2, 0x5b8d2646, 0xfc8883a0, 0xc1c7b6a3,
208	0x7f1524c3, 0x69cb7492, 0x47848a0b, 0x5692b285,
209	0x095bbf00, 0xad19489d, 0x1462b174, 0x23820e00,
210	0x58428d2a, 0x0c55f5ea, 0x1dadf43e, 0x233f7061,
211	0x3372f092, 0x8d937e41, 0xd65fecf1, 0x6c223bdb,
212	0x7cde3759, 0xcbee7460, 0x4085f2a7, 0xce77326e,
213	0xa6078084, 0x19f8509e, 0xe8efd855, 0x61d99735,
214	0xa969a7aa, 0xc50c06c2, 0x5a04abfc, 0x800bcadc,
215	0x9e447a2e, 0xc3453484, 0xfdd56705, 0x0e1e9ec9,
216	0xdb73dbd3, 0x105588cd, 0x675fda79, 0xe3674340,
217	0xc5c43465, 0x713e38d8, 0x3d28f89e, 0xf16dff20,
218	0x153e21e7, 0x8fb03d4a, 0xe6e39f2b, 0xdb83adf7
219	}, {
220	0xe93d5a68, 0x948140f7, 0xf64c261c, 0x94692934,
221	0x411520f7, 0x7602d4f7, 0xbcf46b2e, 0xd4a20068,
222	0xd4082471, 0x3320f46a, 0x43b7d4b7, 0x500061af,
223	0x1e39f62e, 0x97244546, 0x14214f74, 0xbf8b8840,
224	0x4d95fc1d, 0x96b591af, 0x70f4ddd3, 0x66a02f45,
225	0xbfbc09ec, 0x03bd9785, 0x7fac6dd0, 0x31cb8504,
226	0x96eb27b3, 0x55fd3941, 0xda2547e6, 0xabca0a9a,
227	0x28507825, 0x530429f4, 0x0a2c86da, 0xe9b66dfb,
228	0x68dc1462, 0xd7486900, 0x680ec0a4, 0x27a18dee,
229	0x4f3ffea2, 0xe887ad8c, 0xb58ce006, 0x7af4d6b6,
230	0xaace1e7c, 0xd3375fec, 0xce78a399, 0x406b2a42,
231	0x20fe9e35, 0xd9f385b9, 0xee39d7ab, 0x3b124e8b,
232	0x1dc9faf7, 0x4b6d1856, 0x26a36631, 0xeae397b2,
233	0x3a6efa74, 0xdd5b4332, 0x6841e7f7, 0xca7820fb,
234	0xfb0af54e, 0xd8feb397, 0x454056ac, 0xba489527,
235	0x55533a3a, 0x20838d87, 0xfe6ba9b7, 0xd096954b,
236	0x55a867bc, 0xa1159a58, 0xcca92963, 0x99e1db33,
237	0xa62a4a56, 0x3f3125f9, 0x5ef47e1c, 0x9029317c,
238	0xfdf8e802, 0x04272f70, 0x80bb155c, 0x05282ce3,
239	0x95c11548, 0xe4c66d22, 0x48c1133f, 0xc70f86dc,
240	0x07f9c9ee, 0x41041f0f, 0x404779a4, 0x5d886e17,
241	0x325f51eb, 0xd59bc0d1, 0xf2bcc18f, 0x41113564,
242	0x257b7834, 0x602a9c60, 0xdff8e8a3, 0x1f636c1b,
243	0x0e12b4c2, 0x02e1329e, 0xaf664fd1, 0xcad18115,
244	0x6b2395e0, 0x333e92e1, 0x3b240b62, 0xeebeb922,
245	0x85b2a20e, 0xe6ba0d99, 0xde720c8c, 0x2da2f728,
246	0xd0127845, 0x95b794fd, 0x647d0862, 0xe7ccf5f0,
247	0x5449a36f, 0x877d48fa, 0xc39dfd27, 0xf33e8d1e,
248	0x0a476341, 0x992eff74, 0x3a6f6eab, 0xf4f8fd37,
249	0xa812dc60, 0xa1ebddf8, 0x991be14c, 0xdb6e6b0d,
250	0xc67b5510, 0x6d672c37, 0x2765d43b, 0xdcd0e804,
251	0xf1290dc7, 0xcc00ffa3, 0xb5390f92, 0x690fed0b,
252	0x667b9ffb, 0xcedb7d9c, 0xa091cf0b, 0xd9155ea3,
253	0xbb132f88, 0x515bad24, 0x7b9479bf, 0x763bd6eb,
254	0x37392eb3, 0xcc115979, 0x8026e297, 0xf42e312d,
255	0x6842ada7, 0xc66a2b3b, 0x12754ccc, 0x782ef11c,
256	0x6a124237, 0xb79251e7, 0x06a1bbe6, 0x4bfb6350,
257	0x1a6b1018, 0x11caedfa, 0x3d25bdd8, 0xe2e1c3c9,
258	0x44421659, 0x0a121386, 0xd90cec6e, 0xd5abea2a,
259	0x64af674e, 0xda86a85f, 0xbebfe988, 0x64e4c3fe,
260	0x9dbc8057, 0xf0f7c086, 0x60787bf8, 0x6003604d,
261	0xd1fd8346, 0xf6381fb0, 0x7745ae04, 0xd736fccc,
262	0x83426b33, 0xf01eab71, 0xb0804187, 0x3c005e5f,
263	0x77a057be, 0xbde8ae24, 0x55464299, 0xbf582e61,
264	0x4e58f48f, 0xf2ddfda2, 0xf474ef38, 0x8789bdc2,
265	0x5366f9c3, 0xc8b38e74, 0xb475f255, 0x46fcd9b9,
266	0x7aeb2661, 0x8b1ddf84, 0x846a0e79, 0x915f95e2,
267	0x466e598e, 0x20b45770, 0x8cd55591, 0xc902de4c,
268	0xb90bace1, 0xbb8205d0, 0x11a86248, 0x7574a99e,
269	0xb77f19b6, 0xe0a9dc09, 0x662d09a1, 0xc4324633,
270	0xe85a1f02, 0x09f0be8c, 0x4a99a025, 0x1d6efe10,
271	0x1ab93d1d, 0x0ba5a4df, 0xa186f20f, 0x2868f169,
272	0xdcb7da83, 0x573906fe, 0xa1e2ce9b, 0x4fcd7f52,
273	0x50115e01, 0xa70683fa, 0xa002b5c4, 0x0de6d027,
274	0x9af88c27, 0x773f8641, 0xc3604c06, 0x61a806b5,
275	0xf0177a28, 0xc0f586e0, 0x006058aa, 0x30dc7d62,
276	0x11e69ed7, 0x2338ea63, 0x53c2dd94, 0xc2c21634,
277	0xbbcbee56, 0x90bcb6de, 0xebfc7da1, 0xce591d76,
278	0x6f05e409, 0x4b7c0188, 0x39720a3d, 0x7c927c24,
279	0x86e3725f, 0x724d9db9, 0x1ac15bb4, 0xd39eb8fc,
280	0xed545578, 0x08fca5b5, 0xd83d7cd3, 0x4dad0fc4,
281	0x1e50ef5e, 0xb161e6f8, 0xa28514d9, 0x6c51133c,
282	0x6fd5c7e7, 0x56e14ec4, 0x362abfce, 0xddc6c837,
283	0xd79a3234, 0x92638212, 0x670efa8e, 0x406000e0
284	}, {
285	0x3a39ce37, 0xd3faf5cf, 0xabc27737, 0x5ac52d1b,
286	0x5cb0679e, 0x4fa33742, 0xd3822740, 0x99bc9bbe,
287	0xd5118e9d, 0xbf0f7315, 0xd62d1c7e, 0xc700c47b,
288	0xb78c1b6b, 0x21a19045, 0xb26eb1be, 0x6a366eb4,
289	0x5748ab2f, 0xbc946e79, 0xc6a376d2, 0x6549c2c8,
290	0x530ff8ee, 0x468dde7d, 0xd5730a1d, 0x4cd04dc6,
291	0x2939bbdb, 0xa9ba4650, 0xac9526e8, 0xbe5ee304,
292	0xa1fad5f0, 0x6a2d519a, 0x63ef8ce2, 0x9a86ee22,
293	0xc089c2b8, 0x43242ef6, 0xa51e03aa, 0x9cf2d0a4,
294	0x83c061ba, 0x9be96a4d, 0x8fe51550, 0xba645bd6,
295	0x2826a2f9, 0xa73a3ae1, 0x4ba99586, 0xef5562e9,
296	0xc72fefd3, 0xf752f7da, 0x3f046f69, 0x77fa0a59,
297	0x80e4a915, 0x87b08601, 0x9b09e6ad, 0x3b3ee593,
298	0xe990fd5a, 0x9e34d797, 0x2cf0b7d9, 0x022b8b51,
299	0x96d5ac3a, 0x017da67d, 0xd1cf3ed6, 0x7c7d2d28,
300	0x1f9f25cf, 0xadf2b89b, 0x5ad6b472, 0x5a88f54c,
301	0xe029ac71, 0xe019a5e6, 0x47b0acfd, 0xed93fa9b,
302	0xe8d3c48d, 0x283b57cc, 0xf8d56629, 0x79132e28,
303	0x785f0191, 0xed756055, 0xf7960e44, 0xe3d35e8c,
304	0x15056dd4, 0x88f46dba, 0x03a16125, 0x0564f0bd,
305	0xc3eb9e15, 0x3c9057a2, 0x97271aec, 0xa93a072a,
306	0x1b3f6d9b, 0x1e6321f5, 0xf59c66fb, 0x26dcf319,
307	0x7533d928, 0xb155fdf5, 0x03563482, 0x8aba3cbb,
308	0x28517711, 0xc20ad9f8, 0xabcc5167, 0xccad925f,
309	0x4de81751, 0x3830dc8e, 0x379d5862, 0x9320f991,
310	0xea7a90c2, 0xfb3e7bce, 0x5121ce64, 0x774fbe32,
311	0xa8b6e37e, 0xc3293d46, 0x48de5369, 0x6413e680,
312	0xa2ae0810, 0xdd6db224, 0x69852dfd, 0x09072166,
313	0xb39a460a, 0x6445c0dd, 0x586cdecf, 0x1c20c8ae,
314	0x5bbef7dd, 0x1b588d40, 0xccd2017f, 0x6bb4e3bb,
315	0xdda26a7e, 0x3a59ff45, 0x3e350a44, 0xbcb4cdd5,
316	0x72eacea8, 0xfa6484bb, 0x8d6612ae, 0xbf3c6f47,
317	0xd29be463, 0x542f5d9e, 0xaec2771b, 0xf64e6370,
318	0x740e0d8d, 0xe75b1357, 0xf8721671, 0xaf537d5d,
319	0x4040cb08, 0x4eb4e2cc, 0x34d2466a, 0x0115af84,
320	0xe1b00428, 0x95983a1d, 0x06b89fb4, 0xce6ea048,
321	0x6f3f3b82, 0x3520ab82, 0x011a1d4b, 0x277227f8,
322	0x611560b1, 0xe7933fdc, 0xbb3a792b, 0x344525bd,
323	0xa08839e1, 0x51ce794b, 0x2f32c9b7, 0xa01fbac9,
324	0xe01cc87e, 0xbcc7d1f6, 0xcf0111c3, 0xa1e8aac7,
325	0x1a908749, 0xd44fbd9a, 0xd0dadecb, 0xd50ada38,
326	0x0339c32a, 0xc6913667, 0x8df9317c, 0xe0b12b4f,
327	0xf79e59b7, 0x43f5bb3a, 0xf2d519ff, 0x27d9459c,
328	0xbf97222c, 0x15e6fc2a, 0x0f91fc71, 0x9b941525,
329	0xfae59361, 0xceb69ceb, 0xc2a86459, 0x12baa8d1,
330	0xb6c1075e, 0xe3056a0c, 0x10d25065, 0xcb03a442,
331	0xe0ec6e0e, 0x1698db3b, 0x4c98a0be, 0x3278e964,
332	0x9f1f9532, 0xe0d392df, 0xd3a0342b, 0x8971f21e,
333	0x1b0a7441, 0x4ba3348c, 0xc5be7120, 0xc37632d8,
334	0xdf359f8d, 0x9b992f2e, 0xe60b6f47, 0x0fe3f11d,
335	0xe54cda54, 0x1edad891, 0xce6279cf, 0xcd3e7e6f,
336	0x1618b166, 0xfd2c1d05, 0x848fd2c5, 0xf6fb2299,
337	0xf523f357, 0xa6327623, 0x93a83531, 0x56cccd02,
338	0xacf08162, 0x5a75ebb5, 0x6e163697, 0x88d273cc,
339	0xde966292, 0x81b949d0, 0x4c50901b, 0x71c65614,
340	0xe6c6c7bd, 0x327a140a, 0x45e1d006, 0xc3f27b9a,
341	0xc9aa53fd, 0x62a80f00, 0xbb25bfe2, 0x35bdd2f6,
342	0x71126905, 0xb2040222, 0xb6cbcf7c, 0xcd769c2b,
343	0x53113ec0, 0x1640e3d3, 0x38abbd60, 0x2547adf0,
344	0xba38209c, 0xf746ce76, 0x77afa1c5, 0x20756060,
345	0x85cbfe4e, 0x8ae88dd8, 0x7aaaf9b0, 0x4cf9aa7e,
346	0x1948c25c, 0x02fb8a8c, 0x01c36ae4, 0xd6ebe1f9,
347	0x90d4f869, 0xa65cdea0, 0x3f09252d, 0xc208e69f,
348	0xb74e6132, 0xce77e25b, 0x578fdfe3, 0x3ac372e6
349	}
350	}
351	}};
352
353	static const unsigned char BF_itoa64[64 + 1] =
354	"./ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789";
355
356	static const unsigned char BF_atoi64[0x60] = {
357	64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 0, 1,
358	54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 64, 64, 64, 64, 64,
359	64, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16,
360	17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 64, 64, 64, 64, 64,
361	64, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42,
362	43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 64, 64, 64, 64, 64
363	};
364
365	#define BF_safe_atoi64(dst, src) \
366	{ \
367	tmp = (unsigned char)(src); \
368	if ((unsigned int)(tmp -= 0x20) >= 0x60) return -1; \
369	tmp = BF_atoi64[tmp]; \
370	if (tmp > 63) return -1; \
371	(dst) = tmp; \
372	}
373
374	static int BF_decode(BF_word dst, const char src, int size)
375	{
376	unsigned char dptr = (unsigned char )dst;
377	unsigned char *end = dptr + size;
378	const unsigned char sptr = (const unsigned char )src;
379	unsigned int tmp, c1, c2, c3, c4;
380
381	do {
382	BF_safe_atoi64(c1, *sptr++);
383	BF_safe_atoi64(c2, *sptr++);
384	*dptr++ = (c1 << 2) \| ((c2 & 0x30) >> 4);
385	if (dptr >= end) break;
386
387	BF_safe_atoi64(c3, *sptr++);
388	*dptr++ = ((c2 & 0x0F) << 4) \| ((c3 & 0x3C) >> 2);
389	if (dptr >= end) break;
390
391	BF_safe_atoi64(c4, *sptr++);
392	*dptr++ = ((c3 & 0x03) << 6) \| c4;
393	} while (dptr < end);
394
395	return 0;
396	}
397
398	static void BF_encode(char dst, const BF_word src, int size)
399	{
400	const unsigned char sptr = (const unsigned char )src;
401	const unsigned char *end = sptr + size;
402	unsigned char dptr = (unsigned char )dst;
403	unsigned int c1, c2;
404
405	do {
406	c1 = *sptr++;
407	*dptr++ = BF_itoa64[c1 >> 2];
408	c1 = (c1 & 0x03) << 4;
409	if (sptr >= end) {
410	*dptr++ = BF_itoa64[c1];
411	break;
412	}
413
414	c2 = *sptr++;
415	c1 \|= c2 >> 4;
416	*dptr++ = BF_itoa64[c1];
417	c1 = (c2 & 0x0f) << 2;
418	if (sptr >= end) {
419	*dptr++ = BF_itoa64[c1];
420	break;
421	}
422
423	c2 = *sptr++;
424	c1 \|= c2 >> 6;
425	*dptr++ = BF_itoa64[c1];
426	*dptr++ = BF_itoa64[c2 & 0x3f];
427	} while (sptr < end);
428	}
429
430	static void BF_swap(BF_word *x, int count)
431	{
432	if ((union { int i; char c; }){1}.c)
433	do {
434	BF_word tmp = *x;
435	tmp = (tmp << 16) \| (tmp >> 16);
436	*x++ = ((tmp & 0x00FF00FF) << 8) \| ((tmp >> 8) & 0x00FF00FF);
437	} while (--count);
438	}
439
440	#define BF_ROUND(L, R, N) \
441	tmp1 = L & 0xFF; \
442	tmp2 = L >> 8; \
443	tmp2 &= 0xFF; \
444	tmp3 = L >> 16; \
445	tmp3 &= 0xFF; \
446	tmp4 = L >> 24; \
447	tmp1 = ctx->s.S[3][tmp1]; \
448	tmp2 = ctx->s.S[2][tmp2]; \
449	tmp3 = ctx->s.S[1][tmp3]; \
450	tmp3 += ctx->s.S[0][tmp4]; \
451	tmp3 ^= tmp2; \
452	R ^= ctx->s.P[N + 1]; \
453	tmp3 += tmp1; \
454	R ^= tmp3;
455
456	static BF_word BF_encrypt(BF_ctx *ctx,
457	BF_word L, BF_word R,
458	BF_word start, BF_word end)
459	{
460	BF_word tmp1, tmp2, tmp3, tmp4;
461	BF_word *ptr = start;
462
463	do {
464	L ^= ctx->s.P[0];
465	#if 0
466	BF_ROUND(L, R, 0);
467	BF_ROUND(R, L, 1);
468	BF_ROUND(L, R, 2);
469	BF_ROUND(R, L, 3);
470	BF_ROUND(L, R, 4);
471	BF_ROUND(R, L, 5);
472	BF_ROUND(L, R, 6);
473	BF_ROUND(R, L, 7);
474	BF_ROUND(L, R, 8);
475	BF_ROUND(R, L, 9);
476	BF_ROUND(L, R, 10);
477	BF_ROUND(R, L, 11);
478	BF_ROUND(L, R, 12);
479	BF_ROUND(R, L, 13);
480	BF_ROUND(L, R, 14);
481	BF_ROUND(R, L, 15);
482	#else
483	for (int i=0; i<16; i+=2) {
484	BF_ROUND(L, R, i);
485	BF_ROUND(R, L, i+1);
486	}
487	#endif
488	tmp4 = R;
489	R = L;
490	L = tmp4 ^ ctx->s.P[BF_N + 1];
491	*ptr++ = L;
492	*ptr++ = R;
493	} while (ptr < end);
494
495	return L;
496	}
497
498	static void BF_set_key(const char *key, BF_key expanded, BF_key initial,
499	unsigned char flags)
500	{
501	const char *ptr = key;
502	unsigned int bug, i, j;
503	BF_word safety, sign, diff, tmp[2];
504
505	/*
506	* There was a sign extension bug in older revisions of this function. While
507	* we would have liked to simply fix the bug and move on, we have to provide
508	* a backwards compatibility feature (essentially the bug) for some systems and
509	* a safety measure for some others. The latter is needed because for certain
510	* multiple inputs to the buggy algorithm there exist easily found inputs to
511	* the correct algorithm that produce the same hash. Thus, we optionally
512	* deviate from the correct algorithm just enough to avoid such collisions.
513	* While the bug itself affected the majority of passwords containing
514	* characters with the 8th bit set (although only a percentage of those in a
515	* collision-producing way), the anti-collision safety measure affects
516	* only a subset of passwords containing the '\xff' character (not even all of
517	* those passwords, just some of them). This character is not found in valid
518	* UTF-8 sequences and is rarely used in popular 8-bit character encodings.
519	* Thus, the safety measure is unlikely to cause much annoyance, and is a
520	* reasonable tradeoff to use when authenticating against existing hashes that
521	* are not reliably known to have been computed with the correct algorithm.
522	*
523	* We use an approach that tries to minimize side-channel leaks of password
524	* information - that is, we mostly use fixed-cost bitwise operations instead
525	* of branches or table lookups. (One conditional branch based on password
526	* length remains. It is not part of the bug aftermath, though, and is
527	* difficult and possibly unreasonable to avoid given the use of C strings by
528	* the caller, which results in similar timing leaks anyway.)
529	*
530	* For actual implementation, we set an array index in the variable "bug"
531	* (0 means no bug, 1 means sign extension bug emulation) and a flag in the
532	* variable "safety" (bit 16 is set when the safety measure is requested).
533	* Valid combinations of settings are:
534	*
535	* Prefix "$2a$": bug = 0, safety = 0x10000
536	* Prefix "$2b$": bug = 0, safety = 0
537	* Prefix "$2x$": bug = 1, safety = 0
538	* Prefix "$2y$": bug = 0, safety = 0
539	*/
540	bug = flags & 1;
541	safety = ((BF_word)flags & 2) << 15;
542
543	sign = diff = 0;
544
545	for (i = 0; i < BF_N + 2; i++) {
546	tmp[0] = tmp[1] = 0;
547	for (j = 0; j < 4; j++) {
548	tmp[0] <<= 8;
549	tmp[0] \|= (unsigned char)ptr; / correct */
550	tmp[1] <<= 8;
551	tmp[1] \|= (signed char)ptr; / bug */
552	/*
553	* Sign extension in the first char has no effect - nothing to overwrite yet,
554	* and those extra 24 bits will be fully shifted out of the 32-bit word. For
555	* chars 2, 3, 4 in each four-char block, we set bit 7 of "sign" if sign
556	* extension in tmp[1] occurs. Once this flag is set, it remains set.
557	*/
558	if (j)
559	sign \|= tmp[1] & 0x80;
560	if (!*ptr)
561	ptr = key;
562	else
563	ptr++;
564	}
565	diff \|= tmp[0] ^ tmp[1]; /* Non-zero on any differences */
566
567	expanded[i] = tmp[bug];
568	initial[i] = BF_init_state.s.P[i] ^ tmp[bug];
569	}
570
571	/*
572	* At this point, "diff" is zero iff the correct and buggy algorithms produced
573	* exactly the same result. If so and if "sign" is non-zero, which indicates
574	* that there was a non-benign sign extension, this means that we have a
575	* collision between the correctly computed hash for this password and a set of
576	* passwords that could be supplied to the buggy algorithm. Our safety measure
577	* is meant to protect from such many-buggy to one-correct collisions, by
578	* deviating from the correct algorithm in such cases. Let's check for this.
579	*/
580	diff \|= diff >> 16; /* still zero iff exact match */
581	diff &= 0xffff; /* ditto */
582	diff += 0xffff; /* bit 16 set iff "diff" was non-zero (on non-match) */
583	sign <<= 9; /* move the non-benign sign extension flag to bit 16 */
584	sign &= ~diff & safety; /* action needed? */
585
586	/*
587	* If we have determined that we need to deviate from the correct algorithm,
588	* flip bit 16 in initial expanded key. (The choice of 16 is arbitrary, but
589	* let's stick to it now. It came out of the approach we used above, and it's
590	* not any worse than any other choice we could make.)
591	*
592	* It is crucial that we don't do the same to the expanded key used in the main
593	* Eksblowfish loop. By doing it to only one of these two, we deviate from a
594	* state that could be directly specified by a password to the buggy algorithm
595	* (and to the fully correct one as well, but that's a side-effect).
596	*/
597	initial[0] ^= sign;
598	}
599
600	static const unsigned char flags_by_subtype[26] = {
601	2, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
602	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 4, 0
603	};
604
605	static char BF_crypt(const char key, const char *setting,
606	char *output, BF_word min)
607	{
608	struct {
609	BF_ctx ctx;
610	BF_key expanded_key;
611	union {
612	BF_word salt[4];
613	BF_word output[6];
614	} binary;
615	} data;
616	BF_word count;
617	int i;
618
619	if (setting[0] != '$' \|\|
620	setting[1] != '2' \|\|
621	setting[2] - 'a' > 25U \|\|
622	!flags_by_subtype[setting[2] - 'a'] \|\|
623	setting[3] != '$' \|\|
624	setting[4] - '0' > 1U \|\|
625	setting[5] - '0' > 9U \|\|
626	setting[6] != '$') {
627	return NULL;
628	}
629
630	count = (BF_word)1 << ((setting[4] - '0') * 10 + (setting[5] - '0'));
631	if (count < min \|\| BF_decode(data.binary.salt, &setting[7], 16)) {
632	return NULL;
633	}
634	BF_swap(data.binary.salt, 4);
635
636	BF_set_key(key, data.expanded_key, data.ctx.s.P,
637	flags_by_subtype[setting[2] - 'a']);
638
639	memcpy(data.ctx.s.S, BF_init_state.s.S, sizeof(data.ctx.s.S));
640
641	{
642	BF_word L = 0, R = 0;
643	BF_word *ptr = &data.ctx.PS[0];
644	do {
645	L = BF_encrypt(&data.ctx,
646	L ^ data.binary.salt[0], R ^ data.binary.salt[1],
647	ptr, ptr);
648	R = *(ptr + 1);
649	ptr += 2;
650
651	if (ptr >= &data.ctx.PS[BF_N + 2 + 4 * 0x100])
652	break;
653
654	L = BF_encrypt(&data.ctx,
655	L ^ data.binary.salt[2], R ^ data.binary.salt[3],
656	ptr, ptr);
657	R = *(ptr + 1);
658	ptr += 2;
659	} while (1);
660	}
661
662	do {
663	int done;
664
665	for (i = 0; i < BF_N + 2; i += 2) {
666	data.ctx.s.P[i] ^= data.expanded_key[i];
667	data.ctx.s.P[i + 1] ^= data.expanded_key[i + 1];
668	}
669
670	done = 0;
671	do {
672	BF_encrypt(&data.ctx, 0, 0,
673	&data.ctx.PS[0],
674	&data.ctx.PS[BF_N + 2 + 4 * 0x100]);
675
676	if (done)
677	break;
678	done = 1;
679
680	{
681	BF_word tmp1, tmp2, tmp3, tmp4;
682
683	tmp1 = data.binary.salt[0];
684	tmp2 = data.binary.salt[1];
685	tmp3 = data.binary.salt[2];
686	tmp4 = data.binary.salt[3];
687	for (i = 0; i < BF_N; i += 4) {
688	data.ctx.s.P[i] ^= tmp1;
689	data.ctx.s.P[i + 1] ^= tmp2;
690	data.ctx.s.P[i + 2] ^= tmp3;
691	data.ctx.s.P[i + 3] ^= tmp4;
692	}
693	data.ctx.s.P[16] ^= tmp1;
694	data.ctx.s.P[17] ^= tmp2;
695	}
696	} while (1);
697	} while (--count);
698
699	for (i = 0; i < 6; i += 2) {
700	BF_word L, LR[2];
701
702	L = BF_magic_w[i];
703	LR[1] = BF_magic_w[i + 1];
704
705	count = 64;
706	do {
707	L = BF_encrypt(&data.ctx, L, LR[1],
708	&LR[0], &LR[0]);
709	} while (--count);
710
711	data.binary.output[i] = L;
712	data.binary.output[i + 1] = LR[1];
713	}
714
715	memcpy(output, setting, 7 + 22 - 1);
716	output[7 + 22 - 1] = BF_itoa64[
717	BF_atoi64[setting[7 + 22 - 1] - 0x20] & 0x30];
718
719	/* This has to be bug-compatible with the original implementation, so
720	* only encode 23 of the 24 bytes. :-) */
721	BF_swap(data.binary.output, 6);
722	BF_encode(&output[7 + 22], data.binary.output, 23);
723	output[7 + 22 + 31] = '\0';
724
725	return output;
726	}
727
728	/*
729	* Please preserve the runtime self-test. It serves two purposes at once:
730	*
731	* 1. We really can't afford the risk of producing incompatible hashes e.g.
732	* when there's something like gcc bug 26587 again, whereas an application or
733	* library integrating this code might not also integrate our external tests or
734	* it might not run them after every build. Even if it does, the miscompile
735	* might only occur on the production build, but not on a testing build (such
736	* as because of different optimization settings). It is painful to recover
737	* from incorrectly-computed hashes - merely fixing whatever broke is not
738	* enough. Thus, a proactive measure like this self-test is needed.
739	*
740	* 2. We don't want to leave sensitive data from our actual password hash
741	* computation on the stack or in registers. Previous revisions of the code
742	* would do explicit cleanups, but simply running the self-test after hash
743	* computation is more reliable.
744	*
745	* The performance cost of this quick self-test is around 0.6% at the "$2a$08"
746	* setting.
747	*/
748	char __crypt_blowfish(const char key, const char setting, char output)
749	{
750	const char *test_key = "8b \xd0\xc1\xd2\xcf\xcc\xd8";
751	const char *test_setting = "$2a$00$abcdefghijklmnopqrstuu";
752	static const char test_hashes[2][34] = {
753	"i1D709vfamulimlGcq0qq3UvuUasvEa\0\x55", /* 'a', 'b', 'y' */
754	"VUrPmXD6q/nVSSp7pNDhCR9071IfIRe\0\x55", /* 'x' */
755	};
756	const char *test_hash = test_hashes[0];
757	char *retval;
758	const char *p;
759	int ok;
760	struct {
761	char s[7 + 22 + 1];
762	char o[7 + 22 + 31 + 1 + 1 + 1];
763	} buf;
764
765	/* Hash the supplied password */
766	retval = BF_crypt(key, setting, output, 16);
767
768	/*
769	* Do a quick self-test. It is important that we make both calls to BF_crypt()
770	* from the same scope such that they likely use the same stack locations,
771	* which makes the second call overwrite the first call's sensitive data on the
772	* stack and makes it more likely that any alignment related issues would be
773	* detected by the self-test.
774	*/
775	memcpy(buf.s, test_setting, sizeof(buf.s));
776	if (retval) {
777	unsigned int flags = flags_by_subtype[setting[2] - 'a'];
778	test_hash = test_hashes[flags & 1];
779	buf.s[2] = setting[2];
780	}
781	memset(buf.o, 0x55, sizeof(buf.o));
782	buf.o[sizeof(buf.o) - 1] = 0;
783	p = BF_crypt(test_key, buf.s, buf.o, 1);
784
785	ok = (p == buf.o &&
786	!memcmp(p, buf.s, 7 + 22) &&
787	!memcmp(p + (7 + 22),
788	test_hash,
789	31 + 1 + 1 + 1));
790
791	{
792	const char *k = "\xff\xa3" "34" "\xff\xff\xff\xa3" "345";
793	BF_key ae, ai, ye, yi;
794	BF_set_key(k, ae, ai, 2); /* $2a$ */
795	BF_set_key(k, ye, yi, 4); /* $2y$ */
796	ai[0] ^= 0x10000; /* undo the safety (for comparison) */
797	ok = ok && ai[0] == 0xdb9c59bc && ye[17] == 0x33343500 &&
798	!memcmp(ae, ye, sizeof(ae)) &&
799	!memcmp(ai, yi, sizeof(ai));
800	}
801
802	if (ok && retval)
803	return retval;
804
805	return "*";
806	}

lib/libc/wasi/libc-top-half/musl/src/crypt/crypt_des.c deleted-1016

...	@@ -1,1016 +0,0 @@
1	/*
2	* This version has been further modified by Rich Felker, primary author
3	* and maintainer of musl libc, to remove table generation code and
4	* replaced all runtime-generated constant tables with static-initialized
5	* tables in the binary, in the interest of minimizing non-shareable
6	* memory usage and stack size requirements.
7	*/
8	/*
9	* This version is derived from the original implementation of FreeSec
10	* (release 1.1) by David Burren. I've made it reentrant, reduced its memory
11	* usage from about 70 KB to about 7 KB (with only minimal performance impact
12	* and keeping code size about the same), made the handling of invalid salts
13	* mostly UFC-crypt compatible, added a quick runtime self-test (which also
14	* serves to zeroize the stack from sensitive data), and added optional tests.
15	* - Solar Designer <solar at openwall.com>
16	*/
17
18	/*
19	* FreeSec: libcrypt for NetBSD
20	*
21	* Copyright (c) 1994 David Burren
22	* Copyright (c) 2000,2002,2010,2012 Solar Designer
23	* All rights reserved.
24	*
25	* Redistribution and use in source and binary forms, with or without
26	* modification, are permitted provided that the following conditions
27	* are met:
28	* 1. Redistributions of source code must retain the above copyright
29	* notice, this list of conditions and the following disclaimer.
30	* 2. Redistributions in binary form must reproduce the above copyright
31	* notice, this list of conditions and the following disclaimer in the
32	* documentation and/or other materials provided with the distribution.
33	* 3. Neither the name of the author nor the names of other contributors
34	* may be used to endorse or promote products derived from this software
35	* without specific prior written permission.
36	*
37	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
38	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
39	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
40	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
41	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
42	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
43	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
44	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
45	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
46	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
47	* SUCH DAMAGE.
48	*
49	* $Owl: Owl/packages/glibc/crypt_freesec.c,v 1.6 2010/02/20 14:45:06 solar Exp $
50	* $Id: crypt.c,v 1.15 1994/09/13 04:58:49 davidb Exp $
51	*
52	* This is an original implementation of the DES and the crypt(3) interfaces
53	* by David Burren. It has been heavily re-worked by Solar Designer.
54	*/
55
56	#include <stdint.h>
57	#include <string.h>
58
59	#include "crypt_des.h"
60
61	#define _PASSWORD_EFMT1 '_'
62
63	static const unsigned char key_shifts[16] = {
64	1, 1, 2, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2, 2, 1
65	};
66
67	static const uint32_t psbox[8][64] = {
68	{
69	0x00808200,0x00000000,0x00008000,0x00808202,
70	0x00808002,0x00008202,0x00000002,0x00008000,
71	0x00000200,0x00808200,0x00808202,0x00000200,
72	0x00800202,0x00808002,0x00800000,0x00000002,
73	0x00000202,0x00800200,0x00800200,0x00008200,
74	0x00008200,0x00808000,0x00808000,0x00800202,
75	0x00008002,0x00800002,0x00800002,0x00008002,
76	0x00000000,0x00000202,0x00008202,0x00800000,
77	0x00008000,0x00808202,0x00000002,0x00808000,
78	0x00808200,0x00800000,0x00800000,0x00000200,
79	0x00808002,0x00008000,0x00008200,0x00800002,
80	0x00000200,0x00000002,0x00800202,0x00008202,
81	0x00808202,0x00008002,0x00808000,0x00800202,
82	0x00800002,0x00000202,0x00008202,0x00808200,
83	0x00000202,0x00800200,0x00800200,0x00000000,
84	0x00008002,0x00008200,0x00000000,0x00808002,
85	},{
86	0x40084010,0x40004000,0x00004000,0x00084010,
87	0x00080000,0x00000010,0x40080010,0x40004010,
88	0x40000010,0x40084010,0x40084000,0x40000000,
89	0x40004000,0x00080000,0x00000010,0x40080010,
90	0x00084000,0x00080010,0x40004010,0x00000000,
91	0x40000000,0x00004000,0x00084010,0x40080000,
92	0x00080010,0x40000010,0x00000000,0x00084000,
93	0x00004010,0x40084000,0x40080000,0x00004010,
94	0x00000000,0x00084010,0x40080010,0x00080000,
95	0x40004010,0x40080000,0x40084000,0x00004000,
96	0x40080000,0x40004000,0x00000010,0x40084010,
97	0x00084010,0x00000010,0x00004000,0x40000000,
98	0x00004010,0x40084000,0x00080000,0x40000010,
99	0x00080010,0x40004010,0x40000010,0x00080010,
100	0x00084000,0x00000000,0x40004000,0x00004010,
101	0x40000000,0x40080010,0x40084010,0x00084000,
102	},{
103	0x00000104,0x04010100,0x00000000,0x04010004,
104	0x04000100,0x00000000,0x00010104,0x04000100,
105	0x00010004,0x04000004,0x04000004,0x00010000,
106	0x04010104,0x00010004,0x04010000,0x00000104,
107	0x04000000,0x00000004,0x04010100,0x00000100,
108	0x00010100,0x04010000,0x04010004,0x00010104,
109	0x04000104,0x00010100,0x00010000,0x04000104,
110	0x00000004,0x04010104,0x00000100,0x04000000,
111	0x04010100,0x04000000,0x00010004,0x00000104,
112	0x00010000,0x04010100,0x04000100,0x00000000,
113	0x00000100,0x00010004,0x04010104,0x04000100,
114	0x04000004,0x00000100,0x00000000,0x04010004,
115	0x04000104,0x00010000,0x04000000,0x04010104,
116	0x00000004,0x00010104,0x00010100,0x04000004,
117	0x04010000,0x04000104,0x00000104,0x04010000,
118	0x00010104,0x00000004,0x04010004,0x00010100,
119	},{
120	0x80401000,0x80001040,0x80001040,0x00000040,
121	0x00401040,0x80400040,0x80400000,0x80001000,
122	0x00000000,0x00401000,0x00401000,0x80401040,
123	0x80000040,0x00000000,0x00400040,0x80400000,
124	0x80000000,0x00001000,0x00400000,0x80401000,
125	0x00000040,0x00400000,0x80001000,0x00001040,
126	0x80400040,0x80000000,0x00001040,0x00400040,
127	0x00001000,0x00401040,0x80401040,0x80000040,
128	0x00400040,0x80400000,0x00401000,0x80401040,
129	0x80000040,0x00000000,0x00000000,0x00401000,
130	0x00001040,0x00400040,0x80400040,0x80000000,
131	0x80401000,0x80001040,0x80001040,0x00000040,
132	0x80401040,0x80000040,0x80000000,0x00001000,
133	0x80400000,0x80001000,0x00401040,0x80400040,
134	0x80001000,0x00001040,0x00400000,0x80401000,
135	0x00000040,0x00400000,0x00001000,0x00401040,
136	},{
137	0x00000080,0x01040080,0x01040000,0x21000080,
138	0x00040000,0x00000080,0x20000000,0x01040000,
139	0x20040080,0x00040000,0x01000080,0x20040080,
140	0x21000080,0x21040000,0x00040080,0x20000000,
141	0x01000000,0x20040000,0x20040000,0x00000000,
142	0x20000080,0x21040080,0x21040080,0x01000080,
143	0x21040000,0x20000080,0x00000000,0x21000000,
144	0x01040080,0x01000000,0x21000000,0x00040080,
145	0x00040000,0x21000080,0x00000080,0x01000000,
146	0x20000000,0x01040000,0x21000080,0x20040080,
147	0x01000080,0x20000000,0x21040000,0x01040080,
148	0x20040080,0x00000080,0x01000000,0x21040000,
149	0x21040080,0x00040080,0x21000000,0x21040080,
150	0x01040000,0x00000000,0x20040000,0x21000000,
151	0x00040080,0x01000080,0x20000080,0x00040000,
152	0x00000000,0x20040000,0x01040080,0x20000080,
153	},{
154	0x10000008,0x10200000,0x00002000,0x10202008,
155	0x10200000,0x00000008,0x10202008,0x00200000,
156	0x10002000,0x00202008,0x00200000,0x10000008,
157	0x00200008,0x10002000,0x10000000,0x00002008,
158	0x00000000,0x00200008,0x10002008,0x00002000,
159	0x00202000,0x10002008,0x00000008,0x10200008,
160	0x10200008,0x00000000,0x00202008,0x10202000,
161	0x00002008,0x00202000,0x10202000,0x10000000,
162	0x10002000,0x00000008,0x10200008,0x00202000,
163	0x10202008,0x00200000,0x00002008,0x10000008,
164	0x00200000,0x10002000,0x10000000,0x00002008,
165	0x10000008,0x10202008,0x00202000,0x10200000,
166	0x00202008,0x10202000,0x00000000,0x10200008,
167	0x00000008,0x00002000,0x10200000,0x00202008,
168	0x00002000,0x00200008,0x10002008,0x00000000,
169	0x10202000,0x10000000,0x00200008,0x10002008,
170	},{
171	0x00100000,0x02100001,0x02000401,0x00000000,
172	0x00000400,0x02000401,0x00100401,0x02100400,
173	0x02100401,0x00100000,0x00000000,0x02000001,
174	0x00000001,0x02000000,0x02100001,0x00000401,
175	0x02000400,0x00100401,0x00100001,0x02000400,
176	0x02000001,0x02100000,0x02100400,0x00100001,
177	0x02100000,0x00000400,0x00000401,0x02100401,
178	0x00100400,0x00000001,0x02000000,0x00100400,
179	0x02000000,0x00100400,0x00100000,0x02000401,
180	0x02000401,0x02100001,0x02100001,0x00000001,
181	0x00100001,0x02000000,0x02000400,0x00100000,
182	0x02100400,0x00000401,0x00100401,0x02100400,
183	0x00000401,0x02000001,0x02100401,0x02100000,
184	0x00100400,0x00000000,0x00000001,0x02100401,
185	0x00000000,0x00100401,0x02100000,0x00000400,
186	0x02000001,0x02000400,0x00000400,0x00100001,
187	},{
188	0x08000820,0x00000800,0x00020000,0x08020820,
189	0x08000000,0x08000820,0x00000020,0x08000000,
190	0x00020020,0x08020000,0x08020820,0x00020800,
191	0x08020800,0x00020820,0x00000800,0x00000020,
192	0x08020000,0x08000020,0x08000800,0x00000820,
193	0x00020800,0x00020020,0x08020020,0x08020800,
194	0x00000820,0x00000000,0x00000000,0x08020020,
195	0x08000020,0x08000800,0x00020820,0x00020000,
196	0x00020820,0x00020000,0x08020800,0x00000800,
197	0x00000020,0x08020020,0x00000800,0x00020820,
198	0x08000800,0x00000020,0x08000020,0x08020000,
199	0x08020020,0x08000000,0x00020000,0x08000820,
200	0x00000000,0x08020820,0x00020020,0x08000020,
201	0x08020000,0x08000800,0x08000820,0x00000000,
202	0x08020820,0x00020800,0x00020800,0x00000820,
203	0x00000820,0x00020020,0x08000000,0x08020800,
204	},
205	};
206	static const uint32_t ip_maskl[16][16] = {
207	{
208	0x00000000,0x00010000,0x00000000,0x00010000,
209	0x01000000,0x01010000,0x01000000,0x01010000,
210	0x00000000,0x00010000,0x00000000,0x00010000,
211	0x01000000,0x01010000,0x01000000,0x01010000,
212	},{
213	0x00000000,0x00000001,0x00000000,0x00000001,
214	0x00000100,0x00000101,0x00000100,0x00000101,
215	0x00000000,0x00000001,0x00000000,0x00000001,
216	0x00000100,0x00000101,0x00000100,0x00000101,
217	},{
218	0x00000000,0x00020000,0x00000000,0x00020000,
219	0x02000000,0x02020000,0x02000000,0x02020000,
220	0x00000000,0x00020000,0x00000000,0x00020000,
221	0x02000000,0x02020000,0x02000000,0x02020000,
222	},{
223	0x00000000,0x00000002,0x00000000,0x00000002,
224	0x00000200,0x00000202,0x00000200,0x00000202,
225	0x00000000,0x00000002,0x00000000,0x00000002,
226	0x00000200,0x00000202,0x00000200,0x00000202,
227	},{
228	0x00000000,0x00040000,0x00000000,0x00040000,
229	0x04000000,0x04040000,0x04000000,0x04040000,
230	0x00000000,0x00040000,0x00000000,0x00040000,
231	0x04000000,0x04040000,0x04000000,0x04040000,
232	},{
233	0x00000000,0x00000004,0x00000000,0x00000004,
234	0x00000400,0x00000404,0x00000400,0x00000404,
235	0x00000000,0x00000004,0x00000000,0x00000004,
236	0x00000400,0x00000404,0x00000400,0x00000404,
237	},{
238	0x00000000,0x00080000,0x00000000,0x00080000,
239	0x08000000,0x08080000,0x08000000,0x08080000,
240	0x00000000,0x00080000,0x00000000,0x00080000,
241	0x08000000,0x08080000,0x08000000,0x08080000,
242	},{
243	0x00000000,0x00000008,0x00000000,0x00000008,
244	0x00000800,0x00000808,0x00000800,0x00000808,
245	0x00000000,0x00000008,0x00000000,0x00000008,
246	0x00000800,0x00000808,0x00000800,0x00000808,
247	},{
248	0x00000000,0x00100000,0x00000000,0x00100000,
249	0x10000000,0x10100000,0x10000000,0x10100000,
250	0x00000000,0x00100000,0x00000000,0x00100000,
251	0x10000000,0x10100000,0x10000000,0x10100000,
252	},{
253	0x00000000,0x00000010,0x00000000,0x00000010,
254	0x00001000,0x00001010,0x00001000,0x00001010,
255	0x00000000,0x00000010,0x00000000,0x00000010,
256	0x00001000,0x00001010,0x00001000,0x00001010,
257	},{
258	0x00000000,0x00200000,0x00000000,0x00200000,
259	0x20000000,0x20200000,0x20000000,0x20200000,
260	0x00000000,0x00200000,0x00000000,0x00200000,
261	0x20000000,0x20200000,0x20000000,0x20200000,
262	},{
263	0x00000000,0x00000020,0x00000000,0x00000020,
264	0x00002000,0x00002020,0x00002000,0x00002020,
265	0x00000000,0x00000020,0x00000000,0x00000020,
266	0x00002000,0x00002020,0x00002000,0x00002020,
267	},{
268	0x00000000,0x00400000,0x00000000,0x00400000,
269	0x40000000,0x40400000,0x40000000,0x40400000,
270	0x00000000,0x00400000,0x00000000,0x00400000,
271	0x40000000,0x40400000,0x40000000,0x40400000,
272	},{
273	0x00000000,0x00000040,0x00000000,0x00000040,
274	0x00004000,0x00004040,0x00004000,0x00004040,
275	0x00000000,0x00000040,0x00000000,0x00000040,
276	0x00004000,0x00004040,0x00004000,0x00004040,
277	},{
278	0x00000000,0x00800000,0x00000000,0x00800000,
279	0x80000000,0x80800000,0x80000000,0x80800000,
280	0x00000000,0x00800000,0x00000000,0x00800000,
281	0x80000000,0x80800000,0x80000000,0x80800000,
282	},{
283	0x00000000,0x00000080,0x00000000,0x00000080,
284	0x00008000,0x00008080,0x00008000,0x00008080,
285	0x00000000,0x00000080,0x00000000,0x00000080,
286	0x00008000,0x00008080,0x00008000,0x00008080,
287	},
288	};
289	static const uint32_t ip_maskr[16][16] = {
290	{
291	0x00000000,0x00000000,0x00010000,0x00010000,
292	0x00000000,0x00000000,0x00010000,0x00010000,
293	0x01000000,0x01000000,0x01010000,0x01010000,
294	0x01000000,0x01000000,0x01010000,0x01010000,
295	},{
296	0x00000000,0x00000000,0x00000001,0x00000001,
297	0x00000000,0x00000000,0x00000001,0x00000001,
298	0x00000100,0x00000100,0x00000101,0x00000101,
299	0x00000100,0x00000100,0x00000101,0x00000101,
300	},{
301	0x00000000,0x00000000,0x00020000,0x00020000,
302	0x00000000,0x00000000,0x00020000,0x00020000,
303	0x02000000,0x02000000,0x02020000,0x02020000,
304	0x02000000,0x02000000,0x02020000,0x02020000,
305	},{
306	0x00000000,0x00000000,0x00000002,0x00000002,
307	0x00000000,0x00000000,0x00000002,0x00000002,
308	0x00000200,0x00000200,0x00000202,0x00000202,
309	0x00000200,0x00000200,0x00000202,0x00000202,
310	},{
311	0x00000000,0x00000000,0x00040000,0x00040000,
312	0x00000000,0x00000000,0x00040000,0x00040000,
313	0x04000000,0x04000000,0x04040000,0x04040000,
314	0x04000000,0x04000000,0x04040000,0x04040000,
315	},{
316	0x00000000,0x00000000,0x00000004,0x00000004,
317	0x00000000,0x00000000,0x00000004,0x00000004,
318	0x00000400,0x00000400,0x00000404,0x00000404,
319	0x00000400,0x00000400,0x00000404,0x00000404,
320	},{
321	0x00000000,0x00000000,0x00080000,0x00080000,
322	0x00000000,0x00000000,0x00080000,0x00080000,
323	0x08000000,0x08000000,0x08080000,0x08080000,
324	0x08000000,0x08000000,0x08080000,0x08080000,
325	},{
326	0x00000000,0x00000000,0x00000008,0x00000008,
327	0x00000000,0x00000000,0x00000008,0x00000008,
328	0x00000800,0x00000800,0x00000808,0x00000808,
329	0x00000800,0x00000800,0x00000808,0x00000808,
330	},{
331	0x00000000,0x00000000,0x00100000,0x00100000,
332	0x00000000,0x00000000,0x00100000,0x00100000,
333	0x10000000,0x10000000,0x10100000,0x10100000,
334	0x10000000,0x10000000,0x10100000,0x10100000,
335	},{
336	0x00000000,0x00000000,0x00000010,0x00000010,
337	0x00000000,0x00000000,0x00000010,0x00000010,
338	0x00001000,0x00001000,0x00001010,0x00001010,
339	0x00001000,0x00001000,0x00001010,0x00001010,
340	},{
341	0x00000000,0x00000000,0x00200000,0x00200000,
342	0x00000000,0x00000000,0x00200000,0x00200000,
343	0x20000000,0x20000000,0x20200000,0x20200000,
344	0x20000000,0x20000000,0x20200000,0x20200000,
345	},{
346	0x00000000,0x00000000,0x00000020,0x00000020,
347	0x00000000,0x00000000,0x00000020,0x00000020,
348	0x00002000,0x00002000,0x00002020,0x00002020,
349	0x00002000,0x00002000,0x00002020,0x00002020,
350	},{
351	0x00000000,0x00000000,0x00400000,0x00400000,
352	0x00000000,0x00000000,0x00400000,0x00400000,
353	0x40000000,0x40000000,0x40400000,0x40400000,
354	0x40000000,0x40000000,0x40400000,0x40400000,
355	},{
356	0x00000000,0x00000000,0x00000040,0x00000040,
357	0x00000000,0x00000000,0x00000040,0x00000040,
358	0x00004000,0x00004000,0x00004040,0x00004040,
359	0x00004000,0x00004000,0x00004040,0x00004040,
360	},{
361	0x00000000,0x00000000,0x00800000,0x00800000,
362	0x00000000,0x00000000,0x00800000,0x00800000,
363	0x80000000,0x80000000,0x80800000,0x80800000,
364	0x80000000,0x80000000,0x80800000,0x80800000,
365	},{
366	0x00000000,0x00000000,0x00000080,0x00000080,
367	0x00000000,0x00000000,0x00000080,0x00000080,
368	0x00008000,0x00008000,0x00008080,0x00008080,
369	0x00008000,0x00008000,0x00008080,0x00008080,
370	},
371	};
372	static const uint32_t fp_maskl[8][16] = {
373	{
374	0x00000000,0x40000000,0x00400000,0x40400000,
375	0x00004000,0x40004000,0x00404000,0x40404000,
376	0x00000040,0x40000040,0x00400040,0x40400040,
377	0x00004040,0x40004040,0x00404040,0x40404040,
378	},{
379	0x00000000,0x10000000,0x00100000,0x10100000,
380	0x00001000,0x10001000,0x00101000,0x10101000,
381	0x00000010,0x10000010,0x00100010,0x10100010,
382	0x00001010,0x10001010,0x00101010,0x10101010,
383	},{
384	0x00000000,0x04000000,0x00040000,0x04040000,
385	0x00000400,0x04000400,0x00040400,0x04040400,
386	0x00000004,0x04000004,0x00040004,0x04040004,
387	0x00000404,0x04000404,0x00040404,0x04040404,
388	},{
389	0x00000000,0x01000000,0x00010000,0x01010000,
390	0x00000100,0x01000100,0x00010100,0x01010100,
391	0x00000001,0x01000001,0x00010001,0x01010001,
392	0x00000101,0x01000101,0x00010101,0x01010101,
393	},{
394	0x00000000,0x80000000,0x00800000,0x80800000,
395	0x00008000,0x80008000,0x00808000,0x80808000,
396	0x00000080,0x80000080,0x00800080,0x80800080,
397	0x00008080,0x80008080,0x00808080,0x80808080,
398	},{
399	0x00000000,0x20000000,0x00200000,0x20200000,
400	0x00002000,0x20002000,0x00202000,0x20202000,
401	0x00000020,0x20000020,0x00200020,0x20200020,
402	0x00002020,0x20002020,0x00202020,0x20202020,
403	},{
404	0x00000000,0x08000000,0x00080000,0x08080000,
405	0x00000800,0x08000800,0x00080800,0x08080800,
406	0x00000008,0x08000008,0x00080008,0x08080008,
407	0x00000808,0x08000808,0x00080808,0x08080808,
408	},{
409	0x00000000,0x02000000,0x00020000,0x02020000,
410	0x00000200,0x02000200,0x00020200,0x02020200,
411	0x00000002,0x02000002,0x00020002,0x02020002,
412	0x00000202,0x02000202,0x00020202,0x02020202,
413	},
414	};
415	static const uint32_t fp_maskr[8][16] = {
416	{
417	0x00000000,0x40000000,0x00400000,0x40400000,
418	0x00004000,0x40004000,0x00404000,0x40404000,
419	0x00000040,0x40000040,0x00400040,0x40400040,
420	0x00004040,0x40004040,0x00404040,0x40404040,
421	},{
422	0x00000000,0x10000000,0x00100000,0x10100000,
423	0x00001000,0x10001000,0x00101000,0x10101000,
424	0x00000010,0x10000010,0x00100010,0x10100010,
425	0x00001010,0x10001010,0x00101010,0x10101010,
426	},{
427	0x00000000,0x04000000,0x00040000,0x04040000,
428	0x00000400,0x04000400,0x00040400,0x04040400,
429	0x00000004,0x04000004,0x00040004,0x04040004,
430	0x00000404,0x04000404,0x00040404,0x04040404,
431	},{
432	0x00000000,0x01000000,0x00010000,0x01010000,
433	0x00000100,0x01000100,0x00010100,0x01010100,
434	0x00000001,0x01000001,0x00010001,0x01010001,
435	0x00000101,0x01000101,0x00010101,0x01010101,
436	},{
437	0x00000000,0x80000000,0x00800000,0x80800000,
438	0x00008000,0x80008000,0x00808000,0x80808000,
439	0x00000080,0x80000080,0x00800080,0x80800080,
440	0x00008080,0x80008080,0x00808080,0x80808080,
441	},{
442	0x00000000,0x20000000,0x00200000,0x20200000,
443	0x00002000,0x20002000,0x00202000,0x20202000,
444	0x00000020,0x20000020,0x00200020,0x20200020,
445	0x00002020,0x20002020,0x00202020,0x20202020,
446	},{
447	0x00000000,0x08000000,0x00080000,0x08080000,
448	0x00000800,0x08000800,0x00080800,0x08080800,
449	0x00000008,0x08000008,0x00080008,0x08080008,
450	0x00000808,0x08000808,0x00080808,0x08080808,
451	},{
452	0x00000000,0x02000000,0x00020000,0x02020000,
453	0x00000200,0x02000200,0x00020200,0x02020200,
454	0x00000002,0x02000002,0x00020002,0x02020002,
455	0x00000202,0x02000202,0x00020202,0x02020202,
456	},
457	};
458	static const uint32_t key_perm_maskl[8][16] = {
459	{
460	0x00000000,0x00000000,0x00000010,0x00000010,
461	0x00001000,0x00001000,0x00001010,0x00001010,
462	0x00100000,0x00100000,0x00100010,0x00100010,
463	0x00101000,0x00101000,0x00101010,0x00101010,
464	},{
465	0x00000000,0x00000000,0x00000020,0x00000020,
466	0x00002000,0x00002000,0x00002020,0x00002020,
467	0x00200000,0x00200000,0x00200020,0x00200020,
468	0x00202000,0x00202000,0x00202020,0x00202020,
469	},{
470	0x00000000,0x00000000,0x00000040,0x00000040,
471	0x00004000,0x00004000,0x00004040,0x00004040,
472	0x00400000,0x00400000,0x00400040,0x00400040,
473	0x00404000,0x00404000,0x00404040,0x00404040,
474	},{
475	0x00000000,0x00000000,0x00000080,0x00000080,
476	0x00008000,0x00008000,0x00008080,0x00008080,
477	0x00800000,0x00800000,0x00800080,0x00800080,
478	0x00808000,0x00808000,0x00808080,0x00808080,
479	},{
480	0x00000000,0x00000001,0x00000100,0x00000101,
481	0x00010000,0x00010001,0x00010100,0x00010101,
482	0x01000000,0x01000001,0x01000100,0x01000101,
483	0x01010000,0x01010001,0x01010100,0x01010101,
484	},{
485	0x00000000,0x00000002,0x00000200,0x00000202,
486	0x00020000,0x00020002,0x00020200,0x00020202,
487	0x02000000,0x02000002,0x02000200,0x02000202,
488	0x02020000,0x02020002,0x02020200,0x02020202,
489	},{
490	0x00000000,0x00000004,0x00000400,0x00000404,
491	0x00040000,0x00040004,0x00040400,0x00040404,
492	0x04000000,0x04000004,0x04000400,0x04000404,
493	0x04040000,0x04040004,0x04040400,0x04040404,
494	},{
495	0x00000000,0x00000008,0x00000800,0x00000808,
496	0x00080000,0x00080008,0x00080800,0x00080808,
497	0x08000000,0x08000008,0x08000800,0x08000808,
498	0x08080000,0x08080008,0x08080800,0x08080808,
499	},
500	};
501	static const uint32_t key_perm_maskr[12][16] = {
502	{
503	0x00000000,0x00000001,0x00000000,0x00000001,
504	0x00000000,0x00000001,0x00000000,0x00000001,
505	0x00000000,0x00000001,0x00000000,0x00000001,
506	0x00000000,0x00000001,0x00000000,0x00000001,
507	},{
508	0x00000000,0x00000000,0x00100000,0x00100000,
509	0x00001000,0x00001000,0x00101000,0x00101000,
510	0x00000010,0x00000010,0x00100010,0x00100010,
511	0x00001010,0x00001010,0x00101010,0x00101010,
512	},{
513	0x00000000,0x00000002,0x00000000,0x00000002,
514	0x00000000,0x00000002,0x00000000,0x00000002,
515	0x00000000,0x00000002,0x00000000,0x00000002,
516	0x00000000,0x00000002,0x00000000,0x00000002,
517	},{
518	0x00000000,0x00000000,0x00200000,0x00200000,
519	0x00002000,0x00002000,0x00202000,0x00202000,
520	0x00000020,0x00000020,0x00200020,0x00200020,
521	0x00002020,0x00002020,0x00202020,0x00202020,
522	},{
523	0x00000000,0x00000004,0x00000000,0x00000004,
524	0x00000000,0x00000004,0x00000000,0x00000004,
525	0x00000000,0x00000004,0x00000000,0x00000004,
526	0x00000000,0x00000004,0x00000000,0x00000004,
527	},{
528	0x00000000,0x00000000,0x00400000,0x00400000,
529	0x00004000,0x00004000,0x00404000,0x00404000,
530	0x00000040,0x00000040,0x00400040,0x00400040,
531	0x00004040,0x00004040,0x00404040,0x00404040,
532	},{
533	0x00000000,0x00000008,0x00000000,0x00000008,
534	0x00000000,0x00000008,0x00000000,0x00000008,
535	0x00000000,0x00000008,0x00000000,0x00000008,
536	0x00000000,0x00000008,0x00000000,0x00000008,
537	},{
538	0x00000000,0x00000000,0x00800000,0x00800000,
539	0x00008000,0x00008000,0x00808000,0x00808000,
540	0x00000080,0x00000080,0x00800080,0x00800080,
541	0x00008080,0x00008080,0x00808080,0x00808080,
542	},{
543	0x00000000,0x00000000,0x01000000,0x01000000,
544	0x00010000,0x00010000,0x01010000,0x01010000,
545	0x00000100,0x00000100,0x01000100,0x01000100,
546	0x00010100,0x00010100,0x01010100,0x01010100,
547	},{
548	0x00000000,0x00000000,0x02000000,0x02000000,
549	0x00020000,0x00020000,0x02020000,0x02020000,
550	0x00000200,0x00000200,0x02000200,0x02000200,
551	0x00020200,0x00020200,0x02020200,0x02020200,
552	},{
553	0x00000000,0x00000000,0x04000000,0x04000000,
554	0x00040000,0x00040000,0x04040000,0x04040000,
555	0x00000400,0x00000400,0x04000400,0x04000400,
556	0x00040400,0x00040400,0x04040400,0x04040400,
557	},{
558	0x00000000,0x00000000,0x08000000,0x08000000,
559	0x00080000,0x00080000,0x08080000,0x08080000,
560	0x00000800,0x00000800,0x08000800,0x08000800,
561	0x00080800,0x00080800,0x08080800,0x08080800,
562	},
563	};
564	static const uint32_t comp_maskl0[4][8] = {
565	{
566	0x00000000,0x00020000,0x00000001,0x00020001,
567	0x00080000,0x000a0000,0x00080001,0x000a0001,
568	},{
569	0x00000000,0x00001000,0x00000000,0x00001000,
570	0x00000040,0x00001040,0x00000040,0x00001040,
571	},{
572	0x00000000,0x00400000,0x00000020,0x00400020,
573	0x00008000,0x00408000,0x00008020,0x00408020,
574	},{
575	0x00000000,0x00100000,0x00000800,0x00100800,
576	0x00000000,0x00100000,0x00000800,0x00100800,
577	},
578	};
579	static const uint32_t comp_maskr0[4][8] = {
580	{
581	0x00000000,0x00200000,0x00020000,0x00220000,
582	0x00000002,0x00200002,0x00020002,0x00220002,
583	},{
584	0x00000000,0x00000000,0x00100000,0x00100000,
585	0x00000004,0x00000004,0x00100004,0x00100004,
586	},{
587	0x00000000,0x00004000,0x00000800,0x00004800,
588	0x00000000,0x00004000,0x00000800,0x00004800,
589	},{
590	0x00000000,0x00400000,0x00008000,0x00408000,
591	0x00000008,0x00400008,0x00008008,0x00408008,
592	},
593	};
594	static const uint32_t comp_maskl1[4][16] = {
595	{
596	0x00000000,0x00000010,0x00004000,0x00004010,
597	0x00040000,0x00040010,0x00044000,0x00044010,
598	0x00000100,0x00000110,0x00004100,0x00004110,
599	0x00040100,0x00040110,0x00044100,0x00044110,
600	},{
601	0x00000000,0x00800000,0x00000002,0x00800002,
602	0x00000200,0x00800200,0x00000202,0x00800202,
603	0x00200000,0x00a00000,0x00200002,0x00a00002,
604	0x00200200,0x00a00200,0x00200202,0x00a00202,
605	},{
606	0x00000000,0x00002000,0x00000004,0x00002004,
607	0x00000400,0x00002400,0x00000404,0x00002404,
608	0x00000000,0x00002000,0x00000004,0x00002004,
609	0x00000400,0x00002400,0x00000404,0x00002404,
610	},{
611	0x00000000,0x00010000,0x00000008,0x00010008,
612	0x00000080,0x00010080,0x00000088,0x00010088,
613	0x00000000,0x00010000,0x00000008,0x00010008,
614	0x00000080,0x00010080,0x00000088,0x00010088,
615	},
616	};
617	static const uint32_t comp_maskr1[4][16] = {
618	{
619	0x00000000,0x00000000,0x00000080,0x00000080,
620	0x00002000,0x00002000,0x00002080,0x00002080,
621	0x00000001,0x00000001,0x00000081,0x00000081,
622	0x00002001,0x00002001,0x00002081,0x00002081,
623	},{
624	0x00000000,0x00000010,0x00800000,0x00800010,
625	0x00010000,0x00010010,0x00810000,0x00810010,
626	0x00000200,0x00000210,0x00800200,0x00800210,
627	0x00010200,0x00010210,0x00810200,0x00810210,
628	},{
629	0x00000000,0x00000400,0x00001000,0x00001400,
630	0x00080000,0x00080400,0x00081000,0x00081400,
631	0x00000020,0x00000420,0x00001020,0x00001420,
632	0x00080020,0x00080420,0x00081020,0x00081420,
633	},{
634	0x00000000,0x00000100,0x00040000,0x00040100,
635	0x00000000,0x00000100,0x00040000,0x00040100,
636	0x00000040,0x00000140,0x00040040,0x00040140,
637	0x00000040,0x00000140,0x00040040,0x00040140,
638	},
639	};
640
641	static const unsigned char ascii64[] =
642	"./0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz";
643	/* 0000000000111111111122222222223333333333444444444455555555556666 */
644	/* 0123456789012345678901234567890123456789012345678901234567890123 */
645
646	/*
647	* We match the behavior of UFC-crypt on systems where "char" is signed by
648	* default (the majority), regardless of char's signedness on our system.
649	*/
650	static uint32_t ascii_to_bin(int ch)
651	{
652	int sch = (ch < 0x80) ? ch : -(0x100 - ch);
653	int retval;
654
655	retval = sch - '.';
656	if (sch >= 'A') {
657	retval = sch - ('A' - 12);
658	if (sch >= 'a')
659	retval = sch - ('a' - 38);
660	}
661	retval &= 0x3f;
662
663	return retval;
664	}
665
666	/*
667	* When we choose to "support" invalid salts, nevertheless disallow those
668	* containing characters that would violate the passwd file format.
669	*/
670	static inline int ascii_is_unsafe(unsigned char ch)
671	{
672	return !ch \|\| ch == '\n' \|\| ch == ':';
673	}
674
675	static uint32_t setup_salt(uint32_t salt)
676	{
677	uint32_t obit, saltbit, saltbits;
678	unsigned int i;
679
680	saltbits = 0;
681	saltbit = 1;
682	obit = 0x800000;
683	for (i = 0; i < 24; i++) {
684	if (salt & saltbit)
685	saltbits \|= obit;
686	saltbit <<= 1;
687	obit >>= 1;
688	}
689
690	return saltbits;
691	}
692
693	void __des_setkey(const unsigned char key, struct expanded_key ekey)
694	{
695	uint32_t k0, k1, rawkey0, rawkey1;
696	unsigned int shifts, round, i, ibit;
697
698	rawkey0 =
699	(uint32_t)key[3] \|
700	((uint32_t)key[2] << 8) \|
701	((uint32_t)key[1] << 16) \|
702	((uint32_t)key[0] << 24);
703	rawkey1 =
704	(uint32_t)key[7] \|
705	((uint32_t)key[6] << 8) \|
706	((uint32_t)key[5] << 16) \|
707	((uint32_t)key[4] << 24);
708
709	/*
710	* Do key permutation and split into two 28-bit subkeys.
711	*/
712	k0 = k1 = 0;
713	for (i = 0, ibit = 28; i < 4; i++, ibit -= 4) {
714	unsigned int j = i << 1;
715	k0 \|= key_perm_maskl[i][(rawkey0 >> ibit) & 0xf] \|
716	key_perm_maskl[i + 4][(rawkey1 >> ibit) & 0xf];
717	k1 \|= key_perm_maskr[j][(rawkey0 >> ibit) & 0xf];
718	ibit -= 4;
719	k1 \|= key_perm_maskr[j + 1][(rawkey0 >> ibit) & 0xf] \|
720	key_perm_maskr[i + 8][(rawkey1 >> ibit) & 0xf];
721	}
722
723	/*
724	* Rotate subkeys and do compression permutation.
725	*/
726	shifts = 0;
727	for (round = 0; round < 16; round++) {
728	uint32_t t0, t1;
729	uint32_t kl, kr;
730
731	shifts += key_shifts[round];
732
733	t0 = (k0 << shifts) \| (k0 >> (28 - shifts));
734	t1 = (k1 << shifts) \| (k1 >> (28 - shifts));
735
736	kl = kr = 0;
737	ibit = 25;
738	for (i = 0; i < 4; i++) {
739	kl \|= comp_maskl0[i][(t0 >> ibit) & 7];
740	kr \|= comp_maskr0[i][(t1 >> ibit) & 7];
741	ibit -= 4;
742	kl \|= comp_maskl1[i][(t0 >> ibit) & 0xf];
743	kr \|= comp_maskr1[i][(t1 >> ibit) & 0xf];
744	ibit -= 3;
745	}
746	ekey->l[round] = kl;
747	ekey->r[round] = kr;
748	}
749	}
750
751	/*
752	* l_in, r_in, l_out, and r_out are in pseudo-"big-endian" format.
753	*/
754	void __do_des(uint32_t l_in, uint32_t r_in,
755	uint32_t l_out, uint32_t r_out,
756	uint32_t count, uint32_t saltbits, const struct expanded_key *ekey)
757	{
758	uint32_t l, r;
759
760	/*
761	* Do initial permutation (IP).
762	*/
763	l = r = 0;
764	if (l_in \| r_in) {
765	unsigned int i, ibit;
766	for (i = 0, ibit = 28; i < 8; i++, ibit -= 4) {
767	l \|= ip_maskl[i][(l_in >> ibit) & 0xf] \|
768	ip_maskl[i + 8][(r_in >> ibit) & 0xf];
769	r \|= ip_maskr[i][(l_in >> ibit) & 0xf] \|
770	ip_maskr[i + 8][(r_in >> ibit) & 0xf];
771	}
772	}
773
774	while (count--) {
775	/*
776	* Do each round.
777	*/
778	unsigned int round = 16;
779	const uint32_t *kl = ekey->l;
780	const uint32_t *kr = ekey->r;
781	uint32_t f;
782	while (round--) {
783	uint32_t r48l, r48r;
784	/*
785	* Expand R to 48 bits (simulate the E-box).
786	*/
787	r48l = ((r & 0x00000001) << 23)
788	\| ((r & 0xf8000000) >> 9)
789	\| ((r & 0x1f800000) >> 11)
790	\| ((r & 0x01f80000) >> 13)
791	\| ((r & 0x001f8000) >> 15);
792
793	r48r = ((r & 0x0001f800) << 7)
794	\| ((r & 0x00001f80) << 5)
795	\| ((r & 0x000001f8) << 3)
796	\| ((r & 0x0000001f) << 1)
797	\| ((r & 0x80000000) >> 31);
798	/*
799	* Do salting for crypt() and friends, and
800	* XOR with the permuted key.
801	*/
802	f = (r48l ^ r48r) & saltbits;
803	r48l ^= f ^ *kl++;
804	r48r ^= f ^ *kr++;
805	/*
806	* Do S-box lookups (which shrink it back to 32 bits)
807	* and do the P-box permutation at the same time.
808	*/
809	f = psbox[0][r48l >> 18]
810	\| psbox[1][(r48l >> 12) & 0x3f]
811	\| psbox[2][(r48l >> 6) & 0x3f]
812	\| psbox[3][r48l & 0x3f]
813	\| psbox[4][r48r >> 18]
814	\| psbox[5][(r48r >> 12) & 0x3f]
815	\| psbox[6][(r48r >> 6) & 0x3f]
816	\| psbox[7][r48r & 0x3f];
817	/*
818	* Now that we've permuted things, complete f().
819	*/
820	f ^= l;
821	l = r;
822	r = f;
823	}
824	r = l;
825	l = f;
826	}
827
828	/*
829	* Do final permutation (inverse of IP).
830	*/
831	{
832	unsigned int i, ibit;
833	uint32_t lo, ro;
834	lo = ro = 0;
835	for (i = 0, ibit = 28; i < 4; i++, ibit -= 4) {
836	ro \|= fp_maskr[i][(l >> ibit) & 0xf] \|
837	fp_maskr[i + 4][(r >> ibit) & 0xf];
838	ibit -= 4;
839	lo \|= fp_maskl[i][(l >> ibit) & 0xf] \|
840	fp_maskl[i + 4][(r >> ibit) & 0xf];
841	}
842	*l_out = lo;
843	*r_out = ro;
844	}
845	}
846
847	static void des_cipher(const unsigned char in, unsigned char out,
848	uint32_t count, uint32_t saltbits, const struct expanded_key *ekey)
849	{
850	uint32_t l_out, r_out, rawl, rawr;
851
852	rawl =
853	(uint32_t)in[3] \|
854	((uint32_t)in[2] << 8) \|
855	((uint32_t)in[1] << 16) \|
856	((uint32_t)in[0] << 24);
857	rawr =
858	(uint32_t)in[7] \|
859	((uint32_t)in[6] << 8) \|
860	((uint32_t)in[5] << 16) \|
861	((uint32_t)in[4] << 24);
862
863	__do_des(rawl, rawr, &l_out, &r_out, count, saltbits, ekey);
864
865	out[0] = l_out >> 24;
866	out[1] = l_out >> 16;
867	out[2] = l_out >> 8;
868	out[3] = l_out;
869	out[4] = r_out >> 24;
870	out[5] = r_out >> 16;
871	out[6] = r_out >> 8;
872	out[7] = r_out;
873	}
874
875	static char _crypt_extended_r_uut(const char _key, const char _setting, char output)
876	{
877	const unsigned char key = (const unsigned char )_key;
878	const unsigned char setting = (const unsigned char )_setting;
879	struct expanded_key ekey;
880	unsigned char keybuf[8];
881	unsigned char p, q;
882	uint32_t count, salt, l, r0, r1;
883	unsigned int i;
884
885	/*
886	* Copy the key, shifting each character left by one bit and padding
887	* with zeroes.
888	*/
889	q = keybuf;
890	while (q <= &keybuf[sizeof(keybuf) - 1]) {
891	q++ = key << 1;
892	if (*key)
893	key++;
894	}
895	__des_setkey(keybuf, &ekey);
896
897	if (*setting == _PASSWORD_EFMT1) {
898	/*
899	* "new"-style:
900	* setting - underscore, 4 chars of count, 4 chars of salt
901	* key - unlimited characters
902	*/
903	for (i = 1, count = 0; i < 5; i++) {
904	uint32_t value = ascii_to_bin(setting[i]);
905	if (ascii64[value] != setting[i])
906	return NULL;
907	count \|= value << (i - 1) * 6;
908	}
909	if (!count)
910	return NULL;
911
912	for (i = 5, salt = 0; i < 9; i++) {
913	uint32_t value = ascii_to_bin(setting[i]);
914	if (ascii64[value] != setting[i])
915	return NULL;
916	salt \|= value << (i - 5) * 6;
917	}
918
919	while (*key) {
920	/*
921	* Encrypt the key with itself.
922	*/
923	des_cipher(keybuf, keybuf, 1, 0, &ekey);
924	/*
925	* And XOR with the next 8 characters of the key.
926	*/
927	q = keybuf;
928	while (q <= &keybuf[sizeof(keybuf) - 1] && *key)
929	q++ ^= key++ << 1;
930	__des_setkey(keybuf, &ekey);
931	}
932
933	memcpy(output, setting, 9);
934	output[9] = '\0';
935	p = (unsigned char *)output + 9;
936	} else {
937	/*
938	* "old"-style:
939	* setting - 2 chars of salt
940	* key - up to 8 characters
941	*/
942	count = 25;
943
944	if (ascii_is_unsafe(setting[0]) \|\| ascii_is_unsafe(setting[1]))
945	return NULL;
946
947	salt = (ascii_to_bin(setting[1]) << 6)
948	\| ascii_to_bin(setting[0]);
949
950	output[0] = setting[0];
951	output[1] = setting[1];
952	p = (unsigned char *)output + 2;
953	}
954
955	/*
956	* Do it.
957	*/
958	__do_des(0, 0, &r0, &r1, count, setup_salt(salt), &ekey);
959
960	/*
961	* Now encode the result...
962	*/
963	l = (r0 >> 8);
964	*p++ = ascii64[(l >> 18) & 0x3f];
965	*p++ = ascii64[(l >> 12) & 0x3f];
966	*p++ = ascii64[(l >> 6) & 0x3f];
967	*p++ = ascii64[l & 0x3f];
968
969	l = (r0 << 16) \| ((r1 >> 16) & 0xffff);
970	*p++ = ascii64[(l >> 18) & 0x3f];
971	*p++ = ascii64[(l >> 12) & 0x3f];
972	*p++ = ascii64[(l >> 6) & 0x3f];
973	*p++ = ascii64[l & 0x3f];
974
975	l = r1 << 2;
976	*p++ = ascii64[(l >> 12) & 0x3f];
977	*p++ = ascii64[(l >> 6) & 0x3f];
978	*p++ = ascii64[l & 0x3f];
979	*p = 0;
980
981	return output;
982	}
983
984	char __crypt_des(const char key, const char setting, char output)
985	{
986	const char *test_key = "\x80\xff\x80\x01 "
987	"\x7f\x81\x80\x80\x0d\x0a\xff\x7f \x81 test";
988	const char *test_setting = "_0.../9Zz";
989	const char *test_hash = "_0.../9ZzX7iSJNd21sU";
990	char test_buf[21];
991	char *retval;
992	const char *p;
993
994	if (*setting != _PASSWORD_EFMT1) {
995	test_setting = "\x80x";
996	test_hash = "\x80x22/wK52ZKGA";
997	}
998
999	/*
1000	* Hash the supplied password.
1001	*/
1002	retval = _crypt_extended_r_uut(key, setting, output);
1003
1004	/*
1005	* Perform a quick self-test. It is important that we make both calls
1006	* to _crypt_extended_r_uut() from the same scope such that they likely
1007	* use the same stack locations, which makes the second call overwrite
1008	* the first call's sensitive data on the stack and makes it more
1009	* likely that any alignment related issues would be detected.
1010	*/
1011	p = _crypt_extended_r_uut(test_key, test_setting, test_buf);
1012	if (p && !strcmp(p, test_hash) && retval)
1013	return retval;
1014
1015	return (setting[0]=='') ? "x" : "";
1016	}

lib/libc/wasi/libc-top-half/musl/src/crypt/crypt_des.h deleted-14

...	@@ -1,14 +0,0 @@
1	#ifndef CRYPT_DES_H
2	#define CRYPT_DES_H
3
4	#include <stdint.h>
5
6	struct expanded_key {
7	uint32_t l[16], r[16];
8	};
9
10	hidden void __des_setkey(const unsigned char , struct expanded_key );
11	hidden void __do_des(uint32_t, uint32_t, uint32_t , uint32_t ,
12	uint32_t, uint32_t, const struct expanded_key *);
13
14	#endif

lib/libc/wasi/libc-top-half/musl/src/crypt/crypt_md5.c deleted-285

...	@@ -1,285 +0,0 @@
1	/*
2	* md5 crypt implementation
3	*
4	* original md5 crypt design is from Poul-Henning Kamp
5	* this implementation was created based on the code in freebsd
6	* at least 32bit int is assumed, key is limited and $1$ prefix is mandatory,
7	* on error "*" is returned
8	*/
9	#include <string.h>
10	#include <stdint.h>
11
12	/* public domain md5 implementation based on rfc1321 and libtomcrypt */
13
14	struct md5 {
15	uint64_t len; /* processed message length */
16	uint32_t h[4]; /* hash state */
17	uint8_t buf[64]; /* message block buffer */
18	};
19
20	static uint32_t rol(uint32_t n, int k) { return (n << k) \| (n >> (32-k)); }
21	#define F(x,y,z) (z ^ (x & (y ^ z)))
22	#define G(x,y,z) (y ^ (z & (y ^ x)))
23	#define H(x,y,z) (x ^ y ^ z)
24	#define I(x,y,z) (y ^ (x \| ~z))
25	#define FF(a,b,c,d,w,s,t) a += F(b,c,d) + w + t; a = rol(a,s) + b
26	#define GG(a,b,c,d,w,s,t) a += G(b,c,d) + w + t; a = rol(a,s) + b
27	#define HH(a,b,c,d,w,s,t) a += H(b,c,d) + w + t; a = rol(a,s) + b
28	#define II(a,b,c,d,w,s,t) a += I(b,c,d) + w + t; a = rol(a,s) + b
29
30	static const uint32_t tab[64] = {
31	0xd76aa478, 0xe8c7b756, 0x242070db, 0xc1bdceee, 0xf57c0faf, 0x4787c62a, 0xa8304613, 0xfd469501,
32	0x698098d8, 0x8b44f7af, 0xffff5bb1, 0x895cd7be, 0x6b901122, 0xfd987193, 0xa679438e, 0x49b40821,
33	0xf61e2562, 0xc040b340, 0x265e5a51, 0xe9b6c7aa, 0xd62f105d, 0x02441453, 0xd8a1e681, 0xe7d3fbc8,
34	0x21e1cde6, 0xc33707d6, 0xf4d50d87, 0x455a14ed, 0xa9e3e905, 0xfcefa3f8, 0x676f02d9, 0x8d2a4c8a,
35	0xfffa3942, 0x8771f681, 0x6d9d6122, 0xfde5380c, 0xa4beea44, 0x4bdecfa9, 0xf6bb4b60, 0xbebfbc70,
36	0x289b7ec6, 0xeaa127fa, 0xd4ef3085, 0x04881d05, 0xd9d4d039, 0xe6db99e5, 0x1fa27cf8, 0xc4ac5665,
37	0xf4292244, 0x432aff97, 0xab9423a7, 0xfc93a039, 0x655b59c3, 0x8f0ccc92, 0xffeff47d, 0x85845dd1,
38	0x6fa87e4f, 0xfe2ce6e0, 0xa3014314, 0x4e0811a1, 0xf7537e82, 0xbd3af235, 0x2ad7d2bb, 0xeb86d391
39	};
40
41	static void processblock(struct md5 s, const uint8_t buf)
42	{
43	uint32_t i, W[16], a, b, c, d;
44
45	for (i = 0; i < 16; i++) {
46	W[i] = buf[4*i];
47	W[i] \|= (uint32_t)buf[4*i+1]<<8;
48	W[i] \|= (uint32_t)buf[4*i+2]<<16;
49	W[i] \|= (uint32_t)buf[4*i+3]<<24;
50	}
51
52	a = s->h[0];
53	b = s->h[1];
54	c = s->h[2];
55	d = s->h[3];
56
57	i = 0;
58	while (i < 16) {
59	FF(a,b,c,d, W[i], 7, tab[i]); i++;
60	FF(d,a,b,c, W[i], 12, tab[i]); i++;
61	FF(c,d,a,b, W[i], 17, tab[i]); i++;
62	FF(b,c,d,a, W[i], 22, tab[i]); i++;
63	}
64	while (i < 32) {
65	GG(a,b,c,d, W[(5*i+1)%16], 5, tab[i]); i++;
66	GG(d,a,b,c, W[(5*i+1)%16], 9, tab[i]); i++;
67	GG(c,d,a,b, W[(5*i+1)%16], 14, tab[i]); i++;
68	GG(b,c,d,a, W[(5*i+1)%16], 20, tab[i]); i++;
69	}
70	while (i < 48) {
71	HH(a,b,c,d, W[(3*i+5)%16], 4, tab[i]); i++;
72	HH(d,a,b,c, W[(3*i+5)%16], 11, tab[i]); i++;
73	HH(c,d,a,b, W[(3*i+5)%16], 16, tab[i]); i++;
74	HH(b,c,d,a, W[(3*i+5)%16], 23, tab[i]); i++;
75	}
76	while (i < 64) {
77	II(a,b,c,d, W[7*i%16], 6, tab[i]); i++;
78	II(d,a,b,c, W[7*i%16], 10, tab[i]); i++;
79	II(c,d,a,b, W[7*i%16], 15, tab[i]); i++;
80	II(b,c,d,a, W[7*i%16], 21, tab[i]); i++;
81	}
82
83	s->h[0] += a;
84	s->h[1] += b;
85	s->h[2] += c;
86	s->h[3] += d;
87	}
88
89	static void pad(struct md5 *s)
90	{
91	unsigned r = s->len % 64;
92
93	s->buf[r++] = 0x80;
94	if (r > 56) {
95	memset(s->buf + r, 0, 64 - r);
96	r = 0;
97	processblock(s, s->buf);
98	}
99	memset(s->buf + r, 0, 56 - r);
100	s->len *= 8;
101	s->buf[56] = s->len;
102	s->buf[57] = s->len >> 8;
103	s->buf[58] = s->len >> 16;
104	s->buf[59] = s->len >> 24;
105	s->buf[60] = s->len >> 32;
106	s->buf[61] = s->len >> 40;
107	s->buf[62] = s->len >> 48;
108	s->buf[63] = s->len >> 56;
109	processblock(s, s->buf);
110	}
111
112	static void md5_init(struct md5 *s)
113	{
114	s->len = 0;
115	s->h[0] = 0x67452301;
116	s->h[1] = 0xefcdab89;
117	s->h[2] = 0x98badcfe;
118	s->h[3] = 0x10325476;
119	}
120
121	static void md5_sum(struct md5 s, uint8_t md)
122	{
123	int i;
124
125	pad(s);
126	for (i = 0; i < 4; i++) {
127	md[4*i] = s->h[i];
128	md[4*i+1] = s->h[i] >> 8;
129	md[4*i+2] = s->h[i] >> 16;
130	md[4*i+3] = s->h[i] >> 24;
131	}
132	}
133
134	static void md5_update(struct md5 s, const void m, unsigned long len)
135	{
136	const uint8_t *p = m;
137	unsigned r = s->len % 64;
138
139	s->len += len;
140	if (r) {
141	if (len < 64 - r) {
142	memcpy(s->buf + r, p, len);
143	return;
144	}
145	memcpy(s->buf + r, p, 64 - r);
146	len -= 64 - r;
147	p += 64 - r;
148	processblock(s, s->buf);
149	}
150	for (; len >= 64; len -= 64, p += 64)
151	processblock(s, p);
152	memcpy(s->buf, p, len);
153	}
154
155	/*-
156	* Copyright (c) 2003 Poul-Henning Kamp
157	* All rights reserved.
158	*
159	* Redistribution and use in source and binary forms, with or without
160	* modification, are permitted provided that the following conditions
161	* are met:
162	* 1. Redistributions of source code must retain the above copyright
163	* notice, this list of conditions and the following disclaimer.
164	* 2. Redistributions in binary form must reproduce the above copyright
165	* notice, this list of conditions and the following disclaimer in the
166	* documentation and/or other materials provided with the distribution.
167	*
168	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
169	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
170	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
171	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
172	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
173	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
174	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
175	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
176	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
177	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
178	* SUCH DAMAGE.
179	*/
180
181	/* key limit is not part of the original design, added for DoS protection */
182	#define KEY_MAX 30000
183	#define SALT_MAX 8
184
185	static const unsigned char b64[] =
186	"./0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz";
187
188	static char to64(char s, unsigned int u, int n)
189	{
190	while (--n >= 0) {
191	*s++ = b64[u % 64];
192	u /= 64;
193	}
194	return s;
195	}
196
197	static char md5crypt(const char key, const char setting, char output)
198	{
199	struct md5 ctx;
200	unsigned char md[16];
201	unsigned int i, klen, slen;
202	const char *salt;
203	char *p;
204
205	/* reject large keys */
206	klen = strnlen(key, KEY_MAX+1);
207	if (klen > KEY_MAX)
208	return 0;
209
210	/* setting: $1$salt$ (closing $ is optional) */
211	if (strncmp(setting, "$1$", 3) != 0)
212	return 0;
213	salt = setting + 3;
214	for (i = 0; i < SALT_MAX && salt[i] && salt[i] != '$'; i++);
215	slen = i;
216
217	/* md5(key salt key) */
218	md5_init(&ctx);
219	md5_update(&ctx, key, klen);
220	md5_update(&ctx, salt, slen);
221	md5_update(&ctx, key, klen);
222	md5_sum(&ctx, md);
223
224	/* md5(key $1$ salt repeated-md weird-key[0]-0) */
225	md5_init(&ctx);
226	md5_update(&ctx, key, klen);
227	md5_update(&ctx, setting, 3 + slen);
228	for (i = klen; i > sizeof md; i -= sizeof md)
229	md5_update(&ctx, md, sizeof md);
230	md5_update(&ctx, md, i);
231	md[0] = 0;
232	for (i = klen; i; i >>= 1)
233	if (i & 1)
234	md5_update(&ctx, md, 1);
235	else
236	md5_update(&ctx, key, 1);
237	md5_sum(&ctx, md);
238
239	/* md = f(md, key, salt) iteration */
240	for (i = 0; i < 1000; i++) {
241	md5_init(&ctx);
242	if (i % 2)
243	md5_update(&ctx, key, klen);
244	else
245	md5_update(&ctx, md, sizeof md);
246	if (i % 3)
247	md5_update(&ctx, salt, slen);
248	if (i % 7)
249	md5_update(&ctx, key, klen);
250	if (i % 2)
251	md5_update(&ctx, md, sizeof md);
252	else
253	md5_update(&ctx, key, klen);
254	md5_sum(&ctx, md);
255	}
256
257	/* output is $1$salt$hash */
258	memcpy(output, setting, 3 + slen);
259	p = output + 3 + slen;
260	*p++ = '$';
261	static const unsigned char perm[][3] = {
262	0,6,12,1,7,13,2,8,14,3,9,15,4,10,5 };
263	for (i=0; i<5; i++) p = to64(p,
264	(md[perm[i][0]]<<16)\|(md[perm[i][1]]<<8)\|md[perm[i][2]], 4);
265	p = to64(p, md[11], 2);
266	*p = 0;
267
268	return output;
269	}
270
271	char __crypt_md5(const char key, const char setting, char output)
272	{
273	static const char testkey[] = "Xy01@#\x01\x02\x80\x7f\xff\r\n\x81\t !";
274	static const char testsetting[] = "$1$abcd0123$";
275	static const char testhash[] = "$1$abcd0123$9Qcg8DyviekV3tDGMZynJ1";
276	char testbuf[64];
277	char p, q;
278
279	p = md5crypt(key, setting, output);
280	/* self test and stack cleanup */
281	q = md5crypt(testkey, testsetting, testbuf);
282	if (!p \|\| q != testbuf \|\| memcmp(testbuf, testhash, sizeof testhash))
283	return "*";
284	return p;
285	}

lib/libc/wasi/libc-top-half/musl/src/crypt/crypt_r.c deleted-23

...	@@ -1,23 +0,0 @@
1	#include <crypt.h>
2
3	char __crypt_r(const char key, const char salt, struct crypt_data data)
4	{
5	/* Per the crypt_r API, the caller has provided a pointer to
6	* struct crypt_data; however, this implementation does not
7	* use the structure to store any internal state, and treats
8	* it purely as a char buffer for storing the result. */
9	char output = (char )data;
10	if (salt[0] == '$' && salt[1] && salt[2]) {
11	if (salt[1] == '1' && salt[2] == '$')
12	return __crypt_md5(key, salt, output);
13	if (salt[1] == '2' && salt[3] == '$')
14	return __crypt_blowfish(key, salt, output);
15	if (salt[1] == '5' && salt[2] == '$')
16	return __crypt_sha256(key, salt, output);
17	if (salt[1] == '6' && salt[2] == '$')
18	return __crypt_sha512(key, salt, output);
19	}
20	return __crypt_des(key, salt, output);
21	}
22
23	weak_alias(__crypt_r, crypt_r);

lib/libc/wasi/libc-top-half/musl/src/crypt/crypt_sha256.c deleted-322

...	@@ -1,322 +0,0 @@
1	/*
2	* public domain sha256 crypt implementation
3	*
4	* original sha crypt design: http://people.redhat.com/drepper/SHA-crypt.txt
5	* in this implementation at least 32bit int is assumed,
6	* key length is limited, the $5$ prefix is mandatory, '\n' and ':' is rejected
7	* in the salt and rounds= setting must contain a valid iteration count,
8	* on error "*" is returned.
9	*/
10	#include <ctype.h>
11	#include <stdlib.h>
12	#include <stdio.h>
13	#include <string.h>
14	#include <stdint.h>
15
16	/* public domain sha256 implementation based on fips180-3 */
17
18	struct sha256 {
19	uint64_t len; /* processed message length */
20	uint32_t h[8]; /* hash state */
21	uint8_t buf[64]; /* message block buffer */
22	};
23
24	static uint32_t ror(uint32_t n, int k) { return (n >> k) \| (n << (32-k)); }
25	#define Ch(x,y,z) (z ^ (x & (y ^ z)))
26	#define Maj(x,y,z) ((x & y) \| (z & (x \| y)))
27	#define S0(x) (ror(x,2) ^ ror(x,13) ^ ror(x,22))
28	#define S1(x) (ror(x,6) ^ ror(x,11) ^ ror(x,25))
29	#define R0(x) (ror(x,7) ^ ror(x,18) ^ (x>>3))
30	#define R1(x) (ror(x,17) ^ ror(x,19) ^ (x>>10))
31
32	static const uint32_t K[64] = {
33	0x428a2f98, 0x71374491, 0xb5c0fbcf, 0xe9b5dba5, 0x3956c25b, 0x59f111f1, 0x923f82a4, 0xab1c5ed5,
34	0xd807aa98, 0x12835b01, 0x243185be, 0x550c7dc3, 0x72be5d74, 0x80deb1fe, 0x9bdc06a7, 0xc19bf174,
35	0xe49b69c1, 0xefbe4786, 0x0fc19dc6, 0x240ca1cc, 0x2de92c6f, 0x4a7484aa, 0x5cb0a9dc, 0x76f988da,
36	0x983e5152, 0xa831c66d, 0xb00327c8, 0xbf597fc7, 0xc6e00bf3, 0xd5a79147, 0x06ca6351, 0x14292967,
37	0x27b70a85, 0x2e1b2138, 0x4d2c6dfc, 0x53380d13, 0x650a7354, 0x766a0abb, 0x81c2c92e, 0x92722c85,
38	0xa2bfe8a1, 0xa81a664b, 0xc24b8b70, 0xc76c51a3, 0xd192e819, 0xd6990624, 0xf40e3585, 0x106aa070,
39	0x19a4c116, 0x1e376c08, 0x2748774c, 0x34b0bcb5, 0x391c0cb3, 0x4ed8aa4a, 0x5b9cca4f, 0x682e6ff3,
40	0x748f82ee, 0x78a5636f, 0x84c87814, 0x8cc70208, 0x90befffa, 0xa4506ceb, 0xbef9a3f7, 0xc67178f2
41	};
42
43	static void processblock(struct sha256 s, const uint8_t buf)
44	{
45	uint32_t W[64], t1, t2, a, b, c, d, e, f, g, h;
46	int i;
47
48	for (i = 0; i < 16; i++) {
49	W[i] = (uint32_t)buf[4*i]<<24;
50	W[i] \|= (uint32_t)buf[4*i+1]<<16;
51	W[i] \|= (uint32_t)buf[4*i+2]<<8;
52	W[i] \|= buf[4*i+3];
53	}
54	for (; i < 64; i++)
55	W[i] = R1(W[i-2]) + W[i-7] + R0(W[i-15]) + W[i-16];
56	a = s->h[0];
57	b = s->h[1];
58	c = s->h[2];
59	d = s->h[3];
60	e = s->h[4];
61	f = s->h[5];
62	g = s->h[6];
63	h = s->h[7];
64	for (i = 0; i < 64; i++) {
65	t1 = h + S1(e) + Ch(e,f,g) + K[i] + W[i];
66	t2 = S0(a) + Maj(a,b,c);
67	h = g;
68	g = f;
69	f = e;
70	e = d + t1;
71	d = c;
72	c = b;
73	b = a;
74	a = t1 + t2;
75	}
76	s->h[0] += a;
77	s->h[1] += b;
78	s->h[2] += c;
79	s->h[3] += d;
80	s->h[4] += e;
81	s->h[5] += f;
82	s->h[6] += g;
83	s->h[7] += h;
84	}
85
86	static void pad(struct sha256 *s)
87	{
88	unsigned r = s->len % 64;
89
90	s->buf[r++] = 0x80;
91	if (r > 56) {
92	memset(s->buf + r, 0, 64 - r);
93	r = 0;
94	processblock(s, s->buf);
95	}
96	memset(s->buf + r, 0, 56 - r);
97	s->len *= 8;
98	s->buf[56] = s->len >> 56;
99	s->buf[57] = s->len >> 48;
100	s->buf[58] = s->len >> 40;
101	s->buf[59] = s->len >> 32;
102	s->buf[60] = s->len >> 24;
103	s->buf[61] = s->len >> 16;
104	s->buf[62] = s->len >> 8;
105	s->buf[63] = s->len;
106	processblock(s, s->buf);
107	}
108
109	static void sha256_init(struct sha256 *s)
110	{
111	s->len = 0;
112	s->h[0] = 0x6a09e667;
113	s->h[1] = 0xbb67ae85;
114	s->h[2] = 0x3c6ef372;
115	s->h[3] = 0xa54ff53a;
116	s->h[4] = 0x510e527f;
117	s->h[5] = 0x9b05688c;
118	s->h[6] = 0x1f83d9ab;
119	s->h[7] = 0x5be0cd19;
120	}
121
122	static void sha256_sum(struct sha256 s, uint8_t md)
123	{
124	int i;
125
126	pad(s);
127	for (i = 0; i < 8; i++) {
128	md[4*i] = s->h[i] >> 24;
129	md[4*i+1] = s->h[i] >> 16;
130	md[4*i+2] = s->h[i] >> 8;
131	md[4*i+3] = s->h[i];
132	}
133	}
134
135	static void sha256_update(struct sha256 s, const void m, unsigned long len)
136	{
137	const uint8_t *p = m;
138	unsigned r = s->len % 64;
139
140	s->len += len;
141	if (r) {
142	if (len < 64 - r) {
143	memcpy(s->buf + r, p, len);
144	return;
145	}
146	memcpy(s->buf + r, p, 64 - r);
147	len -= 64 - r;
148	p += 64 - r;
149	processblock(s, s->buf);
150	}
151	for (; len >= 64; len -= 64, p += 64)
152	processblock(s, p);
153	memcpy(s->buf, p, len);
154	}
155
156	static const unsigned char b64[] =
157	"./0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz";
158
159	static char to64(char s, unsigned int u, int n)
160	{
161	while (--n >= 0) {
162	*s++ = b64[u % 64];
163	u /= 64;
164	}
165	return s;
166	}
167
168	/* key limit is not part of the original design, added for DoS protection.
169	* rounds limit has been lowered (versus the reference/spec), also for DoS
170	* protection. runtime is O(klen^2 + klenrounds) /
171	#define KEY_MAX 256
172	#define SALT_MAX 16
173	#define ROUNDS_DEFAULT 5000
174	#define ROUNDS_MIN 1000
175	#define ROUNDS_MAX 9999999
176
177	/* hash n bytes of the repeated md message digest */
178	static void hashmd(struct sha256 s, unsigned int n, const void md)
179	{
180	unsigned int i;
181
182	for (i = n; i > 32; i -= 32)
183	sha256_update(s, md, 32);
184	sha256_update(s, md, i);
185	}
186
187	static char sha256crypt(const char key, const char setting, char output)
188	{
189	struct sha256 ctx;
190	unsigned char md[32], kmd[32], smd[32];
191	unsigned int i, r, klen, slen;
192	char rounds[20] = "";
193	const char *salt;
194	char *p;
195
196	/* reject large keys */
197	klen = strnlen(key, KEY_MAX+1);
198	if (klen > KEY_MAX)
199	return 0;
200
201	/* setting: $5$rounds=n$salt$ (rounds=n$ and closing $ are optional) */
202	if (strncmp(setting, "$5$", 3) != 0)
203	return 0;
204	salt = setting + 3;
205
206	r = ROUNDS_DEFAULT;
207	if (strncmp(salt, "rounds=", sizeof "rounds=" - 1) == 0) {
208	unsigned long u;
209	char *end;
210
211	/*
212	* this is a deviation from the reference:
213	* bad rounds setting is rejected if it is
214	* - empty
215	* - unterminated (missing '$')
216	* - begins with anything but a decimal digit
217	* the reference implementation treats these bad
218	* rounds as part of the salt or parse them with
219	* strtoul semantics which may cause problems
220	* including non-portable hashes that depend on
221	* the host's value of ULONG_MAX.
222	*/
223	salt += sizeof "rounds=" - 1;
224	if (!isdigit(*salt))
225	return 0;
226	u = strtoul(salt, &end, 10);
227	if (*end != '$')
228	return 0;
229	salt = end+1;
230	if (u < ROUNDS_MIN)
231	r = ROUNDS_MIN;
232	else if (u > ROUNDS_MAX)
233	return 0;
234	else
235	r = u;
236	/* needed when rounds is zero prefixed or out of bounds */
237	sprintf(rounds, "rounds=%u$", r);
238	}
239
240	for (i = 0; i < SALT_MAX && salt[i] && salt[i] != '$'; i++)
241	/* reject characters that interfere with /etc/shadow parsing */
242	if (salt[i] == '\n' \|\| salt[i] == ':')
243	return 0;
244	slen = i;
245
246	/* B = sha(key salt key) */
247	sha256_init(&ctx);
248	sha256_update(&ctx, key, klen);
249	sha256_update(&ctx, salt, slen);
250	sha256_update(&ctx, key, klen);
251	sha256_sum(&ctx, md);
252
253	/* A = sha(key salt repeat-B alternate-B-key) */
254	sha256_init(&ctx);
255	sha256_update(&ctx, key, klen);
256	sha256_update(&ctx, salt, slen);
257	hashmd(&ctx, klen, md);
258	for (i = klen; i > 0; i >>= 1)
259	if (i & 1)
260	sha256_update(&ctx, md, sizeof md);
261	else
262	sha256_update(&ctx, key, klen);
263	sha256_sum(&ctx, md);
264
265	/* DP = sha(repeat-key), this step takes O(klen^2) time */
266	sha256_init(&ctx);
267	for (i = 0; i < klen; i++)
268	sha256_update(&ctx, key, klen);
269	sha256_sum(&ctx, kmd);
270
271	/* DS = sha(repeat-salt) */
272	sha256_init(&ctx);
273	for (i = 0; i < 16 + md[0]; i++)
274	sha256_update(&ctx, salt, slen);
275	sha256_sum(&ctx, smd);
276
277	/* iterate A = f(A,DP,DS), this step takes O(roundsklen) time /
278	for (i = 0; i < r; i++) {
279	sha256_init(&ctx);
280	if (i % 2)
281	hashmd(&ctx, klen, kmd);
282	else
283	sha256_update(&ctx, md, sizeof md);
284	if (i % 3)
285	sha256_update(&ctx, smd, slen);
286	if (i % 7)
287	hashmd(&ctx, klen, kmd);
288	if (i % 2)
289	sha256_update(&ctx, md, sizeof md);
290	else
291	hashmd(&ctx, klen, kmd);
292	sha256_sum(&ctx, md);
293	}
294
295	/* output is $5$rounds=n$salt$hash */
296	p = output;
297	p += sprintf(p, "$5$%s%.*s$", rounds, slen, salt);
298	static const unsigned char perm[][3] = {
299	0,10,20,21,1,11,12,22,2,3,13,23,24,4,14,
300	15,25,5,6,16,26,27,7,17,18,28,8,9,19,29 };
301	for (i=0; i<10; i++) p = to64(p,
302	(md[perm[i][0]]<<16)\|(md[perm[i][1]]<<8)\|md[perm[i][2]], 4);
303	p = to64(p, (md[31]<<8)\|md[30], 3);
304	*p = 0;
305	return output;
306	}
307
308	char __crypt_sha256(const char key, const char setting, char output)
309	{
310	static const char testkey[] = "Xy01@#\x01\x02\x80\x7f\xff\r\n\x81\t !";
311	static const char testsetting[] = "$5$rounds=1234$abc0123456789$";
312	static const char testhash[] = "$5$rounds=1234$abc0123456789$3VfDjPt05VHFn47C/ojFZ6KRPYrOjj1lLbH.dkF3bZ6";
313	char testbuf[128];
314	char p, q;
315
316	p = sha256crypt(key, setting, output);
317	/* self test and stack cleanup */
318	q = sha256crypt(testkey, testsetting, testbuf);
319	if (!p \|\| q != testbuf \|\| memcmp(testbuf, testhash, sizeof testhash))
320	return "*";
321	return p;
322	}

lib/libc/wasi/libc-top-half/musl/src/crypt/crypt_sha512.c deleted-371

...	@@ -1,371 +0,0 @@
1	/*
2	* public domain sha512 crypt implementation
3	*
4	* original sha crypt design: http://people.redhat.com/drepper/SHA-crypt.txt
5	* in this implementation at least 32bit int is assumed,
6	* key length is limited, the $6$ prefix is mandatory, '\n' and ':' is rejected
7	* in the salt and rounds= setting must contain a valid iteration count,
8	* on error "*" is returned.
9	*/
10	#include <ctype.h>
11	#include <stdlib.h>
12	#include <stdio.h>
13	#include <string.h>
14	#include <stdint.h>
15
16	/* public domain sha512 implementation based on fips180-3 */
17	/* >=2^64 bits messages are not supported (about 2000 peta bytes) */
18
19	struct sha512 {
20	uint64_t len; /* processed message length */
21	uint64_t h[8]; /* hash state */
22	uint8_t buf[128]; /* message block buffer */
23	};
24
25	static uint64_t ror(uint64_t n, int k) { return (n >> k) \| (n << (64-k)); }
26	#define Ch(x,y,z) (z ^ (x & (y ^ z)))
27	#define Maj(x,y,z) ((x & y) \| (z & (x \| y)))
28	#define S0(x) (ror(x,28) ^ ror(x,34) ^ ror(x,39))
29	#define S1(x) (ror(x,14) ^ ror(x,18) ^ ror(x,41))
30	#define R0(x) (ror(x,1) ^ ror(x,8) ^ (x>>7))
31	#define R1(x) (ror(x,19) ^ ror(x,61) ^ (x>>6))
32
33	static const uint64_t K[80] = {
34	0x428a2f98d728ae22ULL, 0x7137449123ef65cdULL, 0xb5c0fbcfec4d3b2fULL, 0xe9b5dba58189dbbcULL,
35	0x3956c25bf348b538ULL, 0x59f111f1b605d019ULL, 0x923f82a4af194f9bULL, 0xab1c5ed5da6d8118ULL,
36	0xd807aa98a3030242ULL, 0x12835b0145706fbeULL, 0x243185be4ee4b28cULL, 0x550c7dc3d5ffb4e2ULL,
37	0x72be5d74f27b896fULL, 0x80deb1fe3b1696b1ULL, 0x9bdc06a725c71235ULL, 0xc19bf174cf692694ULL,
38	0xe49b69c19ef14ad2ULL, 0xefbe4786384f25e3ULL, 0x0fc19dc68b8cd5b5ULL, 0x240ca1cc77ac9c65ULL,
39	0x2de92c6f592b0275ULL, 0x4a7484aa6ea6e483ULL, 0x5cb0a9dcbd41fbd4ULL, 0x76f988da831153b5ULL,
40	0x983e5152ee66dfabULL, 0xa831c66d2db43210ULL, 0xb00327c898fb213fULL, 0xbf597fc7beef0ee4ULL,
41	0xc6e00bf33da88fc2ULL, 0xd5a79147930aa725ULL, 0x06ca6351e003826fULL, 0x142929670a0e6e70ULL,
42	0x27b70a8546d22ffcULL, 0x2e1b21385c26c926ULL, 0x4d2c6dfc5ac42aedULL, 0x53380d139d95b3dfULL,
43	0x650a73548baf63deULL, 0x766a0abb3c77b2a8ULL, 0x81c2c92e47edaee6ULL, 0x92722c851482353bULL,
44	0xa2bfe8a14cf10364ULL, 0xa81a664bbc423001ULL, 0xc24b8b70d0f89791ULL, 0xc76c51a30654be30ULL,
45	0xd192e819d6ef5218ULL, 0xd69906245565a910ULL, 0xf40e35855771202aULL, 0x106aa07032bbd1b8ULL,
46	0x19a4c116b8d2d0c8ULL, 0x1e376c085141ab53ULL, 0x2748774cdf8eeb99ULL, 0x34b0bcb5e19b48a8ULL,
47	0x391c0cb3c5c95a63ULL, 0x4ed8aa4ae3418acbULL, 0x5b9cca4f7763e373ULL, 0x682e6ff3d6b2b8a3ULL,
48	0x748f82ee5defb2fcULL, 0x78a5636f43172f60ULL, 0x84c87814a1f0ab72ULL, 0x8cc702081a6439ecULL,
49	0x90befffa23631e28ULL, 0xa4506cebde82bde9ULL, 0xbef9a3f7b2c67915ULL, 0xc67178f2e372532bULL,
50	0xca273eceea26619cULL, 0xd186b8c721c0c207ULL, 0xeada7dd6cde0eb1eULL, 0xf57d4f7fee6ed178ULL,
51	0x06f067aa72176fbaULL, 0x0a637dc5a2c898a6ULL, 0x113f9804bef90daeULL, 0x1b710b35131c471bULL,
52	0x28db77f523047d84ULL, 0x32caab7b40c72493ULL, 0x3c9ebe0a15c9bebcULL, 0x431d67c49c100d4cULL,
53	0x4cc5d4becb3e42b6ULL, 0x597f299cfc657e2aULL, 0x5fcb6fab3ad6faecULL, 0x6c44198c4a475817ULL
54	};
55
56	static void processblock(struct sha512 s, const uint8_t buf)
57	{
58	uint64_t W[80], t1, t2, a, b, c, d, e, f, g, h;
59	int i;
60
61	for (i = 0; i < 16; i++) {
62	W[i] = (uint64_t)buf[8*i]<<56;
63	W[i] \|= (uint64_t)buf[8*i+1]<<48;
64	W[i] \|= (uint64_t)buf[8*i+2]<<40;
65	W[i] \|= (uint64_t)buf[8*i+3]<<32;
66	W[i] \|= (uint64_t)buf[8*i+4]<<24;
67	W[i] \|= (uint64_t)buf[8*i+5]<<16;
68	W[i] \|= (uint64_t)buf[8*i+6]<<8;
69	W[i] \|= buf[8*i+7];
70	}
71	for (; i < 80; i++)
72	W[i] = R1(W[i-2]) + W[i-7] + R0(W[i-15]) + W[i-16];
73	a = s->h[0];
74	b = s->h[1];
75	c = s->h[2];
76	d = s->h[3];
77	e = s->h[4];
78	f = s->h[5];
79	g = s->h[6];
80	h = s->h[7];
81	for (i = 0; i < 80; i++) {
82	t1 = h + S1(e) + Ch(e,f,g) + K[i] + W[i];
83	t2 = S0(a) + Maj(a,b,c);
84	h = g;
85	g = f;
86	f = e;
87	e = d + t1;
88	d = c;
89	c = b;
90	b = a;
91	a = t1 + t2;
92	}
93	s->h[0] += a;
94	s->h[1] += b;
95	s->h[2] += c;
96	s->h[3] += d;
97	s->h[4] += e;
98	s->h[5] += f;
99	s->h[6] += g;
100	s->h[7] += h;
101	}
102
103	static void pad(struct sha512 *s)
104	{
105	unsigned r = s->len % 128;
106
107	s->buf[r++] = 0x80;
108	if (r > 112) {
109	memset(s->buf + r, 0, 128 - r);
110	r = 0;
111	processblock(s, s->buf);
112	}
113	memset(s->buf + r, 0, 120 - r);
114	s->len *= 8;
115	s->buf[120] = s->len >> 56;
116	s->buf[121] = s->len >> 48;
117	s->buf[122] = s->len >> 40;
118	s->buf[123] = s->len >> 32;
119	s->buf[124] = s->len >> 24;
120	s->buf[125] = s->len >> 16;
121	s->buf[126] = s->len >> 8;
122	s->buf[127] = s->len;
123	processblock(s, s->buf);
124	}
125
126	static void sha512_init(struct sha512 *s)
127	{
128	s->len = 0;
129	s->h[0] = 0x6a09e667f3bcc908ULL;
130	s->h[1] = 0xbb67ae8584caa73bULL;
131	s->h[2] = 0x3c6ef372fe94f82bULL;
132	s->h[3] = 0xa54ff53a5f1d36f1ULL;
133	s->h[4] = 0x510e527fade682d1ULL;
134	s->h[5] = 0x9b05688c2b3e6c1fULL;
135	s->h[6] = 0x1f83d9abfb41bd6bULL;
136	s->h[7] = 0x5be0cd19137e2179ULL;
137	}
138
139	static void sha512_sum(struct sha512 s, uint8_t md)
140	{
141	int i;
142
143	pad(s);
144	for (i = 0; i < 8; i++) {
145	md[8*i] = s->h[i] >> 56;
146	md[8*i+1] = s->h[i] >> 48;
147	md[8*i+2] = s->h[i] >> 40;
148	md[8*i+3] = s->h[i] >> 32;
149	md[8*i+4] = s->h[i] >> 24;
150	md[8*i+5] = s->h[i] >> 16;
151	md[8*i+6] = s->h[i] >> 8;
152	md[8*i+7] = s->h[i];
153	}
154	}
155
156	static void sha512_update(struct sha512 s, const void m, unsigned long len)
157	{
158	const uint8_t *p = m;
159	unsigned r = s->len % 128;
160
161	s->len += len;
162	if (r) {
163	if (len < 128 - r) {
164	memcpy(s->buf + r, p, len);
165	return;
166	}
167	memcpy(s->buf + r, p, 128 - r);
168	len -= 128 - r;
169	p += 128 - r;
170	processblock(s, s->buf);
171	}
172	for (; len >= 128; len -= 128, p += 128)
173	processblock(s, p);
174	memcpy(s->buf, p, len);
175	}
176
177	static const unsigned char b64[] =
178	"./0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz";
179
180	static char to64(char s, unsigned int u, int n)
181	{
182	while (--n >= 0) {
183	*s++ = b64[u % 64];
184	u /= 64;
185	}
186	return s;
187	}
188
189	/* key limit is not part of the original design, added for DoS protection.
190	* rounds limit has been lowered (versus the reference/spec), also for DoS
191	* protection. runtime is O(klen^2 + klenrounds) /
192	#define KEY_MAX 256
193	#define SALT_MAX 16
194	#define ROUNDS_DEFAULT 5000
195	#define ROUNDS_MIN 1000
196	#define ROUNDS_MAX 9999999
197
198	/* hash n bytes of the repeated md message digest */
199	static void hashmd(struct sha512 s, unsigned int n, const void md)
200	{
201	unsigned int i;
202
203	for (i = n; i > 64; i -= 64)
204	sha512_update(s, md, 64);
205	sha512_update(s, md, i);
206	}
207
208	static char sha512crypt(const char key, const char setting, char output)
209	{
210	struct sha512 ctx;
211	unsigned char md[64], kmd[64], smd[64];
212	unsigned int i, r, klen, slen;
213	char rounds[20] = "";
214	const char *salt;
215	char *p;
216
217	/* reject large keys */
218	for (i = 0; i <= KEY_MAX && key[i]; i++);
219	if (i > KEY_MAX)
220	return 0;
221	klen = i;
222
223	/* setting: $6$rounds=n$salt$ (rounds=n$ and closing $ are optional) */
224	if (strncmp(setting, "$6$", 3) != 0)
225	return 0;
226	salt = setting + 3;
227
228	r = ROUNDS_DEFAULT;
229	if (strncmp(salt, "rounds=", sizeof "rounds=" - 1) == 0) {
230	unsigned long u;
231	char *end;
232
233	/*
234	* this is a deviation from the reference:
235	* bad rounds setting is rejected if it is
236	* - empty
237	* - unterminated (missing '$')
238	* - begins with anything but a decimal digit
239	* the reference implementation treats these bad
240	* rounds as part of the salt or parse them with
241	* strtoul semantics which may cause problems
242	* including non-portable hashes that depend on
243	* the host's value of ULONG_MAX.
244	*/
245	salt += sizeof "rounds=" - 1;
246	if (!isdigit(*salt))
247	return 0;
248	u = strtoul(salt, &end, 10);
249	if (*end != '$')
250	return 0;
251	salt = end+1;
252	if (u < ROUNDS_MIN)
253	r = ROUNDS_MIN;
254	else if (u > ROUNDS_MAX)
255	return 0;
256	else
257	r = u;
258	/* needed when rounds is zero prefixed or out of bounds */
259	sprintf(rounds, "rounds=%u$", r);
260	}
261
262	for (i = 0; i < SALT_MAX && salt[i] && salt[i] != '$'; i++)
263	/* reject characters that interfere with /etc/shadow parsing */
264	if (salt[i] == '\n' \|\| salt[i] == ':')
265	return 0;
266	slen = i;
267
268	/* B = sha(key salt key) */
269	sha512_init(&ctx);
270	sha512_update(&ctx, key, klen);
271	sha512_update(&ctx, salt, slen);
272	sha512_update(&ctx, key, klen);
273	sha512_sum(&ctx, md);
274
275	/* A = sha(key salt repeat-B alternate-B-key) */
276	sha512_init(&ctx);
277	sha512_update(&ctx, key, klen);
278	sha512_update(&ctx, salt, slen);
279	hashmd(&ctx, klen, md);
280	for (i = klen; i > 0; i >>= 1)
281	if (i & 1)
282	sha512_update(&ctx, md, sizeof md);
283	else
284	sha512_update(&ctx, key, klen);
285	sha512_sum(&ctx, md);
286
287	/* DP = sha(repeat-key), this step takes O(klen^2) time */
288	sha512_init(&ctx);
289	for (i = 0; i < klen; i++)
290	sha512_update(&ctx, key, klen);
291	sha512_sum(&ctx, kmd);
292
293	/* DS = sha(repeat-salt) */
294	sha512_init(&ctx);
295	for (i = 0; i < 16 + md[0]; i++)
296	sha512_update(&ctx, salt, slen);
297	sha512_sum(&ctx, smd);
298
299	/* iterate A = f(A,DP,DS), this step takes O(roundsklen) time /
300	for (i = 0; i < r; i++) {
301	sha512_init(&ctx);
302	if (i % 2)
303	hashmd(&ctx, klen, kmd);
304	else
305	sha512_update(&ctx, md, sizeof md);
306	if (i % 3)
307	sha512_update(&ctx, smd, slen);
308	if (i % 7)
309	hashmd(&ctx, klen, kmd);
310	if (i % 2)
311	sha512_update(&ctx, md, sizeof md);
312	else
313	hashmd(&ctx, klen, kmd);
314	sha512_sum(&ctx, md);
315	}
316
317	/* output is $6$rounds=n$salt$hash */
318	p = output;
319	p += sprintf(p, "$6$%s%.*s$", rounds, slen, salt);
320	#if 1
321	static const unsigned char perm[][3] = {
322	0,21,42,22,43,1,44,2,23,3,24,45,25,46,4,
323	47,5,26,6,27,48,28,49,7,50,8,29,9,30,51,
324	31,52,10,53,11,32,12,33,54,34,55,13,56,14,35,
325	15,36,57,37,58,16,59,17,38,18,39,60,40,61,19,
326	62,20,41 };
327	for (i=0; i<21; i++) p = to64(p,
328	(md[perm[i][0]]<<16)\|(md[perm[i][1]]<<8)\|md[perm[i][2]], 4);
329	#else
330	p = to64(p, (md[0]<<16)\|(md[21]<<8)\|md[42], 4);
331	p = to64(p, (md[22]<<16)\|(md[43]<<8)\|md[1], 4);
332	p = to64(p, (md[44]<<16)\|(md[2]<<8)\|md[23], 4);
333	p = to64(p, (md[3]<<16)\|(md[24]<<8)\|md[45], 4);
334	p = to64(p, (md[25]<<16)\|(md[46]<<8)\|md[4], 4);
335	p = to64(p, (md[47]<<16)\|(md[5]<<8)\|md[26], 4);
336	p = to64(p, (md[6]<<16)\|(md[27]<<8)\|md[48], 4);
337	p = to64(p, (md[28]<<16)\|(md[49]<<8)\|md[7], 4);
338	p = to64(p, (md[50]<<16)\|(md[8]<<8)\|md[29], 4);
339	p = to64(p, (md[9]<<16)\|(md[30]<<8)\|md[51], 4);
340	p = to64(p, (md[31]<<16)\|(md[52]<<8)\|md[10], 4);
341	p = to64(p, (md[53]<<16)\|(md[11]<<8)\|md[32], 4);
342	p = to64(p, (md[12]<<16)\|(md[33]<<8)\|md[54], 4);
343	p = to64(p, (md[34]<<16)\|(md[55]<<8)\|md[13], 4);
344	p = to64(p, (md[56]<<16)\|(md[14]<<8)\|md[35], 4);
345	p = to64(p, (md[15]<<16)\|(md[36]<<8)\|md[57], 4);
346	p = to64(p, (md[37]<<16)\|(md[58]<<8)\|md[16], 4);
347	p = to64(p, (md[59]<<16)\|(md[17]<<8)\|md[38], 4);
348	p = to64(p, (md[18]<<16)\|(md[39]<<8)\|md[60], 4);
349	p = to64(p, (md[40]<<16)\|(md[61]<<8)\|md[19], 4);
350	p = to64(p, (md[62]<<16)\|(md[20]<<8)\|md[41], 4);
351	#endif
352	p = to64(p, md[63], 2);
353	*p = 0;
354	return output;
355	}
356
357	char __crypt_sha512(const char key, const char setting, char output)
358	{
359	static const char testkey[] = "Xy01@#\x01\x02\x80\x7f\xff\r\n\x81\t !";
360	static const char testsetting[] = "$6$rounds=1234$abc0123456789$";
361	static const char testhash[] = "$6$rounds=1234$abc0123456789$BCpt8zLrc/RcyuXmCDOE1ALqMXB2MH6n1g891HhFj8.w7LxGv.FTkqq6Vxc/km3Y0jE0j24jY5PIv/oOu6reg1";
362	char testbuf[128];
363	char p, q;
364
365	p = sha512crypt(key, setting, output);
366	/* self test and stack cleanup */
367	q = sha512crypt(testkey, testsetting, testbuf);
368	if (!p \|\| q != testbuf \|\| memcmp(testbuf, testhash, sizeof testhash))
369	return "*";
370	return p;
371	}

lib/libc/wasi/libc-top-half/musl/src/crypt/encrypt.c deleted-52

...	@@ -1,52 +0,0 @@
1	#include <stdint.h>
2	#include <stdlib.h>
3	#include <unistd.h>
4
5	#include "crypt_des.h"
6
7	static struct expanded_key __encrypt_key;
8
9	void setkey(const char *key)
10	{
11	unsigned char bkey[8];
12	int i, j;
13
14	for (i = 0; i < 8; i++) {
15	bkey[i] = 0;
16	for (j = 7; j >= 0; j--, key++)
17	bkey[i] \|= (uint32_t)(*key & 1) << j;
18	}
19
20	__des_setkey(bkey, &__encrypt_key);
21	}
22
23	void encrypt(char *block, int edflag)
24	{
25	struct expanded_key decrypt_key, *key;
26	uint32_t b[2];
27	int i, j;
28	char *p;
29
30	p = block;
31	for (i = 0; i < 2; i++) {
32	b[i] = 0;
33	for (j = 31; j >= 0; j--, p++)
34	b[i] \|= (uint32_t)(*p & 1) << j;
35	}
36
37	key = &__encrypt_key;
38	if (edflag) {
39	key = &decrypt_key;
40	for (i = 0; i < 16; i++) {
41	decrypt_key.l[i] = __encrypt_key.l[15-i];
42	decrypt_key.r[i] = __encrypt_key.r[15-i];
43	}
44	}
45
46	__do_des(b[0], b[1], b, b + 1, 1, 0, key);
47
48	p = block;
49	for (i = 0; i < 2; i++)
50	for (j = 31; j >= 0; j--)
51	*p++ = b[i]>>j & 1;
52	}

lib/libc/wasi/libc-top-half/musl/src/ctype/__ctype_b_loc.c deleted-41

...	@@ -1,41 +0,0 @@
1	#include <endian.h>
2
3	#if __BYTE_ORDER == __BIG_ENDIAN
4	#define X(x) x
5	#else
6	#define X(x) (((x)/256 \| (x)*256) % 65536)
7	#endif
8
9	static const unsigned short table[] = {
10	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
11	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
12	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
13	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14	X(0x200),X(0x200),X(0x200),X(0x200),X(0x200),X(0x200),X(0x200),X(0x200),
15	X(0x200),X(0x320),X(0x220),X(0x220),X(0x220),X(0x220),X(0x200),X(0x200),
16	X(0x200),X(0x200),X(0x200),X(0x200),X(0x200),X(0x200),X(0x200),X(0x200),
17	X(0x200),X(0x200),X(0x200),X(0x200),X(0x200),X(0x200),X(0x200),X(0x200),
18	X(0x160),X(0x4c0),X(0x4c0),X(0x4c0),X(0x4c0),X(0x4c0),X(0x4c0),X(0x4c0),
19	X(0x4c0),X(0x4c0),X(0x4c0),X(0x4c0),X(0x4c0),X(0x4c0),X(0x4c0),X(0x4c0),
20	X(0x8d8),X(0x8d8),X(0x8d8),X(0x8d8),X(0x8d8),X(0x8d8),X(0x8d8),X(0x8d8),
21	X(0x8d8),X(0x8d8),X(0x4c0),X(0x4c0),X(0x4c0),X(0x4c0),X(0x4c0),X(0x4c0),
22	X(0x4c0),X(0x8d5),X(0x8d5),X(0x8d5),X(0x8d5),X(0x8d5),X(0x8d5),X(0x8c5),
23	X(0x8c5),X(0x8c5),X(0x8c5),X(0x8c5),X(0x8c5),X(0x8c5),X(0x8c5),X(0x8c5),
24	X(0x8c5),X(0x8c5),X(0x8c5),X(0x8c5),X(0x8c5),X(0x8c5),X(0x8c5),X(0x8c5),
25	X(0x8c5),X(0x8c5),X(0x8c5),X(0x4c0),X(0x4c0),X(0x4c0),X(0x4c0),X(0x4c0),
26	X(0x4c0),X(0x8d6),X(0x8d6),X(0x8d6),X(0x8d6),X(0x8d6),X(0x8d6),X(0x8c6),
27	X(0x8c6),X(0x8c6),X(0x8c6),X(0x8c6),X(0x8c6),X(0x8c6),X(0x8c6),X(0x8c6),
28	X(0x8c6),X(0x8c6),X(0x8c6),X(0x8c6),X(0x8c6),X(0x8c6),X(0x8c6),X(0x8c6),
29	X(0x8c6),X(0x8c6),X(0x8c6),X(0x4c0),X(0x4c0),X(0x4c0),X(0x4c0),X(0x200),
30	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
31	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
32	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
33	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
34	};
35
36	static const unsigned short *const ptable = table+128;
37
38	const unsigned short **__ctype_b_loc(void)
39	{
40	return (void *)&ptable;
41	}

lib/libc/wasi/libc-top-half/musl/src/ctype/__ctype_get_mb_cur_max.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <stdlib.h>
2	#include "locale_impl.h"
3
4	size_t __ctype_get_mb_cur_max()
5	{
6	return MB_CUR_MAX;
7	}

lib/libc/wasi/libc-top-half/musl/src/ctype/__ctype_tolower_loc.c deleted-30

...	@@ -1,30 +0,0 @@
1	#include <stdint.h>
2
3	static const int32_t table[] = {
4	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
5	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
6	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
7	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
8	0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,
9	16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,
10	32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,
11	48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,
12	64,
13	'a','b','c','d','e','f','g','h','i','j','k','l','m',
14	'n','o','p','q','r','s','t','u','v','w','x','y','z',
15	91,92,93,94,95,96,
16	'a','b','c','d','e','f','g','h','i','j','k','l','m',
17	'n','o','p','q','r','s','t','u','v','w','x','y','z',
18	123,124,125,126,127,
19	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
20	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
21	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
22	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
23	};
24
25	static const int32_t *const ptable = table+128;
26
27	const int32_t **__ctype_tolower_loc(void)
28	{
29	return (void *)&ptable;
30	}

lib/libc/wasi/libc-top-half/musl/src/ctype/__ctype_toupper_loc.c deleted-30

...	@@ -1,30 +0,0 @@
1	#include <stdint.h>
2
3	static const int32_t table[] = {
4	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
5	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
6	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
7	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
8	0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,
9	16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,
10	32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,
11	48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,
12	64,
13	'A','B','C','D','E','F','G','H','I','J','K','L','M',
14	'N','O','P','Q','R','S','T','U','V','W','X','Y','Z',
15	91,92,93,94,95,96,
16	'A','B','C','D','E','F','G','H','I','J','K','L','M',
17	'N','O','P','Q','R','S','T','U','V','W','X','Y','Z',
18	123,124,125,126,127,
19	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
20	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
21	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
22	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
23	};
24
25	static const int32_t *const ptable = table+128;
26
27	const int32_t **__ctype_toupper_loc(void)
28	{
29	return (void *)&ptable;
30	}

lib/libc/wasi/libc-top-half/musl/src/ctype/alpha.h deleted-172

...	@@ -1,172 +0,0 @@
1	18,17,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,17,34,35,36,17,37,38,39,40,
2	41,42,43,44,17,45,46,47,16,16,48,16,16,16,16,16,16,16,49,50,51,16,52,53,16,16,
3	17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,54,
4	17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,
5	17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,
6	17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,
7	17,17,17,55,17,17,17,17,56,17,57,58,59,60,61,62,17,17,17,17,17,17,17,17,17,17,
8	17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,
9	17,17,17,17,17,17,17,63,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
10	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,17,64,65,17,66,67,
11	68,69,70,71,72,73,74,17,75,76,77,78,79,80,81,16,82,83,84,85,86,87,88,89,90,91,
12	92,93,16,94,95,96,16,17,17,17,97,98,99,16,16,16,16,16,16,16,16,16,16,17,17,17,
13	17,100,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,17,17,101,16,16,16,16,16,
14	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
15	16,16,17,17,102,103,16,16,104,105,17,17,17,17,17,17,17,17,17,17,17,17,17,17,
16	17,17,17,17,17,17,17,17,17,106,17,17,107,16,16,16,16,16,16,16,16,16,16,16,16,
17	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,17,
18	108,109,16,16,16,16,16,16,16,16,16,110,16,16,16,16,16,16,16,16,16,16,16,16,16,
19	16,16,16,16,16,16,16,16,16,16,111,112,113,114,16,16,16,16,16,16,16,16,115,116,
20	117,16,16,16,16,16,118,119,16,16,16,16,120,16,16,121,16,16,16,16,16,16,16,16,
21	16,16,16,16,16,
22	16,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,
23	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
24	255,255,255,255,255,255,255,255,255,255,255,0,0,0,0,0,0,0,0,254,255,255,7,254,
25	255,255,7,0,0,0,0,0,4,32,4,255,255,127,255,255,255,127,255,255,255,255,255,
26	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
27	255,195,255,3,0,31,80,0,0,0,0,0,0,0,0,0,0,32,0,0,0,0,0,223,188,64,215,255,255,
28	251,255,255,255,255,255,255,255,255,255,191,255,255,255,255,255,255,255,255,
29	255,255,255,255,255,255,255,255,255,3,252,255,255,255,255,255,255,255,255,255,
30	255,255,255,255,255,255,255,255,255,255,255,254,255,255,255,127,2,255,255,255,
31	255,255,1,0,0,0,0,255,191,182,0,255,255,255,135,7,0,0,0,255,7,255,255,255,255,
32	255,255,255,254,255,195,255,255,255,255,255,255,255,255,255,255,255,255,239,
33	31,254,225,255,
34	159,0,0,255,255,255,255,255,255,0,224,255,255,255,255,255,255,255,255,255,255,
35	255,255,3,0,255,255,255,255,255,7,48,4,255,255,255,252,255,31,0,0,255,255,255,
36	1,255,7,0,0,0,0,0,0,255,255,223,63,0,0,240,255,248,3,255,255,255,255,255,255,
37	255,255,255,239,255,223,225,255,207,255,254,255,239,159,249,255,255,253,197,
38	227,159,89,128,176,207,255,3,16,238,135,249,255,255,253,109,195,135,25,2,94,
39	192,255,63,0,238,191,251,255,255,253,237,227,191,27,1,0,207,255,0,30,238,159,
40	249,255,255,253,237,227,159,25,192,176,207,255,2,0,236,199,61,214,24,199,255,
41	195,199,29,129,0,192,255,0,0,239,223,253,255,255,253,255,227,223,29,96,7,207,
42	255,0,0,239,223,253,255,255,253,239,227,223,29,96,64,207,255,6,0,239,223,253,
43	255,255,255,255,231,223,93,240,128,207,255,0,252,236,255,127,252,255,255,251,
44	47,127,128,95,255,192,255,12,0,254,255,255,255,255,127,255,7,63,32,255,3,0,0,
45	0,0,214,247,255,255,175,255,255,59,95,32,255,243,0,0,0,
46	0,1,0,0,0,255,3,0,0,255,254,255,255,255,31,254,255,3,255,255,254,255,255,255,
47	31,0,0,0,0,0,0,0,0,255,255,255,255,255,255,127,249,255,3,255,255,255,255,255,
48	255,255,255,255,63,255,255,255,255,191,32,255,255,255,255,255,247,255,255,255,
49	255,255,255,255,255,255,61,127,61,255,255,255,255,255,61,255,255,255,255,61,
50	127,61,255,127,255,255,255,255,255,255,255,61,255,255,255,255,255,255,255,255,
51	7,0,0,0,0,255,255,0,0,255,255,255,255,255,255,255,255,255,255,63,63,254,255,
52	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
53	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
54	255,255,255,255,255,159,255,255,254,255,255,7,255,255,255,255,255,255,255,255,
55	255,199,255,1,255,223,15,0,255,255,15,0,255,255,15,0,255,223,13,0,255,255,255,
56	255,255,255,207,255,255,1,128,16,255,3,0,0,0,0,255,3,255,255,255,255,255,255,
57	255,255,255,255,255,1,255,255,255,255,255,7,255,255,255,255,255,255,255,255,
58	63,
59	0,255,255,255,127,255,15,255,1,192,255,255,255,255,63,31,0,255,255,255,255,
60	255,15,255,255,255,3,255,3,0,0,0,0,255,255,255,15,255,255,255,255,255,255,255,
61	127,254,255,31,0,255,3,255,3,128,0,0,0,0,0,0,0,0,0,0,0,255,255,255,255,255,
62	255,239,255,239,15,255,3,0,0,0,0,255,255,255,255,255,243,255,255,255,255,255,
63	255,191,255,3,0,255,255,255,255,255,255,127,0,255,227,255,255,255,255,255,63,
64	255,1,255,255,255,255,255,231,0,0,0,0,0,222,111,4,255,255,255,255,255,255,255,
65	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,0,0,0,0,
66	128,255,31,0,255,255,63,63,255,255,255,255,63,63,255,170,255,255,255,63,255,
67	255,255,255,255,255,223,95,220,31,207,15,255,31,220,31,0,0,0,0,0,0,0,0,0,0,0,
68	0,0,0,2,128,0,0,255,31,0,0,0,0,0,0,0,0,0,0,0,0,132,252,47,62,80,189,255,243,
69	224,67,0,0,255,255,255,255,255,1,0,0,0,0,0,0,0,0,0,0,0,0,0,
70	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,192,255,255,255,255,255,255,3,0,
71	0,255,255,255,255,255,127,255,255,255,255,255,127,255,255,255,255,255,255,255,
72	255,255,255,255,255,255,255,255,255,31,120,12,0,255,255,255,255,191,32,255,
73	255,255,255,255,255,255,128,0,0,255,255,127,0,127,127,127,127,127,127,127,127,
74	255,255,255,255,0,0,0,0,0,128,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
75	0,0,224,0,0,0,254,3,62,31,254,255,255,255,255,255,255,255,255,255,127,224,254,
76	255,255,255,255,255,255,255,255,255,255,247,224,255,255,255,255,255,254,255,
77	255,255,255,255,255,255,255,255,255,127,0,0,255,255,255,7,0,0,0,0,0,0,255,255,
78	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
79	255,255,255,63,0,0,0,0,0,0,0,0,0,255,255,255,255,255,255,255,255,255,255,255,
80	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,0,
81	0,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,31,0,0,
82	0,0,0,0,0,0,255,255,255,255,255,63,255,31,255,255,255,15,0,0,255,255,255,255,
83	255,127,240,143,255,255,255,255,255,255,255,255,255,255,255,255,255,255,0,0,0,
84	0,128,255,252,255,255,255,255,255,255,255,255,255,255,255,255,249,255,255,255,
85	255,255,255,124,0,0,0,0,0,128,255,191,255,255,255,255,0,0,0,255,255,255,255,
86	255,255,15,0,255,255,255,255,255,255,255,255,47,0,255,3,0,0,252,232,255,255,
87	255,255,255,7,255,255,255,255,7,0,255,255,255,31,255,255,255,255,255,255,247,
88	255,0,128,255,3,255,255,255,127,255,255,255,255,255,255,127,0,255,63,255,3,
89	255,255,127,252,255,255,255,255,255,255,255,127,5,0,0,56,255,255,60,0,126,126,
90	126,0,127,127,255,255,255,255,255,247,255,0,255,255,255,255,255,255,255,255,
91	255,255,255,255,255,255,255,7,255,3,255,255,255,255,255,255,255,255,255,255,
92	255,255,255,255,255,255,255,255,255,255,15,0,255,255,127,248,255,255,255,255,
93	255,
94	15,255,255,255,255,255,255,255,255,255,255,255,255,255,63,255,255,255,255,255,
95	255,255,255,255,255,255,255,255,3,0,0,0,0,127,0,248,224,255,253,127,95,219,
96	255,255,255,255,255,255,255,255,255,255,255,255,255,3,0,0,0,248,255,255,255,
97	255,255,255,255,255,255,255,255,255,63,0,0,255,255,255,255,255,255,255,255,
98	252,255,255,255,255,255,255,0,0,0,0,0,255,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,223,
99	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,31,0,0,255,3,
100	254,255,255,7,254,255,255,7,192,255,255,255,255,255,255,255,255,255,255,127,
101	252,252,252,28,0,0,0,0,255,239,255,255,127,255,255,183,255,63,255,63,0,0,0,0,
102	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,7,0,0,0,0,0,0,0,0,
103	255,255,255,255,255,255,31,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
104	0,0,0,0,0,0,0,0,255,255,255,31,255,255,255,255,255,255,1,0,0,0,0,
105	0,255,255,255,255,0,224,255,255,255,7,255,255,255,255,255,7,255,255,255,63,
106	255,255,255,255,15,255,62,0,0,0,0,0,255,255,255,255,255,255,255,255,255,255,
107	255,255,255,255,255,255,255,255,255,63,255,3,255,255,255,255,15,255,255,255,
108	255,15,255,255,255,255,255,0,255,255,255,255,255,255,15,0,0,0,0,0,0,0,0,0,0,0,
109	0,0,0,0,0,0,0,0,255,255,255,255,255,255,127,0,255,255,63,0,255,0,0,0,0,0,0,0,
110	0,0,0,0,0,0,0,0,0,0,0,0,63,253,255,255,255,255,191,145,255,255,63,0,255,255,
111	127,0,255,255,255,127,0,0,0,0,0,0,0,0,255,255,55,0,255,255,63,0,255,255,255,3,
112	0,0,0,0,0,0,0,0,255,255,255,255,255,255,255,192,0,0,0,0,0,0,0,0,111,240,239,
113	254,255,255,63,0,0,0,0,0,255,255,255,31,255,255,255,31,0,0,0,0,255,254,255,
114	255,31,0,0,0,255,255,255,255,255,255,63,0,255,255,63,0,255,255,7,0,255,255,3,
115	0,0,0,0,0,0,0,0,0,0,0,0,
116	0,255,255,255,255,255,255,255,255,255,1,0,0,0,0,0,0,255,255,255,255,255,255,7,
117	0,255,255,255,255,255,255,7,0,255,255,255,255,255,0,255,3,0,0,0,0,0,0,0,0,0,0,
118	0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,31,128,0,255,255,63,0,0,0,0,0,0,0,0,0,
119	0,0,0,0,0,0,0,0,0,0,255,255,127,0,255,255,255,255,255,255,255,255,63,0,0,0,
120	192,255,0,0,252,255,255,255,255,255,255,1,0,0,255,255,255,1,255,3,255,255,255,
121	255,255,255,199,255,112,0,255,255,255,255,71,0,255,255,255,255,255,255,255,
122	255,30,0,255,23,0,0,0,0,255,255,251,255,255,255,159,64,0,0,0,0,0,0,0,0,127,
123	189,255,191,255,1,255,255,255,255,255,255,255,1,255,3,239,159,249,255,255,253,
124	237,227,159,25,129,224,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,
125	255,255,255,255,255,187,7,255,131,0,0,0,0,255,255,255,255,255,255,255,255,179,
126	0,255,3,0,0,0,
127	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,255,255,255,63,127,0,0,0,63,0,0,
128	0,0,255,255,255,255,255,255,255,127,17,0,255,3,0,0,0,0,255,255,255,255,255,
129	255,63,1,255,3,0,0,0,0,0,0,255,255,255,231,255,7,255,3,0,0,0,0,0,0,0,0,0,0,0,
130	0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,255,255,255,255,1,0,0,0,0,0,0,0,0,0,0,0,
131	0,255,255,255,255,255,255,255,255,255,3,0,128,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
132	0,0,0,0,255,252,255,255,255,255,255,252,26,0,0,0,255,255,255,255,255,255,231,
133	127,0,0,255,255,255,255,255,255,255,255,255,32,0,0,0,0,255,255,255,255,255,
134	255,255,1,255,253,255,255,255,255,127,127,1,0,255,3,0,0,252,255,255,255,252,
135	255,255,254,127,0,0,0,0,0,0,0,0,0,127,251,255,255,255,255,127,180,203,0,255,3,
136	191,253,255,255,255,127,123,1,255,3,0,0,0,0,0,0,0,0,0,
137	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,127,0,255,
138	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,3,0,0,
139	0,0,0,0,0,0,0,0,0,0,255,255,255,255,255,255,255,255,255,255,255,255,255,127,0,
140	0,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
141	255,255,255,255,255,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,
142	255,255,255,127,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,
143	255,255,255,255,255,255,127,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,
144	255,255,255,255,255,255,1,255,255,255,127,255,3,0,0,0,0,0,0,0,0,0,0,0,0,255,
145	255,255,63,0,0,255,255,255,255,255,255,0,0,15,0,255,3,248,255,255,224,255,255,
146	0,0,0,0,0,0,0,0,0,0,0,0,0,
147	0,0,0,0,0,0,0,0,0,255,255,255,255,255,255,255,255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
148	0,0,255,255,255,255,255,255,255,255,255,135,255,255,255,255,255,255,255,128,
149	255,255,0,0,0,0,0,0,0,0,11,0,0,0,255,255,255,255,255,255,255,255,255,255,255,
150	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
151	255,0,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
152	255,255,255,255,255,255,255,255,255,255,255,255,7,0,255,255,255,127,0,0,0,0,0,
153	0,7,0,240,0,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
154	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
155	255,255,255,255,255,255,255,255,255,255,255,255,255,255,15,255,255,255,255,
156	255,255,255,255,255,255,255,255,255,7,255,31,255,1,255,67,0,0,0,0,0,0,0,0,0,0,
157	0,0,255,255,255,255,255,255,255,255,255,255,223,255,255,255,255,255,255,255,
158	255,223,100,222,255,235,239,255,255,255,255,255,255,
159	255,191,231,223,223,255,255,255,123,95,252,253,255,255,255,255,255,255,255,
160	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
161	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,63,255,255,255,
162	253,255,255,247,255,255,255,247,255,255,223,255,255,255,223,255,255,127,255,
163	255,255,127,255,255,255,253,255,255,255,253,255,255,247,207,255,255,255,255,
164	255,255,127,255,255,249,219,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
165	0,0,255,255,255,255,255,31,128,63,255,67,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
166	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,255,255,
167	15,255,3,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
168	255,255,255,255,255,255,255,31,0,0,0,0,0,0,0,255,255,255,255,255,255,255,255,
169	143,8,255,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
170	0,239,255,255,255,150,254,247,10,132,234,150,170,150,247,247,94,255,251,255,
171	15,238,251,255,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,3,255,255,255,3,255,
172	255,255,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,

lib/libc/wasi/libc-top-half/musl/src/ctype/casemap.h deleted-297

...	@@ -1,297 +0,0 @@
1	static const unsigned char tab[] = {
2	7, 8, 9, 10, 11, 12, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
3	13, 6, 6, 14, 6, 6, 6, 6, 6, 6, 6, 6, 15, 16, 17, 18,
4	6, 19, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 20, 21, 6, 6,
5	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
6	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
7	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
8	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
9	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
10	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
11	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
12	6, 6, 6, 6, 6, 6, 22, 23, 6, 6, 6, 24, 6, 6, 6, 6,
13	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
14	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
15	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
16	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
17	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 25,
18	6, 6, 6, 6, 26, 6, 6, 6, 6, 6, 6, 6, 27, 6, 6, 6,
19	6, 6, 6, 6, 6, 6, 6, 6, 28, 6, 6, 6, 6, 6, 6, 6,
20	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
21	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
22	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
23	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
24	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 29, 6,
25	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
26	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
27	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
28	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
29	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
30	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
31	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
32	6, 6, 6, 6, 6, 6, 6, 6, 6, 30, 6, 6, 6, 6, 6, 6,
33	6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
34	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
35	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
36	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
37	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
38	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
39	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
40	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 36,
41	43, 43, 43, 43, 43, 43, 43, 43, 1, 0, 84, 86, 86, 86, 86, 86,
42	86, 86, 86, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
43	0, 0, 0, 0, 0, 0, 24, 0, 0, 0, 43, 43, 43, 43, 43, 43,
44	43, 7, 43, 43, 91, 86, 86, 86, 86, 86, 86, 86, 74, 86, 86, 5,
45	49, 80, 49, 80, 49, 80, 49, 80, 49, 80, 49, 80, 49, 80, 49, 80,
46	36, 80, 121, 49, 80, 49, 80, 49, 56, 80, 49, 80, 49, 80, 49, 80,
47	49, 80, 49, 80, 49, 80, 49, 80, 78, 49, 2, 78, 13, 13, 78, 3,
48	78, 0, 36, 110, 0, 78, 49, 38, 110, 81, 78, 36, 80, 78, 57, 20,
49	129, 27, 29, 29, 83, 49, 80, 49, 80, 13, 49, 80, 49, 80, 49, 80,
50	27, 83, 36, 80, 49, 2, 92, 123, 92, 123, 92, 123, 92, 123, 92, 123,
51	20, 121, 92, 123, 92, 123, 92, 45, 43, 73, 3, 72, 3, 120, 92, 123,
52	20, 0, 150, 10, 1, 43, 40, 6, 6, 0, 42, 6, 42, 42, 43, 7,
53	187, 181, 43, 30, 0, 43, 7, 43, 43, 43, 1, 43, 43, 43, 43, 43,
54	43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43,
55	43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 1, 43, 43, 43, 43,
56	43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43,
57	43, 43, 43, 42, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43,
58	43, 205, 70, 205, 43, 0, 37, 43, 7, 1, 6, 1, 85, 86, 86, 86,
59	86, 86, 85, 86, 86, 2, 36, 129, 129, 129, 129, 129, 21, 129, 129, 129,
60	0, 0, 43, 0, 178, 209, 178, 209, 178, 209, 178, 209, 0, 0, 205, 204,
61	1, 0, 215, 215, 215, 215, 215, 131, 129, 129, 129, 129, 129, 129, 129, 129,
62	129, 129, 172, 172, 172, 172, 172, 172, 172, 172, 172, 172, 28, 0, 0, 0,
63	0, 0, 49, 80, 49, 80, 49, 80, 49, 80, 49, 80, 49, 2, 0, 0,
64	49, 80, 49, 80, 49, 80, 49, 80, 49, 80, 49, 80, 49, 80, 49, 80,
65	49, 80, 78, 49, 80, 49, 80, 78, 49, 80, 49, 80, 49, 80, 49, 80,
66	49, 80, 49, 80, 49, 80, 49, 2, 135, 166, 135, 166, 135, 166, 135, 166,
67	135, 166, 135, 166, 135, 166, 135, 166, 42, 43, 43, 43, 43, 43, 43, 43,
68	43, 43, 43, 43, 43, 0, 0, 0, 84, 86, 86, 86, 86, 86, 86, 86,
69	86, 86, 86, 86, 86, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
70	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
71	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
72	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
73	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
74	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
75	0, 0, 0, 84, 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, 86,
76	12, 0, 12, 42, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43,
77	43, 7, 42, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
78	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
79	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
80	0, 0, 0, 0, 0, 0, 0, 0, 0, 42, 43, 43, 43, 43, 43, 43,
81	43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43,
82	43, 43, 43, 43, 86, 86, 108, 129, 21, 0, 43, 43, 43, 43, 43, 43,
83	43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43,
84	43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43,
85	43, 43, 43, 43, 7, 108, 3, 65, 43, 43, 86, 86, 86, 86, 86, 86,
86	86, 86, 86, 86, 86, 86, 86, 86, 44, 86, 43, 43, 43, 43, 43, 43,
87	43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 1,
88	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
89	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
90	0, 0, 0, 0, 0, 0, 0, 0, 12, 108, 0, 0, 0, 0, 0, 6,
91	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
92	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
93	0, 0, 0, 0, 0, 0, 6, 37, 6, 37, 6, 37, 6, 37, 6, 37,
94	6, 37, 6, 37, 6, 37, 6, 37, 6, 37, 6, 37, 6, 37, 6, 37,
95	6, 37, 6, 37, 6, 37, 6, 37, 6, 37, 6, 37, 6, 37, 6, 37,
96	6, 37, 6, 37, 6, 37, 6, 37, 86, 122, 158, 38, 6, 37, 6, 37,
97	6, 37, 6, 37, 6, 37, 6, 37, 6, 37, 6, 37, 6, 37, 6, 37,
98	6, 37, 6, 37, 6, 37, 6, 37, 6, 37, 6, 1, 43, 43, 79, 86,
99	86, 44, 43, 127, 86, 86, 57, 43, 43, 85, 86, 86, 43, 43, 79, 86,
100	86, 44, 43, 127, 86, 86, 129, 55, 117, 91, 123, 92, 43, 43, 79, 86,
101	86, 2, 172, 4, 0, 0, 57, 43, 43, 85, 86, 86, 43, 43, 79, 86,
102	86, 44, 43, 43, 86, 86, 50, 19, 129, 87, 0, 111, 129, 126, 201, 215,
103	126, 45, 129, 129, 14, 126, 57, 127, 111, 87, 0, 129, 129, 126, 21, 0,
104	126, 3, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 7, 43,
105	36, 43, 151, 43, 43, 43, 43, 43, 43, 43, 43, 43, 42, 43, 43, 43,
106	43, 43, 86, 86, 86, 86, 86, 128, 129, 129, 129, 129, 57, 187, 42, 43,
107	43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43,
108	43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43,
109	43, 43, 43, 43, 43, 43, 43, 1, 129, 129, 129, 129, 129, 129, 129, 129,
110	129, 129, 129, 129, 129, 129, 129, 201, 172, 172, 172, 172, 172, 172, 172, 172,
111	172, 172, 172, 172, 172, 172, 172, 208, 13, 0, 78, 49, 2, 180, 193, 193,
112	215, 215, 36, 80, 49, 80, 49, 80, 49, 80, 49, 80, 49, 80, 49, 80,
113	49, 80, 49, 80, 49, 80, 49, 80, 49, 80, 49, 80, 49, 80, 49, 80,
114	49, 80, 49, 80, 215, 215, 83, 193, 71, 212, 215, 215, 215, 5, 43, 43,
115	43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 7, 1, 0, 1, 0, 0,
116	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
117	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
118	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
119	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
120	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
121	0, 0, 0, 0, 0, 0, 0, 0, 0, 78, 49, 80, 49, 80, 49, 80,
122	49, 80, 49, 80, 49, 80, 49, 80, 13, 0, 0, 0, 0, 0, 36, 80,
123	49, 80, 49, 80, 49, 80, 49, 80, 0, 0, 0, 0, 0, 0, 0, 0,
124	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
125	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 43, 43, 43, 43, 43, 43,
126	43, 43, 43, 43, 43, 121, 92, 123, 92, 123, 79, 123, 92, 123, 92, 123,
127	92, 123, 92, 123, 92, 123, 92, 123, 92, 123, 92, 123, 92, 123, 92, 45,
128	43, 43, 121, 20, 92, 123, 92, 45, 121, 42, 92, 39, 92, 123, 92, 123,
129	92, 123, 164, 0, 10, 180, 92, 123, 92, 123, 79, 3, 42, 43, 43, 43,
130	43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 1,
131	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
132	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 72, 0, 0, 0, 0,
133	0, 0, 0, 0, 0, 42, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43,
134	43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43,
135	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
136	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
137	0, 43, 43, 43, 43, 43, 43, 43, 43, 7, 0, 72, 86, 86, 86, 86,
138	86, 86, 86, 86, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
139	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
140	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
141	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 43, 43, 43, 43,
142	43, 43, 43, 43, 43, 43, 43, 43, 43, 85, 86, 86, 86, 86, 86, 86,
143	86, 86, 86, 86, 86, 86, 14, 0, 0, 0, 0, 0, 0, 0, 0, 0,
144	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
145	0, 0, 0, 0, 0, 0, 36, 43, 43, 43, 43, 43, 43, 43, 43, 43,
146	43, 43, 7, 0, 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, 86,
147	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
148	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
149	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 36, 43, 43, 43,
150	43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 7, 0, 0,
151	0, 0, 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, 86, 86,
152	86, 86, 86, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
153	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
154	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
155	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 42, 43, 43,
156	43, 43, 43, 43, 43, 43, 43, 43, 86, 86, 86, 86, 86, 86, 86, 86,
157	86, 86, 14, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
158	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
159	0, 0, 0, 42, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 86, 86,
160	86, 86, 86, 86, 86, 86, 86, 86, 14, 0, 0, 0, 0, 0, 0, 0,
161	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
162	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
163	0, 0, 0, 0, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 85,
164	86, 86, 86, 86, 86, 86, 86, 86, 86, 86, 14, 0, 0, 0, 0, 0,
165	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
166	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
167	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
168	0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
169	};
170	static const int rules[] = {
171	0x0, 0x2001, -0x2000, 0x1dbf00, 0x2e700, 0x7900,
172	0x2402, 0x101, -0x100, 0x0, 0x201, -0x200,
173	-0xc6ff, -0xe800, -0x78ff, -0x12c00, 0xc300, 0xd201,
174	0xce01, 0xcd01, 0x4f01, 0xca01, 0xcb01, 0xcf01,
175	0x6100, 0xd301, 0xd101, 0xa300, 0xd501, 0x8200,
176	0xd601, 0xda01, 0xd901, 0xdb01, 0x3800, 0x3,
177	-0x4f00, -0x60ff, -0x37ff, 0x242802, 0x0, 0x101,
178	-0x100, -0xcd00, -0xda00, -0x81ff, 0x2a2b01, -0xa2ff,
179	0x2a2801, 0x2a3f00, -0xc2ff, 0x4501, 0x4701, 0x2a1f00,
180	0x2a1c00, 0x2a1e00, -0xd200, -0xce00, -0xca00, -0xcb00,
181	0xa54f00, 0xa54b00, -0xcf00, 0xa52800, 0xa54400, -0xd100,
182	-0xd300, 0x29f700, 0xa54100, 0x29fd00, -0xd500, -0xd600,
183	0x29e700, 0xa54300, 0xa52a00, -0x4500, -0xd900, -0x4700,
184	-0xdb00, 0xa51500, 0xa51200, 0x4c2402, 0x0, 0x2001,
185	-0x2000, 0x101, -0x100, 0x5400, 0x7401, 0x2601,
186	0x2501, 0x4001, 0x3f01, -0x2600, -0x2500, -0x1f00,
187	-0x4000, -0x3f00, 0x801, -0x3e00, -0x3900, -0x2f00,
188	-0x3600, -0x800, -0x5600, -0x5000, 0x700, -0x7400,
189	-0x3bff, -0x6000, -0x6ff, 0x701a02, 0x101, -0x100,
190	0x2001, -0x2000, 0x5001, 0xf01, -0xf00, 0x0,
191	0x3001, -0x3000, 0x101, -0x100, 0x0, 0xbc000,
192	0x1c6001, 0x0, 0x97d001, 0x801, -0x800, 0x8a0502,
193	0x0, -0xbbfff, -0x186200, 0x89c200, -0x182500, -0x186e00,
194	-0x186d00, -0x186400, -0x186300, -0x185c00, 0x0, 0x8a3800,
195	0x8a0400, 0xee600, 0x101, -0x100, 0x0, -0x3b00,
196	-0x1dbeff, 0x8f1d02, 0x800, -0x7ff, 0x0, 0x5600,
197	-0x55ff, 0x4a00, 0x6400, 0x8000, 0x7000, 0x7e00,
198	0x900, -0x49ff, -0x8ff, -0x1c2500, -0x63ff, -0x6fff,
199	-0x7fff, -0x7dff, 0xac0502, 0x0, 0x1001, -0x1000,
200	0x1c01, 0x101, -0x1d5cff, -0x20beff, -0x2045ff, -0x1c00,
201	0xb10b02, 0x101, -0x100, 0x3001, -0x3000, 0x0,
202	-0x29f6ff, -0xee5ff, -0x29e6ff, -0x2a2b00, -0x2a2800, -0x2a1bff,
203	-0x29fcff, -0x2a1eff, -0x2a1dff, -0x2a3eff, 0x0, -0x1c6000,
204	0x0, 0x101, -0x100, 0xbc0c02, 0x0, 0x101,
205	-0x100, -0xa543ff, 0x3a001, -0x8a03ff, -0xa527ff, 0x3000,
206	-0xa54eff, -0xa54aff, -0xa540ff, -0xa511ff, -0xa529ff, -0xa514ff,
207	-0x2fff, -0xa542ff, -0x8a37ff, 0x0, -0x97d000, -0x3a000,
208	0x0, 0x2001, -0x2000, 0x0, 0x2801, -0x2800,
209	0x0, 0x4001, -0x4000, 0x0, 0x2001, -0x2000,
210	0x0, 0x2001, -0x2000, 0x0, 0x2201, -0x2200,
211	};
212	static const unsigned char rulebases[] = {
213	0, 6, 39, 81, 111, 119, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
214	124, 0, 0, 127, 0, 0, 0, 0, 0, 0, 0, 0, 131, 142, 146, 151,
215	0, 170, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 180, 196, 0, 0,
216	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
217	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
218	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
219	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
220	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
221	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
222	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
223	0, 0, 0, 0, 0, 0, 198, 201, 0, 0, 0, 219, 0, 0, 0, 0,
224	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
225	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
226	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
227	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
228	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 222,
229	0, 0, 0, 0, 225, 0, 0, 0, 0, 0, 0, 0, 228, 0, 0, 0,
230	0, 0, 0, 0, 0, 0, 0, 0, 231, 0, 0, 0, 0, 0, 0, 0,
231	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
232	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
233	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
234	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
235	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 234, 0,
236	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
237	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
238	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
239	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
240	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
241	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
242	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
243	0, 0, 0, 0, 0, 0, 0, 0, 0, 237, 0, 0, 0, 0, 0, 0,
244	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
245	};
246	static const unsigned char exceptions[][2] = {
247	{ 48, 12 }, { 49, 13 }, { 120, 14 }, { 127, 15 },
248	{ 128, 16 }, { 129, 17 }, { 134, 18 }, { 137, 19 },
249	{ 138, 19 }, { 142, 20 }, { 143, 21 }, { 144, 22 },
250	{ 147, 19 }, { 148, 23 }, { 149, 24 }, { 150, 25 },
251	{ 151, 26 }, { 154, 27 }, { 156, 25 }, { 157, 28 },
252	{ 158, 29 }, { 159, 30 }, { 166, 31 }, { 169, 31 },
253	{ 174, 31 }, { 177, 32 }, { 178, 32 }, { 183, 33 },
254	{ 191, 34 }, { 197, 35 }, { 200, 35 }, { 203, 35 },
255	{ 221, 36 }, { 242, 35 }, { 246, 37 }, { 247, 38 },
256	{ 32, 45 }, { 58, 46 }, { 61, 47 }, { 62, 48 },
257	{ 63, 49 }, { 64, 49 }, { 67, 50 }, { 68, 51 },
258	{ 69, 52 }, { 80, 53 }, { 81, 54 }, { 82, 55 },
259	{ 83, 56 }, { 84, 57 }, { 89, 58 }, { 91, 59 },
260	{ 92, 60 }, { 97, 61 }, { 99, 62 }, { 101, 63 },
261	{ 102, 64 }, { 104, 65 }, { 105, 66 }, { 106, 64 },
262	{ 107, 67 }, { 108, 68 }, { 111, 66 }, { 113, 69 },
263	{ 114, 70 }, { 117, 71 }, { 125, 72 }, { 130, 73 },
264	{ 135, 74 }, { 137, 75 }, { 138, 76 }, { 139, 76 },
265	{ 140, 77 }, { 146, 78 }, { 157, 79 }, { 158, 80 },
266	{ 69, 87 }, { 123, 29 }, { 124, 29 }, { 125, 29 },
267	{ 127, 88 }, { 134, 89 }, { 136, 90 }, { 137, 90 },
268	{ 138, 90 }, { 140, 91 }, { 142, 92 }, { 143, 92 },
269	{ 172, 93 }, { 173, 94 }, { 174, 94 }, { 175, 94 },
270	{ 194, 95 }, { 204, 96 }, { 205, 97 }, { 206, 97 },
271	{ 207, 98 }, { 208, 99 }, { 209, 100 }, { 213, 101 },
272	{ 214, 102 }, { 215, 103 }, { 240, 104 }, { 241, 105 },
273	{ 242, 106 }, { 243, 107 }, { 244, 108 }, { 245, 109 },
274	{ 249, 110 }, { 253, 45 }, { 254, 45 }, { 255, 45 },
275	{ 80, 105 }, { 81, 105 }, { 82, 105 }, { 83, 105 },
276	{ 84, 105 }, { 85, 105 }, { 86, 105 }, { 87, 105 },
277	{ 88, 105 }, { 89, 105 }, { 90, 105 }, { 91, 105 },
278	{ 92, 105 }, { 93, 105 }, { 94, 105 }, { 95, 105 },
279	{ 130, 0 }, { 131, 0 }, { 132, 0 }, { 133, 0 },
280	{ 134, 0 }, { 135, 0 }, { 136, 0 }, { 137, 0 },
281	{ 192, 117 }, { 207, 118 }, { 128, 137 }, { 129, 138 },
282	{ 130, 139 }, { 133, 140 }, { 134, 141 }, { 112, 157 },
283	{ 113, 157 }, { 118, 158 }, { 119, 158 }, { 120, 159 },
284	{ 121, 159 }, { 122, 160 }, { 123, 160 }, { 124, 161 },
285	{ 125, 161 }, { 179, 162 }, { 186, 163 }, { 187, 163 },
286	{ 188, 164 }, { 190, 165 }, { 195, 162 }, { 204, 164 },
287	{ 218, 166 }, { 219, 166 }, { 229, 106 }, { 234, 167 },
288	{ 235, 167 }, { 236, 110 }, { 243, 162 }, { 248, 168 },
289	{ 249, 168 }, { 250, 169 }, { 251, 169 }, { 252, 164 },
290	{ 38, 176 }, { 42, 177 }, { 43, 178 }, { 78, 179 },
291	{ 132, 8 }, { 98, 186 }, { 99, 187 }, { 100, 188 },
292	{ 101, 189 }, { 102, 190 }, { 109, 191 }, { 110, 192 },
293	{ 111, 193 }, { 112, 194 }, { 126, 195 }, { 127, 195 },
294	{ 125, 207 }, { 141, 208 }, { 148, 209 }, { 171, 210 },
295	{ 172, 211 }, { 173, 212 }, { 176, 213 }, { 177, 214 },
296	{ 178, 215 }, { 196, 216 }, { 197, 217 }, { 198, 218 },
297	};

lib/libc/wasi/libc-top-half/musl/src/ctype/isalnum.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <ctype.h>
2
3	int isalnum(int c)
4	{
5	return isalpha(c) \|\| isdigit(c);
6	}
7
8	int __isalnum_l(int c, locale_t l)
9	{
10	return isalnum(c);
11	}
12
13	weak_alias(__isalnum_l, isalnum_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/isalpha.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <ctype.h>
2	#undef isalpha
3
4	int isalpha(int c)
5	{
6	return ((unsigned)c\|32)-'a' < 26;
7	}
8
9	int __isalpha_l(int c, locale_t l)
10	{
11	return isalpha(c);
12	}
13
14	weak_alias(__isalpha_l, isalpha_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/isascii.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <ctype.h>
2	#undef isascii
3
4	int isascii(int c)
5	{
6	return !(c&~0x7f);
7	}

lib/libc/wasi/libc-top-half/musl/src/ctype/isblank.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <ctype.h>
2
3	int isblank(int c)
4	{
5	return (c == ' ' \|\| c == '\t');
6	}
7
8	int __isblank_l(int c, locale_t l)
9	{
10	return isblank(c);
11	}
12
13	weak_alias(__isblank_l, isblank_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/iscntrl.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <ctype.h>
2
3	int iscntrl(int c)
4	{
5	return (unsigned)c < 0x20 \|\| c == 0x7f;
6	}
7
8	int __iscntrl_l(int c, locale_t l)
9	{
10	return iscntrl(c);
11	}
12
13	weak_alias(__iscntrl_l, iscntrl_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/isdigit.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <ctype.h>
2	#undef isdigit
3
4	int isdigit(int c)
5	{
6	return (unsigned)c-'0' < 10;
7	}
8
9	int __isdigit_l(int c, locale_t l)
10	{
11	return isdigit(c);
12	}
13
14	weak_alias(__isdigit_l, isdigit_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/isgraph.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <ctype.h>
2	#undef isgraph
3
4	int isgraph(int c)
5	{
6	return (unsigned)c-0x21 < 0x5e;
7	}
8
9	int __isgraph_l(int c, locale_t l)
10	{
11	return isgraph(c);
12	}
13
14	weak_alias(__isgraph_l, isgraph_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/islower.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <ctype.h>
2	#undef islower
3
4	int islower(int c)
5	{
6	return (unsigned)c-'a' < 26;
7	}
8
9	int __islower_l(int c, locale_t l)
10	{
11	return islower(c);
12	}
13
14	weak_alias(__islower_l, islower_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/isprint.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <ctype.h>
2	#undef isprint
3
4	int isprint(int c)
5	{
6	return (unsigned)c-0x20 < 0x5f;
7	}
8
9	int __isprint_l(int c, locale_t l)
10	{
11	return isprint(c);
12	}
13
14	weak_alias(__isprint_l, isprint_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/ispunct.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <ctype.h>
2
3	int ispunct(int c)
4	{
5	return isgraph(c) && !isalnum(c);
6	}
7
8	int __ispunct_l(int c, locale_t l)
9	{
10	return ispunct(c);
11	}
12
13	weak_alias(__ispunct_l, ispunct_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/isspace.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <ctype.h>
2	#undef isspace
3
4	int isspace(int c)
5	{
6	return c == ' ' \|\| (unsigned)c-'\t' < 5;
7	}
8
9	int __isspace_l(int c, locale_t l)
10	{
11	return isspace(c);
12	}
13
14	weak_alias(__isspace_l, isspace_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/isupper.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <ctype.h>
2	#undef isupper
3
4	int isupper(int c)
5	{
6	return (unsigned)c-'A' < 26;
7	}
8
9	int __isupper_l(int c, locale_t l)
10	{
11	return isupper(c);
12	}
13
14	weak_alias(__isupper_l, isupper_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/iswalnum.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <wctype.h>
2
3	int iswalnum(wint_t wc)
4	{
5	return iswdigit(wc) \|\| iswalpha(wc);
6	}
7
8	int __iswalnum_l(wint_t c, locale_t l)
9	{
10	return iswalnum(c);
11	}
12
13	weak_alias(__iswalnum_l, iswalnum_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/iswalpha.c deleted-21

...	@@ -1,21 +0,0 @@
1	#include <wctype.h>
2
3	static const unsigned char table[] = {
4	#include "alpha.h"
5	};
6
7	int iswalpha(wint_t wc)
8	{
9	if (wc<0x20000U)
10	return (table[table[wc>>8]*32+((wc&255)>>3)]>>(wc&7))&1;
11	if (wc<0x2fffeU)
12	return 1;
13	return 0;
14	}
15
16	int __iswalpha_l(wint_t c, locale_t l)
17	{
18	return iswalpha(c);
19	}
20
21	weak_alias(__iswalpha_l, iswalpha_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/iswblank.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <wctype.h>
2	#include <ctype.h>
3
4	int iswblank(wint_t wc)
5	{
6	return isblank(wc);
7	}
8
9	int __iswblank_l(wint_t c, locale_t l)
10	{
11	return iswblank(c);
12	}
13
14	weak_alias(__iswblank_l, iswblank_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/iswcntrl.c deleted-16

...	@@ -1,16 +0,0 @@
1	#include <wctype.h>
2
3	int iswcntrl(wint_t wc)
4	{
5	return (unsigned)wc < 32
6	\|\| (unsigned)(wc-0x7f) < 33
7	\|\| (unsigned)(wc-0x2028) < 2
8	\|\| (unsigned)(wc-0xfff9) < 3;
9	}
10
11	int __iswcntrl_l(wint_t c, locale_t l)
12	{
13	return iswcntrl(c);
14	}
15
16	weak_alias(__iswcntrl_l, iswcntrl_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/iswctype.c deleted-75

...	@@ -1,75 +0,0 @@
1	#include <wctype.h>
2	#include <string.h>
3
4	#define WCTYPE_ALNUM 1
5	#define WCTYPE_ALPHA 2
6	#define WCTYPE_BLANK 3
7	#define WCTYPE_CNTRL 4
8	#define WCTYPE_DIGIT 5
9	#define WCTYPE_GRAPH 6
10	#define WCTYPE_LOWER 7
11	#define WCTYPE_PRINT 8
12	#define WCTYPE_PUNCT 9
13	#define WCTYPE_SPACE 10
14	#define WCTYPE_UPPER 11
15	#define WCTYPE_XDIGIT 12
16
17	int iswctype(wint_t wc, wctype_t type)
18	{
19	switch (type) {
20	case WCTYPE_ALNUM:
21	return iswalnum(wc);
22	case WCTYPE_ALPHA:
23	return iswalpha(wc);
24	case WCTYPE_BLANK:
25	return iswblank(wc);
26	case WCTYPE_CNTRL:
27	return iswcntrl(wc);
28	case WCTYPE_DIGIT:
29	return iswdigit(wc);
30	case WCTYPE_GRAPH:
31	return iswgraph(wc);
32	case WCTYPE_LOWER:
33	return iswlower(wc);
34	case WCTYPE_PRINT:
35	return iswprint(wc);
36	case WCTYPE_PUNCT:
37	return iswpunct(wc);
38	case WCTYPE_SPACE:
39	return iswspace(wc);
40	case WCTYPE_UPPER:
41	return iswupper(wc);
42	case WCTYPE_XDIGIT:
43	return iswxdigit(wc);
44	}
45	return 0;
46	}
47
48	wctype_t wctype(const char *s)
49	{
50	int i;
51	const char *p;
52	/* order must match! */
53	static const char names[] =
54	"alnum\0" "alpha\0" "blank\0"
55	"cntrl\0" "digit\0" "graph\0"
56	"lower\0" "print\0" "punct\0"
57	"space\0" "upper\0" "xdigit";
58	for (i=1, p=names; *p; i++, p+=6)
59	if (s == p && !strcmp(s, p))
60	return i;
61	return 0;
62	}
63
64	int __iswctype_l(wint_t c, wctype_t t, locale_t l)
65	{
66	return iswctype(c, t);
67	}
68
69	wctype_t __wctype_l(const char *s, locale_t l)
70	{
71	return wctype(s);
72	}
73
74	weak_alias(__iswctype_l, iswctype_l);
75	weak_alias(__wctype_l, wctype_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/iswdigit.c deleted-15

...	@@ -1,15 +0,0 @@
1	#include <wctype.h>
2
3	#undef iswdigit
4
5	int iswdigit(wint_t wc)
6	{
7	return (unsigned)wc-'0' < 10;
8	}
9
10	int __iswdigit_l(wint_t c, locale_t l)
11	{
12	return iswdigit(c);
13	}
14
15	weak_alias(__iswdigit_l, iswdigit_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/iswgraph.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <wctype.h>
2
3	int iswgraph(wint_t wc)
4	{
5	/* ISO C defines this function as: */
6	return !iswspace(wc) && iswprint(wc);
7	}
8
9	int __iswgraph_l(wint_t c, locale_t l)
10	{
11	return iswgraph(c);
12	}
13
14	weak_alias(__iswgraph_l, iswgraph_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/iswlower.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <wctype.h>
2
3	int iswlower(wint_t wc)
4	{
5	return towupper(wc) != wc;
6	}
7
8	int __iswlower_l(wint_t c, locale_t l)
9	{
10	return iswlower(c);
11	}
12
13	weak_alias(__iswlower_l, iswlower_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/iswprint.c deleted-26

...	@@ -1,26 +0,0 @@
1	#include <wctype.h>
2
3	/* Consider all legal codepoints as printable except for:
4	* - C0 and C1 control characters
5	* - U+2028 and U+2029 (line/para break)
6	* - U+FFF9 through U+FFFB (interlinear annotation controls)
7	* The following code is optimized heavily to make hot paths for the
8	* expected printable characters. */
9
10	int iswprint(wint_t wc)
11	{
12	if (wc < 0xffU)
13	return (wc+1 & 0x7f) >= 0x21;
14	if (wc < 0x2028U \|\| wc-0x202aU < 0xd800-0x202a \|\| wc-0xe000U < 0xfff9-0xe000)
15	return 1;
16	if (wc-0xfffcU > 0x10ffff-0xfffc \|\| (wc&0xfffe)==0xfffe)
17	return 0;
18	return 1;
19	}
20
21	int __iswprint_l(wint_t c, locale_t l)
22	{
23	return iswprint(c);
24	}
25
26	weak_alias(__iswprint_l, iswprint_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/iswpunct.c deleted-19

...	@@ -1,19 +0,0 @@
1	#include <wctype.h>
2
3	static const unsigned char table[] = {
4	#include "punct.h"
5	};
6
7	int iswpunct(wint_t wc)
8	{
9	if (wc<0x20000U)
10	return (table[table[wc>>8]*32+((wc&255)>>3)]>>(wc&7))&1;
11	return 0;
12	}
13
14	int __iswpunct_l(wint_t c, locale_t l)
15	{
16	return iswpunct(c);
17	}
18
19	weak_alias(__iswpunct_l, iswpunct_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/iswspace.c deleted-24

...	@@ -1,24 +0,0 @@
1	#include <wchar.h>
2	#include <wctype.h>
3
4	/* Our definition of whitespace is the Unicode White_Space property,
5	* minus non-breaking spaces (U+00A0, U+2007, and U+202F) and script-
6	* specific characters with non-blank glyphs (U+1680 and U+180E). */
7
8	int iswspace(wint_t wc)
9	{
10	static const wchar_t spaces[] = {
11	' ', '\t', '\n', '\r', 11, 12, 0x0085,
12	0x2000, 0x2001, 0x2002, 0x2003, 0x2004, 0x2005,
13	0x2006, 0x2008, 0x2009, 0x200a,
14	0x2028, 0x2029, 0x205f, 0x3000, 0
15	};
16	return wc && wcschr(spaces, wc);
17	}
18
19	int __iswspace_l(wint_t c, locale_t l)
20	{
21	return iswspace(c);
22	}
23
24	weak_alias(__iswspace_l, iswspace_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/iswupper.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <wctype.h>
2
3	int iswupper(wint_t wc)
4	{
5	return towlower(wc) != wc;
6	}
7
8	int __iswupper_l(wint_t c, locale_t l)
9	{
10	return iswupper(c);
11	}
12
13	weak_alias(__iswupper_l, iswupper_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/iswxdigit.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <wctype.h>
2
3	int iswxdigit(wint_t wc)
4	{
5	return (unsigned)(wc-'0') < 10 \|\| (unsigned)((wc\|32)-'a') < 6;
6	}
7
8	int __iswxdigit_l(wint_t c, locale_t l)
9	{
10	return iswxdigit(c);
11	}
12
13	weak_alias(__iswxdigit_l, iswxdigit_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/isxdigit.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <ctype.h>
2
3	int isxdigit(int c)
4	{
5	return isdigit(c) \|\| ((unsigned)c\|32)-'a' < 6;
6	}
7
8	int __isxdigit_l(int c, locale_t l)
9	{
10	return isxdigit(c);
11	}
12
13	weak_alias(__isxdigit_l, isxdigit_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/nonspacing.h deleted-91

...	@@ -1,91 +0,0 @@
1	16,16,16,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,16,33,16,16,16,34,35,36,
2	37,38,39,40,16,16,41,16,16,16,16,16,16,16,16,16,16,16,42,43,16,16,44,16,16,16,
3	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
4	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
5	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
6	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
7	16,16,16,16,16,16,16,16,16,16,45,16,46,47,48,49,16,16,16,16,16,16,16,16,16,16,
8	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
9	16,16,16,16,16,16,16,50,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
10	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,51,16,16,52,
11	53,16,54,55,56,16,16,16,16,16,16,57,16,16,58,16,59,60,61,62,63,64,65,66,67,68,
12	69,70,16,71,72,73,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
13	16,74,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
14	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
15	16,16,16,75,76,16,16,16,77,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
16	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
17	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
18	16,16,16,16,16,16,16,78,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
19	16,16,79,80,16,16,16,16,16,16,16,81,16,16,16,16,16,82,83,84,16,16,16,16,16,85,
20	86,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
21	16,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,
22	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
23	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
24	255,255,255,255,255,255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
25	0,0,0,0,0,0,0,248,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
26	0,0,0,254,255,255,255,255,191,182,0,0,0,0,0,0,0,63,0,255,23,0,0,0,0,0,248,255,
27	255,0,0,1,0,0,0,0,0,0,0,0,0,0,0,192,191,159,61,0,0,0,128,2,0,0,0,255,255,255,
28	7,0,0,0,0,0,0,0,0,0,0,192,255,1,0,0,0,0,0,0,248,15,32,0,0,192,251,239,62,0,0,
29	0,0,0,14,0,0,0,0,0,0,0,0,0,0,0,0,0,0,248,255,255,255,255,
30	255,7,0,0,0,0,0,0,20,254,33,254,0,12,0,0,0,2,0,0,0,0,0,0,16,30,32,0,0,12,0,0,
31	64,6,0,0,0,0,0,0,16,134,57,2,0,0,0,35,0,6,0,0,0,0,0,0,16,190,33,0,0,12,0,0,
32	252,2,0,0,0,0,0,0,144,30,32,64,0,12,0,0,0,4,0,0,0,0,0,0,0,1,32,0,0,0,0,0,0,17,
33	0,0,0,0,0,0,192,193,61,96,0,12,0,0,0,2,0,0,0,0,0,0,144,64,48,0,0,12,0,0,0,3,0,
34	0,0,0,0,0,24,30,32,0,0,12,0,0,0,0,0,0,0,0,0,0,0,0,4,92,0,0,0,0,0,0,0,0,0,0,0,
35	242,7,128,127,0,0,0,0,0,0,0,0,0,0,0,0,242,31,0,63,0,0,0,0,0,0,0,0,0,3,0,0,160,
36	2,0,0,0,0,0,0,254,127,223,224,255,254,255,255,255,31,64,0,0,0,0,0,0,0,0,0,0,0,
37	0,224,253,102,0,0,0,195,1,0,30,0,100,32,0,32,0,0,0,0,0,0,0,0,0,0,0,
38	0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,255,255,255,255,255,255,255,255,255,255,
39	255,255,255,255,255,255,255,0,0,0,0,0,0,0,0,0,0,0,224,0,0,0,0,0,0,0,0,0,0,0,0,
40	0,0,0,0,0,0,0,0,0,0,28,0,0,0,28,0,0,0,12,0,0,0,12,0,0,0,0,0,0,0,176,63,64,254,
41	15,32,0,0,0,0,0,120,0,0,0,0,0,0,0,0,0,0,0,0,0,0,96,0,0,0,0,2,0,0,0,0,0,0,0,0,
42	0,0,0,0,0,0,135,1,4,14,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
43	128,9,0,0,0,0,0,0,64,127,229,31,248,159,0,0,0,0,0,0,255,127,0,0,0,0,0,0,0,0,
44	15,0,0,0,0,0,208,23,4,0,0,0,0,248,15,0,3,0,0,0,60,59,0,0,0,0,0,0,64,163,3,0,0,
45	0,0,0,0,240,207,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,247,255,253,33,16,
46	3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,255,255,255,255,
47	251,0,248,0,0,0,124,0,0,0,0,0,0,223,255,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,
48	255,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,128,3,0,0,0,
49	0,0,0,0,0,0,0,0,0,0,0,0,0,128,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,255,0,0,0,0,
50	0,60,0,0,0,0,0,0,0,0,0,0,0,0,0,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
51	0,0,0,128,247,63,0,0,0,192,0,0,0,0,0,0,0,0,0,0,3,0,68,8,0,0,96,0,0,0,0,0,0,0,
52	0,0,0,0,0,0,0,0,0,0,0,0,48,0,0,0,255,255,3,128,0,0,0,0,192,63,0,0,128,255,3,0,
53	0,0,0,0,7,0,0,0,0,0,200,51,0,0,0,0,32,0,0,
54	0,0,0,0,0,0,126,102,0,8,16,0,0,0,0,0,16,0,0,0,0,0,0,157,193,2,0,0,0,0,48,64,0,
55	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,32,33,0,0,0,0,0,0,0,0,
56	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,255,255,255,255,255,255,255,0,0,0,
57	64,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,0,0,255,
58	255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,128,0,0,0,0,0,0,0,0,0,0,
59	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,14,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
60	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,32,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
61	0,0,0,0,0,0,1,0,0,
62	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,192,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,110,240,0,
63	0,0,0,0,135,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,96,0,0,0,0,0,0,0,240,0,0,
64	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,192,255,1,0,
65	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,2,0,0,0,0,0,0,255,127,0,0,0,0,0,0,128,
66	3,0,0,0,0,0,120,38,0,32,0,0,0,0,0,0,7,0,0,0,128,239,31,0,0,0,0,0,0,0,8,0,3,0,
67	0,0,0,0,192,127,0,30,0,0,0,0,0,0,0,0,0,0,0,128,211,64,0,0,0,0,0,0,0,0,0,0,0,0,
68	0,0,0,0,0,0,0,128,248,7,0,0,3,0,0,0,0,0,0,24,1,0,0,0,192,31,31,0,0,0,0,0,0,0,
69	0,0,0,0,0,0,0,0,0,
70	0,0,0,0,0,0,0,0,255,92,0,0,64,0,0,0,0,0,0,0,0,0,0,248,133,13,0,0,0,0,0,0,0,0,
71	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,60,176,1,0,0,48,0,0,0,0,0,0,0,0,0,0,
72	248,167,1,0,0,0,0,0,0,0,0,0,0,0,0,40,191,0,0,0,0,0,0,0,0,0,0,0,0,224,188,15,0,
73	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,128,255,6,0,0,0,0,
74	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
75	0,0,0,0,0,0,0,240,12,1,0,0,0,254,7,0,0,0,0,248,121,128,0,126,14,0,0,0,0,0,252,
76	127,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,127,191,0,0,0,0,0,0,0,0,0,0,252,255,
77	255,252,109,0,0,0,0,0,0,0,0,
78	0,0,0,0,0,0,0,126,180,191,0,0,0,0,0,0,0,0,0,163,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
79	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,24,0,0,0,0,0,0,0,255,
80	1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
81	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,31,0,0,0,0,0,0,0,127,0,0,0,0,0,0,0,0,0,0,0,0,
82	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,128,0,0,0,0,0,0,0,128,7,0,0,0,0,0,
83	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,96,15,0,0,0,0,0,0,0,0,0,
84	0,0,0,0,0,0,0,0,0,0,0,0,0,0,128,3,248,255,231,15,0,0,0,60,0,0,0,0,0,0,0,0,0,
85	0,0,0,0,0,0,0,0,0,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,
86	255,255,255,255,127,248,255,255,255,255,255,31,32,0,16,0,0,248,254,255,0,0,0,
87	0,0,0,0,0,0,0,127,255,255,249,219,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
88	0,0,0,0,0,0,0,0,0,0,0,127,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
89	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,240,0,0,0,0,0,0,0,0,0,
90	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,127,0,0,0,0,0,0,0,0,0,0,0,0,0,240,7,0,0,
91	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,

lib/libc/wasi/libc-top-half/musl/src/ctype/punct.h deleted-141

...	@@ -1,141 +0,0 @@
1	18,16,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,16,16,34,35,16,36,37,38,39,
2	40,41,42,43,16,44,45,46,17,17,47,17,17,17,17,17,17,48,49,50,51,52,53,54,55,17,
3	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,56,
4	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
5	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
6	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
7	16,16,16,16,16,16,16,16,57,16,58,59,60,61,62,63,16,16,16,16,16,16,16,16,16,16,
8	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
9	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,64,16,16,16,16,16,16,16,16,16,
10	16,16,16,16,16,16,16,16,16,16,16,16,16,16,65,16,16,66,16,67,68,
11	69,16,70,71,72,16,73,16,16,74,75,76,77,78,16,79,80,81,82,83,84,85,86,87,88,89,
12	90,91,16,92,93,94,95,16,16,16,16,96,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
13	16,97,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
14	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
15	16,16,16,98,99,16,16,100,101,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
16	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
17	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
18	16,16,16,16,16,16,16,16,102,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
19	16,16,16,103,104,105,106,16,16,107,108,17,17,109,16,16,16,16,16,16,110,111,16,
20	16,16,16,16,112,113,16,16,114,115,116,16,117,118,119,17,17,17,120,121,122,123,
21	124,16,16,16,16,
22	16,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,
23	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
24	255,255,255,255,255,255,255,255,255,255,255,0,0,0,0,254,255,0,252,1,0,0,248,1,
25	0,0,120,0,0,0,0,255,251,223,251,0,0,128,0,0,0,128,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
26	0,0,0,0,0,0,0,0,0,0,0,60,0,252,255,224,175,255,255,255,255,255,255,255,255,
27	255,255,223,255,255,255,255,255,32,64,176,0,0,0,0,0,0,0,0,0,0,0,0,0,64,0,0,0,
28	0,0,0,0,0,0,0,0,0,0,0,0,0,0,252,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
29	0,0,0,252,0,0,0,0,0,230,254,255,255,255,0,64,73,0,0,0,0,0,24,0,255,255,0,216,
30	0,0,0,0,0,0,0,1,0,60,0,0,0,0,0,0,0,0,0,0,0,0,16,224,1,30,0,
31	96,255,191,0,0,0,0,0,0,255,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,248,207,
32	227,0,0,0,3,0,32,255,127,0,0,0,78,0,0,0,0,0,0,0,0,0,0,0,0,0,0,8,0,7,252,0,0,0,
33	0,0,0,0,0,0,16,0,32,30,0,48,0,1,0,0,0,0,0,0,0,0,16,0,32,0,0,0,0,252,111,0,0,0,
34	0,0,0,0,16,0,32,0,0,0,0,64,0,0,0,0,0,0,0,0,16,0,32,0,0,0,0,3,224,0,0,0,0,0,0,
35	0,16,0,32,0,0,0,0,253,0,0,0,0,0,0,0,0,0,0,32,0,0,0,0,255,7,16,0,0,0,0,0,0,0,0,
36	32,0,0,0,0,128,255,16,0,0,0,0,0,0,16,0,32,0,0,0,0,0,0,0,0,0,0,0,0,0,24,0,160,
37	0,127,0,0,255,3,0,0,0,0,0,0,0,0,0,4,0,0,0,0,16,0,0,0,0,0,0,128,0,128,192,223,
38	0,12,0,0,0,0,0,0,0,0,0,0,0,4,0,31,0,0,0,0,0,
39	0,254,255,255,255,0,252,255,255,0,0,0,0,0,0,0,0,252,0,0,0,0,0,0,192,255,223,
40	255,7,0,0,0,0,0,0,0,0,0,0,128,6,0,252,0,0,0,0,0,0,0,0,0,192,0,0,0,0,0,0,0,0,0,
41	0,0,8,0,0,0,0,0,0,0,0,0,0,0,224,255,255,255,31,0,0,255,3,0,0,0,0,0,0,0,0,0,0,
42	0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
43	0,0,0,0,0,0,0,0,96,0,0,1,0,0,24,0,0,0,0,0,0,0,0,0,56,0,0,0,0,16,0,0,0,112,0,0,
44	0,0,0,0,0,0,0,0,0,0,0,0,0,48,0,0,254,127,47,0,0,255,3,255,127,0,0,0,0,0,0,0,0,
45	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,14,49,0,0,0,0,0,0,0,
46	0,0,0,0,0,0,0,0,0,0,0,196,255,255,255,
47	255,0,0,0,192,0,0,0,0,0,0,0,0,1,0,224,159,0,0,0,0,127,63,255,127,0,0,0,0,0,0,
48	0,0,0,0,0,0,0,0,16,0,16,0,0,252,255,255,255,31,0,0,0,0,0,12,0,0,0,0,0,0,64,0,
49	12,240,0,0,0,0,0,0,128,248,0,0,0,0,0,0,0,192,0,0,0,0,0,0,0,0,255,0,255,255,
50	255,33,144,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,255,
51	127,0,224,251,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,160,3,224,0,224,0,
52	224,0,96,128,248,255,255,255,252,255,255,255,255,255,127,223,255,241,127,255,
53	127,0,0,255,255,255,255,0,0,255,255,255,255,1,0,123,3,208,193,175,66,0,12,31,
54	188,255,255,0,0,0,0,0,14,255,255,255,255,255,255,255,255,255,255,255,255,255,
55	255,255,255,255,255,127,0,0,0,255,7,0,0,255,255,255,255,255,255,255,255,255,
56	255,63,0,0,0,0,0,0,252,255,
57	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,207,255,255,255,
58	63,255,255,255,255,255,255,255,255,255,255,255,255,255,0,0,0,0,0,0,0,0,0,0,0,
59	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,224,135,3,254,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,
60	128,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,255,255,127,255,255,255,255,0,
61	0,0,0,0,0,255,255,255,251,255,255,255,255,255,255,255,255,255,255,15,0,255,
62	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
63	255,255,255,255,255,255,63,0,0,0,255,15,30,255,255,255,1,252,193,224,0,0,0,0,
64	0,0,0,0,0,0,0,30,1,0,0,0,0,0,0,0,0,0,0,8,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
65	255,255,0,0,0,0,255,255,255,255,15,0,0,0,255,255,255,127,255,255,255,255,255,
66	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
67	255,255,255,
68	255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,255,255,255,
69	255,255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,255,255,255,127,0,0,0,
70	0,0,0,192,0,224,0,0,0,0,0,0,0,0,0,0,0,128,15,112,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
71	255,0,255,255,127,0,3,0,0,0,0,0,0,0,0,0,0,0,0,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
72	64,0,0,0,0,15,255,3,0,0,0,0,0,0,240,0,0,0,0,0,0,0,0,0,16,192,0,0,255,255,3,23,
73	0,0,0,0,0,248,0,0,0,0,8,128,0,0,0,0,0,0,0,0,0,0,8,0,255,63,0,192,0,0,0,0,0,0,
74	0,0,0,0,0,0,0,0,0,240,0,0,128,3,0,0,0,0,0,0,0,128,2,0,0,192,0,0,67,0,0,0,0,0,
75	0,0,0,0,0,0,0,8,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,56,0,
76	0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
77	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,128,0,0,0,0,0,2,0,0,0,0,0,0,
78	0,0,0,0,0,0,0,0,0,0,252,255,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,192,0,0,0,0,0,0,0,0,
79	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,48,255,255,255,3,255,255,255,255,255,255,247,
80	255,127,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,128,254,255,0,252,1,0,0,248,1,0,
81	0,248,63,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,127,127,0,48,135,255,255,255,255,255,
82	143,255,0,0,0,0,0,0,224,255,255,127,255,15,1,0,0,0,0,0,255,255,255,255,255,63,
83	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,
84	15,0,0,0,0,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,128,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,
85	0,0,0,0,0,0,0,0,0,128,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
86	128,255,0,0,128,255,0,0,0,0,128,255,0,0,0,0,0,0,0,0,0,248,0,0,192,143,0,0,0,
87	128,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,48,255,255,252,255,255,255,255,255,0,0,0,0,
88	0,0,0,135,255,1,255,1,0,0,0,224,0,0,0,224,0,0,0,0,0,1,0,0,96,248,127,0,0,0,0,
89	0,0,0,0,254,0,0,0,255,0,0,0,255,0,0,0,30,0,254,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
90	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,252,0,0,0,0,0,0,0,0,0,0,0,
91	0,255,255,255,127,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
92	0,0,0,0,224,127,0,0,0,192,255,255,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
93	0,0,0,0,0,0,0,192,63,252,255,63,0,0,128,3,0,0,0,0,0,0,254,3,32,0,0,0,0,0,0,0,
94	0,0,0,0,0,24,0,15,0,0,0,0,0,56,0,0,0,0,0,0,0,0,0,225,63,0,232,254,255,31,0,0,
95	0,0,0,0,0,96,63,0,0,0,0,0,0,0,0,0,0,0,0,0,2,0,0,0,0,0,0,0,6,0,0,0,0,0,0,0,0,0,
96	24,0,32,0,0,192,31,31,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,68,
97	248,0,104,0,0,0,0,0,0,0,0,0,0,0,0,76,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
98	0,0,0,0,0,0,0,0,0,0,128,255,255,255,0,0,0,0,0,0,0,0,0,0,0,0,128,14,0,0,0,255,
99	31,0,0,0,0,0,0,0,0,192,0,0,0,0,0,0,0,0,
100	0,0,0,0,0,0,8,0,252,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
101	0,0,14,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,252,7,0,0,0,0,0,0,0,0,0,0,0,
102	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,5,0,0,0,0,0,0,0,0,0,24,128,255,0,0,0,0,0,
103	0,0,0,0,0,223,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,128,62,0,0,252,255,31,3,0,
104	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,52,0,0,0,0,0,0,0,0,0,128,0,0,
105	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
106	0,0,128,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,255,255,
107	255,3,
108	128,0,0,0,0,0,0,0,0,0,0,0,0,0,0,31,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
109	0,0,255,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
110	0,0,0,192,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,63,0,0,0,0,0,0,0,255,255,48,0,0,248,
111	3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,
112	255,255,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
113	0,0,0,0,0,0,4,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,176,15,0,0,0,0,0,0,
114	0,0,0,0,0,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
115	255,255,255,255,255,255,255,255,255,255,255,255,255,63,
116	0,255,255,255,255,127,254,255,255,255,255,255,255,255,255,255,255,255,255,255,
117	255,255,255,255,255,255,255,255,255,255,1,0,0,255,255,255,255,255,255,255,255,
118	63,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,15,0,255,255,255,255,255,255,
119	255,255,255,255,127,0,255,255,255,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
120	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,2,0,0,8,0,0,0,8,0,0,32,0,0,0,32,0,0,128,
121	0,0,0,128,0,0,0,2,0,0,0,2,0,0,8,0,0,0,0,0,0,0,255,255,255,255,255,255,255,255,
122	255,255,255,255,255,255,255,255,255,15,0,248,254,255,0,0,0,0,0,0,0,0,0,0,0,0,
123	0,0,0,0,127,0,0,128,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
124	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,240,0,
125	128,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,128,255,127,0,0,0,0,0,0,0,
126	0,0,0,0,0,0,112,7,0,192,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
127	0,0,0,0,0,0,0,254,255,255,255,255,255,255,255,31,0,0,0,0,0,0,0,0,0,254,255,
128	255,255,255,255,255,63,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
129	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,3,0,255,255,255,255,255,
130	15,255,255,255,255,255,255,255,255,255,255,255,255,15,0,255,127,254,255,254,
131	255,254,255,255,255,63,0,255,31,255,255,255,255,0,0,0,252,0,0,0,28,0,0,0,252,
132	255,255,255,31,0,0,0,0,0,0,192,255,255,255,7,0,255,255,255,255,255,15,255,1,3,
133	0,63,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
134	0,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
135	255,255,255,255,255,255,255,63,0,255,31,255,7,255,255,255,255,255,255,255,255,
136	255,255,255,255,255,255,15,0,255,255,255,255,255,255,255,255,255,255,255,1,
137	255,15,0,0,255,15,255,255,255,255,255,255,255,0,255,3,255,255,255,255,255,0,
138	255,255,255,63,0,0,0,0,0,0,0,0,0,0,255,239,255,255,255,255,255,255,255,255,
139	255,255,255,255,123,252,255,255,255,255,231,199,255,255,255,231,255,255,255,
140	255,255,255,255,255,255,255,255,255,255,255,255,255,15,0,255,63,15,7,7,0,63,0,
141	0,0,0,0,0,0,0,0,0,0,0,0,

lib/libc/wasi/libc-top-half/musl/src/ctype/toascii.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <ctype.h>
2
3	/* nonsense function that should NEVER be used! */
4	int toascii(int c)
5	{
6	return c & 0x7f;
7	}

lib/libc/wasi/libc-top-half/musl/src/ctype/tolower.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <ctype.h>
2
3	int tolower(int c)
4	{
5	if (isupper(c)) return c \| 32;
6	return c;
7	}
8
9	int __tolower_l(int c, locale_t l)
10	{
11	return tolower(c);
12	}
13
14	weak_alias(__tolower_l, tolower_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/toupper.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <ctype.h>
2
3	int toupper(int c)
4	{
5	if (islower(c)) return c & 0x5f;
6	return c;
7	}
8
9	int __toupper_l(int c, locale_t l)
10	{
11	return toupper(c);
12	}
13
14	weak_alias(__toupper_l, toupper_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/towctrans.c deleted-84

...	@@ -1,84 +0,0 @@
1	#include <wctype.h>
2
3	static const unsigned char tab[];
4
5	static const unsigned char rulebases[512];
6	static const int rules[];
7
8	static const unsigned char exceptions[][2];
9
10	#include "casemap.h"
11
12	static int casemap(unsigned c, int dir)
13	{
14	unsigned b, x, y, v, rt, xb, xn;
15	int r, rd, c0 = c;
16
17	if (c >= 0x20000) return c;
18
19	b = c>>8;
20	c &= 255;
21	x = c/3;
22	y = c%3;
23
24	/* lookup entry in two-level base-6 table */
25	v = tab[tab[b]*86+x];
26	static const int mt[] = { 2048, 342, 57 };
27	v = (v*mt[y]>>11)%6;
28
29	/* use the bit vector out of the tables as an index into
30	* a block-specific set of rules and decode the rule into
31	* a type and a case-mapping delta. */
32	r = rules[rulebases[b]+v];
33	rt = r & 255;
34	rd = r >> 8;
35
36	/* rules 0/1 are simple lower/upper case with a delta.
37	* apply according to desired mapping direction. */
38	if (rt < 2) return c0 + (rd & -(rt^dir));
39
40	/* binary search. endpoints of the binary search for
41	* this block are stored in the rule delta field. */
42	xn = rd & 0xff;
43	xb = (unsigned)rd >> 8;
44	while (xn) {
45	unsigned try = exceptions[xb+xn/2][0];
46	if (try == c) {
47	r = rules[exceptions[xb+xn/2][1]];
48	rt = r & 255;
49	rd = r >> 8;
50	if (rt < 2) return c0 + (rd & -(rt^dir));
51	/* Hard-coded for the four exceptional titlecase */
52	return c0 + (dir ? -1 : 1);
53	} else if (try > c) {
54	xn /= 2;
55	} else {
56	xb += xn/2;
57	xn -= xn/2;
58	}
59	}
60	return c0;
61	}
62
63	wint_t towlower(wint_t wc)
64	{
65	return casemap(wc, 0);
66	}
67
68	wint_t towupper(wint_t wc)
69	{
70	return casemap(wc, 1);
71	}
72
73	wint_t __towupper_l(wint_t c, locale_t l)
74	{
75	return towupper(c);
76	}
77
78	wint_t __towlower_l(wint_t c, locale_t l)
79	{
80	return towlower(c);
81	}
82
83	weak_alias(__towupper_l, towupper_l);
84	weak_alias(__towlower_l, towlower_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/wcswidth.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <wchar.h>
2
3	int wcswidth(const wchar_t *wcs, size_t n)
4	{
5	int l=0, k=0;
6	for (; n-- && wcs && (k = wcwidth(wcs)) >= 0; l+=k, wcs++);
7	return (k < 0) ? k : l;
8	}

lib/libc/wasi/libc-top-half/musl/src/ctype/wctrans.c deleted-29

...	@@ -1,29 +0,0 @@
1	#include <wctype.h>
2	#include <string.h>
3
4	wctrans_t wctrans(const char *class)
5	{
6	if (!strcmp(class, "toupper")) return (wctrans_t)1;
7	if (!strcmp(class, "tolower")) return (wctrans_t)2;
8	return 0;
9	}
10
11	wint_t towctrans(wint_t wc, wctrans_t trans)
12	{
13	if (trans == (wctrans_t)1) return towupper(wc);
14	if (trans == (wctrans_t)2) return towlower(wc);
15	return wc;
16	}
17
18	wctrans_t __wctrans_l(const char *s, locale_t l)
19	{
20	return wctrans(s);
21	}
22
23	wint_t __towctrans_l(wint_t c, wctrans_t t, locale_t l)
24	{
25	return towctrans(c, t);
26	}
27
28	weak_alias(__wctrans_l, wctrans_l);
29	weak_alias(__towctrans_l, towctrans_l);

lib/libc/wasi/libc-top-half/musl/src/ctype/wcwidth.c deleted-29

...	@@ -1,29 +0,0 @@
1	#include <wchar.h>
2
3	static const unsigned char table[] = {
4	#include "nonspacing.h"
5	};
6
7	static const unsigned char wtable[] = {
8	#include "wide.h"
9	};
10
11	int wcwidth(wchar_t wc)
12	{
13	if (wc < 0xffU)
14	return (wc+1 & 0x7f) >= 0x21 ? 1 : wc ? -1 : 0;
15	if ((wc & 0xfffeffffU) < 0xfffe) {
16	if ((table[table[wc>>8]*32+((wc&255)>>3)]>>(wc&7))&1)
17	return 0;
18	if ((wtable[wtable[wc>>8]*32+((wc&255)>>3)]>>(wc&7))&1)
19	return 2;
20	return 1;
21	}
22	if ((wc & 0xfffe) == 0xfffe)
23	return -1;
24	if (wc-0x20000U < 0x20000)
25	return 2;
26	if (wc == 0xe0001 \|\| wc-0xe0020U < 0x5f \|\| wc-0xe0100U < 0xef)
27	return 0;
28	return 1;
29	}

lib/libc/wasi/libc-top-half/musl/src/ctype/wide.h deleted-65

...	@@ -1,65 +0,0 @@
1	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,18,16,16,16,16,16,16,16,16,
2	16,16,16,16,16,16,16,16,16,19,16,20,21,22,16,16,16,23,16,16,24,25,26,27,28,17,
3	17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,29,
4	17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,
5	17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,
6	17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,
7	17,17,17,17,17,17,17,17,30,16,16,16,16,31,16,16,17,17,17,17,17,17,17,17,17,17,
8	17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,
9	17,17,17,17,17,17,17,32,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
10	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,17,17,16,16,16,33,
11	34,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
12	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
13	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
14	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
15	16,16,16,16,16,16,16,16,35,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,
16	17,17,17,17,17,17,36,17,17,37,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
17	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,17,38,39,16,16,
18	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
19	16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
20	16,16,16,16,16,16,16,40,41,42,43,44,45,46,47,16,48,49,16,16,16,16,
21	16,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,
22	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
23	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
24	255,255,255,255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,12,0,6,0,0,0,0,
25	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,30,9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
26	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,96,0,0,48,0,0,0,0,0,0,255,15,0,0,0,0,128,0,0,8,
27	0,2,12,0,96,48,64,16,0,0,4,44,36,32,12,0,0,0,1,0,0,0,80,184,0,0,0,0,0,0,0,224,
28	0,0,0,1,128,0,0,0,0,0,0,0,0,0,0,0,24,0,0,0,0,0,0,33,0,0,0,0,0,0,0,0,0,0,0,0,0,
29	0,0,0,0,0,0,0,
30	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,251,255,255,255,255,255,255,255,
31	255,255,255,15,0,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
32	255,255,255,255,255,255,255,255,255,255,255,63,0,0,0,255,15,255,255,255,255,
33	255,255,255,127,254,255,255,255,255,255,255,255,255,255,127,254,255,255,255,
34	255,255,255,255,255,255,255,255,255,224,255,255,255,255,255,254,255,255,255,
35	255,255,255,255,255,255,255,127,255,255,255,255,255,7,255,255,255,255,15,0,
36	255,255,255,255,255,127,255,255,255,255,255,0,255,255,255,255,255,255,255,255,
37	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
38	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,0,
39	0,0,0,0,0,0,0,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
40	255,31,255,255,255,255,255,255,127,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,
41	255,255,31,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
42	0,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
43	255,15,0,0,0,0,0,0,0,0,0,0,0,0,0,255,3,0,0,255,255,255,255,247,255,127,15,0,0,
44	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,254,255,255,255,255,255,255,255,255,255,255,
45	255,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,127,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
46	0,0,0,0,0,0,0,0,0,0,0,0,15,0,0,0,255,255,255,255,255,255,255,255,255,255,255,
47	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
48	255,0,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
49	255,255,255,255,255,255,255,255,255,255,255,255,7,0,255,255,255,127,0,0,0,0,0,
50	0,7,0,240,0,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
51	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
52	255,255,255,255,255,255,255,255,255,255,255,255,255,255,
53	15,16,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,128,0,0,0,0,0,0,0,0,0,0,
54	0,0,0,0,0,0,0,0,0,0,0,0,0,64,254,7,0,0,0,0,0,0,0,0,0,0,0,0,7,0,255,255,255,
55	255,255,15,255,1,3,0,63,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,255,255,
56	1,224,191,255,255,255,255,255,255,255,255,223,255,255,15,0,255,255,255,255,
57	255,135,15,0,255,255,17,255,255,255,255,255,255,255,255,127,253,255,255,255,
58	255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
59	159,255,255,255,255,255,255,255,63,0,120,255,255,255,0,0,4,0,0,96,0,16,0,0,0,
60	0,0,0,0,0,0,0,248,255,255,255,255,255,255,255,255,255,255,0,0,0,0,0,0,255,255,
61	255,255,255,255,255,255,63,16,39,0,0,24,240,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
62	0,0,0,0,0,0,0,0,0,0,0,0,255,15,0,
63	0,0,224,255,255,255,255,255,255,255,255,255,255,255,255,123,252,255,255,255,
64	255,231,199,255,255,255,231,255,255,255,255,255,255,0,0,0,0,0,0,0,0,0,0,0,0,0,
65	0,15,7,7,0,63,0,0,0,0,0,0,0,0,0,0,0,0,0,

lib/libc/wasi/libc-top-half/musl/src/dirent/__dirent.h deleted-11

...	@@ -1,11 +0,0 @@
1	struct __dirstream
2	{
3	off_t tell;
4	int fd;
5	int buf_pos;
6	int buf_end;
7	volatile int lock[1];
8	/* Any changes to this struct must preserve the property:
9	* offsetof(struct __dirent, buf) % sizeof(off_t) == 0 */
10	char buf[2048];
11	};

lib/libc/wasi/libc-top-half/musl/src/env/setenv.c deleted-42

...	@@ -1,42 +0,0 @@
1	#include <stdlib.h>
2	#include <string.h>
3	#include <errno.h>
4
5	void __env_rm_add(char old, char new)
6	{
7	static char **env_alloced;
8	static size_t env_alloced_n;
9	for (size_t i=0; i < env_alloced_n; i++)
10	if (env_alloced[i] == old) {
11	env_alloced[i] = new;
12	free(old);
13	return;
14	} else if (!env_alloced[i] && new) {
15	env_alloced[i] = new;
16	new = 0;
17	}
18	if (!new) return;
19	char *t = realloc(env_alloced, sizeof t * (env_alloced_n+1));
20	if (!t) return;
21	(env_alloced = t)[env_alloced_n++] = new;
22	}
23
24	int setenv(const char var, const char value, int overwrite)
25	{
26	char *s;
27	size_t l1, l2;
28
29	if (!var \|\| !(l1 = __strchrnul(var, '=') - var) \|\| var[l1]) {
30	errno = EINVAL;
31	return -1;
32	}
33	if (!overwrite && getenv(var)) return 0;
34
35	l2 = strlen(value);
36	s = malloc(l1+l2+2);
37	if (!s) return -1;
38	memcpy(s, var, l1);
39	s[l1] = '=';
40	memcpy(s+l1+1, value, l2+1);
41	return __putenv(s, l1, s);
42	}

lib/libc/wasi/libc-top-half/musl/src/exit/assert.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <stdio.h>
2	#include <stdlib.h>
3
4	_Noreturn void __assert_fail(const char expr, const char file, int line, const char *func)
5	{
6	fprintf(stderr, "Assertion failed: %s (%s: %s: %d)\n", expr, file, func, line);
7	abort();
8	}

lib/libc/wasi/libc-top-half/musl/src/exit/quick_exit.c deleted-11

...	@@ -1,11 +0,0 @@
1	#include <stdlib.h>
2	#include "libc.h"
3
4	static void dummy() { }
5	weak_alias(dummy, __funcs_on_quick_exit);
6
7	_Noreturn void quick_exit(int code)
8	{
9	__funcs_on_quick_exit();
10	_Exit(code);
11	}

lib/libc/wasi/libc-top-half/musl/src/fenv/fegetexceptflag.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <fenv.h>
2
3	int fegetexceptflag(fexcept_t *fp, int mask)
4	{
5	*fp = fetestexcept(mask);
6	return 0;
7	}

lib/libc/wasi/libc-top-half/musl/src/fenv/feholdexcept.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <fenv.h>
2
3	int feholdexcept(fenv_t *envp)
4	{
5	fegetenv(envp);
6	feclearexcept(FE_ALL_EXCEPT);
7	return 0;
8	}

lib/libc/wasi/libc-top-half/musl/src/fenv/fenv.c deleted-38

...	@@ -1,38 +0,0 @@
1	#include <fenv.h>
2
3	/* Dummy functions for archs lacking fenv implementation */
4
5	int feclearexcept(int mask)
6	{
7	return 0;
8	}
9
10	int feraiseexcept(int mask)
11	{
12	return 0;
13	}
14
15	int fetestexcept(int mask)
16	{
17	return 0;
18	}
19
20	int fegetround(void)
21	{
22	return FE_TONEAREST;
23	}
24
25	int __fesetround(int r)
26	{
27	return 0;
28	}
29
30	int fegetenv(fenv_t *envp)
31	{
32	return 0;
33	}
34
35	int fesetenv(const fenv_t *envp)
36	{
37	return 0;
38	}

lib/libc/wasi/libc-top-half/musl/src/fenv/fesetexceptflag.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <fenv.h>
2
3	int fesetexceptflag(const fexcept_t *fp, int mask)
4	{
5	feclearexcept(~*fp & mask);
6	feraiseexcept(*fp & mask);
7	return 0;
8	}

lib/libc/wasi/libc-top-half/musl/src/fenv/fesetround.c deleted-23

...	@@ -1,23 +0,0 @@
1	#include <fenv.h>
2	#include <features.h>
3
4	/* __fesetround wrapper for arch independent argument check */
5
6	hidden int __fesetround(int);
7
8	int fesetround(int r)
9	{
10	if (r != FE_TONEAREST
11	#ifdef FE_DOWNWARD
12	&& r != FE_DOWNWARD
13	#endif
14	#ifdef FE_UPWARD
15	&& r != FE_UPWARD
16	#endif
17	#ifdef FE_TOWARDZERO
18	&& r != FE_TOWARDZERO
19	#endif
20	)
21	return -1;
22	return __fesetround(r);
23	}

lib/libc/wasi/libc-top-half/musl/src/fenv/feupdateenv.c deleted-9

...	@@ -1,9 +0,0 @@
1	#include <fenv.h>
2
3	int feupdateenv(const fenv_t *envp)
4	{
5	int ex = fetestexcept(FE_ALL_EXCEPT);
6	fesetenv(envp);
7	feraiseexcept(ex);
8	return 0;
9	}

lib/libc/wasi/libc-top-half/musl/src/include/arpa/inet.h deleted-8

...	@@ -1,8 +0,0 @@
1	#ifndef ARPA_INET_H
2	#define ARPA_INET_H
3
4	#include "../../../include/arpa/inet.h"
5
6	hidden int __inet_aton(const char , struct in_addr );
7
8	#endif

lib/libc/wasi/libc-top-half/musl/src/include/crypt.h deleted-16

...	@@ -1,16 +0,0 @@
1	#ifndef CRYPT_H
2	#define CRYPT_H
3
4	#include "../../include/crypt.h"
5
6	#include <features.h>
7
8	hidden char __crypt_r(const char , const char , struct crypt_data );
9
10	hidden char __crypt_des(const char , const char , char );
11	hidden char __crypt_md5(const char , const char , char );
12	hidden char __crypt_blowfish(const char , const char , char );
13	hidden char __crypt_sha256(const char , const char , char );
14	hidden char __crypt_sha512(const char , const char , char );
15
16	#endif

lib/libc/wasi/libc-top-half/musl/src/include/features.h deleted-11

...	@@ -1,11 +0,0 @@
1	#ifndef FEATURES_H
2	#define FEATURES_H
3
4	#include "../../include/features.h"
5
6	#define weak __attribute__((__weak__))
7	#define hidden __attribute__((__visibility__("hidden")))
8	#define weak_alias(old, new) \
9	extern __typeof(old) new __attribute__((__weak__, __alias__(#old)))
10
11	#endif

lib/libc/wasi/libc-top-half/musl/src/include/langinfo.h deleted-8

...	@@ -1,8 +0,0 @@
1	#ifndef LANGINFO_H
2	#define LANGINFO_H
3
4	#include "../../include/langinfo.h"
5
6	char *__nl_langinfo_l(nl_item, locale_t);
7
8	#endif

lib/libc/wasi/libc-top-half/musl/src/include/stdlib.h deleted-19

...	@@ -1,19 +0,0 @@
1	#ifndef STDLIB_H
2	#define STDLIB_H
3
4	#include "../../include/stdlib.h"
5
6	hidden int __putenv(char , size_t, char );
7	hidden void __env_rm_add(char , char );
8	hidden int __mkostemps(char *, int, int);
9	hidden int __ptsname_r(int, char *, size_t);
10	hidden char __randname(char );
11	hidden void __qsort_r (void , size_t, size_t, int ()(const void , const void , void ), void );
12
13	hidden void *__libc_malloc(size_t);
14	hidden void *__libc_malloc_impl(size_t);
15	hidden void *__libc_calloc(size_t, size_t);
16	hidden void __libc_realloc(void , size_t);
17	hidden void __libc_free(void *);
18
19	#endif

lib/libc/wasi/libc-top-half/musl/src/include/string.h deleted-11

...	@@ -1,11 +0,0 @@
1	#ifndef STRING_H
2	#define STRING_H
3
4	#include "../../include/string.h"
5
6	hidden void __memrchr(const void , int, size_t);
7	hidden char __stpcpy(char , const char *);
8	hidden char __stpncpy(char , const char *, size_t);
9	hidden char __strchrnul(const char , int);
10
11	#endif

lib/libc/wasi/libc-top-half/musl/src/include/sys/mman.h deleted-20

...	@@ -1,20 +0,0 @@
1	#ifndef SYS_MMAN_H
2	#define SYS_MMAN_H
3
4	#include "../../../include/sys/mman.h"
5
6	hidden void __vm_wait(void);
7	hidden void __vm_lock(void);
8	hidden void __vm_unlock(void);
9
10	hidden void __mmap(void , size_t, int, int, int, off_t);
11	hidden int __munmap(void *, size_t);
12	hidden void __mremap(void , size_t, size_t, int, ...);
13	hidden int __madvise(void *, size_t, int);
14	hidden int __mprotect(void *, size_t, int);
15
16	hidden const unsigned char __map_file(const char , size_t *);
17
18	hidden char __shm_mapname(const char , char *);
19
20	#endif

lib/libc/wasi/libc-top-half/musl/src/include/sys/sysinfo.h deleted-9

...	@@ -1,9 +0,0 @@
1	#ifndef SYS_SYSINFO_H
2	#define SYS_SYSINFO_H
3
4	#include "../../../include/sys/sysinfo.h"
5	#include <features.h>
6
7	hidden int __lsysinfo(struct sysinfo *);
8
9	#endif

lib/libc/wasi/libc-top-half/musl/src/include/sys/time.h deleted-8

...	@@ -1,8 +0,0 @@
1	#ifndef SYS_TIME_H
2	#define SYS_TIME_H
3
4	#include "../../../include/sys/time.h"
5
6	hidden int __futimesat(int, const char *, const struct timeval [2]);
7
8	#endif

lib/libc/wasi/libc-top-half/musl/src/include/time.h deleted-15

...	@@ -1,15 +0,0 @@
1	#ifndef TIME_H
2	#define TIME_H
3
4	#include "../../include/time.h"
5
6	hidden int __clock_gettime(clockid_t, struct timespec *);
7	hidden int __clock_nanosleep(clockid_t, int, const struct timespec , struct timespec );
8
9	hidden char __asctime_r(const struct tm , char *);
10	hidden struct tm __gmtime_r(const time_t restrict, struct tm *restrict);
11	hidden struct tm __localtime_r(const time_t restrict, struct tm *restrict);
12
13	hidden size_t __strftime_l(char restrict, size_t, const char restrict, const struct tm *restrict, locale_t);
14
15	#endif

lib/libc/wasi/libc-top-half/musl/src/internal/aio_impl.h deleted-9

...	@@ -1,9 +0,0 @@
1	#ifndef AIO_IMPL_H
2	#define AIO_IMPL_H
3
4	extern hidden volatile int __aio_fut;
5
6	extern hidden int __aio_close(int);
7	extern hidden void __aio_atfork(int);
8
9	#endif

lib/libc/wasi/libc-top-half/musl/src/internal/atomic.h deleted-333

...	@@ -1,333 +0,0 @@
1	#ifndef _ATOMIC_H
2	#define _ATOMIC_H
3
4	#include <stdint.h>
5
6	#include "atomic_arch.h"
7
8	#ifdef a_ll
9
10	#ifndef a_pre_llsc
11	#define a_pre_llsc()
12	#endif
13
14	#ifndef a_post_llsc
15	#define a_post_llsc()
16	#endif
17
18	#ifndef a_cas
19	#define a_cas a_cas
20	static inline int a_cas(volatile int *p, int t, int s)
21	{
22	int old;
23	a_pre_llsc();
24	do old = a_ll(p);
25	while (old==t && !a_sc(p, s));
26	a_post_llsc();
27	return old;
28	}
29	#endif
30
31	#ifndef a_swap
32	#define a_swap a_swap
33	static inline int a_swap(volatile int *p, int v)
34	{
35	int old;
36	a_pre_llsc();
37	do old = a_ll(p);
38	while (!a_sc(p, v));
39	a_post_llsc();
40	return old;
41	}
42	#endif
43
44	#ifndef a_fetch_add
45	#define a_fetch_add a_fetch_add
46	static inline int a_fetch_add(volatile int *p, int v)
47	{
48	int old;
49	a_pre_llsc();
50	do old = a_ll(p);
51	while (!a_sc(p, (unsigned)old + v));
52	a_post_llsc();
53	return old;
54	}
55	#endif
56
57	#ifndef a_fetch_and
58	#define a_fetch_and a_fetch_and
59	static inline int a_fetch_and(volatile int *p, int v)
60	{
61	int old;
62	a_pre_llsc();
63	do old = a_ll(p);
64	while (!a_sc(p, old & v));
65	a_post_llsc();
66	return old;
67	}
68	#endif
69
70	#ifndef a_fetch_or
71	#define a_fetch_or a_fetch_or
72	static inline int a_fetch_or(volatile int *p, int v)
73	{
74	int old;
75	a_pre_llsc();
76	do old = a_ll(p);
77	while (!a_sc(p, old \| v));
78	a_post_llsc();
79	return old;
80	}
81	#endif
82
83	#endif
84
85	#ifdef a_ll_p
86
87	#ifndef a_cas_p
88	#define a_cas_p a_cas_p
89	static inline void a_cas_p(volatile void p, void t, void s)
90	{
91	void *old;
92	a_pre_llsc();
93	do old = a_ll_p(p);
94	while (old==t && !a_sc_p(p, s));
95	a_post_llsc();
96	return old;
97	}
98	#endif
99
100	#endif
101
102	#ifndef a_cas
103	#error missing definition of a_cas
104	#endif
105
106	#ifndef a_swap
107	#define a_swap a_swap
108	static inline int a_swap(volatile int *p, int v)
109	{
110	int old;
111	do old = *p;
112	while (a_cas(p, old, v) != old);
113	return old;
114	}
115	#endif
116
117	#ifndef a_fetch_add
118	#define a_fetch_add a_fetch_add
119	static inline int a_fetch_add(volatile int *p, int v)
120	{
121	int old;
122	do old = *p;
123	while (a_cas(p, old, (unsigned)old+v) != old);
124	return old;
125	}
126	#endif
127
128	#ifndef a_fetch_and
129	#define a_fetch_and a_fetch_and
130	static inline int a_fetch_and(volatile int *p, int v)
131	{
132	int old;
133	do old = *p;
134	while (a_cas(p, old, old&v) != old);
135	return old;
136	}
137	#endif
138	#ifndef a_fetch_or
139	#define a_fetch_or a_fetch_or
140	static inline int a_fetch_or(volatile int *p, int v)
141	{
142	int old;
143	do old = *p;
144	while (a_cas(p, old, old\|v) != old);
145	return old;
146	}
147	#endif
148
149	#ifndef a_and
150	#define a_and a_and
151	static inline void a_and(volatile int *p, int v)
152	{
153	a_fetch_and(p, v);
154	}
155	#endif
156
157	#ifndef a_or
158	#define a_or a_or
159	static inline void a_or(volatile int *p, int v)
160	{
161	a_fetch_or(p, v);
162	}
163	#endif
164
165	#ifndef a_inc
166	#define a_inc a_inc
167	static inline void a_inc(volatile int *p)
168	{
169	a_fetch_add(p, 1);
170	}
171	#endif
172
173	#ifndef a_dec
174	#define a_dec a_dec
175	static inline void a_dec(volatile int *p)
176	{
177	a_fetch_add(p, -1);
178	}
179	#endif
180
181	#ifndef a_store
182	#define a_store a_store
183	static inline void a_store(volatile int *p, int v)
184	{
185	#ifdef a_barrier
186	a_barrier();
187	*p = v;
188	a_barrier();
189	#else
190	a_swap(p, v);
191	#endif
192	}
193	#endif
194
195	#ifndef a_barrier
196	#define a_barrier a_barrier
197	static void a_barrier()
198	{
199	volatile int tmp = 0;
200	a_cas(&tmp, 0, 0);
201	}
202	#endif
203
204	#ifndef a_spin
205	#define a_spin a_barrier
206	#endif
207
208	#ifndef a_and_64
209	#define a_and_64 a_and_64
210	static inline void a_and_64(volatile uint64_t *p, uint64_t v)
211	{
212	union { uint64_t v; uint32_t r[2]; } u = { v };
213	if (u.r[0]+1) a_and((int *)p, u.r[0]);
214	if (u.r[1]+1) a_and((int *)p+1, u.r[1]);
215	}
216	#endif
217
218	#ifndef a_or_64
219	#define a_or_64 a_or_64
220	static inline void a_or_64(volatile uint64_t *p, uint64_t v)
221	{
222	union { uint64_t v; uint32_t r[2]; } u = { v };
223	if (u.r[0]) a_or((int *)p, u.r[0]);
224	if (u.r[1]) a_or((int *)p+1, u.r[1]);
225	}
226	#endif
227
228	#ifndef a_cas_p
229	typedef char a_cas_p_undefined_but_pointer_not_32bit[-sizeof(char) == 0xffffffff ? 1 : -1];
230	#define a_cas_p a_cas_p
231	static inline void a_cas_p(volatile void p, void t, void s)
232	{
233	return (void )a_cas((volatile int )p, (int)t, (int)s);
234	}
235	#endif
236
237	#ifndef a_or_l
238	#define a_or_l a_or_l
239	static inline void a_or_l(volatile void *p, long v)
240	{
241	if (sizeof(long) == sizeof(int)) a_or(p, v);
242	else a_or_64(p, v);
243	}
244	#endif
245
246	#ifndef a_crash
247	#define a_crash a_crash
248	static inline void a_crash()
249	{
250	(volatile char )0=0;
251	}
252	#endif
253
254	#ifndef a_ctz_32
255	#define a_ctz_32 a_ctz_32
256	static inline int a_ctz_32(uint32_t x)
257	{
258	#ifdef a_clz_32
259	return 31-a_clz_32(x&-x);
260	#else
261	static const char debruijn32[32] = {
262	0, 1, 23, 2, 29, 24, 19, 3, 30, 27, 25, 11, 20, 8, 4, 13,
263	31, 22, 28, 18, 26, 10, 7, 12, 21, 17, 9, 6, 16, 5, 15, 14
264	};
265	return debruijn32[(x&-x)*0x076be629 >> 27];
266	#endif
267	}
268	#endif
269
270	#ifndef a_ctz_64
271	#define a_ctz_64 a_ctz_64
272	static inline int a_ctz_64(uint64_t x)
273	{
274	static const char debruijn64[64] = {
275	0, 1, 2, 53, 3, 7, 54, 27, 4, 38, 41, 8, 34, 55, 48, 28,
276	62, 5, 39, 46, 44, 42, 22, 9, 24, 35, 59, 56, 49, 18, 29, 11,
277	63, 52, 6, 26, 37, 40, 33, 47, 61, 45, 43, 21, 23, 58, 17, 10,
278	51, 25, 36, 32, 60, 20, 57, 16, 50, 31, 19, 15, 30, 14, 13, 12
279	};
280	if (sizeof(long) < 8) {
281	uint32_t y = x;
282	if (!y) {
283	y = x>>32;
284	return 32 + a_ctz_32(y);
285	}
286	return a_ctz_32(y);
287	}
288	return debruijn64[(x&-x)*0x022fdd63cc95386dull >> 58];
289	}
290	#endif
291
292	static inline int a_ctz_l(unsigned long x)
293	{
294	return (sizeof(long) < 8) ? a_ctz_32(x) : a_ctz_64(x);
295	}
296
297	#ifndef a_clz_64
298	#define a_clz_64 a_clz_64
299	static inline int a_clz_64(uint64_t x)
300	{
301	#ifdef a_clz_32
302	if (x>>32)
303	return a_clz_32(x>>32);
304	return a_clz_32(x) + 32;
305	#else
306	uint32_t y;
307	int r;
308	if (x>>32) y=x>>32, r=0; else y=x, r=32;
309	if (y>>16) y>>=16; else r \|= 16;
310	if (y>>8) y>>=8; else r \|= 8;
311	if (y>>4) y>>=4; else r \|= 4;
312	if (y>>2) y>>=2; else r \|= 2;
313	return r \| !(y>>1);
314	#endif
315	}
316	#endif
317
318	#ifndef a_clz_32
319	#define a_clz_32 a_clz_32
320	static inline int a_clz_32(uint32_t x)
321	{
322	x >>= 1;
323	x \|= x >> 1;
324	x \|= x >> 2;
325	x \|= x >> 4;
326	x \|= x >> 8;
327	x \|= x >> 16;
328	x++;
329	return 31-a_ctz_32(x);
330	}
331	#endif
332
333	#endif

lib/libc/wasi/libc-top-half/musl/src/internal/dynlink.h deleted-113

...	@@ -1,113 +0,0 @@
1	#ifndef _INTERNAL_RELOC_H
2	#define _INTERNAL_RELOC_H
3
4	#include <features.h>
5	#include <elf.h>
6	#include <stdint.h>
7	#include <stddef.h>
8	#include <stdarg.h>
9
10	#if UINTPTR_MAX == 0xffffffff
11	typedef Elf32_Ehdr Ehdr;
12	typedef Elf32_Phdr Phdr;
13	typedef Elf32_Sym Sym;
14	#define R_TYPE(x) ((x)&255)
15	#define R_SYM(x) ((x)>>8)
16	#define R_INFO ELF32_R_INFO
17	#else
18	typedef Elf64_Ehdr Ehdr;
19	typedef Elf64_Phdr Phdr;
20	typedef Elf64_Sym Sym;
21	#define R_TYPE(x) ((x)&0x7fffffff)
22	#define R_SYM(x) ((x)>>32)
23	#define R_INFO ELF64_R_INFO
24	#endif
25
26	/* These enum constants provide unmatchable default values for
27	* any relocation type the arch does not use. */
28	enum {
29	REL_NONE = 0,
30	REL_SYMBOLIC = -100,
31	REL_USYMBOLIC,
32	REL_GOT,
33	REL_PLT,
34	REL_RELATIVE,
35	REL_OFFSET,
36	REL_OFFSET32,
37	REL_COPY,
38	REL_SYM_OR_REL,
39	REL_DTPMOD,
40	REL_DTPOFF,
41	REL_TPOFF,
42	REL_TPOFF_NEG,
43	REL_TLSDESC,
44	REL_FUNCDESC,
45	REL_FUNCDESC_VAL,
46	};
47
48	struct fdpic_loadseg {
49	uintptr_t addr, p_vaddr, p_memsz;
50	};
51
52	struct fdpic_loadmap {
53	unsigned short version, nsegs;
54	struct fdpic_loadseg segs[];
55	};
56
57	struct fdpic_dummy_loadmap {
58	unsigned short version, nsegs;
59	struct fdpic_loadseg segs[1];
60	};
61
62	#include "reloc.h"
63
64	#ifndef FDPIC_CONSTDISP_FLAG
65	#define FDPIC_CONSTDISP_FLAG 0
66	#endif
67
68	#ifndef DL_FDPIC
69	#define DL_FDPIC 0
70	#endif
71
72	#ifndef DL_NOMMU_SUPPORT
73	#define DL_NOMMU_SUPPORT 0
74	#endif
75
76	#if !DL_FDPIC
77	#define IS_RELATIVE(x,s) ( \
78	(R_TYPE(x) == REL_RELATIVE) \|\| \
79	(R_TYPE(x) == REL_SYM_OR_REL && !R_SYM(x)) )
80	#else
81	#define IS_RELATIVE(x,s) ( ( \
82	(R_TYPE(x) == REL_FUNCDESC_VAL) \|\| \
83	(R_TYPE(x) == REL_SYMBOLIC) ) \
84	&& (((s)[R_SYM(x)].st_info & 0xf) == STT_SECTION) )
85	#endif
86
87	#ifndef NEED_MIPS_GOT_RELOCS
88	#define NEED_MIPS_GOT_RELOCS 0
89	#endif
90
91	#ifndef DT_DEBUG_INDIRECT
92	#define DT_DEBUG_INDIRECT 0
93	#endif
94
95	#define AUX_CNT 32
96	#define DYN_CNT 32
97
98	typedef void (stage2_func)(unsigned char , size_t *);
99
100	hidden void __dlsym(void restrict, const char restrict, void restrict);
101
102	hidden void __dl_seterr(const char *, ...);
103	hidden int __dl_invalid_handle(void *);
104	hidden void __dl_vseterr(const char *, va_list);
105
106	hidden ptrdiff_t __tlsdesc_static(), __tlsdesc_dynamic();
107
108	hidden extern int __malloc_replaced;
109	hidden extern int __aligned_alloc_replaced;
110	hidden void __malloc_donate(char , char );
111	hidden int __malloc_allzerop(void *);
112
113	#endif

lib/libc/wasi/libc-top-half/musl/src/internal/fdpic_crt.h deleted-28

...	@@ -1,28 +0,0 @@
1	#include <stdint.h>
2	#include <features.h>
3
4	hidden void __fdpic_fixup(void map, uintptr_t a, uintptr_t z)
5	{
6	/* If map is a null pointer, the program was loaded by a
7	* non-FDPIC-aware ELF loader, and fixups are not needed,
8	* but the value for the GOT pointer is. */
9	if (!map) return (void *)z[-1];
10
11	struct {
12	unsigned short version, nsegs;
13	struct fdpic_loadseg {
14	uintptr_t addr, p_vaddr, p_memsz;
15	} segs[];
16	} *lm = map;
17	int nsegs = lm->nsegs, rseg = 0, vseg = 0;
18	for (;;) {
19	while (*a-lm->segs[rseg].p_vaddr >= lm->segs[rseg].p_memsz)
20	if (++rseg == nsegs) rseg = 0;
21	uintptr_t r = (uintptr_t )
22	(*a + lm->segs[rseg].addr - lm->segs[rseg].p_vaddr);
23	if (++a == z) return r;
24	while (*r-lm->segs[vseg].p_vaddr >= lm->segs[vseg].p_memsz)
25	if (++vseg == nsegs) vseg = 0;
26	*r += lm->segs[vseg].addr - lm->segs[vseg].p_vaddr;
27	}
28	}

lib/libc/wasi/libc-top-half/musl/src/internal/futex.h deleted-19

...	@@ -1,19 +0,0 @@
1	#ifndef _INTERNAL_FUTEX_H
2	#define _INTERNAL_FUTEX_H
3
4	#define FUTEX_WAIT 0
5	#define FUTEX_WAKE 1
6	#define FUTEX_FD 2
7	#define FUTEX_REQUEUE 3
8	#define FUTEX_CMP_REQUEUE 4
9	#define FUTEX_WAKE_OP 5
10	#define FUTEX_LOCK_PI 6
11	#define FUTEX_UNLOCK_PI 7
12	#define FUTEX_TRYLOCK_PI 8
13	#define FUTEX_WAIT_BITSET 9
14
15	#define FUTEX_PRIVATE 128
16
17	#define FUTEX_CLOCK_REALTIME 256
18
19	#endif

lib/libc/wasi/libc-top-half/musl/src/internal/intscan.h deleted-8

...	@@ -1,8 +0,0 @@
1	#ifndef INTSCAN_H
2	#define INTSCAN_H
3
4	#include <stdio.h>
5
6	hidden unsigned long long __intscan(FILE *, unsigned, int, unsigned long long);
7
8	#endif

lib/libc/wasi/libc-top-half/musl/src/legacy/getpagesize.c deleted-8

...	@@ -1,8 +0,0 @@
1	#define _GNU_SOURCE
2	#include <unistd.h>
3	#include "libc.h"
4
5	int getpagesize(void)
6	{
7	return PAGE_SIZE;
8	}

lib/libc/wasi/libc-top-half/musl/src/locale/__lctrans.c deleted-19

...	@@ -1,19 +0,0 @@
1	#include <locale.h>
2	#include "locale_impl.h"
3
4	static const char dummy(const char msg, const struct __locale_map *lm)
5	{
6	return msg;
7	}
8
9	weak_alias(dummy, __lctrans_impl);
10
11	const char __lctrans(const char msg, const struct __locale_map *lm)
12	{
13	return __lctrans_impl(msg, lm);
14	}
15
16	const char __lctrans_cur(const char msg)
17	{
18	return __lctrans_impl(msg, CURRENT_LOCALE->cat[LC_MESSAGES]);
19	}

lib/libc/wasi/libc-top-half/musl/src/locale/__mo_lookup.c deleted-42

...	@@ -1,42 +0,0 @@
1	#include <stdint.h>
2	#include <string.h>
3
4	static inline uint32_t swapc(uint32_t x, int c)
5	{
6	return c ? x>>24 \| x>>8&0xff00 \| x<<8&0xff0000 \| x<<24 : x;
7	}
8
9	const char __mo_lookup(const void p, size_t size, const char *s)
10	{
11	const uint32_t *mo = p;
12	int sw = *mo - 0x950412de;
13	uint32_t b = 0, n = swapc(mo[2], sw);
14	uint32_t o = swapc(mo[3], sw);
15	uint32_t t = swapc(mo[4], sw);
16	if (n>=size/4 \|\| o>=size-4n \|\| t>=size-4n \|\| ((o\|t)%4))
17	return 0;
18	o/=4;
19	t/=4;
20	for (;;) {
21	uint32_t ol = swapc(mo[o+2*(b+n/2)], sw);
22	uint32_t os = swapc(mo[o+2*(b+n/2)+1], sw);
23	if (os >= size \|\| ol >= size-os \|\| ((char *)p)[os+ol])
24	return 0;
25	int sign = strcmp(s, (char *)p + os);
26	if (!sign) {
27	uint32_t tl = swapc(mo[t+2*(b+n/2)], sw);
28	uint32_t ts = swapc(mo[t+2*(b+n/2)+1], sw);
29	if (ts >= size \|\| tl >= size-ts \|\| ((char *)p)[ts+tl])
30	return 0;
31	return (char *)p + ts;
32	}
33	else if (n == 1) return 0;
34	else if (sign < 0)
35	n /= 2;
36	else {
37	b += n/2;
38	n -= n/2;
39	}
40	}
41	return 0;
42	}

lib/libc/wasi/libc-top-half/musl/src/locale/big5.h deleted-1085

...	@@ -1,1085 +0,0 @@
1	12288,65292,12289,12290,65294,8231,65307,65306,65311,65281,65072,8230,8229,
2	65104,65105,65106,183,65108,65109,65110,65111,65372,8211,65073,8212,65075,
3	9588,65076,65103,65288,65289,65077,65078,65371,65373,65079,65080,12308,12309,
4	65081,65082,12304,12305,65083,65084,12298,12299,65085,65086,12296,12297,65087,
5	65088,12300,12301,65089,65090,12302,12303,65091,65092,65113,65114,65115,65116,
6	65117,65118,8216,8217,8220,8221,12317,12318,8245,8242,65283,65286,65290,8251,
7	167,12291,9675,9679,9651,9650,9678,9734,9733,9671,9670,9633,9632,9661,9660,
8	12963,8453,175,65507,65343,717,65097,65098,65101,65102,65099,65100,65119,
9	65120,65121,65291,65293,215,247,177,8730,65308,65310,65309,8806,8807,8800,
10	8734,8786,8801,65122,65123,65124,65125,65126,65374,8745,8746,8869,8736,8735,
11	8895,13266,13265,8747,8750,8757,8756,9792,9794,8853,8857,8593,8595,8592,8594,
12	8598,8599,8601,8600,8741,8739,65295,65340,8725,65128,65284,65509,12306,65504,
13	65505,65285,65312,8451,8457,65129,65130,65131,13269,13212,13213,13214,13262,
14	13217,13198,13199,13252,176,20825,20827,20830,20829,20833,20835,21991,29929,
15	31950,9601,9602,9603,9604,9605,9606,9607,9608,9615,9614,9613,9612,9611,9610,
16	9609,9532,9524,9516,9508,9500,9620,9472,9474,9621,9484,9488,9492,9496,9581,
17	9582,9584,9583,9552,9566,9578,9569,9698,9699,9701,9700,9585,9586,9587,65296,
18	65297,65298,65299,65300,65301,65302,65303,65304,65305,8544,8545,8546,8547,
19	8548,8549,8550,8551,8552,8553,12321,
20	12322,12323,12324,12325,12326,12327,12328,12329,21313,21316,21317,65313,65314,
21	65315,65316,65317,65318,65319,65320,65321,65322,65323,65324,65325,65326,65327,
22	65328,65329,65330,65331,65332,65333,65334,65335,65336,65337,65338,65345,65346,
23	65347,65348,65349,65350,65351,65352,65353,65354,65355,65356,65357,65358,65359,
24	65360,65361,65362,65363,65364,65365,65366,65367,65368,65369,65370,913,914,915,
25	916,917,918,919,920,921,922,923,924,925,926,927,928,929,931,932,933,934,935,
26	936,937,945,946,947,948,949,950,951,952,953,954,955,956,957,958,959,960,961,
27	963,964,965,966,967,968,969,12549,12550,12551,12552,12553,12554,12555,12556,
28	12557,12558,12559,12560,12561,12562,12563,12564,12565,12566,12567,12568,12569,
29	12570,12571,12572,12573,12574,12575,12576,12577,12578,12579,12580,12581,12582,
30	12583,12584,12585,729,713,714,711,715,9216,9217,9218,9219,9220,9221,9222,9223,
31	9224,9225,9226,9227,9228,9229,9230,9231,9232,9233,9234,9235,9236,9237,9238,
32	9239,9240,9241,9242,9243,9244,9245,9246,9247,9249,8364,0,0,0,0,0,0,0,0,0,0,0,
33	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,19968,20057,19969,19971,20035,20061,20102,
34	20108,20154,20799,20837,20843,20960,20992,20993,21147,21269,21313,21340,21448,
35	19977,19979,19976,19978,20011,20024,20961,20037,20040,20063,20062,20110,20129,
36	20800,20995,21242,21315,21449,21475,22303,
37	22763,22805,22823,22899,23376,23377,23379,23544,23567,23586,23608,23665,24029,
38	24037,24049,24050,24051,24062,24178,24318,24331,24339,25165,19985,19984,19981,
39	20013,20016,20025,20043,23609,20104,20113,20117,20114,20116,20130,20161,20160,
40	20163,20166,20167,20173,20170,20171,20164,20803,20801,20839,20845,20846,20844,
41	20887,20982,20998,20999,21000,21243,21246,21247,21270,21305,21320,21319,21317,
42	21342,21380,21451,21450,21453,22764,22825,22827,22826,22829,23380,23569,23588,
43	23610,23663,24052,24187,24319,24340,24341,24515,25096,25142,25163,25166,25903,
44	25991,26007,26020,26041,26085,26352,26376,26408,27424,27490,27513,27595,27604,
45	27611,27663,27700,28779,29226,29238,29243,29255,29273,29275,29356,29579,19993,
46	19990,19989,19988,19992,20027,20045,20047,20046,20197,20184,20180,20181,20182,
47	20183,20195,20196,20185,20190,20805,20804,20873,20874,20908,20985,20986,20984,
48	21002,21152,21151,21253,21254,21271,21277,20191,21322,21321,21345,21344,21359,
49	21358,21435,21487,21476,21491,21484,21486,21481,21480,21500,21496,21493,21483,
50	21478,21482,21490,21489,21488,21477,21485,21499,22235,22234,22806,22830,22833,
51	22900,22902,23381,23427,23612,24040,24039,24038,24066,24067,24179,24188,24321,
52	24344,24343,24517,25098,25171,25172,25170,25169,26021,26086,26414,26412,26410,
53	26411,26413,27491,27597,27665,27664,27704,27713,27712,27710,29359,29572,29577,
54	29916,29926,29976,29983,29992,29993,30000,30001,30002,30003,30091,30333,30382,
55	30399,30446,30683,30690,30707,31034,31166,31348,31435,19998,19999,20050,20051,
56	20073,20121,20132,20134,20133,20223,20233,20249,20234,
57	20245,20237,20240,20241,20239,20210,20214,20219,20208,20211,20221,20225,20235,
58	20809,20807,20806,20808,20840,20849,20877,20912,21015,21009,21010,21006,21014,
59	21155,21256,21281,21280,21360,21361,21513,21519,21516,21514,21520,21505,21515,
60	21508,21521,21517,21512,21507,21518,21510,21522,22240,22238,22237,22323,22320,
61	22312,22317,22316,22319,22313,22809,22810,22839,22840,22916,22904,22915,22909,
62	22905,22914,22913,23383,23384,23431,23432,23429,23433,23546,23574,23673,24030,
63	24070,24182,24180,24335,24347,24537,24534,25102,25100,25101,25104,25187,25179,
64	25176,25910,26089,26088,26092,26093,26354,26355,26377,26429,26420,26417,26421,
65	27425,27492,27515,27670,27741,27735,27737,27743,27744,27728,27733,27745,27739,
66	27725,27726,28784,29279,29277,30334,31481,31859,31992,32566,32650,32701,32769,
67	32771,32780,32786,32819,32895,32905,32907,32908,33251,33258,33267,33276,33292,
68	33307,33311,33390,33394,33406,34411,34880,34892,34915,35199,38433,20018,20136,
69	20301,20303,20295,20311,20318,20276,20315,20309,20272,20304,20305,20285,20282,
70	20280,20291,20308,20284,20294,20323,20316,20320,20271,20302,20278,20313,20317,
71	20296,20314,20812,20811,20813,20853,20918,20919,21029,21028,21033,21034,21032,
72	21163,21161,21162,21164,21283,21363,21365,21533,21549,21534,21566,21542,21582,
73	21543,21574,21571,21555,21576,21570,21531,21545,21578,21561,21563,21560,21550,
74	21557,21558,21536,21564,21568,21553,21547,21535,21548,22250,22256,22244,22251,
75	22346,22353,22336,22349,22343,22350,22334,22352,22351,22331,22767,22846,22941,
76	22930,22952,22942,22947,22937,22934,22925,22948,22931,
77	22922,22949,23389,23388,23386,23387,23436,23435,23439,23596,23616,23617,23615,
78	23614,23696,23697,23700,23692,24043,24076,24207,24199,24202,24311,24324,24351,
79	24420,24418,24439,24441,24536,24524,24535,24525,24561,24555,24568,24554,25106,
80	25105,25220,25239,25238,25216,25206,25225,25197,25226,25212,25214,25209,25203,
81	25234,25199,25240,25198,25237,25235,25233,25222,25913,25915,25912,26097,26356,
82	26463,26446,26447,26448,26449,26460,26454,26462,26441,26438,26464,26451,26455,
83	27493,27599,27714,27742,27801,27777,27784,27785,27781,27803,27754,27770,27792,
84	27760,27788,27752,27798,27794,27773,27779,27762,27774,27764,27782,27766,27789,
85	27796,27800,27778,28790,28796,28797,28792,29282,29281,29280,29380,29378,29590,
86	29996,29995,30007,30008,30338,30447,30691,31169,31168,31167,31350,31995,32597,
87	32918,32915,32925,32920,32923,32922,32946,33391,33426,33419,33421,35211,35282,
88	35328,35895,35910,35925,35997,36196,36208,36275,36523,36554,36763,36784,36802,
89	36806,36805,36804,24033,37009,37026,37034,37030,37027,37193,37318,37324,38450,
90	38446,38449,38442,38444,20006,20054,20083,20107,20123,20126,20139,20140,20335,
91	20381,20365,20339,20351,20332,20379,20363,20358,20355,20336,20341,20360,20329,
92	20347,20374,20350,20367,20369,20346,20820,20818,20821,20841,20855,20854,20856,
93	20925,20989,21051,21048,21047,21050,21040,21038,21046,21057,21182,21179,21330,
94	21332,21331,21329,21350,21367,21368,21369,21462,21460,21463,21619,21621,21654,
95	21624,21653,21632,21627,21623,21636,21650,21638,21628,21648,21617,21622,21644,
96	21658,21602,21608,21643,21629,21646,22266,22403,22391,
97	22378,22377,22369,22374,22372,22396,22812,22857,22855,22856,22852,22868,22974,
98	22971,22996,22969,22958,22993,22982,22992,22989,22987,22995,22986,22959,22963,
99	22994,22981,23391,23396,23395,23447,23450,23448,23452,23449,23451,23578,23624,
100	23621,23622,23735,23713,23736,23721,23723,23729,23731,24088,24090,24086,24085,
101	24091,24081,24184,24218,24215,24220,24213,24214,24310,24358,24359,24361,24448,
102	24449,24447,24444,24541,24544,24573,24565,24575,24591,24596,24623,24629,24598,
103	24618,24597,24609,24615,24617,24619,24603,25110,25109,25151,25150,25152,25215,
104	25289,25292,25284,25279,25282,25273,25298,25307,25259,25299,25300,25291,25288,
105	25256,25277,25276,25296,25305,25287,25293,25269,25306,25265,25304,25302,25303,
106	25286,25260,25294,25918,26023,26044,26106,26132,26131,26124,26118,26114,26126,
107	26112,26127,26133,26122,26119,26381,26379,26477,26507,26517,26481,26524,26483,
108	26487,26503,26525,26519,26479,26480,26495,26505,26494,26512,26485,26522,26515,
109	26492,26474,26482,27427,27494,27495,27519,27667,27675,27875,27880,27891,27825,
110	27852,27877,27827,27837,27838,27836,27874,27819,27861,27859,27832,27844,27833,
111	27841,27822,27863,27845,27889,27839,27835,27873,27867,27850,27820,27887,27868,
112	27862,27872,28821,28814,28818,28810,28825,29228,29229,29240,29256,29287,29289,
113	29376,29390,29401,29399,29392,29609,29608,29599,29611,29605,30013,30109,30105,
114	30106,30340,30402,30450,30452,30693,30717,31038,31040,31041,31177,31176,31354,
115	31353,31482,31998,32596,32652,32651,32773,32954,32933,32930,32945,32929,32939,
116	32937,32948,32938,32943,33253,33278,33293,33459,33437,
117	33433,33453,33469,33439,33465,33457,33452,33445,33455,33464,33443,33456,33470,
118	33463,34382,34417,21021,34920,36555,36814,36820,36817,37045,37048,37041,37046,
119	37319,37329,38263,38272,38428,38464,38463,38459,38468,38466,38585,38632,38738,
120	38750,20127,20141,20142,20449,20405,20399,20415,20448,20433,20431,20445,20419,
121	20406,20440,20447,20426,20439,20398,20432,20420,20418,20442,20430,20446,20407,
122	20823,20882,20881,20896,21070,21059,21066,21069,21068,21067,21063,21191,21193,
123	21187,21185,21261,21335,21371,21402,21467,21676,21696,21672,21710,21705,21688,
124	21670,21683,21703,21698,21693,21674,21697,21700,21704,21679,21675,21681,21691,
125	21673,21671,21695,22271,22402,22411,22432,22435,22434,22478,22446,22419,22869,
126	22865,22863,22862,22864,23004,23000,23039,23011,23016,23043,23013,23018,23002,
127	23014,23041,23035,23401,23459,23462,23460,23458,23461,23553,23630,23631,23629,
128	23627,23769,23762,24055,24093,24101,24095,24189,24224,24230,24314,24328,24365,
129	24421,24456,24453,24458,24459,24455,24460,24457,24594,24605,24608,24613,24590,
130	24616,24653,24688,24680,24674,24646,24643,24684,24683,24682,24676,25153,25308,
131	25366,25353,25340,25325,25345,25326,25341,25351,25329,25335,25327,25324,25342,
132	25332,25361,25346,25919,25925,26027,26045,26082,26149,26157,26144,26151,26159,
133	26143,26152,26161,26148,26359,26623,26579,26609,26580,26576,26604,26550,26543,
134	26613,26601,26607,26564,26577,26548,26586,26597,26552,26575,26590,26611,26544,
135	26585,26594,26589,26578,27498,27523,27526,27573,27602,27607,27679,27849,27915,
136	27954,27946,27969,27941,27916,27953,27934,27927,27963,
137	27965,27966,27958,27931,27893,27961,27943,27960,27945,27950,27957,27918,27947,
138	28843,28858,28851,28844,28847,28845,28856,28846,28836,29232,29298,29295,29300,
139	29417,29408,29409,29623,29642,29627,29618,29645,29632,29619,29978,29997,30031,
140	30028,30030,30027,30123,30116,30117,30114,30115,30328,30342,30343,30344,30408,
141	30406,30403,30405,30465,30457,30456,30473,30475,30462,30460,30471,30684,30722,
142	30740,30732,30733,31046,31049,31048,31047,31161,31162,31185,31186,31179,31359,
143	31361,31487,31485,31869,32002,32005,32000,32009,32007,32004,32006,32568,32654,
144	32703,32772,32784,32781,32785,32822,32982,32997,32986,32963,32964,32972,32993,
145	32987,32974,32990,32996,32989,33268,33314,33511,33539,33541,33507,33499,33510,
146	33540,33509,33538,33545,33490,33495,33521,33537,33500,33492,33489,33502,33491,
147	33503,33519,33542,34384,34425,34427,34426,34893,34923,35201,35284,35336,35330,
148	35331,35998,36000,36212,36211,36276,36557,36556,36848,36838,36834,36842,36837,
149	36845,36843,36836,36840,37066,37070,37057,37059,37195,37194,37325,38274,38480,
150	38475,38476,38477,38754,38761,38859,38893,38899,38913,39080,39131,39135,39318,
151	39321,20056,20147,20492,20493,20515,20463,20518,20517,20472,20521,20502,20486,
152	20540,20511,20506,20498,20497,20474,20480,20500,20520,20465,20513,20491,20505,
153	20504,20467,20462,20525,20522,20478,20523,20489,20860,20900,20901,20898,20941,
154	20940,20934,20939,21078,21084,21076,21083,21085,21290,21375,21407,21405,21471,
155	21736,21776,21761,21815,21756,21733,21746,21766,21754,21780,21737,21741,21729,
156	21769,21742,21738,21734,21799,21767,21757,21775,22275,
157	22276,22466,22484,22475,22467,22537,22799,22871,22872,22874,23057,23064,23068,
158	23071,23067,23059,23020,23072,23075,23081,23077,23052,23049,23403,23640,23472,
159	23475,23478,23476,23470,23477,23481,23480,23556,23633,23637,23632,23789,23805,
160	23803,23786,23784,23792,23798,23809,23796,24046,24109,24107,24235,24237,24231,
161	24369,24466,24465,24464,24665,24675,24677,24656,24661,24685,24681,24687,24708,
162	24735,24730,24717,24724,24716,24709,24726,25159,25331,25352,25343,25422,25406,
163	25391,25429,25410,25414,25423,25417,25402,25424,25405,25386,25387,25384,25421,
164	25420,25928,25929,26009,26049,26053,26178,26185,26191,26179,26194,26188,26181,
165	26177,26360,26388,26389,26391,26657,26680,26696,26694,26707,26681,26690,26708,
166	26665,26803,26647,26700,26705,26685,26612,26704,26688,26684,26691,26666,26693,
167	26643,26648,26689,27530,27529,27575,27683,27687,27688,27686,27684,27888,28010,
168	28053,28040,28039,28006,28024,28023,27993,28051,28012,28041,28014,27994,28020,
169	28009,28044,28042,28025,28037,28005,28052,28874,28888,28900,28889,28872,28879,
170	29241,29305,29436,29433,29437,29432,29431,29574,29677,29705,29678,29664,29674,
171	29662,30036,30045,30044,30042,30041,30142,30149,30151,30130,30131,30141,30140,
172	30137,30146,30136,30347,30384,30410,30413,30414,30505,30495,30496,30504,30697,
173	30768,30759,30776,30749,30772,30775,30757,30765,30752,30751,30770,31061,31056,
174	31072,31071,31062,31070,31069,31063,31066,31204,31203,31207,31199,31206,31209,
175	31192,31364,31368,31449,31494,31505,31881,32033,32023,32011,32010,32032,32034,
176	32020,32016,32021,32026,32028,32013,32025,32027,32570,
177	32607,32660,32709,32705,32774,32792,32789,32793,32791,32829,32831,33009,33026,
178	33008,33029,33005,33012,33030,33016,33011,33032,33021,33034,33020,33007,33261,
179	33260,33280,33296,33322,33323,33320,33324,33467,33579,33618,33620,33610,33592,
180	33616,33609,33589,33588,33615,33586,33593,33590,33559,33600,33585,33576,33603,
181	34388,34442,34474,34451,34468,34473,34444,34467,34460,34928,34935,34945,34946,
182	34941,34937,35352,35344,35342,35340,35349,35338,35351,35347,35350,35343,35345,
183	35912,35962,35961,36001,36002,36215,36524,36562,36564,36559,36785,36865,36870,
184	36855,36864,36858,36852,36867,36861,36869,36856,37013,37089,37085,37090,37202,
185	37197,37196,37336,37341,37335,37340,37337,38275,38498,38499,38497,38491,38493,
186	38500,38488,38494,38587,39138,39340,39592,39640,39717,39730,39740,20094,20602,
187	20605,20572,20551,20547,20556,20570,20553,20581,20598,20558,20565,20597,20596,
188	20599,20559,20495,20591,20589,20828,20885,20976,21098,21103,21202,21209,21208,
189	21205,21264,21263,21273,21311,21312,21310,21443,26364,21830,21866,21862,21828,
190	21854,21857,21827,21834,21809,21846,21839,21845,21807,21860,21816,21806,21852,
191	21804,21859,21811,21825,21847,22280,22283,22281,22495,22533,22538,22534,22496,
192	22500,22522,22530,22581,22519,22521,22816,22882,23094,23105,23113,23142,23146,
193	23104,23100,23138,23130,23110,23114,23408,23495,23493,23492,23490,23487,23494,
194	23561,23560,23559,23648,23644,23645,23815,23814,23822,23835,23830,23842,23825,
195	23849,23828,23833,23844,23847,23831,24034,24120,24118,24115,24119,24247,24248,
196	24246,24245,24254,24373,24375,24407,24428,24425,24427,
197	24471,24473,24478,24472,24481,24480,24476,24703,24739,24713,24736,24744,24779,
198	24756,24806,24765,24773,24763,24757,24796,24764,24792,24789,24774,24799,24760,
199	24794,24775,25114,25115,25160,25504,25511,25458,25494,25506,25509,25463,25447,
200	25496,25514,25457,25513,25481,25475,25499,25451,25512,25476,25480,25497,25505,
201	25516,25490,25487,25472,25467,25449,25448,25466,25949,25942,25937,25945,25943,
202	21855,25935,25944,25941,25940,26012,26011,26028,26063,26059,26060,26062,26205,
203	26202,26212,26216,26214,26206,26361,21207,26395,26753,26799,26786,26771,26805,
204	26751,26742,26801,26791,26775,26800,26755,26820,26797,26758,26757,26772,26781,
205	26792,26783,26785,26754,27442,27578,27627,27628,27691,28046,28092,28147,28121,
206	28082,28129,28108,28132,28155,28154,28165,28103,28107,28079,28113,28078,28126,
207	28153,28088,28151,28149,28101,28114,28186,28085,28122,28139,28120,28138,28145,
208	28142,28136,28102,28100,28074,28140,28095,28134,28921,28937,28938,28925,28911,
209	29245,29309,29313,29468,29467,29462,29459,29465,29575,29701,29706,29699,29702,
210	29694,29709,29920,29942,29943,29980,29986,30053,30054,30050,30064,30095,30164,
211	30165,30133,30154,30157,30350,30420,30418,30427,30519,30526,30524,30518,30520,
212	30522,30827,30787,30798,31077,31080,31085,31227,31378,31381,31520,31528,31515,
213	31532,31526,31513,31518,31534,31890,31895,31893,32070,32067,32113,32046,32057,
214	32060,32064,32048,32051,32068,32047,32066,32050,32049,32573,32670,32666,32716,
215	32718,32722,32796,32842,32838,33071,33046,33059,33067,33065,33072,33060,33282,
216	33333,33335,33334,33337,33678,33694,33688,33656,33698,
217	33686,33725,33707,33682,33674,33683,33673,33696,33655,33659,33660,33670,33703,
218	34389,24426,34503,34496,34486,34500,34485,34502,34507,34481,34479,34505,34899,
219	34974,34952,34987,34962,34966,34957,34955,35219,35215,35370,35357,35363,35365,
220	35377,35373,35359,35355,35362,35913,35930,36009,36012,36011,36008,36010,36007,
221	36199,36198,36286,36282,36571,36575,36889,36877,36890,36887,36899,36895,36893,
222	36880,36885,36894,36896,36879,36898,36886,36891,36884,37096,37101,37117,37207,
223	37326,37365,37350,37347,37351,37357,37353,38281,38506,38517,38515,38520,38512,
224	38516,38518,38519,38508,38592,38634,38633,31456,31455,38914,38915,39770,40165,
225	40565,40575,40613,40635,20642,20621,20613,20633,20625,20608,20630,20632,20634,
226	26368,20977,21106,21108,21109,21097,21214,21213,21211,21338,21413,21883,21888,
227	21927,21884,21898,21917,21912,21890,21916,21930,21908,21895,21899,21891,21939,
228	21934,21919,21822,21938,21914,21947,21932,21937,21886,21897,21931,21913,22285,
229	22575,22570,22580,22564,22576,22577,22561,22557,22560,22777,22778,22880,23159,
230	23194,23167,23186,23195,23207,23411,23409,23506,23500,23507,23504,23562,23563,
231	23601,23884,23888,23860,23879,24061,24133,24125,24128,24131,24190,24266,24257,
232	24258,24260,24380,24429,24489,24490,24488,24785,24801,24754,24758,24800,24860,
233	24867,24826,24853,24816,24827,24820,24936,24817,24846,24822,24841,24832,24850,
234	25119,25161,25507,25484,25551,25536,25577,25545,25542,25549,25554,25571,25552,
235	25569,25558,25581,25582,25462,25588,25578,25563,25682,25562,25593,25950,25958,
236	25954,25955,26001,26000,26031,26222,26224,26228,26230,
237	26223,26257,26234,26238,26231,26366,26367,26399,26397,26874,26837,26848,26840,
238	26839,26885,26847,26869,26862,26855,26873,26834,26866,26851,26827,26829,26893,
239	26898,26894,26825,26842,26990,26875,27454,27450,27453,27544,27542,27580,27631,
240	27694,27695,27692,28207,28216,28244,28193,28210,28263,28234,28192,28197,28195,
241	28187,28251,28248,28196,28246,28270,28205,28198,28271,28212,28237,28218,28204,
242	28227,28189,28222,28363,28297,28185,28238,28259,28228,28274,28265,28255,28953,
243	28954,28966,28976,28961,28982,29038,28956,29260,29316,29312,29494,29477,29492,
244	29481,29754,29738,29747,29730,29733,29749,29750,29748,29743,29723,29734,29736,
245	29989,29990,30059,30058,30178,30171,30179,30169,30168,30174,30176,30331,30332,
246	30358,30355,30388,30428,30543,30701,30813,30828,30831,31245,31240,31243,31237,
247	31232,31384,31383,31382,31461,31459,31561,31574,31558,31568,31570,31572,31565,
248	31563,31567,31569,31903,31909,32094,32080,32104,32085,32043,32110,32114,32097,
249	32102,32098,32112,32115,21892,32724,32725,32779,32850,32901,33109,33108,33099,
250	33105,33102,33081,33094,33086,33100,33107,33140,33298,33308,33769,33795,33784,
251	33805,33760,33733,33803,33729,33775,33777,33780,33879,33802,33776,33804,33740,
252	33789,33778,33738,33848,33806,33796,33756,33799,33748,33759,34395,34527,34521,
253	34541,34516,34523,34532,34512,34526,34903,35009,35010,34993,35203,35222,35387,
254	35424,35413,35422,35388,35393,35412,35419,35408,35398,35380,35386,35382,35414,
255	35937,35970,36015,36028,36019,36029,36033,36027,36032,36020,36023,36022,36031,
256	36024,36234,36229,36225,36302,36317,36299,36314,36305,
257	36300,36315,36294,36603,36600,36604,36764,36910,36917,36913,36920,36914,36918,
258	37122,37109,37129,37118,37219,37221,37327,37396,37397,37411,37385,37406,37389,
259	37392,37383,37393,38292,38287,38283,38289,38291,38290,38286,38538,38542,38539,
260	38525,38533,38534,38541,38514,38532,38593,38597,38596,38598,38599,38639,38642,
261	38860,38917,38918,38920,39143,39146,39151,39145,39154,39149,39342,39341,40643,
262	40653,40657,20098,20653,20661,20658,20659,20677,20670,20652,20663,20667,20655,
263	20679,21119,21111,21117,21215,21222,21220,21218,21219,21295,21983,21992,21971,
264	21990,21966,21980,21959,21969,21987,21988,21999,21978,21985,21957,21958,21989,
265	21961,22290,22291,22622,22609,22616,22615,22618,22612,22635,22604,22637,22602,
266	22626,22610,22603,22887,23233,23241,23244,23230,23229,23228,23219,23234,23218,
267	23913,23919,24140,24185,24265,24264,24338,24409,24492,24494,24858,24847,24904,
268	24863,24819,24859,24825,24833,24840,24910,24908,24900,24909,24894,24884,24871,
269	24845,24838,24887,25121,25122,25619,25662,25630,25642,25645,25661,25644,25615,
270	25628,25620,25613,25654,25622,25623,25606,25964,26015,26032,26263,26249,26247,
271	26248,26262,26244,26264,26253,26371,27028,26989,26970,26999,26976,26964,26997,
272	26928,27010,26954,26984,26987,26974,26963,27001,27014,26973,26979,26971,27463,
273	27506,27584,27583,27603,27645,28322,28335,28371,28342,28354,28304,28317,28359,
274	28357,28325,28312,28348,28346,28331,28369,28310,28316,28356,28372,28330,28327,
275	28340,29006,29017,29033,29028,29001,29031,29020,29036,29030,29004,29029,29022,
276	28998,29032,29014,29242,29266,29495,29509,29503,29502,
277	29807,29786,29781,29791,29790,29761,29759,29785,29787,29788,30070,30072,30208,
278	30192,30209,30194,30193,30202,30207,30196,30195,30430,30431,30555,30571,30566,
279	30558,30563,30585,30570,30572,30556,30565,30568,30562,30702,30862,30896,30871,
280	30872,30860,30857,30844,30865,30867,30847,31098,31103,31105,33836,31165,31260,
281	31258,31264,31252,31263,31262,31391,31392,31607,31680,31584,31598,31591,31921,
282	31923,31925,32147,32121,32145,32129,32143,32091,32622,32617,32618,32626,32681,
283	32680,32676,32854,32856,32902,32900,33137,33136,33144,33125,33134,33139,33131,
284	33145,33146,33126,33285,33351,33922,33911,33853,33841,33909,33894,33899,33865,
285	33900,33883,33852,33845,33889,33891,33897,33901,33862,34398,34396,34399,34553,
286	34579,34568,34567,34560,34558,34555,34562,34563,34566,34570,34905,35039,35028,
287	35033,35036,35032,35037,35041,35018,35029,35026,35228,35299,35435,35442,35443,
288	35430,35433,35440,35463,35452,35427,35488,35441,35461,35437,35426,35438,35436,
289	35449,35451,35390,35432,35938,35978,35977,36042,36039,36040,36036,36018,36035,
290	36034,36037,36321,36319,36328,36335,36339,36346,36330,36324,36326,36530,36611,
291	36617,36606,36618,36767,36786,36939,36938,36947,36930,36948,36924,36949,36944,
292	36935,36943,36942,36941,36945,36926,36929,37138,37143,37228,37226,37225,37321,
293	37431,37463,37432,37437,37440,37438,37467,37451,37476,37457,37428,37449,37453,
294	37445,37433,37439,37466,38296,38552,38548,38549,38605,38603,38601,38602,38647,
295	38651,38649,38646,38742,38772,38774,38928,38929,38931,38922,38930,38924,39164,
296	39156,39165,39166,39347,39345,39348,39649,40169,40578,
297	40718,40723,40736,20711,20718,20709,20694,20717,20698,20693,20687,20689,20721,
298	20686,20713,20834,20979,21123,21122,21297,21421,22014,22016,22043,22039,22013,
299	22036,22022,22025,22029,22030,22007,22038,22047,22024,22032,22006,22296,22294,
300	22645,22654,22659,22675,22666,22649,22661,22653,22781,22821,22818,22820,22890,
301	22889,23265,23270,23273,23255,23254,23256,23267,23413,23518,23527,23521,23525,
302	23526,23528,23522,23524,23519,23565,23650,23940,23943,24155,24163,24149,24151,
303	24148,24275,24278,24330,24390,24432,24505,24903,24895,24907,24951,24930,24931,
304	24927,24922,24920,24949,25130,25735,25688,25684,25764,25720,25695,25722,25681,
305	25703,25652,25709,25723,25970,26017,26071,26070,26274,26280,26269,27036,27048,
306	27029,27073,27054,27091,27083,27035,27063,27067,27051,27060,27088,27085,27053,
307	27084,27046,27075,27043,27465,27468,27699,28467,28436,28414,28435,28404,28457,
308	28478,28448,28460,28431,28418,28450,28415,28399,28422,28465,28472,28466,28451,
309	28437,28459,28463,28552,28458,28396,28417,28402,28364,28407,29076,29081,29053,
310	29066,29060,29074,29246,29330,29334,29508,29520,29796,29795,29802,29808,29805,
311	29956,30097,30247,30221,30219,30217,30227,30433,30435,30596,30589,30591,30561,
312	30913,30879,30887,30899,30889,30883,31118,31119,31117,31278,31281,31402,31401,
313	31469,31471,31649,31637,31627,31605,31639,31645,31636,31631,31672,31623,31620,
314	31929,31933,31934,32187,32176,32156,32189,32190,32160,32202,32180,32178,32177,
315	32186,32162,32191,32181,32184,32173,32210,32199,32172,32624,32736,32737,32735,
316	32862,32858,32903,33104,33152,33167,33160,33162,33151,
317	33154,33255,33274,33287,33300,33310,33355,33993,33983,33990,33988,33945,33950,
318	33970,33948,33995,33976,33984,34003,33936,33980,34001,33994,34623,34588,34619,
319	34594,34597,34612,34584,34645,34615,34601,35059,35074,35060,35065,35064,35069,
320	35048,35098,35055,35494,35468,35486,35491,35469,35489,35475,35492,35498,35493,
321	35496,35480,35473,35482,35495,35946,35981,35980,36051,36049,36050,36203,36249,
322	36245,36348,36628,36626,36629,36627,36771,36960,36952,36956,36963,36953,36958,
323	36962,36957,36955,37145,37144,37150,37237,37240,37239,37236,37496,37504,37509,
324	37528,37526,37499,37523,37532,37544,37500,37521,38305,38312,38313,38307,38309,
325	38308,38553,38556,38555,38604,38610,38656,38780,38789,38902,38935,38936,39087,
326	39089,39171,39173,39180,39177,39361,39599,39600,39654,39745,39746,40180,40182,
327	40179,40636,40763,40778,20740,20736,20731,20725,20729,20738,20744,20745,20741,
328	20956,21127,21128,21129,21133,21130,21232,21426,22062,22075,22073,22066,22079,
329	22068,22057,22099,22094,22103,22132,22070,22063,22064,22656,22687,22686,22707,
330	22684,22702,22697,22694,22893,23305,23291,23307,23285,23308,23304,23534,23532,
331	23529,23531,23652,23653,23965,23956,24162,24159,24161,24290,24282,24287,24285,
332	24291,24288,24392,24433,24503,24501,24950,24935,24942,24925,24917,24962,24956,
333	24944,24939,24958,24999,24976,25003,24974,25004,24986,24996,24980,25006,25134,
334	25705,25711,25721,25758,25778,25736,25744,25776,25765,25747,25749,25769,25746,
335	25774,25773,25771,25754,25772,25753,25762,25779,25973,25975,25976,26286,26283,
336	26292,26289,27171,27167,27112,27137,27166,27161,27133,
337	27169,27155,27146,27123,27138,27141,27117,27153,27472,27470,27556,27589,27590,
338	28479,28540,28548,28497,28518,28500,28550,28525,28507,28536,28526,28558,28538,
339	28528,28516,28567,28504,28373,28527,28512,28511,29087,29100,29105,29096,29270,
340	29339,29518,29527,29801,29835,29827,29822,29824,30079,30240,30249,30239,30244,
341	30246,30241,30242,30362,30394,30436,30606,30599,30604,30609,30603,30923,30917,
342	30906,30922,30910,30933,30908,30928,31295,31292,31296,31293,31287,31291,31407,
343	31406,31661,31665,31684,31668,31686,31687,31681,31648,31692,31946,32224,32244,
344	32239,32251,32216,32236,32221,32232,32227,32218,32222,32233,32158,32217,32242,
345	32249,32629,32631,32687,32745,32806,33179,33180,33181,33184,33178,33176,34071,
346	34109,34074,34030,34092,34093,34067,34065,34083,34081,34068,34028,34085,34047,
347	34054,34690,34676,34678,34656,34662,34680,34664,34649,34647,34636,34643,34907,
348	34909,35088,35079,35090,35091,35093,35082,35516,35538,35527,35524,35477,35531,
349	35576,35506,35529,35522,35519,35504,35542,35533,35510,35513,35547,35916,35918,
350	35948,36064,36062,36070,36068,36076,36077,36066,36067,36060,36074,36065,36205,
351	36255,36259,36395,36368,36381,36386,36367,36393,36383,36385,36382,36538,36637,
352	36635,36639,36649,36646,36650,36636,36638,36645,36969,36974,36968,36973,36983,
353	37168,37165,37159,37169,37255,37257,37259,37251,37573,37563,37559,37610,37548,
354	37604,37569,37555,37564,37586,37575,37616,37554,38317,38321,38660,38662,38663,
355	38665,38752,38797,38795,38799,38945,38955,38940,39091,39178,39187,39186,39192,
356	39389,39376,39391,39387,39377,39381,39378,39385,39607,
357	39662,39663,39719,39749,39748,39799,39791,40198,40201,40195,40617,40638,40654,
358	22696,40786,20754,20760,20756,20752,20757,20864,20906,20957,21137,21139,21235,
359	22105,22123,22137,22121,22116,22136,22122,22120,22117,22129,22127,22124,22114,
360	22134,22721,22718,22727,22725,22894,23325,23348,23416,23536,23566,24394,25010,
361	24977,25001,24970,25037,25014,25022,25034,25032,25136,25797,25793,25803,25787,
362	25788,25818,25796,25799,25794,25805,25791,25810,25812,25790,25972,26310,26313,
363	26297,26308,26311,26296,27197,27192,27194,27225,27243,27224,27193,27204,27234,
364	27233,27211,27207,27189,27231,27208,27481,27511,27653,28610,28593,28577,28611,
365	28580,28609,28583,28595,28608,28601,28598,28582,28576,28596,29118,29129,29136,
366	29138,29128,29141,29113,29134,29145,29148,29123,29124,29544,29852,29859,29848,
367	29855,29854,29922,29964,29965,30260,30264,30266,30439,30437,30624,30622,30623,
368	30629,30952,30938,30956,30951,31142,31309,31310,31302,31308,31307,31418,31705,
369	31761,31689,31716,31707,31713,31721,31718,31957,31958,32266,32273,32264,32283,
370	32291,32286,32285,32265,32272,32633,32690,32752,32753,32750,32808,33203,33193,
371	33192,33275,33288,33368,33369,34122,34137,34120,34152,34153,34115,34121,34157,
372	34154,34142,34691,34719,34718,34722,34701,34913,35114,35122,35109,35115,35105,
373	35242,35238,35558,35578,35563,35569,35584,35548,35559,35566,35582,35585,35586,
374	35575,35565,35571,35574,35580,35947,35949,35987,36084,36420,36401,36404,36418,
375	36409,36405,36667,36655,36664,36659,36776,36774,36981,36980,36984,36978,36988,
376	36986,37172,37266,37664,37686,37624,37683,37679,37666,
377	37628,37675,37636,37658,37648,37670,37665,37653,37678,37657,38331,38567,38568,
378	38570,38613,38670,38673,38678,38669,38675,38671,38747,38748,38758,38808,38960,
379	38968,38971,38967,38957,38969,38948,39184,39208,39198,39195,39201,39194,39405,
380	39394,39409,39608,39612,39675,39661,39720,39825,40213,40227,40230,40232,40210,
381	40219,40664,40660,40845,40860,20778,20767,20769,20786,21237,22158,22144,22160,
382	22149,22151,22159,22741,22739,22737,22734,23344,23338,23332,23418,23607,23656,
383	23996,23994,23997,23992,24171,24396,24509,25033,25026,25031,25062,25035,25138,
384	25140,25806,25802,25816,25824,25840,25830,25836,25841,25826,25837,25986,25987,
385	26329,26326,27264,27284,27268,27298,27292,27355,27299,27262,27287,27280,27296,
386	27484,27566,27610,27656,28632,28657,28639,28640,28635,28644,28651,28655,28544,
387	28652,28641,28649,28629,28654,28656,29159,29151,29166,29158,29157,29165,29164,
388	29172,29152,29237,29254,29552,29554,29865,29872,29862,29864,30278,30274,30284,
389	30442,30643,30634,30640,30636,30631,30637,30703,30967,30970,30964,30959,30977,
390	31143,31146,31319,31423,31751,31757,31742,31735,31756,31712,31968,31964,31966,
391	31970,31967,31961,31965,32302,32318,32326,32311,32306,32323,32299,32317,32305,
392	32325,32321,32308,32313,32328,32309,32319,32303,32580,32755,32764,32881,32882,
393	32880,32879,32883,33222,33219,33210,33218,33216,33215,33213,33225,33214,33256,
394	33289,33393,34218,34180,34174,34204,34193,34196,34223,34203,34183,34216,34186,
395	34407,34752,34769,34739,34770,34758,34731,34747,34746,34760,34763,35131,35126,
396	35140,35128,35133,35244,35598,35607,35609,35611,35594,
397	35616,35613,35588,35600,35905,35903,35955,36090,36093,36092,36088,36091,36264,
398	36425,36427,36424,36426,36676,36670,36674,36677,36671,36991,36989,36996,36993,
399	36994,36992,37177,37283,37278,37276,37709,37762,37672,37749,37706,37733,37707,
400	37656,37758,37740,37723,37744,37722,37716,38346,38347,38348,38344,38342,38577,
401	38584,38614,38684,38686,38816,38867,38982,39094,39221,39425,39423,39854,39851,
402	39850,39853,40251,40255,40587,40655,40670,40668,40669,40667,40766,40779,21474,
403	22165,22190,22745,22744,23352,24413,25059,25139,25844,25842,25854,25862,25850,
404	25851,25847,26039,26332,26406,27315,27308,27331,27323,27320,27330,27310,27311,
405	27487,27512,27567,28681,28683,28670,28678,28666,28689,28687,29179,29180,29182,
406	29176,29559,29557,29863,29887,29973,30294,30296,30290,30653,30655,30651,30652,
407	30990,31150,31329,31330,31328,31428,31429,31787,31783,31786,31774,31779,31777,
408	31975,32340,32341,32350,32346,32353,32338,32345,32584,32761,32763,32887,32886,
409	33229,33231,33290,34255,34217,34253,34256,34249,34224,34234,34233,34214,34799,
410	34796,34802,34784,35206,35250,35316,35624,35641,35628,35627,35920,36101,36441,
411	36451,36454,36452,36447,36437,36544,36681,36685,36999,36995,37000,37291,37292,
412	37328,37780,37770,37782,37794,37811,37806,37804,37808,37784,37786,37783,38356,
413	38358,38352,38357,38626,38620,38617,38619,38622,38692,38819,38822,38829,38905,
414	38989,38991,38988,38990,38995,39098,39230,39231,39229,39214,39333,39438,39617,
415	39683,39686,39759,39758,39757,39882,39881,39933,39880,39872,40273,40285,40288,
416	40672,40725,40748,20787,22181,22750,22751,22754,23541,
417	40848,24300,25074,25079,25078,25077,25856,25871,26336,26333,27365,27357,27354,
418	27347,28699,28703,28712,28698,28701,28693,28696,29190,29197,29272,29346,29560,
419	29562,29885,29898,29923,30087,30086,30303,30305,30663,31001,31153,31339,31337,
420	31806,31807,31800,31805,31799,31808,32363,32365,32377,32361,32362,32645,32371,
421	32694,32697,32696,33240,34281,34269,34282,34261,34276,34277,34295,34811,34821,
422	34829,34809,34814,35168,35167,35158,35166,35649,35676,35672,35657,35674,35662,
423	35663,35654,35673,36104,36106,36476,36466,36487,36470,36460,36474,36468,36692,
424	36686,36781,37002,37003,37297,37294,37857,37841,37855,37827,37832,37852,37853,
425	37846,37858,37837,37848,37860,37847,37864,38364,38580,38627,38698,38695,38753,
426	38876,38907,39006,39000,39003,39100,39237,39241,39446,39449,39693,39912,39911,
427	39894,39899,40329,40289,40306,40298,40300,40594,40599,40595,40628,21240,22184,
428	22199,22198,22196,22204,22756,23360,23363,23421,23542,24009,25080,25082,25880,
429	25876,25881,26342,26407,27372,28734,28720,28722,29200,29563,29903,30306,30309,
430	31014,31018,31020,31019,31431,31478,31820,31811,31821,31983,31984,36782,32381,
431	32380,32386,32588,32768,33242,33382,34299,34297,34321,34298,34310,34315,34311,
432	34314,34836,34837,35172,35258,35320,35696,35692,35686,35695,35679,35691,36111,
433	36109,36489,36481,36485,36482,37300,37323,37912,37891,37885,38369,38704,39108,
434	39250,39249,39336,39467,39472,39479,39477,39955,39949,40569,40629,40680,40751,
435	40799,40803,40801,20791,20792,22209,22208,22210,22804,23660,24013,25084,25086,
436	25885,25884,26005,26345,27387,27396,27386,27570,28748,
437	29211,29351,29910,29908,30313,30675,31824,32399,32396,32700,34327,34349,34330,
438	34851,34850,34849,34847,35178,35180,35261,35700,35703,35709,36115,36490,36493,
439	36491,36703,36783,37306,37934,37939,37941,37946,37944,37938,37931,38370,38712,
440	38713,38706,38911,39015,39013,39255,39493,39491,39488,39486,39631,39764,39761,
441	39981,39973,40367,40372,40386,40376,40605,40687,40729,40796,40806,40807,20796,
442	20795,22216,22218,22217,23423,24020,24018,24398,25087,25892,27402,27489,28753,
443	28760,29568,29924,30090,30318,30316,31155,31840,31839,32894,32893,33247,35186,
444	35183,35324,35712,36118,36119,36497,36499,36705,37192,37956,37969,37970,38717,
445	38718,38851,38849,39019,39253,39509,39501,39634,39706,40009,39985,39998,39995,
446	40403,40407,40756,40812,40810,40852,22220,24022,25088,25891,25899,25898,26348,
447	27408,29914,31434,31844,31843,31845,32403,32406,32404,33250,34360,34367,34865,
448	35722,37008,37007,37987,37984,37988,38760,39023,39260,39514,39515,39511,39635,
449	39636,39633,40020,40023,40022,40421,40607,40692,22225,22761,25900,28766,30321,
450	30322,30679,32592,32648,34870,34873,34914,35731,35730,35734,33399,36123,37312,
451	37994,38722,38728,38724,38854,39024,39519,39714,39768,40031,40441,40442,40572,
452	40573,40711,40823,40818,24307,27414,28771,31852,31854,34875,35264,36513,37313,
453	38002,38000,39025,39262,39638,39715,40652,28772,30682,35738,38007,38857,39522,
454	39525,32412,35740,36522,37317,38013,38014,38012,40055,40056,40695,35924,38015,
455	40474,29224,39530,39729,40475,40478,31858,9312,9313,9314,9315,9316,9317,9318,
456	9319,9320,9321,9332,9333,9334,9335,9336,
457	9337,9338,9339,9340,9341,8560,8561,8562,8563,8564,8565,8566,8567,8568,8569,
458	20022,20031,20101,20128,20866,20886,20907,21241,21304,21353,21430,22794,23424,
459	24027,24186,24191,24308,24400,24417,25908,26080,30098,30326,36789,38582,168,
460	710,12541,12542,12445,12446,0,0,12293,12294,12295,12540,65339,65341,10045,
461	12353,12354,12355,12356,12357,12358,12359,12360,12361,12362,12363,12364,12365,
462	12366,12367,12368,12369,12370,12371,12372,12373,12374,12375,12376,12377,12378,
463	12379,12380,12381,12382,12383,12384,12385,12386,12387,12388,12389,12390,12391,
464	12392,12393,12394,12395,12396,12397,12398,12399,12400,12401,12402,12403,12404,
465	12405,12406,12407,12408,12409,12410,12411,12412,12413,12414,12415,12416,12417,
466	12418,12419,12420,12421,12422,12423,12424,12425,12426,12427,12428,12429,12430,
467	12431,12432,12433,12434,12435,12449,12450,12451,12452,12453,12454,12455,12456,
468	12457,12458,12459,12460,12461,12462,12463,12464,12465,12466,12467,12468,12469,
469	12470,12471,12472,12473,12474,12475,12476,12477,12478,12479,12480,12481,12482,
470	12483,12484,12485,12486,12487,12488,12489,12490,12491,12492,12493,12494,12495,
471	12496,12497,12498,12499,12500,12501,12502,12503,12504,12505,12506,12507,12508,
472	12509,12510,12511,12512,12513,12514,12515,12516,12517,12518,12519,12520,12521,
473	12522,12523,12524,12525,12526,12527,12528,12529,12530,12531,12532,12533,12534,
474	1040,1041,1042,1043,1044,1045,1025,1046,1047,1048,1049,1050,1051,1052,1053,
475	1054,1055,1056,1057,1058,1059,1060,1061,1062,1063,1064,1065,1066,1067,1068,
476	1069,1070,
477	1071,1072,1073,1074,1075,1076,1077,1105,1078,1079,1080,1081,1082,1083,1084,
478	1085,1086,1087,1088,1089,1090,1091,1092,1093,1094,1095,1096,1097,1098,1099,
479	1100,1101,1102,1103,8679,8632,8633,12751,204,20058,138,20994,17553,40880,
480	20872,40881,30215,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
481	0,0,0,0,0,0,0,0,0,0,65506,65508,65287,65282,12849,8470,8481,12443,12444,11904,
482	11908,11910,11911,11912,11914,11916,11917,11925,11932,11933,11941,11943,11946,
483	11948,11950,11958,11964,11966,11974,11978,11980,11981,11983,11990,11991,11998,
484	12003,0,0,0,643,592,603,596,629,339,248,331,650,618,20034,20060,20981,21274,
485	21378,19975,19980,20039,20109,22231,64012,23662,24435,19983,20871,19982,20014,
486	20115,20162,20169,20168,20888,21244,21356,21433,22304,22787,22828,23568,24063,
487	26081,27571,27596,27668,29247,20017,20028,20200,20188,20201,20193,20189,20186,
488	21004,21276,21324,22306,22307,22807,22831,23425,23428,23570,23611,23668,23667,
489	24068,24192,24194,24521,25097,25168,27669,27702,27715,27711,27707,29358,29360,
490	29578,31160,32906,38430,20238,20248,20268,20213,20244,20209,20224,20215,20232,
491	20253,20226,20229,20258,20243,20228,20212,20242,20913,21011,21001,21008,21158,
492	21282,21279,21325,21386,21511,22241,22239,22318,22314,22324,22844,22912,22908,
493	22917,22907,22910,22903,22911,23382,23573,23589,23676,23674,23675,
494	23678,24031,24181,24196,24322,24346,24436,24533,24532,24527,25180,25182,25188,
495	25185,25190,25186,25177,25184,25178,25189,26095,26094,26430,26425,26424,26427,
496	26426,26431,26428,26419,27672,27718,27730,27740,27727,27722,27732,27723,27724,
497	28785,29278,29364,29365,29582,29994,30335,31349,32593,33400,33404,33408,33405,
498	33407,34381,35198,37017,37015,37016,37019,37012,38434,38436,38432,38435,20310,
499	20283,20322,20297,20307,20324,20286,20327,20306,20319,20289,20312,20269,20275,
500	20287,20321,20879,20921,21020,21022,21025,21165,21166,21257,21347,21362,21390,
501	21391,21552,21559,21546,21588,21573,21529,21532,21541,21528,21565,21583,21569,
502	21544,21540,21575,22254,22247,22245,22337,22341,22348,22345,22347,22354,22790,
503	22848,22950,22936,22944,22935,22926,22946,22928,22927,22951,22945,23438,23442,
504	23592,23594,23693,23695,23688,23691,23689,23698,23690,23686,23699,23701,24032,
505	24074,24078,24203,24201,24204,24200,24205,24325,24349,24440,24438,24530,24529,
506	24528,24557,24552,24558,24563,24545,24548,24547,24570,24559,24567,24571,24576,
507	24564,25146,25219,25228,25230,25231,25236,25223,25201,25211,25210,25200,25217,
508	25224,25207,25213,25202,25204,25911,26096,26100,26099,26098,26101,26437,26439,
509	26457,26453,26444,26440,26461,26445,26458,26443,27600,27673,27674,27768,27751,
510	27755,27780,27787,27791,27761,27759,27753,27802,27757,27783,27797,27804,27750,
511	27763,27749,27771,27790,28788,28794,29283,29375,29373,29379,29382,29377,29370,
512	29381,29589,29591,29587,29588,29586,30010,30009,30100,30101,30337,31037,32820,
513	32917,32921,32912,32914,32924,33424,33423,33413,33422,
514	33425,33427,33418,33411,33412,35960,36809,36799,37023,37025,37029,37022,37031,
515	37024,38448,38440,38447,38445,20019,20376,20348,20357,20349,20352,20359,20342,
516	20340,20361,20356,20343,20300,20375,20330,20378,20345,20353,20344,20368,20380,
517	20372,20382,20370,20354,20373,20331,20334,20894,20924,20926,21045,21042,21043,
518	21062,21041,21180,21258,21259,21308,21394,21396,21639,21631,21633,21649,21634,
519	21640,21611,21626,21630,21605,21612,21620,21606,21645,21615,21601,21600,21656,
520	21603,21607,21604,22263,22265,22383,22386,22381,22379,22385,22384,22390,22400,
521	22389,22395,22387,22388,22370,22376,22397,22796,22853,22965,22970,22991,22990,
522	22962,22988,22977,22966,22972,22979,22998,22961,22973,22976,22984,22964,22983,
523	23394,23397,23443,23445,23620,23623,23726,23716,23712,23733,23727,23720,23724,
524	23711,23715,23725,23714,23722,23719,23709,23717,23734,23728,23718,24087,24084,
525	24089,24360,24354,24355,24356,24404,24450,24446,24445,24542,24549,24621,24614,
526	24601,24626,24587,24628,24586,24599,24627,24602,24606,24620,24610,24589,24592,
527	24622,24595,24593,24588,24585,24604,25108,25149,25261,25268,25297,25278,25258,
528	25270,25290,25262,25267,25263,25275,25257,25264,25272,25917,26024,26043,26121,
529	26108,26116,26130,26120,26107,26115,26123,26125,26117,26109,26129,26128,26358,
530	26378,26501,26476,26510,26514,26486,26491,26520,26502,26500,26484,26509,26508,
531	26490,26527,26513,26521,26499,26493,26497,26488,26489,26516,27429,27520,27518,
532	27614,27677,27795,27884,27883,27886,27865,27830,27860,27821,27879,27831,27856,
533	27842,27834,27843,27846,27885,27890,27858,27869,27828,
534	27786,27805,27776,27870,27840,27952,27853,27847,27824,27897,27855,27881,27857,
535	28820,28824,28805,28819,28806,28804,28817,28822,28802,28826,28803,29290,29398,
536	29387,29400,29385,29404,29394,29396,29402,29388,29393,29604,29601,29613,29606,
537	29602,29600,29612,29597,29917,29928,30015,30016,30014,30092,30104,30383,30451,
538	30449,30448,30453,30712,30716,30713,30715,30714,30711,31042,31039,31173,31352,
539	31355,31483,31861,31997,32821,32911,32942,32931,32952,32949,32941,33312,33440,
540	33472,33451,33434,33432,33435,33461,33447,33454,33468,33438,33466,33460,33448,
541	33441,33449,33474,33444,33475,33462,33442,34416,34415,34413,34414,35926,36818,
542	36811,36819,36813,36822,36821,36823,37042,37044,37039,37043,37040,38457,38461,
543	38460,38458,38467,20429,20421,20435,20402,20425,20427,20417,20436,20444,20441,
544	20411,20403,20443,20423,20438,20410,20416,20409,20460,21060,21065,21184,21186,
545	21309,21372,21399,21398,21401,21400,21690,21665,21677,21669,21711,21699,33549,
546	21687,21678,21718,21686,21701,21702,21664,21616,21692,21666,21694,21618,21726,
547	21680,22453,22430,22431,22436,22412,22423,22429,22427,22420,22424,22415,22425,
548	22437,22426,22421,22772,22797,22867,23009,23006,23022,23040,23025,23005,23034,
549	23037,23036,23030,23012,23026,23031,23003,23017,23027,23029,23008,23038,23028,
550	23021,23464,23628,23760,23768,23756,23767,23755,23771,23774,23770,23753,23751,
551	23754,23766,23763,23764,23759,23752,23750,23758,23775,23800,24057,24097,24098,
552	24099,24096,24100,24240,24228,24226,24219,24227,24229,24327,24366,24406,24454,
553	24631,24633,24660,24690,24670,24645,24659,24647,24649,
554	24667,24652,24640,24642,24671,24612,24644,24664,24678,24686,25154,25155,25295,
555	25357,25355,25333,25358,25347,25323,25337,25359,25356,25336,25334,25344,25363,
556	25364,25338,25365,25339,25328,25921,25923,26026,26047,26166,26145,26162,26165,
557	26140,26150,26146,26163,26155,26170,26141,26164,26169,26158,26383,26384,26561,
558	26610,26568,26554,26588,26555,26616,26584,26560,26551,26565,26603,26596,26591,
559	26549,26573,26547,26615,26614,26606,26595,26562,26553,26574,26599,26608,26546,
560	26620,26566,26605,26572,26542,26598,26587,26618,26569,26570,26563,26602,26571,
561	27432,27522,27524,27574,27606,27608,27616,27680,27681,27944,27956,27949,27935,
562	27964,27967,27922,27914,27866,27955,27908,27929,27962,27930,27921,27904,27933,
563	27970,27905,27928,27959,27907,27919,27968,27911,27936,27948,27912,27938,27913,
564	27920,28855,28831,28862,28849,28848,28833,28852,28853,28841,29249,29257,29258,
565	29292,29296,29299,29294,29386,29412,29416,29419,29407,29418,29414,29411,29573,
566	29644,29634,29640,29637,29625,29622,29621,29620,29675,29631,29639,29630,29635,
567	29638,29624,29643,29932,29934,29998,30023,30024,30119,30122,30329,30404,30472,
568	30467,30468,30469,30474,30455,30459,30458,30695,30696,30726,30737,30738,30725,
569	30736,30735,30734,30729,30723,30739,31050,31052,31051,31045,31044,31189,31181,
570	31183,31190,31182,31360,31358,31441,31488,31489,31866,31864,31865,31871,31872,
571	31873,32003,32008,32001,32600,32657,32653,32702,32775,32782,32783,32788,32823,
572	32984,32967,32992,32977,32968,32962,32976,32965,32995,32985,32988,32970,32981,
573	32969,32975,32983,32998,32973,33279,33313,33428,33497,
574	33534,33529,33543,33512,33536,33493,33594,33515,33494,33524,33516,33505,33522,
575	33525,33548,33531,33526,33520,33514,33508,33504,33530,33523,33517,34423,34420,
576	34428,34419,34881,34894,34919,34922,34921,35283,35332,35335,36210,36835,36833,
577	36846,36832,37105,37053,37055,37077,37061,37054,37063,37067,37064,37332,37331,
578	38484,38479,38481,38483,38474,38478,20510,20485,20487,20499,20514,20528,20507,
579	20469,20468,20531,20535,20524,20470,20471,20503,20508,20512,20519,20533,20527,
580	20529,20494,20826,20884,20883,20938,20932,20933,20936,20942,21089,21082,21074,
581	21086,21087,21077,21090,21197,21262,21406,21798,21730,21783,21778,21735,21747,
582	21732,21786,21759,21764,21768,21739,21777,21765,21745,21770,21755,21751,21752,
583	21728,21774,21763,21771,22273,22274,22476,22578,22485,22482,22458,22470,22461,
584	22460,22456,22454,22463,22471,22480,22457,22465,22798,22858,23065,23062,23085,
585	23086,23061,23055,23063,23050,23070,23091,23404,23463,23469,23468,23555,23638,
586	23636,23788,23807,23790,23793,23799,23808,23801,24105,24104,24232,24238,24234,
587	24236,24371,24368,24423,24669,24666,24679,24641,24738,24712,24704,24722,24705,
588	24733,24707,24725,24731,24727,24711,24732,24718,25113,25158,25330,25360,25430,
589	25388,25412,25413,25398,25411,25572,25401,25419,25418,25404,25385,25409,25396,
590	25432,25428,25433,25389,25415,25395,25434,25425,25400,25431,25408,25416,25930,
591	25926,26054,26051,26052,26050,26186,26207,26183,26193,26386,26387,26655,26650,
592	26697,26674,26675,26683,26699,26703,26646,26673,26652,26677,26667,26669,26671,
593	26702,26692,26676,26653,26642,26644,26662,26664,26670,
594	26701,26682,26661,26656,27436,27439,27437,27441,27444,27501,32898,27528,27622,
595	27620,27624,27619,27618,27623,27685,28026,28003,28004,28022,27917,28001,28050,
596	27992,28002,28013,28015,28049,28045,28143,28031,28038,27998,28007,28000,28055,
597	28016,28028,27999,28034,28056,27951,28008,28043,28030,28032,28036,27926,28035,
598	28027,28029,28021,28048,28892,28883,28881,28893,28875,32569,28898,28887,28882,
599	28894,28896,28884,28877,28869,28870,28871,28890,28878,28897,29250,29304,29303,
600	29302,29440,29434,29428,29438,29430,29427,29435,29441,29651,29657,29669,29654,
601	29628,29671,29667,29673,29660,29650,29659,29652,29661,29658,29655,29656,29672,
602	29918,29919,29940,29941,29985,30043,30047,30128,30145,30139,30148,30144,30143,
603	30134,30138,30346,30409,30493,30491,30480,30483,30482,30499,30481,30485,30489,
604	30490,30498,30503,30755,30764,30754,30773,30767,30760,30766,30763,30753,30761,
605	30771,30762,30769,31060,31067,31055,31068,31059,31058,31057,31211,31212,31200,
606	31214,31213,31210,31196,31198,31197,31366,31369,31365,31371,31372,31370,31367,
607	31448,31504,31492,31507,31493,31503,31496,31498,31502,31497,31506,31876,31889,
608	31882,31884,31880,31885,31877,32030,32029,32017,32014,32024,32022,32019,32031,
609	32018,32015,32012,32604,32609,32606,32608,32605,32603,32662,32658,32707,32706,
610	32704,32790,32830,32825,33018,33010,33017,33013,33025,33019,33024,33281,33327,
611	33317,33587,33581,33604,33561,33617,33573,33622,33599,33601,33574,33564,33570,
612	33602,33614,33563,33578,33544,33596,33613,33558,33572,33568,33591,33583,33577,
613	33607,33605,33612,33619,33566,33580,33611,33575,33608,
614	34387,34386,34466,34472,34454,34445,34449,34462,34439,34455,34438,34443,34458,
615	34437,34469,34457,34465,34471,34453,34456,34446,34461,34448,34452,34883,34884,
616	34925,34933,34934,34930,34944,34929,34943,34927,34947,34942,34932,34940,35346,
617	35911,35927,35963,36004,36003,36214,36216,36277,36279,36278,36561,36563,36862,
618	36853,36866,36863,36859,36868,36860,36854,37078,37088,37081,37082,37091,37087,
619	37093,37080,37083,37079,37084,37092,37200,37198,37199,37333,37346,37338,38492,
620	38495,38588,39139,39647,39727,20095,20592,20586,20577,20574,20576,20563,20555,
621	20573,20594,20552,20557,20545,20571,20554,20578,20501,20549,20575,20585,20587,
622	20579,20580,20550,20544,20590,20595,20567,20561,20944,21099,21101,21100,21102,
623	21206,21203,21293,21404,21877,21878,21820,21837,21840,21812,21802,21841,21858,
624	21814,21813,21808,21842,21829,21772,21810,21861,21838,21817,21832,21805,21819,
625	21824,21835,22282,22279,22523,22548,22498,22518,22492,22516,22528,22509,22525,
626	22536,22520,22539,22515,22479,22535,22510,22499,22514,22501,22508,22497,22542,
627	22524,22544,22503,22529,22540,22513,22505,22512,22541,22532,22876,23136,23128,
628	23125,23143,23134,23096,23093,23149,23120,23135,23141,23148,23123,23140,23127,
629	23107,23133,23122,23108,23131,23112,23182,23102,23117,23097,23116,23152,23145,
630	23111,23121,23126,23106,23132,23410,23406,23489,23488,23641,23838,23819,23837,
631	23834,23840,23820,23848,23821,23846,23845,23823,23856,23826,23843,23839,23854,
632	24126,24116,24241,24244,24249,24242,24243,24374,24376,24475,24470,24479,24714,
633	24720,24710,24766,24752,24762,24787,24788,24783,24804,
634	24793,24797,24776,24753,24795,24759,24778,24767,24771,24781,24768,25394,25445,
635	25482,25474,25469,25533,25502,25517,25501,25495,25515,25486,25455,25479,25488,
636	25454,25519,25461,25500,25453,25518,25468,25508,25403,25503,25464,25477,25473,
637	25489,25485,25456,25939,26061,26213,26209,26203,26201,26204,26210,26392,26745,
638	26759,26768,26780,26733,26734,26798,26795,26966,26735,26787,26796,26793,26741,
639	26740,26802,26767,26743,26770,26748,26731,26738,26794,26752,26737,26750,26779,
640	26774,26763,26784,26761,26788,26744,26747,26769,26764,26762,26749,27446,27443,
641	27447,27448,27537,27535,27533,27534,27532,27690,28096,28075,28084,28083,28276,
642	28076,28137,28130,28087,28150,28116,28160,28104,28128,28127,28118,28094,28133,
643	28124,28125,28123,28148,28106,28093,28141,28144,28090,28117,28098,28111,28105,
644	28112,28146,28115,28157,28119,28109,28131,28091,28922,28941,28919,28951,28916,
645	28940,28912,28932,28915,28944,28924,28927,28934,28947,28928,28920,28918,28939,
646	28930,28942,29310,29307,29308,29311,29469,29463,29447,29457,29464,29450,29448,
647	29439,29455,29470,29576,29686,29688,29685,29700,29697,29693,29703,29696,29690,
648	29692,29695,29708,29707,29684,29704,30052,30051,30158,30162,30159,30155,30156,
649	30161,30160,30351,30345,30419,30521,30511,30509,30513,30514,30516,30515,30525,
650	30501,30523,30517,30792,30802,30793,30797,30794,30796,30758,30789,30800,31076,
651	31079,31081,31082,31075,31083,31073,31163,31226,31224,31222,31223,31375,31380,
652	31376,31541,31559,31540,31525,31536,31522,31524,31539,31512,31530,31517,31537,
653	31531,31533,31535,31538,31544,31514,31523,31892,31896,
654	31894,31907,32053,32061,32056,32054,32058,32069,32044,32041,32065,32071,32062,
655	32063,32074,32059,32040,32611,32661,32668,32669,32667,32714,32715,32717,32720,
656	32721,32711,32719,32713,32799,32798,32795,32839,32835,32840,33048,33061,33049,
657	33051,33069,33055,33068,33054,33057,33045,33063,33053,33058,33297,33336,33331,
658	33338,33332,33330,33396,33680,33699,33704,33677,33658,33651,33700,33652,33679,
659	33665,33685,33689,33653,33684,33705,33661,33667,33676,33693,33691,33706,33675,
660	33662,33701,33711,33672,33687,33712,33663,33702,33671,33710,33654,33690,34393,
661	34390,34495,34487,34498,34497,34501,34490,34480,34504,34489,34483,34488,34508,
662	34484,34491,34492,34499,34493,34494,34898,34953,34965,34984,34978,34986,34970,
663	34961,34977,34975,34968,34983,34969,34971,34967,34980,34988,34956,34963,34958,
664	35202,35286,35289,35285,35376,35367,35372,35358,35897,35899,35932,35933,35965,
665	36005,36221,36219,36217,36284,36290,36281,36287,36289,36568,36574,36573,36572,
666	36567,36576,36577,36900,36875,36881,36892,36876,36897,37103,37098,37104,37108,
667	37106,37107,37076,37099,37100,37097,37206,37208,37210,37203,37205,37356,37364,
668	37361,37363,37368,37348,37369,37354,37355,37367,37352,37358,38266,38278,38280,
669	38524,38509,38507,38513,38511,38591,38762,38916,39141,39319,20635,20629,20628,
670	20638,20619,20643,20611,20620,20622,20637,20584,20636,20626,20610,20615,20831,
671	20948,21266,21265,21412,21415,21905,21928,21925,21933,21879,22085,21922,21907,
672	21896,21903,21941,21889,21923,21906,21924,21885,21900,21926,21887,21909,21921,
673	21902,22284,22569,22583,22553,22558,22567,22563,22568,
674	22517,22600,22565,22556,22555,22579,22591,22582,22574,22585,22584,22573,22572,
675	22587,22881,23215,23188,23199,23162,23202,23198,23160,23206,23164,23205,23212,
676	23189,23214,23095,23172,23178,23191,23171,23179,23209,23163,23165,23180,23196,
677	23183,23187,23197,23530,23501,23499,23508,23505,23498,23502,23564,23600,23863,
678	23875,23915,23873,23883,23871,23861,23889,23886,23893,23859,23866,23890,23869,
679	23857,23897,23874,23865,23881,23864,23868,23858,23862,23872,23877,24132,24129,
680	24408,24486,24485,24491,24777,24761,24780,24802,24782,24772,24852,24818,24842,
681	24854,24837,24821,24851,24824,24828,24830,24769,24835,24856,24861,24848,24831,
682	24836,24843,25162,25492,25521,25520,25550,25573,25576,25583,25539,25757,25587,
683	25546,25568,25590,25557,25586,25589,25697,25567,25534,25565,25564,25540,25560,
684	25555,25538,25543,25548,25547,25544,25584,25559,25561,25906,25959,25962,25956,
685	25948,25960,25957,25996,26013,26014,26030,26064,26066,26236,26220,26235,26240,
686	26225,26233,26218,26226,26369,26892,26835,26884,26844,26922,26860,26858,26865,
687	26895,26838,26871,26859,26852,26870,26899,26896,26867,26849,26887,26828,26888,
688	26992,26804,26897,26863,26822,26900,26872,26832,26877,26876,26856,26891,26890,
689	26903,26830,26824,26845,26846,26854,26868,26833,26886,26836,26857,26901,26917,
690	26823,27449,27451,27455,27452,27540,27543,27545,27541,27581,27632,27634,27635,
691	27696,28156,28230,28231,28191,28233,28296,28220,28221,28229,28258,28203,28223,
692	28225,28253,28275,28188,28211,28235,28224,28241,28219,28163,28206,28254,28264,
693	28252,28257,28209,28200,28256,28273,28267,28217,28194,
694	28208,28243,28261,28199,28280,28260,28279,28245,28281,28242,28262,28213,28214,
695	28250,28960,28958,28975,28923,28974,28977,28963,28965,28962,28978,28959,28968,
696	28986,28955,29259,29274,29320,29321,29318,29317,29323,29458,29451,29488,29474,
697	29489,29491,29479,29490,29485,29478,29475,29493,29452,29742,29740,29744,29739,
698	29718,29722,29729,29741,29745,29732,29731,29725,29737,29728,29746,29947,29999,
699	30063,30060,30183,30170,30177,30182,30173,30175,30180,30167,30357,30354,30426,
700	30534,30535,30532,30541,30533,30538,30542,30539,30540,30686,30700,30816,30820,
701	30821,30812,30829,30833,30826,30830,30832,30825,30824,30814,30818,31092,31091,
702	31090,31088,31234,31242,31235,31244,31236,31385,31462,31460,31562,31547,31556,
703	31560,31564,31566,31552,31576,31557,31906,31902,31912,31905,32088,32111,32099,
704	32083,32086,32103,32106,32079,32109,32092,32107,32082,32084,32105,32081,32095,
705	32078,32574,32575,32613,32614,32674,32672,32673,32727,32849,32847,32848,33022,
706	32980,33091,33098,33106,33103,33095,33085,33101,33082,33254,33262,33271,33272,
707	33273,33284,33340,33341,33343,33397,33595,33743,33785,33827,33728,33768,33810,
708	33767,33764,33788,33782,33808,33734,33736,33771,33763,33727,33793,33757,33765,
709	33752,33791,33761,33739,33742,33750,33781,33737,33801,33807,33758,33809,33798,
710	33730,33779,33749,33786,33735,33745,33770,33811,33731,33772,33774,33732,33787,
711	33751,33762,33819,33755,33790,34520,34530,34534,34515,34531,34522,34538,34525,
712	34539,34524,34540,34537,34519,34536,34513,34888,34902,34901,35002,35031,35001,
713	35000,35008,35006,34998,35004,34999,35005,34994,35073,
714	35017,35221,35224,35223,35293,35290,35291,35406,35405,35385,35417,35392,35415,
715	35416,35396,35397,35410,35400,35409,35402,35404,35407,35935,35969,35968,36026,
716	36030,36016,36025,36021,36228,36224,36233,36312,36307,36301,36295,36310,36316,
717	36303,36309,36313,36296,36311,36293,36591,36599,36602,36601,36582,36590,36581,
718	36597,36583,36584,36598,36587,36593,36588,36596,36585,36909,36916,36911,37126,
719	37164,37124,37119,37116,37128,37113,37115,37121,37120,37127,37125,37123,37217,
720	37220,37215,37218,37216,37377,37386,37413,37379,37402,37414,37391,37388,37376,
721	37394,37375,37373,37382,37380,37415,37378,37404,37412,37401,37399,37381,37398,
722	38267,38285,38284,38288,38535,38526,38536,38537,38531,38528,38594,38600,38595,
723	38641,38640,38764,38768,38766,38919,39081,39147,40166,40697,20099,20100,20150,
724	20669,20671,20678,20654,20676,20682,20660,20680,20674,20656,20673,20666,20657,
725	20683,20681,20662,20664,20951,21114,21112,21115,21116,21955,21979,21964,21968,
726	21963,21962,21981,21952,21972,21956,21993,21951,21970,21901,21967,21973,21986,
727	21974,21960,22002,21965,21977,21954,22292,22611,22632,22628,22607,22605,22601,
728	22639,22613,22606,22621,22617,22629,22619,22589,22627,22641,22780,23239,23236,
729	23243,23226,23224,23217,23221,23216,23231,23240,23227,23238,23223,23232,23242,
730	23220,23222,23245,23225,23184,23510,23512,23513,23583,23603,23921,23907,23882,
731	23909,23922,23916,23902,23912,23911,23906,24048,24143,24142,24138,24141,24139,
732	24261,24268,24262,24267,24263,24384,24495,24493,24823,24905,24906,24875,24901,
733	24886,24882,24878,24902,24879,24911,24873,24896,25120,
734	37224,25123,25125,25124,25541,25585,25579,25616,25618,25609,25632,25636,25651,
735	25667,25631,25621,25624,25657,25655,25634,25635,25612,25638,25648,25640,25665,
736	25653,25647,25610,25626,25664,25637,25639,25611,25575,25627,25646,25633,25614,
737	25967,26002,26067,26246,26252,26261,26256,26251,26250,26265,26260,26232,26400,
738	26982,26975,26936,26958,26978,26993,26943,26949,26986,26937,26946,26967,26969,
739	27002,26952,26953,26933,26988,26931,26941,26981,26864,27000,26932,26985,26944,
740	26991,26948,26998,26968,26945,26996,26956,26939,26955,26935,26972,26959,26961,
741	26930,26962,26927,27003,26940,27462,27461,27459,27458,27464,27457,27547,64013,
742	27643,27644,27641,27639,27640,28315,28374,28360,28303,28352,28319,28307,28308,
743	28320,28337,28345,28358,28370,28349,28353,28318,28361,28343,28336,28365,28326,
744	28367,28338,28350,28355,28380,28376,28313,28306,28302,28301,28324,28321,28351,
745	28339,28368,28362,28311,28334,28323,28999,29012,29010,29027,29024,28993,29021,
746	29026,29042,29048,29034,29025,28994,29016,28995,29003,29040,29023,29008,29011,
747	28996,29005,29018,29263,29325,29324,29329,29328,29326,29500,29506,29499,29498,
748	29504,29514,29513,29764,29770,29771,29778,29777,29783,29760,29775,29776,29774,
749	29762,29766,29773,29780,29921,29951,29950,29949,29981,30073,30071,27011,30191,
750	30223,30211,30199,30206,30204,30201,30200,30224,30203,30198,30189,30197,30205,
751	30361,30389,30429,30549,30559,30560,30546,30550,30554,30569,30567,30548,30553,
752	30573,30688,30855,30874,30868,30863,30852,30869,30853,30854,30881,30851,30841,
753	30873,30848,30870,30843,31100,31106,31101,31097,31249,
754	31256,31257,31250,31255,31253,31266,31251,31259,31248,31395,31394,31390,31467,
755	31590,31588,31597,31604,31593,31602,31589,31603,31601,31600,31585,31608,31606,
756	31587,31922,31924,31919,32136,32134,32128,32141,32127,32133,32122,32142,32123,
757	32131,32124,32140,32148,32132,32125,32146,32621,32619,32615,32616,32620,32678,
758	32677,32679,32731,32732,32801,33124,33120,33143,33116,33129,33115,33122,33138,
759	26401,33118,33142,33127,33135,33092,33121,33309,33353,33348,33344,33346,33349,
760	34033,33855,33878,33910,33913,33935,33933,33893,33873,33856,33926,33895,33840,
761	33869,33917,33882,33881,33908,33907,33885,34055,33886,33847,33850,33844,33914,
762	33859,33912,33842,33861,33833,33753,33867,33839,33858,33837,33887,33904,33849,
763	33870,33868,33874,33903,33989,33934,33851,33863,33846,33843,33896,33918,33860,
764	33835,33888,33876,33902,33872,34571,34564,34551,34572,34554,34518,34549,34637,
765	34552,34574,34569,34561,34550,34573,34565,35030,35019,35021,35022,35038,35035,
766	35034,35020,35024,35205,35227,35295,35301,35300,35297,35296,35298,35292,35302,
767	35446,35462,35455,35425,35391,35447,35458,35460,35445,35459,35457,35444,35450,
768	35900,35915,35914,35941,35940,35942,35974,35972,35973,36044,36200,36201,36241,
769	36236,36238,36239,36237,36243,36244,36240,36242,36336,36320,36332,36337,36334,
770	36304,36329,36323,36322,36327,36338,36331,36340,36614,36607,36609,36608,36613,
771	36615,36616,36610,36619,36946,36927,36932,36937,36925,37136,37133,37135,37137,
772	37142,37140,37131,37134,37230,37231,37448,37458,37424,37434,37478,37427,37477,
773	37470,37507,37422,37450,37446,37485,37484,37455,37472,
774	37479,37487,37430,37473,37488,37425,37460,37475,37456,37490,37454,37459,37452,
775	37462,37426,38303,38300,38302,38299,38546,38547,38545,38551,38606,38650,38653,
776	38648,38645,38771,38775,38776,38770,38927,38925,38926,39084,39158,39161,39343,
777	39346,39344,39349,39597,39595,39771,40170,40173,40167,40576,40701,20710,20692,
778	20695,20712,20723,20699,20714,20701,20708,20691,20716,20720,20719,20707,20704,
779	20952,21120,21121,21225,21227,21296,21420,22055,22037,22028,22034,22012,22031,
780	22044,22017,22035,22018,22010,22045,22020,22015,22009,22665,22652,22672,22680,
781	22662,22657,22655,22644,22667,22650,22663,22673,22670,22646,22658,22664,22651,
782	22676,22671,22782,22891,23260,23278,23269,23253,23274,23258,23277,23275,23283,
783	23266,23264,23259,23276,23262,23261,23257,23272,23263,23415,23520,23523,23651,
784	23938,23936,23933,23942,23930,23937,23927,23946,23945,23944,23934,23932,23949,
785	23929,23935,24152,24153,24147,24280,24273,24279,24270,24284,24277,24281,24274,
786	24276,24388,24387,24431,24502,24876,24872,24897,24926,24945,24947,24914,24915,
787	24946,24940,24960,24948,24916,24954,24923,24933,24891,24938,24929,24918,25129,
788	25127,25131,25643,25677,25691,25693,25716,25718,25714,25715,25725,25717,25702,
789	25766,25678,25730,25694,25692,25675,25683,25696,25680,25727,25663,25708,25707,
790	25689,25701,25719,25971,26016,26273,26272,26271,26373,26372,26402,27057,27062,
791	27081,27040,27086,27030,27056,27052,27068,27025,27033,27022,27047,27021,27049,
792	27070,27055,27071,27076,27069,27044,27092,27065,27082,27034,27087,27059,27027,
793	27050,27041,27038,27097,27031,27024,27074,27061,27045,
794	27078,27466,27469,27467,27550,27551,27552,27587,27588,27646,28366,28405,28401,
795	28419,28453,28408,28471,28411,28462,28425,28494,28441,28442,28455,28440,28475,
796	28434,28397,28426,28470,28531,28409,28398,28461,28480,28464,28476,28469,28395,
797	28423,28430,28483,28421,28413,28406,28473,28444,28412,28474,28447,28429,28446,
798	28424,28449,29063,29072,29065,29056,29061,29058,29071,29051,29062,29057,29079,
799	29252,29267,29335,29333,29331,29507,29517,29521,29516,29794,29811,29809,29813,
800	29810,29799,29806,29952,29954,29955,30077,30096,30230,30216,30220,30229,30225,
801	30218,30228,30392,30593,30588,30597,30594,30574,30592,30575,30590,30595,30898,
802	30890,30900,30893,30888,30846,30891,30878,30885,30880,30892,30882,30884,31128,
803	31114,31115,31126,31125,31124,31123,31127,31112,31122,31120,31275,31306,31280,
804	31279,31272,31270,31400,31403,31404,31470,31624,31644,31626,31633,31632,31638,
805	31629,31628,31643,31630,31621,31640,21124,31641,31652,31618,31931,31935,31932,
806	31930,32167,32183,32194,32163,32170,32193,32192,32197,32157,32206,32196,32198,
807	32203,32204,32175,32185,32150,32188,32159,32166,32174,32169,32161,32201,32627,
808	32738,32739,32741,32734,32804,32861,32860,33161,33158,33155,33159,33165,33164,
809	33163,33301,33943,33956,33953,33951,33978,33998,33986,33964,33966,33963,33977,
810	33972,33985,33997,33962,33946,33969,34000,33949,33959,33979,33954,33940,33991,
811	33996,33947,33961,33967,33960,34006,33944,33974,33999,33952,34007,34004,34002,
812	34011,33968,33937,34401,34611,34595,34600,34667,34624,34606,34590,34593,34585,
813	34587,34627,34604,34625,34622,34630,34592,34610,34602,
814	34605,34620,34578,34618,34609,34613,34626,34598,34599,34616,34596,34586,34608,
815	34577,35063,35047,35057,35058,35066,35070,35054,35068,35062,35067,35056,35052,
816	35051,35229,35233,35231,35230,35305,35307,35304,35499,35481,35467,35474,35471,
817	35478,35901,35944,35945,36053,36047,36055,36246,36361,36354,36351,36365,36349,
818	36362,36355,36359,36358,36357,36350,36352,36356,36624,36625,36622,36621,37155,
819	37148,37152,37154,37151,37149,37146,37156,37153,37147,37242,37234,37241,37235,
820	37541,37540,37494,37531,37498,37536,37524,37546,37517,37542,37530,37547,37497,
821	37527,37503,37539,37614,37518,37506,37525,37538,37501,37512,37537,37514,37510,
822	37516,37529,37543,37502,37511,37545,37533,37515,37421,38558,38561,38655,38744,
823	38781,38778,38782,38787,38784,38786,38779,38788,38785,38783,38862,38861,38934,
824	39085,39086,39170,39168,39175,39325,39324,39363,39353,39355,39354,39362,39357,
825	39367,39601,39651,39655,39742,39743,39776,39777,39775,40177,40178,40181,40615,
826	20735,20739,20784,20728,20742,20743,20726,20734,20747,20748,20733,20746,21131,
827	21132,21233,21231,22088,22082,22092,22069,22081,22090,22089,22086,22104,22106,
828	22080,22067,22077,22060,22078,22072,22058,22074,22298,22699,22685,22705,22688,
829	22691,22703,22700,22693,22689,22783,23295,23284,23293,23287,23286,23299,23288,
830	23298,23289,23297,23303,23301,23311,23655,23961,23959,23967,23954,23970,23955,
831	23957,23968,23964,23969,23962,23966,24169,24157,24160,24156,32243,24283,24286,
832	24289,24393,24498,24971,24963,24953,25009,25008,24994,24969,24987,24979,25007,
833	25005,24991,24978,25002,24993,24973,24934,25011,25133,
834	25710,25712,25750,25760,25733,25751,25756,25743,25739,25738,25740,25763,25759,
835	25704,25777,25752,25974,25978,25977,25979,26034,26035,26293,26288,26281,26290,
836	26295,26282,26287,27136,27142,27159,27109,27128,27157,27121,27108,27168,27135,
837	27116,27106,27163,27165,27134,27175,27122,27118,27156,27127,27111,27200,27144,
838	27110,27131,27149,27132,27115,27145,27140,27160,27173,27151,27126,27174,27143,
839	27124,27158,27473,27557,27555,27554,27558,27649,27648,27647,27650,28481,28454,
840	28542,28551,28614,28562,28557,28553,28556,28514,28495,28549,28506,28566,28534,
841	28524,28546,28501,28530,28498,28496,28503,28564,28563,28509,28416,28513,28523,
842	28541,28519,28560,28499,28555,28521,28543,28565,28515,28535,28522,28539,29106,
843	29103,29083,29104,29088,29082,29097,29109,29085,29093,29086,29092,29089,29098,
844	29084,29095,29107,29336,29338,29528,29522,29534,29535,29536,29533,29531,29537,
845	29530,29529,29538,29831,29833,29834,29830,29825,29821,29829,29832,29820,29817,
846	29960,29959,30078,30245,30238,30233,30237,30236,30243,30234,30248,30235,30364,
847	30365,30366,30363,30605,30607,30601,30600,30925,30907,30927,30924,30929,30926,
848	30932,30920,30915,30916,30921,31130,31137,31136,31132,31138,31131,27510,31289,
849	31410,31412,31411,31671,31691,31678,31660,31694,31663,31673,31690,31669,31941,
850	31944,31948,31947,32247,32219,32234,32231,32215,32225,32259,32250,32230,32246,
851	32241,32240,32238,32223,32630,32684,32688,32685,32749,32747,32746,32748,32742,
852	32744,32868,32871,33187,33183,33182,33173,33186,33177,33175,33302,33359,33363,
853	33362,33360,33358,33361,34084,34107,34063,34048,34089,
854	34062,34057,34061,34079,34058,34087,34076,34043,34091,34042,34056,34060,34036,
855	34090,34034,34069,34039,34027,34035,34044,34066,34026,34025,34070,34046,34088,
856	34077,34094,34050,34045,34078,34038,34097,34086,34023,34024,34032,34031,34041,
857	34072,34080,34096,34059,34073,34095,34402,34646,34659,34660,34679,34785,34675,
858	34648,34644,34651,34642,34657,34650,34641,34654,34669,34666,34640,34638,34655,
859	34653,34671,34668,34682,34670,34652,34661,34639,34683,34677,34658,34663,34665,
860	34906,35077,35084,35092,35083,35095,35096,35097,35078,35094,35089,35086,35081,
861	35234,35236,35235,35309,35312,35308,35535,35526,35512,35539,35537,35540,35541,
862	35515,35543,35518,35520,35525,35544,35523,35514,35517,35545,35902,35917,35983,
863	36069,36063,36057,36072,36058,36061,36071,36256,36252,36257,36251,36384,36387,
864	36389,36388,36398,36373,36379,36374,36369,36377,36390,36391,36372,36370,36376,
865	36371,36380,36375,36378,36652,36644,36632,36634,36640,36643,36630,36631,36979,
866	36976,36975,36967,36971,37167,37163,37161,37162,37170,37158,37166,37253,37254,
867	37258,37249,37250,37252,37248,37584,37571,37572,37568,37593,37558,37583,37617,
868	37599,37592,37609,37591,37597,37580,37615,37570,37608,37578,37576,37582,37606,
869	37581,37589,37577,37600,37598,37607,37585,37587,37557,37601,37574,37556,38268,
870	38316,38315,38318,38320,38564,38562,38611,38661,38664,38658,38746,38794,38798,
871	38792,38864,38863,38942,38941,38950,38953,38952,38944,38939,38951,39090,39176,
872	39162,39185,39188,39190,39191,39189,39388,39373,39375,39379,39380,39374,39369,
873	39382,39384,39371,39383,39372,39603,39660,39659,39667,
874	39666,39665,39750,39747,39783,39796,39793,39782,39798,39797,39792,39784,39780,
875	39788,40188,40186,40189,40191,40183,40199,40192,40185,40187,40200,40197,40196,
876	40579,40659,40719,40720,20764,20755,20759,20762,20753,20958,21300,21473,22128,
877	22112,22126,22131,22118,22115,22125,22130,22110,22135,22300,22299,22728,22717,
878	22729,22719,22714,22722,22716,22726,23319,23321,23323,23329,23316,23315,23312,
879	23318,23336,23322,23328,23326,23535,23980,23985,23977,23975,23989,23984,23982,
880	23978,23976,23986,23981,23983,23988,24167,24168,24166,24175,24297,24295,24294,
881	24296,24293,24395,24508,24989,25000,24982,25029,25012,25030,25025,25036,25018,
882	25023,25016,24972,25815,25814,25808,25807,25801,25789,25737,25795,25819,25843,
883	25817,25907,25983,25980,26018,26312,26302,26304,26314,26315,26319,26301,26299,
884	26298,26316,26403,27188,27238,27209,27239,27186,27240,27198,27229,27245,27254,
885	27227,27217,27176,27226,27195,27199,27201,27242,27236,27216,27215,27220,27247,
886	27241,27232,27196,27230,27222,27221,27213,27214,27206,27477,27476,27478,27559,
887	27562,27563,27592,27591,27652,27651,27654,28589,28619,28579,28615,28604,28622,
888	28616,28510,28612,28605,28574,28618,28584,28676,28581,28590,28602,28588,28586,
889	28623,28607,28600,28578,28617,28587,28621,28591,28594,28592,29125,29122,29119,
890	29112,29142,29120,29121,29131,29140,29130,29127,29135,29117,29144,29116,29126,
891	29146,29147,29341,29342,29545,29542,29543,29548,29541,29547,29546,29823,29850,
892	29856,29844,29842,29845,29857,29963,30080,30255,30253,30257,30269,30259,30268,
893	30261,30258,30256,30395,30438,30618,30621,30625,30620,
894	30619,30626,30627,30613,30617,30615,30941,30953,30949,30954,30942,30947,30939,
895	30945,30946,30957,30943,30944,31140,31300,31304,31303,31414,31416,31413,31409,
896	31415,31710,31715,31719,31709,31701,31717,31706,31720,31737,31700,31722,31714,
897	31708,31723,31704,31711,31954,31956,31959,31952,31953,32274,32289,32279,32268,
898	32287,32288,32275,32270,32284,32277,32282,32290,32267,32271,32278,32269,32276,
899	32293,32292,32579,32635,32636,32634,32689,32751,32810,32809,32876,33201,33190,
900	33198,33209,33205,33195,33200,33196,33204,33202,33207,33191,33266,33365,33366,
901	33367,34134,34117,34155,34125,34131,34145,34136,34112,34118,34148,34113,34146,
902	34116,34129,34119,34147,34110,34139,34161,34126,34158,34165,34133,34151,34144,
903	34188,34150,34141,34132,34149,34156,34403,34405,34404,34715,34703,34711,34707,
904	34706,34696,34689,34710,34712,34681,34695,34723,34693,34704,34705,34717,34692,
905	34708,34716,34714,34697,35102,35110,35120,35117,35118,35111,35121,35106,35113,
906	35107,35119,35116,35103,35313,35552,35554,35570,35572,35573,35549,35604,35556,
907	35551,35568,35528,35550,35553,35560,35583,35567,35579,35985,35986,35984,36085,
908	36078,36081,36080,36083,36204,36206,36261,36263,36403,36414,36408,36416,36421,
909	36406,36412,36413,36417,36400,36415,36541,36662,36654,36661,36658,36665,36663,
910	36660,36982,36985,36987,36998,37114,37171,37173,37174,37267,37264,37265,37261,
911	37263,37671,37662,37640,37663,37638,37647,37754,37688,37692,37659,37667,37650,
912	37633,37702,37677,37646,37645,37579,37661,37626,37669,37651,37625,37623,37684,
913	37634,37668,37631,37673,37689,37685,37674,37652,37644,
914	37643,37630,37641,37632,37627,37654,38332,38349,38334,38329,38330,38326,38335,
915	38325,38333,38569,38612,38667,38674,38672,38809,38807,38804,38896,38904,38965,
916	38959,38962,39204,39199,39207,39209,39326,39406,39404,39397,39396,39408,39395,
917	39402,39401,39399,39609,39615,39604,39611,39670,39674,39673,39671,39731,39808,
918	39813,39815,39804,39806,39803,39810,39827,39826,39824,39802,39829,39805,39816,
919	40229,40215,40224,40222,40212,40233,40221,40216,40226,40208,40217,40223,40584,
920	40582,40583,40622,40621,40661,40662,40698,40722,40765,20774,20773,20770,20772,
921	20768,20777,21236,22163,22156,22157,22150,22148,22147,22142,22146,22143,22145,
922	22742,22740,22735,22738,23341,23333,23346,23331,23340,23335,23334,23343,23342,
923	23419,23537,23538,23991,24172,24170,24510,24507,25027,25013,25020,25063,25056,
924	25061,25060,25064,25054,25839,25833,25827,25835,25828,25832,25985,25984,26038,
925	26074,26322,27277,27286,27265,27301,27273,27295,27291,27297,27294,27271,27283,
926	27278,27285,27267,27304,27300,27281,27263,27302,27290,27269,27276,27282,27483,
927	27565,27657,28620,28585,28660,28628,28643,28636,28653,28647,28646,28638,28658,
928	28637,28642,28648,29153,29169,29160,29170,29156,29168,29154,29555,29550,29551,
929	29847,29874,29867,29840,29866,29869,29873,29861,29871,29968,29969,29970,29967,
930	30084,30275,30280,30281,30279,30372,30441,30645,30635,30642,30647,30646,30644,
931	30641,30632,30704,30963,30973,30978,30971,30972,30962,30981,30969,30974,30980,
932	31147,31144,31324,31323,31318,31320,31316,31322,31422,31424,31425,31749,31759,
933	31730,31744,31743,31739,31758,31732,31755,31731,31746,
934	31753,31747,31745,31736,31741,31750,31728,31729,31760,31754,31976,32301,32316,
935	32322,32307,38984,32312,32298,32329,32320,32327,32297,32332,32304,32315,32310,
936	32324,32314,32581,32639,32638,32637,32756,32754,32812,33211,33220,33228,33226,
937	33221,33223,33212,33257,33371,33370,33372,34179,34176,34191,34215,34197,34208,
938	34187,34211,34171,34212,34202,34206,34167,34172,34185,34209,34170,34168,34135,
939	34190,34198,34182,34189,34201,34205,34177,34210,34178,34184,34181,34169,34166,
940	34200,34192,34207,34408,34750,34730,34733,34757,34736,34732,34745,34741,34748,
941	34734,34761,34755,34754,34764,34743,34735,34756,34762,34740,34742,34751,34744,
942	34749,34782,34738,35125,35123,35132,35134,35137,35154,35127,35138,35245,35247,
943	35246,35314,35315,35614,35608,35606,35601,35589,35595,35618,35599,35602,35605,
944	35591,35597,35592,35590,35612,35603,35610,35919,35952,35954,35953,35951,35989,
945	35988,36089,36207,36430,36429,36435,36432,36428,36423,36675,36672,36997,36990,
946	37176,37274,37282,37275,37273,37279,37281,37277,37280,37793,37763,37807,37732,
947	37718,37703,37756,37720,37724,37750,37705,37712,37713,37728,37741,37775,37708,
948	37738,37753,37719,37717,37714,37711,37745,37751,37755,37729,37726,37731,37735,
949	37760,37710,37721,38343,38336,38345,38339,38341,38327,38574,38576,38572,38688,
950	38687,38680,38685,38681,38810,38817,38812,38814,38813,38869,38868,38897,38977,
951	38980,38986,38985,38981,38979,39205,39211,39212,39210,39219,39218,39215,39213,
952	39217,39216,39320,39331,39329,39426,39418,39412,39415,39417,39416,39414,39419,
953	39421,39422,39420,39427,39614,39678,39677,39681,39676,
954	39752,39834,39848,39838,39835,39846,39841,39845,39844,39814,39842,39840,39855,
955	40243,40257,40295,40246,40238,40239,40241,40248,40240,40261,40258,40259,40254,
956	40247,40256,40253,32757,40237,40586,40585,40589,40624,40648,40666,40699,40703,
957	40740,40739,40738,40788,40864,20785,20781,20782,22168,22172,22167,22170,22173,
958	22169,22896,23356,23657,23658,24000,24173,24174,25048,25055,25069,25070,25073,
959	25066,25072,25067,25046,25065,25855,25860,25853,25848,25857,25859,25852,26004,
960	26075,26330,26331,26328,27333,27321,27325,27361,27334,27322,27318,27319,27335,
961	27316,27309,27486,27593,27659,28679,28684,28685,28673,28677,28692,28686,28671,
962	28672,28667,28710,28668,28663,28682,29185,29183,29177,29187,29181,29558,29880,
963	29888,29877,29889,29886,29878,29883,29890,29972,29971,30300,30308,30297,30288,
964	30291,30295,30298,30374,30397,30444,30658,30650,30975,30988,30995,30996,30985,
965	30992,30994,30993,31149,31148,31327,31772,31785,31769,31776,31775,31789,31773,
966	31782,31784,31778,31781,31792,32348,32336,32342,32355,32344,32354,32351,32337,
967	32352,32343,32339,32693,32691,32759,32760,32885,33233,33234,33232,33375,33374,
968	34228,34246,34240,34243,34242,34227,34229,34237,34247,34244,34239,34251,34254,
969	34248,34245,34225,34230,34258,34340,34232,34231,34238,34409,34791,34790,34786,
970	34779,34795,34794,34789,34783,34803,34788,34772,34780,34771,34797,34776,34787,
971	34724,34775,34777,34817,34804,34792,34781,35155,35147,35151,35148,35142,35152,
972	35153,35145,35626,35623,35619,35635,35632,35637,35655,35631,35644,35646,35633,
973	35621,35639,35622,35638,35630,35620,35643,35645,35642,
974	35906,35957,35993,35992,35991,36094,36100,36098,36096,36444,36450,36448,36439,
975	36438,36446,36453,36455,36443,36442,36449,36445,36457,36436,36678,36679,36680,
976	36683,37160,37178,37179,37182,37288,37285,37287,37295,37290,37813,37772,37778,
977	37815,37787,37789,37769,37799,37774,37802,37790,37798,37781,37768,37785,37791,
978	37773,37809,37777,37810,37796,37800,37812,37795,37797,38354,38355,38353,38579,
979	38615,38618,24002,38623,38616,38621,38691,38690,38693,38828,38830,38824,38827,
980	38820,38826,38818,38821,38871,38873,38870,38872,38906,38992,38993,38994,39096,
981	39233,39228,39226,39439,39435,39433,39437,39428,39441,39434,39429,39431,39430,
982	39616,39644,39688,39684,39685,39721,39733,39754,39756,39755,39879,39878,39875,
983	39871,39873,39861,39864,39891,39862,39876,39865,39869,40284,40275,40271,40266,
984	40283,40267,40281,40278,40268,40279,40274,40276,40287,40280,40282,40590,40588,
985	40671,40705,40704,40726,40741,40747,40746,40745,40744,40780,40789,20788,20789,
986	21142,21239,21428,22187,22189,22182,22183,22186,22188,22746,22749,22747,22802,
987	23357,23358,23359,24003,24176,24511,25083,25863,25872,25869,25865,25868,25870,
988	25988,26078,26077,26334,27367,27360,27340,27345,27353,27339,27359,27356,27344,
989	27371,27343,27341,27358,27488,27568,27660,28697,28711,28704,28694,28715,28705,
990	28706,28707,28713,28695,28708,28700,28714,29196,29194,29191,29186,29189,29349,
991	29350,29348,29347,29345,29899,29893,29879,29891,29974,30304,30665,30666,30660,
992	30705,31005,31003,31009,31004,30999,31006,31152,31335,31336,31795,31804,31801,
993	31788,31803,31980,31978,32374,32373,32376,32368,32375,
994	32367,32378,32370,32372,32360,32587,32586,32643,32646,32695,32765,32766,32888,
995	33239,33237,33380,33377,33379,34283,34289,34285,34265,34273,34280,34266,34263,
996	34284,34290,34296,34264,34271,34275,34268,34257,34288,34278,34287,34270,34274,
997	34816,34810,34819,34806,34807,34825,34828,34827,34822,34812,34824,34815,34826,
998	34818,35170,35162,35163,35159,35169,35164,35160,35165,35161,35208,35255,35254,
999	35318,35664,35656,35658,35648,35667,35670,35668,35659,35669,35665,35650,35666,
1000	35671,35907,35959,35958,35994,36102,36103,36105,36268,36266,36269,36267,36461,
1001	36472,36467,36458,36463,36475,36546,36690,36689,36687,36688,36691,36788,37184,
1002	37183,37296,37293,37854,37831,37839,37826,37850,37840,37881,37868,37836,37849,
1003	37801,37862,37834,37844,37870,37859,37845,37828,37838,37824,37842,37863,38269,
1004	38362,38363,38625,38697,38699,38700,38696,38694,38835,38839,38838,38877,38878,
1005	38879,39004,39001,39005,38999,39103,39101,39099,39102,39240,39239,39235,39334,
1006	39335,39450,39445,39461,39453,39460,39451,39458,39456,39463,39459,39454,39452,
1007	39444,39618,39691,39690,39694,39692,39735,39914,39915,39904,39902,39908,39910,
1008	39906,39920,39892,39895,39916,39900,39897,39909,39893,39905,39898,40311,40321,
1009	40330,40324,40328,40305,40320,40312,40326,40331,40332,40317,40299,40308,40309,
1010	40304,40297,40325,40307,40315,40322,40303,40313,40319,40327,40296,40596,40593,
1011	40640,40700,40749,40768,40769,40781,40790,40791,40792,21303,22194,22197,22195,
1012	22755,23365,24006,24007,24302,24303,24512,24513,25081,25879,25878,25877,25875,
1013	26079,26344,26339,26340,27379,27376,27370,27368,27385,
1014	27377,27374,27375,28732,28725,28719,28727,28724,28721,28738,28728,28735,28730,
1015	28729,28736,28731,28723,28737,29203,29204,29352,29565,29564,29882,30379,30378,
1016	30398,30445,30668,30670,30671,30669,30706,31013,31011,31015,31016,31012,31017,
1017	31154,31342,31340,31341,31479,31817,31816,31818,31815,31813,31982,32379,32382,
1018	32385,32384,32698,32767,32889,33243,33241,33291,33384,33385,34338,34303,34305,
1019	34302,34331,34304,34294,34308,34313,34309,34316,34301,34841,34832,34833,34839,
1020	34835,34838,35171,35174,35257,35319,35680,35690,35677,35688,35683,35685,35687,
1021	35693,36270,36486,36488,36484,36697,36694,36695,36693,36696,36698,37005,37187,
1022	37185,37303,37301,37298,37299,37899,37907,37883,37920,37903,37908,37886,37909,
1023	37904,37928,37913,37901,37877,37888,37879,37895,37902,37910,37906,37882,37897,
1024	37880,37898,37887,37884,37900,37878,37905,37894,38366,38368,38367,38702,38703,
1025	38841,38843,38909,38910,39008,39010,39011,39007,39105,39106,39248,39246,39257,
1026	39244,39243,39251,39474,39476,39473,39468,39466,39478,39465,39470,39480,39469,
1027	39623,39626,39622,39696,39698,39697,39947,39944,39927,39941,39954,39928,40000,
1028	39943,39950,39942,39959,39956,39945,40351,40345,40356,40349,40338,40344,40336,
1029	40347,40352,40340,40348,40362,40343,40353,40346,40354,40360,40350,40355,40383,
1030	40361,40342,40358,40359,40601,40603,40602,40677,40676,40679,40678,40752,40750,
1031	40795,40800,40798,40797,40793,40849,20794,20793,21144,21143,22211,22205,22206,
1032	23368,23367,24011,24015,24305,25085,25883,27394,27388,27395,27384,27392,28739,
1033	28740,28746,28744,28745,28741,28742,29213,29210,29209,
1034	29566,29975,30314,30672,31021,31025,31023,31828,31827,31986,32394,32391,32392,
1035	32395,32390,32397,32589,32699,32816,33245,34328,34346,34342,34335,34339,34332,
1036	34329,34343,34350,34337,34336,34345,34334,34341,34857,34845,34843,34848,34852,
1037	34844,34859,34890,35181,35177,35182,35179,35322,35705,35704,35653,35706,35707,
1038	36112,36116,36271,36494,36492,36702,36699,36701,37190,37188,37189,37305,37951,
1039	37947,37942,37929,37949,37948,37936,37945,37930,37943,37932,37952,37937,38373,
1040	38372,38371,38709,38714,38847,38881,39012,39113,39110,39104,39256,39254,39481,
1041	39485,39494,39492,39490,39489,39482,39487,39629,39701,39703,39704,39702,39738,
1042	39762,39979,39965,39964,39980,39971,39976,39977,39972,39969,40375,40374,40380,
1043	40385,40391,40394,40399,40382,40389,40387,40379,40373,40398,40377,40378,40364,
1044	40392,40369,40365,40396,40371,40397,40370,40570,40604,40683,40686,40685,40731,
1045	40728,40730,40753,40782,40805,40804,40850,20153,22214,22213,22219,22897,23371,
1046	23372,24021,24017,24306,25889,25888,25894,25890,27403,27400,27401,27661,28757,
1047	28758,28759,28754,29214,29215,29353,29567,29912,29909,29913,29911,30317,30381,
1048	31029,31156,31344,31345,31831,31836,31833,31835,31834,31988,31985,32401,32591,
1049	32647,33246,33387,34356,34357,34355,34348,34354,34358,34860,34856,34854,34858,
1050	34853,35185,35263,35262,35323,35710,35716,35714,35718,35717,35711,36117,36501,
1051	36500,36506,36498,36496,36502,36503,36704,36706,37191,37964,37968,37962,37963,
1052	37967,37959,37957,37960,37961,37958,38719,38883,39018,39017,39115,39252,39259,
1053	39502,39507,39508,39500,39503,39496,39498,39497,39506,
1054	39504,39632,39705,39723,39739,39766,39765,40006,40008,39999,40004,39993,39987,
1055	40001,39996,39991,39988,39986,39997,39990,40411,40402,40414,40410,40395,40400,
1056	40412,40401,40415,40425,40409,40408,40406,40437,40405,40413,40630,40688,40757,
1057	40755,40754,40770,40811,40853,40866,20797,21145,22760,22759,22898,23373,24024,
1058	34863,24399,25089,25091,25092,25897,25893,26006,26347,27409,27410,27407,27594,
1059	28763,28762,29218,29570,29569,29571,30320,30676,31847,31846,32405,33388,34362,
1060	34368,34361,34364,34353,34363,34366,34864,34866,34862,34867,35190,35188,35187,
1061	35326,35724,35726,35723,35720,35909,36121,36504,36708,36707,37308,37986,37973,
1062	37981,37975,37982,38852,38853,38912,39510,39513,39710,39711,39712,40018,40024,
1063	40016,40010,40013,40011,40021,40025,40012,40014,40443,40439,40431,40419,40427,
1064	40440,40420,40438,40417,40430,40422,40434,40432,40418,40428,40436,40435,40424,
1065	40429,40642,40656,40690,40691,40710,40732,40760,40759,40758,40771,40783,40817,
1066	40816,40814,40815,22227,22221,23374,23661,25901,26349,26350,27411,28767,28769,
1067	28765,28768,29219,29915,29925,30677,31032,31159,31158,31850,32407,32649,33389,
1068	34371,34872,34871,34869,34891,35732,35733,36510,36511,36512,36509,37310,37309,
1069	37314,37995,37992,37993,38629,38726,38723,38727,38855,38885,39518,39637,39769,
1070	40035,40039,40038,40034,40030,40032,40450,40446,40455,40451,40454,40453,40448,
1071	40449,40457,40447,40445,40452,40608,40734,40774,40820,40821,40822,22228,25902,
1072	26040,27416,27417,27415,27418,28770,29222,29354,30680,30681,31033,31849,31851,
1073	31990,32410,32408,32411,32409,33248,33249,34374,34375,
1074	34376,35193,35194,35196,35195,35327,35736,35737,36517,36516,36515,37998,37997,
1075	37999,38001,38003,38729,39026,39263,40040,40046,40045,40459,40461,40464,40463,
1076	40466,40465,40609,40693,40713,40775,40824,40827,40826,40825,22302,28774,31855,
1077	34876,36274,36518,37315,38004,38008,38006,38005,39520,40052,40051,40049,40053,
1078	40468,40467,40694,40714,40868,28776,28773,31991,34410,34878,34877,34879,35742,
1079	35996,36521,36553,38731,39027,39028,39116,39265,39339,39524,39526,39527,39716,
1080	40469,40471,40776,25095,27422,29223,34380,36520,38018,38016,38017,39529,39528,
1081	39726,40473,29225,34379,35743,38019,40057,40631,30325,39531,40058,40477,28777,
1082	28778,40612,40830,40777,40856,30849,37561,35023,22715,24658,31911,23290,9556,
1083	9574,9559,9568,9580,9571,9562,9577,9565,9554,9572,9557,9566,9578,9569,9560,
1084	9575,9563,9555,9573,9558,9567,9579,9570,9561,9576,9564,9553,9552,9581,9582,
1085	9584,9583,9619,

lib/libc/wasi/libc-top-half/musl/src/locale/c_locale.c deleted-15

...	@@ -1,15 +0,0 @@
1	#include "locale_impl.h"
2	#include <stdint.h>
3
4	static const uint32_t empty_mo[] = { 0x950412de, 0, -1, -1, -1 };
5
6	const struct __locale_map __c_dot_utf8 = {
7	.map = empty_mo,
8	.map_size = sizeof empty_mo,
9	.name = "C.UTF-8"
10	};
11
12	const struct __locale_struct __c_locale = { 0 };
13	const struct __locale_struct __c_dot_utf8_locale = {
14	.cat[LC_CTYPE] = &__c_dot_utf8
15	};

lib/libc/wasi/libc-top-half/musl/src/locale/codepages.h deleted-320

...	@@ -1,320 +0,0 @@
1	"iso88591\0"
2	"latin1\0"
3	"\0\100"
4
5	"iso88592\0"
6	"\0\50"
7	"\240\20\364\127\116\244\334\364\324\51\250\124\65\125\126\156\265\42\27\134"
8	"\260\24\24\230\116\264\340\4\225\137\270\130\105\225\126\157\15\66\127\134"
9	"\111\5\43\214\100\304\314\144\320\61\14\45\143\321\62\30\65\343\214\103"
10	"\20\355\364\323\64\324\24\145\315\65\115\215\245\115\131\334\164\163\325\67"
11	"\112\205\43\316\100\344\320\164\320\71\15\245\163\321\72\31\265\343\316\103"
12	"\21\361\4\324\74\364\30\145\317\75\116\221\245\217\131\374\364\203\25\140"
13
14	"iso88593\0"
15	"\0\50"
16	"\240\220\364\327\50\244\0\40\322\51\250\260\64\25\107\56\265\2\0\134"
17	"\260\224\44\313\54\264\324\62\322\55\270\264\104\125\107\57\365\2\100\134"
18	"\300\4\43\14\0\304\50\204\320\61\310\44\243\314\62\314\64\343\314\63"
19	"\0\104\43\315\64\324\170\144\315\65\32\145\243\315\66\334\204\25\325\67"
20	"\340\204\43\16\0\344\54\224\320\71\350\244\243\316\72\354\264\343\316\73"
21	"\0\304\43\317\74\364\174\144\317\75\33\345\243\317\76\374\210\45\25\140"
22
23	"iso88594\0"
24	"\0\50"
25	"\240\20\44\323\122\244\230\124\323\51\250\124\45\21\110\133\265\42\327\53"
26	"\260\24\24\30\123\264\234\144\223\137\270\130\65\121\110\134\5\65\227\120"
27	"\0\5\43\314\60\304\24\143\214\112\14\45\143\321\62\24\65\343\14\112"
28	"\20\365\64\24\114\324\124\143\315\65\330\234\245\315\66\334\164\365\325\67"
29	"\1\205\43\316\70\344\224\143\316\112\15\245\163\321\72\25\265\343\116\112"
30	"\21\371\104\124\114\364\324\143\317\75\370\240\245\317\76\374\170\5\26\140"
31
32	"iso88595\0"
33	"\0\50"
34	"\240\104\47\335\164\324\125\147\335\165\330\145\247\335\166"
35	"\334\265\322\235\167\337\201\27\236\170\343\221\127\236\171"
36	"\347\241\227\236\172\353\261\327\236\173\357\301\27\237\174"
37	"\363\321\127\237\175\367\341\227\237\176\373\361\327\237\177\377\1\30\240\200"
38	"\3\22\130\240\201\7\42\230\240\202\13\62\330\240\203\17\102\30\241\204"
39	"\23\122\130\241\205\27\142\230\241\206\33\162\330\241\207\46\177\10\142\210"
40	"\42\216\110\142\211\46\236\210\142\212\52\236\262\42\213"
41
42	"iso88596\0"
43	"\0\50"
44	"\240\0\0\0\0\244\0\0\0\0\0\0\0\0\0\142\266\2\0\0\0\0\0\0\0\0\0\0\0\0"
45	"\0\0\0\300\230\0\0\0\0\231\0\224\151\346\231\150\246\251\346\232"
46	"\154\266\351\346\233\160\306\51\347\234\164\326\151\347\235"
47	"\170\346\251\347\236\174\366\351\47\0\0\0\0\0\0\177\2\32\250\240"
48	"\203\22\132\250\241\207\42\232\250\242\213\62\332\250\243\217\102\32\51\0"
49	"\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0"
50
51	"iso88597\0"
52	"\0\50"
53	"\240\114\114\361\50\44\227\154\312\51\250\244\222\330\52\254\264\2\100\304"
54	"\260\304\42\313\54\212\55\306\330\55\215\71\366\330\56\220\365\22\231\144"
55	"\223\121\126\231\145\227\141\226\231\146\233\161\326\231\147"
56	"\237\201\26\232\150\243\221\6\100\151\246\235\206\132\152\252\255\306\132\153"
57	"\256\275\6\133\154\262\315\106\133\155\266\335\206\133\156\272\355\306\133\157"
58	"\276\375\6\134\160\302\15\107\134\161\306\35\207\134\162\312\55\307\134\163"
59	"\316\75\7\35\0"
60
61	"iso88598\0"
62	"\0\50"
63	"\240\0\40\312\50\244\224\142\312\51\250\244\162\315\52\254\264\342\312\53"
64	"\260\304\42\313\54\264\324\142\313\55\270\344\162\317\56\274\364\342\13\0"
65	"\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0"
66	"\0\0\0\200\304\102\16\111\144\221\106\36\211\144\222\112\56\311\144\223"
67	"\116\76\11\145\224\122\116\111\145\225\126\136\211\145\226\132\156\311\45\0"
68	"\0\64\354\60\0"
69
70	"iso88599\0"
71	"\0\64"
72	"\34\105\43\315\64\324\124\143\315\65\330\144\243\315\66\334\260\64\325\67"
73	"\340\204\43\316\70\344\224\143\316\71\350\244\243\316\72\354\264\343\316\73"
74	"\35\305\43\317\74\364\324\143\317\75\370\344\243\317\76\374\264\104\325\77"
75
76	"iso885910\0"
77	"\0\50"
78	"\240\20\44\21\110\50\231\4\323\51\65\101\124\325\126\162\265\362\125\120"
79	"\260\24\64\121\110\51\235\24\323\55\66\105\144\25\127\163\105\14\226\120"
80	"\0\5\43\314\60\304\24\143\214\112\14\45\143\321\62\24\65\343\314\63"
81	"\320\364\64\324\64\324\124\143\115\127\330\234\245\315\66\334\164\343\315\67"
82	"\1\205\43\316\70\344\224\143\316\112\15\245\163\321\72\25\265\343\316\73"
83	"\360\370\104\324\74\364\324\143\217\127\370\240\245\317\76\374\364\343\217\114"
84
85	"iso885911\0"
86	"tis620\0"
87	"\0\50"
88	"\240\170\372\51\250\241\212\72\52\251\245\232\172\52\252\251\252\272\52\253"
89	"\255\272\372\52\254\261\312\72\53\255\265\332\172\53\256\271\352\272\53\257"
90	"\275\372\372\53\260\301\12\73\54\261\305\32\173\54\262\311\52\273\54\263"
91	"\315\72\373\54\264\321\112\73\55\265\325\132\173\55\0\0\0\0\0\266"
92	"\331\152\273\55\267\335\172\373\55\270\341\212\73\56\271\345\232\173\56\272"
93	"\351\252\273\56\273\355\272\373\56\274\361\312\73\57\275\0\0\0\0\0"
94
95	"iso885913\0"
96	"\0\50"
97	"\240\134\54\312\50\244\140\154\312\51\330\244\262\324\52\254\264\342\212\61"
98	"\260\304\42\313\54\26\327\142\313\55\370\344\302\324\56\274\364\342\213\71"
99	"\4\251\4\220\101\304\24\143\221\104\14\45\343\26\105\40\301\204\122\115"
100	"\125\355\324\323\64\103\125\143\315\65\147\345\364\324\127\334\300\45\327\67"
101	"\5\255\24\320\101\344\224\163\321\104\15\245\363\126\105\41\305\224\222\115"
102	"\126\361\344\323\74\104\325\143\317\75\150\351\4\25\130\374\304\65\27\305"
103
104	"iso885914\0"
105	"\0\50"
106	"\240\324\153\357\50\12\55\164\357\51\3\247\122\60\276\11\267\342\112\133"
107	"\371\352\353\321\107\373\362\153\113\277\4\373\153\360\277\12\37\214\60\300"
108	"\300\4\43\314\60\304\24\143\314\61\310\44\243\314\62\314\64\343\314\63"
109	"\151\105\43\315\64\324\124\143\115\300\330\144\243\315\66\334\164\263\326\67"
110	"\340\204\43\316\70\344\224\143\316\71\350\244\243\316\72\354\264\343\316\73"
111	"\152\305\43\317\74\364\324\143\217\300\370\344\243\317\76\374\364\303\326\77"
112
113	"iso885915\0"
114	"latin9\0"
115	"\0\51"
116	"\44\227\122\325\51\126\245\242\312\52\254\264\342\312\53\260\304\42\313\54"
117	"\162\325\142\313\55\163\345\242\313\56\107\41\325\326\57\300\4\43\314\60"
118	"\304\24\143\314\61\310\44\243\314\62\314\64\343\314\63\320\104\43\315\64"
119	"\324\124\143\315\65\330\144\243\315\66\334\164\343\315\67\340\204\43\316\70"
120	"\344\224\143\316\71\350\244\243\316\72\354\264\343\316\73\360\304\43\317\74"
121	"\364\324\143\317\75\370\344\243\317\76\374\364\343\317\77"
122
123	"iso885916\0"
124	"\0\50"
125	"\240\20\124\120\116\44\143\134\325\51\126\245\222\327\52\156\265\362\26\134"
126	"\260\304\302\220\116\162\135\154\313\55\163\65\244\327\56\107\41\325\126\134"
127	"\300\4\43\214\100\304\30\144\314\61\310\44\243\314\62\314\64\343\314\63"
128	"\20\355\44\315\64\324\24\145\315\123\145\145\243\315\66\334\130\264\327\67"
129	"\340\204\43\316\100\344\34\144\316\71\350\244\243\316\72\354\264\343\316\73"
130	"\21\361\44\317\74\364\30\145\17\124\146\345\243\317\76\374\134\304\327\77"
131
132	"cp1250\0"
133	"windows1250\0"
134	"\0\40"
135	"\44\3\120\61\0\30\163\234\261\306\0\164\134\225\307\117\145\45\227\133"
136	"\0\114\114\261\305\27\157\374\60\304\0\234\154\325\307\120\151\65\327\133"
137	"\240\370\365\127\116\244\20\144\312\51\250\244\62\325\52\254\264\342\12\134"
138	"\260\304\22\230\116\264\324\142\313\55\270\24\104\325\56\67\15\206\123\134"
139	"\111\5\43\214\100\304\314\144\320\61\14\45\143\321\62\30\65\343\214\103"
140	"\20\355\364\323\64\324\24\145\315\65\115\215\245\115\131\334\164\163\325\67"
141	"\112\205\43\316\100\344\320\164\320\71\15\245\163\321\72\31\265\343\316\103"
142	"\21\361\4\324\74\364\30\145\317\75\116\221\245\217\131\374\364\203\25\140"
143
144	"cp1251\0"
145	"windows1251\0"
146	"\0\40"
147	"\322\115\127\161\210\30\163\234\261\306\44\167\234\235\307\332\161\267\235\167"
148	"\40\116\114\261\305\27\157\374\60\304\0\234\174\342\307\50\252\230\42\213"
149	"\240\164\267\42\166\244\264\150\312\51\321\245\102\335\52\254\264\342\312\165"
150	"\260\304\142\35\211\56\326\142\313\55\37\232\54\342\56\46\126\67\142\211"
151	"\337\201\27\236\170\343\221\127\236\171\347\241\227\236\172"
152	"\353\261\327\236\173\357\301\27\237\174\363\321\127\237\175"
153	"\367\341\227\237\176\373\361\327\237\177\377\1\30\240\200\3\22\130\240\201"
154	"\7\42\230\240\202\13\62\330\240\203\17\102\30\241\204\23\122\130\241\205"
155	"\27\142\230\241\206\33\162\330\241\207"
156
157	"cp1252\0"
158	"windows1252\0"
159	"\0\40"
160	"\44\3\120\61\135\30\163\234\261\306\175\165\134\225\307\107\1\40\27\0"
161	"\0\114\114\261\305\27\157\374\60\304\202\235\154\325\307\110\1\60\127\133"
162	"\240\204\42\312\50\244\224\142\312\51\250\244\242\312\52\254\264\342\312\53"
163	"\260\304\42\313\54\264\324\142\313\55\270\344\242\313\56\274\364\342\313\57"
164	"\300\4\43\314\60\304\24\143\314\61\310\44\243\314\62\314\64\343\314\63"
165	"\320\104\43\315\64\324\124\143\315\65\330\144\243\315\66\334\164\343\315\67"
166	"\340\204\43\316\70\344\224\143\316\71\350\244\243\316\72\354\264\343\316\73"
167	"\360\304\43\317\74\364\324\143\317\75\370\344\243\317\76\374\364\343\317\77"
168
169	"cp1253\0"
170	"windows1253\0"
171	"\0\40"
172	"\44\3\120\61\135\30\163\234\261\306\0\164\14\200\307\0\0\0\0\0"
173	"\0\114\114\261\305\27\157\374\60\304\0\234\14\300\307\0\0\0\0\0"
174	"\240\54\306\330\50\244\224\142\312\51\250\244\2\300\52\254\264\342\112\304"
175	"\260\304\42\313\54\212\325\142\313\55\215\71\366\330\56\220\365\22\231\144"
176	"\223\121\126\231\145\227\141\226\231\146\233\161\326\231\147"
177	"\237\201\26\232\150\243\221\6\100\151\246\235\206\132\152\252\255\306\132\153"
178	"\256\275\6\133\154\262\315\106\133\155\266\335\206\133\156\272\355\306\133\157"
179	"\276\375\6\134\160\302\15\107\134\161\306\35\207\134\162\312\55\307\134\163"
180	"\316\75\7\35\0"
181
182	"cp1254\0"
183	"windows1254\0"
184	"\0\40"
185	"\44\3\120\61\135\30\163\234\261\306\175\165\134\225\307\107\1\0\0\0"
186	"\0\114\114\261\305\27\157\374\60\304\202\235\154\325\307\110\1\0\100\133"
187	"\240\204\42\312\50\244\224\142\312\51\250\244\242\312\52\254\264\342\312\53"
188	"\260\304\42\313\54\264\324\142\313\55\270\344\242\313\56\274\364\342\313\57"
189	"\300\4\43\314\60\304\24\143\314\61\310\44\243\314\62\314\64\343\314\63"
190	"\34\105\43\315\64\324\124\143\315\65\330\144\243\315\66\334\260\64\325\67"
191	"\340\204\43\316\70\344\224\143\316\71\350\244\243\316\72\354\264\343\316\73"
192	"\35\305\43\317\74\364\324\143\317\75\370\344\243\317\76\374\264\104\325\77"
193
194	"cp1255\0"
195	"windows1255\0"
196	"\0\40"
197	"\44\3\120\61\135\30\163\234\261\306\175\165\14\200\307\0\0\0\0\0"
198	"\0\114\114\261\305\27\157\374\60\304\202\235\14\300\307\0\0\0\0\0"
199	"\240\204\42\312\50\42\227\142\312\51\250\244\162\315\52\254\264\342\312\53"
200	"\260\304\42\313\54\264\324\142\313\55\270\344\162\317\56\274\364\342\313\57"
201	"\57\302\30\243\214\63\322\130\243\215\67\342\10\100\216\72\356\310\143\217"
202	"\76\376\10\144\220\135\172\371\45\230\141\2\0\0\0\0\0\0\0\0\102\16\111\144\221"
203	"\106\36\211\144\222\112\56\311\144\223\116\76\11\145\224\122\116\111\145\225"
204	"\126\136\211\145\226\132\156\311\45\0\0\64\354\60\0"
205
206	"cp1256\0"
207	"windows1256\0"
208	"\0\40"
209	"\44\117\132\61\135\30\163\234\261\306\175\165\54\251\307\107\121\172\151\245"
210	"\231\116\114\261\305\27\157\374\60\304\230\236\154\351\307\110\55\314\260\246"
211	"\240\210\51\312\50\244\224\142\312\51\250\244\262\351\52\254\264\342\312\53"
212	"\260\304\42\313\54\264\324\142\313\55\270\344\62\346\56\274\364\342\13\231"
213	"\234\226\151\346\231\150\246\251\346\232\154\266\351\346\233"
214	"\160\306\51\347\234\164\326\151\347\235\170\346\251\347\65\173\362\331\247\237"
215	"\177\2\32\250\240\340\14\52\16\241\205\32\172\350\71\350\244\243\316\72"
216	"\210\46\352\316\73\212\56\312\150\243\364\70\372\350\75\220\346\23\351\76"
217	"\374\64\354\160\247"
218
219	"cp1257\0"
220	"windows1257\0"
221	"\0\40"
222	"\44\3\120\61\0\30\163\234\261\306\0\164\14\200\307\0\240\342\27\56"
223	"\0\114\114\261\305\27\157\374\60\304\0\234\14\300\307\0\274\22\30\0"
224	"\240\0\40\312\50\244\0\140\312\51\330\244\262\324\52\254\264\342\212\61"
225	"\260\304\42\313\54\264\324\142\313\55\370\344\302\324\56\274\364\342\213\71"
226	"\4\251\4\220\101\304\24\143\221\104\14\45\343\26\105\40\301\204\122\115"
227	"\125\355\324\323\64\103\125\143\315\65\147\345\364\324\127\334\300\45\327\67"
228	"\5\255\24\320\101\344\224\163\321\104\15\245\363\126\105\41\305\224\222\115"
229	"\126\361\344\323\74\104\325\143\317\75\150\351\4\25\130\374\304\65\27\140"
230
231	"cp1258\0"
232	"windows1258\0"
233	"\0\40"
234	"\44\3\120\61\135\30\163\234\261\306\175\165\14\200\307\107\1\0\0\0"
235	"\0\114\114\261\305\27\157\374\60\304\202\235\14\300\307\110\1\0\100\133"
236	"\240\204\42\312\50\244\224\142\312\51\250\244\242\312\52\254\264\342\312\53"
237	"\260\304\42\313\54\264\324\142\313\55\270\344\242\313\56\274\364\342\313\57"
238	"\300\4\43\214\100\304\24\143\314\61\310\44\243\314\62\204\65\343\314\63"
239	"\20\105\163\330\64\324\324\145\315\65\330\144\243\315\66\334\334\145\330\67"
240	"\340\204\43\316\100\344\224\143\316\71\350\244\243\316\72\205\265\343\316\73"
241	"\21\305\203\330\74\364\330\145\317\75\370\344\243\317\76\374\340\65\362\77"
242
243	"koi8r\0"
244	"\0\40"
245	"\63\323\134\263\315\67\343\234\263\316\73\363\334\363\326\134\167\355\365\327"
246	"\140\207\55\166\314\143\243\234\62\313\56\277\14\212\314\260\310\162\313\75"
247	"\76\377\14\364\207\101\13\75\64\321\105\33\175\64\322\111\53\275\64\323"
248	"\115\73\375\164\164\120\107\55\365\324\124\127\155\365\325\130\147\255\165\52"
249	"\35\376\7\140\205\3\22\70\241\200\24\36\210\140\202\12\56\310\140\203"
250	"\16\172\370\40\204\21\112\130\140\200\33\152\150\340\205\34\142\150\141\206"
251	"\375\175\7\136\175\343\221\67\237\170\364\235\207\136\172\352\255\307\136\173"
252	"\356\371\367\36\174\361\311\127\136\170\373\351\147\336\175"
253	"\374\341\147\137\176"
254
255	"koi8u\0"
256	"\0\40"
257	"\63\323\134\263\315\67\343\234\263\316\73\363\334\363\326\134\167\355\365\327"
258	"\140\207\55\166\314\143\243\234\62\313\56\277\14\212\314\260\310\162\313\75"
259	"\76\377\14\364\207\42\12\115\142\211\105\33\175\64\322\111\273\270\64\323"
260	"\115\73\375\164\164\324\105\155\335\165\124\127\155\365\325\130\267\250\165\52"
261	"\35\376\7\140\205\3\22\70\241\200\24\36\210\140\202\12\56\310\140\203"
262	"\16\172\370\40\204\21\112\130\140\200\33\152\150\340\205\34\142\150\141\206"
263	"\375\175\7\136\175\343\221\67\237\170\364\235\207\136\172\352\255\307\136\173"
264	"\356\371\367\36\174\361\311\127\136\170\373\351\147\336\175"
265	"\374\341\147\137\176"
266
267	"cp437\0"
268	"\0\40"
269	"\307\360\223\216\70\344\200\123\316\71\352\254\203\316\73\356\260\103\114\61"
270	"\311\230\143\14\75\366\310\263\117\76\377\130\303\215\50\243\224\22\62\135"
271	"\341\264\63\217\76\361\104\243\212\56\277\300\314\112\57\274\204\262\312\56"
272	"\140\207\55\66\315\72\77\15\65\321\103\107\375\163\321\113\53\235\264\315"
273	"\67\363\274\163\316\63\367\314\164\323\110\13\175\65\325\116\373\254\165\325"
274	"\126\113\75\365\321\106\3\35\164\326\130\343\134\163\327\134\173\375\365\326"
275	"\263\175\143\231\160\245\25\127\213\161\250\155\266\232\155\52\43\167\333\312"
276	"\55\307\362\262\313\61\313\174\17\313\260\240\174\113\312\40\313\62\66\50"
277
278	"cp850\0"
279	"\0\40"
280	"\307\360\223\216\70\344\200\123\316\71\352\254\203\316\73\356\260\103\114\61"
281	"\311\230\143\14\75\366\310\263\117\76\377\130\303\15\76\243\140\163\15\135"
282	"\341\264\63\217\76\361\104\243\212\56\277\270\302\112\57\274\204\262\312\56"
283	"\140\207\55\66\315\72\7\43\14\60\251\104\375\163\321\113\213\122\212\315"
284	"\67\363\274\163\316\63\367\74\316\60\110\13\175\65\325\116\373\254\65\51"
285	"\360\100\243\314\62\310\264\324\214\63\317\340\134\163\327\134\233\302\314\326"
286	"\323\174\103\215\64\365\124\123\213\77\336\150\263\115\66\375\164\363\12\55"
287	"\255\304\42\261\57\266\234\162\17\56\260\240\162\113\56\263\310\62\66\50"
288
289	"cp866\0"
290	"\0\40"
291	"\337\201\27\236\170\343\221\127\236\171\347\241\227\236\172"
292	"\353\261\327\236\173\357\301\27\237\174\363\321\127\237\175"
293	"\367\341\227\237\176\373\361\327\237\177\377\1\30\240\200\3\22\130\240\201"
294	"\7\42\230\240\202\13\62\330\240\203\140\207\55\66\315\72\77\15\65\321"
295	"\103\107\375\163\321\113\53\235\264\315\67\363\274\163\316\63\367\314\164\323"
296	"\110\13\175\65\325\116\373\254\165\325\126\113\75\365\321\106\3\35\164\326"
297	"\130\343\134\163\327\134\173\375\365\326\17\102\30\241\204\23\122\130\241\205"
298	"\27\142\230\241\206\33\162\330\241\207\321\175\110\235\210\327\225\330\335\212"
299	"\260\240\174\113\312\46\223\62\66\50"
300
301	"ibm1047\0"
302	"cp1047\0"
303	"\0\1"
304	"\234\44\140\310\37\227\64\342\310\2\14\64\340\300\3\20\104\40\301\4"
305	"\235\24\202\300\41\30\144\40\311\43\34\164\340\301\7\200\4\42\310\40"
306	"\204\50\160\301\6\210\44\242\310\42\214\24\140\300\1\220\104\142\301\44"
307	"\224\124\142\11\1\230\144\242\311\46\24\124\340\211\6\40\200\42\16\71"
308	"\340\204\63\116\71\347\304\43\212\13\74\240\260\2\37\46\244\243\316\72"
309	"\350\264\343\316\73\354\174\23\2\11\52\244\260\203\27\55\274\40\14\61"
310	"\300\4\63\114\61\307\104\143\12\13\45\174\341\303\17\370\44\243\314\62"
311	"\310\64\343\314\63\314\200\241\303\10\100\234\320\203\10\330\204\41\306\30"
312	"\144\224\141\306\31\150\244\261\312\56\360\364\343\117\54\260\250\261\6\33"
313	"\155\270\361\6\34\161\310\241\212\56\346\340\142\14\51\265\370\61\7\35"
314	"\165\330\161\7\36\171\350\21\312\57\320\154\341\215\53\254\214\122\312\55"
315	"\251\234\142\13\57\275\370\322\15\52\257\164\101\313\65\173\4\41\304\20"
316	"\104\24\141\304\21\110\44\321\12\75\366\310\63\117\75\175\50\261\4\23"
317	"\115\70\361\4\24\121\110\221\313\76\374\344\243\317\77\134\334\63\5\25"
318	"\125\130\161\5\26\131\150\41\13\65\326\110\63\115\65\60\304\40\303\14"
319	"\64\324\140\303\15\70\344\60\313\66\334\144\243\315\47"
320

lib/libc/wasi/libc-top-half/musl/src/locale/duplocale.c deleted-20

...	@@ -1,20 +0,0 @@
1	#include <stdlib.h>
2	#include <string.h>
3	#include "locale_impl.h"
4	#include "libc.h"
5
6	#define malloc __libc_malloc
7	#define calloc undef
8	#define realloc undef
9	#define free undef
10
11	locale_t __duplocale(locale_t old)
12	{
13	locale_t new = malloc(sizeof *new);
14	if (!new) return 0;
15	if (old == LC_GLOBAL_LOCALE) old = &libc.global_locale;
16	new = old;
17	return new;
18	}
19
20	weak_alias(__duplocale, duplocale);

lib/libc/wasi/libc-top-half/musl/src/locale/freelocale.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <stdlib.h>
2	#include "locale_impl.h"
3
4	#define malloc undef
5	#define calloc undef
6	#define realloc undef
7	#define free __libc_free
8
9	void freelocale(locale_t l)
10	{
11	if (__loc_is_allocated(l)) free(l);
12	}
13
14	weak_alias(freelocale, __freelocale);

lib/libc/wasi/libc-top-half/musl/src/locale/gb18030.h deleted-1866

...	@@ -1,1866 +0,0 @@
1	19970,19972,19973,19974,19983,19986,19991,19999,20000,20001,20003,20006,20009,
2	20014,20015,20017,20019,20021,20023,20028,20032,20033,20034,20036,20038,20042,
3	20049,20053,20055,20058,20059,20066,20067,20068,20069,20071,20072,20074,20075,
4	20076,20077,20078,20079,20082,20084,20085,20086,20087,20088,20089,20090,20091,
5	20092,20093,20095,20096,20097,20098,20099,20100,20101,20103,20106,20112,20118,
6	20119,20121,20124,20125,20126,20131,20138,20143,20144,20145,20148,20150,20151,
7	20152,20153,20156,20157,20158,20168,20172,20175,20176,20178,20186,20187,20188,
8	20192,20194,20198,20199,20201,20205,20206,20207,20209,20212,20216,20217,20218,
9	20220,20222,20224,20226,20227,20228,20229,20230,20231,20232,20235,20236,20242,
10	20243,20244,20245,20246,20252,20253,20257,20259,20264,20265,20268,20269,20270,
11	20273,20275,20277,20279,20281,20283,20286,20287,20288,20289,20290,20292,20293,
12	20295,20296,20297,20298,20299,20300,20306,20308,20310,20321,20322,20326,20328,
13	20330,20331,20333,20334,20337,20338,20341,20343,20344,20345,20346,20349,20352,
14	20353,20354,20357,20358,20359,20362,20364,20366,20368,20370,20371,20373,20374,
15	20376,20377,20378,20380,20382,20383,20385,20386,20388,20395,20397,20400,20401,
16	20402,20403,20404,20406,20407,20408,20409,20410,20411,20412,20413,20414,20416,
17	20417,20418,20422,20423,20424,20425,20427,20428,20429,20434,20435,20436,20437,
18	20438,20441,20443,20448,20450,20452,20453,20455,20459,20460,20464,20466,20468,
19	20469,20470,20471,20473,20475,20476,20477,20479,20480,20481,20482,20483,20484,
20	20485,20486,20487,20488,20489,20490,20491,20494,
21	20496,20497,20499,20501,20502,20503,20507,20509,20510,20512,20514,20515,20516,
22	20519,20523,20527,20528,20529,20530,20531,20532,20533,20534,20535,20536,20537,
23	20539,20541,20543,20544,20545,20546,20548,20549,20550,20553,20554,20555,20557,
24	20560,20561,20562,20563,20564,20566,20567,20568,20569,20571,20573,20574,20575,
25	20576,20577,20578,20579,20580,20582,20583,20584,20585,20586,20587,20589,20590,
26	20591,20592,20593,20594,20595,20596,20597,20600,20601,20602,20604,20605,20609,
27	20610,20611,20612,20614,20615,20617,20618,20619,20620,20622,20623,20624,20625,
28	20626,20627,20628,20629,20630,20631,20632,20633,20634,20635,20636,20637,20638,
29	20639,20640,20641,20642,20644,20646,20650,20651,20653,20654,20655,20656,20657,
30	20659,20660,20661,20662,20663,20664,20665,20668,20669,20670,20671,20672,20673,
31	20674,20675,20676,20677,20678,20679,20680,20681,20682,20683,20684,20685,20686,
32	20688,20689,20690,20691,20692,20693,20695,20696,20697,20699,20700,20701,20702,
33	20703,20704,20705,20706,20707,20708,20709,20712,20713,20714,20715,20719,20720,
34	20721,20722,20724,20726,20727,20728,20729,20730,20732,20733,20734,20735,20736,
35	20737,20738,20739,20740,20741,20744,20745,20746,20748,20749,20750,20751,20752,
36	20753,20755,20756,20757,20758,20759,20760,20761,20762,20763,20764,20765,20766,
37	20767,20768,20770,20771,20772,20773,20774,20775,20776,20777,20778,20779,20780,
38	20781,20782,20783,20784,20785,20786,20787,20788,20789,20790,20791,20792,20793,
39	20794,20795,20796,20797,20798,20802,20807,20810,20812,20814,20815,20816,20818,
40	20819,20823,20824,20825,20827,20829,20830,20831,20832,
41	20833,20835,20836,20838,20839,20841,20842,20847,20850,20858,20862,20863,20867,
42	20868,20870,20871,20874,20875,20878,20879,20880,20881,20883,20884,20888,20890,
43	20893,20894,20895,20897,20899,20902,20903,20904,20905,20906,20909,20910,20916,
44	20920,20921,20922,20926,20927,20929,20930,20931,20933,20936,20938,20941,20942,
45	20944,20946,20947,20948,20949,20950,20951,20952,20953,20954,20956,20958,20959,
46	20962,20963,20965,20966,20967,20968,20969,20970,20972,20974,20977,20978,20980,
47	20983,20990,20996,20997,21001,21003,21004,21007,21008,21011,21012,21013,21020,
48	21022,21023,21025,21026,21027,21029,21030,21031,21034,21036,21039,21041,21042,
49	21044,21045,21052,21054,21060,21061,21062,21063,21064,21065,21067,21070,21071,
50	21074,21075,21077,21079,21080,21081,21082,21083,21085,21087,21088,21090,21091,
51	21092,21094,21096,21099,21100,21101,21102,21104,21105,21107,21108,21109,21110,
52	21111,21112,21113,21114,21115,21116,21118,21120,21123,21124,21125,21126,21127,
53	21129,21130,21131,21132,21133,21134,21135,21137,21138,21140,21141,21142,21143,
54	21144,21145,21146,21148,21156,21157,21158,21159,21166,21167,21168,21172,21173,
55	21174,21175,21176,21177,21178,21179,21180,21181,21184,21185,21186,21188,21189,
56	21190,21192,21194,21196,21197,21198,21199,21201,21203,21204,21205,21207,21209,
57	21210,21211,21212,21213,21214,21216,21217,21218,21219,21221,21222,21223,21224,
58	21225,21226,21227,21228,21229,21230,21231,21233,21234,21235,21236,21237,21238,
59	21239,21240,21243,21244,21245,21249,21250,21251,21252,21255,21257,21258,21259,
60	21260,21262,21265,21266,21267,21268,21272,21275,21276,
61	21278,21279,21282,21284,21285,21287,21288,21289,21291,21292,21293,21295,21296,
62	21297,21298,21299,21300,21301,21302,21303,21304,21308,21309,21312,21314,21316,
63	21318,21323,21324,21325,21328,21332,21336,21337,21339,21341,21349,21352,21354,
64	21356,21357,21362,21366,21369,21371,21372,21373,21374,21376,21377,21379,21383,
65	21384,21386,21390,21391,21392,21393,21394,21395,21396,21398,21399,21401,21403,
66	21404,21406,21408,21409,21412,21415,21418,21419,21420,21421,21423,21424,21425,
67	21426,21427,21428,21429,21431,21432,21433,21434,21436,21437,21438,21440,21443,
68	21444,21445,21446,21447,21454,21455,21456,21458,21459,21461,21466,21468,21469,
69	21470,21473,21474,21479,21492,21498,21502,21503,21504,21506,21509,21511,21515,
70	21524,21528,21529,21530,21532,21538,21540,21541,21546,21552,21555,21558,21559,
71	21562,21565,21567,21569,21570,21572,21573,21575,21577,21580,21581,21582,21583,
72	21585,21594,21597,21598,21599,21600,21601,21603,21605,21607,21609,21610,21611,
73	21612,21613,21614,21615,21616,21620,21625,21626,21630,21631,21633,21635,21637,
74	21639,21640,21641,21642,21645,21649,21651,21655,21656,21660,21662,21663,21664,
75	21665,21666,21669,21678,21680,21682,21685,21686,21687,21689,21690,21692,21694,
76	21699,21701,21706,21707,21718,21720,21723,21728,21729,21730,21731,21732,21739,
77	21740,21743,21744,21745,21748,21749,21750,21751,21752,21753,21755,21758,21760,
78	21762,21763,21764,21765,21768,21770,21771,21772,21773,21774,21778,21779,21781,
79	21782,21783,21784,21785,21786,21788,21789,21790,21791,21793,21797,21798,21800,
80	21801,21803,21805,21810,21812,21813,21814,21816,21817,
81	21818,21819,21821,21824,21826,21829,21831,21832,21835,21836,21837,21838,21839,
82	21841,21842,21843,21844,21847,21848,21849,21850,21851,21853,21854,21855,21856,
83	21858,21859,21864,21865,21867,21871,21872,21873,21874,21875,21876,21881,21882,
84	21885,21887,21893,21894,21900,21901,21902,21904,21906,21907,21909,21910,21911,
85	21914,21915,21918,21920,21921,21922,21923,21924,21925,21926,21928,21929,21930,
86	21931,21932,21933,21934,21935,21936,21938,21940,21942,21944,21946,21948,21951,
87	21952,21953,21954,21955,21958,21959,21960,21962,21963,21966,21967,21968,21973,
88	21975,21976,21977,21978,21979,21982,21984,21986,21991,21993,21997,21998,22000,
89	22001,22004,22006,22008,22009,22010,22011,22012,22015,22018,22019,22020,22021,
90	22022,22023,22026,22027,22029,22032,22033,22034,22035,22036,22037,22038,22039,
91	22041,22042,22044,22045,22048,22049,22050,22053,22054,22056,22057,22058,22059,
92	22062,22063,22064,22067,22069,22071,22072,22074,22076,22077,22078,22080,22081,
93	22082,22083,22084,22085,22086,22087,22088,22089,22090,22091,22095,22096,22097,
94	22098,22099,22101,22102,22106,22107,22109,22110,22111,22112,22113,22115,22117,
95	22118,22119,22125,22126,22127,22128,22130,22131,22132,22133,22135,22136,22137,
96	22138,22141,22142,22143,22144,22145,22146,22147,22148,22151,22152,22153,22154,
97	22155,22156,22157,22160,22161,22162,22164,22165,22166,22167,22168,22169,22170,
98	22171,22172,22173,22174,22175,22176,22177,22178,22180,22181,22182,22183,22184,
99	22185,22186,22187,22188,22189,22190,22192,22193,22194,22195,22196,22197,22198,
100	22200,22201,22202,22203,22205,22206,22207,22208,22209,
101	22210,22211,22212,22213,22214,22215,22216,22217,22219,22220,22221,22222,22223,
102	22224,22225,22226,22227,22229,22230,22232,22233,22236,22243,22245,22246,22247,
103	22248,22249,22250,22252,22254,22255,22258,22259,22262,22263,22264,22267,22268,
104	22272,22273,22274,22277,22279,22283,22284,22285,22286,22287,22288,22289,22290,
105	22291,22292,22293,22294,22295,22296,22297,22298,22299,22301,22302,22304,22305,
106	22306,22308,22309,22310,22311,22315,22321,22322,22324,22325,22326,22327,22328,
107	22332,22333,22335,22337,22339,22340,22341,22342,22344,22345,22347,22354,22355,
108	22356,22357,22358,22360,22361,22370,22371,22373,22375,22380,22382,22384,22385,
109	22386,22388,22389,22392,22393,22394,22397,22398,22399,22400,22401,22407,22408,
110	22409,22410,22413,22414,22415,22416,22417,22420,22421,22422,22423,22424,22425,
111	22426,22428,22429,22430,22431,22437,22440,22442,22444,22447,22448,22449,22451,
112	22453,22454,22455,22457,22458,22459,22460,22461,22462,22463,22464,22465,22468,
113	22469,22470,22471,22472,22473,22474,22476,22477,22480,22481,22483,22486,22487,
114	22491,22492,22494,22497,22498,22499,22501,22502,22503,22504,22505,22506,22507,
115	22508,22510,22512,22513,22514,22515,22517,22518,22519,22523,22524,22526,22527,
116	22529,22531,22532,22533,22536,22537,22538,22540,22542,22543,22544,22546,22547,
117	22548,22550,22551,22552,22554,22555,22556,22557,22559,22562,22563,22565,22566,
118	22567,22568,22569,22571,22572,22573,22574,22575,22577,22578,22579,22580,22582,
119	22583,22584,22585,22586,22587,22588,22589,22590,22591,22592,22593,22594,22595,
120	22597,22598,22599,22600,22601,22602,22603,22606,22607,
121	22608,22610,22611,22613,22614,22615,22617,22618,22619,22620,22621,22623,22624,
122	22625,22626,22627,22628,22630,22631,22632,22633,22634,22637,22638,22639,22640,
123	22641,22642,22643,22644,22645,22646,22647,22648,22649,22650,22651,22652,22653,
124	22655,22658,22660,22662,22663,22664,22666,22667,22668,22669,22670,22671,22672,
125	22673,22676,22677,22678,22679,22680,22683,22684,22685,22688,22689,22690,22691,
126	22692,22693,22694,22695,22698,22699,22700,22701,22702,22703,22704,22705,22706,
127	22707,22708,22709,22710,22711,22712,22713,22714,22715,22717,22718,22719,22720,
128	22722,22723,22724,22726,22727,22728,22729,22730,22731,22732,22733,22734,22735,
129	22736,22738,22739,22740,22742,22743,22744,22745,22746,22747,22748,22749,22750,
130	22751,22752,22753,22754,22755,22757,22758,22759,22760,22761,22762,22765,22767,
131	22769,22770,22772,22773,22775,22776,22778,22779,22780,22781,22782,22783,22784,
132	22785,22787,22789,22790,22792,22793,22794,22795,22796,22798,22800,22801,22802,
133	22803,22807,22808,22811,22813,22814,22816,22817,22818,22819,22822,22824,22828,
134	22832,22834,22835,22837,22838,22843,22845,22846,22847,22848,22851,22853,22854,
135	22858,22860,22861,22864,22866,22867,22873,22875,22876,22877,22878,22879,22881,
136	22883,22884,22886,22887,22888,22889,22890,22891,22892,22893,22894,22895,22896,
137	22897,22898,22901,22903,22906,22907,22908,22910,22911,22912,22917,22921,22923,
138	22924,22926,22927,22928,22929,22932,22933,22936,22938,22939,22940,22941,22943,
139	22944,22945,22946,22950,22951,22956,22957,22960,22961,22963,22964,22965,22966,
140	22967,22968,22970,22972,22973,22975,22976,22977,22978,
141	22979,22980,22981,22983,22984,22985,22988,22989,22990,22991,22997,22998,23001,
142	23003,23006,23007,23008,23009,23010,23012,23014,23015,23017,23018,23019,23021,
143	23022,23023,23024,23025,23026,23027,23028,23029,23030,23031,23032,23034,23036,
144	23037,23038,23040,23042,23050,23051,23053,23054,23055,23056,23058,23060,23061,
145	23062,23063,23065,23066,23067,23069,23070,23073,23074,23076,23078,23079,23080,
146	23082,23083,23084,23085,23086,23087,23088,23091,23093,23095,23096,23097,23098,
147	23099,23101,23102,23103,23105,23106,23107,23108,23109,23111,23112,23115,23116,
148	23117,23118,23119,23120,23121,23122,23123,23124,23126,23127,23128,23129,23131,
149	23132,23133,23134,23135,23136,23137,23139,23140,23141,23142,23144,23145,23147,
150	23148,23149,23150,23151,23152,23153,23154,23155,23160,23161,23163,23164,23165,
151	23166,23168,23169,23170,23171,23172,23173,23174,23175,23176,23177,23178,23179,
152	23180,23181,23182,23183,23184,23185,23187,23188,23189,23190,23191,23192,23193,
153	23196,23197,23198,23199,23200,23201,23202,23203,23204,23205,23206,23207,23208,
154	23209,23211,23212,23213,23214,23215,23216,23217,23220,23222,23223,23225,23226,
155	23227,23228,23229,23231,23232,23235,23236,23237,23238,23239,23240,23242,23243,
156	23245,23246,23247,23248,23249,23251,23253,23255,23257,23258,23259,23261,23262,
157	23263,23266,23268,23269,23271,23272,23274,23276,23277,23278,23279,23280,23282,
158	23283,23284,23285,23286,23287,23288,23289,23290,23291,23292,23293,23294,23295,
159	23296,23297,23298,23299,23300,23301,23302,23303,23304,23306,23307,23308,23309,
160	23310,23311,23312,23313,23314,23315,23316,23317,23320,
161	23321,23322,23323,23324,23325,23326,23327,23328,23329,23330,23331,23332,23333,
162	23334,23335,23336,23337,23338,23339,23340,23341,23342,23343,23344,23345,23347,
163	23349,23350,23352,23353,23354,23355,23356,23357,23358,23359,23361,23362,23363,
164	23364,23365,23366,23367,23368,23369,23370,23371,23372,23373,23374,23375,23378,
165	23382,23390,23392,23393,23399,23400,23403,23405,23406,23407,23410,23412,23414,
166	23415,23416,23417,23419,23420,23422,23423,23426,23430,23434,23437,23438,23440,
167	23441,23442,23444,23446,23455,23463,23464,23465,23468,23469,23470,23471,23473,
168	23474,23479,23482,23483,23484,23488,23489,23491,23496,23497,23498,23499,23501,
169	23502,23503,23505,23508,23509,23510,23511,23512,23513,23514,23515,23516,23520,
170	23522,23523,23526,23527,23529,23530,23531,23532,23533,23535,23537,23538,23539,
171	23540,23541,23542,23543,23549,23550,23552,23554,23555,23557,23559,23560,23563,
172	23564,23565,23566,23568,23570,23571,23575,23577,23579,23582,23583,23584,23585,
173	23587,23590,23592,23593,23594,23595,23597,23598,23599,23600,23602,23603,23605,
174	23606,23607,23619,23620,23622,23623,23628,23629,23634,23635,23636,23638,23639,
175	23640,23642,23643,23644,23645,23647,23650,23652,23655,23656,23657,23658,23659,
176	23660,23661,23664,23666,23667,23668,23669,23670,23671,23672,23675,23676,23677,
177	23678,23680,23683,23684,23685,23686,23687,23689,23690,23691,23694,23695,23698,
178	23699,23701,23709,23710,23711,23712,23713,23716,23717,23718,23719,23720,23722,
179	23726,23727,23728,23730,23732,23734,23737,23738,23739,23740,23742,23744,23746,
180	23747,23749,23750,23751,23752,23753,23754,23756,23757,
181	23758,23759,23760,23761,23763,23764,23765,23766,23767,23768,23770,23771,23772,
182	23773,23774,23775,23776,23778,23779,23783,23785,23787,23788,23790,23791,23793,
183	23794,23795,23796,23797,23798,23799,23800,23801,23802,23804,23805,23806,23807,
184	23808,23809,23812,23813,23816,23817,23818,23819,23820,23821,23823,23824,23825,
185	23826,23827,23829,23831,23832,23833,23834,23836,23837,23839,23840,23841,23842,
186	23843,23845,23848,23850,23851,23852,23855,23856,23857,23858,23859,23861,23862,
187	23863,23864,23865,23866,23867,23868,23871,23872,23873,23874,23875,23876,23877,
188	23878,23880,23881,23885,23886,23887,23888,23889,23890,23891,23892,23893,23894,
189	23895,23897,23898,23900,23902,23903,23904,23905,23906,23907,23908,23909,23910,
190	23911,23912,23914,23917,23918,23920,23921,23922,23923,23925,23926,23927,23928,
191	23929,23930,23931,23932,23933,23934,23935,23936,23937,23939,23940,23941,23942,
192	23943,23944,23945,23946,23947,23948,23949,23950,23951,23952,23953,23954,23955,
193	23956,23957,23958,23959,23960,23962,23963,23964,23966,23967,23968,23969,23970,
194	23971,23972,23973,23974,23975,23976,23977,23978,23979,23980,23981,23982,23983,
195	23984,23985,23986,23987,23988,23989,23990,23992,23993,23994,23995,23996,23997,
196	23998,23999,24000,24001,24002,24003,24004,24006,24007,24008,24009,24010,24011,
197	24012,24014,24015,24016,24017,24018,24019,24020,24021,24022,24023,24024,24025,
198	24026,24028,24031,24032,24035,24036,24042,24044,24045,24048,24053,24054,24056,
199	24057,24058,24059,24060,24063,24064,24068,24071,24073,24074,24075,24077,24078,
200	24082,24083,24087,24094,24095,24096,24097,24098,24099,
201	24100,24101,24104,24105,24106,24107,24108,24111,24112,24114,24115,24116,24117,
202	24118,24121,24122,24126,24127,24128,24129,24131,24134,24135,24136,24137,24138,
203	24139,24141,24142,24143,24144,24145,24146,24147,24150,24151,24152,24153,24154,
204	24156,24157,24159,24160,24163,24164,24165,24166,24167,24168,24169,24170,24171,
205	24172,24173,24174,24175,24176,24177,24181,24183,24185,24190,24193,24194,24195,
206	24197,24200,24201,24204,24205,24206,24210,24216,24219,24221,24225,24226,24227,
207	24228,24232,24233,24234,24235,24236,24238,24239,24240,24241,24242,24244,24250,
208	24251,24252,24253,24255,24256,24257,24258,24259,24260,24261,24262,24263,24264,
209	24267,24268,24269,24270,24271,24272,24276,24277,24279,24280,24281,24282,24284,
210	24285,24286,24287,24288,24289,24290,24291,24292,24293,24294,24295,24297,24299,
211	24300,24301,24302,24303,24304,24305,24306,24307,24309,24312,24313,24315,24316,
212	24317,24325,24326,24327,24329,24332,24333,24334,24336,24338,24340,24342,24345,
213	24346,24348,24349,24350,24353,24354,24355,24356,24360,24363,24364,24366,24368,
214	24370,24371,24372,24373,24374,24375,24376,24379,24381,24382,24383,24385,24386,
215	24387,24388,24389,24390,24391,24392,24393,24394,24395,24396,24397,24398,24399,
216	24401,24404,24409,24410,24411,24412,24414,24415,24416,24419,24421,24423,24424,
217	24427,24430,24431,24434,24436,24437,24438,24440,24442,24445,24446,24447,24451,
218	24454,24461,24462,24463,24465,24467,24468,24470,24474,24475,24477,24478,24479,
219	24480,24482,24483,24484,24485,24486,24487,24489,24491,24492,24495,24496,24497,
220	24498,24499,24500,24502,24504,24505,24506,24507,24510,
221	24511,24512,24513,24514,24519,24520,24522,24523,24526,24531,24532,24533,24538,
222	24539,24540,24542,24543,24546,24547,24549,24550,24552,24553,24556,24559,24560,
223	24562,24563,24564,24566,24567,24569,24570,24572,24583,24584,24585,24587,24588,
224	24592,24593,24595,24599,24600,24602,24606,24607,24610,24611,24612,24620,24621,
225	24622,24624,24625,24626,24627,24628,24630,24631,24632,24633,24634,24637,24638,
226	24640,24644,24645,24646,24647,24648,24649,24650,24652,24654,24655,24657,24659,
227	24660,24662,24663,24664,24667,24668,24670,24671,24672,24673,24677,24678,24686,
228	24689,24690,24692,24693,24695,24702,24704,24705,24706,24709,24710,24711,24712,
229	24714,24715,24718,24719,24720,24721,24723,24725,24727,24728,24729,24732,24734,
230	24737,24738,24740,24741,24743,24745,24746,24750,24752,24755,24757,24758,24759,
231	24761,24762,24765,24766,24767,24768,24769,24770,24771,24772,24775,24776,24777,
232	24780,24781,24782,24783,24784,24786,24787,24788,24790,24791,24793,24795,24798,
233	24801,24802,24803,24804,24805,24810,24817,24818,24821,24823,24824,24827,24828,
234	24829,24830,24831,24834,24835,24836,24837,24839,24842,24843,24844,24848,24849,
235	24850,24851,24852,24854,24855,24856,24857,24859,24860,24861,24862,24865,24866,
236	24869,24872,24873,24874,24876,24877,24878,24879,24880,24881,24882,24883,24884,
237	24885,24886,24887,24888,24889,24890,24891,24892,24893,24894,24896,24897,24898,
238	24899,24900,24901,24902,24903,24905,24907,24909,24911,24912,24914,24915,24916,
239	24918,24919,24920,24921,24922,24923,24924,24926,24927,24928,24929,24931,24932,
240	24933,24934,24937,24938,24939,24940,24941,24942,24943,
241	24945,24946,24947,24948,24950,24952,24953,24954,24955,24956,24957,24958,24959,
242	24960,24961,24962,24963,24964,24965,24966,24967,24968,24969,24970,24972,24973,
243	24975,24976,24977,24978,24979,24981,24982,24983,24984,24985,24986,24987,24988,
244	24990,24991,24992,24993,24994,24995,24996,24997,24998,25002,25003,25005,25006,
245	25007,25008,25009,25010,25011,25012,25013,25014,25016,25017,25018,25019,25020,
246	25021,25023,25024,25025,25027,25028,25029,25030,25031,25033,25036,25037,25038,
247	25039,25040,25043,25045,25046,25047,25048,25049,25050,25051,25052,25053,25054,
248	25055,25056,25057,25058,25059,25060,25061,25063,25064,25065,25066,25067,25068,
249	25069,25070,25071,25072,25073,25074,25075,25076,25078,25079,25080,25081,25082,
250	25083,25084,25085,25086,25088,25089,25090,25091,25092,25093,25095,25097,25107,
251	25108,25113,25116,25117,25118,25120,25123,25126,25127,25128,25129,25131,25133,
252	25135,25136,25137,25138,25141,25142,25144,25145,25146,25147,25148,25154,25156,
253	25157,25158,25162,25167,25168,25173,25174,25175,25177,25178,25180,25181,25182,
254	25183,25184,25185,25186,25188,25189,25192,25201,25202,25204,25205,25207,25208,
255	25210,25211,25213,25217,25218,25219,25221,25222,25223,25224,25227,25228,25229,
256	25230,25231,25232,25236,25241,25244,25245,25246,25251,25254,25255,25257,25258,
257	25261,25262,25263,25264,25266,25267,25268,25270,25271,25272,25274,25278,25280,
258	25281,25283,25291,25295,25297,25301,25309,25310,25312,25313,25316,25322,25323,
259	25328,25330,25333,25336,25337,25338,25339,25344,25347,25348,25349,25350,25354,
260	25355,25356,25357,25359,25360,25362,25363,25364,25365,
261	25367,25368,25369,25372,25382,25383,25385,25388,25389,25390,25392,25393,25395,
262	25396,25397,25398,25399,25400,25403,25404,25406,25407,25408,25409,25412,25415,
263	25416,25418,25425,25426,25427,25428,25430,25431,25432,25433,25434,25435,25436,
264	25437,25440,25444,25445,25446,25448,25450,25451,25452,25455,25456,25458,25459,
265	25460,25461,25464,25465,25468,25469,25470,25471,25473,25475,25476,25477,25478,
266	25483,25485,25489,25491,25492,25493,25495,25497,25498,25499,25500,25501,25502,
267	25503,25505,25508,25510,25515,25519,25521,25522,25525,25526,25529,25531,25533,
268	25535,25536,25537,25538,25539,25541,25543,25544,25546,25547,25548,25553,25555,
269	25556,25557,25559,25560,25561,25562,25563,25564,25565,25567,25570,25572,25573,
270	25574,25575,25576,25579,25580,25582,25583,25584,25585,25587,25589,25591,25593,
271	25594,25595,25596,25598,25603,25604,25606,25607,25608,25609,25610,25613,25614,
272	25617,25618,25621,25622,25623,25624,25625,25626,25629,25631,25634,25635,25636,
273	25637,25639,25640,25641,25643,25646,25647,25648,25649,25650,25651,25653,25654,
274	25655,25656,25657,25659,25660,25662,25664,25666,25667,25673,25675,25676,25677,
275	25678,25679,25680,25681,25683,25685,25686,25687,25689,25690,25691,25692,25693,
276	25695,25696,25697,25698,25699,25700,25701,25702,25704,25706,25707,25708,25710,
277	25711,25712,25713,25714,25715,25716,25717,25718,25719,25723,25724,25725,25726,
278	25727,25728,25729,25731,25734,25736,25737,25738,25739,25740,25741,25742,25743,
279	25744,25747,25748,25751,25752,25754,25755,25756,25757,25759,25760,25761,25762,
280	25763,25765,25766,25767,25768,25770,25771,25775,25777,
281	25778,25779,25780,25782,25785,25787,25789,25790,25791,25793,25795,25796,25798,
282	25799,25800,25801,25802,25803,25804,25807,25809,25811,25812,25813,25814,25817,
283	25818,25819,25820,25821,25823,25824,25825,25827,25829,25831,25832,25833,25834,
284	25835,25836,25837,25838,25839,25840,25841,25842,25843,25844,25845,25846,25847,
285	25848,25849,25850,25851,25852,25853,25854,25855,25857,25858,25859,25860,25861,
286	25862,25863,25864,25866,25867,25868,25869,25870,25871,25872,25873,25875,25876,
287	25877,25878,25879,25881,25882,25883,25884,25885,25886,25887,25888,25889,25890,
288	25891,25892,25894,25895,25896,25897,25898,25900,25901,25904,25905,25906,25907,
289	25911,25914,25916,25917,25920,25921,25922,25923,25924,25926,25927,25930,25931,
290	25933,25934,25936,25938,25939,25940,25943,25944,25946,25948,25951,25952,25953,
291	25956,25957,25959,25960,25961,25962,25965,25966,25967,25969,25971,25973,25974,
292	25976,25977,25978,25979,25980,25981,25982,25983,25984,25985,25986,25987,25988,
293	25989,25990,25992,25993,25994,25997,25998,25999,26002,26004,26005,26006,26008,
294	26010,26013,26014,26016,26018,26019,26022,26024,26026,26028,26030,26033,26034,
295	26035,26036,26037,26038,26039,26040,26042,26043,26046,26047,26048,26050,26055,
296	26056,26057,26058,26061,26064,26065,26067,26068,26069,26072,26073,26074,26075,
297	26076,26077,26078,26079,26081,26083,26084,26090,26091,26098,26099,26100,26101,
298	26104,26105,26107,26108,26109,26110,26111,26113,26116,26117,26119,26120,26121,
299	26123,26125,26128,26129,26130,26134,26135,26136,26138,26139,26140,26142,26145,
300	26146,26147,26148,26150,26153,26154,26155,26156,26158,
301	26160,26162,26163,26167,26168,26169,26170,26171,26173,26175,26176,26178,26180,
302	26181,26182,26183,26184,26185,26186,26189,26190,26192,26193,26200,26201,26203,
303	26204,26205,26206,26208,26210,26211,26213,26215,26217,26218,26219,26220,26221,
304	26225,26226,26227,26229,26232,26233,26235,26236,26237,26239,26240,26241,26243,
305	26245,26246,26248,26249,26250,26251,26253,26254,26255,26256,26258,26259,26260,
306	26261,26264,26265,26266,26267,26268,26270,26271,26272,26273,26274,26275,26276,
307	26277,26278,26281,26282,26283,26284,26285,26287,26288,26289,26290,26291,26293,
308	26294,26295,26296,26298,26299,26300,26301,26303,26304,26305,26306,26307,26308,
309	26309,26310,26311,26312,26313,26314,26315,26316,26317,26318,26319,26320,26321,
310	26322,26323,26324,26325,26326,26327,26328,26330,26334,26335,26336,26337,26338,
311	26339,26340,26341,26343,26344,26346,26347,26348,26349,26350,26351,26353,26357,
312	26358,26360,26362,26363,26365,26369,26370,26371,26372,26373,26374,26375,26380,
313	26382,26383,26385,26386,26387,26390,26392,26393,26394,26396,26398,26400,26401,
314	26402,26403,26404,26405,26407,26409,26414,26416,26418,26419,26422,26423,26424,
315	26425,26427,26428,26430,26431,26433,26436,26437,26439,26442,26443,26445,26450,
316	26452,26453,26455,26456,26457,26458,26459,26461,26466,26467,26468,26470,26471,
317	26475,26476,26478,26481,26484,26486,26488,26489,26490,26491,26493,26496,26498,
318	26499,26501,26502,26504,26506,26508,26509,26510,26511,26513,26514,26515,26516,
319	26518,26521,26523,26527,26528,26529,26532,26534,26537,26540,26542,26545,26546,
320	26548,26553,26554,26555,26556,26557,26558,26559,26560,
321	26562,26565,26566,26567,26568,26569,26570,26571,26572,26573,26574,26581,26582,
322	26583,26587,26591,26593,26595,26596,26598,26599,26600,26602,26603,26605,26606,
323	26610,26613,26614,26615,26616,26617,26618,26619,26620,26622,26625,26626,26627,
324	26628,26630,26637,26640,26642,26644,26645,26648,26649,26650,26651,26652,26654,
325	26655,26656,26658,26659,26660,26661,26662,26663,26664,26667,26668,26669,26670,
326	26671,26672,26673,26676,26677,26678,26682,26683,26687,26695,26699,26701,26703,
327	26706,26710,26711,26712,26713,26714,26715,26716,26717,26718,26719,26730,26732,
328	26733,26734,26735,26736,26737,26738,26739,26741,26744,26745,26746,26747,26748,
329	26749,26750,26751,26752,26754,26756,26759,26760,26761,26762,26763,26764,26765,
330	26766,26768,26769,26770,26772,26773,26774,26776,26777,26778,26779,26780,26781,
331	26782,26783,26784,26785,26787,26788,26789,26793,26794,26795,26796,26798,26801,
332	26802,26804,26806,26807,26808,26809,26810,26811,26812,26813,26814,26815,26817,
333	26819,26820,26821,26822,26823,26824,26826,26828,26830,26831,26832,26833,26835,
334	26836,26838,26839,26841,26843,26844,26845,26846,26847,26849,26850,26852,26853,
335	26854,26855,26856,26857,26858,26859,26860,26861,26863,26866,26867,26868,26870,
336	26871,26872,26875,26877,26878,26879,26880,26882,26883,26884,26886,26887,26888,
337	26889,26890,26892,26895,26897,26899,26900,26901,26902,26903,26904,26905,26906,
338	26907,26908,26909,26910,26913,26914,26915,26917,26918,26919,26920,26921,26922,
339	26923,26924,26926,26927,26929,26930,26931,26933,26934,26935,26936,26938,26939,
340	26940,26942,26944,26945,26947,26948,26949,26950,26951,
341	26952,26953,26954,26955,26956,26957,26958,26959,26960,26961,26962,26963,26965,
342	26966,26968,26969,26971,26972,26975,26977,26978,26980,26981,26983,26984,26985,
343	26986,26988,26989,26991,26992,26994,26995,26996,26997,26998,27002,27003,27005,
344	27006,27007,27009,27011,27013,27018,27019,27020,27022,27023,27024,27025,27026,
345	27027,27030,27031,27033,27034,27037,27038,27039,27040,27041,27042,27043,27044,
346	27045,27046,27049,27050,27052,27054,27055,27056,27058,27059,27061,27062,27064,
347	27065,27066,27068,27069,27070,27071,27072,27074,27075,27076,27077,27078,27079,
348	27080,27081,27083,27085,27087,27089,27090,27091,27093,27094,27095,27096,27097,
349	27098,27100,27101,27102,27105,27106,27107,27108,27109,27110,27111,27112,27113,
350	27114,27115,27116,27118,27119,27120,27121,27123,27124,27125,27126,27127,27128,
351	27129,27130,27131,27132,27134,27136,27137,27138,27139,27140,27141,27142,27143,
352	27144,27145,27147,27148,27149,27150,27151,27152,27153,27154,27155,27156,27157,
353	27158,27161,27162,27163,27164,27165,27166,27168,27170,27171,27172,27173,27174,
354	27175,27177,27179,27180,27181,27182,27184,27186,27187,27188,27190,27191,27192,
355	27193,27194,27195,27196,27199,27200,27201,27202,27203,27205,27206,27208,27209,
356	27210,27211,27212,27213,27214,27215,27217,27218,27219,27220,27221,27222,27223,
357	27226,27228,27229,27230,27231,27232,27234,27235,27236,27238,27239,27240,27241,
358	27242,27243,27244,27245,27246,27247,27248,27250,27251,27252,27253,27254,27255,
359	27256,27258,27259,27261,27262,27263,27265,27266,27267,27269,27270,27271,27272,
360	27273,27274,27275,27276,27277,27279,27282,27283,27284,
361	27285,27286,27288,27289,27290,27291,27292,27293,27294,27295,27297,27298,27299,
362	27300,27301,27302,27303,27304,27306,27309,27310,27311,27312,27313,27314,27315,
363	27316,27317,27318,27319,27320,27321,27322,27323,27324,27325,27326,27327,27328,
364	27329,27330,27331,27332,27333,27334,27335,27336,27337,27338,27339,27340,27341,
365	27342,27343,27344,27345,27346,27347,27348,27349,27350,27351,27352,27353,27354,
366	27355,27356,27357,27358,27359,27360,27361,27362,27363,27364,27365,27366,27367,
367	27368,27369,27370,27371,27372,27373,27374,27375,27376,27377,27378,27379,27380,
368	27381,27382,27383,27384,27385,27386,27387,27388,27389,27390,27391,27392,27393,
369	27394,27395,27396,27397,27398,27399,27400,27401,27402,27403,27404,27405,27406,
370	27407,27408,27409,27410,27411,27412,27413,27414,27415,27416,27417,27418,27419,
371	27420,27421,27422,27423,27429,27430,27432,27433,27434,27435,27436,27437,27438,
372	27439,27440,27441,27443,27444,27445,27446,27448,27451,27452,27453,27455,27456,
373	27457,27458,27460,27461,27464,27466,27467,27469,27470,27471,27472,27473,27474,
374	27475,27476,27477,27478,27479,27480,27482,27483,27484,27485,27486,27487,27488,
375	27489,27496,27497,27499,27500,27501,27502,27503,27504,27505,27506,27507,27508,
376	27509,27510,27511,27512,27514,27517,27518,27519,27520,27525,27528,27532,27534,
377	27535,27536,27537,27540,27541,27543,27544,27545,27548,27549,27550,27551,27552,
378	27554,27555,27556,27557,27558,27559,27560,27561,27563,27564,27565,27566,27567,
379	27568,27569,27570,27574,27576,27577,27578,27579,27580,27581,27582,27584,27587,
380	27588,27590,27591,27592,27593,27594,27596,27598,27600,
381	27601,27608,27610,27612,27613,27614,27615,27616,27618,27619,27620,27621,27622,
382	27623,27624,27625,27628,27629,27630,27632,27633,27634,27636,27638,27639,27640,
383	27642,27643,27644,27646,27647,27648,27649,27650,27651,27652,27656,27657,27658,
384	27659,27660,27662,27666,27671,27676,27677,27678,27680,27683,27685,27691,27692,
385	27693,27697,27699,27702,27703,27705,27706,27707,27708,27710,27711,27715,27716,
386	27717,27720,27723,27724,27725,27726,27727,27729,27730,27731,27734,27736,27737,
387	27738,27746,27747,27749,27750,27751,27755,27756,27757,27758,27759,27761,27763,
388	27765,27767,27768,27770,27771,27772,27775,27776,27780,27783,27786,27787,27789,
389	27790,27793,27794,27797,27798,27799,27800,27802,27804,27805,27806,27808,27810,
390	27816,27820,27823,27824,27828,27829,27830,27831,27834,27840,27841,27842,27843,
391	27846,27847,27848,27851,27853,27854,27855,27857,27858,27864,27865,27866,27868,
392	27869,27871,27876,27878,27879,27881,27884,27885,27890,27892,27897,27903,27904,
393	27906,27907,27909,27910,27912,27913,27914,27917,27919,27920,27921,27923,27924,
394	27925,27926,27928,27932,27933,27935,27936,27937,27938,27939,27940,27942,27944,
395	27945,27948,27949,27951,27952,27956,27958,27959,27960,27962,27967,27968,27970,
396	27972,27977,27980,27984,27989,27990,27991,27992,27995,27997,27999,28001,28002,
397	28004,28005,28007,28008,28011,28012,28013,28016,28017,28018,28019,28021,28022,
398	28025,28026,28027,28029,28030,28031,28032,28033,28035,28036,28038,28039,28042,
399	28043,28045,28047,28048,28050,28054,28055,28056,28057,28058,28060,28066,28069,
400	28076,28077,28080,28081,28083,28084,28086,28087,28089,
401	28090,28091,28092,28093,28094,28097,28098,28099,28104,28105,28106,28109,28110,
402	28111,28112,28114,28115,28116,28117,28119,28122,28123,28124,28127,28130,28131,
403	28133,28135,28136,28137,28138,28141,28143,28144,28146,28148,28149,28150,28152,
404	28154,28157,28158,28159,28160,28161,28162,28163,28164,28166,28167,28168,28169,
405	28171,28175,28178,28179,28181,28184,28185,28187,28188,28190,28191,28194,28198,
406	28199,28200,28202,28204,28206,28208,28209,28211,28213,28214,28215,28217,28219,
407	28220,28221,28222,28223,28224,28225,28226,28229,28230,28231,28232,28233,28234,
408	28235,28236,28239,28240,28241,28242,28245,28247,28249,28250,28252,28253,28254,
409	28256,28257,28258,28259,28260,28261,28262,28263,28264,28265,28266,28268,28269,
410	28271,28272,28273,28274,28275,28276,28277,28278,28279,28280,28281,28282,28283,
411	28284,28285,28288,28289,28290,28292,28295,28296,28298,28299,28300,28301,28302,
412	28305,28306,28307,28308,28309,28310,28311,28313,28314,28315,28317,28318,28320,
413	28321,28323,28324,28326,28328,28329,28331,28332,28333,28334,28336,28339,28341,
414	28344,28345,28348,28350,28351,28352,28355,28356,28357,28358,28360,28361,28362,
415	28364,28365,28366,28368,28370,28374,28376,28377,28379,28380,28381,28387,28391,
416	28394,28395,28396,28397,28398,28399,28400,28401,28402,28403,28405,28406,28407,
417	28408,28410,28411,28412,28413,28414,28415,28416,28417,28419,28420,28421,28423,
418	28424,28426,28427,28428,28429,28430,28432,28433,28434,28438,28439,28440,28441,
419	28442,28443,28444,28445,28446,28447,28449,28450,28451,28453,28454,28455,28456,
420	28460,28462,28464,28466,28468,28469,28471,28472,28473,
421	28474,28475,28476,28477,28479,28480,28481,28482,28483,28484,28485,28488,28489,
422	28490,28492,28494,28495,28496,28497,28498,28499,28500,28501,28502,28503,28505,
423	28506,28507,28509,28511,28512,28513,28515,28516,28517,28519,28520,28521,28522,
424	28523,28524,28527,28528,28529,28531,28533,28534,28535,28537,28539,28541,28542,
425	28543,28544,28545,28546,28547,28549,28550,28551,28554,28555,28559,28560,28561,
426	28562,28563,28564,28565,28566,28567,28568,28569,28570,28571,28573,28574,28575,
427	28576,28578,28579,28580,28581,28582,28584,28585,28586,28587,28588,28589,28590,
428	28591,28592,28593,28594,28596,28597,28599,28600,28602,28603,28604,28605,28606,
429	28607,28609,28611,28612,28613,28614,28615,28616,28618,28619,28620,28621,28622,
430	28623,28624,28627,28628,28629,28630,28631,28632,28633,28634,28635,28636,28637,
431	28639,28642,28643,28644,28645,28646,28647,28648,28649,28650,28651,28652,28653,
432	28656,28657,28658,28659,28660,28661,28662,28663,28664,28665,28666,28667,28668,
433	28669,28670,28671,28672,28673,28674,28675,28676,28677,28678,28679,28680,28681,
434	28682,28683,28684,28685,28686,28687,28688,28690,28691,28692,28693,28694,28695,
435	28696,28697,28700,28701,28702,28703,28704,28705,28706,28708,28709,28710,28711,
436	28712,28713,28714,28715,28716,28717,28718,28719,28720,28721,28722,28723,28724,
437	28726,28727,28728,28730,28731,28732,28733,28734,28735,28736,28737,28738,28739,
438	28740,28741,28742,28743,28744,28745,28746,28747,28749,28750,28752,28753,28754,
439	28755,28756,28757,28758,28759,28760,28761,28762,28763,28764,28765,28767,28768,
440	28769,28770,28771,28772,28773,28774,28775,28776,28777,
441	28778,28782,28785,28786,28787,28788,28791,28793,28794,28795,28797,28801,28802,
442	28803,28804,28806,28807,28808,28811,28812,28813,28815,28816,28817,28819,28823,
443	28824,28826,28827,28830,28831,28832,28833,28834,28835,28836,28837,28838,28839,
444	28840,28841,28842,28848,28850,28852,28853,28854,28858,28862,28863,28868,28869,
445	28870,28871,28873,28875,28876,28877,28878,28879,28880,28881,28882,28883,28884,
446	28885,28886,28887,28890,28892,28893,28894,28896,28897,28898,28899,28901,28906,
447	28910,28912,28913,28914,28915,28916,28917,28918,28920,28922,28923,28924,28926,
448	28927,28928,28929,28930,28931,28932,28933,28934,28935,28936,28939,28940,28941,
449	28942,28943,28945,28946,28948,28951,28955,28956,28957,28958,28959,28960,28961,
450	28962,28963,28964,28965,28967,28968,28969,28970,28971,28972,28973,28974,28978,
451	28979,28980,28981,28983,28984,28985,28986,28987,28988,28989,28990,28991,28992,
452	28993,28994,28995,28996,28998,28999,29000,29001,29003,29005,29007,29008,29009,
453	29010,29011,29012,29013,29014,29015,29016,29017,29018,29019,29021,29023,29024,
454	29025,29026,29027,29029,29033,29034,29035,29036,29037,29039,29040,29041,29044,
455	29045,29046,29047,29049,29051,29052,29054,29055,29056,29057,29058,29059,29061,
456	29062,29063,29064,29065,29067,29068,29069,29070,29072,29073,29074,29075,29077,
457	29078,29079,29082,29083,29084,29085,29086,29089,29090,29091,29092,29093,29094,
458	29095,29097,29098,29099,29101,29102,29103,29104,29105,29106,29108,29110,29111,
459	29112,29114,29115,29116,29117,29118,29119,29120,29121,29122,29124,29125,29126,
460	29127,29128,29129,29130,29131,29132,29133,29135,29136,
461	29137,29138,29139,29142,29143,29144,29145,29146,29147,29148,29149,29150,29151,
462	29153,29154,29155,29156,29158,29160,29161,29162,29163,29164,29165,29167,29168,
463	29169,29170,29171,29172,29173,29174,29175,29176,29178,29179,29180,29181,29182,
464	29183,29184,29185,29186,29187,29188,29189,29191,29192,29193,29194,29195,29196,
465	29197,29198,29199,29200,29201,29202,29203,29204,29205,29206,29207,29208,29209,
466	29210,29211,29212,29214,29215,29216,29217,29218,29219,29220,29221,29222,29223,
467	29225,29227,29229,29230,29231,29234,29235,29236,29242,29244,29246,29248,29249,
468	29250,29251,29252,29253,29254,29257,29258,29259,29262,29263,29264,29265,29267,
469	29268,29269,29271,29272,29274,29276,29278,29280,29283,29284,29285,29288,29290,
470	29291,29292,29293,29296,29297,29299,29300,29302,29303,29304,29307,29308,29309,
471	29314,29315,29317,29318,29319,29320,29321,29324,29326,29328,29329,29331,29332,
472	29333,29334,29335,29336,29337,29338,29339,29340,29341,29342,29344,29345,29346,
473	29347,29348,29349,29350,29351,29352,29353,29354,29355,29358,29361,29362,29363,
474	29365,29370,29371,29372,29373,29374,29375,29376,29381,29382,29383,29385,29386,
475	29387,29388,29391,29393,29395,29396,29397,29398,29400,29402,29403,58566,58567,
476	58568,58569,58570,58571,58572,58573,58574,58575,58576,58577,58578,58579,58580,
477	58581,58582,58583,58584,58585,58586,58587,58588,58589,58590,58591,58592,58593,
478	58594,58595,58596,58597,58598,58599,58600,58601,58602,58603,58604,58605,58606,
479	58607,58608,58609,58610,58611,58612,58613,58614,58615,58616,58617,58618,58619,
480	58620,58621,58622,58623,58624,58625,58626,58627,58628,
481	58629,58630,58631,58632,58633,58634,58635,58636,58637,58638,58639,58640,58641,
482	58642,58643,58644,58645,58646,58647,58648,58649,58650,58651,58652,58653,58654,
483	58655,58656,58657,58658,58659,58660,58661,12288,12289,12290,183,713,711,168,
484	12291,12293,8212,65374,8214,8230,8216,8217,8220,8221,12308,12309,12296,12297,
485	12298,12299,12300,12301,12302,12303,12310,12311,12304,12305,177,215,247,8758,
486	8743,8744,8721,8719,8746,8745,8712,8759,8730,8869,8741,8736,8978,8857,8747,
487	8750,8801,8780,8776,8765,8733,8800,8814,8815,8804,8805,8734,8757,8756,9794,
488	9792,176,8242,8243,8451,65284,164,65504,65505,8240,167,8470,9734,9733,9675,
489	9679,9678,9671,9670,9633,9632,9651,9650,8251,8594,8592,8593,8595,12307,58662,
490	58663,58664,58665,58666,58667,58668,58669,58670,58671,58672,58673,58674,58675,
491	58676,58677,58678,58679,58680,58681,58682,58683,58684,58685,58686,58687,58688,
492	58689,58690,58691,58692,58693,58694,58695,58696,58697,58698,58699,58700,58701,
493	58702,58703,58704,58705,58706,58707,58708,58709,58710,58711,58712,58713,58714,
494	58715,58716,58717,58718,58719,58720,58721,58722,58723,58724,58725,58726,58727,
495	58728,58729,58730,58731,58732,58733,58734,58735,58736,58737,58738,58739,58740,
496	58741,58742,58743,58744,58745,58746,58747,58748,58749,58750,58751,58752,58753,
497	58754,58755,58756,58757,8560,8561,8562,8563,8564,8565,8566,8567,8568,8569,
498	59238,59239,59240,59241,59242,59243,9352,9353,9354,9355,9356,9357,9358,9359,
499	9360,9361,9362,9363,9364,9365,9366,9367,9368,
500	9369,9370,9371,9332,9333,9334,9335,9336,9337,9338,9339,9340,9341,9342,9343,
501	9344,9345,9346,9347,9348,9349,9350,9351,9312,9313,9314,9315,9316,9317,9318,
502	9319,9320,9321,8364,59245,12832,12833,12834,12835,12836,12837,12838,12839,
503	12840,12841,59246,59247,8544,8545,8546,8547,8548,8549,8550,8551,8552,8553,
504	8554,8555,59248,59249,58758,58759,58760,58761,58762,58763,58764,58765,58766,
505	58767,58768,58769,58770,58771,58772,58773,58774,58775,58776,58777,58778,58779,
506	58780,58781,58782,58783,58784,58785,58786,58787,58788,58789,58790,58791,58792,
507	58793,58794,58795,58796,58797,58798,58799,58800,58801,58802,58803,58804,58805,
508	58806,58807,58808,58809,58810,58811,58812,58813,58814,58815,58816,58817,58818,
509	58819,58820,58821,58822,58823,58824,58825,58826,58827,58828,58829,58830,58831,
510	58832,58833,58834,58835,58836,58837,58838,58839,58840,58841,58842,58843,58844,
511	58845,58846,58847,58848,58849,58850,58851,58852,58853,65281,65282,65283,65509,
512	65285,65286,65287,65288,65289,65290,65291,65292,65293,65294,65295,65296,65297,
513	65298,65299,65300,65301,65302,65303,65304,65305,65306,65307,65308,65309,65310,
514	65311,65312,65313,65314,65315,65316,65317,65318,65319,65320,65321,65322,65323,
515	65324,65325,65326,65327,65328,65329,65330,65331,65332,65333,65334,65335,65336,
516	65337,65338,65339,65340,65341,65342,65343,65344,65345,65346,65347,65348,65349,
517	65350,65351,65352,65353,65354,65355,65356,65357,65358,65359,65360,65361,65362,
518	65363,65364,65365,65366,65367,65368,65369,65370,65371,65372,65373,65507,58854,
519	58855,58856,58857,58858,
520	58859,58860,58861,58862,58863,58864,58865,58866,58867,58868,58869,58870,58871,
521	58872,58873,58874,58875,58876,58877,58878,58879,58880,58881,58882,58883,58884,
522	58885,58886,58887,58888,58889,58890,58891,58892,58893,58894,58895,58896,58897,
523	58898,58899,58900,58901,58902,58903,58904,58905,58906,58907,58908,58909,58910,
524	58911,58912,58913,58914,58915,58916,58917,58918,58919,58920,58921,58922,58923,
525	58924,58925,58926,58927,58928,58929,58930,58931,58932,58933,58934,58935,58936,
526	58937,58938,58939,58940,58941,58942,58943,58944,58945,58946,58947,58948,58949,
527	12353,12354,12355,12356,12357,12358,12359,12360,12361,12362,12363,12364,12365,
528	12366,12367,12368,12369,12370,12371,12372,12373,12374,12375,12376,12377,12378,
529	12379,12380,12381,12382,12383,12384,12385,12386,12387,12388,12389,12390,12391,
530	12392,12393,12394,12395,12396,12397,12398,12399,12400,12401,12402,12403,12404,
531	12405,12406,12407,12408,12409,12410,12411,12412,12413,12414,12415,12416,12417,
532	12418,12419,12420,12421,12422,12423,12424,12425,12426,12427,12428,12429,12430,
533	12431,12432,12433,12434,12435,59250,59251,59252,59253,59254,59255,59256,59257,
534	59258,59259,59260,58950,58951,58952,58953,58954,58955,58956,58957,58958,58959,
535	58960,58961,58962,58963,58964,58965,58966,58967,58968,58969,58970,58971,58972,
536	58973,58974,58975,58976,58977,58978,58979,58980,58981,58982,58983,58984,58985,
537	58986,58987,58988,58989,58990,58991,58992,58993,58994,58995,58996,58997,58998,
538	58999,59000,59001,59002,59003,59004,59005,59006,59007,59008,59009,59010,59011,
539	59012,59013,59014,59015,59016,59017,59018,59019,59020,
540	59021,59022,59023,59024,59025,59026,59027,59028,59029,59030,59031,59032,59033,
541	59034,59035,59036,59037,59038,59039,59040,59041,59042,59043,59044,59045,12449,
542	12450,12451,12452,12453,12454,12455,12456,12457,12458,12459,12460,12461,12462,
543	12463,12464,12465,12466,12467,12468,12469,12470,12471,12472,12473,12474,12475,
544	12476,12477,12478,12479,12480,12481,12482,12483,12484,12485,12486,12487,12488,
545	12489,12490,12491,12492,12493,12494,12495,12496,12497,12498,12499,12500,12501,
546	12502,12503,12504,12505,12506,12507,12508,12509,12510,12511,12512,12513,12514,
547	12515,12516,12517,12518,12519,12520,12521,12522,12523,12524,12525,12526,12527,
548	12528,12529,12530,12531,12532,12533,12534,59261,59262,59263,59264,59265,59266,
549	59267,59268,59046,59047,59048,59049,59050,59051,59052,59053,59054,59055,59056,
550	59057,59058,59059,59060,59061,59062,59063,59064,59065,59066,59067,59068,59069,
551	59070,59071,59072,59073,59074,59075,59076,59077,59078,59079,59080,59081,59082,
552	59083,59084,59085,59086,59087,59088,59089,59090,59091,59092,59093,59094,59095,
553	59096,59097,59098,59099,59100,59101,59102,59103,59104,59105,59106,59107,59108,
554	59109,59110,59111,59112,59113,59114,59115,59116,59117,59118,59119,59120,59121,
555	59122,59123,59124,59125,59126,59127,59128,59129,59130,59131,59132,59133,59134,
556	59135,59136,59137,59138,59139,59140,59141,913,914,915,916,917,918,919,920,921,
557	922,923,924,925,926,927,928,929,931,932,933,934,935,936,937,59269,59270,59271,
558	59272,59273,59274,59275,59276,945,946,947,948,949,950,951,952,953,
559	954,955,956,957,958,959,960,961,963,964,965,966,967,968,969,59277,59278,59279,
560	59280,59281,59282,59283,65077,65078,65081,65082,65087,65088,65085,65086,65089,
561	65090,65091,65092,59284,59285,65083,65084,65079,65080,65073,59286,65075,65076,
562	59287,59288,59289,59290,59291,59292,59293,59294,59295,59142,59143,59144,59145,
563	59146,59147,59148,59149,59150,59151,59152,59153,59154,59155,59156,59157,59158,
564	59159,59160,59161,59162,59163,59164,59165,59166,59167,59168,59169,59170,59171,
565	59172,59173,59174,59175,59176,59177,59178,59179,59180,59181,59182,59183,59184,
566	59185,59186,59187,59188,59189,59190,59191,59192,59193,59194,59195,59196,59197,
567	59198,59199,59200,59201,59202,59203,59204,59205,59206,59207,59208,59209,59210,
568	59211,59212,59213,59214,59215,59216,59217,59218,59219,59220,59221,59222,59223,
569	59224,59225,59226,59227,59228,59229,59230,59231,59232,59233,59234,59235,59236,
570	59237,1040,1041,1042,1043,1044,1045,1025,1046,1047,1048,1049,1050,1051,1052,
571	1053,1054,1055,1056,1057,1058,1059,1060,1061,1062,1063,1064,1065,1066,1067,
572	1068,1069,1070,1071,59296,59297,59298,59299,59300,59301,59302,59303,59304,
573	59305,59306,59307,59308,59309,59310,1072,1073,1074,1075,1076,1077,1105,1078,
574	1079,1080,1081,1082,1083,1084,1085,1086,1087,1088,1089,1090,1091,1092,1093,
575	1094,1095,1096,1097,1098,1099,1100,1101,1102,1103,59311,59312,59313,59314,
576	59315,59316,59317,59318,59319,59320,59321,59322,59323,714,715,729,8211,8213,
577	8229,8245,8453,8457,8598,8599,8600,8601,
578	8725,8735,8739,8786,8806,8807,8895,9552,9553,9554,9555,9556,9557,9558,9559,
579	9560,9561,9562,9563,9564,9565,9566,9567,9568,9569,9570,9571,9572,9573,9574,
580	9575,9576,9577,9578,9579,9580,9581,9582,9583,9584,9585,9586,9587,9601,9602,
581	9603,9604,9605,9606,9607,9608,9609,9610,9611,9612,9613,9614,9615,9619,9620,
582	9621,9660,9661,9698,9699,9700,9701,9737,8853,12306,12317,12318,59324,59325,
583	59326,59327,59328,59329,59330,59331,59332,59333,59334,257,225,462,224,275,233,
584	283,232,299,237,464,236,333,243,466,242,363,250,468,249,470,472,474,476,252,
585	234,593,59335,324,328,505,609,59337,59338,59339,59340,12549,12550,12551,12552,
586	12553,12554,12555,12556,12557,12558,12559,12560,12561,12562,12563,12564,12565,
587	12566,12567,12568,12569,12570,12571,12572,12573,12574,12575,12576,12577,12578,
588	12579,12580,12581,12582,12583,12584,12585,59341,59342,59343,59344,59345,59346,
589	59347,59348,59349,59350,59351,59352,59353,59354,59355,59356,59357,59358,59359,
590	59360,59361,12321,12322,12323,12324,12325,12326,12327,12328,12329,12963,13198,
591	13199,13212,13213,13214,13217,13252,13262,13265,13266,13269,65072,65506,65508,
592	59362,8481,12849,59363,8208,59364,59365,59366,12540,12443,12444,12541,12542,
593	12294,12445,12446,65097,65098,65099,65100,65101,65102,65103,65104,65105,65106,
594	65108,65109,65110,65111,65113,65114,65115,65116,65117,65118,65119,65120,65121,
595	65122,65123,65124,65125,65126,65128,65129,65130,65131,12350,12272,12273,12274,
596	12275,12276,12277,
597	12278,12279,12280,12281,12282,12283,12295,59380,59381,59382,59383,59384,59385,
598	59386,59387,59388,59389,59390,59391,59392,9472,9473,9474,9475,9476,9477,9478,
599	9479,9480,9481,9482,9483,9484,9485,9486,9487,9488,9489,9490,9491,9492,9493,
600	9494,9495,9496,9497,9498,9499,9500,9501,9502,9503,9504,9505,9506,9507,9508,
601	9509,9510,9511,9512,9513,9514,9515,9516,9517,9518,9519,9520,9521,9522,9523,
602	9524,9525,9526,9527,9528,9529,9530,9531,9532,9533,9534,9535,9536,9537,9538,
603	9539,9540,9541,9542,9543,9544,9545,9546,9547,59393,59394,59395,59396,59397,
604	59398,59399,59400,59401,59402,59403,59404,59405,59406,59407,29404,29405,29407,
605	29410,29411,29412,29413,29414,29415,29418,29419,29429,29430,29433,29437,29438,
606	29439,29440,29442,29444,29445,29446,29447,29448,29449,29451,29452,29453,29455,
607	29456,29457,29458,29460,29464,29465,29466,29471,29472,29475,29476,29478,29479,
608	29480,29485,29487,29488,29490,29491,29493,29494,29498,29499,29500,29501,29504,
609	29505,29506,29507,29508,29509,29510,29511,29512,29513,29514,29515,29516,29518,
610	29519,29521,29523,29524,29525,29526,29528,29529,29530,29531,29532,29533,29534,
611	29535,29537,29538,29539,29540,29541,29542,29543,29544,29545,29546,29547,29550,
612	29552,29553,57344,57345,57346,57347,57348,57349,57350,57351,57352,57353,57354,
613	57355,57356,57357,57358,57359,57360,57361,57362,57363,57364,57365,57366,57367,
614	57368,57369,57370,57371,57372,57373,57374,57375,57376,57377,57378,57379,57380,
615	57381,57382,57383,57384,57385,57386,57387,57388,57389,57390,57391,57392,
616	57393,57394,57395,57396,57397,57398,57399,57400,57401,57402,57403,57404,57405,
617	57406,57407,57408,57409,57410,57411,57412,57413,57414,57415,57416,57417,57418,
618	57419,57420,57421,57422,57423,57424,57425,57426,57427,57428,57429,57430,57431,
619	57432,57433,57434,57435,57436,57437,29554,29555,29556,29557,29558,29559,29560,
620	29561,29562,29563,29564,29565,29567,29568,29569,29570,29571,29573,29574,29576,
621	29578,29580,29581,29583,29584,29586,29587,29588,29589,29591,29592,29593,29594,
622	29596,29597,29598,29600,29601,29603,29604,29605,29606,29607,29608,29610,29612,
623	29613,29617,29620,29621,29622,29624,29625,29628,29629,29630,29631,29633,29635,
624	29636,29637,29638,29639,29643,29644,29646,29650,29651,29652,29653,29654,29655,
625	29656,29658,29659,29660,29661,29663,29665,29666,29667,29668,29670,29672,29674,
626	29675,29676,29678,29679,29680,29681,29683,29684,29685,29686,29687,57438,57439,
627	57440,57441,57442,57443,57444,57445,57446,57447,57448,57449,57450,57451,57452,
628	57453,57454,57455,57456,57457,57458,57459,57460,57461,57462,57463,57464,57465,
629	57466,57467,57468,57469,57470,57471,57472,57473,57474,57475,57476,57477,57478,
630	57479,57480,57481,57482,57483,57484,57485,57486,57487,57488,57489,57490,57491,
631	57492,57493,57494,57495,57496,57497,57498,57499,57500,57501,57502,57503,57504,
632	57505,57506,57507,57508,57509,57510,57511,57512,57513,57514,57515,57516,57517,
633	57518,57519,57520,57521,57522,57523,57524,57525,57526,57527,57528,57529,57530,
634	57531,29688,29689,29690,29691,29692,29693,29694,29695,29696,29697,29698,29700,
635	29703,29704,29707,29708,29709,29710,29713,29714,29715,
636	29716,29717,29718,29719,29720,29721,29724,29725,29726,29727,29728,29729,29731,
637	29732,29735,29737,29739,29741,29743,29745,29746,29751,29752,29753,29754,29755,
638	29757,29758,29759,29760,29762,29763,29764,29765,29766,29767,29768,29769,29770,
639	29771,29772,29773,29774,29775,29776,29777,29778,29779,29780,29782,29784,29789,
640	29792,29793,29794,29795,29796,29797,29798,29799,29800,29801,29802,29803,29804,
641	29806,29807,29809,29810,29811,29812,29813,29816,29817,29818,57532,57533,57534,
642	57535,57536,57537,57538,57539,57540,57541,57542,57543,57544,57545,57546,57547,
643	57548,57549,57550,57551,57552,57553,57554,57555,57556,57557,57558,57559,57560,
644	57561,57562,57563,57564,57565,57566,57567,57568,57569,57570,57571,57572,57573,
645	57574,57575,57576,57577,57578,57579,57580,57581,57582,57583,57584,57585,57586,
646	57587,57588,57589,57590,57591,57592,57593,57594,57595,57596,57597,57598,57599,
647	57600,57601,57602,57603,57604,57605,57606,57607,57608,57609,57610,57611,57612,
648	57613,57614,57615,57616,57617,57618,57619,57620,57621,57622,57623,57624,57625,
649	29819,29820,29821,29823,29826,29828,29829,29830,29832,29833,29834,29836,29837,
650	29839,29841,29842,29843,29844,29845,29846,29847,29848,29849,29850,29851,29853,
651	29855,29856,29857,29858,29859,29860,29861,29862,29866,29867,29868,29869,29870,
652	29871,29872,29873,29874,29875,29876,29877,29878,29879,29880,29881,29883,29884,
653	29885,29886,29887,29888,29889,29890,29891,29892,29893,29894,29895,29896,29897,
654	29898,29899,29900,29901,29902,29903,29904,29905,29907,29908,29909,29910,29911,
655	29912,29913,29914,29915,29917,29919,29921,29925,29927,
656	29928,29929,29930,29931,29932,29933,29936,29937,29938,57626,57627,57628,57629,
657	57630,57631,57632,57633,57634,57635,57636,57637,57638,57639,57640,57641,57642,
658	57643,57644,57645,57646,57647,57648,57649,57650,57651,57652,57653,57654,57655,
659	57656,57657,57658,57659,57660,57661,57662,57663,57664,57665,57666,57667,57668,
660	57669,57670,57671,57672,57673,57674,57675,57676,57677,57678,57679,57680,57681,
661	57682,57683,57684,57685,57686,57687,57688,57689,57690,57691,57692,57693,57694,
662	57695,57696,57697,57698,57699,57700,57701,57702,57703,57704,57705,57706,57707,
663	57708,57709,57710,57711,57712,57713,57714,57715,57716,57717,57718,57719,29939,
664	29941,29944,29945,29946,29947,29948,29949,29950,29952,29953,29954,29955,29957,
665	29958,29959,29960,29961,29962,29963,29964,29966,29968,29970,29972,29973,29974,
666	29975,29979,29981,29982,29984,29985,29986,29987,29988,29990,29991,29994,29998,
667	30004,30006,30009,30012,30013,30015,30017,30018,30019,30020,30022,30023,30025,
668	30026,30029,30032,30033,30034,30035,30037,30038,30039,30040,30045,30046,30047,
669	30048,30049,30050,30051,30052,30055,30056,30057,30059,30060,30061,30062,30063,
670	30064,30065,30067,30069,30070,30071,30074,30075,30076,30077,30078,30080,30081,
671	30082,30084,30085,30087,57720,57721,57722,57723,57724,57725,57726,57727,57728,
672	57729,57730,57731,57732,57733,57734,57735,57736,57737,57738,57739,57740,57741,
673	57742,57743,57744,57745,57746,57747,57748,57749,57750,57751,57752,57753,57754,
674	57755,57756,57757,57758,57759,57760,57761,57762,57763,57764,57765,57766,57767,
675	57768,57769,57770,57771,57772,57773,57774,57775,57776,
676	57777,57778,57779,57780,57781,57782,57783,57784,57785,57786,57787,57788,57789,
677	57790,57791,57792,57793,57794,57795,57796,57797,57798,57799,57800,57801,57802,
678	57803,57804,57805,57806,57807,57808,57809,57810,57811,57812,57813,30088,30089,
679	30090,30092,30093,30094,30096,30099,30101,30104,30107,30108,30110,30114,30118,
680	30119,30120,30121,30122,30125,30134,30135,30138,30139,30143,30144,30145,30150,
681	30155,30156,30158,30159,30160,30161,30163,30167,30169,30170,30172,30173,30175,
682	30176,30177,30181,30185,30188,30189,30190,30191,30194,30195,30197,30198,30199,
683	30200,30202,30203,30205,30206,30210,30212,30214,30215,30216,30217,30219,30221,
684	30222,30223,30225,30226,30227,30228,30230,30234,30236,30237,30238,30241,30243,
685	30247,30248,30252,30254,30255,30257,30258,30262,30263,30265,30266,30267,30269,
686	30273,30274,30276,57814,57815,57816,57817,57818,57819,57820,57821,57822,57823,
687	57824,57825,57826,57827,57828,57829,57830,57831,57832,57833,57834,57835,57836,
688	57837,57838,57839,57840,57841,57842,57843,57844,57845,57846,57847,57848,57849,
689	57850,57851,57852,57853,57854,57855,57856,57857,57858,57859,57860,57861,57862,
690	57863,57864,57865,57866,57867,57868,57869,57870,57871,57872,57873,57874,57875,
691	57876,57877,57878,57879,57880,57881,57882,57883,57884,57885,57886,57887,57888,
692	57889,57890,57891,57892,57893,57894,57895,57896,57897,57898,57899,57900,57901,
693	57902,57903,57904,57905,57906,57907,30277,30278,30279,30280,30281,30282,30283,
694	30286,30287,30288,30289,30290,30291,30293,30295,30296,30297,30298,30299,30301,
695	30303,30304,30305,30306,30308,30309,30310,30311,30312,
696	30313,30314,30316,30317,30318,30320,30321,30322,30323,30324,30325,30326,30327,
697	30329,30330,30332,30335,30336,30337,30339,30341,30345,30346,30348,30349,30351,
698	30352,30354,30356,30357,30359,30360,30362,30363,30364,30365,30366,30367,30368,
699	30369,30370,30371,30373,30374,30375,30376,30377,30378,30379,30380,30381,30383,
700	30384,30387,30389,30390,30391,30392,30393,30394,30395,30396,30397,30398,30400,
701	30401,30403,21834,38463,22467,25384,21710,21769,21696,30353,30284,34108,30702,
702	33406,30861,29233,38552,38797,27688,23433,20474,25353,26263,23736,33018,26696,
703	32942,26114,30414,20985,25942,29100,32753,34948,20658,22885,25034,28595,33453,
704	25420,25170,21485,21543,31494,20843,30116,24052,25300,36299,38774,25226,32793,
705	22365,38712,32610,29240,30333,26575,30334,25670,20336,36133,25308,31255,26001,
706	29677,25644,25203,33324,39041,26495,29256,25198,25292,20276,29923,21322,21150,
707	32458,37030,24110,26758,27036,33152,32465,26834,30917,34444,38225,20621,35876,
708	33502,32990,21253,35090,21093,30404,30407,30409,30411,30412,30419,30421,30425,
709	30426,30428,30429,30430,30432,30433,30434,30435,30436,30438,30439,30440,30441,
710	30442,30443,30444,30445,30448,30451,30453,30454,30455,30458,30459,30461,30463,
711	30464,30466,30467,30469,30470,30474,30476,30478,30479,30480,30481,30482,30483,
712	30484,30485,30486,30487,30488,30491,30492,30493,30494,30497,30499,30500,30501,
713	30503,30506,30507,30508,30510,30512,30513,30514,30515,30516,30521,30523,30525,
714	30526,30527,30530,30532,30533,30534,30536,30537,30538,30539,30540,30541,30542,
715	30543,30546,30547,30548,30549,30550,30551,30552,30553,
716	30556,34180,38649,20445,22561,39281,23453,25265,25253,26292,35961,40077,29190,
717	26479,30865,24754,21329,21271,36744,32972,36125,38049,20493,29384,22791,24811,
718	28953,34987,22868,33519,26412,31528,23849,32503,29997,27893,36454,36856,36924,
719	40763,27604,37145,31508,24444,30887,34006,34109,27605,27609,27606,24065,24199,
720	30201,38381,25949,24330,24517,36767,22721,33218,36991,38491,38829,36793,32534,
721	36140,25153,20415,21464,21342,36776,36777,36779,36941,26631,24426,33176,34920,
722	40150,24971,21035,30250,24428,25996,28626,28392,23486,25672,20853,20912,26564,
723	19993,31177,39292,28851,30557,30558,30559,30560,30564,30567,30569,30570,30573,
724	30574,30575,30576,30577,30578,30579,30580,30581,30582,30583,30584,30586,30587,
725	30588,30593,30594,30595,30598,30599,30600,30601,30602,30603,30607,30608,30611,
726	30612,30613,30614,30615,30616,30617,30618,30619,30620,30621,30622,30625,30627,
727	30628,30630,30632,30635,30637,30638,30639,30641,30642,30644,30646,30647,30648,
728	30649,30650,30652,30654,30656,30657,30658,30659,30660,30661,30662,30663,30664,
729	30665,30666,30667,30668,30670,30671,30672,30673,30674,30675,30676,30677,30678,
730	30680,30681,30682,30685,30686,30687,30688,30689,30692,30149,24182,29627,33760,
731	25773,25320,38069,27874,21338,21187,25615,38082,31636,20271,24091,33334,33046,
732	33162,28196,27850,39539,25429,21340,21754,34917,22496,19981,24067,27493,31807,
733	37096,24598,25830,29468,35009,26448,25165,36130,30572,36393,37319,24425,33756,
734	34081,39184,21442,34453,27531,24813,24808,28799,33485,33329,20179,27815,34255,
735	25805,31961,27133,26361,33609,21397,31574,20391,20876,
736	27979,23618,36461,25554,21449,33580,33590,26597,30900,25661,23519,23700,24046,
737	35815,25286,26612,35962,25600,25530,34633,39307,35863,32544,38130,20135,38416,
738	39076,26124,29462,30694,30696,30698,30703,30704,30705,30706,30708,30709,30711,
739	30713,30714,30715,30716,30723,30724,30725,30726,30727,30728,30730,30731,30734,
740	30735,30736,30739,30741,30745,30747,30750,30752,30753,30754,30756,30760,30762,
741	30763,30766,30767,30769,30770,30771,30773,30774,30781,30783,30785,30786,30787,
742	30788,30790,30792,30793,30794,30795,30797,30799,30801,30803,30804,30808,30809,
743	30810,30811,30812,30814,30815,30816,30817,30818,30819,30820,30821,30822,30823,
744	30824,30825,30831,30832,30833,30834,30835,30836,30837,30838,30840,30841,30842,
745	30843,30845,30846,30847,30848,30849,30850,30851,22330,23581,24120,38271,20607,
746	32928,21378,25950,30021,21809,20513,36229,25220,38046,26397,22066,28526,24034,
747	21557,28818,36710,25199,25764,25507,24443,28552,37108,33251,36784,23576,26216,
748	24561,27785,38472,36225,34924,25745,31216,22478,27225,25104,21576,20056,31243,
749	24809,28548,35802,25215,36894,39563,31204,21507,30196,25345,21273,27744,36831,
750	24347,39536,32827,40831,20360,23610,36196,32709,26021,28861,20805,20914,34411,
751	23815,23456,25277,37228,30068,36364,31264,24833,31609,20167,32504,30597,19985,
752	33261,21021,20986,27249,21416,36487,38148,38607,28353,38500,26970,30852,30853,
753	30854,30856,30858,30859,30863,30864,30866,30868,30869,30870,30873,30877,30878,
754	30880,30882,30884,30886,30888,30889,30890,30891,30892,30893,30894,30895,30901,
755	30902,30903,30904,30906,30907,30908,30909,30911,30912,
756	30914,30915,30916,30918,30919,30920,30924,30925,30926,30927,30929,30930,30931,
757	30934,30935,30936,30938,30939,30940,30941,30942,30943,30944,30945,30946,30947,
758	30948,30949,30950,30951,30953,30954,30955,30957,30958,30959,30960,30961,30963,
759	30965,30966,30968,30969,30971,30972,30973,30974,30975,30976,30978,30979,30980,
760	30982,30983,30984,30985,30986,30987,30988,30784,20648,30679,25616,35302,22788,
761	25571,24029,31359,26941,20256,33337,21912,20018,30126,31383,24162,24202,38383,
762	21019,21561,28810,25462,38180,22402,26149,26943,37255,21767,28147,32431,34850,
763	25139,32496,30133,33576,30913,38604,36766,24904,29943,35789,27492,21050,36176,
764	27425,32874,33905,22257,21254,20174,19995,20945,31895,37259,31751,20419,36479,
765	31713,31388,25703,23828,20652,33030,30209,31929,28140,32736,26449,23384,23544,
766	30923,25774,25619,25514,25387,38169,25645,36798,31572,30249,25171,22823,21574,
767	27513,20643,25140,24102,27526,20195,36151,34955,24453,36910,30989,30990,30991,
768	30992,30993,30994,30996,30997,30998,30999,31000,31001,31002,31003,31004,31005,
769	31007,31008,31009,31010,31011,31013,31014,31015,31016,31017,31018,31019,31020,
770	31021,31022,31023,31024,31025,31026,31027,31029,31030,31031,31032,31033,31037,
771	31039,31042,31043,31044,31045,31047,31050,31051,31052,31053,31054,31055,31056,
772	31057,31058,31060,31061,31064,31065,31073,31075,31076,31078,31081,31082,31083,
773	31084,31086,31088,31089,31090,31091,31092,31093,31094,31097,31099,31100,31101,
774	31102,31103,31106,31107,31110,31111,31112,31113,31115,31116,31117,31118,31120,
775	31121,31122,24608,32829,25285,20025,21333,37112,25528,
776	32966,26086,27694,20294,24814,28129,35806,24377,34507,24403,25377,20826,33633,
777	26723,20992,25443,36424,20498,23707,31095,23548,21040,31291,24764,36947,30423,
778	24503,24471,30340,36460,28783,30331,31561,30634,20979,37011,22564,20302,28404,
779	36842,25932,31515,29380,28068,32735,23265,25269,24213,22320,33922,31532,24093,
780	24351,36882,32532,39072,25474,28359,30872,28857,20856,38747,22443,30005,20291,
781	30008,24215,24806,22880,28096,27583,30857,21500,38613,20939,20993,25481,21514,
782	38035,35843,36300,29241,30879,34678,36845,35853,21472,31123,31124,31125,31126,
783	31127,31128,31129,31131,31132,31133,31134,31135,31136,31137,31138,31139,31140,
784	31141,31142,31144,31145,31146,31147,31148,31149,31150,31151,31152,31153,31154,
785	31156,31157,31158,31159,31160,31164,31167,31170,31172,31173,31175,31176,31178,
786	31180,31182,31183,31184,31187,31188,31190,31191,31193,31194,31195,31196,31197,
787	31198,31200,31201,31202,31205,31208,31210,31212,31214,31217,31218,31219,31220,
788	31221,31222,31223,31225,31226,31228,31230,31231,31233,31236,31237,31239,31240,
789	31241,31242,31244,31247,31248,31249,31250,31251,31253,31254,31256,31257,31259,
790	31260,19969,30447,21486,38025,39030,40718,38189,23450,35746,20002,19996,20908,
791	33891,25026,21160,26635,20375,24683,20923,27934,20828,25238,26007,38497,35910,
792	36887,30168,37117,30563,27602,29322,29420,35835,22581,30585,36172,26460,38208,
793	32922,24230,28193,22930,31471,30701,38203,27573,26029,32526,22534,20817,38431,
794	23545,22697,21544,36466,25958,39039,22244,38045,30462,36929,25479,21702,22810,
795	22842,22427,36530,26421,36346,33333,21057,24816,22549,
796	34558,23784,40517,20420,39069,35769,23077,24694,21380,25212,36943,37122,39295,
797	24681,32780,20799,32819,23572,39285,27953,20108,31261,31263,31265,31266,31268,
798	31269,31270,31271,31272,31273,31274,31275,31276,31277,31278,31279,31280,31281,
799	31282,31284,31285,31286,31288,31290,31294,31296,31297,31298,31299,31300,31301,
800	31303,31304,31305,31306,31307,31308,31309,31310,31311,31312,31314,31315,31316,
801	31317,31318,31320,31321,31322,31323,31324,31325,31326,31327,31328,31329,31330,
802	31331,31332,31333,31334,31335,31336,31337,31338,31339,31340,31341,31342,31343,
803	31345,31346,31347,31349,31355,31356,31357,31358,31362,31365,31367,31369,31370,
804	31371,31372,31374,31375,31376,31379,31380,31385,31386,31387,31390,31393,31394,
805	36144,21457,32602,31567,20240,20047,38400,27861,29648,34281,24070,30058,32763,
806	27146,30718,38034,32321,20961,28902,21453,36820,33539,36137,29359,39277,27867,
807	22346,33459,26041,32938,25151,38450,22952,20223,35775,32442,25918,33778,38750,
808	21857,39134,32933,21290,35837,21536,32954,24223,27832,36153,33452,37210,21545,
809	27675,20998,32439,22367,28954,27774,31881,22859,20221,24575,24868,31914,20016,
810	23553,26539,34562,23792,38155,39118,30127,28925,36898,20911,32541,35773,22857,
811	20964,20315,21542,22827,25975,32932,23413,25206,25282,36752,24133,27679,31526,
812	20239,20440,26381,31395,31396,31399,31401,31402,31403,31406,31407,31408,31409,
813	31410,31412,31413,31414,31415,31416,31417,31418,31419,31420,31421,31422,31424,
814	31425,31426,31427,31428,31429,31430,31431,31432,31433,31434,31436,31437,31438,
815	31439,31440,31441,31442,31443,31444,31445,31447,31448,
816	31450,31451,31452,31453,31457,31458,31460,31463,31464,31465,31466,31467,31468,
817	31470,31472,31473,31474,31475,31476,31477,31478,31479,31480,31483,31484,31486,
818	31488,31489,31490,31493,31495,31497,31500,31501,31502,31504,31506,31507,31510,
819	31511,31512,31514,31516,31517,31519,31521,31522,31523,31527,31529,31533,28014,
820	28074,31119,34993,24343,29995,25242,36741,20463,37340,26023,33071,33105,24220,
821	33104,36212,21103,35206,36171,22797,20613,20184,38428,29238,33145,36127,23500,
822	35747,38468,22919,32538,21648,22134,22030,35813,25913,27010,38041,30422,28297,
823	24178,29976,26438,26577,31487,32925,36214,24863,31174,25954,36195,20872,21018,
824	38050,32568,32923,32434,23703,28207,26464,31705,30347,39640,33167,32660,31957,
825	25630,38224,31295,21578,21733,27468,25601,25096,40509,33011,30105,21106,38761,
826	33883,26684,34532,38401,38548,38124,20010,21508,32473,26681,36319,32789,26356,
827	24218,32697,31535,31536,31538,31540,31541,31542,31543,31545,31547,31549,31551,
828	31552,31553,31554,31555,31556,31558,31560,31562,31565,31566,31571,31573,31575,
829	31577,31580,31582,31583,31585,31587,31588,31589,31590,31591,31592,31593,31594,
830	31595,31596,31597,31599,31600,31603,31604,31606,31608,31610,31612,31613,31615,
831	31617,31618,31619,31620,31622,31623,31624,31625,31626,31627,31628,31630,31631,
832	31633,31634,31635,31638,31640,31641,31642,31643,31646,31647,31648,31651,31652,
833	31653,31662,31663,31664,31666,31667,31669,31670,31671,31673,31674,31675,31676,
834	31677,31678,31679,31680,31682,31683,31684,22466,32831,26775,24037,25915,21151,
835	24685,40858,20379,36524,20844,23467,24339,24041,27742,
836	25329,36129,20849,38057,21246,27807,33503,29399,22434,26500,36141,22815,36764,
837	33735,21653,31629,20272,27837,23396,22993,40723,21476,34506,39592,35895,32929,
838	25925,39038,22266,38599,21038,29916,21072,23521,25346,35074,20054,25296,24618,
839	26874,20851,23448,20896,35266,31649,39302,32592,24815,28748,36143,20809,24191,
840	36891,29808,35268,22317,30789,24402,40863,38394,36712,39740,35809,30328,26690,
841	26588,36330,36149,21053,36746,28378,26829,38149,37101,22269,26524,35065,36807,
842	21704,31685,31688,31689,31690,31691,31693,31694,31695,31696,31698,31700,31701,
843	31702,31703,31704,31707,31708,31710,31711,31712,31714,31715,31716,31719,31720,
844	31721,31723,31724,31725,31727,31728,31730,31731,31732,31733,31734,31736,31737,
845	31738,31739,31741,31743,31744,31745,31746,31747,31748,31749,31750,31752,31753,
846	31754,31757,31758,31760,31761,31762,31763,31764,31765,31767,31768,31769,31770,
847	31771,31772,31773,31774,31776,31777,31778,31779,31780,31781,31784,31785,31787,
848	31788,31789,31790,31791,31792,31793,31794,31795,31796,31797,31798,31799,31801,
849	31802,31803,31804,31805,31806,31810,39608,23401,28023,27686,20133,23475,39559,
850	37219,25000,37039,38889,21547,28085,23506,20989,21898,32597,32752,25788,25421,
851	26097,25022,24717,28938,27735,27721,22831,26477,33322,22741,22158,35946,27627,
852	37085,22909,32791,21495,28009,21621,21917,33655,33743,26680,31166,21644,20309,
853	21512,30418,35977,38402,27827,28088,36203,35088,40548,36154,22079,40657,30165,
854	24456,29408,24680,21756,20136,27178,34913,24658,36720,21700,28888,34425,40511,
855	27946,23439,24344,32418,21897,20399,29492,21564,21402,
856	20505,21518,21628,20046,24573,29786,22774,33899,32993,34676,29392,31946,28246,
857	31811,31812,31813,31814,31815,31816,31817,31818,31819,31820,31822,31823,31824,
858	31825,31826,31827,31828,31829,31830,31831,31832,31833,31834,31835,31836,31837,
859	31838,31839,31840,31841,31842,31843,31844,31845,31846,31847,31848,31849,31850,
860	31851,31852,31853,31854,31855,31856,31857,31858,31861,31862,31863,31864,31865,
861	31866,31870,31871,31872,31873,31874,31875,31876,31877,31878,31879,31880,31882,
862	31883,31884,31885,31886,31887,31888,31891,31892,31894,31897,31898,31899,31904,
863	31905,31907,31910,31911,31912,31913,31915,31916,31917,31919,31920,31924,31925,
864	31926,31927,31928,31930,31931,24359,34382,21804,25252,20114,27818,25143,33457,
865	21719,21326,29502,28369,30011,21010,21270,35805,27088,24458,24576,28142,22351,
866	27426,29615,26707,36824,32531,25442,24739,21796,30186,35938,28949,28067,23462,
867	24187,33618,24908,40644,30970,34647,31783,30343,20976,24822,29004,26179,24140,
868	24653,35854,28784,25381,36745,24509,24674,34516,22238,27585,24724,24935,21321,
869	24800,26214,36159,31229,20250,28905,27719,35763,35826,32472,33636,26127,23130,
870	39746,27985,28151,35905,27963,20249,28779,33719,25110,24785,38669,36135,31096,
871	20987,22334,22522,26426,30072,31293,31215,31637,31935,31936,31938,31939,31940,
872	31942,31945,31947,31950,31951,31952,31953,31954,31955,31956,31960,31962,31963,
873	31965,31966,31969,31970,31971,31972,31973,31974,31975,31977,31978,31979,31980,
874	31981,31982,31984,31985,31986,31987,31988,31989,31990,31991,31993,31994,31996,
875	31997,31998,31999,32000,32001,32002,32003,32004,32005,
876	32006,32007,32008,32009,32011,32012,32013,32014,32015,32016,32017,32018,32019,
877	32020,32021,32022,32023,32024,32025,32026,32027,32028,32029,32030,32031,32033,
878	32035,32036,32037,32038,32040,32041,32042,32044,32045,32046,32048,32049,32050,
879	32051,32052,32053,32054,32908,39269,36857,28608,35749,40481,23020,32489,32521,
880	21513,26497,26840,36753,31821,38598,21450,24613,30142,27762,21363,23241,32423,
881	25380,20960,33034,24049,34015,25216,20864,23395,20238,31085,21058,24760,27982,
882	23492,23490,35745,35760,26082,24524,38469,22931,32487,32426,22025,26551,22841,
883	20339,23478,21152,33626,39050,36158,30002,38078,20551,31292,20215,26550,39550,
884	23233,27516,30417,22362,23574,31546,38388,29006,20860,32937,33392,22904,32516,
885	33575,26816,26604,30897,30839,25315,25441,31616,20461,21098,20943,33616,27099,
886	37492,36341,36145,35265,38190,31661,20214,32055,32056,32057,32058,32059,32060,
887	32061,32062,32063,32064,32065,32066,32067,32068,32069,32070,32071,32072,32073,
888	32074,32075,32076,32077,32078,32079,32080,32081,32082,32083,32084,32085,32086,
889	32087,32088,32089,32090,32091,32092,32093,32094,32095,32096,32097,32098,32099,
890	32100,32101,32102,32103,32104,32105,32106,32107,32108,32109,32111,32112,32113,
891	32114,32115,32116,32117,32118,32120,32121,32122,32123,32124,32125,32126,32127,
892	32128,32129,32130,32131,32132,32133,32134,32135,32136,32137,32138,32139,32140,
893	32141,32142,32143,32144,32145,32146,32147,32148,32149,32150,32151,32152,20581,
894	33328,21073,39279,28176,28293,28071,24314,20725,23004,23558,27974,27743,30086,
895	33931,26728,22870,35762,21280,37233,38477,34121,26898,
896	30977,28966,33014,20132,37066,27975,39556,23047,22204,25605,38128,30699,20389,
897	33050,29409,35282,39290,32564,32478,21119,25945,37237,36735,36739,21483,31382,
898	25581,25509,30342,31224,34903,38454,25130,21163,33410,26708,26480,25463,30571,
899	31469,27905,32467,35299,22992,25106,34249,33445,30028,20511,20171,30117,35819,
900	23626,24062,31563,26020,37329,20170,27941,35167,32039,38182,20165,35880,36827,
901	38771,26187,31105,36817,28908,28024,32153,32154,32155,32156,32157,32158,32159,
902	32160,32161,32162,32163,32164,32165,32167,32168,32169,32170,32171,32172,32173,
903	32175,32176,32177,32178,32179,32180,32181,32182,32183,32184,32185,32186,32187,
904	32188,32189,32190,32191,32192,32193,32194,32195,32196,32197,32198,32199,32200,
905	32201,32202,32203,32204,32205,32206,32207,32208,32209,32210,32211,32212,32213,
906	32214,32215,32216,32217,32218,32219,32220,32221,32222,32223,32224,32225,32226,
907	32227,32228,32229,32230,32231,32232,32233,32234,32235,32236,32237,32238,32239,
908	32240,32241,32242,32243,32244,32245,32246,32247,32248,32249,32250,23613,21170,
909	33606,20834,33550,30555,26230,40120,20140,24778,31934,31923,32463,20117,35686,
910	26223,39048,38745,22659,25964,38236,24452,30153,38742,31455,31454,20928,28847,
911	31384,25578,31350,32416,29590,38893,20037,28792,20061,37202,21417,25937,26087,
912	33276,33285,21646,23601,30106,38816,25304,29401,30141,23621,39545,33738,23616,
913	21632,30697,20030,27822,32858,25298,25454,24040,20855,36317,36382,38191,20465,
914	21477,24807,28844,21095,25424,40515,23071,20518,30519,21367,32482,25733,25899,
915	25225,25496,20500,29237,35273,20915,35776,32477,22343,
916	33740,38055,20891,21531,23803,32251,32252,32253,32254,32255,32256,32257,32258,
917	32259,32260,32261,32262,32263,32264,32265,32266,32267,32268,32269,32270,32271,
918	32272,32273,32274,32275,32276,32277,32278,32279,32280,32281,32282,32283,32284,
919	32285,32286,32287,32288,32289,32290,32291,32292,32293,32294,32295,32296,32297,
920	32298,32299,32300,32301,32302,32303,32304,32305,32306,32307,32308,32309,32310,
921	32311,32312,32313,32314,32316,32317,32318,32319,32320,32322,32323,32324,32325,
922	32326,32328,32329,32330,32331,32332,32333,32334,32335,32336,32337,32338,32339,
923	32340,32341,32342,32343,32344,32345,32346,32347,32348,32349,20426,31459,27994,
924	37089,39567,21888,21654,21345,21679,24320,25577,26999,20975,24936,21002,22570,
925	21208,22350,30733,30475,24247,24951,31968,25179,25239,20130,28821,32771,25335,
926	28900,38752,22391,33499,26607,26869,30933,39063,31185,22771,21683,21487,28212,
927	20811,21051,23458,35838,32943,21827,22438,24691,22353,21549,31354,24656,23380,
928	25511,25248,21475,25187,23495,26543,21741,31391,33510,37239,24211,35044,22840,
929	22446,25358,36328,33007,22359,31607,20393,24555,23485,27454,21281,31568,29378,
930	26694,30719,30518,26103,20917,20111,30420,23743,31397,33909,22862,39745,20608,
931	32350,32351,32352,32353,32354,32355,32356,32357,32358,32359,32360,32361,32362,
932	32363,32364,32365,32366,32367,32368,32369,32370,32371,32372,32373,32374,32375,
933	32376,32377,32378,32379,32380,32381,32382,32383,32384,32385,32387,32388,32389,
934	32390,32391,32392,32393,32394,32395,32396,32397,32398,32399,32400,32401,32402,
935	32403,32404,32405,32406,32407,32408,32409,32410,32412,
936	32413,32414,32430,32436,32443,32444,32470,32484,32492,32505,32522,32528,32542,
937	32567,32569,32571,32572,32573,32574,32575,32576,32577,32579,32582,32583,32584,
938	32585,32586,32587,32588,32589,32590,32591,32594,32595,39304,24871,28291,22372,
939	26118,25414,22256,25324,25193,24275,38420,22403,25289,21895,34593,33098,36771,
940	21862,33713,26469,36182,34013,23146,26639,25318,31726,38417,20848,28572,35888,
941	25597,35272,25042,32518,28866,28389,29701,27028,29436,24266,37070,26391,28010,
942	25438,21171,29282,32769,20332,23013,37226,28889,28061,21202,20048,38647,38253,
943	34174,30922,32047,20769,22418,25794,32907,31867,27882,26865,26974,20919,21400,
944	26792,29313,40654,31729,29432,31163,28435,29702,26446,37324,40100,31036,33673,
945	33620,21519,26647,20029,21385,21169,30782,21382,21033,20616,20363,20432,32598,
946	32601,32603,32604,32605,32606,32608,32611,32612,32613,32614,32615,32619,32620,
947	32621,32623,32624,32627,32629,32630,32631,32632,32634,32635,32636,32637,32639,
948	32640,32642,32643,32644,32645,32646,32647,32648,32649,32651,32653,32655,32656,
949	32657,32658,32659,32661,32662,32663,32664,32665,32667,32668,32672,32674,32675,
950	32677,32678,32680,32681,32682,32683,32684,32685,32686,32689,32691,32692,32693,
951	32694,32695,32698,32699,32702,32704,32706,32707,32708,32710,32711,32712,32713,
952	32715,32717,32719,32720,32721,32722,32723,32726,32727,32729,32730,32731,32732,
953	32733,32734,32738,32739,30178,31435,31890,27813,38582,21147,29827,21737,20457,
954	32852,33714,36830,38256,24265,24604,28063,24088,25947,33080,38142,24651,28860,
955	32451,31918,20937,26753,31921,33391,20004,36742,37327,
956	26238,20142,35845,25769,32842,20698,30103,29134,23525,36797,28518,20102,25730,
957	38243,24278,26009,21015,35010,28872,21155,29454,29747,26519,30967,38678,20020,
958	37051,40158,28107,20955,36161,21533,25294,29618,33777,38646,40836,38083,20278,
959	32666,20940,28789,38517,23725,39046,21478,20196,28316,29705,27060,30827,39311,
960	30041,21016,30244,27969,26611,20845,40857,32843,21657,31548,31423,32740,32743,
961	32744,32746,32747,32748,32749,32751,32754,32756,32757,32758,32759,32760,32761,
962	32762,32765,32766,32767,32770,32775,32776,32777,32778,32782,32783,32785,32787,
963	32794,32795,32797,32798,32799,32801,32803,32804,32811,32812,32813,32814,32815,
964	32816,32818,32820,32825,32826,32828,32830,32832,32833,32836,32837,32839,32840,
965	32841,32846,32847,32848,32849,32851,32853,32854,32855,32857,32859,32860,32861,
966	32862,32863,32864,32865,32866,32867,32868,32869,32870,32871,32872,32875,32876,
967	32877,32878,32879,32880,32882,32883,32884,32885,32886,32887,32888,32889,32890,
968	32891,32892,32893,38534,22404,25314,38471,27004,23044,25602,31699,28431,38475,
969	33446,21346,39045,24208,28809,25523,21348,34383,40065,40595,30860,38706,36335,
970	36162,40575,28510,31108,24405,38470,25134,39540,21525,38109,20387,26053,23653,
971	23649,32533,34385,27695,24459,29575,28388,32511,23782,25371,23402,28390,21365,
972	20081,25504,30053,25249,36718,20262,20177,27814,32438,35770,33821,34746,32599,
973	36923,38179,31657,39585,35064,33853,27931,39558,32476,22920,40635,29595,30721,
974	34434,39532,39554,22043,21527,22475,20080,40614,21334,36808,33033,30610,39314,
975	34542,28385,34067,26364,24930,28459,32894,32897,32898,
976	32901,32904,32906,32909,32910,32911,32912,32913,32914,32916,32917,32919,32921,
977	32926,32931,32934,32935,32936,32940,32944,32947,32949,32950,32952,32953,32955,
978	32965,32967,32968,32969,32970,32971,32975,32976,32977,32978,32979,32980,32981,
979	32984,32991,32992,32994,32995,32998,33006,33013,33015,33017,33019,33022,33023,
980	33024,33025,33027,33028,33029,33031,33032,33035,33036,33045,33047,33049,33051,
981	33052,33053,33055,33056,33057,33058,33059,33060,33061,33062,33063,33064,33065,
982	33066,33067,33069,33070,33072,33075,33076,33077,33079,33081,33082,33083,33084,
983	33085,33087,35881,33426,33579,30450,27667,24537,33725,29483,33541,38170,27611,
984	30683,38086,21359,33538,20882,24125,35980,36152,20040,29611,26522,26757,37238,
985	38665,29028,27809,30473,23186,38209,27599,32654,26151,23504,22969,23194,38376,
986	38391,20204,33804,33945,27308,30431,38192,29467,26790,23391,30511,37274,38753,
987	31964,36855,35868,24357,31859,31192,35269,27852,34588,23494,24130,26825,30496,
988	32501,20885,20813,21193,23081,32517,38754,33495,25551,30596,34256,31186,28218,
989	24217,22937,34065,28781,27665,25279,30399,25935,24751,38397,26126,34719,40483,
990	38125,21517,21629,35884,25720,33088,33089,33090,33091,33092,33093,33095,33097,
991	33101,33102,33103,33106,33110,33111,33112,33115,33116,33117,33118,33119,33121,
992	33122,33123,33124,33126,33128,33130,33131,33132,33135,33138,33139,33141,33142,
993	33143,33144,33153,33155,33156,33157,33158,33159,33161,33163,33164,33165,33166,
994	33168,33170,33171,33172,33173,33174,33175,33177,33178,33182,33183,33184,33185,
995	33186,33188,33189,33191,33193,33195,33196,33197,33198,
996	33199,33200,33201,33202,33204,33205,33206,33207,33208,33209,33212,33213,33214,
997	33215,33220,33221,33223,33224,33225,33227,33229,33230,33231,33232,33233,33234,
998	33235,25721,34321,27169,33180,30952,25705,39764,25273,26411,33707,22696,40664,
999	27819,28448,23518,38476,35851,29279,26576,25287,29281,20137,22982,27597,22675,
1000	26286,24149,21215,24917,26408,30446,30566,29287,31302,25343,21738,21584,38048,
1001	37027,23068,32435,27670,20035,22902,32784,22856,21335,30007,38590,22218,25376,
1002	33041,24700,38393,28118,21602,39297,20869,23273,33021,22958,38675,20522,27877,
1003	23612,25311,20320,21311,33147,36870,28346,34091,25288,24180,30910,25781,25467,
1004	24565,23064,37247,40479,23615,25423,32834,23421,21870,38218,38221,28037,24744,
1005	26592,29406,20957,23425,33236,33237,33238,33239,33240,33241,33242,33243,33244,
1006	33245,33246,33247,33248,33249,33250,33252,33253,33254,33256,33257,33259,33262,
1007	33263,33264,33265,33266,33269,33270,33271,33272,33273,33274,33277,33279,33283,
1008	33287,33288,33289,33290,33291,33294,33295,33297,33299,33301,33302,33303,33304,
1009	33305,33306,33309,33312,33316,33317,33318,33319,33321,33326,33330,33338,33340,
1010	33341,33343,33344,33345,33346,33347,33349,33350,33352,33354,33356,33357,33358,
1011	33360,33361,33362,33363,33364,33365,33366,33367,33369,33371,33372,33373,33374,
1012	33376,33377,33378,33379,33380,33381,33382,33383,33385,25319,27870,29275,25197,
1013	38062,32445,33043,27987,20892,24324,22900,21162,24594,22899,26262,34384,30111,
1014	25386,25062,31983,35834,21734,27431,40485,27572,34261,21589,20598,27812,21866,
1015	36276,29228,24085,24597,29750,25293,25490,29260,24472,
1016	28227,27966,25856,28504,30424,30928,30460,30036,21028,21467,20051,24222,26049,
1017	32810,32982,25243,21638,21032,28846,34957,36305,27873,21624,32986,22521,35060,
1018	36180,38506,37197,20329,27803,21943,30406,30768,25256,28921,28558,24429,34028,
1019	26842,30844,31735,33192,26379,40527,25447,30896,22383,30738,38713,25209,25259,
1020	21128,29749,27607,33386,33387,33388,33389,33393,33397,33398,33399,33400,33403,
1021	33404,33408,33409,33411,33413,33414,33415,33417,33420,33424,33427,33428,33429,
1022	33430,33434,33435,33438,33440,33442,33443,33447,33458,33461,33462,33466,33467,
1023	33468,33471,33472,33474,33475,33477,33478,33481,33488,33494,33497,33498,33501,
1024	33506,33511,33512,33513,33514,33516,33517,33518,33520,33522,33523,33525,33526,
1025	33528,33530,33532,33533,33534,33535,33536,33546,33547,33549,33552,33554,33555,
1026	33558,33560,33561,33565,33566,33567,33568,33569,33570,33571,33572,33573,33574,
1027	33577,33578,33582,33584,33586,33591,33595,33597,21860,33086,30130,30382,21305,
1028	30174,20731,23617,35692,31687,20559,29255,39575,39128,28418,29922,31080,25735,
1029	30629,25340,39057,36139,21697,32856,20050,22378,33529,33805,24179,20973,29942,
1030	35780,23631,22369,27900,39047,23110,30772,39748,36843,31893,21078,25169,38138,
1031	20166,33670,33889,33769,33970,22484,26420,22275,26222,28006,35889,26333,28689,
1032	26399,27450,26646,25114,22971,19971,20932,28422,26578,27791,20854,26827,22855,
1033	27495,30054,23822,33040,40784,26071,31048,31041,39569,36215,23682,20062,20225,
1034	21551,22865,30732,22120,27668,36804,24323,27773,27875,35755,25488,33598,33599,
1035	33601,33602,33604,33605,33608,33610,33611,33612,33613,
1036	33614,33619,33621,33622,33623,33624,33625,33629,33634,33648,33649,33650,33651,
1037	33652,33653,33654,33657,33658,33662,33663,33664,33665,33666,33667,33668,33671,
1038	33672,33674,33675,33676,33677,33679,33680,33681,33684,33685,33686,33687,33689,
1039	33690,33693,33695,33697,33698,33699,33700,33701,33702,33703,33708,33709,33710,
1040	33711,33717,33723,33726,33727,33730,33731,33732,33734,33736,33737,33739,33741,
1041	33742,33744,33745,33746,33747,33749,33751,33753,33754,33755,33758,33762,33763,
1042	33764,33766,33767,33768,33771,33772,33773,24688,27965,29301,25190,38030,38085,
1043	21315,36801,31614,20191,35878,20094,40660,38065,38067,21069,28508,36963,27973,
1044	35892,22545,23884,27424,27465,26538,21595,33108,32652,22681,34103,24378,25250,
1045	27207,38201,25970,24708,26725,30631,20052,20392,24039,38808,25772,32728,23789,
1046	20431,31373,20999,33540,19988,24623,31363,38054,20405,20146,31206,29748,21220,
1047	33465,25810,31165,23517,27777,38738,36731,27682,20542,21375,28165,25806,26228,
1048	27696,24773,39031,35831,24198,29756,31351,31179,19992,37041,29699,27714,22234,
1049	37195,27845,36235,21306,34502,26354,36527,23624,39537,28192,33774,33775,33779,
1050	33780,33781,33782,33783,33786,33787,33788,33790,33791,33792,33794,33797,33799,
1051	33800,33801,33802,33808,33810,33811,33812,33813,33814,33815,33817,33818,33819,
1052	33822,33823,33824,33825,33826,33827,33833,33834,33835,33836,33837,33838,33839,
1053	33840,33842,33843,33844,33845,33846,33847,33849,33850,33851,33854,33855,33856,
1054	33857,33858,33859,33860,33861,33863,33864,33865,33866,33867,33868,33869,33870,
1055	33871,33872,33874,33875,33876,33877,33878,33880,33885,
1056	33886,33887,33888,33890,33892,33893,33894,33895,33896,33898,33902,33903,33904,
1057	33906,33908,33911,33913,33915,33916,21462,23094,40843,36259,21435,22280,39079,
1058	26435,37275,27849,20840,30154,25331,29356,21048,21149,32570,28820,30264,21364,
1059	40522,27063,30830,38592,35033,32676,28982,29123,20873,26579,29924,22756,25880,
1060	22199,35753,39286,25200,32469,24825,28909,22764,20161,20154,24525,38887,20219,
1061	35748,20995,22922,32427,25172,20173,26085,25102,33592,33993,33635,34701,29076,
1062	28342,23481,32466,20887,25545,26580,32905,33593,34837,20754,23418,22914,36785,
1063	20083,27741,20837,35109,36719,38446,34122,29790,38160,38384,28070,33509,24369,
1064	25746,27922,33832,33134,40131,22622,36187,19977,21441,33917,33918,33919,33920,
1065	33921,33923,33924,33925,33926,33930,33933,33935,33936,33937,33938,33939,33940,
1066	33941,33942,33944,33946,33947,33949,33950,33951,33952,33954,33955,33956,33957,
1067	33958,33959,33960,33961,33962,33963,33964,33965,33966,33968,33969,33971,33973,
1068	33974,33975,33979,33980,33982,33984,33986,33987,33989,33990,33991,33992,33995,
1069	33996,33998,33999,34002,34004,34005,34007,34008,34009,34010,34011,34012,34014,
1070	34017,34018,34020,34023,34024,34025,34026,34027,34029,34030,34031,34033,34034,
1071	34035,34036,34037,34038,34039,34040,34041,34042,34043,34045,34046,34048,34049,
1072	34050,20254,25955,26705,21971,20007,25620,39578,25195,23234,29791,33394,28073,
1073	26862,20711,33678,30722,26432,21049,27801,32433,20667,21861,29022,31579,26194,
1074	29642,33515,26441,23665,21024,29053,34923,38378,38485,25797,36193,33203,21892,
1075	27733,25159,32558,22674,20260,21830,36175,26188,19978,
1076	23578,35059,26786,25422,31245,28903,33421,21242,38902,23569,21736,37045,32461,
1077	22882,36170,34503,33292,33293,36198,25668,23556,24913,28041,31038,35774,30775,
1078	30003,21627,20280,36523,28145,23072,32453,31070,27784,23457,23158,29978,32958,
1079	24910,28183,22768,29983,29989,29298,21319,32499,34051,34052,34053,34054,34055,
1080	34056,34057,34058,34059,34061,34062,34063,34064,34066,34068,34069,34070,34072,
1081	34073,34075,34076,34077,34078,34080,34082,34083,34084,34085,34086,34087,34088,
1082	34089,34090,34093,34094,34095,34096,34097,34098,34099,34100,34101,34102,34110,
1083	34111,34112,34113,34114,34116,34117,34118,34119,34123,34124,34125,34126,34127,
1084	34128,34129,34130,34131,34132,34133,34135,34136,34138,34139,34140,34141,34143,
1085	34144,34145,34146,34147,34149,34150,34151,34153,34154,34155,34156,34157,34158,
1086	34159,34160,34161,34163,34165,34166,34167,34168,34172,34173,34175,34176,34177,
1087	30465,30427,21097,32988,22307,24072,22833,29422,26045,28287,35799,23608,34417,
1088	21313,30707,25342,26102,20160,39135,34432,23454,35782,21490,30690,20351,23630,
1089	39542,22987,24335,31034,22763,19990,26623,20107,25325,35475,36893,21183,26159,
1090	21980,22124,36866,20181,20365,37322,39280,27663,24066,24643,23460,35270,35797,
1091	25910,25163,39318,23432,23551,25480,21806,21463,30246,20861,34092,26530,26803,
1092	27530,25234,36755,21460,33298,28113,30095,20070,36174,23408,29087,34223,26257,
1093	26329,32626,34560,40653,40736,23646,26415,36848,26641,26463,25101,31446,22661,
1094	24246,25968,28465,34178,34179,34182,34184,34185,34186,34187,34188,34189,34190,
1095	34192,34193,34194,34195,34196,34197,34198,34199,34200,
1096	34201,34202,34205,34206,34207,34208,34209,34210,34211,34213,34214,34215,34217,
1097	34219,34220,34221,34225,34226,34227,34228,34229,34230,34232,34234,34235,34236,
1098	34237,34238,34239,34240,34242,34243,34244,34245,34246,34247,34248,34250,34251,
1099	34252,34253,34254,34257,34258,34260,34262,34263,34264,34265,34266,34267,34269,
1100	34270,34271,34272,34273,34274,34275,34277,34278,34279,34280,34282,34283,34284,
1101	34285,34286,34287,34288,34289,34290,34291,34292,34293,34294,34295,34296,24661,
1102	21047,32781,25684,34928,29993,24069,26643,25332,38684,21452,29245,35841,27700,
1103	30561,31246,21550,30636,39034,33308,35828,30805,26388,28865,26031,25749,22070,
1104	24605,31169,21496,19997,27515,32902,23546,21987,22235,20282,20284,39282,24051,
1105	26494,32824,24578,39042,36865,23435,35772,35829,25628,33368,25822,22013,33487,
1106	37221,20439,32032,36895,31903,20723,22609,28335,23487,35785,32899,37240,33948,
1107	31639,34429,38539,38543,32485,39635,30862,23681,31319,36930,38567,31071,23385,
1108	25439,31499,34001,26797,21766,32553,29712,32034,38145,25152,22604,20182,23427,
1109	22905,22612,34297,34298,34300,34301,34302,34304,34305,34306,34307,34308,34310,
1110	34311,34312,34313,34314,34315,34316,34317,34318,34319,34320,34322,34323,34324,
1111	34325,34327,34328,34329,34330,34331,34332,34333,34334,34335,34336,34337,34338,
1112	34339,34340,34341,34342,34344,34346,34347,34348,34349,34350,34351,34352,34353,
1113	34354,34355,34356,34357,34358,34359,34361,34362,34363,34365,34366,34367,34368,
1114	34369,34370,34371,34372,34373,34374,34375,34376,34377,34378,34379,34380,34386,
1115	34387,34389,34390,34391,34392,34393,34395,34396,34397,
1116	34399,34400,34401,34403,34404,34405,34406,34407,34408,34409,34410,29549,25374,
1117	36427,36367,32974,33492,25260,21488,27888,37214,22826,24577,27760,22349,25674,
1118	36138,30251,28393,22363,27264,30192,28525,35885,35848,22374,27631,34962,30899,
1119	25506,21497,28845,27748,22616,25642,22530,26848,33179,21776,31958,20504,36538,
1120	28108,36255,28907,25487,28059,28372,32486,33796,26691,36867,28120,38518,35752,
1121	22871,29305,34276,33150,30140,35466,26799,21076,36386,38161,25552,39064,36420,
1122	21884,20307,26367,22159,24789,28053,21059,23625,22825,28155,22635,30000,29980,
1123	24684,33300,33094,25361,26465,36834,30522,36339,36148,38081,24086,21381,21548,
1124	28867,34413,34415,34416,34418,34419,34420,34421,34422,34423,34424,34435,34436,
1125	34437,34438,34439,34440,34441,34446,34447,34448,34449,34450,34452,34454,34455,
1126	34456,34457,34458,34459,34462,34463,34464,34465,34466,34469,34470,34475,34477,
1127	34478,34482,34483,34487,34488,34489,34491,34492,34493,34494,34495,34497,34498,
1128	34499,34501,34504,34508,34509,34514,34515,34517,34518,34519,34522,34524,34525,
1129	34528,34529,34530,34531,34533,34534,34535,34536,34538,34539,34540,34543,34549,
1130	34550,34551,34554,34555,34556,34557,34559,34561,34564,34565,34566,34571,34572,
1131	34574,34575,34576,34577,34580,34582,27712,24311,20572,20141,24237,25402,33351,
1132	36890,26704,37230,30643,21516,38108,24420,31461,26742,25413,31570,32479,30171,
1133	20599,25237,22836,36879,20984,31171,31361,22270,24466,36884,28034,23648,22303,
1134	21520,20820,28237,22242,25512,39059,33151,34581,35114,36864,21534,23663,33216,
1135	25302,25176,33073,40501,38464,39534,39548,26925,22949,
1136	25299,21822,25366,21703,34521,27964,23043,29926,34972,27498,22806,35916,24367,
1137	28286,29609,39037,20024,28919,23436,30871,25405,26202,30358,24779,23451,23113,
1138	19975,33109,27754,29579,20129,26505,32593,24448,26106,26395,24536,22916,23041,
1139	34585,34587,34589,34591,34592,34596,34598,34599,34600,34602,34603,34604,34605,
1140	34607,34608,34610,34611,34613,34614,34616,34617,34618,34620,34621,34624,34625,
1141	34626,34627,34628,34629,34630,34634,34635,34637,34639,34640,34641,34642,34644,
1142	34645,34646,34648,34650,34651,34652,34653,34654,34655,34657,34658,34662,34663,
1143	34664,34665,34666,34667,34668,34669,34671,34673,34674,34675,34677,34679,34680,
1144	34681,34682,34687,34688,34689,34692,34694,34695,34697,34698,34700,34702,34703,
1145	34704,34705,34706,34708,34709,34710,34712,34713,34714,34715,34716,34717,34718,
1146	34720,34721,34722,34723,34724,24013,24494,21361,38886,36829,26693,22260,21807,
1147	24799,20026,28493,32500,33479,33806,22996,20255,20266,23614,32428,26410,34074,
1148	21619,30031,32963,21890,39759,20301,28205,35859,23561,24944,21355,30239,28201,
1149	34442,25991,38395,32441,21563,31283,32010,38382,21985,32705,29934,25373,34583,
1150	28065,31389,25105,26017,21351,25569,27779,24043,21596,38056,20044,27745,35820,
1151	23627,26080,33436,26791,21566,21556,27595,27494,20116,25410,21320,33310,20237,
1152	20398,22366,25098,38654,26212,29289,21247,21153,24735,35823,26132,29081,26512,
1153	35199,30802,30717,26224,22075,21560,38177,29306,34725,34726,34727,34729,34730,
1154	34734,34736,34737,34738,34740,34742,34743,34744,34745,34747,34748,34750,34751,
1155	34753,34754,34755,34756,34757,34759,34760,34761,34764,
1156	34765,34766,34767,34768,34772,34773,34774,34775,34776,34777,34778,34780,34781,
1157	34782,34783,34785,34786,34787,34788,34790,34791,34792,34793,34795,34796,34797,
1158	34799,34800,34801,34802,34803,34804,34805,34806,34807,34808,34810,34811,34812,
1159	34813,34815,34816,34817,34818,34820,34821,34822,34823,34824,34825,34827,34828,
1160	34829,34830,34831,34832,34833,34834,34836,34839,34840,34841,34842,34844,34845,
1161	34846,34847,34848,34851,31232,24687,24076,24713,33181,22805,24796,29060,28911,
1162	28330,27728,29312,27268,34989,24109,20064,23219,21916,38115,27927,31995,38553,
1163	25103,32454,30606,34430,21283,38686,36758,26247,23777,20384,29421,19979,21414,
1164	22799,21523,25472,38184,20808,20185,40092,32420,21688,36132,34900,33335,38386,
1165	28046,24358,23244,26174,38505,29616,29486,21439,33146,39301,32673,23466,38519,
1166	38480,32447,30456,21410,38262,39321,31665,35140,28248,20065,32724,31077,35814,
1167	24819,21709,20139,39033,24055,27233,20687,21521,35937,33831,30813,38660,21066,
1168	21742,22179,38144,28040,23477,28102,26195,34852,34853,34854,34855,34856,34857,
1169	34858,34859,34860,34861,34862,34863,34864,34865,34867,34868,34869,34870,34871,
1170	34872,34874,34875,34877,34878,34879,34881,34882,34883,34886,34887,34888,34889,
1171	34890,34891,34894,34895,34896,34897,34898,34899,34901,34902,34904,34906,34907,
1172	34908,34909,34910,34911,34912,34918,34919,34922,34925,34927,34929,34931,34932,
1173	34933,34934,34936,34937,34938,34939,34940,34944,34947,34950,34951,34953,34954,
1174	34956,34958,34959,34960,34961,34963,34964,34965,34967,34968,34969,34970,34971,
1175	34973,34974,34975,34976,34977,34979,34981,34982,34983,
1176	34984,34985,34986,23567,23389,26657,32918,21880,31505,25928,26964,20123,27463,
1177	34638,38795,21327,25375,25658,37034,26012,32961,35856,20889,26800,21368,34809,
1178	25032,27844,27899,35874,23633,34218,33455,38156,27427,36763,26032,24571,24515,
1179	20449,34885,26143,33125,29481,24826,20852,21009,22411,24418,37026,34892,37266,
1180	24184,26447,24615,22995,20804,20982,33016,21256,27769,38596,29066,20241,20462,
1181	32670,26429,21957,38152,31168,34966,32483,22687,25100,38656,34394,22040,39035,
1182	24464,35768,33988,37207,21465,26093,24207,30044,24676,32110,23167,32490,32493,
1183	36713,21927,23459,24748,26059,29572,34988,34990,34991,34992,34994,34995,34996,
1184	34997,34998,35000,35001,35002,35003,35005,35006,35007,35008,35011,35012,35015,
1185	35016,35018,35019,35020,35021,35023,35024,35025,35027,35030,35031,35034,35035,
1186	35036,35037,35038,35040,35041,35046,35047,35049,35050,35051,35052,35053,35054,
1187	35055,35058,35061,35062,35063,35066,35067,35069,35071,35072,35073,35075,35076,
1188	35077,35078,35079,35080,35081,35083,35084,35085,35086,35087,35089,35092,35093,
1189	35094,35095,35096,35100,35101,35102,35103,35104,35106,35107,35108,35110,35111,
1190	35112,35113,35116,35117,35118,35119,35121,35122,35123,35125,35127,36873,30307,
1191	30505,32474,38772,34203,23398,31348,38634,34880,21195,29071,24490,26092,35810,
1192	23547,39535,24033,27529,27739,35757,35759,36874,36805,21387,25276,40486,40493,
1193	21568,20011,33469,29273,34460,23830,34905,28079,38597,21713,20122,35766,28937,
1194	21693,38409,28895,28153,30416,20005,30740,34578,23721,24310,35328,39068,38414,
1195	28814,27839,22852,25513,30524,34893,28436,33395,22576,
1196	29141,21388,30746,38593,21761,24422,28976,23476,35866,39564,27523,22830,40495,
1197	31207,26472,25196,20335,30113,32650,27915,38451,27687,20208,30162,20859,26679,
1198	28478,36992,33136,22934,29814,35128,35129,35130,35131,35132,35133,35134,35135,
1199	35136,35138,35139,35141,35142,35143,35144,35145,35146,35147,35148,35149,35150,
1200	35151,35152,35153,35154,35155,35156,35157,35158,35159,35160,35161,35162,35163,
1201	35164,35165,35168,35169,35170,35171,35172,35173,35175,35176,35177,35178,35179,
1202	35180,35181,35182,35183,35184,35185,35186,35187,35188,35189,35190,35191,35192,
1203	35193,35194,35196,35197,35198,35200,35202,35204,35205,35207,35208,35209,35210,
1204	35211,35212,35213,35214,35215,35216,35217,35218,35219,35220,35221,35222,35223,
1205	35224,35225,35226,35227,35228,35229,35230,35231,35232,35233,25671,23591,36965,
1206	31377,35875,23002,21676,33280,33647,35201,32768,26928,22094,32822,29239,37326,
1207	20918,20063,39029,25494,19994,21494,26355,33099,22812,28082,19968,22777,21307,
1208	25558,38129,20381,20234,34915,39056,22839,36951,31227,20202,33008,30097,27778,
1209	23452,23016,24413,26885,34433,20506,24050,20057,30691,20197,33402,25233,26131,
1210	37009,23673,20159,24441,33222,36920,32900,30123,20134,35028,24847,27589,24518,
1211	20041,30410,28322,35811,35758,35850,35793,24322,32764,32716,32462,33589,33643,
1212	22240,27575,38899,38452,23035,21535,38134,28139,23493,39278,23609,24341,38544,
1213	35234,35235,35236,35237,35238,35239,35240,35241,35242,35243,35244,35245,35246,
1214	35247,35248,35249,35250,35251,35252,35253,35254,35255,35256,35257,35258,35259,
1215	35260,35261,35262,35263,35264,35267,35277,35283,35284,
1216	35285,35287,35288,35289,35291,35293,35295,35296,35297,35298,35300,35303,35304,
1217	35305,35306,35308,35309,35310,35312,35313,35314,35316,35317,35318,35319,35320,
1218	35321,35322,35323,35324,35325,35326,35327,35329,35330,35331,35332,35333,35334,
1219	35336,35337,35338,35339,35340,35341,35342,35343,35344,35345,35346,35347,35348,
1220	35349,35350,35351,35352,35353,35354,35355,35356,35357,21360,33521,27185,23156,
1221	40560,24212,32552,33721,33828,33829,33639,34631,36814,36194,30408,24433,39062,
1222	30828,26144,21727,25317,20323,33219,30152,24248,38605,36362,34553,21647,27891,
1223	28044,27704,24703,21191,29992,24189,20248,24736,24551,23588,30001,37038,38080,
1224	29369,27833,28216,37193,26377,21451,21491,20305,37321,35825,21448,24188,36802,
1225	28132,20110,30402,27014,34398,24858,33286,20313,20446,36926,40060,24841,28189,
1226	28180,38533,20104,23089,38632,19982,23679,31161,23431,35821,32701,29577,22495,
1227	33419,37057,21505,36935,21947,23786,24481,24840,27442,29425,32946,35465,35358,
1228	35359,35360,35361,35362,35363,35364,35365,35366,35367,35368,35369,35370,35371,
1229	35372,35373,35374,35375,35376,35377,35378,35379,35380,35381,35382,35383,35384,
1230	35385,35386,35387,35388,35389,35391,35392,35393,35394,35395,35396,35397,35398,
1231	35399,35401,35402,35403,35404,35405,35406,35407,35408,35409,35410,35411,35412,
1232	35413,35414,35415,35416,35417,35418,35419,35420,35421,35422,35423,35424,35425,
1233	35426,35427,35428,35429,35430,35431,35432,35433,35434,35435,35436,35437,35438,
1234	35439,35440,35441,35442,35443,35444,35445,35446,35447,35448,35450,35451,35452,
1235	35453,35454,35455,35456,28020,23507,35029,39044,35947,
1236	39533,40499,28170,20900,20803,22435,34945,21407,25588,36757,22253,21592,22278,
1237	29503,28304,32536,36828,33489,24895,24616,38498,26352,32422,36234,36291,38053,
1238	23731,31908,26376,24742,38405,32792,20113,37095,21248,38504,20801,36816,34164,
1239	37213,26197,38901,23381,21277,30776,26434,26685,21705,28798,23472,36733,20877,
1240	22312,21681,25874,26242,36190,36163,33039,33900,36973,31967,20991,34299,26531,
1241	26089,28577,34468,36481,22122,36896,30338,28790,29157,36131,25321,21017,27901,
1242	36156,24590,22686,24974,26366,36192,25166,21939,28195,26413,36711,35457,35458,
1243	35459,35460,35461,35462,35463,35464,35467,35468,35469,35470,35471,35472,35473,
1244	35474,35476,35477,35478,35479,35480,35481,35482,35483,35484,35485,35486,35487,
1245	35488,35489,35490,35491,35492,35493,35494,35495,35496,35497,35498,35499,35500,
1246	35501,35502,35503,35504,35505,35506,35507,35508,35509,35510,35511,35512,35513,
1247	35514,35515,35516,35517,35518,35519,35520,35521,35522,35523,35524,35525,35526,
1248	35527,35528,35529,35530,35531,35532,35533,35534,35535,35536,35537,35538,35539,
1249	35540,35541,35542,35543,35544,35545,35546,35547,35548,35549,35550,35551,35552,
1250	35553,35554,35555,38113,38392,30504,26629,27048,21643,20045,28856,35784,25688,
1251	25995,23429,31364,20538,23528,30651,27617,35449,31896,27838,30415,26025,36759,
1252	23853,23637,34360,26632,21344,25112,31449,28251,32509,27167,31456,24432,28467,
1253	24352,25484,28072,26454,19976,24080,36134,20183,32960,30260,38556,25307,26157,
1254	25214,27836,36213,29031,32617,20806,32903,21484,36974,25240,21746,34544,36761,
1255	32773,38167,34071,36825,27993,29645,26015,30495,29956,
1256	30759,33275,36126,38024,20390,26517,30137,35786,38663,25391,38215,38453,33976,
1257	25379,30529,24449,29424,20105,24596,25972,25327,27491,25919,35556,35557,35558,
1258	35559,35560,35561,35562,35563,35564,35565,35566,35567,35568,35569,35570,35571,
1259	35572,35573,35574,35575,35576,35577,35578,35579,35580,35581,35582,35583,35584,
1260	35585,35586,35587,35588,35589,35590,35592,35593,35594,35595,35596,35597,35598,
1261	35599,35600,35601,35602,35603,35604,35605,35606,35607,35608,35609,35610,35611,
1262	35612,35613,35614,35615,35616,35617,35618,35619,35620,35621,35623,35624,35625,
1263	35626,35627,35628,35629,35630,35631,35632,35633,35634,35635,35636,35637,35638,
1264	35639,35640,35641,35642,35643,35644,35645,35646,35647,35648,35649,35650,35651,
1265	35652,35653,24103,30151,37073,35777,33437,26525,25903,21553,34584,30693,32930,
1266	33026,27713,20043,32455,32844,30452,26893,27542,25191,20540,20356,22336,25351,
1267	27490,36286,21482,26088,32440,24535,25370,25527,33267,33268,32622,24092,23769,
1268	21046,26234,31209,31258,36136,28825,30164,28382,27835,31378,20013,30405,24544,
1269	38047,34935,32456,31181,32959,37325,20210,20247,33311,21608,24030,27954,35788,
1270	31909,36724,32920,24090,21650,30385,23449,26172,39588,29664,26666,34523,26417,
1271	29482,35832,35803,36880,31481,28891,29038,25284,30633,22065,20027,33879,26609,
1272	21161,34496,36142,38136,31569,35654,35655,35656,35657,35658,35659,35660,35661,
1273	35662,35663,35664,35665,35666,35667,35668,35669,35670,35671,35672,35673,35674,
1274	35675,35676,35677,35678,35679,35680,35681,35682,35683,35684,35685,35687,35688,
1275	35689,35690,35691,35693,35694,35695,35696,35697,35698,
1276	35699,35700,35701,35702,35703,35704,35705,35706,35707,35708,35709,35710,35711,
1277	35712,35713,35714,35715,35716,35717,35718,35719,35720,35721,35722,35723,35724,
1278	35725,35726,35727,35728,35729,35730,35731,35732,35733,35734,35735,35736,35737,
1279	35738,35739,35740,35741,35742,35743,35756,35761,35771,35783,35792,35818,35849,
1280	35870,20303,27880,31069,39547,25235,29226,25341,19987,30742,36716,25776,36186,
1281	31686,26729,24196,35013,22918,25758,22766,29366,26894,38181,36861,36184,22368,
1282	32512,35846,20934,25417,25305,21331,26700,29730,33537,37196,21828,30528,28796,
1283	27978,20857,21672,36164,23039,28363,28100,23388,32043,20180,31869,28371,23376,
1284	33258,28173,23383,39683,26837,36394,23447,32508,24635,32437,37049,36208,22863,
1285	25549,31199,36275,21330,26063,31062,35781,38459,32452,38075,32386,22068,37257,
1286	26368,32618,23562,36981,26152,24038,20304,26590,20570,20316,22352,24231,59408,
1287	59409,59410,59411,59412,35896,35897,35898,35899,35900,35901,35902,35903,35904,
1288	35906,35907,35908,35909,35912,35914,35915,35917,35918,35919,35920,35921,35922,
1289	35923,35924,35926,35927,35928,35929,35931,35932,35933,35934,35935,35936,35939,
1290	35940,35941,35942,35943,35944,35945,35948,35949,35950,35951,35952,35953,35954,
1291	35956,35957,35958,35959,35963,35964,35965,35966,35967,35968,35969,35971,35972,
1292	35974,35975,35976,35979,35981,35982,35983,35984,35985,35986,35987,35989,35990,
1293	35991,35993,35994,35995,35996,35997,35998,35999,36000,36001,36002,36003,36004,
1294	36005,36006,36007,36008,36009,36010,36011,36012,36013,20109,19980,20800,19984,
1295	24319,21317,19989,20120,19998,39730,23404,22121,20008,
1296	31162,20031,21269,20039,22829,29243,21358,27664,22239,32996,39319,27603,30590,
1297	40727,20022,20127,40720,20060,20073,20115,33416,23387,21868,22031,20164,21389,
1298	21405,21411,21413,21422,38757,36189,21274,21493,21286,21294,21310,36188,21350,
1299	21347,20994,21000,21006,21037,21043,21055,21056,21068,21086,21089,21084,33967,
1300	21117,21122,21121,21136,21139,20866,32596,20155,20163,20169,20162,20200,20193,
1301	20203,20190,20251,20211,20258,20324,20213,20261,20263,20233,20267,20318,20327,
1302	25912,20314,20317,36014,36015,36016,36017,36018,36019,36020,36021,36022,36023,
1303	36024,36025,36026,36027,36028,36029,36030,36031,36032,36033,36034,36035,36036,
1304	36037,36038,36039,36040,36041,36042,36043,36044,36045,36046,36047,36048,36049,
1305	36050,36051,36052,36053,36054,36055,36056,36057,36058,36059,36060,36061,36062,
1306	36063,36064,36065,36066,36067,36068,36069,36070,36071,36072,36073,36074,36075,
1307	36076,36077,36078,36079,36080,36081,36082,36083,36084,36085,36086,36087,36088,
1308	36089,36090,36091,36092,36093,36094,36095,36096,36097,36098,36099,36100,36101,
1309	36102,36103,36104,36105,36106,36107,36108,36109,20319,20311,20274,20285,20342,
1310	20340,20369,20361,20355,20367,20350,20347,20394,20348,20396,20372,20454,20456,
1311	20458,20421,20442,20451,20444,20433,20447,20472,20521,20556,20467,20524,20495,
1312	20526,20525,20478,20508,20492,20517,20520,20606,20547,20565,20552,20558,20588,
1313	20603,20645,20647,20649,20666,20694,20742,20717,20716,20710,20718,20743,20747,
1314	20189,27709,20312,20325,20430,40864,27718,31860,20846,24061,40649,39320,20865,
1315	22804,21241,21261,35335,21264,20971,22809,20821,20128,
1316	20822,20147,34926,34980,20149,33044,35026,31104,23348,34819,32696,20907,20913,
1317	20925,20924,36110,36111,36112,36113,36114,36115,36116,36117,36118,36119,36120,
1318	36121,36122,36123,36124,36128,36177,36178,36183,36191,36197,36200,36201,36202,
1319	36204,36206,36207,36209,36210,36216,36217,36218,36219,36220,36221,36222,36223,
1320	36224,36226,36227,36230,36231,36232,36233,36236,36237,36238,36239,36240,36242,
1321	36243,36245,36246,36247,36248,36249,36250,36251,36252,36253,36254,36256,36257,
1322	36258,36260,36261,36262,36263,36264,36265,36266,36267,36268,36269,36270,36271,
1323	36272,36274,36278,36279,36281,36283,36285,36288,36289,36290,36293,36295,36296,
1324	36297,36298,36301,36304,36306,36307,36308,20935,20886,20898,20901,35744,35750,
1325	35751,35754,35764,35765,35767,35778,35779,35787,35791,35790,35794,35795,35796,
1326	35798,35800,35801,35804,35807,35808,35812,35816,35817,35822,35824,35827,35830,
1327	35833,35836,35839,35840,35842,35844,35847,35852,35855,35857,35858,35860,35861,
1328	35862,35865,35867,35864,35869,35871,35872,35873,35877,35879,35882,35883,35886,
1329	35887,35890,35891,35893,35894,21353,21370,38429,38434,38433,38449,38442,38461,
1330	38460,38466,38473,38484,38495,38503,38508,38514,38516,38536,38541,38551,38576,
1331	37015,37019,37021,37017,37036,37025,37044,37043,37046,37050,36309,36312,36313,
1332	36316,36320,36321,36322,36325,36326,36327,36329,36333,36334,36336,36337,36338,
1333	36340,36342,36348,36350,36351,36352,36353,36354,36355,36356,36358,36359,36360,
1334	36363,36365,36366,36368,36369,36370,36371,36373,36374,36375,36376,36377,36378,
1335	36379,36380,36384,36385,36388,36389,36390,36391,36392,
1336	36395,36397,36400,36402,36403,36404,36406,36407,36408,36411,36412,36414,36415,
1337	36419,36421,36422,36428,36429,36430,36431,36432,36435,36436,36437,36438,36439,
1338	36440,36442,36443,36444,36445,36446,36447,36448,36449,36450,36451,36452,36453,
1339	36455,36456,36458,36459,36462,36465,37048,37040,37071,37061,37054,37072,37060,
1340	37063,37075,37094,37090,37084,37079,37083,37099,37103,37118,37124,37154,37150,
1341	37155,37169,37167,37177,37187,37190,21005,22850,21154,21164,21165,21182,21759,
1342	21200,21206,21232,21471,29166,30669,24308,20981,20988,39727,21430,24321,30042,
1343	24047,22348,22441,22433,22654,22716,22725,22737,22313,22316,22314,22323,22329,
1344	22318,22319,22364,22331,22338,22377,22405,22379,22406,22396,22395,22376,22381,
1345	22390,22387,22445,22436,22412,22450,22479,22439,22452,22419,22432,22485,22488,
1346	22490,22489,22482,22456,22516,22511,22520,22500,22493,36467,36469,36471,36472,
1347	36473,36474,36475,36477,36478,36480,36482,36483,36484,36486,36488,36489,36490,
1348	36491,36492,36493,36494,36497,36498,36499,36501,36502,36503,36504,36505,36506,
1349	36507,36509,36511,36512,36513,36514,36515,36516,36517,36518,36519,36520,36521,
1350	36522,36525,36526,36528,36529,36531,36532,36533,36534,36535,36536,36537,36539,
1351	36540,36541,36542,36543,36544,36545,36546,36547,36548,36549,36550,36551,36552,
1352	36553,36554,36555,36556,36557,36559,36560,36561,36562,36563,36564,36565,36566,
1353	36567,36568,36569,36570,36571,36572,36573,36574,36575,36576,36577,36578,36579,
1354	36580,22539,22541,22525,22509,22528,22558,22553,22596,22560,22629,22636,22657,
1355	22665,22682,22656,39336,40729,25087,33401,33405,33407,
1356	33423,33418,33448,33412,33422,33425,33431,33433,33451,33464,33470,33456,33480,
1357	33482,33507,33432,33463,33454,33483,33484,33473,33449,33460,33441,33450,33439,
1358	33476,33486,33444,33505,33545,33527,33508,33551,33543,33500,33524,33490,33496,
1359	33548,33531,33491,33553,33562,33542,33556,33557,33504,33493,33564,33617,33627,
1360	33628,33544,33682,33596,33588,33585,33691,33630,33583,33615,33607,33603,33631,
1361	33600,33559,33632,33581,33594,33587,33638,33637,36581,36582,36583,36584,36585,
1362	36586,36587,36588,36589,36590,36591,36592,36593,36594,36595,36596,36597,36598,
1363	36599,36600,36601,36602,36603,36604,36605,36606,36607,36608,36609,36610,36611,
1364	36612,36613,36614,36615,36616,36617,36618,36619,36620,36621,36622,36623,36624,
1365	36625,36626,36627,36628,36629,36630,36631,36632,36633,36634,36635,36636,36637,
1366	36638,36639,36640,36641,36642,36643,36644,36645,36646,36647,36648,36649,36650,
1367	36651,36652,36653,36654,36655,36656,36657,36658,36659,36660,36661,36662,36663,
1368	36664,36665,36666,36667,36668,36669,36670,36671,36672,36673,36674,36675,36676,
1369	33640,33563,33641,33644,33642,33645,33646,33712,33656,33715,33716,33696,33706,
1370	33683,33692,33669,33660,33718,33705,33661,33720,33659,33688,33694,33704,33722,
1371	33724,33729,33793,33765,33752,22535,33816,33803,33757,33789,33750,33820,33848,
1372	33809,33798,33748,33759,33807,33795,33784,33785,33770,33733,33728,33830,33776,
1373	33761,33884,33873,33882,33881,33907,33927,33928,33914,33929,33912,33852,33862,
1374	33897,33910,33932,33934,33841,33901,33985,33997,34000,34022,33981,34003,33994,
1375	33983,33978,34016,33953,33977,33972,33943,34021,34019,
1376	34060,29965,34104,34032,34105,34079,34106,36677,36678,36679,36680,36681,36682,
1377	36683,36684,36685,36686,36687,36688,36689,36690,36691,36692,36693,36694,36695,
1378	36696,36697,36698,36699,36700,36701,36702,36703,36704,36705,36706,36707,36708,
1379	36709,36714,36736,36748,36754,36765,36768,36769,36770,36772,36773,36774,36775,
1380	36778,36780,36781,36782,36783,36786,36787,36788,36789,36791,36792,36794,36795,
1381	36796,36799,36800,36803,36806,36809,36810,36811,36812,36813,36815,36818,36822,
1382	36823,36826,36832,36833,36835,36839,36844,36847,36849,36850,36852,36853,36854,
1383	36858,36859,36860,36862,36863,36871,36872,36876,36878,36883,36885,36888,34134,
1384	34107,34047,34044,34137,34120,34152,34148,34142,34170,30626,34115,34162,34171,
1385	34212,34216,34183,34191,34169,34222,34204,34181,34233,34231,34224,34259,34241,
1386	34268,34303,34343,34309,34345,34326,34364,24318,24328,22844,22849,32823,22869,
1387	22874,22872,21263,23586,23589,23596,23604,25164,25194,25247,25275,25290,25306,
1388	25303,25326,25378,25334,25401,25419,25411,25517,25590,25457,25466,25486,25524,
1389	25453,25516,25482,25449,25518,25532,25586,25592,25568,25599,25540,25566,25550,
1390	25682,25542,25534,25669,25665,25611,25627,25632,25612,25638,25633,25694,25732,
1391	25709,25750,36889,36892,36899,36900,36901,36903,36904,36905,36906,36907,36908,
1392	36912,36913,36914,36915,36916,36919,36921,36922,36925,36927,36928,36931,36933,
1393	36934,36936,36937,36938,36939,36940,36942,36948,36949,36950,36953,36954,36956,
1394	36957,36958,36959,36960,36961,36964,36966,36967,36969,36970,36971,36972,36975,
1395	36976,36977,36978,36979,36982,36983,36984,36985,36986,
1396	36987,36988,36990,36993,36996,36997,36998,36999,37001,37002,37004,37005,37006,
1397	37007,37008,37010,37012,37014,37016,37018,37020,37022,37023,37024,37028,37029,
1398	37031,37032,37033,37035,37037,37042,37047,37052,37053,37055,37056,25722,25783,
1399	25784,25753,25786,25792,25808,25815,25828,25826,25865,25893,25902,24331,24530,
1400	29977,24337,21343,21489,21501,21481,21480,21499,21522,21526,21510,21579,21586,
1401	21587,21588,21590,21571,21537,21591,21593,21539,21554,21634,21652,21623,21617,
1402	21604,21658,21659,21636,21622,21606,21661,21712,21677,21698,21684,21714,21671,
1403	21670,21715,21716,21618,21667,21717,21691,21695,21708,21721,21722,21724,21673,
1404	21674,21668,21725,21711,21726,21787,21735,21792,21757,21780,21747,21794,21795,
1405	21775,21777,21799,21802,21863,21903,21941,21833,21869,21825,21845,21823,21840,
1406	21820,37058,37059,37062,37064,37065,37067,37068,37069,37074,37076,37077,37078,
1407	37080,37081,37082,37086,37087,37088,37091,37092,37093,37097,37098,37100,37102,
1408	37104,37105,37106,37107,37109,37110,37111,37113,37114,37115,37116,37119,37120,
1409	37121,37123,37125,37126,37127,37128,37129,37130,37131,37132,37133,37134,37135,
1410	37136,37137,37138,37139,37140,37141,37142,37143,37144,37146,37147,37148,37149,
1411	37151,37152,37153,37156,37157,37158,37159,37160,37161,37162,37163,37164,37165,
1412	37166,37168,37170,37171,37172,37173,37174,37175,37176,37178,37179,37180,37181,
1413	37182,37183,37184,37185,37186,37188,21815,21846,21877,21878,21879,21811,21808,
1414	21852,21899,21970,21891,21937,21945,21896,21889,21919,21886,21974,21905,21883,
1415	21983,21949,21950,21908,21913,21994,22007,21961,22047,
1416	21969,21995,21996,21972,21990,21981,21956,21999,21989,22002,22003,21964,21965,
1417	21992,22005,21988,36756,22046,22024,22028,22017,22052,22051,22014,22016,22055,
1418	22061,22104,22073,22103,22060,22093,22114,22105,22108,22092,22100,22150,22116,
1419	22129,22123,22139,22140,22149,22163,22191,22228,22231,22237,22241,22261,22251,
1420	22265,22271,22276,22282,22281,22300,24079,24089,24084,24081,24113,24123,24124,
1421	37189,37191,37192,37201,37203,37204,37205,37206,37208,37209,37211,37212,37215,
1422	37216,37222,37223,37224,37227,37229,37235,37242,37243,37244,37248,37249,37250,
1423	37251,37252,37254,37256,37258,37262,37263,37267,37268,37269,37270,37271,37272,
1424	37273,37276,37277,37278,37279,37280,37281,37284,37285,37286,37287,37288,37289,
1425	37291,37292,37296,37297,37298,37299,37302,37303,37304,37305,37307,37308,37309,
1426	37310,37311,37312,37313,37314,37315,37316,37317,37318,37320,37323,37328,37330,
1427	37331,37332,37333,37334,37335,37336,37337,37338,37339,37341,37342,37343,37344,
1428	37345,37346,37347,37348,37349,24119,24132,24148,24155,24158,24161,23692,23674,
1429	23693,23696,23702,23688,23704,23705,23697,23706,23708,23733,23714,23741,23724,
1430	23723,23729,23715,23745,23735,23748,23762,23780,23755,23781,23810,23811,23847,
1431	23846,23854,23844,23838,23814,23835,23896,23870,23860,23869,23916,23899,23919,
1432	23901,23915,23883,23882,23913,23924,23938,23961,23965,35955,23991,24005,24435,
1433	24439,24450,24455,24457,24460,24469,24473,24476,24488,24493,24501,24508,34914,
1434	24417,29357,29360,29364,29367,29368,29379,29377,29390,29389,29394,29416,29423,
1435	29417,29426,29428,29431,29441,29427,29443,29434,37350,
1436	37351,37352,37353,37354,37355,37356,37357,37358,37359,37360,37361,37362,37363,
1437	37364,37365,37366,37367,37368,37369,37370,37371,37372,37373,37374,37375,37376,
1438	37377,37378,37379,37380,37381,37382,37383,37384,37385,37386,37387,37388,37389,
1439	37390,37391,37392,37393,37394,37395,37396,37397,37398,37399,37400,37401,37402,
1440	37403,37404,37405,37406,37407,37408,37409,37410,37411,37412,37413,37414,37415,
1441	37416,37417,37418,37419,37420,37421,37422,37423,37424,37425,37426,37427,37428,
1442	37429,37430,37431,37432,37433,37434,37435,37436,37437,37438,37439,37440,37441,
1443	37442,37443,37444,37445,29435,29463,29459,29473,29450,29470,29469,29461,29474,
1444	29497,29477,29484,29496,29489,29520,29517,29527,29536,29548,29551,29566,33307,
1445	22821,39143,22820,22786,39267,39271,39272,39273,39274,39275,39276,39284,39287,
1446	39293,39296,39300,39303,39306,39309,39312,39313,39315,39316,39317,24192,24209,
1447	24203,24214,24229,24224,24249,24245,24254,24243,36179,24274,24273,24283,24296,
1448	24298,33210,24516,24521,24534,24527,24579,24558,24580,24545,24548,24574,24581,
1449	24582,24554,24557,24568,24601,24629,24614,24603,24591,24589,24617,24619,24586,
1450	24639,24609,24696,24697,24699,24698,24642,37446,37447,37448,37449,37450,37451,
1451	37452,37453,37454,37455,37456,37457,37458,37459,37460,37461,37462,37463,37464,
1452	37465,37466,37467,37468,37469,37470,37471,37472,37473,37474,37475,37476,37477,
1453	37478,37479,37480,37481,37482,37483,37484,37485,37486,37487,37488,37489,37490,
1454	37491,37493,37494,37495,37496,37497,37498,37499,37500,37501,37502,37503,37504,
1455	37505,37506,37507,37508,37509,37510,37511,37512,37513,
1456	37514,37515,37516,37517,37519,37520,37521,37522,37523,37524,37525,37526,37527,
1457	37528,37529,37530,37531,37532,37533,37534,37535,37536,37537,37538,37539,37540,
1458	37541,37542,37543,24682,24701,24726,24730,24749,24733,24707,24722,24716,24731,
1459	24812,24763,24753,24797,24792,24774,24794,24756,24864,24870,24853,24867,24820,
1460	24832,24846,24875,24906,24949,25004,24980,24999,25015,25044,25077,24541,38579,
1461	38377,38379,38385,38387,38389,38390,38396,38398,38403,38404,38406,38408,38410,
1462	38411,38412,38413,38415,38418,38421,38422,38423,38425,38426,20012,29247,25109,
1463	27701,27732,27740,27722,27811,27781,27792,27796,27788,27752,27753,27764,27766,
1464	27782,27817,27856,27860,27821,27895,27896,27889,27863,27826,27872,27862,27898,
1465	27883,27886,27825,27859,27887,27902,37544,37545,37546,37547,37548,37549,37551,
1466	37552,37553,37554,37555,37556,37557,37558,37559,37560,37561,37562,37563,37564,
1467	37565,37566,37567,37568,37569,37570,37571,37572,37573,37574,37575,37577,37578,
1468	37579,37580,37581,37582,37583,37584,37585,37586,37587,37588,37589,37590,37591,
1469	37592,37593,37594,37595,37596,37597,37598,37599,37600,37601,37602,37603,37604,
1470	37605,37606,37607,37608,37609,37610,37611,37612,37613,37614,37615,37616,37617,
1471	37618,37619,37620,37621,37622,37623,37624,37625,37626,37627,37628,37629,37630,
1472	37631,37632,37633,37634,37635,37636,37637,37638,37639,37640,37641,27961,27943,
1473	27916,27971,27976,27911,27908,27929,27918,27947,27981,27950,27957,27930,27983,
1474	27986,27988,27955,28049,28015,28062,28064,27998,28051,28052,27996,28000,28028,
1475	28003,28186,28103,28101,28126,28174,28095,28128,28177,
1476	28134,28125,28121,28182,28075,28172,28078,28203,28270,28238,28267,28338,28255,
1477	28294,28243,28244,28210,28197,28228,28383,28337,28312,28384,28461,28386,28325,
1478	28327,28349,28347,28343,28375,28340,28367,28303,28354,28319,28514,28486,28487,
1479	28452,28437,28409,28463,28470,28491,28532,28458,28425,28457,28553,28557,28556,
1480	28536,28530,28540,28538,28625,37642,37643,37644,37645,37646,37647,37648,37649,
1481	37650,37651,37652,37653,37654,37655,37656,37657,37658,37659,37660,37661,37662,
1482	37663,37664,37665,37666,37667,37668,37669,37670,37671,37672,37673,37674,37675,
1483	37676,37677,37678,37679,37680,37681,37682,37683,37684,37685,37686,37687,37688,
1484	37689,37690,37691,37692,37693,37695,37696,37697,37698,37699,37700,37701,37702,
1485	37703,37704,37705,37706,37707,37708,37709,37710,37711,37712,37713,37714,37715,
1486	37716,37717,37718,37719,37720,37721,37722,37723,37724,37725,37726,37727,37728,
1487	37729,37730,37731,37732,37733,37734,37735,37736,37737,37739,28617,28583,28601,
1488	28598,28610,28641,28654,28638,28640,28655,28698,28707,28699,28729,28725,28751,
1489	28766,23424,23428,23445,23443,23461,23480,29999,39582,25652,23524,23534,35120,
1490	23536,36423,35591,36790,36819,36821,36837,36846,36836,36841,36838,36851,36840,
1491	36869,36868,36875,36902,36881,36877,36886,36897,36917,36918,36909,36911,36932,
1492	36945,36946,36944,36968,36952,36962,36955,26297,36980,36989,36994,37000,36995,
1493	37003,24400,24407,24406,24408,23611,21675,23632,23641,23409,23651,23654,32700,
1494	24362,24361,24365,33396,24380,39739,23662,22913,22915,22925,22953,22954,22947,
1495	37740,37741,37742,37743,37744,37745,37746,37747,37748,
1496	37749,37750,37751,37752,37753,37754,37755,37756,37757,37758,37759,37760,37761,
1497	37762,37763,37764,37765,37766,37767,37768,37769,37770,37771,37772,37773,37774,
1498	37776,37777,37778,37779,37780,37781,37782,37783,37784,37785,37786,37787,37788,
1499	37789,37790,37791,37792,37793,37794,37795,37796,37797,37798,37799,37800,37801,
1500	37802,37803,37804,37805,37806,37807,37808,37809,37810,37811,37812,37813,37814,
1501	37815,37816,37817,37818,37819,37820,37821,37822,37823,37824,37825,37826,37827,
1502	37828,37829,37830,37831,37832,37833,37835,37836,37837,22935,22986,22955,22942,
1503	22948,22994,22962,22959,22999,22974,23045,23046,23005,23048,23011,23000,23033,
1504	23052,23049,23090,23092,23057,23075,23059,23104,23143,23114,23125,23100,23138,
1505	23157,33004,23210,23195,23159,23162,23230,23275,23218,23250,23252,23224,23264,
1506	23267,23281,23254,23270,23256,23260,23305,23319,23318,23346,23351,23360,23573,
1507	23580,23386,23397,23411,23377,23379,23394,39541,39543,39544,39546,39551,39549,
1508	39552,39553,39557,39560,39562,39568,39570,39571,39574,39576,39579,39580,39581,
1509	39583,39584,39586,39587,39589,39591,32415,32417,32419,32421,32424,32425,37838,
1510	37839,37840,37841,37842,37843,37844,37845,37847,37848,37849,37850,37851,37852,
1511	37853,37854,37855,37856,37857,37858,37859,37860,37861,37862,37863,37864,37865,
1512	37866,37867,37868,37869,37870,37871,37872,37873,37874,37875,37876,37877,37878,
1513	37879,37880,37881,37882,37883,37884,37885,37886,37887,37888,37889,37890,37891,
1514	37892,37893,37894,37895,37896,37897,37898,37899,37900,37901,37902,37903,37904,
1515	37905,37906,37907,37908,37909,37910,37911,37912,37913,
1516	37914,37915,37916,37917,37918,37919,37920,37921,37922,37923,37924,37925,37926,
1517	37927,37928,37929,37930,37931,37932,37933,37934,32429,32432,32446,32448,32449,
1518	32450,32457,32459,32460,32464,32468,32471,32475,32480,32481,32488,32491,32494,
1519	32495,32497,32498,32525,32502,32506,32507,32510,32513,32514,32515,32519,32520,
1520	32523,32524,32527,32529,32530,32535,32537,32540,32539,32543,32545,32546,32547,
1521	32548,32549,32550,32551,32554,32555,32556,32557,32559,32560,32561,32562,32563,
1522	32565,24186,30079,24027,30014,37013,29582,29585,29614,29602,29599,29647,29634,
1523	29649,29623,29619,29632,29641,29640,29669,29657,39036,29706,29673,29671,29662,
1524	29626,29682,29711,29738,29787,29734,29733,29736,29744,29742,29740,37935,37936,
1525	37937,37938,37939,37940,37941,37942,37943,37944,37945,37946,37947,37948,37949,
1526	37951,37952,37953,37954,37955,37956,37957,37958,37959,37960,37961,37962,37963,
1527	37964,37965,37966,37967,37968,37969,37970,37971,37972,37973,37974,37975,37976,
1528	37977,37978,37979,37980,37981,37982,37983,37984,37985,37986,37987,37988,37989,
1529	37990,37991,37992,37993,37994,37996,37997,37998,37999,38000,38001,38002,38003,
1530	38004,38005,38006,38007,38008,38009,38010,38011,38012,38013,38014,38015,38016,
1531	38017,38018,38019,38020,38033,38038,38040,38087,38095,38099,38100,38106,38118,
1532	38139,38172,38176,29723,29722,29761,29788,29783,29781,29785,29815,29805,29822,
1533	29852,29838,29824,29825,29831,29835,29854,29864,29865,29840,29863,29906,29882,
1534	38890,38891,38892,26444,26451,26462,26440,26473,26533,26503,26474,26483,26520,
1535	26535,26485,26536,26526,26541,26507,26487,26492,26608,
1536	26633,26584,26634,26601,26544,26636,26585,26549,26586,26547,26589,26624,26563,
1537	26552,26594,26638,26561,26621,26674,26675,26720,26721,26702,26722,26692,26724,
1538	26755,26653,26709,26726,26689,26727,26688,26686,26698,26697,26665,26805,26767,
1539	26740,26743,26771,26731,26818,26990,26876,26911,26912,26873,38183,38195,38205,
1540	38211,38216,38219,38229,38234,38240,38254,38260,38261,38263,38264,38265,38266,
1541	38267,38268,38269,38270,38272,38273,38274,38275,38276,38277,38278,38279,38280,
1542	38281,38282,38283,38284,38285,38286,38287,38288,38289,38290,38291,38292,38293,
1543	38294,38295,38296,38297,38298,38299,38300,38301,38302,38303,38304,38305,38306,
1544	38307,38308,38309,38310,38311,38312,38313,38314,38315,38316,38317,38318,38319,
1545	38320,38321,38322,38323,38324,38325,38326,38327,38328,38329,38330,38331,38332,
1546	38333,38334,38335,38336,38337,38338,38339,38340,38341,38342,38343,38344,38345,
1547	38346,38347,26916,26864,26891,26881,26967,26851,26896,26993,26937,26976,26946,
1548	26973,27012,26987,27008,27032,27000,26932,27084,27015,27016,27086,27017,26982,
1549	26979,27001,27035,27047,27067,27051,27053,27092,27057,27073,27082,27103,27029,
1550	27104,27021,27135,27183,27117,27159,27160,27237,27122,27204,27198,27296,27216,
1551	27227,27189,27278,27257,27197,27176,27224,27260,27281,27280,27305,27287,27307,
1552	29495,29522,27521,27522,27527,27524,27538,27539,27533,27546,27547,27553,27562,
1553	36715,36717,36721,36722,36723,36725,36726,36728,36727,36729,36730,36732,36734,
1554	36737,36738,36740,36743,36747,38348,38349,38350,38351,38352,38353,38354,38355,
1555	38356,38357,38358,38359,38360,38361,38362,38363,38364,
1556	38365,38366,38367,38368,38369,38370,38371,38372,38373,38374,38375,38380,38399,
1557	38407,38419,38424,38427,38430,38432,38435,38436,38437,38438,38439,38440,38441,
1558	38443,38444,38445,38447,38448,38455,38456,38457,38458,38462,38465,38467,38474,
1559	38478,38479,38481,38482,38483,38486,38487,38488,38489,38490,38492,38493,38494,
1560	38496,38499,38501,38502,38507,38509,38510,38511,38512,38513,38515,38520,38521,
1561	38522,38523,38524,38525,38526,38527,38528,38529,38530,38531,38532,38535,38537,
1562	38538,36749,36750,36751,36760,36762,36558,25099,25111,25115,25119,25122,25121,
1563	25125,25124,25132,33255,29935,29940,29951,29967,29969,29971,25908,26094,26095,
1564	26096,26122,26137,26482,26115,26133,26112,28805,26359,26141,26164,26161,26166,
1565	26165,32774,26207,26196,26177,26191,26198,26209,26199,26231,26244,26252,26279,
1566	26269,26302,26331,26332,26342,26345,36146,36147,36150,36155,36157,36160,36165,
1567	36166,36168,36169,36167,36173,36181,36185,35271,35274,35275,35276,35278,35279,
1568	35280,35281,29294,29343,29277,29286,29295,29310,29311,29316,29323,29325,29327,
1569	29330,25352,25394,25520,38540,38542,38545,38546,38547,38549,38550,38554,38555,
1570	38557,38558,38559,38560,38561,38562,38563,38564,38565,38566,38568,38569,38570,
1571	38571,38572,38573,38574,38575,38577,38578,38580,38581,38583,38584,38586,38587,
1572	38591,38594,38595,38600,38602,38603,38608,38609,38611,38612,38614,38615,38616,
1573	38617,38618,38619,38620,38621,38622,38623,38625,38626,38627,38628,38629,38630,
1574	38631,38635,38636,38637,38638,38640,38641,38642,38644,38645,38648,38650,38651,
1575	38652,38653,38655,38658,38659,38661,38666,38667,38668,
1576	38672,38673,38674,38676,38677,38679,38680,38681,38682,38683,38685,38687,38688,
1577	25663,25816,32772,27626,27635,27645,27637,27641,27653,27655,27654,27661,27669,
1578	27672,27673,27674,27681,27689,27684,27690,27698,25909,25941,25963,29261,29266,
1579	29270,29232,34402,21014,32927,32924,32915,32956,26378,32957,32945,32939,32941,
1580	32948,32951,32999,33000,33001,33002,32987,32962,32964,32985,32973,32983,26384,
1581	32989,33003,33009,33012,33005,33037,33038,33010,33020,26389,33042,35930,33078,
1582	33054,33068,33048,33074,33096,33100,33107,33140,33113,33114,33137,33120,33129,
1583	33148,33149,33133,33127,22605,23221,33160,33154,33169,28373,33187,33194,33228,
1584	26406,33226,33211,38689,38690,38691,38692,38693,38694,38695,38696,38697,38699,
1585	38700,38702,38703,38705,38707,38708,38709,38710,38711,38714,38715,38716,38717,
1586	38719,38720,38721,38722,38723,38724,38725,38726,38727,38728,38729,38730,38731,
1587	38732,38733,38734,38735,38736,38737,38740,38741,38743,38744,38746,38748,38749,
1588	38751,38755,38756,38758,38759,38760,38762,38763,38764,38765,38766,38767,38768,
1589	38769,38770,38773,38775,38776,38777,38778,38779,38781,38782,38783,38784,38785,
1590	38786,38787,38788,38790,38791,38792,38793,38794,38796,38798,38799,38800,38803,
1591	38805,38806,38807,38809,38810,38811,38812,38813,33217,33190,27428,27447,27449,
1592	27459,27462,27481,39121,39122,39123,39125,39129,39130,27571,24384,27586,35315,
1593	26000,40785,26003,26044,26054,26052,26051,26060,26062,26066,26070,28800,28828,
1594	28822,28829,28859,28864,28855,28843,28849,28904,28874,28944,28947,28950,28975,
1595	28977,29043,29020,29032,28997,29042,29002,29048,29050,
1596	29080,29107,29109,29096,29088,29152,29140,29159,29177,29213,29224,28780,28952,
1597	29030,29113,25150,25149,25155,25160,25161,31035,31040,31046,31049,31067,31068,
1598	31059,31066,31074,31063,31072,31087,31079,31098,31109,31114,31130,31143,31155,
1599	24529,24528,38814,38815,38817,38818,38820,38821,38822,38823,38824,38825,38826,
1600	38828,38830,38832,38833,38835,38837,38838,38839,38840,38841,38842,38843,38844,
1601	38845,38846,38847,38848,38849,38850,38851,38852,38853,38854,38855,38856,38857,
1602	38858,38859,38860,38861,38862,38863,38864,38865,38866,38867,38868,38869,38870,
1603	38871,38872,38873,38874,38875,38876,38877,38878,38879,38880,38881,38882,38883,
1604	38884,38885,38888,38894,38895,38896,38897,38898,38900,38903,38904,38905,38906,
1605	38907,38908,38909,38910,38911,38912,38913,38914,38915,38916,38917,38918,38919,
1606	38920,38921,38922,38923,38924,38925,38926,24636,24669,24666,24679,24641,24665,
1607	24675,24747,24838,24845,24925,25001,24989,25035,25041,25094,32896,32895,27795,
1608	27894,28156,30710,30712,30720,30729,30743,30744,30737,26027,30765,30748,30749,
1609	30777,30778,30779,30751,30780,30757,30764,30755,30761,30798,30829,30806,30807,
1610	30758,30800,30791,30796,30826,30875,30867,30874,30855,30876,30881,30883,30898,
1611	30905,30885,30932,30937,30921,30956,30962,30981,30964,30995,31012,31006,31028,
1612	40859,40697,40699,40700,30449,30468,30477,30457,30471,30472,30490,30498,30489,
1613	30509,30502,30517,30520,30544,30545,30535,30531,30554,30568,38927,38928,38929,
1614	38930,38931,38932,38933,38934,38935,38936,38937,38938,38939,38940,38941,38942,
1615	38943,38944,38945,38946,38947,38948,38949,38950,38951,
1616	38952,38953,38954,38955,38956,38957,38958,38959,38960,38961,38962,38963,38964,
1617	38965,38966,38967,38968,38969,38970,38971,38972,38973,38974,38975,38976,38977,
1618	38978,38979,38980,38981,38982,38983,38984,38985,38986,38987,38988,38989,38990,
1619	38991,38992,38993,38994,38995,38996,38997,38998,38999,39000,39001,39002,39003,
1620	39004,39005,39006,39007,39008,39009,39010,39011,39012,39013,39014,39015,39016,
1621	39017,39018,39019,39020,39021,39022,30562,30565,30591,30605,30589,30592,30604,
1622	30609,30623,30624,30640,30645,30653,30010,30016,30030,30027,30024,30043,30066,
1623	30073,30083,32600,32609,32607,35400,32616,32628,32625,32633,32641,32638,30413,
1624	30437,34866,38021,38022,38023,38027,38026,38028,38029,38031,38032,38036,38039,
1625	38037,38042,38043,38044,38051,38052,38059,38058,38061,38060,38063,38064,38066,
1626	38068,38070,38071,38072,38073,38074,38076,38077,38079,38084,38088,38089,38090,
1627	38091,38092,38093,38094,38096,38097,38098,38101,38102,38103,38105,38104,38107,
1628	38110,38111,38112,38114,38116,38117,38119,38120,38122,39023,39024,39025,39026,
1629	39027,39028,39051,39054,39058,39061,39065,39075,39080,39081,39082,39083,39084,
1630	39085,39086,39087,39088,39089,39090,39091,39092,39093,39094,39095,39096,39097,
1631	39098,39099,39100,39101,39102,39103,39104,39105,39106,39107,39108,39109,39110,
1632	39111,39112,39113,39114,39115,39116,39117,39119,39120,39124,39126,39127,39131,
1633	39132,39133,39136,39137,39138,39139,39140,39141,39142,39145,39146,39147,39148,
1634	39149,39150,39151,39152,39153,39154,39155,39156,39157,39158,39159,39160,39161,
1635	39162,39163,39164,39165,39166,39167,39168,39169,39170,
1636	39171,39172,39173,39174,39175,38121,38123,38126,38127,38131,38132,38133,38135,
1637	38137,38140,38141,38143,38147,38146,38150,38151,38153,38154,38157,38158,38159,
1638	38162,38163,38164,38165,38166,38168,38171,38173,38174,38175,38178,38186,38187,
1639	38185,38188,38193,38194,38196,38198,38199,38200,38204,38206,38207,38210,38197,
1640	38212,38213,38214,38217,38220,38222,38223,38226,38227,38228,38230,38231,38232,
1641	38233,38235,38238,38239,38237,38241,38242,38244,38245,38246,38247,38248,38249,
1642	38250,38251,38252,38255,38257,38258,38259,38202,30695,30700,38601,31189,31213,
1643	31203,31211,31238,23879,31235,31234,31262,31252,39176,39177,39178,39179,39180,
1644	39182,39183,39185,39186,39187,39188,39189,39190,39191,39192,39193,39194,39195,
1645	39196,39197,39198,39199,39200,39201,39202,39203,39204,39205,39206,39207,39208,
1646	39209,39210,39211,39212,39213,39215,39216,39217,39218,39219,39220,39221,39222,
1647	39223,39224,39225,39226,39227,39228,39229,39230,39231,39232,39233,39234,39235,
1648	39236,39237,39238,39239,39240,39241,39242,39243,39244,39245,39246,39247,39248,
1649	39249,39250,39251,39254,39255,39256,39257,39258,39259,39260,39261,39262,39263,
1650	39264,39265,39266,39268,39270,39283,39288,39289,39291,39294,39298,39299,39305,
1651	31289,31287,31313,40655,39333,31344,30344,30350,30355,30361,30372,29918,29920,
1652	29996,40480,40482,40488,40489,40490,40491,40492,40498,40497,40502,40504,40503,
1653	40505,40506,40510,40513,40514,40516,40518,40519,40520,40521,40523,40524,40526,
1654	40529,40533,40535,40538,40539,40540,40542,40547,40550,40551,40552,40553,40554,
1655	40555,40556,40561,40557,40563,30098,30100,30102,30112,
1656	30109,30124,30115,30131,30132,30136,30148,30129,30128,30147,30146,30166,30157,
1657	30179,30184,30182,30180,30187,30183,30211,30193,30204,30207,30224,30208,30213,
1658	30220,30231,30218,30245,30232,30229,30233,39308,39310,39322,39323,39324,39325,
1659	39326,39327,39328,39329,39330,39331,39332,39334,39335,39337,39338,39339,39340,
1660	39341,39342,39343,39344,39345,39346,39347,39348,39349,39350,39351,39352,39353,
1661	39354,39355,39356,39357,39358,39359,39360,39361,39362,39363,39364,39365,39366,
1662	39367,39368,39369,39370,39371,39372,39373,39374,39375,39376,39377,39378,39379,
1663	39380,39381,39382,39383,39384,39385,39386,39387,39388,39389,39390,39391,39392,
1664	39393,39394,39395,39396,39397,39398,39399,39400,39401,39402,39403,39404,39405,
1665	39406,39407,39408,39409,39410,39411,39412,39413,39414,39415,39416,39417,30235,
1666	30268,30242,30240,30272,30253,30256,30271,30261,30275,30270,30259,30285,30302,
1667	30292,30300,30294,30315,30319,32714,31462,31352,31353,31360,31366,31368,31381,
1668	31398,31392,31404,31400,31405,31411,34916,34921,34930,34941,34943,34946,34978,
1669	35014,34999,35004,35017,35042,35022,35043,35045,35057,35098,35068,35048,35070,
1670	35056,35105,35097,35091,35099,35082,35124,35115,35126,35137,35174,35195,30091,
1671	32997,30386,30388,30684,32786,32788,32790,32796,32800,32802,32805,32806,32807,
1672	32809,32808,32817,32779,32821,32835,32838,32845,32850,32873,32881,35203,39032,
1673	39040,39043,39418,39419,39420,39421,39422,39423,39424,39425,39426,39427,39428,
1674	39429,39430,39431,39432,39433,39434,39435,39436,39437,39438,39439,39440,39441,
1675	39442,39443,39444,39445,39446,39447,39448,39449,39450,
1676	39451,39452,39453,39454,39455,39456,39457,39458,39459,39460,39461,39462,39463,
1677	39464,39465,39466,39467,39468,39469,39470,39471,39472,39473,39474,39475,39476,
1678	39477,39478,39479,39480,39481,39482,39483,39484,39485,39486,39487,39488,39489,
1679	39490,39491,39492,39493,39494,39495,39496,39497,39498,39499,39500,39501,39502,
1680	39503,39504,39505,39506,39507,39508,39509,39510,39511,39512,39513,39049,39052,
1681	39053,39055,39060,39066,39067,39070,39071,39073,39074,39077,39078,34381,34388,
1682	34412,34414,34431,34426,34428,34427,34472,34445,34443,34476,34461,34471,34467,
1683	34474,34451,34473,34486,34500,34485,34510,34480,34490,34481,34479,34505,34511,
1684	34484,34537,34545,34546,34541,34547,34512,34579,34526,34548,34527,34520,34513,
1685	34563,34567,34552,34568,34570,34573,34569,34595,34619,34590,34597,34606,34586,
1686	34622,34632,34612,34609,34601,34615,34623,34690,34594,34685,34686,34683,34656,
1687	34672,34636,34670,34699,34643,34659,34684,34660,34649,34661,34707,34735,34728,
1688	34770,39514,39515,39516,39517,39518,39519,39520,39521,39522,39523,39524,39525,
1689	39526,39527,39528,39529,39530,39531,39538,39555,39561,39565,39566,39572,39573,
1690	39577,39590,39593,39594,39595,39596,39597,39598,39599,39602,39603,39604,39605,
1691	39609,39611,39613,39614,39615,39619,39620,39622,39623,39624,39625,39626,39629,
1692	39630,39631,39632,39634,39636,39637,39638,39639,39641,39642,39643,39644,39645,
1693	39646,39648,39650,39651,39652,39653,39655,39656,39657,39658,39660,39662,39664,
1694	39665,39666,39667,39668,39669,39670,39671,39672,39674,39676,39677,39678,39679,
1695	39680,39681,39682,39684,39685,39686,34758,34696,34693,
1696	34733,34711,34691,34731,34789,34732,34741,34739,34763,34771,34749,34769,34752,
1697	34762,34779,34794,34784,34798,34838,34835,34814,34826,34843,34849,34873,34876,
1698	32566,32578,32580,32581,33296,31482,31485,31496,31491,31492,31509,31498,31531,
1699	31503,31559,31544,31530,31513,31534,31537,31520,31525,31524,31539,31550,31518,
1700	31576,31578,31557,31605,31564,31581,31584,31598,31611,31586,31602,31601,31632,
1701	31654,31655,31672,31660,31645,31656,31621,31658,31644,31650,31659,31668,31697,
1702	31681,31692,31709,31706,31717,31718,31722,31756,31742,31740,31759,31766,31755,
1703	39687,39689,39690,39691,39692,39693,39694,39696,39697,39698,39700,39701,39702,
1704	39703,39704,39705,39706,39707,39708,39709,39710,39712,39713,39714,39716,39717,
1705	39718,39719,39720,39721,39722,39723,39724,39725,39726,39728,39729,39731,39732,
1706	39733,39734,39735,39736,39737,39738,39741,39742,39743,39744,39750,39754,39755,
1707	39756,39758,39760,39762,39763,39765,39766,39767,39768,39769,39770,39771,39772,
1708	39773,39774,39775,39776,39777,39778,39779,39780,39781,39782,39783,39784,39785,
1709	39786,39787,39788,39789,39790,39791,39792,39793,39794,39795,39796,39797,39798,
1710	39799,39800,39801,39802,39803,31775,31786,31782,31800,31809,31808,33278,33281,
1711	33282,33284,33260,34884,33313,33314,33315,33325,33327,33320,33323,33336,33339,
1712	33331,33332,33342,33348,33353,33355,33359,33370,33375,33384,34942,34949,34952,
1713	35032,35039,35166,32669,32671,32679,32687,32688,32690,31868,25929,31889,31901,
1714	31900,31902,31906,31922,31932,31933,31937,31943,31948,31949,31944,31941,31959,
1715	31976,33390,26280,32703,32718,32725,32741,32737,32742,
1716	32745,32750,32755,31992,32119,32166,32174,32327,32411,40632,40628,36211,36228,
1717	36244,36241,36273,36199,36205,35911,35913,37194,37200,37198,37199,37220,39804,
1718	39805,39806,39807,39808,39809,39810,39811,39812,39813,39814,39815,39816,39817,
1719	39818,39819,39820,39821,39822,39823,39824,39825,39826,39827,39828,39829,39830,
1720	39831,39832,39833,39834,39835,39836,39837,39838,39839,39840,39841,39842,39843,
1721	39844,39845,39846,39847,39848,39849,39850,39851,39852,39853,39854,39855,39856,
1722	39857,39858,39859,39860,39861,39862,39863,39864,39865,39866,39867,39868,39869,
1723	39870,39871,39872,39873,39874,39875,39876,39877,39878,39879,39880,39881,39882,
1724	39883,39884,39885,39886,39887,39888,39889,39890,39891,39892,39893,39894,39895,
1725	39896,39897,39898,39899,37218,37217,37232,37225,37231,37245,37246,37234,37236,
1726	37241,37260,37253,37264,37261,37265,37282,37283,37290,37293,37294,37295,37301,
1727	37300,37306,35925,40574,36280,36331,36357,36441,36457,36277,36287,36284,36282,
1728	36292,36310,36311,36314,36318,36302,36303,36315,36294,36332,36343,36344,36323,
1729	36345,36347,36324,36361,36349,36372,36381,36383,36396,36398,36387,36399,36410,
1730	36416,36409,36405,36413,36401,36425,36417,36418,36433,36434,36426,36464,36470,
1731	36476,36463,36468,36485,36495,36500,36496,36508,36510,35960,35970,35978,35973,
1732	35992,35988,26011,35286,35294,35290,35292,39900,39901,39902,39903,39904,39905,
1733	39906,39907,39908,39909,39910,39911,39912,39913,39914,39915,39916,39917,39918,
1734	39919,39920,39921,39922,39923,39924,39925,39926,39927,39928,39929,39930,39931,
1735	39932,39933,39934,39935,39936,39937,39938,39939,39940,
1736	39941,39942,39943,39944,39945,39946,39947,39948,39949,39950,39951,39952,39953,
1737	39954,39955,39956,39957,39958,39959,39960,39961,39962,39963,39964,39965,39966,
1738	39967,39968,39969,39970,39971,39972,39973,39974,39975,39976,39977,39978,39979,
1739	39980,39981,39982,39983,39984,39985,39986,39987,39988,39989,39990,39991,39992,
1740	39993,39994,39995,35301,35307,35311,35390,35622,38739,38633,38643,38639,38662,
1741	38657,38664,38671,38670,38698,38701,38704,38718,40832,40835,40837,40838,40839,
1742	40840,40841,40842,40844,40702,40715,40717,38585,38588,38589,38606,38610,30655,
1743	38624,37518,37550,37576,37694,37738,37834,37775,37950,37995,40063,40066,40069,
1744	40070,40071,40072,31267,40075,40078,40080,40081,40082,40084,40085,40090,40091,
1745	40094,40095,40096,40097,40098,40099,40101,40102,40103,40104,40105,40107,40109,
1746	40110,40112,40113,40114,40115,40116,40117,40118,40119,40122,40123,40124,40125,
1747	40132,40133,40134,40135,40138,40139,39996,39997,39998,39999,40000,40001,40002,
1748	40003,40004,40005,40006,40007,40008,40009,40010,40011,40012,40013,40014,40015,
1749	40016,40017,40018,40019,40020,40021,40022,40023,40024,40025,40026,40027,40028,
1750	40029,40030,40031,40032,40033,40034,40035,40036,40037,40038,40039,40040,40041,
1751	40042,40043,40044,40045,40046,40047,40048,40049,40050,40051,40052,40053,40054,
1752	40055,40056,40057,40058,40059,40061,40062,40064,40067,40068,40073,40074,40076,
1753	40079,40083,40086,40087,40088,40089,40093,40106,40108,40111,40121,40126,40127,
1754	40128,40129,40130,40136,40137,40145,40146,40154,40155,40160,40161,40140,40141,
1755	40142,40143,40144,40147,40148,40149,40151,40152,40153,
1756	40156,40157,40159,40162,38780,38789,38801,38802,38804,38831,38827,38819,38834,
1757	38836,39601,39600,39607,40536,39606,39610,39612,39617,39616,39621,39618,39627,
1758	39628,39633,39749,39747,39751,39753,39752,39757,39761,39144,39181,39214,39253,
1759	39252,39647,39649,39654,39663,39659,39675,39661,39673,39688,39695,39699,39711,
1760	39715,40637,40638,32315,40578,40583,40584,40587,40594,37846,40605,40607,40667,
1761	40668,40669,40672,40671,40674,40681,40679,40677,40682,40687,40738,40748,40751,
1762	40761,40759,40765,40766,40772,40163,40164,40165,40166,40167,40168,40169,40170,
1763	40171,40172,40173,40174,40175,40176,40177,40178,40179,40180,40181,40182,40183,
1764	40184,40185,40186,40187,40188,40189,40190,40191,40192,40193,40194,40195,40196,
1765	40197,40198,40199,40200,40201,40202,40203,40204,40205,40206,40207,40208,40209,
1766	40210,40211,40212,40213,40214,40215,40216,40217,40218,40219,40220,40221,40222,
1767	40223,40224,40225,40226,40227,40228,40229,40230,40231,40232,40233,40234,40235,
1768	40236,40237,40238,40239,40240,40241,40242,40243,40244,40245,40246,40247,40248,
1769	40249,40250,40251,40252,40253,40254,40255,40256,40257,40258,57908,57909,57910,
1770	57911,57912,57913,57914,57915,57916,57917,57918,57919,57920,57921,57922,57923,
1771	57924,57925,57926,57927,57928,57929,57930,57931,57932,57933,57934,57935,57936,
1772	57937,57938,57939,57940,57941,57942,57943,57944,57945,57946,57947,57948,57949,
1773	57950,57951,57952,57953,57954,57955,57956,57957,57958,57959,57960,57961,57962,
1774	57963,57964,57965,57966,57967,57968,57969,57970,57971,57972,57973,57974,57975,
1775	57976,57977,57978,57979,57980,57981,57982,57983,57984,
1776	57985,57986,57987,57988,57989,57990,57991,57992,57993,57994,57995,57996,57997,
1777	57998,57999,58000,58001,40259,40260,40261,40262,40263,40264,40265,40266,40267,
1778	40268,40269,40270,40271,40272,40273,40274,40275,40276,40277,40278,40279,40280,
1779	40281,40282,40283,40284,40285,40286,40287,40288,40289,40290,40291,40292,40293,
1780	40294,40295,40296,40297,40298,40299,40300,40301,40302,40303,40304,40305,40306,
1781	40307,40308,40309,40310,40311,40312,40313,40314,40315,40316,40317,40318,40319,
1782	40320,40321,40322,40323,40324,40325,40326,40327,40328,40329,40330,40331,40332,
1783	40333,40334,40335,40336,40337,40338,40339,40340,40341,40342,40343,40344,40345,
1784	40346,40347,40348,40349,40350,40351,40352,40353,40354,58002,58003,58004,58005,
1785	58006,58007,58008,58009,58010,58011,58012,58013,58014,58015,58016,58017,58018,
1786	58019,58020,58021,58022,58023,58024,58025,58026,58027,58028,58029,58030,58031,
1787	58032,58033,58034,58035,58036,58037,58038,58039,58040,58041,58042,58043,58044,
1788	58045,58046,58047,58048,58049,58050,58051,58052,58053,58054,58055,58056,58057,
1789	58058,58059,58060,58061,58062,58063,58064,58065,58066,58067,58068,58069,58070,
1790	58071,58072,58073,58074,58075,58076,58077,58078,58079,58080,58081,58082,58083,
1791	58084,58085,58086,58087,58088,58089,58090,58091,58092,58093,58094,58095,40355,
1792	40356,40357,40358,40359,40360,40361,40362,40363,40364,40365,40366,40367,40368,
1793	40369,40370,40371,40372,40373,40374,40375,40376,40377,40378,40379,40380,40381,
1794	40382,40383,40384,40385,40386,40387,40388,40389,40390,40391,40392,40393,40394,
1795	40395,40396,40397,40398,40399,40400,40401,40402,40403,
1796	40404,40405,40406,40407,40408,40409,40410,40411,40412,40413,40414,40415,40416,
1797	40417,40418,40419,40420,40421,40422,40423,40424,40425,40426,40427,40428,40429,
1798	40430,40431,40432,40433,40434,40435,40436,40437,40438,40439,40440,40441,40442,
1799	40443,40444,40445,40446,40447,40448,40449,40450,58096,58097,58098,58099,58100,
1800	58101,58102,58103,58104,58105,58106,58107,58108,58109,58110,58111,58112,58113,
1801	58114,58115,58116,58117,58118,58119,58120,58121,58122,58123,58124,58125,58126,
1802	58127,58128,58129,58130,58131,58132,58133,58134,58135,58136,58137,58138,58139,
1803	58140,58141,58142,58143,58144,58145,58146,58147,58148,58149,58150,58151,58152,
1804	58153,58154,58155,58156,58157,58158,58159,58160,58161,58162,58163,58164,58165,
1805	58166,58167,58168,58169,58170,58171,58172,58173,58174,58175,58176,58177,58178,
1806	58179,58180,58181,58182,58183,58184,58185,58186,58187,58188,58189,40451,40452,
1807	40453,40454,40455,40456,40457,40458,40459,40460,40461,40462,40463,40464,40465,
1808	40466,40467,40468,40469,40470,40471,40472,40473,40474,40475,40476,40477,40478,
1809	40484,40487,40494,40496,40500,40507,40508,40512,40525,40528,40530,40531,40532,
1810	40534,40537,40541,40543,40544,40545,40546,40549,40558,40559,40562,40564,40565,
1811	40566,40567,40568,40569,40570,40571,40572,40573,40576,40577,40579,40580,40581,
1812	40582,40585,40586,40588,40589,40590,40591,40592,40593,40596,40597,40598,40599,
1813	40600,40601,40602,40603,40604,40606,40608,40609,40610,40611,40612,40613,40615,
1814	40616,40617,40618,58190,58191,58192,58193,58194,58195,58196,58197,58198,58199,
1815	58200,58201,58202,58203,58204,58205,58206,58207,58208,
1816	58209,58210,58211,58212,58213,58214,58215,58216,58217,58218,58219,58220,58221,
1817	58222,58223,58224,58225,58226,58227,58228,58229,58230,58231,58232,58233,58234,
1818	58235,58236,58237,58238,58239,58240,58241,58242,58243,58244,58245,58246,58247,
1819	58248,58249,58250,58251,58252,58253,58254,58255,58256,58257,58258,58259,58260,
1820	58261,58262,58263,58264,58265,58266,58267,58268,58269,58270,58271,58272,58273,
1821	58274,58275,58276,58277,58278,58279,58280,58281,58282,58283,40619,40620,40621,
1822	40622,40623,40624,40625,40626,40627,40629,40630,40631,40633,40634,40636,40639,
1823	40640,40641,40642,40643,40645,40646,40647,40648,40650,40651,40652,40656,40658,
1824	40659,40661,40662,40663,40665,40666,40670,40673,40675,40676,40678,40680,40683,
1825	40684,40685,40686,40688,40689,40690,40691,40692,40693,40694,40695,40696,40698,
1826	40701,40703,40704,40705,40706,40707,40708,40709,40710,40711,40712,40713,40714,
1827	40716,40719,40721,40722,40724,40725,40726,40728,40730,40731,40732,40733,40734,
1828	40735,40737,40739,40740,40741,40742,40743,40744,40745,40746,40747,40749,40750,
1829	40752,40753,58284,58285,58286,58287,58288,58289,58290,58291,58292,58293,58294,
1830	58295,58296,58297,58298,58299,58300,58301,58302,58303,58304,58305,58306,58307,
1831	58308,58309,58310,58311,58312,58313,58314,58315,58316,58317,58318,58319,58320,
1832	58321,58322,58323,58324,58325,58326,58327,58328,58329,58330,58331,58332,58333,
1833	58334,58335,58336,58337,58338,58339,58340,58341,58342,58343,58344,58345,58346,
1834	58347,58348,58349,58350,58351,58352,58353,58354,58355,58356,58357,58358,58359,
1835	58360,58361,58362,58363,58364,58365,58366,58367,58368,
1836	58369,58370,58371,58372,58373,58374,58375,58376,58377,40754,40755,40756,40757,
1837	40758,40760,40762,40764,40767,40768,40769,40770,40771,40773,40774,40775,40776,
1838	40777,40778,40779,40780,40781,40782,40783,40786,40787,40788,40789,40790,40791,
1839	40792,40793,40794,40795,40796,40797,40798,40799,40800,40801,40802,40803,40804,
1840	40805,40806,40807,40808,40809,40810,40811,40812,40813,40814,40815,40816,40817,
1841	40818,40819,40820,40821,40822,40823,40824,40825,40826,40827,40828,40829,40830,
1842	40833,40834,40845,40846,40847,40848,40849,40850,40851,40852,40853,40854,40855,
1843	40856,40860,40861,40862,40865,40866,40867,40868,40869,63788,63865,63893,63975,
1844	63985,58378,58379,58380,58381,58382,58383,58384,58385,58386,58387,58388,58389,
1845	58390,58391,58392,58393,58394,58395,58396,58397,58398,58399,58400,58401,58402,
1846	58403,58404,58405,58406,58407,58408,58409,58410,58411,58412,58413,58414,58415,
1847	58416,58417,58418,58419,58420,58421,58422,58423,58424,58425,58426,58427,58428,
1848	58429,58430,58431,58432,58433,58434,58435,58436,58437,58438,58439,58440,58441,
1849	58442,58443,58444,58445,58446,58447,58448,58449,58450,58451,58452,58453,58454,
1850	58455,58456,58457,58458,58459,58460,58461,58462,58463,58464,58465,58466,58467,
1851	58468,58469,58470,58471,64012,64013,64014,64015,64017,64019,64020,64024,64031,
1852	64032,64033,64035,64036,64039,64040,64041,11905,59414,59415,59416,11908,13427,
1853	13383,11912,11915,59422,13726,13850,13838,11916,11927,14702,14616,59430,14799,
1854	14815,14963,14800,59435,59436,15182,15470,15584,11943,59441,59442,11946,16470,
1855	16735,11950,17207,11955,11958,11959,59451,17329,17324,
1856	11963,17373,17622,18017,17996,59459,18211,18217,18300,18317,11978,18759,18810,
1857	18813,18818,18819,18821,18822,18847,18843,18871,18870,59476,59477,19619,19615,
1858	19616,19617,19575,19618,19731,19732,19733,19734,19735,19736,19737,19886,59492,
1859	58472,58473,58474,58475,58476,58477,58478,58479,58480,58481,58482,58483,58484,
1860	58485,58486,58487,58488,58489,58490,58491,58492,58493,58494,58495,58496,58497,
1861	58498,58499,58500,58501,58502,58503,58504,58505,58506,58507,58508,58509,58510,
1862	58511,58512,58513,58514,58515,58516,58517,58518,58519,58520,58521,58522,58523,
1863	58524,58525,58526,58527,58528,58529,58530,58531,58532,58533,58534,58535,58536,
1864	58537,58538,58539,58540,58541,58542,58543,58544,58545,58546,58547,58548,58549,
1865	58550,58551,58552,58553,58554,58555,58556,58557,58558,58559,58560,58561,58562,
1866	58563,58564,58565,

lib/libc/wasi/libc-top-half/musl/src/locale/hkscs.h deleted-390

...	@@ -1,390 +0,0 @@
1	17392,19506,17923,17830,17784,29287,19831,17843,31921,19682,31941,15253,18230,
2	18244,19527,19520,17087,13847,29522,28299,28882,19543,41809,18255,17882,19589,
3	31852,19719,19108,18081,27427,29221,23124,6755,15878,16225,26189,22267,0,
4	32149,22813,35769,15860,38708,31727,23515,7518,23204,13861,40624,23249,23479,
5	23804,26478,34195,39237,29793,29853,14453,7507,13982,24609,16108,22750,15093,
6	31484,40855,16737,35085,12778,2698,12894,17162,33924,40854,37935,18736,34323,
7	22678,38730,37400,31184,31282,26208,27177,34973,29772,31685,26498,31276,21071,
8	36934,13542,29636,23993,29894,40903,22451,18735,21580,16689,13966,22552,31346,
9	31589,35727,18094,28296,16769,23961,31662,9404,40904,9409,9417,9420,40905,
10	34052,13755,16564,40906,17633,44543,25281,28782,40907,0,0,0,0,0,0,0,0,0,0,0,0,
11	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,12736,12737,12738,12739,12740,268,12741,
12	209,205,12742,12743,203,8168,12744,202,12745,12746,12747,12748,270,12749,
13	12750,256,193,461,192,274,201,282,200,332,211,465,210,56320,7870,56324,7872,
14	202,257,225,462,224,593,275,233,283,232,299,237,464,236,333,243,466,242,363,
15	250,468,249,470,472,474,476,252,56328,7871,56332,7873,234,609,9178,9179,0,0,0,
16	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
17	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
18	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,41897,4421,0,25866,0,0,20029,28381,
19	40270,37343,0,0,30517,25745,20250,20264,20392,20822,20852,20892,20964,21153,
20	21160,21307,21326,21457,21464,22242,22768,22788,22791,22834,22836,23398,23454,
21	23455,23706,24198,24635,25993,26622,26628,26725,27982,28860,30005,32420,32428,
22	32442,32455,32463,32479,32518,32567,33402,33487,33647,35270,35774,35810,36710,
23	36711,36718,29713,31996,32205,26950,31433,21031,0,0,0,0,37260,30904,37214,
24	32956,0,36107,33014,2535,0,0,32927,40647,19661,40393,40460,19518,40438,28686,
25	40458,41267,13761,0,28314,33342,29977,0,18705,39532,39567,40857,31111,33900,
26	7626,1488,10982,20004,20097,20096,20103,20159,20203,20279,13388,20413,15944,
27	20483,20616,13437,13459,13477,20870,22789,20955,20988,20997,20105,21113,21136,
28	21287,13767,21417,13649,21424,13651,21442,21539,13677,13682,13953,21651,21667,
29	21684,21689,21712,21743,21784,21795,21800,13720,21823,13733,13759,21975,13765,
30	32132,21797,0,3138,3349,20779,21904,11462,14828,833,36422,19896,38117,16467,
31	32958,30586,11320,14900,18389,33117,27122,19946,25821,3452,4020,3285,4340,
32	25741,36478,3734,3083,3940,11433,33366,17619,0,3398,39501,33001,18420,
33	20135,11458,39602,14951,38388,16365,13574,21191,38868,30920,11588,40302,38933,
34	0,17369,24741,25780,21731,11596,11210,4215,14843,4207,26330,26390,31136,25834,
35	20562,3139,36456,8609,35660,1841,0,18443,425,16378,22643,11661,0,17864,1276,
36	24727,3916,3478,21881,16571,17338,0,19124,10854,4253,33194,39157,3484,25465,
37	14846,10101,36288,22177,25724,15939,0,42497,3593,10959,11465,0,4296,14786,
38	14738,14854,33435,13688,24137,8391,22098,3889,11442,38688,13500,27709,20027,0,
39	0,30068,11915,8712,42587,36045,3706,3124,26652,32659,4303,10243,10553,13819,
40	20963,3724,3981,3754,16275,3888,3399,4431,3660,0,3755,2985,3400,4288,4413,
41	16377,9878,25650,4013,13300,30265,11214,3454,3455,11345,11349,14872,3736,4295,
42	3886,42546,27472,36050,36249,36042,38314,21708,33476,21945,0,40643,39974,
43	39606,30558,11758,28992,33133,33004,23580,25970,33076,14231,21343,32957,37302,
44	3834,3599,3703,3835,13789,19947,13833,3286,22191,10165,4297,3600,3704,4216,
45	4424,33287,5205,3705,20048,11684,23124,4125,4126,4341,4342,22428,3601,30356,
46	33485,4021,3707,20862,14083,4022,4480,21208,41661,18906,6202,16759,33404,
47	22681,21096,13850,22333,31666,23400,18432,19244,40743,18919,39967,39821,23412,
48	12605,22011,13810,22153,20008,22786,7105,63608,38737,134,20059,20155,13630,
49	23587,24401,24516,14586,25164,25909,27514,27701,27706,28780,29227,20012,29357,
50	18665,32594,31035,31993,32595,25194,13505,0,25419,32770,32896,26130,26961,
51	21341,34916,35265,30898,35744,36125,38021,38264,38271,38376,
52	36367,38886,39029,39118,39134,39267,38928,40060,40479,40644,27503,63751,20023,
53	135,38429,25143,38050,0,20539,28158,40051,40870,15817,34959,16718,28791,23797,
54	19232,20941,13657,23856,24866,35378,36775,37366,29073,26393,29626,12929,41223,
55	15499,6528,19216,30948,29698,20910,34575,16393,27235,41658,16931,34319,2671,
56	31274,39239,35562,38741,28749,21284,8318,37876,30425,35299,40871,30685,20131,
57	20464,20668,20015,20247,40872,21556,32139,22674,22736,7606,24210,24217,24514,
58	10002,25995,13305,26905,27203,15459,27903,0,29184,17669,29580,16091,18963,
59	23317,29881,35715,23716,22165,31379,31724,31939,32364,33528,34199,40873,34960,
60	40874,36537,40875,36815,34143,39392,37409,40876,36281,5183,16497,17058,23066,
61	0,0,0,39016,26475,17014,22333,0,34262,18811,33471,28941,19585,28020,23931,
62	27413,28606,40877,40878,23446,40879,26343,32347,28247,31178,15752,17603,12886,
63	10134,17306,17718,0,23765,15130,35577,23672,15634,13649,23928,40882,29015,
64	17752,16620,7715,19575,14712,13386,420,27713,35532,20404,569,22975,33132,
65	38998,39162,24379,2975,0,8641,35181,16642,18107,36985,16135,40883,41397,16632,
66	14294,18167,27718,16764,34482,29695,17773,14548,21658,17761,17691,19849,19579,
67	19830,17898,16328,19215,13921,17630,17597,16877,23870,23880,23894,15868,14351,
68	23972,23993,14368,14392,24130,24253,24357,24451,14600,14612,14655,14669,24791,
69	24893,23781,14729,25015,25017,25039,14776,25132,25232,25317,25368,14840,22193,
70	14851,25570,25595,25607,25690,14923,25792,23829,22049,40863,14999,25990,15037,
71	26111,26195,15090,26258,15138,
72	26390,15170,26532,26624,15192,26698,26756,15218,15217,15227,26889,26947,29276,
73	26980,27039,27013,15292,27094,15325,27237,27252,27249,27266,15340,27289,15346,
74	27307,27317,27348,27382,27521,27585,27626,27765,27818,15563,27906,27910,27942,
75	28033,15599,28068,28081,28181,28184,28201,28294,35264,28347,28386,28378,40831,
76	28392,28393,28452,28468,15686,16193,28545,28606,15722,15733,29111,23705,15754,
77	28716,15761,28752,28756,28783,28799,28809,805,17345,13809,3800,16087,22462,
78	28371,28990,22496,13902,27042,35817,23412,31305,22753,38105,31333,31357,22956,
79	31419,31408,31426,31427,29137,25741,16842,31450,31453,31466,16879,21682,23553,
80	31499,31573,31529,21262,23806,31650,31599,33692,23476,27775,31696,33825,31634,
81	0,23840,15789,23653,33938,31738,0,31797,23745,31812,31875,18562,31910,26237,
82	17784,31945,31943,31974,31860,31987,31989,0,32359,17693,28228,32093,28374,
83	29837,32137,32171,28981,32179,0,16471,24617,32228,15635,32245,6137,32229,
84	33645,0,24865,24922,32366,32402,17195,37996,32295,32576,32577,32583,31030,
85	25296,39393,32663,25425,32675,5729,104,17756,14182,17667,33594,32762,25737,0,
86	32776,32797,0,32815,41095,27843,32827,32828,32865,10004,18825,26150,15843,
87	26344,26405,32935,35400,33031,33050,22704,9974,27775,25752,20408,25831,5258,
88	33304,6238,27219,19045,19093,17530,33321,2829,27218,15742,20473,5373,34018,
89	33634,27402,18855,13616,6003,15864,33450,26907,63892,16859,34123,33488,33562,
90	3606,6068,14017,12669,13658,33403,33506,33560,16011,28067,27397,27543,13774,
91	15807,33565,21996,33669,17675,28069,33708,
92	0,33747,13438,28372,27223,34138,13462,28226,12015,33880,23524,33905,15827,
93	17636,27303,33866,15541,31064,0,27542,28279,28227,34014,0,33681,17568,33939,
94	34020,23697,16960,23744,17731,34100,23282,28313,17703,34163,17686,26559,34326,
95	34341,34363,34241,28808,34306,5506,28877,63922,17770,34344,13896,6306,21495,
96	29594,34430,34673,41208,34798,11303,34737,34778,34831,22113,34412,26710,17935,
97	34885,34886,30176,15801,30180,34910,34972,18011,34996,34997,25537,35013,30583,
98	30479,35207,35210,0,0,35239,35260,35365,35303,31012,31421,35484,30611,37374,
99	35472,31321,31465,31546,16271,18195,31544,29052,35596,35615,21552,21861,35647,
100	35660,35661,35497,19066,35728,35739,35503,5855,17941,34895,35995,32084,32143,
101	63956,14117,32083,36054,32152,32189,36114,36099,6416,36059,28764,36113,19657,
102	16080,0,36265,32770,4116,18826,15228,33212,28940,31463,36525,36534,36547,
103	37588,36633,36653,33637,33810,36773,37635,41631,2640,36787,18730,35294,34109,
104	15803,24312,12898,36857,40980,34492,34049,8997,14720,28375,36919,34108,31422,
105	36961,34156,34315,37032,34579,37060,34534,37038,0,37223,15088,37289,37316,
106	31916,35123,7817,37390,27807,37441,37474,21945,0,35526,15515,35596,21979,3377,
107	37676,37739,35553,35819,28815,23235,35554,35557,18789,37444,35820,35897,35839,
108	37747,37979,36540,38277,38310,37926,38304,28662,17081,9850,34520,4732,15918,
109	18911,27676,38523,38550,16748,38563,28373,25050,38582,30965,35552,38589,21452,
110	18849,27832,628,25616,37039,37093,19153,6421,13066,38705,34370,38710,18959,
111	17725,17797,19177,28789,23361,38683,
112	0,37333,38743,23370,37355,38751,37925,20688,12471,12476,38793,38815,38833,
113	38846,38848,38866,38880,21612,38894,29724,37939,0,38901,37917,31098,19153,
114	38964,38963,38987,39014,15118,29045,15697,1584,16732,22278,39114,39095,39112,
115	39111,19199,27943,5843,21936,39137,39142,39148,37752,39225,18985,19314,38999,
116	39173,39413,39436,39483,39440,39512,22309,14020,37041,39893,39648,39650,39685,
117	39668,19470,39700,39725,34304,20532,39732,27048,14531,12413,39760,39744,40254,
118	23109,6243,39822,16971,39938,39935,39948,40552,40404,40887,41362,41387,41185,
119	41251,41439,40318,40323,41268,40462,26760,40388,8539,41363,41504,6459,41523,
120	40249,41145,41652,40592,40597,40606,40610,19764,40618,40623,17252,40641,15200,
121	14821,15645,20274,14270,35883,40706,40712,19350,37924,28066,40727,0,40761,
122	22175,22154,40773,39352,37003,38898,33919,40802,40809,31452,40846,29206,19390,
123	18805,18875,29047,18936,17224,19025,29598,35802,6394,31135,35198,36406,37737,
124	37875,35396,37612,37761,37835,35180,17593,29207,16107,30578,31299,28880,17523,
125	17400,29054,6127,28835,6334,13721,16071,6277,21551,6136,14114,5883,6201,14049,
126	6004,6353,24395,14115,5824,22363,18981,5118,4776,5062,5302,34051,13990,0,
127	33877,18836,29029,15921,21852,16123,28754,17652,14062,39325,28454,26617,14131,
128	15381,15847,22636,6434,26640,16471,14143,16609,16523,16655,27681,21707,22174,
129	26289,22162,4063,2984,3597,37830,35603,37788,20216,20779,14361,17462,20156,
130	1125,895,20299,20362,22097,23144,427,971,14745,778,1044,13365,20265,704,36531,
131	629,35546,524,20120,20685,
132	20749,20386,20227,18958,16010,20290,20526,20588,20609,20428,20453,20568,20732,
133	0,0,0,0,28278,13717,15929,16063,28018,6276,16009,20904,20931,1504,17629,1187,
134	1170,1169,36218,35484,1806,21081,21156,2163,21217,0,18042,29068,17292,3104,
135	18860,4324,27089,3613,0,16094,29849,29716,29782,29592,19342,19132,16525,21456,
136	13700,29199,16585,21940,837,21709,3014,22301,37469,38644,37734,22493,22413,
137	22399,13886,22731,23193,35398,5882,5999,5904,23084,22968,37519,23166,23247,
138	23058,22854,6643,6241,17045,14069,27909,29763,23073,24195,23169,35799,1043,
139	37856,29836,4867,28933,18802,37896,35323,37821,14240,23582,23710,24158,24136,
140	6550,6524,15086,24269,23375,6403,6404,14081,6304,14045,5886,14035,33066,35399,
141	7610,13426,35240,24332,24334,6439,6059,23147,5947,23364,34324,30205,34912,
142	24702,10336,9771,24539,16056,9647,9662,37000,28531,25024,62,70,9755,24985,
143	24984,24693,11419,11527,18132,37197,25713,18021,11114,14889,11042,13392,39146,
144	11896,25399,42075,25782,25393,25553,18915,11623,25252,11425,25659,25963,26994,
145	15348,12430,12973,18825,12971,21773,13024,6361,37951,26318,12937,12723,15072,
146	16784,21892,35618,21903,5884,21851,21541,30958,12547,6186,12852,13412,12815,
147	12674,17097,26254,27940,26219,19347,26160,30832,7659,26211,13010,13025,26142,
148	22642,14545,14394,14268,15257,14242,13310,29904,15254,26511,17962,26806,26654,
149	15300,27326,14435,14293,17543,27187,27218,27337,27397,6418,25873,26776,27212,
150	15319,27258,27479,16320,15514,37792,37618,35818,35531,37513,32798,35292,37991,
151	28069,28427,
152	18924,0,16255,15759,28164,16444,23101,28170,22599,27940,30786,28987,17178,
153	17014,28913,29264,29319,29332,18319,18213,20857,19108,1515,29818,16120,13919,
154	19018,18711,24545,16134,16049,19167,35875,16181,24743,16115,29900,29756,37767,
155	29751,17567,28138,17745,30083,16227,19673,19718,16216,30037,30323,42438,15129,
156	29800,35532,18859,18830,15099,15821,19022,16127,18885,18675,37370,22322,37698,
157	35555,6244,20703,21025,20967,30584,12850,30478,30479,30587,18071,14209,14942,
158	18672,29752,29851,16063,19130,19143,16584,19094,25006,37639,21889,30750,30861,
159	30856,30930,29648,31065,30529,22243,16654,0,33942,31141,27181,16122,31290,
160	31220,16750,5862,16690,37429,31217,3404,18828,665,15802,5998,13719,21867,
161	13680,13994,468,3085,31458,23129,9973,23215,23196,23053,603,30960,23082,23494,
162	31486,16889,31837,31853,16913,23475,24252,24230,31949,18937,6064,31886,31868,
163	31918,27314,32220,32263,32211,32590,25185,24924,31560,32151,24194,17002,27509,
164	2326,26582,78,13775,22468,25618,25592,18786,32733,31527,2092,23273,23875,
165	31500,24078,39398,34373,39523,27164,13375,14818,18935,26029,39455,26016,33920,
166	28967,27857,17642,33079,17410,32966,33033,33090,26548,39107,27202,33378,33381,
167	27217,33875,28071,34320,29211,23174,16767,6208,23339,6305,23268,6360,34464,
168	63932,15759,34861,29730,23042,34926,20293,34951,35007,35046,35173,35149,22147,
169	35156,30597,30596,35829,35801,35740,35321,16045,33955,18165,18127,14322,35389,
170	35356,37960,24397,37419,17028,26068,28969,28868,6213,40301,35999,36073,32220,
171	22938,30659,23024,17262,14036,36394,36519,19465,
172	36656,36682,17140,27736,28603,8993,18587,28537,28299,6106,39913,14005,18735,
173	37051,0,21873,18694,37307,37892,35403,16482,35580,37927,35869,35899,34021,
174	35371,38297,38311,38295,38294,36148,29765,16066,18687,19010,17386,16103,12837,
175	38543,36583,36454,36453,16076,18925,19064,16366,29714,29803,16124,38721,37040,
176	26695,18973,37011,22495,0,37736,35209,35878,35631,25534,37562,23313,35689,
177	18748,29689,16923,38811,38769,39224,3878,24001,35781,19122,38943,38106,37622,
178	38359,37349,17600,35664,19047,35684,39132,35397,16128,37418,18725,33812,39227,
179	39245,31494,15869,39323,19311,39338,39516,35685,22728,27279,39457,23294,39471,
180	39153,19344,39240,39356,19389,19351,37757,22642,4866,22562,18872,5352,30788,
181	10015,15800,26821,15741,37976,14631,24912,10113,10603,24839,40015,40019,40059,
182	39989,39952,39807,39887,40493,39839,41461,41214,40225,19630,16644,40472,19632,
183	40204,41396,41197,41203,39215,40357,33981,28178,28639,27522,34300,17715,28068,
184	28292,28144,33824,34286,28160,14295,24676,31202,13724,13888,18733,18910,15714,
185	37851,37566,37704,703,30905,37495,37965,20452,13376,36964,21853,30781,30804,
186	30902,30795,5975,12745,18753,13978,20338,28634,28633,0,28702,21524,16821,
187	22459,22771,22410,40214,22487,28980,13487,16812,29163,27712,20375,0,6069,
188	35401,24844,23246,23051,17084,17544,14124,19323,35324,37819,37816,6358,3869,
189	33906,27840,5139,17146,11302,17345,22932,15799,26433,32168,24923,24740,18873,
190	18827,35322,37605,29666,16105,29876,35683,6303,16097,19123,27352,29683,29691,
191	16086,19006,19092,6105,19046,935,5156,18917,29768,
192	18710,28837,18806,37508,29670,37727,1278,37681,35534,35350,37766,35815,21973,
193	18741,35458,29035,18755,3327,22180,1562,3051,3256,21762,31172,6138,32254,5826,
194	19024,6226,17710,37889,14090,35520,18861,22960,6335,6275,29828,23201,14050,
195	15707,14000,37471,23161,35457,6242,37748,15565,2740,19094,14730,20724,15721,
196	15692,5020,29045,17147,33304,28175,37092,17643,27991,32335,28775,27823,15574,
197	16365,15917,28162,28428,15727,1013,30033,14012,13512,18048,16090,18545,22980,
198	37486,18750,36673,35868,27584,22546,22472,14038,5202,28926,17250,19057,12259,
199	4784,9149,26809,26983,5016,13541,31732,14047,35459,14294,13306,19615,27162,
200	13997,27831,33854,17631,17614,27942,27985,27778,28638,28439,28937,33597,5946,
201	33773,27776,28755,6107,22921,23170,6067,23137,23153,6405,16892,14125,23023,
202	5948,14023,29070,37776,26266,17061,23150,23083,17043,27179,16121,30518,17499,
203	17098,28957,16985,35297,20400,27944,23746,17614,32333,17341,27148,16982,4868,
204	28838,28979,17385,15781,27871,63525,19023,32357,23019,23855,15859,24412,19037,
205	6111,32164,33830,21637,15098,13056,532,22398,2261,1561,16357,8094,41654,28675,
206	37211,23920,29583,31955,35417,37920,20424,32743,29389,29456,31476,29496,29497,
207	22262,29505,29512,16041,31512,36972,29173,18674,29665,33270,16074,30476,16081,
208	27810,22269,29721,29726,29727,16098,16112,16116,16122,29907,16142,16211,30018,
209	30061,30066,30093,16252,30152,30172,16320,30285,16343,30324,16348,30330,20316,
210	29064,22051,35200,22633,16413,30531,16441,26465,16453,13787,30616,16490,16495,
211	23646,30654,30667,22770,30744,28857,30748,
212	16552,30777,30791,30801,30822,33864,21813,31027,26627,31026,16643,16649,31121,
213	31129,36795,31238,36796,16743,31377,16818,31420,33401,16836,31439,31451,16847,
214	20001,31586,31596,31611,31762,31771,16992,17018,31867,31900,17036,31928,17044,
215	31981,36755,28864,3279,32207,32212,32208,32253,32686,32692,29343,17303,32800,
216	32805,31545,32814,32817,32852,15820,22452,28832,32951,33001,17389,33036,29482,
217	33038,33042,30048,33044,17409,15161,33110,33113,33114,17427,22586,33148,33156,
218	17445,33171,17453,33189,22511,33217,33252,33364,17551,33446,33398,33482,33496,
219	33535,17584,33623,38505,27018,33797,28917,33892,24803,33928,17668,33982,34017,
220	34040,34064,34104,34130,17723,34159,34160,34272,17783,34418,34450,34482,34543,
221	38469,34699,17926,17943,34990,35071,35108,35143,35217,31079,35369,35384,35476,
222	35508,35921,36052,36082,36124,18328,22623,36291,18413,20206,36410,21976,22356,
223	36465,22005,36528,18487,36558,36578,36580,36589,36594,36791,36801,36810,36812,
224	36915,39364,18605,39136,37395,18718,37416,37464,37483,37553,37550,37567,37603,
225	37611,37619,37620,37629,37699,37764,37805,18757,18769,40639,37911,21249,37917,
226	37933,37950,18794,37972,38009,38189,38306,18855,38388,38451,18917,26528,18980,
227	38720,18997,38834,38850,22100,19172,24808,39097,19225,39153,22596,39182,39193,
228	20916,39196,39223,39234,39261,39266,19312,39365,19357,39484,39695,31363,39785,
229	39809,39901,39921,39924,19565,39968,14191,7106,40265,39994,40702,22096,40339,
230	40381,40384,40444,38134,36790,40571,40620,40625,40637,40646,38108,40674,40689,
231	40696,31432,40772,148,695,928,26906,38083,22956,
232	1239,22592,38081,14265,1493,1557,1654,5818,22359,29043,2754,2765,3007,21610,
233	63547,3019,21662,3067,3131,3155,3173,3196,24807,3213,22138,3253,3293,3309,
234	3439,3506,3528,26965,39983,34725,3588,3598,3799,3984,3885,3699,23584,4028,
235	24075,4188,4175,4214,26398,4219,4232,4246,13895,4287,4307,4399,4411,21348,
236	33965,4835,4981,4918,35713,5495,5657,6083,6087,20088,28859,6189,6506,6701,
237	6725,7210,7280,7340,7880,25283,7893,7957,29080,26709,8261,27113,14024,8828,
238	9175,9210,10026,10353,10575,33533,10599,10643,10965,35237,10984,36768,11022,
239	38840,11071,38983,39613,11340,0,11400,11447,23528,11528,11538,11703,11669,
240	11842,12148,12236,12339,12390,13087,13278,24497,26184,26303,31353,13671,13811,
241	0,18874,0,13850,14102,0,838,22709,26382,26904,15015,30295,24546,15889,16057,
242	30206,8346,18640,19128,16665,35482,17134,17165,16443,17204,17302,19013,1482,
243	20946,1553,22943,7848,15294,15615,17412,17622,22408,18036,14747,18223,34280,
244	39369,14178,8643,35678,35662,0,18450,18683,18965,29193,19136,3192,22885,20133,
245	20358,1913,36570,20524,21135,22335,29041,21145,21529,16202,19111,21948,21574,
246	21614,27474,0,13427,21823,30258,21854,18200,21858,21862,22471,18751,22621,
247	20582,13563,13260,0,22787,18300,35144,23214,23433,23558,7568,22433,29009,0,
248	24834,31762,36950,25010,20378,35682,25602,25674,23899,27639,0,25732,6428,
249	35562,18934,25736,16367,25874,19392,26047,26293,10011,37989,22497,24981,23079,
250	63693,0,22201,17697,26364,20074,18740,38486,28047,27837,13848,35191,
251	26521,26734,25617,26718,0,26823,31554,37056,2577,26918,0,26937,31301,0,27130,
252	39462,27181,13919,25705,33,31107,27188,27483,23852,13593,0,27549,18128,27812,
253	30011,34917,28078,22710,14108,9613,28747,29133,15444,29312,29317,37505,8570,
254	29323,37680,29414,18896,27705,38047,29776,3832,34855,35061,10534,33907,6065,
255	28344,18986,6176,14756,14009,0,0,17727,26294,40109,39076,35139,30668,30808,
256	22230,16607,5642,14753,14127,33000,5061,29101,33638,31197,37288,0,19639,28847,
257	35243,31229,31242,31499,32102,16762,31555,31102,32777,28597,41695,27139,33560,
258	21410,28167,37823,26678,38749,33135,32803,27061,5101,12847,32840,23941,35888,
259	32899,22293,38947,35145,23979,18824,26046,27093,21458,19109,16257,15377,26422,
260	32912,33012,33070,8097,33103,33161,33199,33306,33542,33583,33674,13770,33896,
261	34474,18682,25574,35158,30728,37461,35256,17394,35303,17375,35304,35654,35796,
262	23032,35849,0,36805,37100,0,37136,37180,15863,37214,19146,36816,29327,22155,
263	38119,38377,38320,38328,38706,39121,39241,39274,39363,39464,39694,40282,40347,
264	32415,40696,40739,19620,38215,41619,29090,41727,19857,36882,42443,19868,3228,
265	36798,21953,36794,9392,36793,19091,17673,32383,28502,27313,20202,13540,35628,
266	30877,14138,36480,6133,32804,35692,35737,31294,26287,15851,30293,15543,22069,
267	22870,20122,24193,25176,22207,3693,36366,23405,16008,19614,25566,0,6134,6267,
268	25904,22061,23626,21530,21265,15814,40344,19581,22050,22046,32585,24280,22901,
269	15680,34672,19996,4074,3401,14010,33047,40286,36120,30267,40005,30286,30649,
270	37701,21554,
271	33096,33527,22053,33074,33816,32957,21994,31074,22083,21526,3741,13774,22021,
272	22001,26353,33506,13869,30004,22000,21946,21655,21874,3137,3222,24272,20808,
273	3702,11362,3746,40619,32090,21982,4213,25245,38765,21652,36045,29174,37238,
274	25596,25529,25598,21865,11075,40050,11955,20890,13535,3495,20903,21581,21790,
275	21779,30310,36397,26762,30129,32950,34820,34694,35015,33206,33820,4289,17644,
276	29444,18182,23440,33547,26771,22139,9972,32047,16803,32115,28368,29366,37232,
277	4569,37384,15612,42665,3756,3833,29286,7330,18254,20418,32761,4075,16634,
278	40029,25887,11680,18675,18400,40316,4076,3594,0,30115,4077,0,24648,4487,29091,
279	32398,40272,19994,19972,13687,23309,27826,21351,13996,14812,21373,13989,17944,
280	22682,19310,33325,21579,22442,23189,2425,0,14930,9317,29556,40620,19721,39917,
281	15614,40752,19547,20393,38302,40926,33884,15798,29362,26547,14112,25390,32037,
282	16119,15916,14890,36872,21196,15988,13946,17897,1166,30272,23280,3766,30842,
283	32558,22695,16575,22140,39819,23924,30292,42036,40581,19681,0,14331,24857,
284	12506,17394,0,22109,4777,22439,18787,40454,21044,28846,13741,0,40316,31830,
285	39737,22494,5996,23635,25811,38096,25397,29028,34477,3368,27938,19170,3441,0,
286	20990,7951,23950,38659,7633,40577,36940,31519,39682,23761,31651,25192,25397,
287	39679,31695,39722,31870,0,31810,31878,39957,31740,39689,0,39963,18750,40794,
288	21875,23491,20477,40600,20466,21088,15878,21201,22375,20566,22967,24082,38856,
289	40363,36700,21609,38836,39232,38842,21292,24880,26924,21466,39946,40194,19515,
290	38465,27008,20646,
291	30022,5997,39386,21107,0,37209,38529,37212,0,37201,36503,25471,27939,27338,
292	22033,37262,30074,25221,1020,29519,31856,23585,15613,0,18713,30422,39837,
293	20010,3284,33726,34882,0,23626,27072,0,22394,21023,24053,20174,27697,498,
294	20281,21660,21722,21146,36226,13822,0,13811,0,27474,37244,40869,39831,38958,
295	39092,39610,40616,40580,29050,31508,0,27642,34840,32632,0,22048,42570,36471,
296	40787,0,36308,36431,40476,36353,25218,33661,36392,36469,31443,19063,31294,
297	30936,27882,35431,30215,35418,40742,27854,34774,30147,41650,30803,63552,36108,
298	29410,29553,35629,29442,29937,36075,19131,34351,24506,34976,17591,0,6203,
299	28165,0,35454,9499,0,24829,30311,39639,40260,37742,39823,34805,0,0,36087,
300	29484,38689,39856,13782,29362,19463,31825,39242,24921,24921,19460,40598,24957,
301	0,22367,24943,25254,25145,0,14940,25058,21418,13301,25444,26626,13778,23895,
302	35778,36826,36409,0,20697,7494,30982,21298,38456,3899,16485,0,30718,0,31938,
303	24346,31962,31277,32870,32867,32077,29957,29938,35220,33306,26380,32866,29830,
304	32859,29936,33027,30500,35209,26572,30035,28369,34729,34766,33224,34700,35401,
305	36013,35651,30507,29944,34010,13877,27058,36262,0,35241,0,28089,34753,16401,
306	29927,15835,29046,24740,24988,15569,0,24695,0,32625,35629,0,24809,19326,21024,
307	15384,15559,24279,30294,21809,6468,4862,39171,28124,28845,23745,25005,35343,
308	13943,238,26694,20238,17762,23327,25420,40784,40614,25195,1351,37595,1503,
309	16325,34124,17077,29679,20917,13897,18754,35300,37700,6619,
310	33518,15560,30780,26436,25311,18739,35242,672,27571,4869,20395,9453,20488,
311	27945,31364,13824,19121,9491,0,894,24484,896,839,28379,1055,0,20737,13434,
312	20750,39020,14147,33814,18852,1159,20832,13236,20842,3071,8444,741,9520,1422,
313	12851,6531,23426,34685,1459,15513,20914,20920,40244,20937,20943,20945,15580,
314	20947,19110,20915,20962,21314,20973,33741,26942,14125,24443,21003,21030,21052,
315	21173,21079,21140,21177,21189,31765,34114,21216,34317,27411,0,35550,21833,
316	28377,16256,2388,16364,21299,0,3042,27851,5926,26651,29653,24650,16042,14540,
317	5864,29149,17570,21357,21364,34475,21374,0,5526,5651,30694,21395,35483,21408,
318	21419,21422,29607,22386,16217,29596,21441,21445,27721,20041,22526,21465,15019,
319	2959,21472,16363,11683,21494,3191,21523,28793,21803,26199,27995,21613,27475,
320	3444,21853,21647,21668,18342,5901,3805,15796,3405,35260,9880,21831,19693,
321	21551,29719,21894,21929,0,6359,16442,17746,17461,26291,4276,22071,26317,12938,
322	26276,26285,22093,22095,30961,22257,38791,21502,22272,22255,22253,35686,13859,
323	4687,22342,16805,27758,28811,22338,14001,27774,22502,5142,22531,5204,17251,
324	22566,19445,22620,22698,13665,22752,22748,4668,22779,23551,22339,41296,17016,
325	37843,13729,22815,26790,14019,28249,5694,23076,21843,5778,34053,22985,3406,
326	27777,27946,6108,23001,6139,6066,28070,28017,6184,5845,23033,28229,23211,
327	23139,14054,18857,0,14088,23190,29797,23251,28577,9556,15749,6417,14130,5816,
328	24195,21200,23414,25992,23420,31246,16388,18525,516,23509,24928,6708,22988,
329	1445,23539,
330	23453,19728,23557,6980,23571,29646,23572,7333,27432,23625,18653,23685,23785,
331	23791,23947,7673,7735,23824,23832,23878,7844,23738,24023,33532,14381,18689,
332	8265,8563,33415,14390,15298,24110,27274,0,24186,17596,3283,21414,20151,0,
333	21416,6001,24073,24308,33922,24313,24315,14496,24316,26686,37915,24333,449,
334	63636,15070,18606,4922,24378,26760,9168,0,9329,24419,38845,28270,24434,37696,
335	35382,24487,23990,15711,21072,8042,28920,9832,37334,670,35369,24625,26245,
336	6263,14691,15815,13881,22416,10164,31089,15936,24734,0,24755,18818,18831,
337	31315,29860,20705,23200,24932,33828,24898,63654,28370,24961,20980,1622,24967,
338	23466,16311,10335,25043,35741,39261,25040,14642,10624,10433,24611,24924,25886,
339	25483,280,25285,6000,25301,11789,25452,18911,14871,25656,25592,5006,6140,0,
340	28554,11830,38932,16524,22301,25825,25829,38011,14950,25658,14935,25933,28438,
341	18984,18979,25989,25965,25951,12414,26037,18752,19255,26065,16600,6185,26080,
342	26083,24543,13312,26136,12791,12792,26180,12708,12709,26187,3701,26215,20966,
343	26227,0,7741,12849,34292,12744,21267,30661,10487,39332,26370,17308,18977,
344	15147,27130,14274,0,26471,26466,16845,37101,26583,17641,26658,28240,37436,
345	26625,13286,28064,26717,13423,27105,27147,35551,26995,26819,13773,26881,26880,
346	15666,14849,13884,15232,26540,26977,35402,17148,26934,27032,15265,969,33635,
347	20624,27129,13913,8490,27205,14083,27293,15347,26545,27336,37276,15373,27421,
348	2339,24798,27445,27508,10189,28341,15067,949,6488,14144,21537,15194,27617,
349	16124,27612,27703,9355,18673,27473,
350	27738,33318,27769,15804,17605,15805,16804,18700,18688,15561,14053,15595,3378,
351	39811,12793,9361,32655,26679,27941,28065,28139,28054,27996,28284,28420,18815,
352	16517,28274,34099,28532,20935,0,0,33838,35617,0,15919,29779,16258,31180,28239,
353	23185,12363,28664,14093,28573,15920,28410,5271,16445,17749,37872,28484,28508,
354	15694,28532,37232,15675,28575,16708,28627,16529,16725,16441,16368,16308,16703,
355	20959,16726,16727,16704,25053,28747,28798,28839,28801,28876,28885,28886,28895,
356	16644,15848,29108,29078,17015,28971,28997,23176,29002,0,23708,17253,29007,
357	37730,17089,28972,17498,18983,18978,29114,35816,28861,29198,37954,29205,22801,
358	37955,29220,37697,22021,29230,29248,18804,26813,29269,29271,15957,12356,26637,
359	28477,29314,0,29483,18467,34859,18669,34820,29480,29486,29647,29610,3130,
360	27182,29641,29769,16866,5863,18980,26147,14021,18871,18829,18939,29687,29717,
361	26883,18982,29753,1475,16087,0,10413,29792,36530,29767,29668,29814,33721,
362	29804,14128,29812,37873,27180,29826,18771,19084,16735,19065,35727,23366,35843,
363	6302,29896,6536,29966,0,29982,36569,6731,23511,36524,37765,30029,30026,30055,
364	30062,20354,16132,19731,30094,29789,30110,30132,30210,30252,30289,30287,30319,
365	30326,25589,30352,33263,14328,26897,26894,30369,30373,30391,30412,28575,33890,
366	20637,20861,7708,30494,30502,30528,25775,21024,30552,12972,30639,35172,35176,
367	5825,30708,0,4982,18962,26826,30895,30919,30931,38565,31022,21984,30935,31028,
368	30897,30220,36792,34948,35627,24707,9756,31110,35072,26882,31104,22615,31133,
369	31545,31036,31145,28202,28966,
370	16040,31174,37133,31188,1312,17503,21007,47234,248,16384,43296,1102,0,0,2868,
371	1,0,0,0,0,0,0,0,3072,64,0,0,0,1024,88,60,0,0,23680,56493,48115,17353,60910,
372	4004,49446,30363,61426,64478,63482,12815,44868,61438,65277,24593,176,8448,
373	33049,4128,43144,8544,9321,17408,50313,0,16387,53,33859,20785,26771,514,0,0,0,
374	0,0,16384,256,44160,33380,35904,37025,20484,54368,53760,6186,26781,38709,
375	55375,8440,33476,10268,30082,660,16440,41376,4293,19825,3524,47512,23390,
376	17153,39327,30723,57888,2079,393,16585,775,39437,21136,20433,892,8450,49184,
377	4974,46467,62939,30693,20368,39447,5942,12,47726,12041,21600,7680,26744,28706,
378	40534,62245,46990,2839,59119,6007,7003,4289,36248,6162,53174,12545,6770,11355,
379	49334,57888,23747,7042,56032,34254,16598,21673,53259,18447,16452,2320,16596,
380	15278,7780,11076,2071,33414,6198,35232,40167,2139,900,55810,60560,34779,49029,
381	44450,36509,39069,9504,70,40774,58239,51669,62596,19926,58118,6326,2322,0,
382	1024,0,32,0,512,0,0,0,0,8192,0,0,0,0,0,0,8,36352,28280,16223,56702,63293,
383	39932,44796,65490,27535,59377,47807,28334,61207,42972,46654,30645,37577,42455,
384	19126,39790,33209,26445,21758,39921,65122,21103,14039,49150,17705,63873,26045,
385	17062,57,16896,36704,37888,16448,45010,53719,219,39072,31666,20998,38944,
386	51222,2365,0,1,0,2561,2226,128,0,34820,5152,19472,0,4,17569,16,321,
387	2048,61504,20447,22582,62961,32949,26613,16512,20480,16718,33992,23040,55392,
388	11009,20481,5793,16580,28402,44049,14624,49348,1800,2316,38552,39876,7184,
389	27800,10886,422,4422,58733,50379,37568,8464,4630,29341,27124,5902,41514,62593,
390	123,41992,36875,11280,14796,330,5872,2571,3136,59933,17420,17678,2,

lib/libc/wasi/libc-top-half/musl/src/locale/iconv.c deleted-685

...	@@ -1,685 +0,0 @@
1	#include <iconv.h>
2	#include <errno.h>
3	#include <wchar.h>
4	#include <string.h>
5	#include <stdlib.h>
6	#include <limits.h>
7	#include <stdint.h>
8	#include "locale_impl.h"
9
10	#define UTF_32BE 0300
11	#define UTF_16LE 0301
12	#define UTF_16BE 0302
13	#define UTF_32LE 0303
14	#define UCS2BE 0304
15	#define UCS2LE 0305
16	#define WCHAR_T 0306
17	#define US_ASCII 0307
18	#define UTF_8 0310
19	#define UTF_16 0312
20	#define UTF_32 0313
21	#define UCS2 0314
22	#define EUC_JP 0320
23	#define SHIFT_JIS 0321
24	#define ISO2022_JP 0322
25	#define GB18030 0330
26	#define GBK 0331
27	#define GB2312 0332
28	#define BIG5 0340
29	#define EUC_KR 0350
30
31	/* Definitions of charmaps. Each charmap consists of:
32	* 1. Empty-string-terminated list of null-terminated aliases.
33	* 2. Special type code or number of elided quads of entries.
34	* 3. Character table (size determined by field 2), consisting
35	* of 5 bytes for every 4 characters, interpreted as 10-bit
36	* indices into the legacy_chars table. */
37
38	static const unsigned char charmaps[] =
39	"utf8\0char\0\0\310"
40	"wchart\0\0\306"
41	"ucs2be\0\0\304"
42	"ucs2le\0\0\305"
43	"utf16be\0\0\302"
44	"utf16le\0\0\301"
45	"ucs4be\0utf32be\0\0\300"
46	"ucs4le\0utf32le\0\0\303"
47	"ascii\0usascii\0iso646\0iso646us\0\0\307"
48	"utf16\0\0\312"
49	"ucs4\0utf32\0\0\313"
50	"ucs2\0\0\314"
51	"eucjp\0\0\320"
52	"shiftjis\0sjis\0\0\321"
53	"iso2022jp\0\0\322"
54	"gb18030\0\0\330"
55	"gbk\0\0\331"
56	"gb2312\0\0\332"
57	"big5\0bigfive\0cp950\0big5hkscs\0\0\340"
58	"euckr\0ksc5601\0ksx1001\0cp949\0\0\350"
59	#include "codepages.h"
60	;
61
62	/* Table of characters that appear in legacy 8-bit codepages,
63	* limited to 1024 slots (10 bit indices). The first 256 entries
64	* are elided since those characters are obviously all included. */
65	static const unsigned short legacy_chars[] = {
66	#include "legacychars.h"
67	};
68
69	static const unsigned short jis0208[84][94] = {
70	#include "jis0208.h"
71	};
72
73	static const unsigned short gb18030[126][190] = {
74	#include "gb18030.h"
75	};
76
77	static const unsigned short big5[89][157] = {
78	#include "big5.h"
79	};
80
81	static const unsigned short hkscs[] = {
82	#include "hkscs.h"
83	};
84
85	static const unsigned short ksc[93][94] = {
86	#include "ksc.h"
87	};
88
89	static const unsigned short rev_jis[] = {
90	#include "revjis.h"
91	};
92
93	static int fuzzycmp(const unsigned char a, const unsigned char b)
94	{
95	for (; a && b; a++, b++) {
96	while (a && (a\|32U)-'a'>26 && *a-'0'>10U) a++;
97	if ((a\|32U) != b) return 1;
98	}
99	return a != b;
100	}
101
102	static size_t find_charmap(const void *name)
103	{
104	const unsigned char *s;
105	if (!(char )name) name=charmaps; /* "utf8" */
106	for (s=charmaps; *s; ) {
107	if (!fuzzycmp(name, s)) {
108	for (; s; s+=strlen((void )s)+1);
109	return s+1-charmaps;
110	}
111	s += strlen((void *)s)+1;
112	if (!*s) {
113	if (s[1] > 0200) s+=2;
114	else s+=2+(64U-s[1])*5;
115	}
116	}
117	return -1;
118	}
119
120	struct stateful_cd {
121	iconv_t base_cd;
122	unsigned state;
123	};
124
125	static iconv_t combine_to_from(size_t t, size_t f)
126	{
127	return (void *)(f<<16 \| t<<1 \| 1);
128	}
129
130	static size_t extract_from(iconv_t cd)
131	{
132	return (size_t)cd >> 16;
133	}
134
135	static size_t extract_to(iconv_t cd)
136	{
137	return (size_t)cd >> 1 & 0x7fff;
138	}
139
140	iconv_t iconv_open(const char to, const char from)
141	{
142	size_t f, t;
143	struct stateful_cd *scd;
144
145	if ((t = find_charmap(to))==-1
146	\|\| (f = find_charmap(from))==-1
147	\|\| (charmaps[t] >= 0330)) {
148	errno = EINVAL;
149	return (iconv_t)-1;
150	}
151	iconv_t cd = combine_to_from(t, f);
152
153	switch (charmaps[f]) {
154	case UTF_16:
155	case UTF_32:
156	case UCS2:
157	case ISO2022_JP:
158	scd = malloc(sizeof *scd);
159	if (!scd) return (iconv_t)-1;
160	scd->base_cd = cd;
161	scd->state = 0;
162	cd = (iconv_t)scd;
163	}
164
165	return cd;
166	}
167
168	static unsigned get_16(const unsigned char *s, int e)
169	{
170	e &= 1;
171	return s[e]<<8 \| s[1-e];
172	}
173
174	static void put_16(unsigned char *s, unsigned c, int e)
175	{
176	e &= 1;
177	s[e] = c>>8;
178	s[1-e] = c;
179	}
180
181	static unsigned get_32(const unsigned char *s, int e)
182	{
183	e &= 3;
184	return s[e]+0U<<24 \| s[e^1]<<16 \| s[e^2]<<8 \| s[e^3];
185	}
186
187	static void put_32(unsigned char *s, unsigned c, int e)
188	{
189	e &= 3;
190	s[e^0] = c>>24;
191	s[e^1] = c>>16;
192	s[e^2] = c>>8;
193	s[e^3] = c;
194	}
195
196	/* Adapt as needed */
197	#define mbrtowc_utf8 mbrtowc
198	#define wctomb_utf8 wctomb
199
200	static unsigned legacy_map(const unsigned char *map, unsigned c)
201	{
202	if (c < 4*map[-1]) return c;
203	unsigned x = c - 4*map[-1];
204	x = map[x5/4]>>2x%8 \| map[x5/4+1]<<8-2x%8 & 1023;
205	return x < 256 ? x : legacy_chars[x-256];
206	}
207
208	static unsigned uni_to_jis(unsigned c)
209	{
210	unsigned nel = sizeof rev_jis / sizeof *rev_jis;
211	unsigned d, j, i, b = 0;
212	for (;;) {
213	i = nel/2;
214	j = rev_jis[b+i];
215	d = jis0208[j/256][j%256];
216	if (d==c) return j + 0x2121;
217	else if (nel == 1) return 0;
218	else if (c < d)
219	nel /= 2;
220	else {
221	b += i;
222	nel -= nel/2;
223	}
224	}
225	}
226
227	size_t iconv(iconv_t cd, char *restrict in, size_t restrict inb, char *restrict out, size_t restrict outb)
228	{
229	size_t x=0;
230	struct stateful_cd *scd=0;
231	if (!((size_t)cd & 1)) {
232	scd = (void *)cd;
233	cd = scd->base_cd;
234	}
235	unsigned to = extract_to(cd);
236	unsigned from = extract_from(cd);
237	const unsigned char *map = charmaps+from+1;
238	const unsigned char *tomap = charmaps+to+1;
239	mbstate_t st = {0};
240	wchar_t wc;
241	unsigned c, d;
242	size_t k, l;
243	int err;
244	unsigned char type = map[-1];
245	unsigned char totype = tomap[-1];
246	locale_t ploc = &CURRENT_LOCALE, loc = ploc;
247
248	if (!in \|\| !in \|\| !inb) return 0;
249
250	*ploc = UTF8_LOCALE;
251
252	for (; inb; in+=l, *inb-=l) {
253	c = (unsigned char )*in;
254	l = 1;
255
256	switch (type) {
257	case UTF_8:
258	if (c < 128) break;
259	l = mbrtowc_utf8(&wc, in, inb, &st);
260	if (l == (size_t)-1) goto ilseq;
261	if (l == (size_t)-2) goto starved;
262	c = wc;
263	break;
264	case US_ASCII:
265	if (c >= 128) goto ilseq;
266	break;
267	case WCHAR_T:
268	l = sizeof(wchar_t);
269	if (*inb < l) goto starved;
270	c = (wchar_t )*in;
271	if (0) {
272	case UTF_32BE:
273	case UTF_32LE:
274	l = 4;
275	if (*inb < 4) goto starved;
276	c = get_32((void )in, type);
277	}
278	if (c-0xd800u < 0x800u \|\| c >= 0x110000u) goto ilseq;
279	break;
280	case UCS2BE:
281	case UCS2LE:
282	case UTF_16BE:
283	case UTF_16LE:
284	l = 2;
285	if (*inb < 2) goto starved;
286	c = get_16((void )in, type);
287	if ((unsigned)(c-0xdc00) < 0x400) goto ilseq;
288	if ((unsigned)(c-0xd800) < 0x400) {
289	if (type-UCS2BE < 2U) goto ilseq;
290	l = 4;
291	if (*inb < 4) goto starved;
292	d = get_16((void )(in + 2), type);
293	if ((unsigned)(d-0xdc00) >= 0x400) goto ilseq;
294	c = ((c-0xd7c0)<<10) + (d-0xdc00);
295	}
296	break;
297	case UCS2:
298	case UTF_16:
299	l = 0;
300	if (!scd->state) {
301	if (*inb < 2) goto starved;
302	c = get_16((void )in, 0);
303	scd->state = type==UCS2
304	? c==0xfffe ? UCS2LE : UCS2BE
305	: c==0xfffe ? UTF_16LE : UTF_16BE;
306	if (c == 0xfffe \|\| c == 0xfeff)
307	l = 2;
308	}
309	type = scd->state;
310	continue;
311	case UTF_32:
312	l = 0;
313	if (!scd->state) {
314	if (*inb < 4) goto starved;
315	c = get_32((void )in, 0);
316	scd->state = c==0xfffe0000 ? UTF_32LE : UTF_32BE;
317	if (c == 0xfffe0000 \|\| c == 0xfeff)
318	l = 4;
319	}
320	type = scd->state;
321	continue;
322	case SHIFT_JIS:
323	if (c < 128) break;
324	if (c-0xa1 <= 0xdf-0xa1) {
325	c += 0xff61-0xa1;
326	break;
327	}
328	l = 2;
329	if (*inb < 2) goto starved;
330	d = ((unsigned char )*in + 1);
331	if (c-129 <= 159-129) c -= 129;
332	else if (c-224 <= 239-224) c -= 193;
333	else goto ilseq;
334	c *= 2;
335	if (d-64 <= 158-64) {
336	if (d==127) goto ilseq;
337	if (d>127) d--;
338	d -= 64;
339	} else if (d-159 <= 252-159) {
340	c++;
341	d -= 159;
342	}
343	c = jis0208[c][d];
344	if (!c) goto ilseq;
345	break;
346	case EUC_JP:
347	if (c < 128) break;
348	l = 2;
349	if (*inb < 2) goto starved;
350	d = ((unsigned char )*in + 1);
351	if (c==0x8e) {
352	c = d;
353	if (c-0xa1 > 0xdf-0xa1) goto ilseq;
354	c += 0xff61 - 0xa1;
355	break;
356	}
357	c -= 0xa1;
358	d -= 0xa1;
359	if (c >= 84 \|\| d >= 94) goto ilseq;
360	c = jis0208[c][d];
361	if (!c) goto ilseq;
362	break;
363	case ISO2022_JP:
364	if (c >= 128) goto ilseq;
365	if (c == '\033') {
366	l = 3;
367	if (*inb < 3) goto starved;
368	c = ((unsigned char )*in + 1);
369	d = ((unsigned char )*in + 2);
370	if (c != '(' && c != '$') goto ilseq;
371	switch (128*(c=='$') + d) {
372	case 'B': scd->state=0; continue;
373	case 'J': scd->state=1; continue;
374	case 'I': scd->state=4; continue;
375	case 128+'@': scd->state=2; continue;
376	case 128+'B': scd->state=3; continue;
377	}
378	goto ilseq;
379	}
380	switch (scd->state) {
381	case 1:
382	if (c=='\\') c = 0xa5;
383	if (c=='~') c = 0x203e;
384	break;
385	case 2:
386	case 3:
387	l = 2;
388	if (*inb < 2) goto starved;
389	d = ((unsigned char )*in + 1);
390	c -= 0x21;
391	d -= 0x21;
392	if (c >= 84 \|\| d >= 94) goto ilseq;
393	c = jis0208[c][d];
394	if (!c) goto ilseq;
395	break;
396	case 4:
397	if (c-0x60 < 0x1f) goto ilseq;
398	if (c-0x21 < 0x5e) c += 0xff61-0x21;
399	break;
400	}
401	break;
402	case GB2312:
403	if (c < 128) break;
404	if (c < 0xa1) goto ilseq;
405	case GBK:
406	case GB18030:
407	if (c < 128) break;
408	c -= 0x81;
409	if (c >= 126) goto ilseq;
410	l = 2;
411	if (*inb < 2) goto starved;
412	d = ((unsigned char )*in + 1);
413	if (d < 0xa1 && type == GB2312) goto ilseq;
414	if (d-0x40>=191 \|\| d==127) {
415	if (d-'0'>9 \|\| type != GB18030)
416	goto ilseq;
417	l = 4;
418	if (*inb < 4) goto starved;
419	c = (10c + d-'0') 1260;
420	d = ((unsigned char )*in + 2);
421	if (d-0x81>126) goto ilseq;
422	c += 10*(d-0x81);
423	d = ((unsigned char )*in + 3);
424	if (d-'0'>9) goto ilseq;
425	c += d-'0';
426	c += 128;
427	for (d=0; d<=c; ) {
428	k = 0;
429	for (int i=0; i<126; i++)
430	for (int j=0; j<190; j++)
431	if (gb18030[i][j]-d <= c-d)
432	k++;
433	d = c+1;
434	c += k;
435	}
436	break;
437	}
438	d -= 0x40;
439	if (d>63) d--;
440	c = gb18030[c][d];
441	break;
442	case BIG5:
443	if (c < 128) break;
444	l = 2;
445	if (*inb < 2) goto starved;
446	d = ((unsigned char )*in + 1);
447	if (d-0x40>=0xff-0x40 \|\| d-0x7f<0xa1-0x7f) goto ilseq;
448	d -= 0x40;
449	if (d > 0x3e) d -= 0x22;
450	if (c-0xa1>=0xfa-0xa1) {
451	if (c-0x87>=0xff-0x87) goto ilseq;
452	if (c < 0xa1) c -= 0x87;
453	else c -= 0x87 + (0xfa-0xa1);
454	c = (hkscs[4867+(c157+d)/16]>>(c157+d)%16)%2<<17
455	\| hkscs[c*157+d];
456	/* A few HKSCS characters map to pairs of UCS
457	* characters. These are mapped to surrogate
458	* range in the hkscs table then hard-coded
459	* here. Ugly, yes. */
460	if (c/256 == 0xdc) {
461	union {
462	char c[8];
463	wchar_t wc[2];
464	} tmp;
465	char *ptmp = tmp.c;
466	size_t tmpx = iconv(combine_to_from(to, find_charmap("utf8")),
467	&(char *){"\303\212\314\204"
468	"\303\212\314\214"
469	"\303\252\314\204"
470	"\303\252\314\214"
471	+c%256}, &(size_t){4},
472	&ptmp, &(size_t){sizeof tmp});
473	size_t tmplen = ptmp - tmp.c;
474	if (tmplen > *outb) goto toobig;
475	if (tmpx) x++;
476	memcpy(*out, &tmp, tmplen);
477	*out += tmplen;
478	*outb -= tmplen;
479	continue;
480	}
481	if (!c) goto ilseq;
482	break;
483	}
484	c -= 0xa1;
485	c = big5[c][d]\|(c==0x27&&(d==0x3a\|\|d==0x3c\|\|d==0x42))<<17;
486	if (!c) goto ilseq;
487	break;
488	case EUC_KR:
489	if (c < 128) break;
490	l = 2;
491	if (*inb < 2) goto starved;
492	d = ((unsigned char )*in + 1);
493	c -= 0xa1;
494	d -= 0xa1;
495	if (c >= 93 \|\| d >= 94) {
496	c += (0xa1-0x81);
497	d += 0xa1;
498	if (c >= 93 \|\| c>=0xc6-0x81 && d>0x52)
499	goto ilseq;
500	if (d-'A'<26) d = d-'A';
501	else if (d-'a'<26) d = d-'a'+26;
502	else if (d-0x81<0xff-0x81) d = d-0x81+52;
503	else goto ilseq;
504	if (c < 0x20) c = 178*c + d;
505	else c = 1780x20 + 84(c-0x20) + d;
506	c += 0xac00;
507	for (d=0xac00; d<=c; ) {
508	k = 0;
509	for (int i=0; i<93; i++)
510	for (int j=0; j<94; j++)
511	if (ksc[i][j]-d <= c-d)
512	k++;
513	d = c+1;
514	c += k;
515	}
516	break;
517	}
518	c = ksc[c][d];
519	if (!c) goto ilseq;
520	break;
521	default:
522	if (!c) break;
523	c = legacy_map(map, c);
524	if (!c) goto ilseq;
525	}
526
527	switch (totype) {
528	case WCHAR_T:
529	if (*outb < sizeof(wchar_t)) goto toobig;
530	(wchar_t )*out = c;
531	*out += sizeof(wchar_t);
532	*outb -= sizeof(wchar_t);
533	break;
534	case UTF_8:
535	if (*outb < 4) {
536	char tmp[4];
537	k = wctomb_utf8(tmp, c);
538	if (*outb < k) goto toobig;
539	memcpy(*out, tmp, k);
540	} else k = wctomb_utf8(*out, c);
541	*out += k;
542	*outb -= k;
543	break;
544	case US_ASCII:
545	if (c > 0x7f) subst: x++, c='*';
546	default:
547	if (*outb < 1) goto toobig;
548	if (c<256 && c==legacy_map(tomap, c)) {
549	revout:
550	if (*outb < 1) goto toobig;
551	(out)++ = c;
552	*outb -= 1;
553	break;
554	}
555	d = c;
556	for (c=4*totype; c<256; c++) {
557	if (d == legacy_map(tomap, c)) {
558	goto revout;
559	}
560	}
561	goto subst;
562	case SHIFT_JIS:
563	if (c < 128) goto revout;
564	if (c == 0xa5) {
565	x++;
566	c = '\\';
567	goto revout;
568	}
569	if (c == 0x203e) {
570	x++;
571	c = '~';
572	goto revout;
573	}
574	if (c-0xff61 <= 0xdf-0xa1) {
575	c += 0xa1 - 0xff61;
576	goto revout;
577	}
578	c = uni_to_jis(c);
579	if (!c) goto subst;
580	if (*outb < 2) goto toobig;
581	d = c%256;
582	c = c/256;
583	(out)++ = (c+1)/2 + (c<95 ? 112 : 176);
584	(out)++ = c%2 ? d + 31 + d/96 : d + 126;
585	*outb -= 2;
586	break;
587	case EUC_JP:
588	if (c < 128) goto revout;
589	if (c-0xff61 <= 0xdf-0xa1) {
590	c += 0x0e00 + 0x21 - 0xff61;
591	} else {
592	c = uni_to_jis(c);
593	}
594	if (!c) goto subst;
595	if (*outb < 2) goto toobig;
596	(out)++ = c/256 + 0x80;
597	(out)++ = c%256 + 0x80;
598	*outb -= 2;
599	break;
600	case ISO2022_JP:
601	if (c < 128) goto revout;
602	if (c-0xff61 <= 0xdf-0xa1 \|\| c==0xa5 \|\| c==0x203e) {
603	if (*outb < 7) goto toobig;
604	(out)++ = '\033';
605	(out)++ = '(';
606	if (c==0xa5) {
607	(out)++ = 'J';
608	(out)++ = '\\';
609	} else if (c==0x203e) {
610	(out)++ = 'J';
611	(out)++ = '~';
612	} else {
613	(out)++ = 'I';
614	(out)++ = c-0xff61+0x21;
615	}
616	(out)++ = '\033';
617	(out)++ = '(';
618	(out)++ = 'B';
619	*outb -= 7;
620	break;
621	}
622	c = uni_to_jis(c);
623	if (!c) goto subst;
624	if (*outb < 8) goto toobig;
625	(out)++ = '\033';
626	(out)++ = '$';
627	(out)++ = 'B';
628	(out)++ = c/256;
629	(out)++ = c%256;
630	(out)++ = '\033';
631	(out)++ = '(';
632	(out)++ = 'B';
633	*outb -= 8;
634	break;
635	case UCS2:
636	totype = UCS2BE;
637	case UCS2BE:
638	case UCS2LE:
639	case UTF_16:
640	case UTF_16BE:
641	case UTF_16LE:
642	if (c < 0x10000 \|\| totype-UCS2BE < 2U) {
643	if (c >= 0x10000) c = 0xFFFD;
644	if (*outb < 2) goto toobig;
645	put_16((void )out, c, totype);
646	*out += 2;
647	*outb -= 2;
648	break;
649	}
650	if (*outb < 4) goto toobig;
651	c -= 0x10000;
652	put_16((void )out, (c>>10)\|0xd800, totype);
653	put_16((void )(out + 2), (c&0x3ff)\|0xdc00, totype);
654	*out += 4;
655	*outb -= 4;
656	break;
657	case UTF_32:
658	totype = UTF_32BE;
659	case UTF_32BE:
660	case UTF_32LE:
661	if (*outb < 4) goto toobig;
662	put_32((void )out, c, totype);
663	*out += 4;
664	*outb -= 4;
665	break;
666	}
667	}
668	*ploc = loc;
669	return x;
670	ilseq:
671	err = EILSEQ;
672	x = -1;
673	goto end;
674	toobig:
675	err = E2BIG;
676	x = -1;
677	goto end;
678	starved:
679	err = EINVAL;
680	x = -1;
681	end:
682	errno = err;
683	*ploc = loc;
684	return x;
685	}

lib/libc/wasi/libc-top-half/musl/src/locale/iconv_close.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <iconv.h>
2	#include <stdlib.h>
3
4	int iconv_close(iconv_t cd)
5	{
6	if (!((size_t)cd & 1)) free((void *)cd);
7	return 0;
8	}

lib/libc/wasi/libc-top-half/musl/src/locale/jis0208.h deleted-563

...	@@ -1,563 +0,0 @@
1	12288,12289,12290,65292,65294,12539,65306,65307,65311,65281,12443,12444,180,
2	65344,168,65342,65507,65343,12541,12542,12445,12446,12291,20189,12293,12294,
3	12295,12540,8213,8208,65295,92,12316,8214,65372,8230,8229,8216,8217,8220,8221,
4	65288,65289,12308,12309,65339,65341,65371,65373,12296,12297,12298,12299,12300,
5	12301,12302,12303,12304,12305,65291,8722,177,215,247,65309,8800,65308,65310,
6	8806,8807,8734,8756,9794,9792,176,8242,8243,8451,65509,65284,162,163,65285,
7	65283,65286,65290,65312,167,9734,9733,9675,9679,9678,9671,9670,9633,9632,9651,
8	9650,9661,9660,8251,12306,8594,8592,8593,8595,12307,0,0,0,0,0,0,0,0,0,0,0,
9	8712,8715,8838,8839,8834,8835,8746,8745,0,0,0,0,0,0,0,0,8743,8744,172,8658,
10	8660,8704,8707,0,0,0,0,0,0,0,0,0,0,0,8736,8869,8978,8706,8711,8801,8786,8810,
11	8811,8730,8765,8733,8757,8747,8748,0,0,0,0,0,0,0,8491,8240,9839,9837,9834,
12	8224,8225,182,0,0,0,0,9711,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,65296,65297,65298,
13	65299,65300,65301,65302,65303,65304,65305,0,0,0,0,0,0,0,65313,65314,65315,
14	65316,65317,65318,65319,65320,65321,65322,65323,65324,65325,65326,65327,65328,
15	65329,65330,65331,65332,65333,65334,65335,65336,65337,65338,0,0,0,0,0,0,65345,
16	65346,65347,
17	65348,65349,65350,65351,65352,65353,65354,65355,65356,65357,65358,65359,65360,
18	65361,65362,65363,65364,65365,65366,65367,65368,65369,65370,0,0,0,0,12353,
19	12354,12355,12356,12357,12358,12359,12360,12361,12362,12363,12364,12365,12366,
20	12367,12368,12369,12370,12371,12372,12373,12374,12375,12376,12377,12378,12379,
21	12380,12381,12382,12383,12384,12385,12386,12387,12388,12389,12390,12391,12392,
22	12393,12394,12395,12396,12397,12398,12399,12400,12401,12402,12403,12404,12405,
23	12406,12407,12408,12409,12410,12411,12412,12413,12414,12415,12416,12417,12418,
24	12419,12420,12421,12422,12423,12424,12425,12426,12427,12428,12429,12430,12431,
25	12432,12433,12434,12435,0,0,0,0,0,0,0,0,0,0,0,12449,12450,12451,12452,12453,
26	12454,12455,12456,12457,12458,12459,12460,12461,12462,12463,12464,12465,12466,
27	12467,12468,12469,12470,12471,12472,12473,12474,12475,12476,12477,12478,12479,
28	12480,12481,12482,12483,12484,12485,12486,12487,12488,12489,12490,12491,12492,
29	12493,12494,12495,12496,12497,12498,12499,12500,12501,12502,12503,12504,12505,
30	12506,12507,12508,12509,12510,12511,12512,12513,12514,12515,12516,12517,12518,
31	12519,12520,12521,12522,12523,12524,12525,12526,12527,12528,12529,12530,12531,
32	12532,12533,12534,0,0,0,0,0,0,0,0,913,914,915,916,917,918,919,920,921,922,923,
33	924,925,926,927,928,929,931,932,933,934,935,936,937,0,0,0,0,0,0,0,0,945,946,
34	947,948,949,950,951,952,953,
35	954,955,956,957,958,959,960,961,963,964,965,966,967,968,969,0,0,0,0,0,0,0,0,0,
36	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1040,1041,1042,1043,
37	1044,1045,1025,1046,1047,1048,1049,1050,1051,1052,1053,1054,1055,1056,1057,
38	1058,1059,1060,1061,1062,1063,1064,1065,1066,1067,1068,1069,1070,1071,0,0,0,0,
39	0,0,0,0,0,0,0,0,0,0,0,1072,1073,1074,1075,1076,1077,1105,1078,1079,1080,1081,
40	1082,1083,1084,1085,1086,1087,1088,1089,1090,1091,1092,1093,1094,1095,1096,
41	1097,1098,1099,1100,1101,1102,1103,0,0,0,0,0,0,0,0,0,0,0,0,0,9472,9474,9484,
42	9488,9496,9492,9500,9516,9508,9524,9532,9473,9475,9487,9491,9499,9495,9507,
43	9523,9515,9531,9547,9504,9519,9512,9527,9535,9501,9520,9509,9528,9538,0,0,0,0,
44	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
45	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
46	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
47	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
48	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
49	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
50	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
51	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
52	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
53	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
54	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
55	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
56	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
57	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
58	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
59	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
60	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
61	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
62	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
63	0,0,0,0,0,0,0,0,0,0,0,0,0,0,20124,21782,23043,38463,21696,24859,25384,23030,
64	36898,33909,33564,31312,24746,25569,28197,26093,33894,33446,39925,26771,22311,
65	26017,25201,23451,22992,34427,39156,32098,32190,39822,25110,31903,34999,23433,
66	24245,25353,26263,26696,38343,38797,26447,20197,20234,20301,20381,20553,22258,
67	22839,22996,23041,23561,24799,24847,24944,26131,26885,28858,30031,30064,31227,
68	32173,32239,32963,33806,34915,35586,36949,36986,21307,20117,20133,22495,32946,
69	37057,30959,19968,22769,28322,36920,31282,33576,33419,39983,20801,21360,21693,
70	21729,22240,23035,24341,39154,28139,32996,34093,38498,38512,38560,38907,21515,
71	21491,23431,28879,32701,36802,38632,21359,40284,31418,19985,30867,33276,28198,
72	22040,21764,27421,34074,39995,23013,21417,28006,29916,38287,22082,20113,36939,
73	38642,33615,39180,21473,21942,23344,24433,26144,26355,26628,27704,27891,27945,
74	29787,30408,31310,38964,33521,34907,35424,37613,28082,30123,30410,39365,24742,
75	35585,36234,38322,27022,21421,20870,22290,22576,22852,23476,24310,24616,25513,
76	25588,27839,28436,28814,28948,29017,29141,29503,32257,33398,33489,34199,36960,
77	37467,40219,22633,26044,27738,29989,20985,22830,22885,24448,24540,25276,26106,
78	27178,27431,27572,29579,32705,35158,40236,40206,40644,23713,27798,33659,20740,
79	23627,25014,33222,26742,29281,20057,20474,21368,24681,28201,31311,38899,19979,
80	21270,20206,20309,20285,20385,20339,21152,21487,22025,22799,23233,23478,23521,
81	31185,26247,26524,26550,27468,27827,28779,29634,31117,31166,31292,31623,33457,
82	33499,33540,33655,33775,33747,34662,35506,22057,36008,36838,36942,38686,34442,
83	20420,23784,25105,29273,30011,33253,33469,34558,36032,38597,39187,39381,20171,
84	20250,35299,22238,22602,22730,24315,24555,24618,24724,24674,25040,25106,25296,
85	25913,39745,26214,26800,28023,28784,30028,30342,32117,33445,34809,38283,38542,
86	35997,20977,21182,22806,21683,23475,23830,24936,27010,28079,30861,33995,34903,
87	35442,37799,39608,28012,39336,34521,22435,26623,34510,37390,21123,22151,21508,
88	24275,25313,25785,26684,26680,27579,29554,30906,31339,35226,35282,36203,36611,
89	37101,38307,38548,38761,23398,23731,27005,38989,38990,25499,31520,27179,27263,
90	26806,39949,28511,21106,21917,24688,25324,27963,28167,28369,33883,35088,36676,
91	19988,39993,21494,26907,27194,38788,26666,20828,31427,33970,37340,37772,22107,
92	40232,26658,33541,33841,31909,21000,33477,29926,20094,
93	20355,20896,23506,21002,21208,21223,24059,21914,22570,23014,23436,23448,23515,
94	24178,24185,24739,24863,24931,25022,25563,25954,26577,26707,26874,27454,27475,
95	27735,28450,28567,28485,29872,29976,30435,30475,31487,31649,31777,32233,32566,
96	32752,32925,33382,33694,35251,35532,36011,36996,37969,38291,38289,38306,38501,
97	38867,39208,33304,20024,21547,23736,24012,29609,30284,30524,23721,32747,36107,
98	38593,38929,38996,39000,20225,20238,21361,21916,22120,22522,22855,23305,23492,
99	23696,24076,24190,24524,25582,26426,26071,26082,26399,26827,26820,27231,24112,
100	27589,27671,27773,30079,31048,23395,31232,32000,24509,35215,35352,36020,36215,
101	36556,36637,39138,39438,39740,20096,20605,20736,22931,23452,25135,25216,25836,
102	27450,29344,30097,31047,32681,34811,35516,35696,25516,33738,38816,21513,21507,
103	21931,26708,27224,35440,30759,26485,40653,21364,23458,33050,34384,36870,19992,
104	20037,20167,20241,21450,21560,23470,24339,24613,25937,26429,27714,27762,27875,
105	28792,29699,31350,31406,31496,32026,31998,32102,26087,29275,21435,23621,24040,
106	25298,25312,25369,28192,34394,35377,36317,37624,28417,31142,39770,20136,20139,
107	20140,20379,20384,20689,20807,31478,20849,20982,21332,21281,21375,21483,21932,
108	22659,23777,24375,24394,24623,24656,24685,25375,25945,27211,27841,29378,29421,
109	30703,33016,33029,33288,34126,37111,37857,38911,39255,39514,20208,20957,23597,
110	26241,26989,23616,26354,26997,29577,26704,31873,20677,21220,22343,24062,37670,
111	26020,27427,27453,29748,31105,31165,31563,32202,33465,33740,34943,35167,35641,
112	36817,37329,21535,37504,20061,20534,21477,21306,29399,
113	29590,30697,33510,36527,39366,39368,39378,20855,24858,34398,21936,31354,20598,
114	23507,36935,38533,20018,27355,37351,23633,23624,25496,31391,27795,38772,36705,
115	31402,29066,38536,31874,26647,32368,26705,37740,21234,21531,34219,35347,32676,
116	36557,37089,21350,34952,31041,20418,20670,21009,20804,21843,22317,29674,22411,
117	22865,24418,24452,24693,24950,24935,25001,25522,25658,25964,26223,26690,28179,
118	30054,31293,31995,32076,32153,32331,32619,33550,33610,34509,35336,35427,35686,
119	36605,38938,40335,33464,36814,39912,21127,25119,25731,28608,38553,26689,20625,
120	27424,27770,28500,31348,32080,34880,35363,26376,20214,20537,20518,20581,20860,
121	21048,21091,21927,22287,22533,23244,24314,25010,25080,25331,25458,26908,27177,
122	29309,29356,29486,30740,30831,32121,30476,32937,35211,35609,36066,36562,36963,
123	37749,38522,38997,39443,40568,20803,21407,21427,24187,24358,28187,28304,29572,
124	29694,32067,33335,35328,35578,38480,20046,20491,21476,21628,22266,22993,23396,
125	24049,24235,24359,25144,25925,26543,28246,29392,31946,34996,32929,32993,33776,
126	34382,35463,36328,37431,38599,39015,40723,20116,20114,20237,21320,21577,21566,
127	23087,24460,24481,24735,26791,27278,29786,30849,35486,35492,35703,37264,20062,
128	39881,20132,20348,20399,20505,20502,20809,20844,21151,21177,21246,21402,21475,
129	21521,21518,21897,22353,22434,22909,23380,23389,23439,24037,24039,24055,24184,
130	24195,24218,24247,24344,24658,24908,25239,25304,25511,25915,26114,26179,26356,
131	26477,26657,26775,27083,27743,27946,28009,28207,28317,30002,30343,30828,31295,
132	31968,32005,32024,32094,32177,32789,32771,32943,32945,
133	33108,33167,33322,33618,34892,34913,35611,36002,36092,37066,37237,37489,30783,
134	37628,38308,38477,38917,39321,39640,40251,21083,21163,21495,21512,22741,25335,
135	28640,35946,36703,40633,20811,21051,21578,22269,31296,37239,40288,40658,29508,
136	28425,33136,29969,24573,24794,39592,29403,36796,27492,38915,20170,22256,22372,
137	22718,23130,24680,25031,26127,26118,26681,26801,28151,30165,32058,33390,39746,
138	20123,20304,21449,21766,23919,24038,24046,26619,27801,29811,30722,35408,37782,
139	35039,22352,24231,25387,20661,20652,20877,26368,21705,22622,22971,23472,24425,
140	25165,25505,26685,27507,28168,28797,37319,29312,30741,30758,31085,25998,32048,
141	33756,35009,36617,38555,21092,22312,26448,32618,36001,20916,22338,38442,22586,
142	27018,32948,21682,23822,22524,30869,40442,20316,21066,21643,25662,26152,26388,
143	26613,31364,31574,32034,37679,26716,39853,31545,21273,20874,21047,23519,25334,
144	25774,25830,26413,27578,34217,38609,30352,39894,25420,37638,39851,30399,26194,
145	19977,20632,21442,23665,24808,25746,25955,26719,29158,29642,29987,31639,32386,
146	34453,35715,36059,37240,39184,26028,26283,27531,20181,20180,20282,20351,21050,
147	21496,21490,21987,22235,22763,22987,22985,23039,23376,23629,24066,24107,24535,
148	24605,25351,25903,23388,26031,26045,26088,26525,27490,27515,27663,29509,31049,
149	31169,31992,32025,32043,32930,33026,33267,35222,35422,35433,35430,35468,35566,
150	36039,36060,38604,39164,27503,20107,20284,20365,20816,23383,23546,24904,25345,
151	26178,27425,28363,27835,29246,29885,30164,30913,31034,32780,32819,33258,33940,
152	36766,27728,40575,24335,35672,40235,31482,36600,23437,
153	38635,19971,21489,22519,22833,23241,23460,24713,28287,28422,30142,36074,23455,
154	34048,31712,20594,26612,33437,23649,34122,32286,33294,20889,23556,25448,36198,
155	26012,29038,31038,32023,32773,35613,36554,36974,34503,37034,20511,21242,23610,
156	26451,28796,29237,37196,37320,37675,33509,23490,24369,24825,20027,21462,23432,
157	25163,26417,27530,29417,29664,31278,33131,36259,37202,39318,20754,21463,21610,
158	23551,25480,27193,32172,38656,22234,21454,21608,23447,23601,24030,20462,24833,
159	25342,27954,31168,31179,32066,32333,32722,33261,33311,33936,34886,35186,35728,
160	36468,36655,36913,37195,37228,38598,37276,20160,20303,20805,21313,24467,25102,
161	26580,27713,28171,29539,32294,37325,37507,21460,22809,23487,28113,31069,32302,
162	31899,22654,29087,20986,34899,36848,20426,23803,26149,30636,31459,33308,39423,
163	20934,24490,26092,26991,27529,28147,28310,28516,30462,32020,24033,36981,37255,
164	38918,20966,21021,25152,26257,26329,28186,24246,32210,32626,26360,34223,34295,
165	35576,21161,21465,22899,24207,24464,24661,37604,38500,20663,20767,21213,21280,
166	21319,21484,21736,21830,21809,22039,22888,22974,23100,23477,23558,23567,23569,
167	23578,24196,24202,24288,24432,25215,25220,25307,25484,25463,26119,26124,26157,
168	26230,26494,26786,27167,27189,27836,28040,28169,28248,28988,28966,29031,30151,
169	30465,30813,30977,31077,31216,31456,31505,31911,32057,32918,33750,33931,34121,
170	34909,35059,35359,35388,35412,35443,35937,36062,37284,37478,37758,37912,38556,
171	38808,19978,19976,19998,20055,20887,21104,22478,22580,22732,23330,24120,24773,
172	25854,26465,26454,27972,29366,30067,31331,33976,35698,
173	37304,37664,22065,22516,39166,25325,26893,27542,29165,32340,32887,33394,35302,
174	39135,34645,36785,23611,20280,20449,20405,21767,23072,23517,23529,24515,24910,
175	25391,26032,26187,26862,27035,28024,28145,30003,30137,30495,31070,31206,32051,
176	33251,33455,34218,35242,35386,36523,36763,36914,37341,38663,20154,20161,20995,
177	22645,22764,23563,29978,23613,33102,35338,36805,38499,38765,31525,35535,38920,
178	37218,22259,21416,36887,21561,22402,24101,25512,27700,28810,30561,31883,32736,
179	34928,36930,37204,37648,37656,38543,29790,39620,23815,23913,25968,26530,36264,
180	38619,25454,26441,26905,33733,38935,38592,35070,28548,25722,23544,19990,28716,
181	30045,26159,20932,21046,21218,22995,24449,24615,25104,25919,25972,26143,26228,
182	26866,26646,27491,28165,29298,29983,30427,31934,32854,22768,35069,35199,35488,
183	35475,35531,36893,37266,38738,38745,25993,31246,33030,38587,24109,24796,25114,
184	26021,26132,26512,30707,31309,31821,32318,33034,36012,36196,36321,36447,30889,
185	20999,25305,25509,25666,25240,35373,31363,31680,35500,38634,32118,33292,34633,
186	20185,20808,21315,21344,23459,23554,23574,24029,25126,25159,25776,26643,26676,
187	27849,27973,27927,26579,28508,29006,29053,26059,31359,31661,32218,32330,32680,
188	33146,33307,33337,34214,35438,36046,36341,36984,36983,37549,37521,38275,39854,
189	21069,21892,28472,28982,20840,31109,32341,33203,31950,22092,22609,23720,25514,
190	26366,26365,26970,29401,30095,30094,30990,31062,31199,31895,32032,32068,34311,
191	35380,38459,36961,40736,20711,21109,21452,21474,20489,21930,22766,22863,29245,
192	23435,23652,21277,24803,24819,25436,25475,25407,25531,
193	25805,26089,26361,24035,27085,27133,28437,29157,20105,30185,30456,31379,31967,
194	32207,32156,32865,33609,33624,33900,33980,34299,35013,36208,36865,36973,37783,
195	38684,39442,20687,22679,24974,33235,34101,36104,36896,20419,20596,21063,21363,
196	24687,25417,26463,28204,36275,36895,20439,23646,36042,26063,32154,21330,34966,
197	20854,25539,23384,23403,23562,25613,26449,36956,20182,22810,22826,27760,35409,
198	21822,22549,22949,24816,25171,26561,33333,26965,38464,39364,39464,20307,22534,
199	23550,32784,23729,24111,24453,24608,24907,25140,26367,27888,28382,32974,33151,
200	33492,34955,36024,36864,36910,38538,40667,39899,20195,21488,22823,31532,37261,
201	38988,40441,28381,28711,21331,21828,23429,25176,25246,25299,27810,28655,29730,
202	35351,37944,28609,35582,33592,20967,34552,21482,21481,20294,36948,36784,22890,
203	33073,24061,31466,36799,26842,35895,29432,40008,27197,35504,20025,21336,22022,
204	22374,25285,25506,26086,27470,28129,28251,28845,30701,31471,31658,32187,32829,
205	32966,34507,35477,37723,22243,22727,24382,26029,26262,27264,27573,30007,35527,
206	20516,30693,22320,24347,24677,26234,27744,30196,31258,32622,33268,34584,36933,
207	39347,31689,30044,31481,31569,33988,36880,31209,31378,33590,23265,30528,20013,
208	20210,23449,24544,25277,26172,26609,27880,34411,34935,35387,37198,37619,39376,
209	27159,28710,29482,33511,33879,36015,19969,20806,20939,21899,23541,24086,24115,
210	24193,24340,24373,24427,24500,25074,25361,26274,26397,28526,29266,30010,30522,
211	32884,33081,33144,34678,35519,35548,36229,36339,37530,38263,38914,40165,21189,
212	25431,30452,26389,27784,29645,36035,37806,38515,27941,
213	22684,26894,27084,36861,37786,30171,36890,22618,26626,25524,27131,20291,28460,
214	26584,36795,34086,32180,37716,26943,28528,22378,22775,23340,32044,29226,21514,
215	37347,40372,20141,20302,20572,20597,21059,35998,21576,22564,23450,24093,24213,
216	24237,24311,24351,24716,25269,25402,25552,26799,27712,30855,31118,31243,32224,
217	33351,35330,35558,36420,36883,37048,37165,37336,40718,27877,25688,25826,25973,
218	28404,30340,31515,36969,37841,28346,21746,24505,25764,36685,36845,37444,20856,
219	22635,22825,23637,24215,28155,32399,29980,36028,36578,39003,28857,20253,27583,
220	28593,30000,38651,20814,21520,22581,22615,22956,23648,24466,26007,26460,28193,
221	30331,33759,36077,36884,37117,37709,30757,30778,21162,24230,22303,22900,24594,
222	20498,20826,20908,20941,20992,21776,22612,22616,22871,23445,23798,23947,24764,
223	25237,25645,26481,26691,26812,26847,30423,28120,28271,28059,28783,29128,24403,
224	30168,31095,31561,31572,31570,31958,32113,21040,33891,34153,34276,35342,35588,
225	35910,36367,36867,36879,37913,38518,38957,39472,38360,20685,21205,21516,22530,
226	23566,24999,25758,27934,30643,31461,33012,33796,36947,37509,23776,40199,21311,
227	24471,24499,28060,29305,30563,31167,31716,27602,29420,35501,26627,27233,20984,
228	31361,26932,23626,40182,33515,23493,37193,28702,22136,23663,24775,25958,27788,
229	35930,36929,38931,21585,26311,37389,22856,37027,20869,20045,20970,34201,35598,
230	28760,25466,37707,26978,39348,32260,30071,21335,26976,36575,38627,27741,20108,
231	23612,24336,36841,21250,36049,32905,34425,24319,26085,20083,20837,22914,23615,
232	38894,20219,22922,24525,35469,28641,31152,31074,23527,
233	33905,29483,29105,24180,24565,25467,25754,29123,31896,20035,24316,20043,22492,
234	22178,24745,28611,32013,33021,33075,33215,36786,35223,34468,24052,25226,25773,
235	35207,26487,27874,27966,29750,30772,23110,32629,33453,39340,20467,24259,25309,
236	25490,25943,26479,30403,29260,32972,32954,36649,37197,20493,22521,23186,26757,
237	26995,29028,29437,36023,22770,36064,38506,36889,34687,31204,30695,33833,20271,
238	21093,21338,25293,26575,27850,30333,31636,31893,33334,34180,36843,26333,28448,
239	29190,32283,33707,39361,40614,20989,31665,30834,31672,32903,31560,27368,24161,
240	32908,30033,30048,20843,37474,28300,30330,37271,39658,20240,32624,25244,31567,
241	38309,40169,22138,22617,34532,38588,20276,21028,21322,21453,21467,24070,25644,
242	26001,26495,27710,27726,29256,29359,29677,30036,32321,33324,34281,36009,31684,
243	37318,29033,38930,39151,25405,26217,30058,30436,30928,34115,34542,21290,21329,
244	21542,22915,24199,24444,24754,25161,25209,25259,26000,27604,27852,30130,30382,
245	30865,31192,32203,32631,32933,34987,35513,36027,36991,38750,39131,27147,31800,
246	20633,23614,24494,26503,27608,29749,30473,32654,40763,26570,31255,21305,30091,
247	39661,24422,33181,33777,32920,24380,24517,30050,31558,36924,26727,23019,23195,
248	32016,30334,35628,20469,24426,27161,27703,28418,29922,31080,34920,35413,35961,
249	24287,25551,30149,31186,33495,37672,37618,33948,34541,39981,21697,24428,25996,
250	27996,28693,36007,36051,38971,25935,29942,19981,20184,22496,22827,23142,23500,
251	20904,24067,24220,24598,25206,25975,26023,26222,28014,29238,31526,33104,33178,
252	33433,35676,36000,36070,36212,38428,38468,20398,25771,
253	27494,33310,33889,34154,37096,23553,26963,39080,33914,34135,20239,21103,24489,
254	24133,26381,31119,33145,35079,35206,28149,24343,25173,27832,20175,29289,39826,
255	20998,21563,22132,22707,24996,25198,28954,22894,31881,31966,32027,38640,25991,
256	32862,19993,20341,20853,22592,24163,24179,24330,26564,20006,34109,38281,38491,
257	31859,38913,20731,22721,30294,30887,21029,30629,34065,31622,20559,22793,29255,
258	31687,32232,36794,36820,36941,20415,21193,23081,24321,38829,20445,33303,37610,
259	22275,25429,27497,29995,35036,36628,31298,21215,22675,24917,25098,26286,27597,
260	31807,33769,20515,20472,21253,21574,22577,22857,23453,23792,23791,23849,24214,
261	25265,25447,25918,26041,26379,27861,27873,28921,30770,32299,32990,33459,33804,
262	34028,34562,35090,35370,35914,37030,37586,39165,40179,40300,20047,20129,20621,
263	21078,22346,22952,24125,24536,24537,25151,26292,26395,26576,26834,20882,32033,
264	32938,33192,35584,35980,36031,37502,38450,21536,38956,21271,20693,21340,22696,
265	25778,26420,29287,30566,31302,37350,21187,27809,27526,22528,24140,22868,26412,
266	32763,20961,30406,25705,30952,39764,40635,22475,22969,26151,26522,27598,21737,
267	27097,24149,33180,26517,39850,26622,40018,26717,20134,20451,21448,25273,26411,
268	27819,36804,20397,32365,40639,19975,24930,28288,28459,34067,21619,26410,39749,
269	24051,31637,23724,23494,34588,28234,34001,31252,33032,22937,31885,27665,30496,
270	21209,22818,28961,29279,30683,38695,40289,26891,23167,23064,20901,21517,21629,
271	26126,30431,36855,37528,40180,23018,29277,28357,20813,26825,32191,32236,38754,
272	40634,25720,27169,33538,22916,23391,27611,29467,30450,
273	32178,32791,33945,20786,26408,40665,30446,26466,21247,39173,23588,25147,31870,
274	36016,21839,24758,32011,38272,21249,20063,20918,22812,29242,32822,37326,24357,
275	30690,21380,24441,32004,34220,35379,36493,38742,26611,34222,37971,24841,24840,
276	27833,30290,35565,36664,21807,20305,20778,21191,21451,23461,24189,24736,24962,
277	25558,26377,26586,28263,28044,29494,29495,30001,31056,35029,35480,36938,37009,
278	37109,38596,34701,22805,20104,20313,19982,35465,36671,38928,20653,24188,22934,
279	23481,24248,25562,25594,25793,26332,26954,27096,27915,28342,29076,29992,31407,
280	32650,32768,33865,33993,35201,35617,36362,36965,38525,39178,24958,25233,27442,
281	27779,28020,32716,32764,28096,32645,34746,35064,26469,33713,38972,38647,27931,
282	32097,33853,37226,20081,21365,23888,27396,28651,34253,34349,35239,21033,21519,
283	23653,26446,26792,29702,29827,30178,35023,35041,37324,38626,38520,24459,29575,
284	31435,33870,25504,30053,21129,27969,28316,29705,30041,30827,31890,38534,31452,
285	40845,20406,24942,26053,34396,20102,20142,20698,20001,20940,23534,26009,26753,
286	28092,29471,30274,30637,31260,31975,33391,35538,36988,37327,38517,38936,21147,
287	32209,20523,21400,26519,28107,29136,29747,33256,36650,38563,40023,40607,29792,
288	22593,28057,32047,39006,20196,20278,20363,20919,21169,23994,24604,29618,31036,
289	33491,37428,38583,38646,38666,40599,40802,26278,27508,21015,21155,28872,35010,
290	24265,24651,24976,28451,29001,31806,32244,32879,34030,36899,37676,21570,39791,
291	27347,28809,36034,36335,38706,21172,23105,24266,24324,26391,27004,27028,28010,
292	28431,29282,29436,31725,32769,32894,34635,37070,20845,
293	40595,31108,32907,37682,35542,20525,21644,35441,27498,36036,33031,24785,26528,
294	40434,20121,20120,39952,35435,34241,34152,26880,28286,30871,33109,0,0,0,0,0,0,
295	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
296	24332,19984,19989,20010,20017,20022,20028,20031,20034,20054,20056,20098,20101,
297	35947,20106,33298,24333,20110,20126,20127,20128,20130,20144,20147,20150,20174,
298	20173,20164,20166,20162,20183,20190,20205,20191,20215,20233,20314,20272,20315,
299	20317,20311,20295,20342,20360,20367,20376,20347,20329,20336,20369,20335,20358,
300	20374,20760,20436,20447,20430,20440,20443,20433,20442,20432,20452,20453,20506,
301	20520,20500,20522,20517,20485,20252,20470,20513,20521,20524,20478,20463,20497,
302	20486,20547,20551,26371,20565,20560,20552,20570,20566,20588,20600,20608,20634,
303	20613,20660,20658,20681,20682,20659,20674,20694,20702,20709,20717,20707,20718,
304	20729,20725,20745,20737,20738,20758,20757,20756,20762,20769,20794,20791,20796,
305	20795,20799,20800,20818,20812,20820,20834,31480,20841,20842,20846,20864,20866,
306	22232,20876,20873,20879,20881,20883,20885,20886,20900,20902,20898,20905,20906,
307	20907,20915,20913,20914,20912,20917,20925,20933,20937,20955,20960,34389,20969,
308	20973,20976,20981,20990,20996,21003,21012,21006,21031,21034,21038,21043,21049,
309	21071,21060,21067,21068,21086,21076,21098,21108,21097,21107,21119,21117,21133,
310	21140,21138,21105,21128,21137,36776,36775,
311	21164,21165,21180,21173,21185,21197,21207,21214,21219,21222,39149,21216,21235,
312	21237,21240,21241,21254,21256,30008,21261,21264,21263,21269,21274,21283,21295,
313	21297,21299,21304,21312,21318,21317,19991,21321,21325,20950,21342,21353,21358,
314	22808,21371,21367,21378,21398,21408,21414,21413,21422,21424,21430,21443,31762,
315	38617,21471,26364,29166,21486,21480,21485,21498,21505,21565,21568,21548,21549,
316	21564,21550,21558,21545,21533,21582,21647,21621,21646,21599,21617,21623,21616,
317	21650,21627,21632,21622,21636,21648,21638,21703,21666,21688,21669,21676,21700,
318	21704,21672,21675,21698,21668,21694,21692,21720,21733,21734,21775,21780,21757,
319	21742,21741,21754,21730,21817,21824,21859,21836,21806,21852,21829,21846,21847,
320	21816,21811,21853,21913,21888,21679,21898,21919,21883,21886,21912,21918,21934,
321	21884,21891,21929,21895,21928,21978,21957,21983,21956,21980,21988,21972,22036,
322	22007,22038,22014,22013,22043,22009,22094,22096,29151,22068,22070,22066,22072,
323	22123,22116,22063,22124,22122,22150,22144,22154,22176,22164,22159,22181,22190,
324	22198,22196,22210,22204,22209,22211,22208,22216,22222,22225,22227,22231,22254,
325	22265,22272,22271,22276,22281,22280,22283,22285,22291,22296,22294,21959,22300,
326	22310,22327,22328,22350,22331,22336,22351,22377,22464,22408,22369,22399,22409,
327	22419,22432,22451,22436,22442,22448,22467,22470,22484,22482,22483,22538,22486,
328	22499,22539,22553,22557,22642,22561,22626,22603,22640,27584,22610,22589,22649,
329	22661,22713,22687,22699,22714,22750,22715,22712,22702,22725,22739,22737,22743,
330	22745,22744,22757,22748,22756,22751,22767,22778,22777,
331	22779,22780,22781,22786,22794,22800,22811,26790,22821,22828,22829,22834,22840,
332	22846,31442,22869,22864,22862,22874,22872,22882,22880,22887,22892,22889,22904,
333	22913,22941,20318,20395,22947,22962,22982,23016,23004,22925,23001,23002,23077,
334	23071,23057,23068,23049,23066,23104,23148,23113,23093,23094,23138,23146,23194,
335	23228,23230,23243,23234,23229,23267,23255,23270,23273,23254,23290,23291,23308,
336	23307,23318,23346,23248,23338,23350,23358,23363,23365,23360,23377,23381,23386,
337	23387,23397,23401,23408,23411,23413,23416,25992,23418,23424,23427,23462,23480,
338	23491,23495,23497,23508,23504,23524,23526,23522,23518,23525,23531,23536,23542,
339	23539,23557,23559,23560,23565,23571,23584,23586,23592,23608,23609,23617,23622,
340	23630,23635,23632,23631,23409,23660,23662,20066,23670,23673,23692,23697,23700,
341	22939,23723,23739,23734,23740,23735,23749,23742,23751,23769,23785,23805,23802,
342	23789,23948,23786,23819,23829,23831,23900,23839,23835,23825,23828,23842,23834,
343	23833,23832,23884,23890,23886,23883,23916,23923,23926,23943,23940,23938,23970,
344	23965,23980,23982,23997,23952,23991,23996,24009,24013,24019,24018,24022,24027,
345	24043,24050,24053,24075,24090,24089,24081,24091,24118,24119,24132,24131,24128,
346	24142,24151,24148,24159,24162,24164,24135,24181,24182,24186,40636,24191,24224,
347	24257,24258,24264,24272,24271,24278,24291,24285,24282,24283,24290,24289,24296,
348	24297,24300,24305,24307,24304,24308,24312,24318,24323,24329,24413,24412,24331,
349	24337,24342,24361,24365,24376,24385,24392,24396,24398,24367,24401,24406,24407,
350	24409,24417,24429,24435,24439,24451,24450,24447,24458,
351	24456,24465,24455,24478,24473,24472,24480,24488,24493,24508,24534,24571,24548,
352	24568,24561,24541,24755,24575,24609,24672,24601,24592,24617,24590,24625,24603,
353	24597,24619,24614,24591,24634,24666,24641,24682,24695,24671,24650,24646,24653,
354	24675,24643,24676,24642,24684,24683,24665,24705,24717,24807,24707,24730,24708,
355	24731,24726,24727,24722,24743,24715,24801,24760,24800,24787,24756,24560,24765,
356	24774,24757,24792,24909,24853,24838,24822,24823,24832,24820,24826,24835,24865,
357	24827,24817,24845,24846,24903,24894,24872,24871,24906,24895,24892,24876,24884,
358	24893,24898,24900,24947,24951,24920,24921,24922,24939,24948,24943,24933,24945,
359	24927,24925,24915,24949,24985,24982,24967,25004,24980,24986,24970,24977,25003,
360	25006,25036,25034,25033,25079,25032,25027,25030,25018,25035,32633,25037,25062,
361	25059,25078,25082,25076,25087,25085,25084,25086,25088,25096,25097,25101,25100,
362	25108,25115,25118,25121,25130,25134,25136,25138,25139,25153,25166,25182,25187,
363	25179,25184,25192,25212,25218,25225,25214,25234,25235,25238,25300,25219,25236,
364	25303,25297,25275,25295,25343,25286,25812,25288,25308,25292,25290,25282,25287,
365	25243,25289,25356,25326,25329,25383,25346,25352,25327,25333,25424,25406,25421,
366	25628,25423,25494,25486,25472,25515,25462,25507,25487,25481,25503,25525,25451,
367	25449,25534,25577,25536,25542,25571,25545,25554,25590,25540,25622,25652,25606,
368	25619,25638,25654,25885,25623,25640,25615,25703,25711,25718,25678,25898,25749,
369	25747,25765,25769,25736,25788,25818,25810,25797,25799,25787,25816,25794,25841,
370	25831,33289,25824,25825,25260,25827,25839,25900,25846,
371	25844,25842,25850,25856,25853,25880,25884,25861,25892,25891,25899,25908,25909,
372	25911,25910,25912,30027,25928,25942,25941,25933,25944,25950,25949,25970,25976,
373	25986,25987,35722,26011,26015,26027,26039,26051,26054,26049,26052,26060,26066,
374	26075,26073,26080,26081,26097,26482,26122,26115,26107,26483,26165,26166,26164,
375	26140,26191,26180,26185,26177,26206,26205,26212,26215,26216,26207,26210,26224,
376	26243,26248,26254,26249,26244,26264,26269,26305,26297,26313,26302,26300,26308,
377	26296,26326,26330,26336,26175,26342,26345,26352,26357,26359,26383,26390,26398,
378	26406,26407,38712,26414,26431,26422,26433,26424,26423,26438,26462,26464,26457,
379	26467,26468,26505,26480,26537,26492,26474,26508,26507,26534,26529,26501,26551,
380	26607,26548,26604,26547,26601,26552,26596,26590,26589,26594,26606,26553,26574,
381	26566,26599,27292,26654,26694,26665,26688,26701,26674,26702,26803,26667,26713,
382	26723,26743,26751,26783,26767,26797,26772,26781,26779,26755,27310,26809,26740,
383	26805,26784,26810,26895,26765,26750,26881,26826,26888,26840,26914,26918,26849,
384	26892,26829,26836,26855,26837,26934,26898,26884,26839,26851,26917,26873,26848,
385	26863,26920,26922,26906,26915,26913,26822,27001,26999,26972,27000,26987,26964,
386	27006,26990,26937,26996,26941,26969,26928,26977,26974,26973,27009,26986,27058,
387	27054,27088,27071,27073,27091,27070,27086,23528,27082,27101,27067,27075,27047,
388	27182,27025,27040,27036,27029,27060,27102,27112,27138,27163,27135,27402,27129,
389	27122,27111,27141,27057,27166,27117,27156,27115,27146,27154,27329,27171,27155,
390	27204,27148,27250,27190,27256,27207,27234,27225,27238,
391	27208,27192,27170,27280,27277,27296,27268,27298,27299,27287,34327,27323,27331,
392	27330,27320,27315,27308,27358,27345,27359,27306,27354,27370,27387,27397,34326,
393	27386,27410,27414,39729,27423,27448,27447,30428,27449,39150,27463,27459,27465,
394	27472,27481,27476,27483,27487,27489,27512,27513,27519,27520,27524,27523,27533,
395	27544,27541,27550,27556,27562,27563,27567,27570,27569,27571,27575,27580,27590,
396	27595,27603,27615,27628,27627,27635,27631,40638,27656,27667,27668,27675,27684,
397	27683,27742,27733,27746,27754,27778,27789,27802,27777,27803,27774,27752,27763,
398	27794,27792,27844,27889,27859,27837,27863,27845,27869,27822,27825,27838,27834,
399	27867,27887,27865,27882,27935,34893,27958,27947,27965,27960,27929,27957,27955,
400	27922,27916,28003,28051,28004,27994,28025,27993,28046,28053,28644,28037,28153,
401	28181,28170,28085,28103,28134,28088,28102,28140,28126,28108,28136,28114,28101,
402	28154,28121,28132,28117,28138,28142,28205,28270,28206,28185,28274,28255,28222,
403	28195,28267,28203,28278,28237,28191,28227,28218,28238,28196,28415,28189,28216,
404	28290,28330,28312,28361,28343,28371,28349,28335,28356,28338,28372,28373,28303,
405	28325,28354,28319,28481,28433,28748,28396,28408,28414,28479,28402,28465,28399,
406	28466,28364,28478,28435,28407,28550,28538,28536,28545,28544,28527,28507,28659,
407	28525,28546,28540,28504,28558,28561,28610,28518,28595,28579,28577,28580,28601,
408	28614,28586,28639,28629,28652,28628,28632,28657,28654,28635,28681,28683,28666,
409	28689,28673,28687,28670,28699,28698,28532,28701,28696,28703,28720,28734,28722,
410	28753,28771,28825,28818,28847,28913,28844,28856,28851,
411	28846,28895,28875,28893,28889,28937,28925,28956,28953,29029,29013,29064,29030,
412	29026,29004,29014,29036,29071,29179,29060,29077,29096,29100,29143,29113,29118,
413	29138,29129,29140,29134,29152,29164,29159,29173,29180,29177,29183,29197,29200,
414	29211,29224,29229,29228,29232,29234,29243,29244,29247,29248,29254,29259,29272,
415	29300,29310,29314,29313,29319,29330,29334,29346,29351,29369,29362,29379,29382,
416	29380,29390,29394,29410,29408,29409,29433,29431,20495,29463,29450,29468,29462,
417	29469,29492,29487,29481,29477,29502,29518,29519,40664,29527,29546,29544,29552,
418	29560,29557,29563,29562,29640,29619,29646,29627,29632,29669,29678,29662,29858,
419	29701,29807,29733,29688,29746,29754,29781,29759,29791,29785,29761,29788,29801,
420	29808,29795,29802,29814,29822,29835,29854,29863,29898,29903,29908,29681,29920,
421	29923,29927,29929,29934,29938,29936,29937,29944,29943,29956,29955,29957,29964,
422	29966,29965,29973,29971,29982,29990,29996,30012,30020,30029,30026,30025,30043,
423	30022,30042,30057,30052,30055,30059,30061,30072,30070,30086,30087,30068,30090,
424	30089,30082,30100,30106,30109,30117,30115,30146,30131,30147,30133,30141,30136,
425	30140,30129,30157,30154,30162,30169,30179,30174,30206,30207,30204,30209,30192,
426	30202,30194,30195,30219,30221,30217,30239,30247,30240,30241,30242,30244,30260,
427	30256,30267,30279,30280,30278,30300,30296,30305,30306,30312,30313,30314,30311,
428	30316,30320,30322,30326,30328,30332,30336,30339,30344,30347,30350,30358,30355,
429	30361,30362,30384,30388,30392,30393,30394,30402,30413,30422,30418,30430,30433,
430	30437,30439,30442,34351,30459,30472,30471,30468,30505,
431	30500,30494,30501,30502,30491,30519,30520,30535,30554,30568,30571,30555,30565,
432	30591,30590,30585,30606,30603,30609,30624,30622,30640,30646,30649,30655,30652,
433	30653,30651,30663,30669,30679,30682,30684,30691,30702,30716,30732,30738,31014,
434	30752,31018,30789,30862,30836,30854,30844,30874,30860,30883,30901,30890,30895,
435	30929,30918,30923,30932,30910,30908,30917,30922,30956,30951,30938,30973,30964,
436	30983,30994,30993,31001,31020,31019,31040,31072,31063,31071,31066,31061,31059,
437	31098,31103,31114,31133,31143,40779,31146,31150,31155,31161,31162,31177,31189,
438	31207,31212,31201,31203,31240,31245,31256,31257,31264,31263,31104,31281,31291,
439	31294,31287,31299,31319,31305,31329,31330,31337,40861,31344,31353,31357,31368,
440	31383,31381,31384,31382,31401,31432,31408,31414,31429,31428,31423,36995,31431,
441	31434,31437,31439,31445,31443,31449,31450,31453,31457,31458,31462,31469,31472,
442	31490,31503,31498,31494,31539,31512,31513,31518,31541,31528,31542,31568,31610,
443	31492,31565,31499,31564,31557,31605,31589,31604,31591,31600,31601,31596,31598,
444	31645,31640,31647,31629,31644,31642,31627,31634,31631,31581,31641,31691,31681,
445	31692,31695,31668,31686,31709,31721,31761,31764,31718,31717,31840,31744,31751,
446	31763,31731,31735,31767,31757,31734,31779,31783,31786,31775,31799,31787,31805,
447	31820,31811,31828,31823,31808,31824,31832,31839,31844,31830,31845,31852,31861,
448	31875,31888,31908,31917,31906,31915,31905,31912,31923,31922,31921,31918,31929,
449	31933,31936,31941,31938,31960,31954,31964,31970,39739,31983,31986,31988,31990,
450	31994,32006,32002,32028,32021,32010,32069,32075,32046,
451	32050,32063,32053,32070,32115,32086,32078,32114,32104,32110,32079,32099,32147,
452	32137,32091,32143,32125,32155,32186,32174,32163,32181,32199,32189,32171,32317,
453	32162,32175,32220,32184,32159,32176,32216,32221,32228,32222,32251,32242,32225,
454	32261,32266,32291,32289,32274,32305,32287,32265,32267,32290,32326,32358,32315,
455	32309,32313,32323,32311,32306,32314,32359,32349,32342,32350,32345,32346,32377,
456	32362,32361,32380,32379,32387,32213,32381,36782,32383,32392,32393,32396,32402,
457	32400,32403,32404,32406,32398,32411,32412,32568,32570,32581,32588,32589,32590,
458	32592,32593,32597,32596,32600,32607,32608,32616,32617,32615,32632,32642,32646,
459	32643,32648,32647,32652,32660,32670,32669,32666,32675,32687,32690,32697,32686,
460	32694,32696,35697,32709,32710,32714,32725,32724,32737,32742,32745,32755,32761,
461	39132,32774,32772,32779,32786,32792,32793,32796,32801,32808,32831,32827,32842,
462	32838,32850,32856,32858,32863,32866,32872,32883,32882,32880,32886,32889,32893,
463	32895,32900,32902,32901,32923,32915,32922,32941,20880,32940,32987,32997,32985,
464	32989,32964,32986,32982,33033,33007,33009,33051,33065,33059,33071,33099,38539,
465	33094,33086,33107,33105,33020,33137,33134,33125,33126,33140,33155,33160,33162,
466	33152,33154,33184,33173,33188,33187,33119,33171,33193,33200,33205,33214,33208,
467	33213,33216,33218,33210,33225,33229,33233,33241,33240,33224,33242,33247,33248,
468	33255,33274,33275,33278,33281,33282,33285,33287,33290,33293,33296,33302,33321,
469	33323,33336,33331,33344,33369,33368,33373,33370,33375,33380,33378,33384,33386,
470	33387,33326,33393,33399,33400,33406,33421,33426,33451,
471	33439,33467,33452,33505,33507,33503,33490,33524,33523,33530,33683,33539,33531,
472	33529,33502,33542,33500,33545,33497,33589,33588,33558,33586,33585,33600,33593,
473	33616,33605,33583,33579,33559,33560,33669,33690,33706,33695,33698,33686,33571,
474	33678,33671,33674,33660,33717,33651,33653,33696,33673,33704,33780,33811,33771,
475	33742,33789,33795,33752,33803,33729,33783,33799,33760,33778,33805,33826,33824,
476	33725,33848,34054,33787,33901,33834,33852,34138,33924,33911,33899,33965,33902,
477	33922,33897,33862,33836,33903,33913,33845,33994,33890,33977,33983,33951,34009,
478	33997,33979,34010,34000,33985,33990,34006,33953,34081,34047,34036,34071,34072,
479	34092,34079,34069,34068,34044,34112,34147,34136,34120,34113,34306,34123,34133,
480	34176,34212,34184,34193,34186,34216,34157,34196,34203,34282,34183,34204,34167,
481	34174,34192,34249,34234,34255,34233,34256,34261,34269,34277,34268,34297,34314,
482	34323,34315,34302,34298,34310,34338,34330,34352,34367,34381,20053,34388,34399,
483	34407,34417,34451,34467,34473,34474,34443,34444,34486,34479,34500,34502,34480,
484	34505,34851,34475,34516,34526,34537,34540,34527,34523,34543,34578,34566,34568,
485	34560,34563,34555,34577,34569,34573,34553,34570,34612,34623,34615,34619,34597,
486	34601,34586,34656,34655,34680,34636,34638,34676,34647,34664,34670,34649,34643,
487	34659,34666,34821,34722,34719,34690,34735,34763,34749,34752,34768,38614,34731,
488	34756,34739,34759,34758,34747,34799,34802,34784,34831,34829,34814,34806,34807,
489	34830,34770,34833,34838,34837,34850,34849,34865,34870,34873,34855,34875,34884,
490	34882,34898,34905,34910,34914,34923,34945,34942,34974,
491	34933,34941,34997,34930,34946,34967,34962,34990,34969,34978,34957,34980,34992,
492	35007,34993,35011,35012,35028,35032,35033,35037,35065,35074,35068,35060,35048,
493	35058,35076,35084,35082,35091,35139,35102,35109,35114,35115,35137,35140,35131,
494	35126,35128,35148,35101,35168,35166,35174,35172,35181,35178,35183,35188,35191,
495	35198,35203,35208,35210,35219,35224,35233,35241,35238,35244,35247,35250,35258,
496	35261,35263,35264,35290,35292,35293,35303,35316,35320,35331,35350,35344,35340,
497	35355,35357,35365,35382,35393,35419,35410,35398,35400,35452,35437,35436,35426,
498	35461,35458,35460,35496,35489,35473,35493,35494,35482,35491,35524,35533,35522,
499	35546,35563,35571,35559,35556,35569,35604,35552,35554,35575,35550,35547,35596,
500	35591,35610,35553,35606,35600,35607,35616,35635,38827,35622,35627,35646,35624,
501	35649,35660,35663,35662,35657,35670,35675,35674,35691,35679,35692,35695,35700,
502	35709,35712,35724,35726,35730,35731,35734,35737,35738,35898,35905,35903,35912,
503	35916,35918,35920,35925,35938,35948,35960,35962,35970,35977,35973,35978,35981,
504	35982,35988,35964,35992,25117,36013,36010,36029,36018,36019,36014,36022,36040,
505	36033,36068,36067,36058,36093,36090,36091,36100,36101,36106,36103,36111,36109,
506	36112,40782,36115,36045,36116,36118,36199,36205,36209,36211,36225,36249,36290,
507	36286,36282,36303,36314,36310,36300,36315,36299,36330,36331,36319,36323,36348,
508	36360,36361,36351,36381,36382,36368,36383,36418,36405,36400,36404,36426,36423,
509	36425,36428,36432,36424,36441,36452,36448,36394,36451,36437,36470,36466,36476,
510	36481,36487,36485,36484,36491,36490,36499,36497,36500,
511	36505,36522,36513,36524,36528,36550,36529,36542,36549,36552,36555,36571,36579,
512	36604,36603,36587,36606,36618,36613,36629,36626,36633,36627,36636,36639,36635,
513	36620,36646,36659,36667,36665,36677,36674,36670,36684,36681,36678,36686,36695,
514	36700,36706,36707,36708,36764,36767,36771,36781,36783,36791,36826,36837,36834,
515	36842,36847,36999,36852,36869,36857,36858,36881,36885,36897,36877,36894,36886,
516	36875,36903,36918,36917,36921,36856,36943,36944,36945,36946,36878,36937,36926,
517	36950,36952,36958,36968,36975,36982,38568,36978,36994,36989,36993,36992,37002,
518	37001,37007,37032,37039,37041,37045,37090,37092,25160,37083,37122,37138,37145,
519	37170,37168,37194,37206,37208,37219,37221,37225,37235,37234,37259,37257,37250,
520	37282,37291,37295,37290,37301,37300,37306,37312,37313,37321,37323,37328,37334,
521	37343,37345,37339,37372,37365,37366,37406,37375,37396,37420,37397,37393,37470,
522	37463,37445,37449,37476,37448,37525,37439,37451,37456,37532,37526,37523,37531,
523	37466,37583,37561,37559,37609,37647,37626,37700,37678,37657,37666,37658,37667,
524	37690,37685,37691,37724,37728,37756,37742,37718,37808,37804,37805,37780,37817,
525	37846,37847,37864,37861,37848,37827,37853,37840,37832,37860,37914,37908,37907,
526	37891,37895,37904,37942,37931,37941,37921,37946,37953,37970,37956,37979,37984,
527	37986,37982,37994,37417,38000,38005,38007,38013,37978,38012,38014,38017,38015,
528	38274,38279,38282,38292,38294,38296,38297,38304,38312,38311,38317,38332,38331,
529	38329,38334,38346,28662,38339,38349,38348,38357,38356,38358,38364,38369,38373,
530	38370,38433,38440,38446,38447,38466,38476,38479,38475,
531	38519,38492,38494,38493,38495,38502,38514,38508,38541,38552,38549,38551,38570,
532	38567,38577,38578,38576,38580,38582,38584,38585,38606,38603,38601,38605,35149,
533	38620,38669,38613,38649,38660,38662,38664,38675,38670,38673,38671,38678,38681,
534	38692,38698,38704,38713,38717,38718,38724,38726,38728,38722,38729,38748,38752,
535	38756,38758,38760,21202,38763,38769,38777,38789,38780,38785,38778,38790,38795,
536	38799,38800,38812,38824,38822,38819,38835,38836,38851,38854,38856,38859,38876,
537	38893,40783,38898,31455,38902,38901,38927,38924,38968,38948,38945,38967,38973,
538	38982,38991,38987,39019,39023,39024,39025,39028,39027,39082,39087,39089,39094,
539	39108,39107,39110,39145,39147,39171,39177,39186,39188,39192,39201,39197,39198,
540	39204,39200,39212,39214,39229,39230,39234,39241,39237,39248,39243,39249,39250,
541	39244,39253,39319,39320,39333,39341,39342,39356,39391,39387,39389,39384,39377,
542	39405,39406,39409,39410,39419,39416,39425,39439,39429,39394,39449,39467,39479,
543	39493,39490,39488,39491,39486,39509,39501,39515,39511,39519,39522,39525,39524,
544	39529,39531,39530,39597,39600,39612,39616,39631,39633,39635,39636,39646,39647,
545	39650,39651,39654,39663,39659,39662,39668,39665,39671,39675,39686,39704,39706,
546	39711,39714,39715,39717,39719,39720,39721,39722,39726,39727,39730,39748,39747,
547	39759,39757,39758,39761,39768,39796,39827,39811,39825,39830,39831,39839,39840,
548	39848,39860,39872,39882,39865,39878,39887,39889,39890,39907,39906,39908,39892,
549	39905,39994,39922,39921,39920,39957,39956,39945,39955,39948,39942,39944,39954,
550	39946,39940,39982,39963,39973,39972,39969,39984,40007,
551	39986,40006,39998,40026,40032,40039,40054,40056,40167,40172,40176,40201,40200,
552	40171,40195,40198,40234,40230,40367,40227,40223,40260,40213,40210,40257,40255,
553	40254,40262,40264,40285,40286,40292,40273,40272,40281,40306,40329,40327,40363,
554	40303,40314,40346,40356,40361,40370,40388,40385,40379,40376,40378,40390,40399,
555	40386,40409,40403,40440,40422,40429,40431,40445,40474,40475,40478,40565,40569,
556	40573,40577,40584,40587,40588,40594,40597,40593,40605,40613,40617,40632,40618,
557	40621,38753,40652,40654,40655,40656,40660,40668,40670,40669,40672,40677,40680,
558	40687,40692,40694,40695,40697,40699,40700,40701,40711,40712,30391,40725,40737,
559	40748,40766,40778,40786,40788,40803,40799,40800,40801,40806,40807,40812,40810,
560	40823,40818,40822,40853,40860,40864,22575,27079,36953,29796,20956,29081,0,0,0,
561	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
562	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
563	0,0,0,0,0,0,0,

lib/libc/wasi/libc-top-half/musl/src/locale/ksc.h deleted-650

...	@@ -1,650 +0,0 @@
1	12288,12289,12290,183,8229,8230,168,12291,173,8213,8741,65340,8764,8216,8217,
2	8220,8221,12308,12309,12296,12297,12298,12299,12300,12301,12302,12303,12304,
3	12305,177,215,247,8800,8804,8805,8734,8756,176,8242,8243,8451,8491,65504,
4	65505,65509,9794,9792,8736,8869,8978,8706,8711,8801,8786,167,8251,9734,9733,
5	9675,9679,9678,9671,9670,9633,9632,9651,9650,9661,9660,8594,8592,8593,8595,
6	8596,12307,8810,8811,8730,8765,8733,8757,8747,8748,8712,8715,8838,8839,8834,
7	8835,8746,8745,8743,8744,65506,8658,8660,8704,8707,180,65374,711,728,733,730,
8	729,184,731,161,191,720,8750,8721,8719,164,8457,8240,9665,9664,9655,9654,9828,
9	9824,9825,9829,9831,9827,8857,9672,9635,9680,9681,9618,9636,9637,9640,9639,
10	9638,9641,9832,9743,9742,9756,9758,182,8224,8225,8597,8599,8601,8598,8600,
11	9837,9833,9834,9836,12927,12828,8470,13255,8482,13250,13272,8481,8364,174,0,0,
12	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,65281,65282,65283,65284,65285,65286,
13	65287,65288,65289,65290,65291,65292,65293,65294,65295,65296,65297,65298,65299,
14	65300,65301,65302,65303,65304,65305,65306,65307,65308,65309,65310,65311,65312,
15	65313,65314,65315,65316,65317,65318,65319,65320,65321,65322,65323,65324,65325,
16	65326,65327,65328,65329,65330,65331,65332,65333,65334,65335,65336,65337,65338,
17	65339,65510,65341,65342,65343,65344,65345,65346,65347,
18	65348,65349,65350,65351,65352,65353,65354,65355,65356,65357,65358,65359,65360,
19	65361,65362,65363,65364,65365,65366,65367,65368,65369,65370,65371,65372,65373,
20	65507,12593,12594,12595,12596,12597,12598,12599,12600,12601,12602,12603,12604,
21	12605,12606,12607,12608,12609,12610,12611,12612,12613,12614,12615,12616,12617,
22	12618,12619,12620,12621,12622,12623,12624,12625,12626,12627,12628,12629,12630,
23	12631,12632,12633,12634,12635,12636,12637,12638,12639,12640,12641,12642,12643,
24	12644,12645,12646,12647,12648,12649,12650,12651,12652,12653,12654,12655,12656,
25	12657,12658,12659,12660,12661,12662,12663,12664,12665,12666,12667,12668,12669,
26	12670,12671,12672,12673,12674,12675,12676,12677,12678,12679,12680,12681,12682,
27	12683,12684,12685,12686,8560,8561,8562,8563,8564,8565,8566,8567,8568,8569,0,0,
28	0,0,0,8544,8545,8546,8547,8548,8549,8550,8551,8552,8553,0,0,0,0,0,0,0,913,914,
29	915,916,917,918,919,920,921,922,923,924,925,926,927,928,929,931,932,933,934,
30	935,936,937,0,0,0,0,0,0,0,0,945,946,947,948,949,950,951,952,953,954,955,956,
31	957,958,959,960,961,963,964,965,966,967,968,969,0,0,0,0,0,0,9472,9474,9484,
32	9488,9496,9492,9500,9516,9508,9524,9532,9473,9475,9487,9491,9499,9495,9507,
33	9523,9515,9531,9547,9504,9519,9512,9527,9535,9501,9520,9509,9528,9538,9490,
34	9489,9498,9497,9494,9493,9486,9485,9502,
35	9503,9505,9506,9510,9511,9513,9514,9517,9518,9521,9522,9525,9526,9529,9530,
36	9533,9534,9536,9537,9539,9540,9541,9542,9543,9544,9545,9546,0,0,0,0,0,0,0,0,0,
37	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,13205,13206,13207,8467,13208,13252,13219,
38	13220,13221,13222,13209,13210,13211,13212,13213,13214,13215,13216,13217,13218,
39	13258,13197,13198,13199,13263,13192,13193,13256,13223,13224,13232,13233,13234,
40	13235,13236,13237,13238,13239,13240,13241,13184,13185,13186,13187,13188,13242,
41	13243,13244,13245,13246,13247,13200,13201,13202,13203,13204,8486,13248,13249,
42	13194,13195,13196,13270,13253,13229,13230,13231,13275,13225,13226,13227,13228,
43	13277,13264,13267,13251,13257,13276,13254,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,198,
44	208,170,294,0,306,0,319,321,216,338,186,222,358,330,0,12896,12897,12898,12899,
45	12900,12901,12902,12903,12904,12905,12906,12907,12908,12909,12910,12911,12912,
46	12913,12914,12915,12916,12917,12918,12919,12920,12921,12922,12923,9424,9425,
47	9426,9427,9428,9429,9430,9431,9432,9433,9434,9435,9436,9437,9438,9439,9440,
48	9441,9442,9443,9444,9445,9446,9447,9448,9449,9312,9313,9314,9315,9316,9317,
49	9318,9319,9320,9321,9322,9323,9324,9325,9326,189,8531,8532,188,190,8539,8540,
50	8541,8542,230,273,240,295,305,307,312,320,322,248,339,223,254,359,331,
51	329,12800,12801,12802,12803,12804,12805,12806,12807,12808,12809,12810,12811,
52	12812,12813,12814,12815,12816,12817,12818,12819,12820,12821,12822,12823,12824,
53	12825,12826,12827,9372,9373,9374,9375,9376,9377,9378,9379,9380,9381,9382,9383,
54	9384,9385,9386,9387,9388,9389,9390,9391,9392,9393,9394,9395,9396,9397,9332,
55	9333,9334,9335,9336,9337,9338,9339,9340,9341,9342,9343,9344,9345,9346,185,178,
56	179,8308,8319,8321,8322,8323,8324,12353,12354,12355,12356,12357,12358,12359,
57	12360,12361,12362,12363,12364,12365,12366,12367,12368,12369,12370,12371,12372,
58	12373,12374,12375,12376,12377,12378,12379,12380,12381,12382,12383,12384,12385,
59	12386,12387,12388,12389,12390,12391,12392,12393,12394,12395,12396,12397,12398,
60	12399,12400,12401,12402,12403,12404,12405,12406,12407,12408,12409,12410,12411,
61	12412,12413,12414,12415,12416,12417,12418,12419,12420,12421,12422,12423,12424,
62	12425,12426,12427,12428,12429,12430,12431,12432,12433,12434,12435,0,0,0,0,0,0,
63	0,0,0,0,0,12449,12450,12451,12452,12453,12454,12455,12456,12457,12458,12459,
64	12460,12461,12462,12463,12464,12465,12466,12467,12468,12469,12470,12471,12472,
65	12473,12474,12475,12476,12477,12478,12479,12480,12481,12482,12483,12484,12485,
66	12486,12487,12488,12489,12490,12491,12492,12493,12494,12495,12496,12497,12498,
67	12499,12500,12501,12502,12503,12504,12505,12506,12507,12508,12509,12510,12511,
68	12512,12513,12514,12515,12516,12517,12518,12519,12520,12521,12522,12523,12524,
69	12525,12526,12527,12528,12529,12530,12531,
70	12532,12533,12534,0,0,0,0,0,0,0,0,1040,1041,1042,1043,1044,1045,1025,1046,
71	1047,1048,1049,1050,1051,1052,1053,1054,1055,1056,1057,1058,1059,1060,1061,
72	1062,1063,1064,1065,1066,1067,1068,1069,1070,1071,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
73	0,1072,1073,1074,1075,1076,1077,1105,1078,1079,1080,1081,1082,1083,1084,1085,
74	1086,1087,1088,1089,1090,1091,1092,1093,1094,1095,1096,1097,1098,1099,1100,
75	1101,1102,1103,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
76	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
77	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
78	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
79	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
80	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
81	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
82	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
83	0,0,0,0,0,0,0,0,0,0,0,0,0,0,44032,44033,44036,44039,44040,44041,44042,44048,
84	44049,44050,44051,44052,44053,44054,44055,44057,44058,44059,44060,44061,44064,
85	44068,44076,44077,44079,44080,44081,44088,44089,44092,44096,44107,44109,44116,
86	44120,44124,44144,44145,44148,44151,44152,44154,44160,44161,44163,44164,44165,
87	44166,44169,44170,44171,44172,44176,44180,44188,44189,44191,44192,44193,44200,
88	44201,44202,44204,44207,44208,44216,44217,44219,44220,44221,44225,44228,44232,
89	44236,44245,44247,44256,44257,44260,44263,44264,44266,44268,44271,44272,44273,
90	44275,44277,44278,44284,44285,44288,44292,44294,44300,44301,44303,44305,44312,
91	44316,44320,44329,44332,44333,44340,44341,44344,44348,44356,44357,44359,44361,
92	44368,44372,44376,44385,44387,44396,44397,44400,44403,44404,44405,44406,44411,
93	44412,44413,44415,44417,44418,44424,44425,44428,44432,44444,44445,44452,44471,
94	44480,44481,44484,44488,44496,44497,44499,44508,44512,44516,44536,44537,44540,
95	44543,44544,44545,44552,44553,44555,44557,44564,44592,44593,44596,44599,44600,
96	44602,44608,44609,44611,44613,44614,44618,44620,44621,44622,44624,44628,44630,
97	44636,44637,44639,44640,44641,44645,44648,44649,44652,44656,44664,44665,44667,
98	44668,44669,44676,44677,44684,44732,44733,44734,44736,44740,44748,44749,44751,
99	44752,44753,44760,44761,44764,44776,44779,44781,44788,44792,44796,44807,44808,
100	44813,44816,44844,44845,44848,44850,44852,44860,44861,44863,44865,44866,44867,
101	44872,44873,44880,44892,44893,44900,44901,44921,44928,44932,44936,44944,44945,
102	44949,44956,44984,44985,44988,44992,44999,45000,45001,45003,45005,45006,45012,
103	45020,45032,45033,45040,45041,45044,45048,45056,45057,45060,45068,45072,45076,
104	45084,45085,45096,45124,45125,45128,45130,45132,45134,45139,45140,45141,45143,
105	45145,45149,45180,45181,45184,45188,45196,45197,45199,45201,45208,45209,45210,
106	45212,45215,45216,45217,45218,45224,45225,45227,45228,45229,45230,45231,45233,
107	45235,45236,45237,45240,45244,45252,45253,45255,45256,45257,45264,45265,45268,
108	45272,45280,45285,45320,45321,45323,45324,45328,45330,45331,45336,45337,45339,
109	45340,45341,45347,45348,45349,45352,45356,45364,45365,45367,45368,45369,45376,
110	45377,45380,45384,45392,45393,45396,45397,45400,45404,45408,45432,45433,45436,
111	45440,45442,45448,45449,45451,45453,45458,45459,45460,45464,45468,45480,45516,
112	45520,45524,45532,45533,45535,45544,45545,45548,45552,
113	45561,45563,45565,45572,45573,45576,45579,45580,45588,45589,45591,45593,45600,
114	45620,45628,45656,45660,45664,45672,45673,45684,45685,45692,45700,45701,45705,
115	45712,45713,45716,45720,45721,45722,45728,45729,45731,45733,45734,45738,45740,
116	45744,45748,45768,45769,45772,45776,45778,45784,45785,45787,45789,45794,45796,
117	45797,45798,45800,45803,45804,45805,45806,45807,45811,45812,45813,45815,45816,
118	45817,45818,45819,45823,45824,45825,45828,45832,45840,45841,45843,45844,45845,
119	45852,45908,45909,45910,45912,45915,45916,45918,45919,45924,45925,45927,45929,
120	45931,45934,45936,45937,45940,45944,45952,45953,45955,45956,45957,45964,45968,
121	45972,45984,45985,45992,45996,46020,46021,46024,46027,46028,46030,46032,46036,
122	46037,46039,46041,46043,46045,46048,46052,46056,46076,46096,46104,46108,46112,
123	46120,46121,46123,46132,46160,46161,46164,46168,46176,46177,46179,46181,46188,
124	46208,46216,46237,46244,46248,46252,46261,46263,46265,46272,46276,46280,46288,
125	46293,46300,46301,46304,46307,46308,46310,46316,46317,46319,46321,46328,46356,
126	46357,46360,46363,46364,46372,46373,46375,46376,46377,46378,46384,46385,46388,
127	46392,46400,46401,46403,46404,46405,46411,46412,46413,46416,46420,46428,46429,
128	46431,46432,46433,46496,46497,46500,46504,46506,46507,46512,46513,46515,46516,
129	46517,46523,46524,46525,46528,46532,46540,46541,46543,46544,46545,46552,46572,
130	46608,46609,46612,46616,46629,46636,46644,46664,46692,46696,46748,46749,46752,
131	46756,46763,46764,46769,46804,46832,46836,46840,46848,46849,46853,46888,46889,
132	46892,46895,46896,46904,46905,46907,46916,46920,46924,
133	46932,46933,46944,46948,46952,46960,46961,46963,46965,46972,46973,46976,46980,
134	46988,46989,46991,46992,46993,46994,46998,46999,47000,47001,47004,47008,47016,
135	47017,47019,47020,47021,47028,47029,47032,47047,47049,47084,47085,47088,47092,
136	47100,47101,47103,47104,47105,47111,47112,47113,47116,47120,47128,47129,47131,
137	47133,47140,47141,47144,47148,47156,47157,47159,47160,47161,47168,47172,47185,
138	47187,47196,47197,47200,47204,47212,47213,47215,47217,47224,47228,47245,47272,
139	47280,47284,47288,47296,47297,47299,47301,47308,47312,47316,47325,47327,47329,
140	47336,47337,47340,47344,47352,47353,47355,47357,47364,47384,47392,47420,47421,
141	47424,47428,47436,47439,47441,47448,47449,47452,47456,47464,47465,47467,47469,
142	47476,47477,47480,47484,47492,47493,47495,47497,47498,47501,47502,47532,47533,
143	47536,47540,47548,47549,47551,47553,47560,47561,47564,47566,47567,47568,47569,
144	47570,47576,47577,47579,47581,47582,47585,47587,47588,47589,47592,47596,47604,
145	47605,47607,47608,47609,47610,47616,47617,47624,47637,47672,47673,47676,47680,
146	47682,47688,47689,47691,47693,47694,47699,47700,47701,47704,47708,47716,47717,
147	47719,47720,47721,47728,47729,47732,47736,47747,47748,47749,47751,47756,47784,
148	47785,47787,47788,47792,47794,47800,47801,47803,47805,47812,47816,47832,47833,
149	47868,47872,47876,47885,47887,47889,47896,47900,47904,47913,47915,47924,47925,
150	47926,47928,47931,47932,47933,47934,47940,47941,47943,47945,47949,47951,47952,
151	47956,47960,47969,47971,47980,48008,48012,48016,48036,48040,48044,48052,48055,
152	48064,48068,48072,48080,48083,48120,48121,48124,48127,
153	48128,48130,48136,48137,48139,48140,48141,48143,48145,48148,48149,48150,48151,
154	48152,48155,48156,48157,48158,48159,48164,48165,48167,48169,48173,48176,48177,
155	48180,48184,48192,48193,48195,48196,48197,48201,48204,48205,48208,48221,48260,
156	48261,48264,48267,48268,48270,48276,48277,48279,48281,48282,48288,48289,48292,
157	48295,48296,48304,48305,48307,48308,48309,48316,48317,48320,48324,48333,48335,
158	48336,48337,48341,48344,48348,48372,48373,48374,48376,48380,48388,48389,48391,
159	48393,48400,48404,48420,48428,48448,48456,48457,48460,48464,48472,48473,48484,
160	48488,48512,48513,48516,48519,48520,48521,48522,48528,48529,48531,48533,48537,
161	48538,48540,48548,48560,48568,48596,48597,48600,48604,48617,48624,48628,48632,
162	48640,48643,48645,48652,48653,48656,48660,48668,48669,48671,48708,48709,48712,
163	48716,48718,48724,48725,48727,48729,48730,48731,48736,48737,48740,48744,48746,
164	48752,48753,48755,48756,48757,48763,48764,48765,48768,48772,48780,48781,48783,
165	48784,48785,48792,48793,48808,48848,48849,48852,48855,48856,48864,48867,48868,
166	48869,48876,48897,48904,48905,48920,48921,48923,48924,48925,48960,48961,48964,
167	48968,48976,48977,48981,49044,49072,49093,49100,49101,49104,49108,49116,49119,
168	49121,49212,49233,49240,49244,49248,49256,49257,49296,49297,49300,49304,49312,
169	49313,49315,49317,49324,49325,49327,49328,49331,49332,49333,49334,49340,49341,
170	49343,49344,49345,49349,49352,49353,49356,49360,49368,49369,49371,49372,49373,
171	49380,49381,49384,49388,49396,49397,49399,49401,49408,49412,49416,49424,49429,
172	49436,49437,49438,49439,49440,49443,49444,49446,49447,
173	49452,49453,49455,49456,49457,49462,49464,49465,49468,49472,49480,49481,49483,
174	49484,49485,49492,49493,49496,49500,49508,49509,49511,49512,49513,49520,49524,
175	49528,49541,49548,49549,49550,49552,49556,49558,49564,49565,49567,49569,49573,
176	49576,49577,49580,49584,49597,49604,49608,49612,49620,49623,49624,49632,49636,
177	49640,49648,49649,49651,49660,49661,49664,49668,49676,49677,49679,49681,49688,
178	49689,49692,49695,49696,49704,49705,49707,49709,49711,49713,49714,49716,49736,
179	49744,49745,49748,49752,49760,49765,49772,49773,49776,49780,49788,49789,49791,
180	49793,49800,49801,49808,49816,49819,49821,49828,49829,49832,49836,49837,49844,
181	49845,49847,49849,49884,49885,49888,49891,49892,49899,49900,49901,49903,49905,
182	49910,49912,49913,49915,49916,49920,49928,49929,49932,49933,49939,49940,49941,
183	49944,49948,49956,49957,49960,49961,49989,50024,50025,50028,50032,50034,50040,
184	50041,50044,50045,50052,50056,50060,50112,50136,50137,50140,50143,50144,50146,
185	50152,50153,50157,50164,50165,50168,50184,50192,50212,50220,50224,50228,50236,
186	50237,50248,50276,50277,50280,50284,50292,50293,50297,50304,50324,50332,50360,
187	50364,50409,50416,50417,50420,50424,50426,50431,50432,50433,50444,50448,50452,
188	50460,50472,50473,50476,50480,50488,50489,50491,50493,50500,50501,50504,50505,
189	50506,50508,50509,50510,50515,50516,50517,50519,50520,50521,50525,50526,50528,
190	50529,50532,50536,50544,50545,50547,50548,50549,50556,50557,50560,50564,50567,
191	50572,50573,50575,50577,50581,50583,50584,50588,50592,50601,50612,50613,50616,
192	50617,50619,50620,50621,50622,50628,50629,50630,50631,
193	50632,50633,50634,50636,50638,50640,50641,50644,50648,50656,50657,50659,50661,
194	50668,50669,50670,50672,50676,50678,50679,50684,50685,50686,50687,50688,50689,
195	50693,50694,50695,50696,50700,50704,50712,50713,50715,50716,50724,50725,50728,
196	50732,50733,50734,50736,50739,50740,50741,50743,50745,50747,50752,50753,50756,
197	50760,50768,50769,50771,50772,50773,50780,50781,50784,50796,50799,50801,50808,
198	50809,50812,50816,50824,50825,50827,50829,50836,50837,50840,50844,50852,50853,
199	50855,50857,50864,50865,50868,50872,50873,50874,50880,50881,50883,50885,50892,
200	50893,50896,50900,50908,50909,50912,50913,50920,50921,50924,50928,50936,50937,
201	50941,50948,50949,50952,50956,50964,50965,50967,50969,50976,50977,50980,50984,
202	50992,50993,50995,50997,50999,51004,51005,51008,51012,51018,51020,51021,51023,
203	51025,51026,51027,51028,51029,51030,51031,51032,51036,51040,51048,51051,51060,
204	51061,51064,51068,51069,51070,51075,51076,51077,51079,51080,51081,51082,51086,
205	51088,51089,51092,51094,51095,51096,51098,51104,51105,51107,51108,51109,51110,
206	51116,51117,51120,51124,51132,51133,51135,51136,51137,51144,51145,51148,51150,
207	51152,51160,51165,51172,51176,51180,51200,51201,51204,51208,51210,51216,51217,
208	51219,51221,51222,51228,51229,51232,51236,51244,51245,51247,51249,51256,51260,
209	51264,51272,51273,51276,51277,51284,51312,51313,51316,51320,51322,51328,51329,
210	51331,51333,51334,51335,51339,51340,51341,51348,51357,51359,51361,51368,51388,
211	51389,51396,51400,51404,51412,51413,51415,51417,51424,51425,51428,51445,51452,
212	51453,51456,51460,51461,51462,51468,51469,51471,51473,
213	51480,51500,51508,51536,51537,51540,51544,51552,51553,51555,51564,51568,51572,
214	51580,51592,51593,51596,51600,51608,51609,51611,51613,51648,51649,51652,51655,
215	51656,51658,51664,51665,51667,51669,51670,51673,51674,51676,51677,51680,51682,
216	51684,51687,51692,51693,51695,51696,51697,51704,51705,51708,51712,51720,51721,
217	51723,51724,51725,51732,51736,51753,51788,51789,51792,51796,51804,51805,51807,
218	51808,51809,51816,51837,51844,51864,51900,51901,51904,51908,51916,51917,51919,
219	51921,51923,51928,51929,51936,51948,51956,51976,51984,51988,51992,52000,52001,
220	52033,52040,52041,52044,52048,52056,52057,52061,52068,52088,52089,52124,52152,
221	52180,52196,52199,52201,52236,52237,52240,52244,52252,52253,52257,52258,52263,
222	52264,52265,52268,52270,52272,52280,52281,52283,52284,52285,52286,52292,52293,
223	52296,52300,52308,52309,52311,52312,52313,52320,52324,52326,52328,52336,52341,
224	52376,52377,52380,52384,52392,52393,52395,52396,52397,52404,52405,52408,52412,
225	52420,52421,52423,52425,52432,52436,52452,52460,52464,52481,52488,52489,52492,
226	52496,52504,52505,52507,52509,52516,52520,52524,52537,52572,52576,52580,52588,
227	52589,52591,52593,52600,52616,52628,52629,52632,52636,52644,52645,52647,52649,
228	52656,52676,52684,52688,52712,52716,52720,52728,52729,52731,52733,52740,52744,
229	52748,52756,52761,52768,52769,52772,52776,52784,52785,52787,52789,52824,52825,
230	52828,52831,52832,52833,52840,52841,52843,52845,52852,52853,52856,52860,52868,
231	52869,52871,52873,52880,52881,52884,52888,52896,52897,52899,52900,52901,52908,
232	52909,52929,52964,52965,52968,52971,52972,52980,52981,
233	52983,52984,52985,52992,52993,52996,53000,53008,53009,53011,53013,53020,53024,
234	53028,53036,53037,53039,53040,53041,53048,53076,53077,53080,53084,53092,53093,
235	53095,53097,53104,53105,53108,53112,53120,53125,53132,53153,53160,53168,53188,
236	53216,53217,53220,53224,53232,53233,53235,53237,53244,53248,53252,53265,53272,
237	53293,53300,53301,53304,53308,53316,53317,53319,53321,53328,53332,53336,53344,
238	53356,53357,53360,53364,53372,53373,53377,53412,53413,53416,53420,53428,53429,
239	53431,53433,53440,53441,53444,53448,53449,53456,53457,53459,53460,53461,53468,
240	53469,53472,53476,53484,53485,53487,53488,53489,53496,53517,53552,53553,53556,
241	53560,53562,53568,53569,53571,53572,53573,53580,53581,53584,53588,53596,53597,
242	53599,53601,53608,53612,53628,53636,53640,53664,53665,53668,53672,53680,53681,
243	53683,53685,53690,53692,53696,53720,53748,53752,53767,53769,53776,53804,53805,
244	53808,53812,53820,53821,53823,53825,53832,53852,53860,53888,53889,53892,53896,
245	53904,53905,53909,53916,53920,53924,53932,53937,53944,53945,53948,53951,53952,
246	53954,53960,53961,53963,53972,53976,53980,53988,53989,54000,54001,54004,54008,
247	54016,54017,54019,54021,54028,54029,54030,54032,54036,54038,54044,54045,54047,
248	54048,54049,54053,54056,54057,54060,54064,54072,54073,54075,54076,54077,54084,
249	54085,54140,54141,54144,54148,54156,54157,54159,54160,54161,54168,54169,54172,
250	54176,54184,54185,54187,54189,54196,54200,54204,54212,54213,54216,54217,54224,
251	54232,54241,54243,54252,54253,54256,54260,54268,54269,54271,54273,54280,54301,
252	54336,54340,54364,54368,54372,54381,54383,54392,54393,
253	54396,54399,54400,54402,54408,54409,54411,54413,54420,54441,54476,54480,54484,
254	54492,54495,54504,54508,54512,54520,54523,54525,54532,54536,54540,54548,54549,
255	54551,54588,54589,54592,54596,54604,54605,54607,54609,54616,54617,54620,54624,
256	54629,54632,54633,54635,54637,54644,54645,54648,54652,54660,54661,54663,54664,
257	54665,54672,54693,54728,54729,54732,54736,54738,54744,54745,54747,54749,54756,
258	54757,54760,54764,54772,54773,54775,54777,54784,54785,54788,54792,54800,54801,
259	54803,54804,54805,54812,54816,54820,54829,54840,54841,54844,54848,54853,54856,
260	54857,54859,54861,54865,54868,54869,54872,54876,54887,54889,54896,54897,54900,
261	54915,54917,54924,54925,54928,54932,54941,54943,54945,54952,54956,54960,54969,
262	54971,54980,54981,54984,54988,54993,54996,54999,55001,55008,55012,55016,55024,
263	55029,55036,55037,55040,55044,55057,55064,55065,55068,55072,55080,55081,55083,
264	55085,55092,55093,55096,55100,55108,55111,55113,55120,55121,55124,55126,55127,
265	55128,55129,55136,55137,55139,55141,55145,55148,55152,55156,55164,55165,55169,
266	55176,55177,55180,55184,55192,55193,55195,55197,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
267	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
268	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
269	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,20285,20339,20551,20729,21152,21487,21621,21733,
270	22025,23233,23478,26247,26550,26551,26607,27468,29634,30146,31292,33499,33540,
271	34903,34952,35382,36040,36303,36603,36838,39381,21051,21364,21508,24682,24932,
272	27580,29647,33050,35258,35282,38307,20355,21002,22718,22904,23014,24178,24185,
273	25031,25536,26438,26604,26751,28567,30286,30475,30965,31240,31487,31777,32925,
274	33390,33393,35563,38291,20075,21917,26359,28212,30883,31469,33883,35088,34638,
275	38824,21208,22350,22570,23884,24863,25022,25121,25954,26577,27204,28187,29976,
276	30131,30435,30640,32058,37039,37969,37970,40853,21283,23724,30002,32987,37440,
277	38296,21083,22536,23004,23713,23831,24247,24378,24394,24951,27743,30074,30086,
278	31968,32115,32177,32652,33108,33313,34193,35137,35611,37628,38477,40007,20171,
279	20215,20491,20977,22607,24887,24894,24936,25913,27114,28433,30117,30342,30422,
280	31623,33445,33995,63744,37799,38283,21888,23458,22353,63745,31923,32697,37301,
281	20520,21435,23621,24040,25298,25454,25818,25831,28192,28844,31067,36317,36382,
282	63746,36989,37445,37624,20094,20214,20581,24062,24314,24838,26967,33137,34388,
283	36423,37749,39467,20062,20625,26480,26688,20745,21133,21138,27298,30652,37392,
284	40660,21163,24623,36850,20552,25001,25581,25802,26684,27268,28608,33160,35233,
285	38548,22533,29309,29356,29956,32121,32365,32937,35211,35700,36963,40273,25225,
286	27770,28500,32080,32570,35363,20860,24906,31645,35609,37463,37772,20140,20435,
287	20510,20670,20742,21185,21197,21375,22384,22659,24218,24465,24950,25004,
288	25806,25964,26223,26299,26356,26775,28039,28805,28913,29855,29861,29898,30169,
289	30828,30956,31455,31478,32069,32147,32789,32831,33051,33686,35686,36629,36885,
290	37857,38915,38968,39514,39912,20418,21843,22586,22865,23395,23622,24760,25106,
291	26690,26800,26856,28330,30028,30328,30926,31293,31995,32363,32380,35336,35489,
292	35903,38542,40388,21476,21481,21578,21617,22266,22993,23396,23611,24235,25335,
293	25911,25925,25970,26272,26543,27073,27837,30204,30352,30590,31295,32660,32771,
294	32929,33167,33510,33533,33776,34241,34865,34996,35493,63747,36764,37678,38599,
295	39015,39640,40723,21741,26011,26354,26767,31296,35895,40288,22256,22372,23825,
296	26118,26801,26829,28414,29736,34974,39908,27752,63748,39592,20379,20844,20849,
297	21151,23380,24037,24656,24685,25329,25511,25915,29657,31354,34467,36002,38799,
298	20018,23521,25096,26524,29916,31185,33747,35463,35506,36328,36942,37707,38982,
299	24275,27112,34303,37101,63749,20896,23448,23532,24931,26874,27454,28748,29743,
300	29912,31649,32592,33733,35264,36011,38364,39208,21038,24669,25324,36866,20362,
301	20809,21281,22745,24291,26336,27960,28826,29378,29654,31568,33009,37979,21350,
302	25499,32619,20054,20608,22602,22750,24618,24871,25296,27088,39745,23439,32024,
303	32945,36703,20132,20689,21676,21932,23308,23968,24039,25898,25934,26657,27211,
304	29409,30350,30703,32094,32761,33184,34126,34527,36611,36686,37066,39171,39509,
305	39851,19992,20037,20061,20167,20465,20855,21246,21312,21475,21477,21646,22036,
306	22389,22434,23495,23943,24272,25084,25304,25937,26552,26601,27083,27472,27590,
307	27628,27714,28317,28792,29399,29590,29699,30655,30697,
308	31350,32127,32777,33276,33285,33290,33503,34914,35635,36092,36544,36881,37041,
309	37476,37558,39378,39493,40169,40407,40860,22283,23616,33738,38816,38827,40628,
310	21531,31384,32676,35033,36557,37089,22528,23624,25496,31391,23470,24339,31353,
311	31406,33422,36524,20518,21048,21240,21367,22280,25331,25458,27402,28099,30519,
312	21413,29527,34152,36470,38357,26426,27331,28528,35437,36556,39243,63750,26231,
313	27512,36020,39740,63751,21483,22317,22862,25542,27131,29674,30789,31418,31429,
314	31998,33909,35215,36211,36917,38312,21243,22343,30023,31584,33740,37406,63752,
315	27224,20811,21067,21127,25119,26840,26997,38553,20677,21156,21220,25027,26020,
316	26681,27135,29822,31563,33465,33771,35250,35641,36817,39241,63753,20170,22935,
317	25810,26129,27278,29748,31105,31165,33449,34942,34943,35167,63754,37670,20235,
318	21450,24613,25201,27762,32026,32102,20120,20834,30684,32943,20225,20238,20854,
319	20864,21980,22120,22331,22522,22524,22804,22855,22931,23492,23696,23822,24049,
320	24190,24524,25216,26071,26083,26398,26399,26462,26827,26820,27231,27450,27683,
321	27773,27778,28103,29592,29734,29738,29826,29859,30072,30079,30849,30959,31041,
322	31047,31048,31098,31637,32000,32186,32648,32774,32813,32908,35352,35663,35912,
323	36215,37665,37668,39138,39249,39438,39439,39525,40594,32202,20342,21513,25326,
324	26708,37329,21931,20794,63755,63756,23068,25062,63757,25295,25343,63758,63759,
325	63760,63761,63762,63763,37027,63764,63765,63766,63767,63768,35582,63769,63770,
326	63771,63772,26262,63773,29014,63774,63775,38627,63776,25423,25466,21335,63777,
327	26511,26976,28275,63778,30007,63779,63780,63781,32013,
328	63782,63783,34930,22218,23064,63784,63785,63786,63787,63788,20035,63789,20839,
329	22856,26608,32784,63790,22899,24180,25754,31178,24565,24684,25288,25467,23527,
330	23511,21162,63791,22900,24361,24594,63792,63793,63794,29785,63795,63796,63797,
331	63798,63799,63800,39377,63801,63802,63803,63804,63805,63806,63807,63808,63809,
332	63810,63811,28611,63812,63813,33215,36786,24817,63814,63815,33126,63816,63817,
333	23615,63818,63819,63820,63821,63822,63823,63824,63825,23273,35365,26491,32016,
334	63826,63827,63828,63829,63830,63831,33021,63832,63833,23612,27877,21311,28346,
335	22810,33590,20025,20150,20294,21934,22296,22727,24406,26039,26086,27264,27573,
336	28237,30701,31471,31774,32222,34507,34962,37170,37723,25787,28606,29562,30136,
337	36948,21846,22349,25018,25812,26311,28129,28251,28525,28601,30192,32835,33213,
338	34113,35203,35527,35674,37663,27795,30035,31572,36367,36957,21776,22530,22616,
339	24162,25095,25758,26848,30070,31958,34739,40680,20195,22408,22382,22823,23565,
340	23729,24118,24453,25140,25825,29619,33274,34955,36024,38538,40667,23429,24503,
341	24755,20498,20992,21040,22294,22581,22615,23566,23648,23798,23947,24230,24466,
342	24764,25361,25481,25623,26691,26873,27330,28120,28193,28372,28644,29182,30428,
343	30585,31153,31291,33796,35241,36077,36339,36424,36867,36884,36947,37117,37709,
344	38518,38876,27602,28678,29272,29346,29544,30563,31167,31716,32411,35712,22697,
345	24775,25958,26109,26302,27788,28958,29129,35930,38931,20077,31361,20189,20908,
346	20941,21205,21516,24999,26481,26704,26847,27934,28540,30140,30643,31461,33012,
347	33891,37509,20828,26007,26460,26515,30168,31431,33651,
348	63834,35910,36887,38957,23663,33216,33434,36929,36975,37389,24471,23965,27225,
349	29128,30331,31561,34276,35588,37159,39472,21895,25078,63835,30313,32645,34367,
350	34746,35064,37007,63836,27931,28889,29662,32097,33853,63837,37226,39409,63838,
351	20098,21365,27396,27410,28734,29211,34349,40478,21068,36771,23888,25829,25900,
352	27414,28651,31811,32412,34253,35172,35261,25289,33240,34847,24266,26391,28010,
353	29436,29701,29807,34690,37086,20358,23821,24480,33802,20919,25504,30053,20142,
354	20486,20841,20937,26753,27153,31918,31921,31975,33391,35538,36635,37327,20406,
355	20791,21237,21570,24300,24942,25150,26053,27354,28670,31018,34268,34851,38317,
356	39522,39530,40599,40654,21147,26310,27511,28701,31019,36706,38722,24976,25088,
357	25891,28451,29001,29833,32244,32879,34030,36646,36899,37706,20925,21015,21155,
358	27916,28872,35010,24265,25986,27566,28610,31806,29557,20196,20278,22265,63839,
359	23738,23994,24604,29618,31533,32666,32718,32838,36894,37428,38646,38728,38936,
360	40801,20363,28583,31150,37300,38583,21214,63840,25736,25796,27347,28510,28696,
361	29200,30439,32769,34310,34396,36335,36613,38706,39791,40442,40565,30860,31103,
362	32160,33737,37636,40575,40595,35542,22751,24324,26407,28711,29903,31840,32894,
363	20769,28712,29282,30922,36034,36058,36084,38647,20102,20698,23534,24278,26009,
364	29134,30274,30637,32842,34044,36988,39719,40845,22744,23105,23650,27155,28122,
365	28431,30267,32047,32311,34078,35128,37860,38475,21129,26066,26611,27060,27969,
366	28316,28687,29705,29792,30041,30244,30827,35628,39006,20845,25134,38520,20374,
367	20523,23833,28138,32184,36650,24459,24900,26647,63841,
368	38534,21202,32907,20956,20940,26974,31260,32190,33777,38517,20442,21033,21400,
369	21519,21774,23653,24743,26446,26792,28012,29313,29432,29702,29827,63842,30178,
370	31852,32633,32696,33673,35023,35041,37324,37328,38626,39881,21533,28542,29136,
371	29848,34298,36522,38563,40023,40607,26519,28107,29747,33256,38678,30764,31435,
372	31520,31890,25705,29802,30194,30908,30952,39340,39764,40635,23518,24149,28448,
373	33180,33707,37000,19975,21325,23081,24018,24398,24930,25405,26217,26364,28415,
374	28459,28771,30622,33836,34067,34875,36627,39237,39995,21788,25273,26411,27819,
375	33545,35178,38778,20129,22916,24536,24537,26395,32178,32596,33426,33579,33725,
376	36638,37017,22475,22969,23186,23504,26151,26522,26757,27599,29028,32629,36023,
377	36067,36993,39749,33032,35978,38476,39488,40613,23391,27667,29467,30450,30431,
378	33804,20906,35219,20813,20885,21193,26825,27796,30468,30496,32191,32236,38754,
379	40629,28357,34065,20901,21517,21629,26126,26269,26919,28319,30399,30609,33559,
380	33986,34719,37225,37528,40180,34946,20398,20882,21215,22982,24125,24917,25720,
381	25721,26286,26576,27169,27597,27611,29279,29281,29761,30520,30683,32791,33468,
382	33541,35584,35624,35980,26408,27792,29287,30446,30566,31302,40361,27519,27794,
383	22818,26406,33945,21359,22675,22937,24287,25551,26164,26483,28218,29483,31447,
384	33495,37672,21209,24043,25006,25035,25098,25287,25771,26080,26969,27494,27595,
385	28961,29687,30045,32326,33310,33538,34154,35491,36031,38695,40289,22696,40664,
386	20497,21006,21563,21839,25991,27766,32010,32011,32862,34442,38272,38639,21247,
387	27797,29289,21619,23194,23614,23883,24396,24494,26410,
388	26806,26979,28220,28228,30473,31859,32654,34183,35598,36855,38753,40692,23735,
389	24758,24845,25003,25935,26107,26108,27665,27887,29599,29641,32225,38292,23494,
390	34588,35600,21085,21338,25293,25615,25778,26420,27192,27850,29632,29854,31636,
391	31893,32283,33162,33334,34180,36843,38649,39361,20276,21322,21453,21467,25292,
392	25644,25856,26001,27075,27886,28504,29677,30036,30242,30436,30460,30928,30971,
393	31020,32070,33324,34784,36820,38930,39151,21187,25300,25765,28196,28497,30332,
394	36299,37297,37474,39662,39747,20515,20621,22346,22952,23592,24135,24439,25151,
395	25918,26041,26049,26121,26507,27036,28354,30917,32033,32938,33152,33323,33459,
396	33953,34444,35370,35607,37030,38450,40848,20493,20467,63843,22521,24472,25308,
397	25490,26479,28227,28953,30403,32972,32986,35060,35061,35097,36064,36649,37197,
398	38506,20271,20336,24091,26575,26658,30333,30334,39748,24161,27146,29033,29140,
399	30058,63844,32321,34115,34281,39132,20240,31567,32624,38309,20961,24070,26805,
400	27710,27726,27867,29359,31684,33539,27861,29754,20731,21128,22721,25816,27287,
401	29863,30294,30887,34327,38370,38713,63845,21342,24321,35722,36776,36783,37002,
402	21029,30629,40009,40712,19993,20482,20853,23643,24183,26142,26170,26564,26821,
403	28851,29953,30149,31177,31453,36647,39200,39432,20445,22561,22577,23542,26222,
404	27493,27921,28282,28541,29668,29995,33769,35036,35091,35676,36628,20239,20693,
405	21264,21340,23443,24489,26381,31119,33145,33583,34068,35079,35206,36665,36667,
406	39333,39954,26412,20086,20472,22857,23553,23791,23792,25447,26834,28925,29090,
407	29739,32299,34028,34562,36898,37586,40179,19981,20184,
408	20463,20613,21078,21103,21542,21648,22496,22827,23142,23386,23413,23500,24220,
409	63846,25206,25975,26023,28014,28325,29238,31526,31807,32566,33104,33105,33178,
410	33344,33433,33705,35331,36000,36070,36091,36212,36282,37096,37340,38428,38468,
411	39385,40167,21271,20998,21545,22132,22707,22868,22894,24575,24996,25198,26128,
412	27774,28954,30406,31881,31966,32027,33452,36033,38640,63847,20315,24343,24447,
413	25282,23849,26379,26842,30844,32323,40300,19989,20633,21269,21290,21329,22915,
414	23138,24199,24754,24970,25161,25209,26000,26503,27047,27604,27606,27607,27608,
415	27832,63848,29749,30202,30738,30865,31189,31192,31875,32203,32737,32933,33086,
416	33218,33778,34586,35048,35513,35692,36027,37145,38750,39131,40763,22188,23338,
417	24428,25996,27315,27567,27996,28657,28693,29277,29613,36007,36051,38971,24977,
418	27703,32856,39425,20045,20107,20123,20181,20282,20284,20351,20447,20735,21490,
419	21496,21766,21987,22235,22763,22882,23057,23531,23546,23556,24051,24107,24473,
420	24605,25448,26012,26031,26614,26619,26797,27515,27801,27863,28195,28681,29509,
421	30722,31038,31040,31072,31169,31721,32023,32114,32902,33293,33678,34001,34503,
422	35039,35408,35422,35613,36060,36198,36781,37034,39164,39391,40605,21066,63849,
423	26388,63850,20632,21034,23665,25955,27733,29642,29987,30109,31639,33948,37240,
424	38704,20087,25746,27578,29022,34217,19977,63851,26441,26862,28183,33439,34072,
425	34923,25591,28545,37394,39087,19978,20663,20687,20767,21830,21930,22039,23360,
426	23577,23776,24120,24202,24224,24258,24819,26705,27233,28248,29245,29248,29376,
427	30456,31077,31665,32724,35059,35316,35443,35937,36062,
428	38684,22622,29885,36093,21959,63852,31329,32034,33394,29298,29983,29989,63853,
429	31513,22661,22779,23996,24207,24246,24464,24661,25234,25471,25933,26257,26329,
430	26360,26646,26866,29312,29790,31598,32110,32214,32626,32997,33298,34223,35199,
431	35475,36893,37604,40653,40736,22805,22893,24109,24796,26132,26227,26512,27728,
432	28101,28511,30707,30889,33990,37323,37675,20185,20682,20808,21892,23307,23459,
433	25159,25982,26059,28210,29053,29697,29764,29831,29887,30316,31146,32218,32341,
434	32680,33146,33203,33337,34330,34796,35445,36323,36984,37521,37925,39245,39854,
435	21352,23633,26964,27844,27945,28203,33292,34203,35131,35373,35498,38634,40807,
436	21089,26297,27570,32406,34814,36109,38275,38493,25885,28041,29166,63854,22478,
437	22995,23468,24615,24826,25104,26143,26207,29481,29689,30427,30465,31596,32854,
438	32882,33125,35488,37266,19990,21218,27506,27927,31237,31545,32048,63855,36016,
439	21484,22063,22609,23477,23567,23569,24034,25152,25475,25620,26157,26803,27836,
440	28040,28335,28703,28836,29138,29990,30095,30094,30233,31505,31712,31787,32032,
441	32057,34092,34157,34311,35380,36877,36961,37045,37559,38902,39479,20439,23660,
442	26463,28049,31903,32396,35606,36118,36895,23403,24061,25613,33984,36956,39137,
443	29575,23435,24730,26494,28126,35359,35494,36865,38924,21047,63856,28753,30862,
444	37782,34928,37335,20462,21463,22013,22234,22402,22781,23234,23432,23723,23744,
445	24101,24833,25101,25163,25480,25628,25910,25976,27193,27530,27700,27929,28465,
446	29159,29417,29560,29703,29874,30246,30561,31168,31319,31466,31929,32143,32172,
447	32353,32670,33065,33585,33936,34010,34282,34966,35504,
448	35728,36664,36930,36995,37228,37526,37561,38539,38567,38568,38614,38656,38920,
449	39318,39635,39706,21460,22654,22809,23408,23487,28113,28506,29087,29729,29881,
450	32901,33789,24033,24455,24490,24642,26092,26642,26991,27219,27529,27957,28147,
451	29667,30462,30636,31565,32020,33059,33308,33600,34036,34147,35426,35524,37255,
452	37662,38918,39348,25100,34899,36848,37477,23815,23847,23913,29791,33181,34664,
453	28629,25342,32722,35126,35186,19998,20056,20711,21213,21319,25215,26119,32361,
454	34821,38494,20365,21273,22070,22987,23204,23608,23630,23629,24066,24337,24643,
455	26045,26159,26178,26558,26612,29468,30690,31034,32709,33940,33997,35222,35430,
456	35433,35553,35925,35962,22516,23508,24335,24687,25325,26893,27542,28252,29060,
457	31698,34645,35672,36606,39135,39166,20280,20353,20449,21627,23072,23480,24892,
458	26032,26216,29180,30003,31070,32051,33102,33251,33688,34218,34254,34563,35338,
459	36523,36763,63857,36805,22833,23460,23526,24713,23529,23563,24515,27777,63858,
460	28145,28683,29978,33455,35574,20160,21313,63859,38617,27663,20126,20420,20818,
461	21854,23077,23784,25105,29273,33469,33706,34558,34905,35357,38463,38597,39187,
462	40201,40285,22538,23731,23997,24132,24801,24853,25569,27138,28197,37122,37716,
463	38990,39952,40823,23433,23736,25353,26191,26696,30524,38593,38797,38996,39839,
464	26017,35585,36555,38332,21813,23721,24022,24245,26263,30284,33780,38343,22739,
465	25276,29390,40232,20208,22830,24591,26171,27523,31207,40230,21395,21696,22467,
466	23830,24859,26326,28079,30861,33406,38552,38724,21380,25212,25494,28082,32266,
467	33099,38989,27387,32588,40367,40474,20063,20539,20918,
468	22812,24825,25590,26928,29242,32822,63860,37326,24369,63861,63862,32004,33509,
469	33903,33979,34277,36493,63863,20335,63864,63865,22756,23363,24665,25562,25880,
470	25965,26264,63866,26954,27171,27915,28673,29036,30162,30221,31155,31344,63867,
471	32650,63868,35140,63869,35731,37312,38525,63870,39178,22276,24481,26044,28417,
472	30208,31142,35486,39341,39770,40812,20740,25014,25233,27277,33222,20547,22576,
473	24422,28937,35328,35578,23420,34326,20474,20796,22196,22852,25513,28153,23978,
474	26989,20870,20104,20313,63871,63872,63873,22914,63874,63875,27487,27741,63876,
475	29877,30998,63877,33287,33349,33593,36671,36701,63878,39192,63879,63880,63881,
476	20134,63882,22495,24441,26131,63883,63884,30123,32377,35695,63885,36870,39515,
477	22181,22567,23032,23071,23476,63886,24310,63887,63888,25424,25403,63889,26941,
478	27783,27839,28046,28051,28149,28436,63890,28895,28982,29017,63891,29123,29141,
479	63892,30799,30831,63893,31605,32227,63894,32303,63895,34893,36575,63896,63897,
480	63898,37467,63899,40182,63900,63901,63902,24709,28037,63903,29105,63904,63905,
481	38321,21421,63906,63907,63908,26579,63909,28814,28976,29744,33398,33490,63910,
482	38331,39653,40573,26308,63911,29121,33865,63912,63913,22603,63914,63915,23992,
483	24433,63916,26144,26254,27001,27054,27704,27891,28214,28481,28634,28699,28719,
484	29008,29151,29552,63917,29787,63918,29908,30408,31310,32403,63919,63920,33521,
485	35424,36814,63921,37704,63922,38681,63923,63924,20034,20522,63925,21000,21473,
486	26355,27757,28618,29450,30591,31330,33454,34269,34306,63926,35028,35427,35709,
487	35947,63927,37555,63928,38675,38928,20116,20237,20425,
488	20658,21320,21566,21555,21978,22626,22714,22887,23067,23524,24735,63929,25034,
489	25942,26111,26212,26791,27738,28595,28879,29100,29522,31613,34568,35492,39986,
490	40711,23627,27779,29508,29577,37434,28331,29797,30239,31337,32277,34314,20800,
491	22725,25793,29934,29973,30320,32705,37013,38605,39252,28198,29926,31401,31402,
492	33253,34521,34680,35355,23113,23436,23451,26785,26880,28003,29609,29715,29740,
493	30871,32233,32747,33048,33109,33694,35916,38446,38929,26352,24448,26106,26505,
494	27754,29579,20525,23043,27498,30702,22806,23916,24013,29477,30031,63930,63931,
495	20709,20985,22575,22829,22934,23002,23525,63932,63933,23970,25303,25622,25747,
496	25854,63934,26332,63935,27208,63936,29183,29796,63937,31368,31407,32327,32350,
497	32768,33136,63938,34799,35201,35616,36953,63939,36992,39250,24958,27442,28020,
498	32287,35109,36785,20433,20653,20887,21191,22471,22665,23481,24248,24898,27029,
499	28044,28263,28342,29076,29794,29992,29996,32883,33592,33993,36362,37780,37854,
500	63940,20110,20305,20598,20778,21448,21451,21491,23431,23507,23588,24858,24962,
501	26100,29275,29591,29760,30402,31056,31121,31161,32006,32701,33419,34261,34398,
502	36802,36935,37109,37354,38533,38632,38633,21206,24423,26093,26161,26671,29020,
503	31286,37057,38922,20113,63941,27218,27550,28560,29065,32792,33464,34131,36939,
504	38549,38642,38907,34074,39729,20112,29066,38596,20803,21407,21729,22291,22290,
505	22435,23195,23236,23491,24616,24895,25588,27781,27961,28274,28304,29232,29503,
506	29783,33489,34945,36677,36960,63942,38498,39000,40219,26376,36234,37470,20301,
507	20553,20702,21361,22285,22996,23041,23561,24944,26256,
508	28205,29234,29771,32239,32963,33806,33894,34111,34655,34907,35096,35586,36949,
509	38859,39759,20083,20369,20754,20842,63943,21807,21929,23418,23461,24188,24189,
510	24254,24736,24799,24840,24841,25540,25912,26377,63944,26580,26586,63945,26977,
511	26978,27833,27943,63946,28216,63947,28641,29494,29495,63948,29788,30001,63949,
512	30290,63950,63951,32173,33278,33848,35029,35480,35547,35565,36400,36418,36938,
513	36926,36986,37193,37321,37742,63952,63953,22537,63954,27603,32905,32946,63955,
514	63956,20801,22891,23609,63957,63958,28516,29607,32996,36103,63959,37399,38287,
515	63960,63961,63962,63963,32895,25102,28700,32104,34701,63964,22432,24681,24903,
516	27575,35518,37504,38577,20057,21535,28139,34093,38512,38899,39150,25558,27875,
517	37009,20957,25033,33210,40441,20381,20506,20736,23452,24847,25087,25836,26885,
518	27589,30097,30691,32681,33380,34191,34811,34915,35516,35696,37291,20108,20197,
519	20234,63965,63966,22839,23016,63967,24050,24347,24411,24609,63968,63969,63970,
520	63971,29246,29669,63972,30064,30157,63973,31227,63974,32780,32819,32900,33505,
521	33617,63975,63976,36029,36019,36999,63977,63978,39156,39180,63979,63980,28727,
522	30410,32714,32716,32764,35610,20154,20161,20995,21360,63981,21693,22240,23035,
523	23493,24341,24525,28270,63982,63983,32106,33589,63984,34451,35469,63985,38765,
524	38775,63986,63987,19968,20314,20350,22777,26085,28322,36920,37808,39353,20219,
525	22764,22922,23001,24641,63988,63989,31252,63990,33615,36035,20837,21316,63991,
526	63992,63993,20173,21097,23381,33471,20180,21050,21672,22985,23039,23376,23383,
527	23388,24675,24904,28363,28825,29038,29574,29943,30133,
528	30913,32043,32773,33258,33576,34071,34249,35566,36039,38604,20316,21242,22204,
529	26027,26152,28796,28856,29237,32189,33421,37196,38592,40306,23409,26855,27544,
530	28538,30430,23697,26283,28507,31668,31786,34870,38620,19976,20183,21280,22580,
531	22715,22767,22892,23559,24115,24196,24373,25484,26290,26454,27167,27299,27404,
532	28479,29254,63994,29520,29835,31456,31911,33144,33247,33255,33674,33900,34083,
533	34196,34255,35037,36115,37292,38263,38556,20877,21705,22312,23472,25165,26448,
534	26685,26771,28221,28371,28797,32289,35009,36001,36617,40779,40782,29229,31631,
535	35533,37658,20295,20302,20786,21632,22992,24213,25269,26485,26990,27159,27822,
536	28186,29401,29482,30141,31672,32053,33511,33785,33879,34295,35419,36015,36487,
537	36889,37048,38606,40799,21219,21514,23265,23490,25688,25973,28404,29380,63995,
538	30340,31309,31515,31821,32318,32735,33659,35627,36042,36196,36321,36447,36842,
539	36857,36969,37841,20291,20346,20659,20840,20856,21069,21098,22625,22652,22880,
540	23560,23637,24283,24731,25136,26643,27583,27656,28593,29006,29728,30000,30008,
541	30033,30322,31564,31627,31661,31686,32399,35438,36670,36681,37439,37523,37666,
542	37931,38651,39002,39019,39198,20999,25130,25240,27993,30308,31434,31680,32118,
543	21344,23742,24215,28472,28857,31896,38673,39822,40670,25509,25722,34678,19969,
544	20117,20141,20572,20597,21576,22979,23450,24128,24237,24311,24449,24773,25402,
545	25919,25972,26060,26230,26232,26622,26984,27273,27491,27712,28096,28136,28191,
546	28254,28702,28833,29582,29693,30010,30555,30855,31118,31243,31357,31934,32142,
547	33351,35330,35562,35998,37165,37194,37336,37478,37580,
548	37664,38662,38742,38748,38914,40718,21046,21137,21884,22564,24093,24351,24716,
549	25552,26799,28639,31085,31532,33229,34234,35069,35576,36420,37261,38500,38555,
550	38717,38988,40778,20430,20806,20939,21161,22066,24340,24427,25514,25805,26089,
551	26177,26362,26361,26397,26781,26839,27133,28437,28526,29031,29157,29226,29866,
552	30522,31062,31066,31199,31264,31381,31895,31967,32068,32368,32903,34299,34468,
553	35412,35519,36249,36481,36896,36973,37347,38459,38613,40165,26063,31751,36275,
554	37827,23384,23562,21330,25305,29469,20519,23447,24478,24752,24939,26837,28121,
555	29742,31278,32066,32156,32305,33131,36394,36405,37758,37912,20304,22352,24038,
556	24231,25387,32618,20027,20303,20367,20570,23005,32964,21610,21608,22014,22863,
557	23449,24030,24282,26205,26417,26609,26666,27880,27954,28234,28557,28855,29664,
558	30087,31820,32002,32044,32162,33311,34523,35387,35461,36208,36490,36659,36913,
559	37198,37202,37956,39376,31481,31909,20426,20737,20934,22472,23535,23803,26201,
560	27197,27994,28310,28652,28940,30063,31459,34850,36897,36981,38603,39423,33537,
561	20013,20210,34886,37325,21373,27355,26987,27713,33914,22686,24974,26366,25327,
562	28893,29969,30151,32338,33976,35657,36104,20043,21482,21675,22320,22336,24535,
563	25345,25351,25711,25903,26088,26234,26525,26547,27490,27744,27802,28460,30693,
564	30757,31049,31063,32025,32930,33026,33267,33437,33463,34584,35468,63996,36100,
565	36286,36978,30452,31257,31287,32340,32887,21767,21972,22645,25391,25634,26185,
566	26187,26733,27035,27524,27941,28337,29645,29800,29857,30043,30137,30433,30494,
567	30603,31206,32265,32285,33275,34095,34967,35386,36049,
568	36587,36784,36914,37805,38499,38515,38663,20356,21489,23018,23241,24089,26702,
569	29894,30142,31209,31378,33187,34541,36074,36300,36845,26015,26389,63997,22519,
570	28503,32221,36655,37878,38598,24501,25074,28548,19988,20376,20511,21449,21983,
571	23919,24046,27425,27492,30923,31642,63998,36425,36554,36974,25417,25662,30528,
572	31364,37679,38015,40810,25776,28591,29158,29864,29914,31428,31762,32386,31922,
573	32408,35738,36106,38013,39184,39244,21049,23519,25830,26413,32046,20717,21443,
574	22649,24920,24921,25082,26028,31449,35730,35734,20489,20513,21109,21809,23100,
575	24288,24432,24884,25950,26124,26166,26274,27085,28356,28466,29462,30241,31379,
576	33081,33369,33750,33980,20661,22512,23488,23528,24425,25505,30758,32181,33756,
577	34081,37319,37365,20874,26613,31574,36012,20932,22971,24765,34389,20508,63999,
578	21076,23610,24957,25114,25299,25842,26021,28364,30240,33034,36448,38495,38587,
579	20191,21315,21912,22825,24029,25797,27849,28154,29588,31359,33307,34214,36068,
580	36368,36983,37351,38369,38433,38854,20984,21746,21894,24505,25764,28552,32180,
581	36639,36685,37941,20681,23574,27838,28155,29979,30651,31805,31844,35449,35522,
582	22558,22974,24086,25463,29266,30090,30571,35548,36028,36626,24307,26228,28152,
583	32893,33729,35531,38737,39894,64000,21059,26367,28053,28399,32224,35558,36910,
584	36958,39636,21021,21119,21736,24980,25220,25307,26786,26898,26970,27189,28818,
585	28966,30813,30977,30990,31186,31245,32918,33400,33493,33609,34121,35970,36229,
586	37218,37259,37294,20419,22225,29165,30679,34560,35320,23544,24534,26449,37032,
587	21474,22618,23541,24740,24961,25696,32317,32880,34085,
588	37507,25774,20652,23828,26368,22684,25277,25512,26894,27000,27166,28267,30394,
589	31179,33467,33833,35535,36264,36861,37138,37195,37276,37648,37656,37786,38619,
590	39478,39949,19985,30044,31069,31482,31569,31689,32302,33988,36441,36468,36600,
591	36880,26149,26943,29763,20986,26414,40668,20805,24544,27798,34802,34909,34935,
592	24756,33205,33795,36101,21462,21561,22068,23094,23601,28810,32736,32858,33030,
593	33261,36259,37257,39519,40434,20596,20164,21408,24827,28204,23652,20360,20516,
594	21988,23769,24159,24677,26772,27835,28100,29118,30164,30196,30305,31258,31305,
595	32199,32251,32622,33268,34473,36636,38601,39347,40786,21063,21189,39149,35242,
596	19971,26578,28422,20405,23522,26517,27784,28024,29723,30759,37341,37756,34756,
597	31204,31281,24555,20182,21668,21822,22702,22949,24816,25171,25302,26422,26965,
598	33333,38464,39345,39389,20524,21331,21828,22396,64001,25176,64002,25826,26219,
599	26589,28609,28655,29730,29752,35351,37944,21585,22022,22374,24392,24986,27470,
600	28760,28845,32187,35477,22890,33067,25506,30472,32829,36010,22612,25645,27067,
601	23445,24081,28271,64003,34153,20812,21488,22826,24608,24907,27526,27760,27888,
602	31518,32974,33492,36294,37040,39089,64004,25799,28580,25745,25860,20814,21520,
603	22303,35342,24927,26742,64005,30171,31570,32113,36890,22534,27084,33151,35114,
604	36864,38969,20600,22871,22956,25237,36879,39722,24925,29305,38358,22369,23110,
605	24052,25226,25773,25850,26487,27874,27966,29228,29750,30772,32631,33453,36315,
606	38935,21028,22338,26495,29256,29923,36009,36774,37393,38442,20843,21485,25420,
607	20329,21764,24726,25943,27803,28031,29260,29437,31255,
608	35207,35997,24429,28558,28921,33192,24846,20415,20559,25153,29255,31687,32232,
609	32745,36941,38829,39449,36022,22378,24179,26544,33805,35413,21536,23318,24163,
610	24290,24330,25987,32954,34109,38281,38491,20296,21253,21261,21263,21638,21754,
611	22275,24067,24598,25243,25265,25429,64006,27873,28006,30129,30770,32990,33071,
612	33502,33889,33970,34957,35090,36875,37610,39165,39825,24133,26292,26333,28689,
613	29190,64007,20469,21117,24426,24915,26451,27161,28418,29922,31080,34920,35961,
614	39111,39108,39491,21697,31263,26963,35575,35914,39080,39342,24444,25259,30130,
615	30382,34987,36991,38466,21305,24380,24517,27852,29644,30050,30091,31558,33534,
616	39325,20047,36924,19979,20309,21414,22799,24264,26160,27827,29781,33655,34662,
617	36032,36944,38686,39957,22737,23416,34384,35604,40372,23506,24680,24717,26097,
618	27735,28450,28579,28698,32597,32752,38289,38290,38480,38867,21106,36676,20989,
619	21547,21688,21859,21898,27323,28085,32216,33382,37532,38519,40569,21512,21704,
620	30418,34532,38308,38356,38492,20130,20233,23022,23270,24055,24658,25239,26477,
621	26689,27782,28207,32568,32923,33322,64008,64009,38917,20133,20565,21683,22419,
622	22874,23401,23475,25032,26999,28023,28707,34809,35299,35442,35559,36994,39405,
623	39608,21182,26680,20502,24184,26447,33607,34892,20139,21521,22190,29670,37141,
624	38911,39177,39255,39321,22099,22687,34395,35377,25010,27382,29563,36562,27463,
625	38570,39511,22869,29184,36203,38761,20436,23796,24358,25080,26203,27883,28843,
626	29572,29625,29694,30505,30541,32067,32098,32291,33335,34898,64010,36066,37449,
627	39023,23377,31348,34880,38913,23244,20448,21332,22846,
628	23805,25406,28025,29433,33029,33031,33698,37583,38960,20136,20804,21009,22411,
629	24418,27842,28366,28677,28752,28847,29074,29673,29801,33610,34722,34913,36872,
630	37026,37795,39336,20846,24407,24800,24935,26291,34137,36426,37295,38795,20046,
631	20114,21628,22741,22778,22909,23733,24359,25142,25160,26122,26215,27627,28009,
632	28111,28246,28408,28564,28640,28649,28765,29392,29733,29786,29920,30355,31068,
633	31946,32286,32993,33446,33899,33983,34382,34399,34676,35703,35946,37804,38912,
634	39013,24785,25110,37239,23130,26127,28151,28222,29759,39746,24573,24794,31503,
635	21700,24344,27742,27859,27946,28888,32005,34425,35340,40251,21270,21644,23301,
636	27194,28779,30069,31117,31166,33457,33775,35441,35649,36008,38772,64011,25844,
637	25899,30906,30907,31339,20024,21914,22864,23462,24187,24739,25563,27489,26213,
638	26707,28185,29029,29872,32008,36996,39529,39973,27963,28369,29502,35905,38346,
639	20976,24140,24488,24653,24822,24880,24908,26179,26180,27045,27841,28255,28361,
640	28514,29004,29852,30343,31681,31783,33618,34647,36945,38541,40643,21295,22238,
641	24315,24458,24674,24724,25079,26214,26371,27292,28142,28590,28784,29546,32362,
642	33214,33588,34516,35496,36036,21123,29554,23446,27243,37892,21742,22150,23389,
643	25928,25989,26313,26783,28045,28102,29243,32948,37237,39501,20399,20505,21402,
644	21518,21564,21897,21957,24127,24460,26429,29030,29661,36869,21211,21235,22628,
645	22734,28932,29071,29179,34224,35347,26248,34216,21927,26244,29002,33841,21321,
646	21913,27585,24409,24509,25582,26249,28999,35569,36637,40638,20241,25658,28875,
647	30054,34407,24676,35662,40440,20807,20982,21256,27958,
648	33016,40657,26133,27427,28824,30165,21507,23673,32007,35350,27424,27453,27462,
649	21560,24688,27965,32725,33288,20694,20958,21916,22123,22221,23020,23305,24076,
650	24985,24984,25137,26206,26342,29081,29113,29114,29351,31143,31232,32690,35440,

lib/libc/wasi/libc-top-half/musl/src/locale/langinfo.c deleted-73

...	@@ -1,73 +0,0 @@
1	#include <locale.h>
2	#include <langinfo.h>
3	#include "locale_impl.h"
4
5	static const char c_time[] =
6	"Sun\0" "Mon\0" "Tue\0" "Wed\0" "Thu\0" "Fri\0" "Sat\0"
7	"Sunday\0" "Monday\0" "Tuesday\0" "Wednesday\0"
8	"Thursday\0" "Friday\0" "Saturday\0"
9	"Jan\0" "Feb\0" "Mar\0" "Apr\0" "May\0" "Jun\0"
10	"Jul\0" "Aug\0" "Sep\0" "Oct\0" "Nov\0" "Dec\0"
11	"January\0" "February\0" "March\0" "April\0"
12	"May\0" "June\0" "July\0" "August\0"
13	"September\0" "October\0" "November\0" "December\0"
14	"AM\0" "PM\0"
15	"%a %b %e %T %Y\0"
16	"%m/%d/%y\0"
17	"%H:%M:%S\0"
18	"%I:%M:%S %p\0"
19	"\0"
20	"\0"
21	"%m/%d/%y\0"
22	"0123456789\0"
23	"%a %b %e %T %Y\0"
24	"%H:%M:%S";
25
26	static const char c_messages[] = "^[yY]\0" "^[nN]\0" "yes\0" "no";
27	static const char c_numeric[] = ".\0" "";
28
29	char *__nl_langinfo_l(nl_item item, locale_t loc)
30	{
31	int cat = item >> 16;
32	int idx = item & 65535;
33	const char *str;
34
35	if (item == CODESET) return loc->cat[LC_CTYPE] ? "UTF-8" : "ASCII";
36
37	/* _NL_LOCALE_NAME extension */
38	if (idx == 65535 && cat < LC_ALL)
39	return loc->cat[cat] ? (char *)loc->cat[cat]->name : "C";
40
41	switch (cat) {
42	case LC_NUMERIC:
43	if (idx > 1) return "";
44	str = c_numeric;
45	break;
46	case LC_TIME:
47	if (idx > 0x31) return "";
48	str = c_time;
49	break;
50	case LC_MONETARY:
51	if (idx > 0) return "";
52	str = "";
53	break;
54	case LC_MESSAGES:
55	if (idx > 3) return "";
56	str = c_messages;
57	break;
58	default:
59	return "";
60	}
61
62	for (; idx; idx--, str++) for (; *str; str++);
63	if (cat != LC_NUMERIC && *str) str = LCTRANS(str, cat, loc);
64	return (char *)str;
65	}
66
67	char *__nl_langinfo(nl_item item)
68	{
69	return __nl_langinfo_l(item, CURRENT_LOCALE);
70	}
71
72	weak_alias(__nl_langinfo, nl_langinfo);
73	weak_alias(__nl_langinfo_l, nl_langinfo_l);

lib/libc/wasi/libc-top-half/musl/src/locale/legacychars.h deleted-40

...	@@ -1,40 +0,0 @@
1	256,257,258,259,260,261,262,263,264,265,266,267,268,269,270,271,272,273,274,
2	275,278,279,280,281,282,283,284,285,286,287,288,289,290,291,292,293,294,295,
3	296,297,298,299,302,303,304,305,308,309,310,311,312,313,314,315,316,317,318,
4	321,322,323,324,325,326,327,328,330,331,332,333,336,337,338,339,340,341,342,
5	343,344,345,346,347,348,349,350,351,352,353,354,355,356,357,358,359,360,361,
6	362,363,364,365,366,367,368,369,370,371,372,373,374,375,376,377,378,379,380,
7	381,382,402,416,417,431,432,536,537,538,539,710,711,728,729,731,732,733,768,
8	769,771,777,803,890,900,901,902,904,905,906,908,910,911,912,913,914,915,916,
9	917,918,919,920,921,922,923,924,925,926,927,928,929,931,932,933,934,935,936,
10	937,938,939,940,941,942,943,944,945,946,947,948,949,950,951,952,953,954,955,
11	956,957,958,959,960,961,962,963,964,965,966,967,968,969,970,971,972,973,974,
12	1025,1026,1027,1028,1029,1030,1031,1032,1033,1034,1035,1036,1038,1039,1040,
13	1041,1042,1043,1044,1045,1046,1047,1048,1049,1050,1051,1052,1053,1054,1055,
14	1056,1057,1058,1059,1060,1061,1062,1063,1064,1065,1066,1067,1068,1069,1070,
15	1071,
16	1072,1073,1074,1075,1076,1077,1078,1079,1080,1081,1082,1083,1084,1085,1086,
17	1087,1088,1089,1090,1091,1092,1093,1094,1095,1096,1097,1098,1099,1100,1101,
18	1102,1103,1105,1106,1107,1108,1109,1110,1111,1112,1113,1114,1115,1116,1118,
19	1119,1168,1169,1456,1457,1458,1459,1460,1461,1462,1463,1464,1465,1467,1468,
20	1469,1470,1471,1472,1473,1474,1475,1488,1489,1490,1491,1492,1493,1494,1495,
21	1496,1497,1498,1499,1500,1501,1502,1503,1504,1505,1506,1507,1508,1509,1510,
22	1511,1512,1513,1514,1520,1521,1522,1523,1524,1548,1563,1567,1569,1570,1571,
23	1572,1573,1574,1575,1576,1577,1578,1579,1580,1581,1582,1583,1584,1585,1586,
24	1587,1588,1589,1590,1591,1592,1593,1594,1600,1601,1602,1603,1604,1605,1606,
25	1607,1608,1609,1610,1611,1612,1613,1614,1615,1616,1617,1618,1657,1662,1670,
26	1672,1681,1688,1705,1711,1722,1726,1729,1746,3585,3586,3587,3588,3589,3590,
27	3591,3592,3593,3594,3595,3596,3597,3598,3599,3600,3601,3602,3603,3604,3605,
28	3606,3607,3608,3609,3610,3611,3612,3613,3614,3615,3616,3617,3618,3619,3620,
29	3621,3622,3623,3624,3625,3626,3627,3628,3629,3630,3631,3632,3633,3634,3635,
30	3636,3637,3638,3639,3640,3641,3642,3647,3648,3649,3650,3651,3652,3653,3654,
31	3655,3656,3657,3658,3659,3660,3661,3662,3663,3664,3665,3666,3667,3668,3669,
32	3670,3671,3672,3673,3674,3675,7682,7683,7690,7691,7710,7711,7744,7745,7766,
33	7767,
34	7776,7777,7786,7787,7808,7809,7810,7811,7812,7813,7922,7923,8204,8205,8206,
35	8207,8211,8212,8213,8215,8216,8217,8218,8220,8221,8222,8224,8225,8226,8230,
36	8240,8249,8250,8319,8359,8362,8363,8364,8367,8470,8482,8729,8730,8734,8745,
37	8776,8801,8804,8805,8976,8992,8993,9472,9474,9484,9488,9492,9496,9500,9508,
38	9516,9524,9532,9552,9553,9554,9555,9556,9557,9558,9559,9560,9561,9562,9563,
39	9564,9565,9566,9567,9568,9569,9570,9571,9572,9573,9574,9575,9576,9577,9578,
40	9579,9580,9600,9604,9608,9612,9616,9617,9618,9619,9632,

lib/libc/wasi/libc-top-half/musl/src/locale/localeconv.c deleted-34

...	@@ -1,34 +0,0 @@
1	#include <locale.h>
2	#include <limits.h>
3
4	static const struct lconv posix_lconv = {
5	.decimal_point = ".",
6	.thousands_sep = "",
7	.grouping = "",
8	.int_curr_symbol = "",
9	.currency_symbol = "",
10	.mon_decimal_point = "",
11	.mon_thousands_sep = "",
12	.mon_grouping = "",
13	.positive_sign = "",
14	.negative_sign = "",
15	.int_frac_digits = CHAR_MAX,
16	.frac_digits = CHAR_MAX,
17	.p_cs_precedes = CHAR_MAX,
18	.p_sep_by_space = CHAR_MAX,
19	.n_cs_precedes = CHAR_MAX,
20	.n_sep_by_space = CHAR_MAX,
21	.p_sign_posn = CHAR_MAX,
22	.n_sign_posn = CHAR_MAX,
23	.int_p_cs_precedes = CHAR_MAX,
24	.int_p_sep_by_space = CHAR_MAX,
25	.int_n_cs_precedes = CHAR_MAX,
26	.int_n_sep_by_space = CHAR_MAX,
27	.int_p_sign_posn = CHAR_MAX,
28	.int_n_sign_posn = CHAR_MAX,
29	};
30
31	struct lconv *localeconv(void)
32	{
33	return (void *)&posix_lconv;
34	}

lib/libc/wasi/libc-top-half/musl/src/locale/pleval.c deleted-158

...	@@ -1,158 +0,0 @@
1	#include <stdlib.h>
2	#include <ctype.h>
3	#include "pleval.h"
4
5	/*
6	grammar:
7
8	Start = Expr ';'
9	Expr = Or \| Or '?' Expr ':' Expr
10	Or = And \| Or '\|\|' And
11	And = Eq \| And '&&' Eq
12	Eq = Rel \| Eq '==' Rel \| Eq '!=' Rel
13	Rel = Add \| Rel '<=' Add \| Rel '>=' Add \| Rel '<' Add \| Rel '>' Add
14	Add = Mul \| Add '+' Mul \| Add '-' Mul
15	Mul = Prim \| Mul '*' Prim \| Mul '/' Prim \| Mul '%' Prim
16	Prim = '(' Expr ')' \| '!' Prim \| decimal \| 'n'
17
18	internals:
19
20	recursive descent expression evaluator with stack depth limit.
21	for binary operators an operator-precedence parser is used.
22	eval* functions store the result of the parsed subexpression
23	and return a pointer to the next non-space character.
24	*/
25
26	struct st {
27	unsigned long r;
28	unsigned long n;
29	int op;
30	};
31
32	static const char skipspace(const char s)
33	{
34	while (isspace(*s)) s++;
35	return s;
36	}
37
38	static const char evalexpr(struct st st, const char *s, int d);
39
40	static const char evalprim(struct st st, const char *s, int d)
41	{
42	char *e;
43	if (--d < 0) return "";
44	s = skipspace(s);
45	if (isdigit(*s)) {
46	st->r = strtoul(s, &e, 10);
47	if (e == s \|\| st->r == -1) return "";
48	return skipspace(e);
49	}
50	if (*s == 'n') {
51	st->r = st->n;
52	return skipspace(s+1);
53	}
54	if (*s == '(') {
55	s = evalexpr(st, s+1, d);
56	if (*s != ')') return "";
57	return skipspace(s+1);
58	}
59	if (*s == '!') {
60	s = evalprim(st, s+1, d);
61	st->r = !st->r;
62	return s;
63	}
64	return "";
65	}
66
67	static int binop(struct st *st, int op, unsigned long left)
68	{
69	unsigned long a = left, b = st->r;
70	switch (op) {
71	case 0: st->r = a\|\|b; return 0;
72	case 1: st->r = a&&b; return 0;
73	case 2: st->r = a==b; return 0;
74	case 3: st->r = a!=b; return 0;
75	case 4: st->r = a>=b; return 0;
76	case 5: st->r = a<=b; return 0;
77	case 6: st->r = a>b; return 0;
78	case 7: st->r = a<b; return 0;
79	case 8: st->r = a+b; return 0;
80	case 9: st->r = a-b; return 0;
81	case 10: st->r = a*b; return 0;
82	case 11: if (b) {st->r = a%b; return 0;} return 1;
83	case 12: if (b) {st->r = a/b; return 0;} return 1;
84	}
85	return 1;
86	}
87
88	static const char parseop(struct st st, const char *s)
89	{
90	static const char opch[11] = "\|&=!><+-*%/";
91	static const char opch2[6] = "\|&====";
92	int i;
93	for (i=0; i<11; i++)
94	if (*s == opch[i]) {
95	/* note: >,< are accepted with or without = */
96	if (i<6 && s[1] == opch2[i]) {
97	st->op = i;
98	return s+2;
99	}
100	if (i>=4) {
101	st->op = i+2;
102	return s+1;
103	}
104	break;
105	}
106	st->op = 13;
107	return s;
108	}
109
110	static const char evalbinop(struct st st, const char *s, int minprec, int d)
111	{
112	static const char prec[14] = {1,2,3,3,4,4,4,4,5,5,6,6,6,0};
113	unsigned long left;
114	int op;
115	d--;
116	s = evalprim(st, s, d);
117	s = parseop(st, s);
118	for (;;) {
119	/*
120	st->r (left hand side value) and st->op are now set,
121	get the right hand side or back out if op has low prec,
122	if op was missing then prec[op]==0
123	*/
124	op = st->op;
125	if (prec[op] <= minprec)
126	return s;
127	left = st->r;
128	s = evalbinop(st, s, prec[op], d);
129	if (binop(st, op, left))
130	return "";
131	}
132	}
133
134	static const char evalexpr(struct st st, const char *s, int d)
135	{
136	unsigned long a, b;
137	if (--d < 0)
138	return "";
139	s = evalbinop(st, s, 0, d);
140	if (*s != '?')
141	return s;
142	a = st->r;
143	s = evalexpr(st, s+1, d);
144	if (*s != ':')
145	return "";
146	b = st->r;
147	s = evalexpr(st, s+1, d);
148	st->r = a ? b : st->r;
149	return s;
150	}
151
152	unsigned long __pleval(const char *s, unsigned long n)
153	{
154	struct st st;
155	st.n = n;
156	s = evalexpr(&st, s, 100);
157	return *s == ';' ? st.r : -1;
158	}

lib/libc/wasi/libc-top-half/musl/src/locale/pleval.h deleted-8

...	@@ -1,8 +0,0 @@
1	#ifndef PLEVAL_H
2	#define PLEVAL_H
3
4	#include <features.h>
5
6	hidden unsigned long __pleval(const char *, unsigned long);
7
8	#endif

lib/libc/wasi/libc-top-half/musl/src/locale/revjis.h deleted-515

...	@@ -1,515 +0,0 @@
1	31,80,81,87,14,299,74,61,12,344,62,63,1280,1281,1282,1283,1284,1285,1286,1287,
2	1288,1289,1290,1291,1292,1293,1294,1295,1296,1297,1298,1299,1300,1301,1302,
3	1303,1312,1313,1314,1315,1316,1317,1318,1319,1320,1321,1322,1323,1324,1325,
4	1326,1327,1328,1329,1330,1331,1332,1333,1334,1335,1542,1536,1537,1538,1539,
5	1540,1541,1543,1544,1545,1546,1547,1548,1549,1550,1551,1552,1553,1554,1555,
6	1556,1557,1558,1559,1560,1561,1562,1563,1564,1565,1566,1567,1568,1584,1585,
7	1586,1587,1588,1589,1591,1592,1593,1594,1595,1596,1597,1598,1599,1600,1601,
8	1602,1603,1604,1605,1606,1607,1608,1609,1610,1611,1612,1613,1614,1615,1616,
9	1590,29,28,33,37,38,39,40,342,343,36,35,338,75,76,263,77,337,266,267,265,268,
10	300,301,302,318,303,319,281,282,60,324,326,70,315,297,298,288,287,328,329,71,
11	327,325,321,65,320,68,69,322,323,285,286,283,284,316,317,1792,1803,1793,1804,
12	1794,1805,1795,1806,1797,1808,1796,1807,1798,1819,1814,1809,1800,1821,1816,
13	1811,1799,1815,1820,1810,1801,1817,1822,1812,1802,1818,1823,1813,258,257,260,
14	259,262,261,256,93,90,92,91,349,89,88,73,72,341,340,339,0,1,2,22,24,25,26,49,
15	50,51,52,53,54,55,56,57,58,264,269,43,44,32,
16	768,769,770,771,772,773,774,775,776,777,778,779,780,781,782,783,784,785,786,
17	787,788,789,790,791,792,793,794,795,796,797,798,799,800,801,802,803,804,805,
18	806,807,808,809,810,811,812,813,814,815,816,817,818,819,820,821,822,823,824,
19	825,826,827,828,829,830,831,832,833,834,835,836,837,838,839,840,841,842,843,
20	844,845,846,847,848,849,850,10,11,20,21,1024,1025,1026,1027,1028,1029,1030,
21	1031,1032,1033,1034,1035,1036,1037,1038,1039,1040,1041,1042,1043,1044,1045,
22	1046,1047,1048,1049,1050,1051,1052,1053,1054,1055,1056,1057,1058,1059,1060,
23	1061,1062,1063,1064,1065,1066,1067,1068,1069,1070,1071,1072,1073,1074,1075,
24	1076,1077,1078,1079,1080,1081,1082,1083,1084,1085,1086,1087,1088,1089,1090,
25	1091,1092,1093,1094,1095,1096,1097,1098,1099,1100,1101,1102,1103,1104,1105,
26	1106,1107,1108,1109,5,27,18,19,3915,8793,6934,10843,7493,6671,7492,4379,10291,
27	11294,12033,4110,4685,12034,7939,12577,5173,10521,7494,11549,10529,12035,8773,
28	12036,5465,12037,4924,8719,6982,12038,12039,12040,9748,5174,9750,9538,5922,
29	10770,18472,12041,7495,12042,4372,5444,5967,11080,13573,11343,9564,4868,5140,
30	12043,12044,11546,11292,8263,12046,6741,9554,12049,4125,5950,5949,3909,11818,
31	11817,6418,3840,12050,12051,12052,10771,12053,5969,3910,10833,5211,5212,5213,
32	9025,11547,12054,12055,12056,7724,7193,7725,12061,12059,12060,5175,6402,4431,
33	12058,12057,10504,6693,6692,8477,12062,10292,8006,23,12063,12065,8516,11584,
34	3881,12064,4381,5411,8774,5710,12066,9731,4938,12067,3882,5951,4939,10329,
35	10001,5176,4432,12102,9248,9803,12069,10011,11585,7692,6694,6742,4383,9008,
36	8705,12073,3883,9026,7194,6419,11267,8493,4382,12072,11293,12068,12070,6477,
37	12071,13315,12079,12082,12080,4385,10522,12074,12078,5970,6695,4869,12083,
38	12075,11586,6743,12076,12081,12084,12077,5376,3884,5377,4384,13316,10840,
39	10317,5971,7694,11542,10551,5655,8452,4419,7218,12088,12093,12091,12086,8462,
40	12089,12092,12090,10556,12087,7693,10834,12094,12095,7171,12108,9775,10261,
41	12103,10575,4373,12107,12101,12110,8241,5923,9787,16166,12109,9276,12098,5973,
42	5972,12096,6969,12104,10574,8748,12100,5712,12097,12105,12099,11568,12106,
43	11808,5445,5711,12111,12112,12116,3885,10543,12115,12114,12118,12117,9027,
44	5713,12119,6948,8453,9028,5461,12120,5141,12121,12123,10772,5701,6672,10070,
45	12122,6436,11298,12125,12290,12124,6435,7260,5656,12291,5422,12288,12289,9486,
46	8283,5378,10796,12292,11548,12293,12296,12294,8237,12295,12297,12299,12298,
47	10535,5142,12301,12302,4366,12300,6995,12305,12304,12303,12085,12306,7261,
48	12307,11268,11064,12309,12308,12311,12310,12312,12313,3923,5908,5658,7195,
49	8794,5379,8007,5974,6221,12315,11047,9253,6744,12314,12316,9277,4692,12317,
50	9565,8211,12319,12320,9995,5975,11802,12321,5381,10523,8469,5456,
51	9236,5714,12322,12323,9537,4158,12326,6492,12325,6437,12327,17741,12328,10784,
52	12329,12330,12331,7496,6955,4870,12334,12332,11036,12333,10297,12335,12336,
53	12337,9278,12341,12339,12340,12338,6466,12342,11081,11587,12343,7943,12344,
54	7225,12345,8795,11550,9279,12580,12346,21252,5412,12347,10813,7239,8539,12349,
55	9539,12350,12351,4621,12352,5382,9515,4185,7215,9984,12353,9280,7726,12354,
56	10507,7993,4865,4872,12355,12357,5657,12356,11602,7240,10012,10539,12358,
57	11351,12359,12360,9309,12361,7944,6493,5715,12362,6696,6222,9029,12364,8454,
58	6478,12365,12366,8207,12363,12368,10773,6211,12367,5716,6461,9804,12371,12369,
59	10330,7497,12378,4675,12372,12370,8238,12374,12373,4643,5695,12379,11532,
60	12375,12380,12377,12376,11566,5976,4386,11603,7252,9271,6212,12545,12546,
61	11588,11786,12548,5977,12547,4622,12549,10805,8987,11269,10552,12550,20276,
62	9487,12551,4873,11026,7424,12552,10566,12556,7945,12553,5423,12554,4874,5645,
63	12557,12558,12559,12560,6970,5978,11069,11079,9558,10576,12561,12562,12564,
64	12566,12565,12567,4380,10795,6491,12568,8248,7425,5384,12569,10042,12570,
65	12571,12572,12573,10243,5447,3908,9502,12574,7196,8008,12576,12575,7426,5952,
66	12578,10013,12579,10043,8467,8525,5383,9549,8720,9805,10797,12581,8009,5652,
67	12582,12583,4107,3924,4940,8455,5168,11344,12586,4374,12585,5385,12587,11088,
68	12588,11569,5979,5909,12589,12591,12590,7742,4120,4157,12592,12593,5910,12594,
69	5197,6673,12595,10835,6420,5177,11270,8239,10014,7004,7206,6983,
70	6996,7253,10015,12598,4130,8240,5980,5924,5446,12602,8704,8541,5386,7427,
71	12603,12601,4387,8517,6935,6698,4101,4687,6213,6697,12604,12605,5160,4645,
72	6214,5159,9022,4100,9488,11037,6144,11352,9254,5981,5646,12614,5442,10793,
73	10044,12613,4925,12608,12609,12611,12612,5178,7744,10508,12610,12606,5954,
74	12607,11779,10577,9031,5953,6223,12615,9532,12619,7005,6997,12622,12620,11010,
75	12617,12626,12621,12624,5925,11038,12625,12627,12629,6479,11809,12618,12616,
76	12628,12623,12631,12802,12633,12637,12800,12634,12829,6472,4624,12632,12804,
77	3925,12803,3844,10281,12801,12635,12630,12636,6439,12805,3926,12814,12806,
78	12807,7428,10824,12812,12811,9230,12813,12810,4115,6421,7695,12808,9281,12809,
79	3841,12819,11266,7430,12825,12824,12815,8482,12816,8526,12821,7429,12818,
80	11075,5659,12822,12823,12820,12826,12817,12832,12837,12833,12828,12838,8208,
81	12840,6145,12830,8796,12834,12827,4876,4941,4676,12835,12831,5717,12841,12839,
82	8242,5161,5387,12836,5459,4131,12845,12843,13062,12848,12842,12846,12844,6699,
83	12847,12850,12855,12853,12852,8721,4388,12849,12851,7431,4114,12854,4413,
84	12865,7515,12861,12859,12860,12862,4124,8216,12856,12857,4697,12864,4942,
85	12867,12863,12866,10509,9524,10007,12869,12868,4644,12870,12873,12872,12871,
86	9752,12874,12875,12877,12876,12879,12882,12880,12878,12881,12883,12884,12885,
87	12886,12887,12324,7003,6700,4434,3927,8739,12888,6403,3886,7741,12889,5926,
88	6224,12891,12890,10559,12892,13056,12893,13057,13058,5718,4159,13059,13061,
89	13060,
90	13063,9273,13064,3860,6462,5660,8750,13065,13066,13068,13069,6467,5424,10774,
91	13067,13070,6432,6146,13074,6404,8722,13071,9017,13075,7745,13073,13076,5662,
92	13077,13078,6147,4639,13080,13081,13082,13079,13072,13083,13084,10819,7498,
93	13086,13087,13085,13089,9751,3911,10293,13090,7516,6936,9788,4943,6474,10808,
94	9489,5719,8494,13088,13091,8483,13092,13093,13095,9032,4877,21248,4160,10578,
95	7499,9255,6469,13101,10524,11580,4435,13097,8217,13100,9282,9256,9283,10008,
96	9004,6440,13096,4181,9237,13098,13094,7727,13102,7213,5388,13103,10567,8284,
97	8997,13105,10798,13106,13111,10510,13110,13104,13107,13109,6405,10536,13112,
98	8740,4436,7500,13114,13113,6215,13115,13117,13116,13119,13108,13121,13120,
99	13118,6701,7728,8243,13122,7963,3916,9795,9018,13124,13123,13125,13126,13127,
100	13128,10544,13129,4389,13130,11291,4623,12584,7207,8478,13131,11082,11027,
101	13133,8518,9238,8479,10294,13134,13135,4186,6937,13136,3887,13137,13138,4161,
102	4944,9535,10579,13142,8244,13141,5663,10810,13140,9284,13144,13143,13146,
103	13145,4187,13147,7432,13149,8708,13148,10514,7254,9274,13312,6148,13313,9728,
104	10045,11056,9732,13322,5143,11300,11022,13579,13314,13317,8484,10775,9257,
105	13318,10820,6441,7433,13319,6703,6702,3864,5927,7946,3888,13323,13324,13321,
106	4119,4878,13320,11044,10256,3847,3928,6704,3889,3842,13329,13327,11035,13330,
107	13328,13326,7696,13325,10553,5955,13334,13335,7434,13331,11787,9771,13333,
108	6406,13336,10295,13337,13332,11034,9789,13338,10257,13339,13343,
109	13340,4390,13342,6938,13341,5720,13355,13348,13345,8771,13344,13346,13347,
110	13349,13350,4945,13352,13351,13353,7501,13356,9019,4132,13354,13357,13358,
111	13361,13359,13360,6705,13362,6149,13363,6745,8471,13364,13365,6713,6150,11057,
112	5127,5928,13366,4663,13367,8472,13368,13570,13369,13370,13371,13373,13374,
113	13375,8527,4102,6984,3873,8246,4879,6932,6151,9285,7168,4880,8775,9033,3863,
114	5144,10580,6945,5169,8010,6939,11271,13376,5179,6442,4625,4162,7435,4391,
115	13377,11301,7208,6979,13378,4946,9521,11016,13379,13380,10296,13382,4871,5462,
116	13381,4881,7697,13386,6656,4392,13385,13383,13387,13384,9738,15148,7698,13388,
117	11551,13389,13391,8797,13390,7938,6746,8495,6998,10324,8011,6956,13392,7436,
118	13393,13394,3890,8473,7729,13395,9490,7437,7438,13396,8012,7439,13397,13398,
119	11071,13399,5413,7169,13400,13401,6971,7691,9555,7731,10071,9729,5416,13402,
120	5198,13403,5469,9518,4367,6706,13404,13569,13568,5468,13405,9239,8463,9258,
121	6951,8247,11353,13571,13572,9525,6674,13574,13575,13576,4947,13577,13578,4363,
122	8218,4931,13580,11015,8497,4664,13582,13584,4926,13581,13583,13586,13585,
123	13587,13588,9500,5389,4420,13589,13594,13592,10582,10581,9286,13591,7219,
124	13590,7761,13595,6473,13601,13602,13596,4626,13597,13606,13605,13604,13600,
125	13599,13603,10583,13610,13607,13609,11345,13608,13598,7762,13611,6422,13612,
126	13613,13616,13615,13614,9287,13593,13622,13618,13617,13619,13620,13623,11589,
127	13624,13621,13625,4927,13626,13628,13627,13629,13630,8013,7170,
128	7235,8258,6152,6423,6153,5199,13631,6424,5929,13632,11013,9762,13633,6154,
129	4875,8710,5425,6707,10298,10016,13634,4948,13637,8960,13636,13635,13638,9034,
130	7746,6708,7977,8498,5121,8961,13639,13640,7502,10776,13643,13642,13641,10332,
131	13650,10809,13644,13646,10826,13645,13647,9991,13648,10525,13649,4882,10526,
132	9742,13651,13652,6155,4883,13653,5911,11299,11272,4949,13655,8962,6156,7440,
133	10046,7441,7255,9035,10584,9240,6157,10299,13656,9272,6433,5930,9036,3874,
134	7245,6158,11302,13657,13658,9776,13659,11606,11788,13661,13660,4646,13824,
135	13827,13828,13826,10271,7442,13830,13829,13825,13831,13832,13833,13836,13834,
136	13835,13837,4163,9037,13838,5721,4437,9749,13839,9562,10554,13840,11789,13841,
137	10527,13844,12032,12048,6927,9556,13845,5180,8963,3929,13846,10501,6159,8751,
138	9038,11086,5912,5931,13847,13848,13854,6980,8964,5390,13849,10250,8741,13850,
139	13851,5391,13852,13853,13855,9301,13856,13857,13858,13843,13842,13859,5664,
140	10246,6443,10262,8965,10282,13860,7443,4133,13861,13862,11089,10047,13865,
141	4188,7947,13864,13863,5665,8499,13869,13867,13866,11526,5956,7256,13868,9259,
142	7197,9503,13872,13871,13870,13873,5957,13874,10331,7226,13875,10072,9504,8966,
143	9231,13876,5130,7699,10251,4950,9733,13877,6709,10777,10778,4189,13882,8776,
144	13879,4438,14092,13881,9743,13880,13878,6233,13884,13890,13896,13888,9275,
145	13893,10300,13887,13892,11590,6710,8500,13885,5181,13895,7948,4164,13889,4439,
146	13894,5392,13891,13897,13899,13909,13907,13904,13903,11607,
147	13905,5393,6160,7257,13912,13898,13902,13886,4441,13906,13908,8752,6407,4375,
148	13900,13911,13910,5394,8456,4677,5666,13901,13913,13916,14080,6940,14086,9039,
149	13914,14084,4440,14082,14083,13917,14081,5958,11273,4884,4152,14085,9753,3852,
150	10048,13883,14091,14095,11076,14088,9288,14093,7503,14094,9526,11814,14090,
151	14096,6234,7978,3891,14089,14087,8249,13915,6675,8485,14108,8250,14103,14100,
152	14101,6981,14104,14107,14102,7172,14105,14099,11099,11098,14109,14110,3892,
153	14098,5457,3845,4885,14106,14114,14113,14118,14119,14117,14120,14112,14116,
154	14121,14122,14111,6747,14115,8501,6161,14097,7700,14135,10568,14125,14126,
155	14127,14134,14133,10844,4886,14131,5668,4627,14128,11543,14130,3893,14132,
156	14123,14129,14136,5667,14124,11324,11274,14139,14143,8285,11608,14144,14141,
157	14138,14137,14142,10511,9491,5669,14145,14140,14146,5722,4368,14154,4887,
158	14152,14153,6408,14151,14149,14148,14155,14147,14157,4442,14159,14158,8967,
159	14162,14160,14150,5723,14161,14165,14164,14166,14163,14167,14168,14169,10569,
160	14171,14170,7198,7949,4421,4443,14172,3870,7979,14173,19234,14336,5696,14337,
161	8014,14338,14339,5145,14340,14341,14342,8502,5932,11072,10779,7241,14343,8015,
162	19740,10049,6985,6444,14344,8486,10502,8528,14347,14345,14348,14346,14349,
163	10512,3862,10301,10050,14350,14353,7444,5146,14351,14358,7445,14352,9763,
164	11325,14354,14355,14359,9289,14356,6162,7997,14373,10003,8529,10051,14604,
165	10585,9040,10836,14362,4352,8777,14371,8723,14365,14372,14367,14374,14370,
166	14369,9806,14363,
167	4444,14361,5200,8530,14357,14360,6163,7994,7446,14368,9777,5201,4647,4678,
168	7680,14376,14381,14377,5724,14382,6657,6216,7173,14364,6748,14379,6711,14380,
169	3875,14375,8968,5202,5395,14378,3846,6434,7701,9041,10035,14384,8253,8457,
170	6666,14385,14387,14383,10560,8988,8251,10586,6957,14399,14398,7767,5725,14392,
171	7448,9543,9744,14390,8252,6999,14395,7447,14389,14394,9778,14388,5632,4668,
172	14396,11530,6445,8724,14393,7995,6164,7747,4165,8219,14391,5156,5670,9006,
173	14397,8254,14400,14402,8470,14408,14403,14405,10272,9042,14406,11275,11303,
174	4888,3853,14404,14401,4951,4166,14407,11304,14411,8474,14418,14412,14409,
175	14416,14386,14413,14417,10017,9290,14410,14414,5671,6480,7996,14422,9221,
176	14419,10815,14420,14421,11053,7937,5697,14428,6676,14425,14424,9745,9492,9232,
177	14426,14427,10318,9764,6658,8016,10799,4648,14596,14429,11305,14598,14594,
178	14595,8255,14593,14366,14597,14592,14602,14603,9222,14605,6659,14600,5147,
179	14606,14599,14610,14609,14608,14611,14613,7504,14612,14616,14614,14615,14415,
180	14618,14617,14423,14619,14607,6712,14620,14621,14623,14622,14624,4445,6165,
181	10587,7950,5933,14626,14629,10289,5182,14628,14627,9779,14630,5396,14632,
182	14631,4889,6677,9527,5672,7763,14633,7951,9223,10302,14634,14635,14636,10519,
183	13372,7973,10283,6455,10052,10018,9260,11552,14638,6959,14639,3861,5427,7980,
184	10303,14640,6689,8742,6714,7702,14641,10588,4182,6715,14644,14642,14645,11544,
185	14643,8026,14646,8465,14647,4953,14649,14648,14650,14651,4954,9563,
186	8725,5195,6716,8256,7227,3855,14652,4353,14656,6166,14655,6410,7449,14654,
187	7450,11039,6409,3894,7981,14661,7952,4134,7220,10821,6481,7451,7942,14660,
188	14658,14659,8778,14853,14665,6749,6167,14663,14664,7703,14662,6670,14667,
189	14666,14671,14672,14668,4609,14669,14670,10036,10304,5673,14673,7953,7452,
190	8753,5414,14674,14678,4394,14675,14677,14676,7242,8743,3876,14679,14680,8969,
191	11600,6690,10570,10780,14849,14682,14685,14684,14681,14848,9533,14683,14850,
192	7243,14851,11306,9815,14852,14854,14855,14856,5417,4135,6168,14857,14858,7248,
193	8257,12599,8221,8220,8503,6438,12113,5709,11276,10589,10333,14859,6482,8990,
194	14860,11790,10781,8970,14861,4955,14862,14863,11065,11011,10837,10811,6660,
195	14865,6986,10800,14867,14870,14869,4952,5183,14866,14868,14871,7768,11354,
196	3880,6463,8475,6972,7506,14874,9261,14872,8458,14873,7505,11068,14875,14876,
197	11335,14881,6169,9780,14878,9291,14653,14657,5166,9766,14880,7453,10019,14886,
198	10073,14877,14883,14882,7982,10828,11570,10822,4395,6717,11815,14885,7764,
199	14884,14879,5934,14891,14889,4396,14887,14893,14899,8487,10528,14901,10241,
200	14900,9807,10782,4890,8022,7199,9010,11277,14896,14895,14897,14894,14902,
201	14892,14890,14898,14888,8779,11095,6949,6483,6425,10830,4640,9005,9513,4136,
202	8017,7955,5641,14904,6170,4699,14906,4691,14912,14909,8018,4650,6411,4649,
203	6446,14907,5700,5674,9292,14905,3877,14908,14910,5420,5643,4891,5162,14913,
204	6488,10832,6678,14914,10255,14926,4370,14915,14932,14916,11553,14923,
205	9790,14931,14918,3859,14920,6171,14922,14921,14917,14928,7454,13132,5959,
206	11355,14919,9043,4610,6412,14911,14927,4672,14925,14929,9293,4957,15121,11048,
207	14934,4956,14941,10783,15104,15106,15110,14936,8713,9294,15114,14939,15111,
208	15105,7704,15115,7954,15113,4892,11823,14933,15109,3895,14935,11033,14940,
209	7681,8998,14930,15108,7769,15118,4688,5888,15120,14937,15119,15112,14938,
210	15116,15117,15134,9517,15107,15130,15132,9015,11307,10325,15127,8489,15133,
211	8222,15124,15137,15136,9550,15135,9545,15139,15126,5415,15129,7228,9791,15131,
212	5418,15123,15125,15122,11791,4665,15128,15138,4628,6470,4156,15155,11792,
213	15158,7705,15157,15156,15153,15141,15170,15140,15159,15151,15146,15143,15144,
214	15152,21249,15149,6172,8999,8259,15147,15142,15145,11308,10825,15150,15160,
215	15168,15161,15174,15172,15167,15166,9007,8260,15164,15162,15169,15175,10068,
216	15181,15176,15179,15173,8787,10263,15163,15171,7455,11054,15191,15178,5889,
217	4354,4670,15154,7456,15183,15190,7000,4689,8717,15180,15185,15189,5397,5163,
218	15187,5120,9514,15186,15188,15182,15184,4671,8744,15195,15193,5960,15192,
219	15360,14903,15194,15196,15197,15371,15367,14924,15366,15365,15362,15177,15364,
220	15363,15369,11781,15372,5466,15368,15370,9990,15373,15377,15374,11346,15375,
221	15165,15378,15379,4116,15381,5702,6912,5428,4355,11326,15383,15382,15385,5148,
222	5429,4893,15388,15387,15389,4397,8726,15390,4894,15392,15391,15393,15394,
223	15395,6718,7956,6400,10319,10561,11811,6740,6447,11601,15396,15397,6719,15398,
224	15399,15401,15400,10807,
225	7229,6987,6691,15402,15404,7682,15403,15405,15406,15407,15408,15409,15411,
226	15410,15412,4356,8745,15413,6661,4651,15414,9249,13099,5122,15415,15416,10571,
227	10823,9510,15417,10053,10074,11058,15418,15420,15419,15422,15421,15424,6720,
228	11024,15425,15426,5123,15427,15429,15428,7748,10264,4137,10020,9044,7200,5184,
229	10021,6925,15431,4895,4183,9553,15430,6173,8754,15432,15440,15433,8480,5185,
230	15441,5703,5124,15439,15437,15434,11327,8991,9528,15435,15443,15442,5634,4364,
231	6426,15436,15438,10806,8531,10838,15451,15452,4398,10503,11100,15616,6914,
232	7457,15447,15453,4167,5398,15444,15449,8019,9808,10054,15446,10752,15448,
233	15619,15617,15450,10753,9767,5186,9220,8780,15620,15618,8504,15445,4138,11309,
234	15631,15630,8021,15627,11339,9493,15621,8996,4139,6174,15624,7174,15629,15628,
235	15623,15626,4679,15625,9768,11533,7507,8020,15637,15635,10284,15632,15634,
236	4121,6175,11793,4636,10305,11328,4611,7706,15636,15641,7458,11279,15638,15633,
237	15639,11581,9298,9505,4629,4148,15645,15648,11554,11331,15655,15649,15646,
238	11571,15652,7209,15654,15659,9296,15657,15651,8727,15658,15647,15653,15660,
239	3931,15650,15661,7707,7230,10500,6413,15642,15656,9241,7957,4680,6448,7459,
240	15644,7201,5675,15643,15665,7244,5913,15680,15674,5203,9262,15669,15678,3854,
241	4113,4376,15671,8459,15662,15664,6176,15681,15676,15668,15675,11018,15673,
242	15677,5935,7460,8728,15667,11278,15670,15663,9297,15666,15672,11824,6941,
243	10845,15682,9997,15694,5914,7231,15684,11534,6177,15697,3917,15695,15683,
244	15689,15691,11310,15686,9229,15688,15696,15690,11046,15685,6913,15709,4681,
245	15687,15692,15693,8523,8505,15701,15707,15705,9224,15874,15702,15703,15679,
246	5208,10265,6942,6230,11794,15699,15873,4168,8261,9816,4896,11609,11008,9009,
247	15706,15708,8209,15872,15704,15698,4898,5704,15886,15881,8023,4674,7232,15890,
248	15883,8971,15880,9016,15915,15877,15876,15885,15879,15878,15884,7936,15875,
249	15887,15888,4897,15893,15892,15894,15897,9250,15891,15895,5698,8536,15889,
250	9754,15896,15901,15899,15902,15905,15898,6217,9735,15640,11347,15900,15904,
251	8532,15903,15882,20040,15908,15912,15910,15906,15907,15911,15909,10285,15917,
252	15914,15913,15916,9523,15918,8788,8524,7940,15919,15921,15920,15700,15922,
253	9542,15923,4399,9299,4612,5187,6973,6449,11782,7749,4169,15925,15924,15928,
254	8729,15931,15926,15930,15929,9247,3896,11604,15933,4103,15935,15934,15932,
255	15927,10754,15937,15936,4170,15939,10513,15938,11028,7462,8210,7461,11610,
256	15945,8024,15941,15946,4171,15944,9792,15940,15943,7463,10032,15947,6960,8025,
257	15950,15942,5638,15948,11311,15951,21253,7214,15952,15953,9741,15955,15956,
258	9746,9300,15958,15960,11572,15957,15959,4172,15954,12858,15961,8262,6679,
259	15963,15962,7683,12600,15964,16128,15949,15965,16129,9817,16130,16131,16132,
260	16133,9021,16135,16134,16136,16137,6974,10306,11083,16138,16139,8245,6915,
261	16140,16141,16142,10545,10022,16143,9782,8972,16144,4422,5196,11045,11029,
262	4371,11795,10801,10505,7958,16145,9506,5890,16146,6451,16148,16147,16149,
263	16150,16151,5149,16152,16153,
264	5891,10023,16155,7508,16154,5399,16156,16158,16157,16159,5936,16160,5448,8223,
265	6236,16162,16163,16161,6988,9511,5400,16165,8715,16164,11796,9793,16168,16170,
266	16167,11059,16169,16171,11555,16175,16174,8789,9740,5892,16173,16172,11280,
267	11281,16176,4173,6229,6721,16177,16178,16180,7202,16182,16181,16183,4652,
268	16185,16184,16187,16186,5915,11527,5419,4357,5449,4928,11591,16189,16191,
269	16192,4400,16188,6680,8992,16190,16195,6989,16193,5661,10024,16194,16221,
270	16200,5916,5188,16197,11356,11535,8533,16199,16201,11573,5430,10075,9769,
271	16202,16204,16207,16203,16206,5961,4140,16208,7759,16205,11579,16211,21251,
272	16209,16212,16198,16210,6427,16213,16214,11357,16215,16216,16196,16217,4899,
273	6916,16218,16219,16220,4122,16384,10266,16385,4867,16386,16387,16388,16390,
274	16391,16389,10290,16393,16392,16395,16394,16396,16397,16399,16398,6232,16401,
275	16400,4900,7730,9243,16402,7959,6681,4184,16403,11312,10562,16404,9251,11282,
276	6178,7708,8746,12563,8973,4423,16405,16406,16411,16409,16408,14625,4613,16407,
277	3897,9993,10025,11536,16412,16410,8763,7941,9994,10252,16414,11531,5676,16415,
278	16413,10037,16416,16417,3898,7509,16422,16419,9548,16418,5125,16425,16420,
279	16421,16424,16423,10244,8225,8224,5150,16426,16427,16428,16430,16429,4149,
280	16438,10055,16432,16434,16436,7709,16437,16435,6943,16431,16433,10273,7464,
281	16440,16439,16441,6917,6414,9302,16442,9002,16444,11520,16443,8264,16449,
282	16451,16452,8755,16450,16447,16445,16446,16448,16455,16453,16454,16456,16458,
283	16459,16460,16461,16457,
284	16463,16462,16464,11556,16467,16465,16466,4929,11101,10537,16469,16468,16470,
285	16471,16475,16472,16473,16474,16476,16477,16640,16641,16642,9998,9263,16643,
286	9809,10259,16644,16645,9225,4614,6179,16646,16647,16648,6664,16650,16649,
287	16651,16652,10056,16653,16654,21064,16655,16656,16657,6669,16658,9781,10814,
288	4141,4150,16659,16661,16660,9295,7960,15384,16662,11040,16663,4901,10038,
289	16664,16665,16666,11067,11060,8989,8265,16668,7233,7465,16671,16670,16669,
290	10076,4902,5896,16677,16674,7710,11025,16673,16675,16676,16672,16678,16679,
291	8974,4930,8772,16680,16681,16684,7750,9507,16685,10802,16682,16683,16688,
292	16687,16686,16690,16689,16691,16693,16692,10540,7221,11557,16694,9494,16695,
293	16696,16700,16698,16699,16697,16701,16702,16703,16704,11030,16705,11087,16706,
294	8749,9801,5450,8730,16707,5401,7983,16708,6428,16709,16710,5893,6452,16712,
295	9269,6453,5165,10755,9770,9270,6203,16714,7466,11537,6180,5894,9986,16716,
296	16718,5962,16717,9045,16720,4630,16715,10057,4111,6475,11825,16719,16721,
297	10538,7992,16723,16724,16722,4653,16730,16729,6918,16731,16726,16732,16727,
298	10039,16725,16728,16897,16896,10816,16733,3914,16899,16898,7467,16900,8226,
299	16902,16901,16903,16711,16713,16905,16904,6919,11592,6961,16906,5654,5151,
300	5126,6722,11283,16912,16911,8227,16908,16910,7210,7711,16909,16907,9737,7468,
301	10267,6454,9303,16913,16914,16936,5431,11804,8212,16915,4401,9046,10496,16916,
302	5209,16917,16919,16920,9736,16921,16922,16923,5432,4402,9508,7175,6723,16924,
303	7176,4393,10274,16925,
304	10058,8228,16928,16929,9800,7712,16926,8768,16927,7469,3899,5128,16930,9047,
305	16931,7974,11020,10242,16932,16933,8756,11558,16935,16934,6990,16937,3919,
306	16940,16938,4403,5677,16939,6181,6225,10565,16941,10803,16943,7984,4142,4377,
307	3851,16942,16944,16945,7510,16946,4654,16948,5705,5189,16949,5460,16950,8027,
308	9516,7999,6484,16951,8769,8266,16953,16955,16952,16954,5633,16956,5637,5190,
309	11313,16958,16959,4109,16962,4693,16961,16960,16964,16957,16965,11528,16966,
310	16967,13139,16969,16968,16970,16971,11540,16972,20302,7470,16973,16974,7222,
311	9495,16975,8711,16976,8731,16977,5380,12318,8764,6930,4903,16978,17153,16981,
312	5191,16980,17155,16979,7471,16983,16984,9226,16985,4669,7737,10307,16987,8519,
313	16982,16986,16988,6490,17157,10253,9989,9304,5433,17156,17154,10004,16989,
314	8765,9306,9305,6485,17175,17159,17161,17164,17165,17162,17163,17160,17158,
315	17152,10542,4404,17172,17169,17174,17173,9810,11014,6682,17167,17176,17171,
316	17170,17166,17168,4904,8732,8028,9985,17181,9987,8000,17178,10030,17182,10546,
317	8762,17177,17179,17180,17183,6947,9509,17188,17187,17184,11797,17193,17197,
318	17194,17190,17191,17196,17185,12596,17192,17186,17195,17201,4905,17198,17199,
319	17200,17203,17202,10069,17204,11611,10572,17209,17206,17205,7985,17208,17210,
320	17207,17214,17211,17212,17189,17213,17215,17216,10533,17217,11073,5421,5640,
321	17218,10515,7751,11023,17219,11538,9811,8229,9747,7212,3871,17224,17222,17220,
322	4864,7472,17225,17223,17221,17229,17228,17227,17226,17230,17231,7961,17232,
323	17234,
324	17233,5937,8215,17236,9307,17235,17237,10516,8267,6182,17238,11559,17240,
325	17241,17242,17243,6724,17244,5678,5193,5129,17408,11090,6183,17245,17411,
326	11077,9755,10258,7234,17410,6962,6184,6725,5192,10517,17409,8230,10785,6486,
327	6726,9020,17414,11582,6456,17415,7713,17417,7473,6415,17416,7177,5917,8231,
328	17412,17418,17413,5679,17421,17425,5706,17420,17429,6185,11340,3867,17426,
329	5194,17423,17424,9308,17422,17419,4615,8003,5895,17431,17428,17430,17427,5680,
330	8466,17432,8269,17445,17441,17435,17439,7001,3900,17434,17442,17446,6186,
331	11061,9013,17436,17444,17433,8733,17438,3868,11049,17437,5434,10059,8268,
332	11567,7246,17485,17447,8029,17443,17448,17450,9048,17453,17449,10547,4906,
333	11050,3901,17452,11612,17451,4174,9547,17454,17461,17455,17462,17458,9818,
334	6953,17460,17457,17463,17456,7203,10756,7211,17459,17471,17467,17470,17468,
335	17472,17466,17440,7986,10026,17469,17464,8192,5681,7178,7684,8213,17475,17477,
336	17478,17474,17476,17465,17473,17481,17480,10841,5642,17479,17483,17482,17486,
337	17488,6683,17484,17489,17490,17491,17497,9242,17493,17492,17494,17495,17496,
338	17498,17499,4907,17500,17501,17664,17665,17666,17667,17668,17669,17671,17670,
339	17672,17673,17674,17677,17675,17676,6464,5682,8757,10002,7247,9772,10060,
340	17678,14156,17679,17681,11332,17680,17683,17682,11314,17684,10077,17685,17688,
341	17687,17686,17689,5649,8193,5152,17693,17690,17691,17694,17695,17692,4104,
342	4358,17697,17698,17699,11329,7179,17701,17700,7752,17702,17703,17704,4932,
343	4908,17705,17706,10812,11330,
344	11315,11798,6188,17709,6963,17708,17710,6920,8496,17711,6187,11062,17712,
345	17713,17714,17715,17716,6921,11084,17718,8734,17717,17720,17719,17721,7962,
346	17722,17723,10520,17724,8270,17725,17726,11613,17729,17728,17727,8975,17730,
347	7685,17731,17732,11799,17733,17734,17736,17735,9988,9560,11805,9992,17738,
348	7474,10249,17739,17737,4909,5939,6727,10061,5897,10786,17742,17740,6189,6190,
349	3912,6471,9784,3902,17747,8735,9783,8506,17749,17745,17748,17743,17746,10757,
350	5940,3932,17744,17751,17752,9496,5402,17925,9756,6728,5403,7975,11813,11021,
351	17750,7987,5170,17753,17755,17754,17756,8709,9757,8976,17922,17921,17757,7732,
352	10308,17924,17923,6191,11826,17940,17928,17929,6991,17927,6231,17926,17930,
353	8977,10497,8194,8507,17934,17935,17931,17932,17933,6192,17941,17937,10309,
354	10827,10247,17936,17939,17938,10787,17942,17943,8214,17944,17946,17950,17947,
355	17945,9758,17948,17949,4369,17956,17951,17952,17953,8448,17955,17954,17957,
356	17958,17959,7714,4424,17960,11574,6922,7180,6729,8758,17961,17962,4112,17963,
357	17964,17965,17966,17967,5404,14601,17968,8004,17969,6954,17970,12047,17971,
358	10557,4923,8195,7223,10320,7181,17972,6193,17973,10027,17987,17975,8488,9812,
359	5918,17974,8196,17976,9049,17978,17977,17980,17979,17981,17983,17982,4910,
360	17984,17985,17986,6416,11560,17988,7686,4175,17989,17990,17991,3921,17992,
361	17993,10310,6950,17995,4616,3857,17994,17997,9773,7715,4405,10758,5692,5435,
362	17996,4425,4866,4176,18001,11593,8508,10275,18013,4406,18011,18009,18000,
363	17998,17999,
364	6978,5451,8790,9520,4144,18003,18002,18008,18004,18007,11055,18006,4407,4700,
365	18010,18012,5683,18178,18187,18188,3850,18195,3920,18186,18185,18180,18179,
366	18177,18176,8770,8538,18182,18181,18184,8271,5684,4128,18183,6194,8272,18201,
367	18202,4408,4365,18199,18189,18197,18204,18198,18196,18005,18194,18190,4911,
368	18192,18203,18193,18205,18191,9819,11336,18200,18222,18214,7770,5157,5436,
369	18209,4410,7475,18212,6457,9264,18217,10573,18208,4409,5941,10248,18218,18206,
370	18215,18225,18210,18211,9497,18216,18213,10759,18219,3903,18207,18221,18220,
371	9802,18227,18238,4701,18241,18223,18228,11341,18237,11316,11529,8791,4682,
372	10321,18243,9472,3856,18236,18232,8273,18226,18234,18239,9739,3849,18231,
373	18240,10327,18235,18230,7476,7182,6923,11063,10278,18246,18255,18233,4694,
374	7511,18244,18249,8274,18245,18252,8766,18253,11317,18242,4631,18248,18251,
375	11019,18254,18247,18250,10760,11776,18258,18265,18257,6946,18224,10541,11009,
376	18264,18263,18259,18260,4117,18262,18256,9012,18261,3933,8449,10530,18266,
377	18432,10040,18269,7477,6952,18434,5405,18435,10328,18268,18229,18267,11822,
378	9473,10322,18442,18448,18449,18436,9813,18446,18438,18440,18450,18439,18443,
379	4177,9540,18444,18447,18437,8197,18441,6662,7716,5647,11091,11096,7249,18454,
380	18452,11821,18451,11348,18453,18455,18456,18459,18457,9474,18458,10028,18445,
381	7250,18460,18465,8275,18464,18433,18466,8232,18461,18463,18462,15376,15361,
382	18468,18467,11349,16667,18469,18470,18471,5942,5171,18473,12348,5204,11545,
383	5458,18474,18475,8781,18476,
384	9561,3865,4418,18481,18482,18477,6684,18478,9761,18479,18480,18490,18484,
385	18487,18483,18485,18486,6967,18488,8736,5685,4641,18491,4638,18496,18492,
386	18495,10009,18493,18494,10279,10041,18497,8540,18507,18503,4426,18501,10761,
387	18502,18499,18500,18505,18508,18506,18504,18498,8759,18515,11017,18513,18514,
388	18509,18511,18512,18510,8005,11800,18519,18520,18688,7689,18522,18525,18517,
389	18516,18689,4411,18523,18690,18524,18521,8978,18518,9799,18694,11290,18693,
390	18692,18701,18695,18703,11333,18706,18697,18698,18702,18705,18704,18696,18699,
391	18716,18709,18707,18708,18713,18714,4617,5153,18712,18691,18711,18715,18710,
392	18717,18719,18718,18721,18720,18489,18725,18722,18723,18724,18726,5707,18728,
393	18727,7183,6195,15622,18729,7216,4632,18730,4145,7478,18731,6196,18732,3904,
394	10268,18733,7753,18740,18737,8782,18738,18735,5437,18734,18741,5653,8509,
395	18747,18743,8468,18742,18745,18736,18746,18748,10062,18744,18749,18751,5938,
396	18739,3872,18750,6458,11605,18752,18753,8276,11521,18754,11284,18755,18756,
397	10563,18757,6431,11522,18762,18763,7479,18761,11334,18758,18760,7964,7773,
398	18759,18764,10498,18766,18765,4683,10762,18767,18779,18769,18770,18771,18772,
399	18776,18777,18775,18773,18768,18774,18778,20246,4359,18781,5438,18780,18945,
400	18944,18947,18946,18948,7184,18949,18950,18951,7965,11318,18952,10499,9765,
401	18953,18954,5898,5131,18955,6730,9760,18956,4655,18957,18959,11350,18958,7717,
402	18960,18961,18962,4912,18963,18964,18965,18966,4656,18967,18968,18969,4433,
403	7687,18970,18971,18972,5919,9050,18973,
404	5686,7733,18976,9475,18975,5648,18974,8534,5132,18977,18978,7480,5708,18979,
405	10763,7998,5205,11092,8233,18980,7718,8783,7481,18981,18984,18985,6429,8481,
406	18983,7482,10269,18982,6731,4146,18989,5687,6733,6732,11820,18988,18987,8198,
407	5164,11810,4633,7483,18986,18991,18992,18990,5943,11295,6734,9734,18995,7967,
408	8737,11285,18998,5963,7966,18994,18999,5964,18996,18997,18993,8001,9512,8718,
409	4412,10063,5154,8979,19002,19000,8747,7968,4913,19001,7738,11561,11807,19003,
410	19014,8980,19013,19010,19018,19011,19007,9051,19006,19004,11264,6735,19008,
411	19005,19012,7251,5920,8537,10788,4153,3905,9476,19016,19015,9541,19020,19009,
412	19019,19021,5899,19017,6197,6964,19022,11319,19025,19028,19026,10260,19023,
413	5439,19027,19029,19033,19030,19032,19031,19034,6928,19036,19035,10311,19200,
414	5688,19037,19201,19202,5155,17696,7512,19203,5965,19204,19205,6685,14637,
415	19206,19207,7185,19208,19209,19210,19211,19212,8714,19213,19215,19214,9477,
416	19216,10764,19217,19218,19219,19220,9529,7484,19221,6218,12045,19222,19223,
417	10270,19224,19232,19225,19227,19226,19228,10789,19229,19230,19231,19233,4620,
418	9030,10312,6465,6198,10286,4414,10029,19236,4914,7988,19235,19240,8792,11074,
419	19238,19239,5133,19241,9794,8510,10064,9244,19237,10790,4427,19243,11783,8993,
420	11812,6736,19242,8464,19259,8199,9559,10287,19246,6686,6737,7485,9796,5900,
421	19245,19244,10313,6944,9265,19248,19249,6199,19247,19250,19251,19253,8450,
422	19252,4933,19255,19254,19256,19258,19260,19261,7989,6958,19262,4657,
423	19263,8277,19264,19265,10314,5134,19266,8981,4154,19267,6992,7765,8460,19270,
424	19269,19268,19276,19274,19271,19273,19272,19275,5206,19279,7990,19280,5944,
425	19277,19278,11784,8982,8200,19281,19284,19282,19283,11320,9478,19287,19285,
426	19286,19288,19464,19291,19292,19290,19289,9052,19456,19460,19457,19293,19458,
427	19459,19466,19461,7991,19463,19465,19462,19468,7186,19467,19469,19470,19473,
428	19472,19471,19475,19474,11093,19477,19476,19478,19479,19481,19480,7719,19482,
429	5452,19483,19485,19486,19487,19484,19488,6965,19489,5135,5650,5901,19490,9551,
430	9245,19491,19494,6931,19493,19492,5689,19495,4658,19497,6459,19496,19505,
431	19499,19501,10564,19498,19500,19504,19502,5136,19503,19506,9785,11575,7187,
432	19507,11265,19509,19508,19512,11296,19511,4684,19510,19515,19514,19513,9233,
433	19516,19517,19518,6219,5636,19519,19520,19521,7720,19522,6924,19523,19524,
434	12544,12381,19525,17487,19526,8707,7690,9759,19527,10548,9011,6237,8712,4105,
435	10839,7734,5693,5440,10549,19528,19530,19529,4415,9557,19531,9814,9234,19532,
436	7217,19534,11041,19549,19536,19537,9000,8511,8278,9479,19535,5172,19544,19541,
437	19716,9480,8767,19538,9053,9266,19539,19543,7743,9798,9003,7969,19542,8461,
438	8451,19540,3848,11777,19545,8512,7188,7721,19547,19546,3918,19548,10254,19718,
439	9530,7754,8760,5463,19717,11286,4126,10550,4416,19712,19713,19714,19715,9498,
440	8706,3906,19719,19720,21250,8476,19721,4178,8235,5902,11321,19722,9227,8279,
441	6966,19723,19726,7236,19724,8202,8201,3907,11562,19728,10065,19730,19729,
442	19727,16963,4915,19533,19732,19731,19733,11287,9536,10765,19734,6968,19735,
443	19736,19737,9216,3913,6200,11801,19741,5651,19738,19739,10323,4659,11288,5406,
444	9267,19742,19743,19744,9217,19746,19745,9522,19747,7189,6975,9786,8784,6993,
445	7755,19748,19749,7740,19750,19751,19752,11342,7190,19754,19753,6201,6226,6687,
446	19757,7237,19756,19755,8520,5966,7970,9999,7192,19758,7486,19761,19759,19760,
447	19763,19762,7513,19764,19765,19766,10031,6450,6976,19767,19768,11523,7204,
448	11085,11563,19769,5441,19770,9218,19773,4695,7722,19771,19772,9023,10804,5467,
449	19775,19776,19774,19778,9534,4642,19782,19779,19781,19777,20014,19780,11594,
450	5945,19790,9235,19785,19788,19786,19791,19792,19784,19797,4179,19783,9996,
451	19787,7487,6202,10791,5443,7205,9499,8204,19795,19789,19794,11042,8983,19796,
452	19793,8203,19800,19799,19798,10766,7258,19801,10558,4147,10277,8785,5207,
453	19803,6204,6667,19802,7756,7757,19968,19970,7514,19969,19971,5426,10276,6977,
454	11778,19805,6487,11806,19973,19972,19974,19804,9544,9268,9014,19979,8738,
455	19975,19976,5644,19978,5903,19977,7488,4696,19983,6430,8280,9001,4634,19981,
456	19982,8994,19980,19984,19990,19993,19992,9228,19985,19986,19989,19991,5407,
457	19994,19988,19987,19998,19999,20000,19997,19996,7489,9481,19995,20004,20002,
458	20003,20001,8535,20005,20006,20008,4916,20007,11097,20019,20009,20012,20010,
459	20011,20013,20015,20016,20017,20020,20018,20021,20023,20022,8984,11078,20024,
460	8205,20025,10531,20026,4618,4123,4918,4917,20027,20028,20029,20030,20031,4919,
461	4660,6205,10005,20033,20032,20034,4155,20037,20036,20035,20038,20041,3878,
462	20039,20043,20042,20045,20044,20046,9485,20047,20048,20050,20049,10315,20051,
463	20052,6468,20053,20054,10792,8234,3843,8490,20055,10316,20058,20056,6206,
464	20057,5921,10532,20060,20224,20061,20225,4096,7735,7259,4920,20226,9797,20228,
465	4097,20227,8995,11564,9482,20059,11525,5904,11322,5464,11539,5639,8513,17920,
466	20229,4619,7758,4661,20231,20232,20230,5699,6460,7490,4098,11576,20234,19725,
467	20233,20237,20235,20236,20238,20239,11595,20240,20241,7976,10010,7772,4934,
468	11289,4428,7191,5946,20244,20243,6738,20245,20242,6663,20249,18700,12597,7766,
469	20247,11524,9552,4106,8002,6933,10518,4127,11596,11338,20250,9252,7002,20251,
470	20252,7723,20253,11597,20248,20255,20257,20256,20254,20258,20259,8281,4417,
471	20260,11031,20261,20262,11785,14864,20263,20264,20265,20269,20266,20267,20268,
472	20270,7971,11094,7972,20271,10066,20272,21042,11051,20273,20274,20275,4662,
473	20277,7736,20278,5635,20279,20283,20281,20282,4690,20280,20284,20285,3879,
474	20286,20287,7491,20288,5158,20291,20290,20289,19024,10555,20292,20293,20294,
475	20295,20296,20297,4921,20298,20299,9730,20301,4378,20304,20303,4099,5408,
476	10534,8985,6401,6207,7238,7739,20306,20305,11297,4935,10033,9531,7771,11565,
477	5690,20309,20308,10794,9483,4143,20310,20307,10288,11337,20311,20312,20314,
478	8521,4666,4667,20313,4936,5905,4937,9246,11583,5947,20315,20316,20317,20480,
479	20482,20481,10326,20483,20484,20485,20486,20488,20487,20489,10067,17707,7688,
480	5137,20490,
481	20491,12555,15386,10034,3930,3866,6739,10767,7517,20492,11070,20493,11323,
482	4129,6688,20494,4429,20495,20496,20498,20499,20501,20497,20500,4922,20502,
483	20503,20504,20505,20506,20508,20507,20510,20513,20509,20511,20512,20514,5409,
484	6994,20515,20516,6208,20517,4637,9774,20518,20519,8761,9546,20520,9820,8491,
485	4151,5453,5454,8786,20525,5455,4430,20524,20522,20523,20521,20535,20526,20527,
486	20528,20529,20531,20530,7224,20532,20534,5138,20533,8282,5906,20536,8492,
487	20537,9484,20538,20543,20541,20540,20542,20539,20545,20544,20547,5410,20546,
488	20548,20549,20551,20550,20552,20554,20553,6235,20555,20556,4635,20557,20558,
489	7760,20559,20560,20561,20562,6209,20563,20564,20565,20566,20567,10000,20569,
490	10245,20570,20568,20572,20571,20573,20736,20737,20738,20739,20740,20741,20742,
491	20743,20744,20745,20746,20747,20748,20749,15380,20750,17239,5139,4608,6417,
492	20752,20751,11012,20754,20755,20753,20756,10817,20757,5210,11780,20758,20760,
493	3869,20761,10506,20759,20762,20763,20764,20765,20766,10829,6668,6489,8206,
494	20767,20770,20768,20771,5968,20769,20772,20773,20774,20778,6665,8515,20779,
495	20776,20775,20777,5694,20783,20782,20781,3858,20793,20789,20790,20786,20792,
496	20788,4673,11819,20791,20787,20785,20784,20795,20798,20797,20796,10280,20794,
497	3922,20799,20801,4686,20780,4118,20803,20802,20800,8716,10831,11577,20804,
498	20805,20806,20807,20808,8986,20809,10006,20814,20810,20811,10768,11043,9519,
499	20815,20816,9501,20813,20812,4361,20824,20823,4180,20821,20820,20818,4698,
500	20817,6929,4360,6210,20827,20826,20825,
501	20822,20828,20829,20996,20995,20997,4108,20992,20993,6227,11032,20994,10769,
502	21002,20998,21003,21000,20999,5691,21004,21005,21006,21001,20819,21007,9024,
503	21011,21012,21010,21009,21015,21008,21013,21014,21017,21016,21019,21020,21021,
504	11816,21018,8522,6476,21022,21023,21024,21025,21026,5907,21027,21028,6926,
505	21029,21030,21031,21032,21035,21033,11803,21034,11598,21036,11578,21037,9821,
506	21038,21040,21041,21039,6220,11052,10818,13654,15423,10842,4362,21043,5167,
507	21044,21045,21046,6228,21047,16179,11066,8514,21048,21050,21049,21051,21052,
508	21053,21054,21055,21056,21057,21058,21059,21060,21061,21062,21063,9219,5948,
509	21065,8236,21066,21067,10240,21068,21069,16918,19257,20300,21070,21071,21073,
510	21074,21075,11599,21072,21076,21077,21079,21078,21081,21082,21080,11541,21083,
511	21084,16947,21085,9,83,79,82,84,41,42,85,59,3,4,30,527,528,529,530,531,532,
512	533,534,535,536,6,7,66,64,67,8,86,544,545,546,547,548,549,550,551,552,553,554,
513	555,556,557,558,559,560,561,562,563,564,565,566,567,568,569,45,46,15,17,13,
514	576,577,578,579,580,581,582,583,584,585,586,587,588,589,590,591,592,593,594,
515	595,596,597,598,599,600,601,47,34,48,16,78,

lib/libc/wasi/libc-top-half/musl/src/locale/setlocale.c deleted-78

...	@@ -1,78 +0,0 @@
1	#include <locale.h>
2	#include <stdlib.h>
3	#include <string.h>
4	#include "locale_impl.h"
5	#include "libc.h"
6	#include "lock.h"
7
8	static char buf[LC_ALL*(LOCALE_NAME_MAX+1)];
9
10	char setlocale(int cat, const char name)
11	{
12	const struct __locale_map *lm;
13
14	if ((unsigned)cat > LC_ALL) return 0;
15
16	LOCK(__locale_lock);
17
18	/* For LC_ALL, setlocale is required to return a string which
19	* encodes the current setting for all categories. The format of
20	* this string is unspecified, and only the following code, which
21	* performs both the serialization and deserialization, depends
22	* on the format, so it can easily be changed if needed. */
23	if (cat == LC_ALL) {
24	int i;
25	if (name) {
26	struct __locale_struct tmp_locale;
27	char part[LOCALE_NAME_MAX+1] = "C.UTF-8";
28	const char *p = name;
29	for (i=0; i<LC_ALL; i++) {
30	const char *z = __strchrnul(p, ';');
31	if (z-p <= LOCALE_NAME_MAX) {
32	memcpy(part, p, z-p);
33	part[z-p] = 0;
34	if (*z) p = z+1;
35	}
36	lm = __get_locale(i, part);
37	if (lm == LOC_MAP_FAILED) {
38	UNLOCK(__locale_lock);
39	return 0;
40	}
41	tmp_locale.cat[i] = lm;
42	}
43	libc.global_locale = tmp_locale;
44	}
45	char *s = buf;
46	const char *part;
47	int same = 0;
48	for (i=0; i<LC_ALL; i++) {
49	const struct __locale_map *lm =
50	libc.global_locale.cat[i];
51	if (lm == libc.global_locale.cat[0]) same++;
52	part = lm ? lm->name : "C";
53	size_t l = strlen(part);
54	memcpy(s, part, l);
55	s[l] = ';';
56	s += l+1;
57	}
58	*--s = 0;
59	UNLOCK(__locale_lock);
60	return same==LC_ALL ? (char *)part : buf;
61	}
62
63	if (name) {
64	lm = __get_locale(cat, name);
65	if (lm == LOC_MAP_FAILED) {
66	UNLOCK(__locale_lock);
67	return 0;
68	}
69	libc.global_locale.cat[cat] = lm;
70	} else {
71	lm = libc.global_locale.cat[cat];
72	}
73	char ret = lm ? (char )lm->name : "C";
74
75	UNLOCK(__locale_lock);
76
77	return ret;
78	}

lib/libc/wasi/libc-top-half/musl/src/locale/strcoll.c deleted-15

...	@@ -1,15 +0,0 @@
1	#include <string.h>
2	#include <locale.h>
3	#include "locale_impl.h"
4
5	int __strcoll_l(const char l, const char r, locale_t loc)
6	{
7	return strcmp(l, r);
8	}
9
10	int strcoll(const char l, const char r)
11	{
12	return __strcoll_l(l, r, CURRENT_LOCALE);
13	}
14
15	weak_alias(__strcoll_l, strcoll_l);

lib/libc/wasi/libc-top-half/musl/src/locale/strfmon.c deleted-101

...	@@ -1,101 +0,0 @@
1	#include <stdio.h>
2	#include <ctype.h>
3	#include <stdarg.h>
4	#include <monetary.h>
5	#include <errno.h>
6	#include "locale_impl.h"
7
8	static ssize_t vstrfmon_l(char s, size_t n, locale_t loc, const char fmt, va_list ap)
9	{
10	size_t l;
11	double x;
12	int fill, nogrp, negpar, nosym, left, intl;
13	int lp, rp, w, fw;
14	char *s0=s;
15	for (; n && *fmt; ) {
16	if (*fmt != '%') {
17	literal:
18	s++ = fmt++;
19	n--;
20	continue;
21	}
22	fmt++;
23	if (*fmt == '%') goto literal;
24
25	fill = ' ';
26	nogrp = 0;
27	negpar = 0;
28	nosym = 0;
29	left = 0;
30	for (; ; fmt++) {
31	switch (*fmt) {
32	case '=':
33	fill = *++fmt;
34	continue;
35	case '^':
36	nogrp = 1;
37	continue;
38	case '(':
39	negpar = 1;
40	case '+':
41	continue;
42	case '!':
43	nosym = 1;
44	continue;
45	case '-':
46	left = 1;
47	continue;
48	}
49	break;
50	}
51
52	for (fw=0; isdigit(*fmt); fmt++)
53	fw = 10fw + (fmt-'0');
54	lp = 0;
55	rp = 2;
56	if (fmt=='#') for (lp=0, fmt++; isdigit(fmt); fmt++)
57	lp = 10lp + (fmt-'0');
58	if (fmt=='.') for (rp=0, fmt++; isdigit(fmt); fmt++)
59	rp = 10rp + (fmt-'0');
60
61	intl = *fmt++ == 'i';
62
63	w = lp + 1 + rp;
64	if (!left && fw>w) w = fw;
65
66	x = va_arg(ap, double);
67	l = snprintf(s, n, "%.f", w, rp, x);
68	if (l >= n) {
69	errno = E2BIG;
70	return -1;
71	}
72	s += l;
73	n -= l;
74	}
75	return s-s0;
76	}
77
78	ssize_t strfmon_l(char restrict s, size_t n, locale_t loc, const char restrict fmt, ...)
79	{
80	va_list ap;
81	ssize_t ret;
82
83	va_start(ap, fmt);
84	ret = vstrfmon_l(s, n, loc, fmt, ap);
85	va_end(ap);
86
87	return ret;
88	}
89
90
91	ssize_t strfmon(char restrict s, size_t n, const char restrict fmt, ...)
92	{
93	va_list ap;
94	ssize_t ret;
95
96	va_start(ap, fmt);
97	ret = vstrfmon_l(s, n, CURRENT_LOCALE, fmt, ap);
98	va_end(ap);
99
100	return ret;
101	}

lib/libc/wasi/libc-top-half/musl/src/locale/strtod_l.c deleted-22

...	@@ -1,22 +0,0 @@
1	#define _GNU_SOURCE
2	#include <stdlib.h>
3	#include <locale.h>
4
5	float strtof_l(const char restrict s, char *restrict p, locale_t l)
6	{
7	return strtof(s, p);
8	}
9
10	double strtod_l(const char restrict s, char *restrict p, locale_t l)
11	{
12	return strtod(s, p);
13	}
14
15	long double strtold_l(const char restrict s, char *restrict p, locale_t l)
16	{
17	return strtold(s, p);
18	}
19
20	weak_alias(strtof_l, __strtof_l);
21	weak_alias(strtod_l, __strtod_l);
22	weak_alias(strtold_l, __strtold_l);

lib/libc/wasi/libc-top-half/musl/src/locale/strxfrm.c deleted-18

...	@@ -1,18 +0,0 @@
1	#include <string.h>
2	#include <locale.h>
3	#include "locale_impl.h"
4
5	/* collate only by code points */
6	size_t __strxfrm_l(char restrict dest, const char restrict src, size_t n, locale_t loc)
7	{
8	size_t l = strlen(src);
9	if (n > l) strcpy(dest, src);
10	return l;
11	}
12
13	size_t strxfrm(char restrict dest, const char restrict src, size_t n)
14	{
15	return __strxfrm_l(dest, src, n, CURRENT_LOCALE);
16	}
17
18	weak_alias(__strxfrm_l, strxfrm_l);

lib/libc/wasi/libc-top-half/musl/src/locale/wcscoll.c deleted-16

...	@@ -1,16 +0,0 @@
1	#include <wchar.h>
2	#include <locale.h>
3	#include "locale_impl.h"
4
5	/* FIXME: stub */
6	int __wcscoll_l(const wchar_t l, const wchar_t r, locale_t locale)
7	{
8	return wcscmp(l, r);
9	}
10
11	int wcscoll(const wchar_t l, const wchar_t r)
12	{
13	return __wcscoll_l(l, r, CURRENT_LOCALE);
14	}
15
16	weak_alias(__wcscoll_l, wcscoll_l);

lib/libc/wasi/libc-top-half/musl/src/locale/wcsxfrm.c deleted-23

...	@@ -1,23 +0,0 @@
1	#include <wchar.h>
2	#include <locale.h>
3	#include "locale_impl.h"
4
5	/* collate only by code points */
6	size_t __wcsxfrm_l(wchar_t restrict dest, const wchar_t restrict src, size_t n, locale_t loc)
7	{
8	size_t l = wcslen(src);
9	if (l < n) {
10	wmemcpy(dest, src, l+1);
11	} else if (n) {
12	wmemcpy(dest, src, n-1);
13	dest[n-1] = 0;
14	}
15	return l;
16	}
17
18	size_t wcsxfrm(wchar_t restrict dest, const wchar_t restrict src, size_t n)
19	{
20	return __wcsxfrm_l(dest, src, n, CURRENT_LOCALE);
21	}
22
23	weak_alias(__wcsxfrm_l, wcsxfrm_l);

lib/libc/wasi/libc-top-half/musl/src/math/__cos.c deleted-71

...	@@ -1,71 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/k_cos.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunSoft, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/*
13	* __cos( x, y )
14	* kernel cos function on [-pi/4, pi/4], pi/4 ~ 0.785398164
15	* Input x is assumed to be bounded by ~pi/4 in magnitude.
16	* Input y is the tail of x.
17	*
18	* Algorithm
19	* 1. Since cos(-x) = cos(x), we need only to consider positive x.
20	* 2. if x < 2^-27 (hx<0x3e400000 0), return 1 with inexact if x!=0.
21	* 3. cos(x) is approximated by a polynomial of degree 14 on
22	* [0,pi/4]
23	* 4 14
24	* cos(x) ~ 1 - xx/2 + C1x + ... + C6*x
25	* where the remez error is
26	*
27	* \| 2 4 6 8 10 12 14 \| -58
28	* \|cos(x)-(1-.5x +C1x +C2x +C3x +C4x +C5x +C6*x )\| <= 2
29	* \| \|
30	*
31	* 4 6 8 10 12 14
32	* 4. let r = C1x +C2x +C3x +C4x +C5x +C6x , then
33	* cos(x) ~ 1 - x*x/2 + r
34	* since cos(x+y) ~ cos(x) - sin(x)*y
35	* ~ cos(x) - x*y,
36	* a correction term is necessary in cos(x) and hence
37	* cos(x+y) = 1 - (xx/2 - (r - xy))
38	* For better accuracy, rearrange to
39	* cos(x+y) ~ w + (tmp + (r-x*y))
40	* where w = 1 - x*x/2 and tmp is a tiny correction term
41	* (1 - x*x/2 == w + tmp exactly in infinite precision).
42	* The exactness of w + tmp in infinite precision depends on w
43	* and tmp having the same precision as x. If they have extra
44	* precision due to compiler bugs, then the extra precision is
45	* only good provided it is retained in all terms of the final
46	* expression for cos(). Retention happens in all cases tested
47	* under FreeBSD, so don't pessimize things by forcibly clipping
48	* any extra precision in w.
49	*/
50
51	#include "libm.h"
52
53	static const double
54	C1 = 4.16666666666666019037e-02, /* 0x3FA55555, 0x5555554C */
55	C2 = -1.38888888888741095749e-03, /* 0xBF56C16C, 0x16C15177 */
56	C3 = 2.48015872894767294178e-05, /* 0x3EFA01A0, 0x19CB1590 */
57	C4 = -2.75573143513906633035e-07, /* 0xBE927E4F, 0x809C52AD */
58	C5 = 2.08757232129817482790e-09, /* 0x3E21EE9E, 0xBDB4B1C4 */
59	C6 = -1.13596475577881948265e-11; /* 0xBDA8FAE9, 0xBE8838D4 */
60
61	double __cos(double x, double y)
62	{
63	double_t hz,z,r,w;
64
65	z = x*x;
66	w = z*z;
67	r = z(C1+z(C2+zC3)) + ww(C4+z(C5+z*C6));
68	hz = 0.5*z;
69	w = 1.0-hz;
70	return w + (((1.0-w)-hz) + (zr-xy));
71	}

lib/libc/wasi/libc-top-half/musl/src/math/__cosdf.c deleted-35

...	@@ -1,35 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/k_cosf.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	* Debugged and optimized by Bruce D. Evans.
5	*/
6	/*
7	* ====================================================
8	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
9	*
10	* Developed at SunPro, a Sun Microsystems, Inc. business.
11	* Permission to use, copy, modify, and distribute this
12	* software is freely granted, provided that this notice
13	* is preserved.
14	* ====================================================
15	*/
16
17	#include "libm.h"
18
19	/* \|cos(x) - c(x)\| < 2*-34.1 (~[-5.37e-11, 5.295e-11]). /
20	static const double
21	C0 = -0x1ffffffd0c5e81.0p-54, /* -0.499999997251031003120 */
22	C1 = 0x155553e1053a42.0p-57, /* 0.0416666233237390631894 */
23	C2 = -0x16c087e80f1e27.0p-62, /* -0.00138867637746099294692 */
24	C3 = 0x199342e0ee5069.0p-68; /* 0.0000243904487962774090654 */
25
26	float __cosdf(double x)
27	{
28	double_t r, w, z;
29
30	/* Try to optimize for parallel evaluation as in __tandf.c. */
31	z = x*x;
32	w = z*z;
33	r = C2+z*C3;
34	return ((1.0+zC0) + wC1) + (wz)r;
35	}

lib/libc/wasi/libc-top-half/musl/src/math/__cosl.c deleted-96

...	@@ -1,96 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/ld80/k_cosl.c */
2	/* origin: FreeBSD /usr/src/lib/msun/ld128/k_cosl.c */
3	/*
4	* ====================================================
5	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
6	* Copyright (c) 2008 Steven G. Kargl, David Schultz, Bruce D. Evans.
7	*
8	* Developed at SunSoft, a Sun Microsystems, Inc. business.
9	* Permission to use, copy, modify, and distribute this
10	* software is freely granted, provided that this notice
11	* is preserved.
12	* ====================================================
13	*/
14
15
16	#include "libm.h"
17
18	#if (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
19	#if LDBL_MANT_DIG == 64
20	/*
21	* ld80 version of __cos.c. See __cos.c for most comments.
22	*/
23	/*
24	* Domain [-0.7854, 0.7854], range ~[-2.43e-23, 2.425e-23]:
25	* \|cos(x) - c(x)\| < 2**-75.1
26	*
27	* The coefficients of c(x) were generated by a pari-gp script using
28	* a Remez algorithm that searches for the best higher coefficients
29	* after rounding leading coefficients to a specified precision.
30	*
31	* Simpler methods like Chebyshev or basic Remez barely suffice for
32	* cos() in 64-bit precision, because we want the coefficient of x^2
33	* to be precisely -0.5 so that multiplying by it is exact, and plain
34	* rounding of the coefficients of a good polynomial approximation only
35	* gives this up to about 64-bit precision. Plain rounding also gives
36	* a mediocre approximation for the coefficient of x^4, but a rounding
37	* error of 0.5 ulps for this coefficient would only contribute ~0.01
38	* ulps to the final error, so this is unimportant. Rounding errors in
39	* higher coefficients are even less important.
40	*
41	* In fact, coefficients above the x^4 one only need to have 53-bit
42	* precision, and this is more efficient. We get this optimization
43	* almost for free from the complications needed to search for the best
44	* higher coefficients.
45	*/
46	static const long double
47	C1 = 0.0416666666666666666136L; /* 0xaaaaaaaaaaaaaa9b.0p-68 */
48	static const double
49	C2 = -0.0013888888888888874, /* -0x16c16c16c16c10.0p-62 */
50	C3 = 0.000024801587301571716, /* 0x1a01a01a018e22.0p-68 */
51	C4 = -0.00000027557319215507120, /* -0x127e4fb7602f22.0p-74 */
52	C5 = 0.0000000020876754400407278, /* 0x11eed8caaeccf1.0p-81 */
53	C6 = -1.1470297442401303e-11, /* -0x19393412bd1529.0p-89 */
54	C7 = 4.7383039476436467e-14; /* 0x1aac9d9af5c43e.0p-97 */
55	#define POLY(z) (z(C1+z(C2+z(C3+z(C4+z(C5+z(C6+z*C7)))))))
56	#elif LDBL_MANT_DIG == 113
57	/*
58	* ld128 version of __cos.c. See __cos.c for most comments.
59	*/
60	/*
61	* Domain [-0.7854, 0.7854], range ~[-1.80e-37, 1.79e-37]:
62	* \|cos(x) - c(x))\| < 2**-122.0
63	*
64	* 113-bit precision requires more care than 64-bit precision, since
65	* simple methods give a minimax polynomial with coefficient for x^2
66	* that is 1 ulp below 0.5, but we want it to be precisely 0.5. See
67	* above for more details.
68	*/
69	static const long double
70	C1 = 0.04166666666666666666666666666666658424671L,
71	C2 = -0.001388888888888888888888888888863490893732L,
72	C3 = 0.00002480158730158730158730158600795304914210L,
73	C4 = -0.2755731922398589065255474947078934284324e-6L,
74	C5 = 0.2087675698786809897659225313136400793948e-8L,
75	C6 = -0.1147074559772972315817149986812031204775e-10L,
76	C7 = 0.4779477332386808976875457937252120293400e-13L;
77	static const double
78	C8 = -0.1561920696721507929516718307820958119868e-15,
79	C9 = 0.4110317413744594971475941557607804508039e-18,
80	C10 = -0.8896592467191938803288521958313920156409e-21,
81	C11 = 0.1601061435794535138244346256065192782581e-23;
82	#define POLY(z) (z(C1+z(C2+z(C3+z(C4+z(C5+z(C6+z*(C7+ \
83	z(C8+z(C9+z(C10+zC11)))))))))))
84	#endif
85
86	long double __cosl(long double x, long double y)
87	{
88	long double hz,z,r,w;
89
90	z = x*x;
91	r = POLY(z);
92	hz = 0.5*z;
93	w = 1.0-hz;
94	return w + (((1.0-w)-hz) + (zr-xy));
95	}
96	#endif

lib/libc/wasi/libc-top-half/musl/src/math/__invtrigl.c deleted-63

...	@@ -1,63 +0,0 @@
1	#include <float.h>
2	#include "__invtrigl.h"
3
4	#if LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
5	static const long double
6	pS0 = 1.66666666666666666631e-01L,
7	pS1 = -4.16313987993683104320e-01L,
8	pS2 = 3.69068046323246813704e-01L,
9	pS3 = -1.36213932016738603108e-01L,
10	pS4 = 1.78324189708471965733e-02L,
11	pS5 = -2.19216428382605211588e-04L,
12	pS6 = -7.10526623669075243183e-06L,
13	qS1 = -2.94788392796209867269e+00L,
14	qS2 = 3.27309890266528636716e+00L,
15	qS3 = -1.68285799854822427013e+00L,
16	qS4 = 3.90699412641738801874e-01L,
17	qS5 = -3.14365703596053263322e-02L;
18
19	const long double pio2_hi = 1.57079632679489661926L;
20	const long double pio2_lo = -2.50827880633416601173e-20L;
21
22	/* used in asinl() and acosl() */
23	/* R(x^2) is a rational approximation of (asin(x)-x)/x^3 with Remez algorithm */
24	long double __invtrigl_R(long double z)
25	{
26	long double p, q;
27	p = z(pS0+z(pS1+z(pS2+z(pS3+z(pS4+z(pS5+z*pS6))))));
28	q = 1.0+z(qS1+z(qS2+z(qS3+z(qS4+z*qS5))));
29	return p/q;
30	}
31	#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
32	static const long double
33	pS0 = 1.66666666666666666666666666666700314e-01L,
34	pS1 = -7.32816946414566252574527475428622708e-01L,
35	pS2 = 1.34215708714992334609030036562143589e+00L,
36	pS3 = -1.32483151677116409805070261790752040e+00L,
37	pS4 = 7.61206183613632558824485341162121989e-01L,
38	pS5 = -2.56165783329023486777386833928147375e-01L,
39	pS6 = 4.80718586374448793411019434585413855e-02L,
40	pS7 = -4.42523267167024279410230886239774718e-03L,
41	pS8 = 1.44551535183911458253205638280410064e-04L,
42	pS9 = -2.10558957916600254061591040482706179e-07L,
43	qS1 = -4.84690167848739751544716485245697428e+00L,
44	qS2 = 9.96619113536172610135016921140206980e+00L,
45	qS3 = -1.13177895428973036660836798461641458e+01L,
46	qS4 = 7.74004374389488266169304117714658761e+00L,
47	qS5 = -3.25871986053534084709023539900339905e+00L,
48	qS6 = 8.27830318881232209752469022352928864e-01L,
49	qS7 = -1.18768052702942805423330715206348004e-01L,
50	qS8 = 8.32600764660522313269101537926539470e-03L,
51	qS9 = -1.99407384882605586705979504567947007e-04L;
52
53	const long double pio2_hi = 1.57079632679489661923132169163975140L;
54	const long double pio2_lo = 4.33590506506189051239852201302167613e-35L;
55
56	long double __invtrigl_R(long double z)
57	{
58	long double p, q;
59	p = z(pS0+z(pS1+z(pS2+z(pS3+z(pS4+z(pS5+z(pS6+z(pS7+z(pS8+zpS9)))))))));
60	q = 1.0+z(qS1+z(qS2+z(qS3+z(qS4+z(qS5+z(qS6+z(qS7+z(qS8+z*qS9))))))));
61	return p/q;
62	}
63	#endif

lib/libc/wasi/libc-top-half/musl/src/math/__invtrigl.h deleted-8

...	@@ -1,8 +0,0 @@
1	#include <features.h>
2
3	/* shared by acosl, asinl and atan2l */
4	#define pio2_hi __pio2_hi
5	#define pio2_lo __pio2_lo
6	hidden extern const long double pio2_hi, pio2_lo;
7
8	hidden long double __invtrigl_R(long double z);

lib/libc/wasi/libc-top-half/musl/src/math/__math_divzero.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "libm.h"
2
3	double __math_divzero(uint32_t sign)
4	{
5	return fp_barrier(sign ? -1.0 : 1.0) / 0.0;
6	}

lib/libc/wasi/libc-top-half/musl/src/math/__math_divzerof.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "libm.h"
2
3	float __math_divzerof(uint32_t sign)
4	{
5	return fp_barrierf(sign ? -1.0f : 1.0f) / 0.0f;
6	}

lib/libc/wasi/libc-top-half/musl/src/math/__math_invalid.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "libm.h"
2
3	double __math_invalid(double x)
4	{
5	return (x - x) / (x - x);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/__math_invalidf.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "libm.h"
2
3	float __math_invalidf(float x)
4	{
5	return (x - x) / (x - x);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/__math_invalidl.c deleted-9

...	@@ -1,9 +0,0 @@
1	#include <float.h>
2	#include "libm.h"
3
4	#if LDBL_MANT_DIG != DBL_MANT_DIG
5	long double __math_invalidl(long double x)
6	{
7	return (x - x) / (x - x);
8	}
9	#endif

lib/libc/wasi/libc-top-half/musl/src/math/__math_oflow.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "libm.h"
2
3	double __math_oflow(uint32_t sign)
4	{
5	return __math_xflow(sign, 0x1p769);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/__math_oflowf.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "libm.h"
2
3	float __math_oflowf(uint32_t sign)
4	{
5	return __math_xflowf(sign, 0x1p97f);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/__math_uflow.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "libm.h"
2
3	double __math_uflow(uint32_t sign)
4	{
5	return __math_xflow(sign, 0x1p-767);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/__math_uflowf.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "libm.h"
2
3	float __math_uflowf(uint32_t sign)
4	{
5	return __math_xflowf(sign, 0x1p-95f);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/__math_xflow.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "libm.h"
2
3	double __math_xflow(uint32_t sign, double y)
4	{
5	return eval_as_double(fp_barrier(sign ? -y : y) * y);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/__math_xflowf.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "libm.h"
2
3	float __math_xflowf(uint32_t sign, float y)
4	{
5	return eval_as_float(fp_barrierf(sign ? -y : y) * y);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/__polevll.c deleted-93

...	@@ -1,93 +0,0 @@
1	/* origin: OpenBSD /usr/src/lib/libm/src/polevll.c */
2	/*
3	* Copyright (c) 2008 Stephen L. Moshier <steve@moshier.net>
4	*
5	* Permission to use, copy, modify, and distribute this software for any
6	* purpose with or without fee is hereby granted, provided that the above
7	* copyright notice and this permission notice appear in all copies.
8	*
9	* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10	* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11	* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12	* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13	* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14	* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15	* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16	*/
17	/*
18	* Evaluate polynomial
19	*
20	*
21	* SYNOPSIS:
22	*
23	* int N;
24	* long double x, y, coef[N+1], polevl[];
25	*
26	* y = polevll( x, coef, N );
27	*
28	*
29	* DESCRIPTION:
30	*
31	* Evaluates polynomial of degree N:
32	*
33	* 2 N
34	* y = C + C x + C x +...+ C x
35	* 0 1 2 N
36	*
37	* Coefficients are stored in reverse order:
38	*
39	* coef[0] = C , ..., coef[N] = C .
40	* N 0
41	*
42	* The function p1evll() assumes that coef[N] = 1.0 and is
43	* omitted from the array. Its calling arguments are
44	* otherwise the same as polevll().
45	*
46	*
47	* SPEED:
48	*
49	* In the interest of speed, there are no checks for out
50	* of bounds arithmetic. This routine is used by most of
51	* the functions in the library. Depending on available
52	* equipment features, the user may wish to rewrite the
53	* program in microcode or assembly language.
54	*
55	*/
56
57	#include "libm.h"
58
59	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
60	#else
61	/*
62	* Polynomial evaluator:
63	* P[0] x^n + P[1] x^(n-1) + ... + P[n]
64	*/
65	long double __polevll(long double x, const long double *P, int n)
66	{
67	long double y;
68
69	y = *P++;
70	do {
71	y = y * x + *P++;
72	} while (--n);
73
74	return y;
75	}
76
77	/*
78	* Polynomial evaluator:
79	* x^n + P[0] x^(n-1) + P[1] x^(n-2) + ... + P[n]
80	*/
81	long double __p1evll(long double x, const long double *P, int n)
82	{
83	long double y;
84
85	n -= 1;
86	y = x + *P++;
87	do {
88	y = y * x + *P++;
89	} while (--n);
90
91	return y;
92	}
93	#endif

lib/libc/wasi/libc-top-half/musl/src/math/__rem_pio2_large.c deleted-442

...	@@ -1,442 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/k_rem_pio2.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunSoft, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/*
13	* __rem_pio2_large(x,y,e0,nx,prec)
14	* double x[],y[]; int e0,nx,prec;
15	*
16	* __rem_pio2_large return the last three digits of N with
17	* y = x - N*pi/2
18	* so that \|y\| < pi/2.
19	*
20	* The method is to compute the integer (mod 8) and fraction parts of
21	* (2/pi)*x without doing the full multiplication. In general we
22	* skip the part of the product that are known to be a huge integer (
23	* more accurately, = 0 mod 8 ). Thus the number of operations are
24	* independent of the exponent of the input.
25	*
26	* (2/pi) is represented by an array of 24-bit integers in ipio2[].
27	*
28	* Input parameters:
29	* x[] The input value (must be positive) is broken into nx
30	* pieces of 24-bit integers in double precision format.
31	* x[i] will be the i-th 24 bit of x. The scaled exponent
32	* of x[0] is given in input parameter e0 (i.e., x[0]*2^e0
33	* match x's up to 24 bits.
34	*
35	* Example of breaking a double positive z into x[0]+x[1]+x[2]:
36	* e0 = ilogb(z)-23
37	* z = scalbn(z,-e0)
38	* for i = 0,1,2
39	* x[i] = floor(z)
40	* z = (z-x[i])2*24
41	*
42	*
43	* y[] ouput result in an array of double precision numbers.
44	* The dimension of y[] is:
45	* 24-bit precision 1
46	* 53-bit precision 2
47	* 64-bit precision 2
48	* 113-bit precision 3
49	* The actual value is the sum of them. Thus for 113-bit
50	* precison, one may have to do something like:
51	*
52	* long double t,w,r_head, r_tail;
53	* t = (long double)y[2] + (long double)y[1];
54	* w = (long double)y[0];
55	* r_head = t+w;
56	* r_tail = w - (r_head - t);
57	*
58	* e0 The exponent of x[0]. Must be <= 16360 or you need to
59	* expand the ipio2 table.
60	*
61	* nx dimension of x[]
62	*
63	* prec an integer indicating the precision:
64	* 0 24 bits (single)
65	* 1 53 bits (double)
66	* 2 64 bits (extended)
67	* 3 113 bits (quad)
68	*
69	* External function:
70	* double scalbn(), floor();
71	*
72	*
73	* Here is the description of some local variables:
74	*
75	* jk jk+1 is the initial number of terms of ipio2[] needed
76	* in the computation. The minimum and recommended value
77	* for jk is 3,4,4,6 for single, double, extended, and quad.
78	* jk+1 must be 2 larger than you might expect so that our
79	* recomputation test works. (Up to 24 bits in the integer
80	* part (the 24 bits of it that we compute) and 23 bits in
81	* the fraction part may be lost to cancelation before we
82	* recompute.)
83	*
84	* jz local integer variable indicating the number of
85	* terms of ipio2[] used.
86	*
87	* jx nx - 1
88	*
89	* jv index for pointing to the suitable ipio2[] for the
90	* computation. In general, we want
91	* ( 2^e0x[0] ipio2[jv-1]*2^(-24jv) )/8
92	* is an integer. Thus
93	* e0-3-24*jv >= 0 or (e0-3)/24 >= jv
94	* Hence jv = max(0,(e0-3)/24).
95	*
96	* jp jp+1 is the number of terms in PIo2[] needed, jp = jk.
97	*
98	* q[] double array with integral value, representing the
99	* 24-bits chunk of the product of x and 2/pi.
100	*
101	* q0 the corresponding exponent of q[0]. Note that the
102	* exponent for q[i] would be q0-24*i.
103	*
104	* PIo2[] double precision array, obtained by cutting pi/2
105	* into 24 bits chunks.
106	*
107	* f[] ipio2[] in floating point
108	*
109	* iq[] integer array by breaking up q[] in 24-bits chunk.
110	*
111	* fq[] final product of x*(2/pi) in fq[0],..,fq[jk]
112	*
113	* ih integer. If >0 it indicates q[] is >= 0.5, hence
114	* it also indicates the sign of the result.
115	*
116	*/
117	/*
118	* Constants:
119	* The hexadecimal values are the intended ones for the following
120	* constants. The decimal values may be used, provided that the
121	* compiler will convert from decimal to binary accurately enough
122	* to produce the hexadecimal values shown.
123	*/
124
125	#include "libm.h"
126
127	static const int init_jk[] = {3,4,4,6}; /* initial value for jk */
128
129	/*
130	* Table of constants for 2/pi, 396 Hex digits (476 decimal) of 2/pi
131	*
132	* integer array, contains the (24i)-th to (24i+23)-th
133	* bit of 2/pi after binary point. The corresponding
134	* floating value is
135	*
136	* ipio2[i] * 2^(-24(i+1)).
137	*
138	* NB: This table must have at least (e0-3)/24 + jk terms.
139	* For quad precision (e0 <= 16360, jk = 6), this is 686.
140	*/
141	static const int32_t ipio2[] = {
142	0xA2F983, 0x6E4E44, 0x1529FC, 0x2757D1, 0xF534DD, 0xC0DB62,
143	0x95993C, 0x439041, 0xFE5163, 0xABDEBB, 0xC561B7, 0x246E3A,
144	0x424DD2, 0xE00649, 0x2EEA09, 0xD1921C, 0xFE1DEB, 0x1CB129,
145	0xA73EE8, 0x8235F5, 0x2EBB44, 0x84E99C, 0x7026B4, 0x5F7E41,
146	0x3991D6, 0x398353, 0x39F49C, 0x845F8B, 0xBDF928, 0x3B1FF8,
147	0x97FFDE, 0x05980F, 0xEF2F11, 0x8B5A0A, 0x6D1F6D, 0x367ECF,
148	0x27CB09, 0xB74F46, 0x3F669E, 0x5FEA2D, 0x7527BA, 0xC7EBE5,
149	0xF17B3D, 0x0739F7, 0x8A5292, 0xEA6BFB, 0x5FB11F, 0x8D5D08,
150	0x560330, 0x46FC7B, 0x6BABF0, 0xCFBC20, 0x9AF436, 0x1DA9E3,
151	0x91615E, 0xE61B08, 0x659985, 0x5F14A0, 0x68408D, 0xFFD880,
152	0x4D7327, 0x310606, 0x1556CA, 0x73A8C9, 0x60E27B, 0xC08C6B,
153
154	#if LDBL_MAX_EXP > 1024
155	0x47C419, 0xC367CD, 0xDCE809, 0x2A8359, 0xC4768B, 0x961CA6,
156	0xDDAF44, 0xD15719, 0x053EA5, 0xFF0705, 0x3F7E33, 0xE832C2,
157	0xDE4F98, 0x327DBB, 0xC33D26, 0xEF6B1E, 0x5EF89F, 0x3A1F35,
158	0xCAF27F, 0x1D87F1, 0x21907C, 0x7C246A, 0xFA6ED5, 0x772D30,
159	0x433B15, 0xC614B5, 0x9D19C3, 0xC2C4AD, 0x414D2C, 0x5D000C,
160	0x467D86, 0x2D71E3, 0x9AC69B, 0x006233, 0x7CD2B4, 0x97A7B4,
161	0xD55537, 0xF63ED7, 0x1810A3, 0xFC764D, 0x2A9D64, 0xABD770,
162	0xF87C63, 0x57B07A, 0xE71517, 0x5649C0, 0xD9D63B, 0x3884A7,
163	0xCB2324, 0x778AD6, 0x23545A, 0xB91F00, 0x1B0AF1, 0xDFCE19,
164	0xFF319F, 0x6A1E66, 0x615799, 0x47FBAC, 0xD87F7E, 0xB76522,
165	0x89E832, 0x60BFE6, 0xCDC4EF, 0x09366C, 0xD43F5D, 0xD7DE16,
166	0xDE3B58, 0x929BDE, 0x2822D2, 0xE88628, 0x4D58E2, 0x32CAC6,
167	0x16E308, 0xCB7DE0, 0x50C017, 0xA71DF3, 0x5BE018, 0x34132E,
168	0x621283, 0x014883, 0x5B8EF5, 0x7FB0AD, 0xF2E91E, 0x434A48,
169	0xD36710, 0xD8DDAA, 0x425FAE, 0xCE616A, 0xA4280A, 0xB499D3,
170	0xF2A606, 0x7F775C, 0x83C2A3, 0x883C61, 0x78738A, 0x5A8CAF,
171	0xBDD76F, 0x63A62D, 0xCBBFF4, 0xEF818D, 0x67C126, 0x45CA55,
172	0x36D9CA, 0xD2A828, 0x8D61C2, 0x77C912, 0x142604, 0x9B4612,
173	0xC459C4, 0x44C5C8, 0x91B24D, 0xF31700, 0xAD43D4, 0xE54929,
174	0x10D5FD, 0xFCBE00, 0xCC941E, 0xEECE70, 0xF53E13, 0x80F1EC,
175	0xC3E7B3, 0x28F8C7, 0x940593, 0x3E71C1, 0xB3092E, 0xF3450B,
176	0x9C1288, 0x7B20AB, 0x9FB52E, 0xC29247, 0x2F327B, 0x6D550C,
177	0x90A772, 0x1FE76B, 0x96CB31, 0x4A1679, 0xE27941, 0x89DFF4,
178	0x9794E8, 0x84E6E2, 0x973199, 0x6BED88, 0x365F5F, 0x0EFDBB,
179	0xB49A48, 0x6CA467, 0x427271, 0x325D8D, 0xB8159F, 0x09E5BC,
180	0x25318D, 0x3974F7, 0x1C0530, 0x010C0D, 0x68084B, 0x58EE2C,
181	0x90AA47, 0x02E774, 0x24D6BD, 0xA67DF7, 0x72486E, 0xEF169F,
182	0xA6948E, 0xF691B4, 0x5153D1, 0xF20ACF, 0x339820, 0x7E4BF5,
183	0x6863B2, 0x5F3EDD, 0x035D40, 0x7F8985, 0x295255, 0xC06437,
184	0x10D86D, 0x324832, 0x754C5B, 0xD4714E, 0x6E5445, 0xC1090B,
185	0x69F52A, 0xD56614, 0x9D0727, 0x50045D, 0xDB3BB4, 0xC576EA,
186	0x17F987, 0x7D6B49, 0xBA271D, 0x296996, 0xACCCC6, 0x5414AD,
187	0x6AE290, 0x89D988, 0x50722C, 0xBEA404, 0x940777, 0x7030F3,
188	0x27FC00, 0xA871EA, 0x49C266, 0x3DE064, 0x83DD97, 0x973FA3,
189	0xFD9443, 0x8C860D, 0xDE4131, 0x9D3992, 0x8C70DD, 0xE7B717,
190	0x3BDF08, 0x2B3715, 0xA0805C, 0x93805A, 0x921110, 0xD8E80F,
191	0xAF806C, 0x4BFFDB, 0x0F9038, 0x761859, 0x15A562, 0xBBCB61,
192	0xB989C7, 0xBD4010, 0x04F2D2, 0x277549, 0xF6B6EB, 0xBB22DB,
193	0xAA140A, 0x2F2689, 0x768364, 0x333B09, 0x1A940E, 0xAA3A51,
194	0xC2A31D, 0xAEEDAF, 0x12265C, 0x4DC26D, 0x9C7A2D, 0x9756C0,
195	0x833F03, 0xF6F009, 0x8C402B, 0x99316D, 0x07B439, 0x15200C,
196	0x5BC3D8, 0xC492F5, 0x4BADC6, 0xA5CA4E, 0xCD37A7, 0x36A9E6,
197	0x9492AB, 0x6842DD, 0xDE6319, 0xEF8C76, 0x528B68, 0x37DBFC,
198	0xABA1AE, 0x3115DF, 0xA1AE00, 0xDAFB0C, 0x664D64, 0xB705ED,
199	0x306529, 0xBF5657, 0x3AFF47, 0xB9F96A, 0xF3BE75, 0xDF9328,
200	0x3080AB, 0xF68C66, 0x15CB04, 0x0622FA, 0x1DE4D9, 0xA4B33D,
201	0x8F1B57, 0x09CD36, 0xE9424E, 0xA4BE13, 0xB52333, 0x1AAAF0,
202	0xA8654F, 0xA5C1D2, 0x0F3F0B, 0xCD785B, 0x76F923, 0x048B7B,
203	0x721789, 0x53A6C6, 0xE26E6F, 0x00EBEF, 0x584A9B, 0xB7DAC4,
204	0xBA66AA, 0xCFCF76, 0x1D02D1, 0x2DF1B1, 0xC1998C, 0x77ADC3,
205	0xDA4886, 0xA05DF7, 0xF480C6, 0x2FF0AC, 0x9AECDD, 0xBC5C3F,
206	0x6DDED0, 0x1FC790, 0xB6DB2A, 0x3A25A3, 0x9AAF00, 0x9353AD,
207	0x0457B6, 0xB42D29, 0x7E804B, 0xA707DA, 0x0EAA76, 0xA1597B,
208	0x2A1216, 0x2DB7DC, 0xFDE5FA, 0xFEDB89, 0xFDBE89, 0x6C76E4,
209	0xFCA906, 0x70803E, 0x156E85, 0xFF87FD, 0x073E28, 0x336761,
210	0x86182A, 0xEABD4D, 0xAFE7B3, 0x6E6D8F, 0x396795, 0x5BBF31,
211	0x48D784, 0x16DF30, 0x432DC7, 0x356125, 0xCE70C9, 0xB8CB30,
212	0xFD6CBF, 0xA200A4, 0xE46C05, 0xA0DD5A, 0x476F21, 0xD21262,
213	0x845CB9, 0x496170, 0xE0566B, 0x015299, 0x375550, 0xB7D51E,
214	0xC4F133, 0x5F6E13, 0xE4305D, 0xA92E85, 0xC3B21D, 0x3632A1,
215	0xA4B708, 0xD4B1EA, 0x21F716, 0xE4698F, 0x77FF27, 0x80030C,
216	0x2D408D, 0xA0CD4F, 0x99A520, 0xD3A2B3, 0x0A5D2F, 0x42F9B4,
217	0xCBDA11, 0xD0BE7D, 0xC1DB9B, 0xBD17AB, 0x81A2CA, 0x5C6A08,
218	0x17552E, 0x550027, 0xF0147F, 0x8607E1, 0x640B14, 0x8D4196,
219	0xDEBE87, 0x2AFDDA, 0xB6256B, 0x34897B, 0xFEF305, 0x9EBFB9,
220	0x4F6A68, 0xA82A4A, 0x5AC44F, 0xBCF82D, 0x985AD7, 0x95C7F4,
221	0x8D4D0D, 0xA63A20, 0x5F57A4, 0xB13F14, 0x953880, 0x0120CC,
222	0x86DD71, 0xB6DEC9, 0xF560BF, 0x11654D, 0x6B0701, 0xACB08C,
223	0xD0C0B2, 0x485551, 0x0EFB1E, 0xC37295, 0x3B06A3, 0x3540C0,
224	0x7BDC06, 0xCC45E0, 0xFA294E, 0xC8CAD6, 0x41F3E8, 0xDE647C,
225	0xD8649B, 0x31BED9, 0xC397A4, 0xD45877, 0xC5E369, 0x13DAF0,
226	0x3C3ABA, 0x461846, 0x5F7555, 0xF5BDD2, 0xC6926E, 0x5D2EAC,
227	0xED440E, 0x423E1C, 0x87C461, 0xE9FD29, 0xF3D6E7, 0xCA7C22,
228	0x35916F, 0xC5E008, 0x8DD7FF, 0xE26A6E, 0xC6FDB0, 0xC10893,
229	0x745D7C, 0xB2AD6B, 0x9D6ECD, 0x7B723E, 0x6A11C6, 0xA9CFF7,
230	0xDF7329, 0xBAC9B5, 0x5100B7, 0x0DB2E2, 0x24BA74, 0x607DE5,
231	0x8AD874, 0x2C150D, 0x0C1881, 0x94667E, 0x162901, 0x767A9F,
232	0xBEFDFD, 0xEF4556, 0x367ED9, 0x13D9EC, 0xB9BA8B, 0xFC97C4,
233	0x27A831, 0xC36EF1, 0x36C594, 0x56A8D8, 0xB5A8B4, 0x0ECCCF,
234	0x2D8912, 0x34576F, 0x89562C, 0xE3CE99, 0xB920D6, 0xAA5E6B,
235	0x9C2A3E, 0xCC5F11, 0x4A0BFD, 0xFBF4E1, 0x6D3B8E, 0x2C86E2,
236	0x84D4E9, 0xA9B4FC, 0xD1EEEF, 0xC9352E, 0x61392F, 0x442138,
237	0xC8D91B, 0x0AFC81, 0x6A4AFB, 0xD81C2F, 0x84B453, 0x8C994E,
238	0xCC2254, 0xDC552A, 0xD6C6C0, 0x96190B, 0xB8701A, 0x649569,
239	0x605A26, 0xEE523F, 0x0F117F, 0x11B5F4, 0xF5CBFC, 0x2DBC34,
240	0xEEBC34, 0xCC5DE8, 0x605EDD, 0x9B8E67, 0xEF3392, 0xB817C9,
241	0x9B5861, 0xBC57E1, 0xC68351, 0x103ED8, 0x4871DD, 0xDD1C2D,
242	0xA118AF, 0x462C21, 0xD7F359, 0x987AD9, 0xC0549E, 0xFA864F,
243	0xFC0656, 0xAE79E5, 0x362289, 0x22AD38, 0xDC9367, 0xAAE855,
244	0x382682, 0x9BE7CA, 0xA40D51, 0xB13399, 0x0ED7A9, 0x480569,
245	0xF0B265, 0xA7887F, 0x974C88, 0x36D1F9, 0xB39221, 0x4A827B,
246	0x21CF98, 0xDC9F40, 0x5547DC, 0x3A74E1, 0x42EB67, 0xDF9DFE,
247	0x5FD45E, 0xA4677B, 0x7AACBA, 0xA2F655, 0x23882B, 0x55BA41,
248	0x086E59, 0x862A21, 0x834739, 0xE6E389, 0xD49EE5, 0x40FB49,
249	0xE956FF, 0xCA0F1C, 0x8A59C5, 0x2BFA94, 0xC5C1D3, 0xCFC50F,
250	0xAE5ADB, 0x86C547, 0x624385, 0x3B8621, 0x94792C, 0x876110,
251	0x7B4C2A, 0x1A2C80, 0x12BF43, 0x902688, 0x893C78, 0xE4C4A8,
252	0x7BDBE5, 0xC23AC4, 0xEAF426, 0x8A67F7, 0xBF920D, 0x2BA365,
253	0xB1933D, 0x0B7CBD, 0xDC51A4, 0x63DD27, 0xDDE169, 0x19949A,
254	0x9529A8, 0x28CE68, 0xB4ED09, 0x209F44, 0xCA984E, 0x638270,
255	0x237C7E, 0x32B90F, 0x8EF5A7, 0xE75614, 0x08F121, 0x2A9DB5,
256	0x4D7E6F, 0x5119A5, 0xABF9B5, 0xD6DF82, 0x61DD96, 0x023616,
257	0x9F3AC4, 0xA1A283, 0x6DED72, 0x7A8D39, 0xA9B882, 0x5C326B,
258	0x5B2746, 0xED3400, 0x7700D2, 0x55F4FC, 0x4D5901, 0x8071E0,
259	#endif
260	};
261
262	static const double PIo2[] = {
263	1.57079625129699707031e+00, /* 0x3FF921FB, 0x40000000 */
264	7.54978941586159635335e-08, /* 0x3E74442D, 0x00000000 */
265	5.39030252995776476554e-15, /* 0x3CF84698, 0x80000000 */
266	3.28200341580791294123e-22, /* 0x3B78CC51, 0x60000000 */
267	1.27065575308067607349e-29, /* 0x39F01B83, 0x80000000 */
268	1.22933308981111328932e-36, /* 0x387A2520, 0x40000000 */
269	2.73370053816464559624e-44, /* 0x36E38222, 0x80000000 */
270	2.16741683877804819444e-51, /* 0x3569F31D, 0x00000000 */
271	};
272
273	int __rem_pio2_large(double x, double y, int e0, int nx, int prec)
274	{
275	int32_t jz,jx,jv,jp,jk,carry,n,iq[20],i,j,k,m,q0,ih;
276	double z,fw,f[20],fq[20],q[20];
277
278	/* initialize jk*/
279	jk = init_jk[prec];
280	jp = jk;
281
282	/* determine jx,jv,q0, note that 3>q0 */
283	jx = nx-1;
284	jv = (e0-3)/24; if(jv<0) jv=0;
285	q0 = e0-24*(jv+1);
286
287	/* set up f[0] to f[jx+jk] where f[jx+jk] = ipio2[jv+jk] */
288	j = jv-jx; m = jx+jk;
289	for (i=0; i<=m; i++,j++)
290	f[i] = j<0 ? 0.0 : (double)ipio2[j];
291
292	/* compute q[0],q[1],...q[jk] */
293	for (i=0; i<=jk; i++) {
294	for (j=0,fw=0.0; j<=jx; j++)
295	fw += x[j]*f[jx+i-j];
296	q[i] = fw;
297	}
298
299	jz = jk;
300	recompute:
301	/* distill q[] into iq[] reversingly */
302	for (i=0,j=jz,z=q[jz]; j>0; i++,j--) {
303	fw = (double)(int32_t)(0x1p-24*z);
304	iq[i] = (int32_t)(z - 0x1p24*fw);
305	z = q[j-1]+fw;
306	}
307
308	/* compute n */
309	z = scalbn(z,q0); /* actual value of z */
310	z -= 8.0floor(z0.125); /* trim off integer >= 8 */
311	n = (int32_t)z;
312	z -= (double)n;
313	ih = 0;
314	if (q0 > 0) { /* need iq[jz-1] to determine n */
315	i = iq[jz-1]>>(24-q0); n += i;
316	iq[jz-1] -= i<<(24-q0);
317	ih = iq[jz-1]>>(23-q0);
318	}
319	else if (q0 == 0) ih = iq[jz-1]>>23;
320	else if (z >= 0.5) ih = 2;
321
322	if (ih > 0) { /* q > 0.5 */
323	n += 1; carry = 0;
324	for (i=0; i<jz; i++) { /* compute 1-q */
325	j = iq[i];
326	if (carry == 0) {
327	if (j != 0) {
328	carry = 1;
329	iq[i] = 0x1000000 - j;
330	}
331	} else
332	iq[i] = 0xffffff - j;
333	}
334	if (q0 > 0) { /* rare case: chance is 1 in 12 */
335	switch(q0) {
336	case 1:
337	iq[jz-1] &= 0x7fffff; break;
338	case 2:
339	iq[jz-1] &= 0x3fffff; break;
340	}
341	}
342	if (ih == 2) {
343	z = 1.0 - z;
344	if (carry != 0)
345	z -= scalbn(1.0,q0);
346	}
347	}
348
349	/* check if recomputation is needed */
350	if (z == 0.0) {
351	j = 0;
352	for (i=jz-1; i>=jk; i--) j \|= iq[i];
353	if (j == 0) { /* need recomputation */
354	for (k=1; iq[jk-k]==0; k++); /* k = no. of terms needed */
355
356	for (i=jz+1; i<=jz+k; i++) { /* add q[jz+1] to q[jz+k] */
357	f[jx+i] = (double)ipio2[jv+i];
358	for (j=0,fw=0.0; j<=jx; j++)
359	fw += x[j]*f[jx+i-j];
360	q[i] = fw;
361	}
362	jz += k;
363	goto recompute;
364	}
365	}
366
367	/* chop off zero terms */
368	if (z == 0.0) {
369	jz -= 1;
370	q0 -= 24;
371	while (iq[jz] == 0) {
372	jz--;
373	q0 -= 24;
374	}
375	} else { /* break z into 24-bit if necessary */
376	z = scalbn(z,-q0);
377	if (z >= 0x1p24) {
378	fw = (double)(int32_t)(0x1p-24*z);
379	iq[jz] = (int32_t)(z - 0x1p24*fw);
380	jz += 1;
381	q0 += 24;
382	iq[jz] = (int32_t)fw;
383	} else
384	iq[jz] = (int32_t)z;
385	}
386
387	/* convert integer "bit" chunk to floating-point value */
388	fw = scalbn(1.0,q0);
389	for (i=jz; i>=0; i--) {
390	q[i] = fw*(double)iq[i];
391	fw *= 0x1p-24;
392	}
393
394	/* compute PIo2[0,...,jp]q[jz,...,0] /
395	for(i=jz; i>=0; i--) {
396	for (fw=0.0,k=0; k<=jp && k<=jz-i; k++)
397	fw += PIo2[k]*q[i+k];
398	fq[jz-i] = fw;
399	}
400
401	/* compress fq[] into y[] */
402	switch(prec) {
403	case 0:
404	fw = 0.0;
405	for (i=jz; i>=0; i--)
406	fw += fq[i];
407	y[0] = ih==0 ? fw : -fw;
408	break;
409	case 1:
410	case 2:
411	fw = 0.0;
412	for (i=jz; i>=0; i--)
413	fw += fq[i];
414	// TODO: drop excess precision here once double_t is used
415	fw = (double)fw;
416	y[0] = ih==0 ? fw : -fw;
417	fw = fq[0]-fw;
418	for (i=1; i<=jz; i++)
419	fw += fq[i];
420	y[1] = ih==0 ? fw : -fw;
421	break;
422	case 3: /* painful */
423	for (i=jz; i>0; i--) {
424	fw = fq[i-1]+fq[i];
425	fq[i] += fq[i-1]-fw;
426	fq[i-1] = fw;
427	}
428	for (i=jz; i>1; i--) {
429	fw = fq[i-1]+fq[i];
430	fq[i] += fq[i-1]-fw;
431	fq[i-1] = fw;
432	}
433	for (fw=0.0,i=jz; i>=2; i--)
434	fw += fq[i];
435	if (ih==0) {
436	y[0] = fq[0]; y[1] = fq[1]; y[2] = fw;
437	} else {
438	y[0] = -fq[0]; y[1] = -fq[1]; y[2] = -fw;
439	}
440	}
441	return n&7;
442	}

lib/libc/wasi/libc-top-half/musl/src/math/__sin.c deleted-64

...	@@ -1,64 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/k_sin.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunSoft, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/* __sin( x, y, iy)
13	* kernel sin function on ~[-pi/4, pi/4] (except on -0), pi/4 ~ 0.7854
14	* Input x is assumed to be bounded by ~pi/4 in magnitude.
15	* Input y is the tail of x.
16	* Input iy indicates whether y is 0. (if iy=0, y assume to be 0).
17	*
18	* Algorithm
19	* 1. Since sin(-x) = -sin(x), we need only to consider positive x.
20	* 2. Callers must return sin(-0) = -0 without calling here since our
21	* odd polynomial is not evaluated in a way that preserves -0.
22	* Callers may do the optimization sin(x) ~ x for tiny x.
23	* 3. sin(x) is approximated by a polynomial of degree 13 on
24	* [0,pi/4]
25	* 3 13
26	* sin(x) ~ x + S1x + ... + S6x
27	* where
28	*
29	* \|sin(x) 2 4 6 8 10 12 \| -58
30	* \|----- - (1+S1x +S2x +S3x +S4x +S5x +S6x )\| <= 2
31	* \| x \|
32	*
33	* 4. sin(x+y) = sin(x) + sin'(x')*y
34	* ~ sin(x) + (1-xx/2)y
35	* For better accuracy, let
36	* 3 2 2 2 2
37	* r = x (S2+x (S3+x (S4+x (S5+x *S6))))
38	* then 3 2
39	* sin(x) = x + (S1x + (x (r-y/2)+y))
40	*/
41
42	#include "libm.h"
43
44	static const double
45	S1 = -1.66666666666666324348e-01, /* 0xBFC55555, 0x55555549 */
46	S2 = 8.33333333332248946124e-03, /* 0x3F811111, 0x1110F8A6 */
47	S3 = -1.98412698298579493134e-04, /* 0xBF2A01A0, 0x19C161D5 */
48	S4 = 2.75573137070700676789e-06, /* 0x3EC71DE3, 0x57B1FE7D */
49	S5 = -2.50507602534068634195e-08, /* 0xBE5AE5E6, 0x8A2B9CEB */
50	S6 = 1.58969099521155010221e-10; /* 0x3DE5D93A, 0x5ACFD57C */
51
52	double __sin(double x, double y, int iy)
53	{
54	double_t z,r,v,w;
55
56	z = x*x;
57	w = z*z;
58	r = S2 + z(S3 + zS4) + zw(S5 + z*S6);
59	v = z*x;
60	if (iy == 0)
61	return x + v(S1 + zr);
62	else
63	return x - ((z(0.5y - vr) - y) - vS1);
64	}

lib/libc/wasi/libc-top-half/musl/src/math/__sindf.c deleted-36

...	@@ -1,36 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/k_sinf.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	* Optimized by Bruce D. Evans.
5	*/
6	/*
7	* ====================================================
8	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
9	*
10	* Developed at SunPro, a Sun Microsystems, Inc. business.
11	* Permission to use, copy, modify, and distribute this
12	* software is freely granted, provided that this notice
13	* is preserved.
14	* ====================================================
15	*/
16
17	#include "libm.h"
18
19	/* \|sin(x)/x - s(x)\| < 2*-37.5 (~[-4.89e-12, 4.824e-12]). /
20	static const double
21	S1 = -0x15555554cbac77.0p-55, /* -0.166666666416265235595 */
22	S2 = 0x111110896efbb2.0p-59, /* 0.0083333293858894631756 */
23	S3 = -0x1a00f9e2cae774.0p-65, /* -0.000198393348360966317347 */
24	S4 = 0x16cd878c3b46a7.0p-71; /* 0.0000027183114939898219064 */
25
26	float __sindf(double x)
27	{
28	double_t r, s, w, z;
29
30	/* Try to optimize for parallel evaluation as in __tandf.c. */
31	z = x*x;
32	w = z*z;
33	r = S3 + z*S4;
34	s = z*x;
35	return (x + s(S1 + zS2)) + swr;
36	}

lib/libc/wasi/libc-top-half/musl/src/math/__sinl.c deleted-78

...	@@ -1,78 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/ld80/k_sinl.c */
2	/* origin: FreeBSD /usr/src/lib/msun/ld128/k_sinl.c */
3	/*
4	* ====================================================
5	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
6	* Copyright (c) 2008 Steven G. Kargl, David Schultz, Bruce D. Evans.
7	*
8	* Developed at SunSoft, a Sun Microsystems, Inc. business.
9	* Permission to use, copy, modify, and distribute this
10	* software is freely granted, provided that this notice
11	* is preserved.
12	* ====================================================
13	*/
14
15	#include "libm.h"
16
17	#if (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
18	#if LDBL_MANT_DIG == 64
19	/*
20	* ld80 version of __sin.c. See __sin.c for most comments.
21	*/
22	/*
23	* Domain [-0.7854, 0.7854], range ~[-1.89e-22, 1.915e-22]
24	* \|sin(x)/x - s(x)\| < 2**-72.1
25	*
26	* See __cosl.c for more details about the polynomial.
27	*/
28	static const long double
29	S1 = -0.166666666666666666671L; /* -0xaaaaaaaaaaaaaaab.0p-66 */
30	static const double
31	S2 = 0.0083333333333333332, /* 0x11111111111111.0p-59 */
32	S3 = -0.00019841269841269427, /* -0x1a01a01a019f81.0p-65 */
33	S4 = 0.0000027557319223597490, /* 0x171de3a55560f7.0p-71 */
34	S5 = -0.000000025052108218074604, /* -0x1ae64564f16cad.0p-78 */
35	S6 = 1.6059006598854211e-10, /* 0x161242b90243b5.0p-85 */
36	S7 = -7.6429779983024564e-13, /* -0x1ae42ebd1b2e00.0p-93 */
37	S8 = 2.6174587166648325e-15; /* 0x179372ea0b3f64.0p-101 */
38	#define POLY(z) (S2+z(S3+z(S4+z(S5+z(S6+z(S7+zS8))))))
39	#elif LDBL_MANT_DIG == 113
40	/*
41	* ld128 version of __sin.c. See __sin.c for most comments.
42	*/
43	/*
44	* Domain [-0.7854, 0.7854], range ~[-1.53e-37, 1.659e-37]
45	* \|sin(x)/x - s(x)\| < 2**-122.1
46	*
47	* See __cosl.c for more details about the polynomial.
48	*/
49	static const long double
50	S1 = -0.16666666666666666666666666666666666606732416116558L,
51	S2 = 0.0083333333333333333333333333333331135404851288270047L,
52	S3 = -0.00019841269841269841269841269839935785325638310428717L,
53	S4 = 0.27557319223985890652557316053039946268333231205686e-5L,
54	S5 = -0.25052108385441718775048214826384312253862930064745e-7L,
55	S6 = 0.16059043836821614596571832194524392581082444805729e-9L,
56	S7 = -0.76471637318198151807063387954939213287488216303768e-12L,
57	S8 = 0.28114572543451292625024967174638477283187397621303e-14L;
58	static const double
59	S9 = -0.82206352458348947812512122163446202498005154296863e-17,
60	S10 = 0.19572940011906109418080609928334380560135358385256e-19,
61	S11 = -0.38680813379701966970673724299207480965452616911420e-22,
62	S12 = 0.64038150078671872796678569586315881020659912139412e-25;
63	#define POLY(z) (S2+z(S3+z(S4+z(S5+z(S6+z(S7+z(S8+ \
64	z(S9+z(S10+z(S11+zS12))))))))))
65	#endif
66
67	long double __sinl(long double x, long double y, int iy)
68	{
69	long double z,r,v;
70
71	z = x*x;
72	v = z*x;
73	r = POLY(z);
74	if (iy == 0)
75	return x+v(S1+zr);
76	return x-((z(0.5y-vr)-y)-vS1);
77	}
78	#endif

lib/libc/wasi/libc-top-half/musl/src/math/__tan.c deleted-110

...	@@ -1,110 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/k_tan.c */
2	/*
3	* ====================================================
4	* Copyright 2004 Sun Microsystems, Inc. All Rights Reserved.
5	*
6	* Permission to use, copy, modify, and distribute this
7	* software is freely granted, provided that this notice
8	* is preserved.
9	* ====================================================
10	*/
11	/* __tan( x, y, k )
12	* kernel tan function on ~[-pi/4, pi/4] (except on -0), pi/4 ~ 0.7854
13	* Input x is assumed to be bounded by ~pi/4 in magnitude.
14	* Input y is the tail of x.
15	* Input odd indicates whether tan (if odd = 0) or -1/tan (if odd = 1) is returned.
16	*
17	* Algorithm
18	* 1. Since tan(-x) = -tan(x), we need only to consider positive x.
19	* 2. Callers must return tan(-0) = -0 without calling here since our
20	* odd polynomial is not evaluated in a way that preserves -0.
21	* Callers may do the optimization tan(x) ~ x for tiny x.
22	* 3. tan(x) is approximated by a odd polynomial of degree 27 on
23	* [0,0.67434]
24	* 3 27
25	* tan(x) ~ x + T1x + ... + T13x
26	* where
27	*
28	* \|tan(x) 2 4 26 \| -59.2
29	* \|----- - (1+T1x +T2x +.... +T13*x )\| <= 2
30	* \| x \|
31	*
32	* Note: tan(x+y) = tan(x) + tan'(x)*y
33	* ~ tan(x) + (1+xx)y
34	* Therefore, for better accuracy in computing tan(x+y), let
35	* 3 2 2 2 2
36	* r = x (T2+x (T3+x (...+x (T12+x *T13))))
37	* then
38	* 3 2
39	* tan(x+y) = x + (T1x + (x (r+y)+y))
40	*
41	* 4. For x in [0.67434,pi/4], let y = pi/4 - x, then
42	* tan(x) = tan(pi/4-y) = (1-tan(y))/(1+tan(y))
43	* = 1 - 2*(tan(y) - (tan(y)^2)/(1+tan(y)))
44	*/
45
46	#include "libm.h"
47
48	static const double T[] = {
49	3.33333333333334091986e-01, /* 3FD55555, 55555563 */
50	1.33333333333201242699e-01, /* 3FC11111, 1110FE7A */
51	5.39682539762260521377e-02, /* 3FABA1BA, 1BB341FE */
52	2.18694882948595424599e-02, /* 3F9664F4, 8406D637 */
53	8.86323982359930005737e-03, /* 3F8226E3, E96E8493 */
54	3.59207910759131235356e-03, /* 3F6D6D22, C9560328 */
55	1.45620945432529025516e-03, /* 3F57DBC8, FEE08315 */
56	5.88041240820264096874e-04, /* 3F4344D8, F2F26501 */
57	2.46463134818469906812e-04, /* 3F3026F7, 1A8D1068 */
58	7.81794442939557092300e-05, /* 3F147E88, A03792A6 */
59	7.14072491382608190305e-05, /* 3F12B80F, 32F0A7E9 */
60	-1.85586374855275456654e-05, /* BEF375CB, DB605373 */
61	2.59073051863633712884e-05, /* 3EFB2A70, 74BF7AD4 */
62	},
63	pio4 = 7.85398163397448278999e-01, /* 3FE921FB, 54442D18 */
64	pio4lo = 3.06161699786838301793e-17; /* 3C81A626, 33145C07 */
65
66	double __tan(double x, double y, int odd)
67	{
68	double_t z, r, v, w, s, a;
69	double w0, a0;
70	uint32_t hx;
71	int big, sign;
72
73	GET_HIGH_WORD(hx,x);
74	big = (hx&0x7fffffff) >= 0x3FE59428; /* \|x\| >= 0.6744 */
75	if (big) {
76	sign = hx>>31;
77	if (sign) {
78	x = -x;
79	y = -y;
80	}
81	x = (pio4 - x) + (pio4lo - y);
82	y = 0.0;
83	}
84	z = x * x;
85	w = z * z;
86	/*
87	* Break x^5(T[1]+x^2T[2]+...) into
88	* x^5(T[1]+x^4T[3]+...+x^20T[11]) +
89	* x^5(x^2(T[2]+x^4T[4]+...+x^22*[T12]))
90	*/
91	r = T[1] + w(T[3] + w(T[5] + w(T[7] + w(T[9] + w*T[11]))));
92	v = z(T[2] + w(T[4] + w(T[6] + w(T[8] + w(T[10] + wT[12])))));
93	s = z * x;
94	r = y + z(s(r + v) + y) + s*T[0];
95	w = x + r;
96	if (big) {
97	s = 1 - 2*odd;
98	v = s - 2.0 * (x + (r - w*w/(w + s)));
99	return sign ? -v : v;
100	}
101	if (!odd)
102	return w;
103	/* -1.0/(x+r) has up to 2ulp error, so compute it accurately */
104	w0 = w;
105	SET_LOW_WORD(w0, 0);
106	v = r - (w0 - x); /* w0+v = r+x */
107	a0 = a = -1.0 / w;
108	SET_LOW_WORD(a0, 0);
109	return a0 + a(1.0 + a0w0 + a0*v);
110	}

lib/libc/wasi/libc-top-half/musl/src/math/__tandf.c deleted-54

...	@@ -1,54 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/k_tanf.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	* Optimized by Bruce D. Evans.
5	*/
6	/*
7	* ====================================================
8	* Copyright 2004 Sun Microsystems, Inc. All Rights Reserved.
9	*
10	* Permission to use, copy, modify, and distribute this
11	* software is freely granted, provided that this notice
12	* is preserved.
13	* ====================================================
14	*/
15
16	#include "libm.h"
17
18	/* \|tan(x)/x - t(x)\| < 2*-25.5 (~[-2e-08, 2e-08]). /
19	static const double T[] = {
20	0x15554d3418c99f.0p-54, /* 0.333331395030791399758 */
21	0x1112fd38999f72.0p-55, /* 0.133392002712976742718 */
22	0x1b54c91d865afe.0p-57, /* 0.0533812378445670393523 */
23	0x191df3908c33ce.0p-58, /* 0.0245283181166547278873 */
24	0x185dadfcecf44e.0p-61, /* 0.00297435743359967304927 */
25	0x1362b9bf971bcd.0p-59, /* 0.00946564784943673166728 */
26	};
27
28	float __tandf(double x, int odd)
29	{
30	double_t z,r,w,s,t,u;
31
32	z = x*x;
33	/*
34	* Split up the polynomial into small independent terms to give
35	* opportunities for parallel evaluation. The chosen splitting is
36	* micro-optimized for Athlons (XP, X64). It costs 2 multiplications
37	* relative to Horner's method on sequential machines.
38	*
39	* We add the small terms from lowest degree up for efficiency on
40	* non-sequential machines (the lowest degree terms tend to be ready
41	* earlier). Apart from this, we don't care about order of
42	* operations, and don't need to to care since we have precision to
43	* spare. However, the chosen splitting is good for accuracy too,
44	* and would give results as accurate as Horner's method if the
45	* small terms were added from highest degree down.
46	*/
47	r = T[4] + z*T[5];
48	t = T[2] + z*T[3];
49	w = z*z;
50	s = z*x;
51	u = T[0] + z*T[1];
52	r = (x + su) + (sw)(t + wr);
53	return odd ? -1.0/r : r;
54	}

lib/libc/wasi/libc-top-half/musl/src/math/__tanl.c deleted-143

...	@@ -1,143 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/ld80/k_tanl.c */
2	/* origin: FreeBSD /usr/src/lib/msun/ld128/k_tanl.c */
3	/*
4	* ====================================================
5	* Copyright 2004 Sun Microsystems, Inc. All Rights Reserved.
6	* Copyright (c) 2008 Steven G. Kargl, David Schultz, Bruce D. Evans.
7	*
8	* Permission to use, copy, modify, and distribute this
9	* software is freely granted, provided that this notice
10	* is preserved.
11	* ====================================================
12	*/
13
14	#include "libm.h"
15
16	#if (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
17	#if LDBL_MANT_DIG == 64
18	/*
19	* ld80 version of __tan.c. See __tan.c for most comments.
20	*/
21	/*
22	* Domain [-0.67434, 0.67434], range ~[-2.25e-22, 1.921e-22]
23	* \|tan(x)/x - t(x)\| < 2**-71.9
24	*
25	* See __cosl.c for more details about the polynomial.
26	*/
27	static const long double
28	T3 = 0.333333333333333333180L, /* 0xaaaaaaaaaaaaaaa5.0p-65 */
29	T5 = 0.133333333333333372290L, /* 0x88888888888893c3.0p-66 */
30	T7 = 0.0539682539682504975744L, /* 0xdd0dd0dd0dc13ba2.0p-68 */
31	pio4 = 0.785398163397448309628L, /* 0xc90fdaa22168c235.0p-64 */
32	pio4lo = -1.25413940316708300586e-20L; /* -0xece675d1fc8f8cbb.0p-130 */
33	static const double
34	T9 = 0.021869488536312216, /* 0x1664f4882cc1c2.0p-58 */
35	T11 = 0.0088632355256619590, /* 0x1226e355c17612.0p-59 */
36	T13 = 0.0035921281113786528, /* 0x1d6d3d185d7ff8.0p-61 */
37	T15 = 0.0014558334756312418, /* 0x17da354aa3f96b.0p-62 */
38	T17 = 0.00059003538700862256, /* 0x13559358685b83.0p-63 */
39	T19 = 0.00023907843576635544, /* 0x1f56242026b5be.0p-65 */
40	T21 = 0.000097154625656538905, /* 0x1977efc26806f4.0p-66 */
41	T23 = 0.000038440165747303162, /* 0x14275a09b3ceac.0p-67 */
42	T25 = 0.000018082171885432524, /* 0x12f5e563e5487e.0p-68 */
43	T27 = 0.0000024196006108814377, /* 0x144c0d80cc6896.0p-71 */
44	T29 = 0.0000078293456938132840, /* 0x106b59141a6cb3.0p-69 */
45	T31 = -0.0000032609076735050182, /* -0x1b5abef3ba4b59.0p-71 */
46	T33 = 0.0000023261313142559411; /* 0x13835436c0c87f.0p-71 */
47	#define RPOLY(w) (T5 + w * (T9 + w * (T13 + w * (T17 + w * (T21 + \
48	w * (T25 + w * (T29 + w * T33)))))))
49	#define VPOLY(w) (T7 + w * (T11 + w * (T15 + w * (T19 + w * (T23 + \
50	w * (T27 + w * T31))))))
51	#elif LDBL_MANT_DIG == 113
52	/*
53	* ld128 version of __tan.c. See __tan.c for most comments.
54	*/
55	/*
56	* Domain [-0.67434, 0.67434], range ~[-3.37e-36, 1.982e-37]
57	* \|tan(x)/x - t(x)\| < 2**-117.8 (XXX should be ~1e-37)
58	*
59	* See __cosl.c for more details about the polynomial.
60	*/
61	static const long double
62	T3 = 0x1.5555555555555555555555555553p-2L,
63	T5 = 0x1.1111111111111111111111111eb5p-3L,
64	T7 = 0x1.ba1ba1ba1ba1ba1ba1ba1b694cd6p-5L,
65	T9 = 0x1.664f4882c10f9f32d6bbe09d8bcdp-6L,
66	T11 = 0x1.226e355e6c23c8f5b4f5762322eep-7L,
67	T13 = 0x1.d6d3d0e157ddfb5fed8e84e27b37p-9L,
68	T15 = 0x1.7da36452b75e2b5fce9ee7c2c92ep-10L,
69	T17 = 0x1.355824803674477dfcf726649efep-11L,
70	T19 = 0x1.f57d7734d1656e0aceb716f614c2p-13L,
71	T21 = 0x1.967e18afcb180ed942dfdc518d6cp-14L,
72	T23 = 0x1.497d8eea21e95bc7e2aa79b9f2cdp-15L,
73	T25 = 0x1.0b132d39f055c81be49eff7afd50p-16L,
74	T27 = 0x1.b0f72d33eff7bfa2fbc1059d90b6p-18L,
75	T29 = 0x1.5ef2daf21d1113df38d0fbc00267p-19L,
76	T31 = 0x1.1c77d6eac0234988cdaa04c96626p-20L,
77	T33 = 0x1.cd2a5a292b180e0bdd701057dfe3p-22L,
78	T35 = 0x1.75c7357d0298c01a31d0a6f7d518p-23L,
79	T37 = 0x1.2f3190f4718a9a520f98f50081fcp-24L,
80	pio4 = 0x1.921fb54442d18469898cc51701b8p-1L,
81	pio4lo = 0x1.cd129024e088a67cc74020bbea60p-116L;
82	static const double
83	T39 = 0.000000028443389121318352, /* 0x1e8a7592977938.0p-78 */
84	T41 = 0.000000011981013102001973, /* 0x19baa1b1223219.0p-79 */
85	T43 = 0.0000000038303578044958070, /* 0x107385dfb24529.0p-80 */
86	T45 = 0.0000000034664378216909893, /* 0x1dc6c702a05262.0p-81 */
87	T47 = -0.0000000015090641701997785, /* -0x19ecef3569ebb6.0p-82 */
88	T49 = 0.0000000029449552300483952, /* 0x194c0668da786a.0p-81 */
89	T51 = -0.0000000022006995706097711, /* -0x12e763b8845268.0p-81 */
90	T53 = 0.0000000015468200913196612, /* 0x1a92fc98c29554.0p-82 */
91	T55 = -0.00000000061311613386849674, /* -0x151106cbc779a9.0p-83 */
92	T57 = 1.4912469681508012e-10; /* 0x147edbdba6f43a.0p-85 */
93	#define RPOLY(w) (T5 + w * (T9 + w * (T13 + w * (T17 + w * (T21 + \
94	w * (T25 + w * (T29 + w * (T33 + w * (T37 + w * (T41 + \
95	w * (T45 + w * (T49 + w * (T53 + w * T57)))))))))))))
96	#define VPOLY(w) (T7 + w * (T11 + w * (T15 + w * (T19 + w * (T23 + \
97	w * (T27 + w * (T31 + w * (T35 + w * (T39 + w * (T43 + \
98	w * (T47 + w * (T51 + w * T55))))))))))))
99	#endif
100
101	long double __tanl(long double x, long double y, int odd) {
102	long double z, r, v, w, s, a, t;
103	int big, sign;
104
105	big = fabsl(x) >= 0.67434;
106	if (big) {
107	sign = 0;
108	if (x < 0) {
109	sign = 1;
110	x = -x;
111	y = -y;
112	}
113	x = (pio4 - x) + (pio4lo - y);
114	y = 0.0;
115	}
116	z = x * x;
117	w = z * z;
118	r = RPOLY(w);
119	v = z * VPOLY(w);
120	s = z * x;
121	r = y + z * (s * (r + v) + y) + T3 * s;
122	w = x + r;
123	if (big) {
124	s = 1 - 2*odd;
125	v = s - 2.0 * (x + (r - w * w / (w + s)));
126	return sign ? -v : v;
127	}
128	if (!odd)
129	return w;
130	/*
131	* if allow error up to 2 ulp, simply return
132	* -1.0 / (x+r) here
133	*/
134	/* compute -1.0 / (x+r) accurately */
135	z = w;
136	z = z + 0x1p32 - 0x1p32;
137	v = r - (z - x); /* z+v = r+x */
138	t = a = -1.0 / w; /* a = -1.0/w */
139	t = t + 0x1p32 - 0x1p32;
140	s = 1.0 + t * z;
141	return t + a * (s + t * v);
142	}
143	#endif

lib/libc/wasi/libc-top-half/musl/src/math/acos.c deleted-101

...	@@ -1,101 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_acos.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunSoft, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/* acos(x)
13	* Method :
14	* acos(x) = pi/2 - asin(x)
15	* acos(-x) = pi/2 + asin(x)
16	* For \|x\|<=0.5
17	* acos(x) = pi/2 - (x + xx^2R(x^2)) (see asin.c)
18	* For x>0.5
19	* acos(x) = pi/2 - (pi/2 - 2asin(sqrt((1-x)/2)))
20	* = 2asin(sqrt((1-x)/2))
21	* = 2s + 2szR(z) ...z=(1-x)/2, s=sqrt(z)
22	* = 2f + (2c + 2szR(z))
23	* where f=hi part of s, and c = (z-f*f)/(s+f) is the correction term
24	* for f so that f+c ~ sqrt(z).
25	* For x<-0.5
26	* acos(x) = pi - 2asin(sqrt((1-\|x\|)/2))
27	* = pi - 0.5(s+sz*R(z)), where z=(1-\|x\|)/2,s=sqrt(z)
28	*
29	* Special cases:
30	* if x is NaN, return x itself;
31	* if \|x\|>1, return NaN with invalid signal.
32	*
33	* Function needed: sqrt
34	*/
35
36	#include "libm.h"
37
38	static const double
39	pio2_hi = 1.57079632679489655800e+00, /* 0x3FF921FB, 0x54442D18 */
40	pio2_lo = 6.12323399573676603587e-17, /* 0x3C91A626, 0x33145C07 */
41	pS0 = 1.66666666666666657415e-01, /* 0x3FC55555, 0x55555555 */
42	pS1 = -3.25565818622400915405e-01, /* 0xBFD4D612, 0x03EB6F7D */
43	pS2 = 2.01212532134862925881e-01, /* 0x3FC9C155, 0x0E884455 */
44	pS3 = -4.00555345006794114027e-02, /* 0xBFA48228, 0xB5688F3B */
45	pS4 = 7.91534994289814532176e-04, /* 0x3F49EFE0, 0x7501B288 */
46	pS5 = 3.47933107596021167570e-05, /* 0x3F023DE1, 0x0DFDF709 */
47	qS1 = -2.40339491173441421878e+00, /* 0xC0033A27, 0x1C8A2D4B */
48	qS2 = 2.02094576023350569471e+00, /* 0x40002AE5, 0x9C598AC8 */
49	qS3 = -6.88283971605453293030e-01, /* 0xBFE6066C, 0x1B8D0159 */
50	qS4 = 7.70381505559019352791e-02; /* 0x3FB3B8C5, 0xB12E9282 */
51
52	static double R(double z)
53	{
54	double_t p, q;
55	p = z(pS0+z(pS1+z(pS2+z(pS3+z(pS4+zpS5)))));
56	q = 1.0+z(qS1+z(qS2+z(qS3+zqS4)));
57	return p/q;
58	}
59
60	double acos(double x)
61	{
62	double z,w,s,c,df;
63	uint32_t hx,ix;
64
65	GET_HIGH_WORD(hx, x);
66	ix = hx & 0x7fffffff;
67	/* \|x\| >= 1 or nan */
68	if (ix >= 0x3ff00000) {
69	uint32_t lx;
70
71	GET_LOW_WORD(lx,x);
72	if ((ix-0x3ff00000 \| lx) == 0) {
73	/* acos(1)=0, acos(-1)=pi */
74	if (hx >> 31)
75	return 2*pio2_hi + 0x1p-120f;
76	return 0;
77	}
78	return 0/(x-x);
79	}
80	/* \|x\| < 0.5 */
81	if (ix < 0x3fe00000) {
82	if (ix <= 0x3c600000) /* \|x\| < 2*-57 /
83	return pio2_hi + 0x1p-120f;
84	return pio2_hi - (x - (pio2_lo-xR(xx)));
85	}
86	/* x < -0.5 */
87	if (hx >> 31) {
88	z = (1.0+x)*0.5;
89	s = sqrt(z);
90	w = R(z)*s-pio2_lo;
91	return 2*(pio2_hi - (s+w));
92	}
93	/* x > 0.5 */
94	z = (1.0-x)*0.5;
95	s = sqrt(z);
96	df = s;
97	SET_LOW_WORD(df,0);
98	c = (z-df*df)/(s+df);
99	w = R(z)*s+c;
100	return 2*(df+w);
101	}

lib/libc/wasi/libc-top-half/musl/src/math/acosf.c deleted-71

...	@@ -1,71 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_acosf.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	*/
5	/*
6	* ====================================================
7	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
8	*
9	* Developed at SunPro, a Sun Microsystems, Inc. business.
10	* Permission to use, copy, modify, and distribute this
11	* software is freely granted, provided that this notice
12	* is preserved.
13	* ====================================================
14	*/
15
16	#include "libm.h"
17
18	static const float
19	pio2_hi = 1.5707962513e+00, /* 0x3fc90fda */
20	pio2_lo = 7.5497894159e-08, /* 0x33a22168 */
21	pS0 = 1.6666586697e-01,
22	pS1 = -4.2743422091e-02,
23	pS2 = -8.6563630030e-03,
24	qS1 = -7.0662963390e-01;
25
26	static float R(float z)
27	{
28	float_t p, q;
29	p = z(pS0+z(pS1+z*pS2));
30	q = 1.0f+z*qS1;
31	return p/q;
32	}
33
34	float acosf(float x)
35	{
36	float z,w,s,c,df;
37	uint32_t hx,ix;
38
39	GET_FLOAT_WORD(hx, x);
40	ix = hx & 0x7fffffff;
41	/* \|x\| >= 1 or nan */
42	if (ix >= 0x3f800000) {
43	if (ix == 0x3f800000) {
44	if (hx >> 31)
45	return 2*pio2_hi + 0x1p-120f;
46	return 0;
47	}
48	return 0/(x-x);
49	}
50	/* \|x\| < 0.5 */
51	if (ix < 0x3f000000) {
52	if (ix <= 0x32800000) /* \|x\| < 2*-26 /
53	return pio2_hi + 0x1p-120f;
54	return pio2_hi - (x - (pio2_lo-xR(xx)));
55	}
56	/* x < -0.5 */
57	if (hx >> 31) {
58	z = (1+x)*0.5f;
59	s = sqrtf(z);
60	w = R(z)*s-pio2_lo;
61	return 2*(pio2_hi - (s+w));
62	}
63	/* x > 0.5 */
64	z = (1-x)*0.5f;
65	s = sqrtf(z);
66	GET_FLOAT_WORD(hx,s);
67	SET_FLOAT_WORD(df,hx&0xfffff000);
68	c = (z-df*df)/(s+df);
69	w = R(z)*s+c;
70	return 2*(df+w);
71	}

lib/libc/wasi/libc-top-half/musl/src/math/acosh.c deleted-24

...	@@ -1,24 +0,0 @@
1	#include "libm.h"
2
3	#if FLT_EVAL_METHOD==2
4	#undef sqrt
5	#define sqrt sqrtl
6	#endif
7
8	/* acosh(x) = log(x + sqrt(xx-1)) /
9	double acosh(double x)
10	{
11	union {double f; uint64_t i;} u = {.f = x};
12	unsigned e = u.i >> 52 & 0x7ff;
13
14	/* x < 1 domain error is handled in the called functions */
15
16	if (e < 0x3ff + 1)
17	/* \|x\| < 2, up to 2ulp error in [1,1.125] */
18	return log1p(x-1 + sqrt((x-1)(x-1)+2(x-1)));
19	if (e < 0x3ff + 26)
20	/* \|x\| < 0x1p26 */
21	return log(2x - 1/(x+sqrt(xx-1)));
22	/* \|x\| >= 0x1p26 or nan */
23	return log(x) + 0.693147180559945309417232121458176568;
24	}

lib/libc/wasi/libc-top-half/musl/src/math/acoshf.c deleted-26

...	@@ -1,26 +0,0 @@
1	#include "libm.h"
2
3	#if FLT_EVAL_METHOD==2
4	#undef sqrtf
5	#define sqrtf sqrtl
6	#elif FLT_EVAL_METHOD==1
7	#undef sqrtf
8	#define sqrtf sqrt
9	#endif
10
11	/* acosh(x) = log(x + sqrt(xx-1)) /
12	float acoshf(float x)
13	{
14	union {float f; uint32_t i;} u = {x};
15	uint32_t a = u.i & 0x7fffffff;
16
17	if (a < 0x3f800000+(1<<23))
18	/* \|x\| < 2, invalid if x < 1 */
19	/* up to 2ulp error in [1,1.125] */
20	return log1pf(x-1 + sqrtf((x-1)(x-1)+2(x-1)));
21	if (u.i < 0x3f800000+(12<<23))
22	/* 2 <= x < 0x1p12 */
23	return logf(2x - 1/(x+sqrtf(xx-1)));
24	/* x >= 0x1p12 or x <= -2 or nan */
25	return logf(x) + 0.693147180559945309417232121458176568f;
26	}

lib/libc/wasi/libc-top-half/musl/src/math/acoshl.c deleted-29

...	@@ -1,29 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double acoshl(long double x)
5	{
6	return acosh(x);
7	}
8	#elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
9	/* acosh(x) = log(x + sqrt(xx-1)) /
10	long double acoshl(long double x)
11	{
12	union ldshape u = {x};
13	int e = u.i.se & 0x7fff;
14
15	if (e < 0x3fff + 1)
16	/* \|x\| < 2, invalid if x < 1 or nan */
17	return log1pl(x-1 + sqrtl((x-1)(x-1)+2(x-1)));
18	if (e < 0x3fff + 32)
19	/* \|x\| < 0x1p32 */
20	return logl(2x - 1/(x+sqrtl(xx-1)));
21	return logl(x) + 0.693147180559945309417232121458176568L;
22	}
23	#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
24	// TODO: broken implementation to make things compile
25	long double acoshl(long double x)
26	{
27	return acosh(x);
28	}
29	#endif

lib/libc/wasi/libc-top-half/musl/src/math/acosl.c deleted-67

...	@@ -1,67 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_acosl.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunSoft, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/*
13	* See comments in acos.c.
14	* Converted to long double by David Schultz <das@FreeBSD.ORG>.
15	*/
16
17	#include "libm.h"
18
19	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
20	long double acosl(long double x)
21	{
22	return acos(x);
23	}
24	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
25	#include "__invtrigl.h"
26	#if LDBL_MANT_DIG == 64
27	#define CLEARBOTTOM(u) (u.i.m &= -1ULL << 32)
28	#elif LDBL_MANT_DIG == 113
29	#define CLEARBOTTOM(u) (u.i.lo = 0)
30	#endif
31
32	long double acosl(long double x)
33	{
34	union ldshape u = {x};
35	long double z, s, c, f;
36	uint16_t e = u.i.se & 0x7fff;
37
38	/* \|x\| >= 1 or nan */
39	if (e >= 0x3fff) {
40	if (x == 1)
41	return 0;
42	if (x == -1)
43	return 2*pio2_hi + 0x1p-120f;
44	return 0/(x-x);
45	}
46	/* \|x\| < 0.5 */
47	if (e < 0x3fff - 1) {
48	if (e < 0x3fff - LDBL_MANT_DIG - 1)
49	return pio2_hi + 0x1p-120f;
50	return pio2_hi - (__invtrigl_R(xx)x - pio2_lo + x);
51	}
52	/* x < -0.5 */
53	if (u.i.se >> 15) {
54	z = (1 + x)*0.5;
55	s = sqrtl(z);
56	return 2(pio2_hi - (__invtrigl_R(z)s - pio2_lo + s));
57	}
58	/* x > 0.5 */
59	z = (1 - x)*0.5;
60	s = sqrtl(z);
61	u.f = s;
62	CLEARBOTTOM(u);
63	f = u.f;
64	c = (z - f*f)/(s + f);
65	return 2(__invtrigl_R(z)s + c + f);
66	}
67	#endif

lib/libc/wasi/libc-top-half/musl/src/math/asin.c deleted-107

...	@@ -1,107 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_asin.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunSoft, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/* asin(x)
13	* Method :
14	* Since asin(x) = x + x^3/6 + x^53/40 + x^715/336 + ...
15	* we approximate asin(x) on [0,0.5] by
16	* asin(x) = x + xx^2R(x^2)
17	* where
18	* R(x^2) is a rational approximation of (asin(x)-x)/x^3
19	* and its remez error is bounded by
20	* \|(asin(x)-x)/x^3 - R(x^2)\| < 2^(-58.75)
21	*
22	* For x in [0.5,1]
23	* asin(x) = pi/2-2*asin(sqrt((1-x)/2))
24	* Let y = (1-x), z = y/2, s := sqrt(z), and pio2_hi+pio2_lo=pi/2;
25	* then for x>0.98
26	* asin(x) = pi/2 - 2(s+sz*R(z))
27	* = pio2_hi - (2(s+sz*R(z)) - pio2_lo)
28	* For x<=0.98, let pio4_hi = pio2_hi/2, then
29	* f = hi part of s;
30	* c = sqrt(z) - f = (z-f*f)/(s+f) ...f+c=sqrt(z)
31	* and
32	* asin(x) = pi/2 - 2(s+sz*R(z))
33	* = pio4_hi+(pio4-2s)-(2szR(z)-pio2_lo)
34	* = pio4_hi+(pio4-2f)-(2szR(z)-(pio2_lo+2c))
35	*
36	* Special cases:
37	* if x is NaN, return x itself;
38	* if \|x\|>1, return NaN with invalid signal.
39	*
40	*/
41
42	#include "libm.h"
43
44	static const double
45	pio2_hi = 1.57079632679489655800e+00, /* 0x3FF921FB, 0x54442D18 */
46	pio2_lo = 6.12323399573676603587e-17, /* 0x3C91A626, 0x33145C07 */
47	/* coefficients for R(x^2) */
48	pS0 = 1.66666666666666657415e-01, /* 0x3FC55555, 0x55555555 */
49	pS1 = -3.25565818622400915405e-01, /* 0xBFD4D612, 0x03EB6F7D */
50	pS2 = 2.01212532134862925881e-01, /* 0x3FC9C155, 0x0E884455 */
51	pS3 = -4.00555345006794114027e-02, /* 0xBFA48228, 0xB5688F3B */
52	pS4 = 7.91534994289814532176e-04, /* 0x3F49EFE0, 0x7501B288 */
53	pS5 = 3.47933107596021167570e-05, /* 0x3F023DE1, 0x0DFDF709 */
54	qS1 = -2.40339491173441421878e+00, /* 0xC0033A27, 0x1C8A2D4B */
55	qS2 = 2.02094576023350569471e+00, /* 0x40002AE5, 0x9C598AC8 */
56	qS3 = -6.88283971605453293030e-01, /* 0xBFE6066C, 0x1B8D0159 */
57	qS4 = 7.70381505559019352791e-02; /* 0x3FB3B8C5, 0xB12E9282 */
58
59	static double R(double z)
60	{
61	double_t p, q;
62	p = z(pS0+z(pS1+z(pS2+z(pS3+z(pS4+zpS5)))));
63	q = 1.0+z(qS1+z(qS2+z(qS3+zqS4)));
64	return p/q;
65	}
66
67	double asin(double x)
68	{
69	double z,r,s;
70	uint32_t hx,ix;
71
72	GET_HIGH_WORD(hx, x);
73	ix = hx & 0x7fffffff;
74	/* \|x\| >= 1 or nan */
75	if (ix >= 0x3ff00000) {
76	uint32_t lx;
77	GET_LOW_WORD(lx, x);
78	if ((ix-0x3ff00000 \| lx) == 0)
79	/* asin(1) = +-pi/2 with inexact */
80	return x*pio2_hi + 0x1p-120f;
81	return 0/(x-x);
82	}
83	/* \|x\| < 0.5 */
84	if (ix < 0x3fe00000) {
85	/* if 0x1p-1022 <= \|x\| < 0x1p-26, avoid raising underflow */
86	if (ix < 0x3e500000 && ix >= 0x00100000)
87	return x;
88	return x + xR(xx);
89	}
90	/* 1 > \|x\| >= 0.5 */
91	z = (1 - fabs(x))*0.5;
92	s = sqrt(z);
93	r = R(z);
94	if (ix >= 0x3fef3333) { /* if \|x\| > 0.975 */
95	x = pio2_hi-(2(s+sr)-pio2_lo);
96	} else {
97	double f,c;
98	/* f+c = sqrt(z) */
99	f = s;
100	SET_LOW_WORD(f,0);
101	c = (z-f*f)/(s+f);
102	x = 0.5pio2_hi - (2sr - (pio2_lo-2c) - (0.5pio2_hi-2f));
103	}
104	if (hx >> 31)
105	return -x;
106	return x;
107	}

lib/libc/wasi/libc-top-half/musl/src/math/asinf.c deleted-61

...	@@ -1,61 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_asinf.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	*/
5	/*
6	* ====================================================
7	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
8	*
9	* Developed at SunPro, a Sun Microsystems, Inc. business.
10	* Permission to use, copy, modify, and distribute this
11	* software is freely granted, provided that this notice
12	* is preserved.
13	* ====================================================
14	*/
15	#include "libm.h"
16
17	static const double
18	pio2 = 1.570796326794896558e+00;
19
20	static const float
21	/* coefficients for R(x^2) */
22	pS0 = 1.6666586697e-01,
23	pS1 = -4.2743422091e-02,
24	pS2 = -8.6563630030e-03,
25	qS1 = -7.0662963390e-01;
26
27	static float R(float z)
28	{
29	float_t p, q;
30	p = z(pS0+z(pS1+z*pS2));
31	q = 1.0f+z*qS1;
32	return p/q;
33	}
34
35	float asinf(float x)
36	{
37	double s;
38	float z;
39	uint32_t hx,ix;
40
41	GET_FLOAT_WORD(hx, x);
42	ix = hx & 0x7fffffff;
43	if (ix >= 0x3f800000) { /* \|x\| >= 1 */
44	if (ix == 0x3f800000) /* \|x\| == 1 */
45	return xpio2 + 0x1p-120f; / asin(+-1) = +-pi/2 with inexact */
46	return 0/(x-x); /* asin(\|x\|>1) is NaN */
47	}
48	if (ix < 0x3f000000) { /* \|x\| < 0.5 */
49	/* if 0x1p-126 <= \|x\| < 0x1p-12, avoid raising underflow */
50	if (ix < 0x39800000 && ix >= 0x00800000)
51	return x;
52	return x + xR(xx);
53	}
54	/* 1 > \|x\| >= 0.5 */
55	z = (1 - fabsf(x))*0.5f;
56	s = sqrt(z);
57	x = pio2 - 2(s+sR(z));
58	if (hx >> 31)
59	return -x;
60	return x;
61	}

lib/libc/wasi/libc-top-half/musl/src/math/asinh.c deleted-28

...	@@ -1,28 +0,0 @@
1	#include "libm.h"
2
3	/* asinh(x) = sign(x)log(\|x\|+sqrt(xx+1)) ~= x - x^3/6 + o(x^5) */
4	double asinh(double x)
5	{
6	union {double f; uint64_t i;} u = {.f = x};
7	unsigned e = u.i >> 52 & 0x7ff;
8	unsigned s = u.i >> 63;
9
10	/* \|x\| */
11	u.i &= (uint64_t)-1/2;
12	x = u.f;
13
14	if (e >= 0x3ff + 26) {
15	/* \|x\| >= 0x1p26 or inf or nan */
16	x = log(x) + 0.693147180559945309417232121458176568;
17	} else if (e >= 0x3ff + 1) {
18	/* \|x\| >= 2 */
19	x = log(2x + 1/(sqrt(xx+1)+x));
20	} else if (e >= 0x3ff - 26) {
21	/* \|x\| >= 0x1p-26, up to 1.6ulp error in [0.125,0.5] */
22	x = log1p(x + xx/(sqrt(xx+1)+1));
23	} else {
24	/* \|x\| < 0x1p-26, raise inexact if x != 0 */
25	FORCE_EVAL(x + 0x1p120f);
26	}
27	return s ? -x : x;
28	}

lib/libc/wasi/libc-top-half/musl/src/math/asinhf.c deleted-28

...	@@ -1,28 +0,0 @@
1	#include "libm.h"
2
3	/* asinh(x) = sign(x)log(\|x\|+sqrt(xx+1)) ~= x - x^3/6 + o(x^5) */
4	float asinhf(float x)
5	{
6	union {float f; uint32_t i;} u = {.f = x};
7	uint32_t i = u.i & 0x7fffffff;
8	unsigned s = u.i >> 31;
9
10	/* \|x\| */
11	u.i = i;
12	x = u.f;
13
14	if (i >= 0x3f800000 + (12<<23)) {
15	/* \|x\| >= 0x1p12 or inf or nan */
16	x = logf(x) + 0.693147180559945309417232121458176568f;
17	} else if (i >= 0x3f800000 + (1<<23)) {
18	/* \|x\| >= 2 */
19	x = logf(2x + 1/(sqrtf(xx+1)+x));
20	} else if (i >= 0x3f800000 - (12<<23)) {
21	/* \|x\| >= 0x1p-12, up to 1.6ulp error in [0.125,0.5] */
22	x = log1pf(x + xx/(sqrtf(xx+1)+1));
23	} else {
24	/* \|x\| < 0x1p-12, raise inexact if x!=0 */
25	FORCE_EVAL(x + 0x1p120f);
26	}
27	return s ? -x : x;
28	}

lib/libc/wasi/libc-top-half/musl/src/math/asinhl.c deleted-41

...	@@ -1,41 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double asinhl(long double x)
5	{
6	return asinh(x);
7	}
8	#elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
9	/* asinh(x) = sign(x)log(\|x\|+sqrt(xx+1)) ~= x - x^3/6 + o(x^5) */
10	long double asinhl(long double x)
11	{
12	union ldshape u = {x};
13	unsigned e = u.i.se & 0x7fff;
14	unsigned s = u.i.se >> 15;
15
16	/* \|x\| */
17	u.i.se = e;
18	x = u.f;
19
20	if (e >= 0x3fff + 32) {
21	/* \|x\| >= 0x1p32 or inf or nan */
22	x = logl(x) + 0.693147180559945309417232121458176568L;
23	} else if (e >= 0x3fff + 1) {
24	/* \|x\| >= 2 */
25	x = logl(2x + 1/(sqrtl(xx+1)+x));
26	} else if (e >= 0x3fff - 32) {
27	/* \|x\| >= 0x1p-32 */
28	x = log1pl(x + xx/(sqrtl(xx+1)+1));
29	} else {
30	/* \|x\| < 0x1p-32, raise inexact if x!=0 */
31	FORCE_EVAL(x + 0x1p120f);
32	}
33	return s ? -x : x;
34	}
35	#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
36	// TODO: broken implementation to make things compile
37	long double asinhl(long double x)
38	{
39	return asinh(x);
40	}
41	#endif

lib/libc/wasi/libc-top-half/musl/src/math/asinl.c deleted-71

...	@@ -1,71 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_asinl.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunSoft, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/*
13	* See comments in asin.c.
14	* Converted to long double by David Schultz <das@FreeBSD.ORG>.
15	*/
16
17	#include "libm.h"
18
19	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
20	long double asinl(long double x)
21	{
22	return asin(x);
23	}
24	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
25	#include "__invtrigl.h"
26	#if LDBL_MANT_DIG == 64
27	#define CLOSETO1(u) (u.i.m>>56 >= 0xf7)
28	#define CLEARBOTTOM(u) (u.i.m &= -1ULL << 32)
29	#elif LDBL_MANT_DIG == 113
30	#define CLOSETO1(u) (u.i.top >= 0xee00)
31	#define CLEARBOTTOM(u) (u.i.lo = 0)
32	#endif
33
34	long double asinl(long double x)
35	{
36	union ldshape u = {x};
37	long double z, r, s;
38	uint16_t e = u.i.se & 0x7fff;
39	int sign = u.i.se >> 15;
40
41	if (e >= 0x3fff) { /* \|x\| >= 1 or nan */
42	/* asin(+-1)=+-pi/2 with inexact */
43	if (x == 1 \|\| x == -1)
44	return x*pio2_hi + 0x1p-120f;
45	return 0/(x-x);
46	}
47	if (e < 0x3fff - 1) { /* \|x\| < 0.5 */
48	if (e < 0x3fff - (LDBL_MANT_DIG+1)/2) {
49	/* return x with inexact if x!=0 */
50	FORCE_EVAL(x + 0x1p120f);
51	return x;
52	}
53	return x + x__invtrigl_R(xx);
54	}
55	/* 1 > \|x\| >= 0.5 */
56	z = (1.0 - fabsl(x))*0.5;
57	s = sqrtl(z);
58	r = __invtrigl_R(z);
59	if (CLOSETO1(u)) {
60	x = pio2_hi - (2(s+sr)-pio2_lo);
61	} else {
62	long double f, c;
63	u.f = s;
64	CLEARBOTTOM(u);
65	f = u.f;
66	c = (z - f*f)/(s + f);
67	x = 0.5pio2_hi-(2sr - (pio2_lo-2c) - (0.5pio2_hi-2f));
68	}
69	return sign ? -x : x;
70	}
71	#endif

lib/libc/wasi/libc-top-half/musl/src/math/atan.c deleted-116

...	@@ -1,116 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_atan.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunPro, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/* atan(x)
13	* Method
14	* 1. Reduce x to positive by atan(x) = -atan(-x).
15	* 2. According to the integer k=4t+0.25 chopped, t=x, the argument
16	* is further reduced to one of the following intervals and the
17	* arctangent of t is evaluated by the corresponding formula:
18	*
19	* [0,7/16] atan(x) = t-t^3(a1+t^2(a2+...(a10+t^2*a11)...)
20	* [7/16,11/16] atan(x) = atan(1/2) + atan( (t-0.5)/(1+t/2) )
21	* [11/16.19/16] atan(x) = atan( 1 ) + atan( (t-1)/(1+t) )
22	* [19/16,39/16] atan(x) = atan(3/2) + atan( (t-1.5)/(1+1.5t) )
23	* [39/16,INF] atan(x) = atan(INF) + atan( -1/t )
24	*
25	* Constants:
26	* The hexadecimal values are the intended ones for the following
27	* constants. The decimal values may be used, provided that the
28	* compiler will convert from decimal to binary accurately enough
29	* to produce the hexadecimal values shown.
30	*/
31
32
33	#include "libm.h"
34
35	static const double atanhi[] = {
36	4.63647609000806093515e-01, /* atan(0.5)hi 0x3FDDAC67, 0x0561BB4F */
37	7.85398163397448278999e-01, /* atan(1.0)hi 0x3FE921FB, 0x54442D18 */
38	9.82793723247329054082e-01, /* atan(1.5)hi 0x3FEF730B, 0xD281F69B */
39	1.57079632679489655800e+00, /* atan(inf)hi 0x3FF921FB, 0x54442D18 */
40	};
41
42	static const double atanlo[] = {
43	2.26987774529616870924e-17, /* atan(0.5)lo 0x3C7A2B7F, 0x222F65E2 */
44	3.06161699786838301793e-17, /* atan(1.0)lo 0x3C81A626, 0x33145C07 */
45	1.39033110312309984516e-17, /* atan(1.5)lo 0x3C700788, 0x7AF0CBBD */
46	6.12323399573676603587e-17, /* atan(inf)lo 0x3C91A626, 0x33145C07 */
47	};
48
49	static const double aT[] = {
50	3.33333333333329318027e-01, /* 0x3FD55555, 0x5555550D */
51	-1.99999999998764832476e-01, /* 0xBFC99999, 0x9998EBC4 */
52	1.42857142725034663711e-01, /* 0x3FC24924, 0x920083FF */
53	-1.11111104054623557880e-01, /* 0xBFBC71C6, 0xFE231671 */
54	9.09088713343650656196e-02, /* 0x3FB745CD, 0xC54C206E */
55	-7.69187620504482999495e-02, /* 0xBFB3B0F2, 0xAF749A6D */
56	6.66107313738753120669e-02, /* 0x3FB10D66, 0xA0D03D51 */
57	-5.83357013379057348645e-02, /* 0xBFADDE2D, 0x52DEFD9A */
58	4.97687799461593236017e-02, /* 0x3FA97B4B, 0x24760DEB */
59	-3.65315727442169155270e-02, /* 0xBFA2B444, 0x2C6A6C2F */
60	1.62858201153657823623e-02, /* 0x3F90AD3A, 0xE322DA11 */
61	};
62
63	double atan(double x)
64	{
65	double_t w,s1,s2,z;
66	uint32_t ix,sign;
67	int id;
68
69	GET_HIGH_WORD(ix, x);
70	sign = ix >> 31;
71	ix &= 0x7fffffff;
72	if (ix >= 0x44100000) { /* if \|x\| >= 2^66 */
73	if (isnan(x))
74	return x;
75	z = atanhi[3] + 0x1p-120f;
76	return sign ? -z : z;
77	}
78	if (ix < 0x3fdc0000) { /* \|x\| < 0.4375 */
79	if (ix < 0x3e400000) { /* \|x\| < 2^-27 */
80	if (ix < 0x00100000)
81	/* raise underflow for subnormal x */
82	FORCE_EVAL((float)x);
83	return x;
84	}
85	id = -1;
86	} else {
87	x = fabs(x);
88	if (ix < 0x3ff30000) { /* \|x\| < 1.1875 */
89	if (ix < 0x3fe60000) { /* 7/16 <= \|x\| < 11/16 */
90	id = 0;
91	x = (2.0*x-1.0)/(2.0+x);
92	} else { /* 11/16 <= \|x\| < 19/16 */
93	id = 1;
94	x = (x-1.0)/(x+1.0);
95	}
96	} else {
97	if (ix < 0x40038000) { /* \|x\| < 2.4375 */
98	id = 2;
99	x = (x-1.5)/(1.0+1.5*x);
100	} else { /* 2.4375 <= \|x\| < 2^66 */
101	id = 3;
102	x = -1.0/x;
103	}
104	}
105	}
106	/* end of argument reduction */
107	z = x*x;
108	w = z*z;
109	/* break sum from i=0 to 10 aT[i]z*(i+1) into odd and even poly /
110	s1 = z(aT[0]+w(aT[2]+w(aT[4]+w(aT[6]+w(aT[8]+waT[10])))));
111	s2 = w(aT[1]+w(aT[3]+w(aT[5]+w(aT[7]+w*aT[9]))));
112	if (id < 0)
113	return x - x*(s1+s2);
114	z = atanhi[id] - (x*(s1+s2) - atanlo[id] - x);
115	return sign ? -z : z;
116	}

lib/libc/wasi/libc-top-half/musl/src/math/atan2.c deleted-107

...	@@ -1,107 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_atan2.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunSoft, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*
12	*/
13	/* atan2(y,x)
14	* Method :
15	* 1. Reduce y to positive by atan2(y,x)=-atan2(-y,x).
16	* 2. Reduce x to positive by (if x and y are unexceptional):
17	* ARG (x+iy) = arctan(y/x) ... if x > 0,
18	* ARG (x+iy) = pi - arctan[y/(-x)] ... if x < 0,
19	*
20	* Special cases:
21	*
22	* ATAN2((anything), NaN ) is NaN;
23	* ATAN2(NAN , (anything) ) is NaN;
24	* ATAN2(+-0, +(anything but NaN)) is +-0 ;
25	* ATAN2(+-0, -(anything but NaN)) is +-pi ;
26	* ATAN2(+-(anything but 0 and NaN), 0) is +-pi/2;
27	* ATAN2(+-(anything but INF and NaN), +INF) is +-0 ;
28	* ATAN2(+-(anything but INF and NaN), -INF) is +-pi;
29	* ATAN2(+-INF,+INF ) is +-pi/4 ;
30	* ATAN2(+-INF,-INF ) is +-3pi/4;
31	* ATAN2(+-INF, (anything but,0,NaN, and INF)) is +-pi/2;
32	*
33	* Constants:
34	* The hexadecimal values are the intended ones for the following
35	* constants. The decimal values may be used, provided that the
36	* compiler will convert from decimal to binary accurately enough
37	* to produce the hexadecimal values shown.
38	*/
39
40	#include "libm.h"
41
42	static const double
43	pi = 3.1415926535897931160E+00, /* 0x400921FB, 0x54442D18 */
44	pi_lo = 1.2246467991473531772E-16; /* 0x3CA1A626, 0x33145C07 */
45
46	double atan2(double y, double x)
47	{
48	double z;
49	uint32_t m,lx,ly,ix,iy;
50
51	if (isnan(x) \|\| isnan(y))
52	return x+y;
53	EXTRACT_WORDS(ix, lx, x);
54	EXTRACT_WORDS(iy, ly, y);
55	if ((ix-0x3ff00000 \| lx) == 0) /* x = 1.0 */
56	return atan(y);
57	m = ((iy>>31)&1) \| ((ix>>30)&2); /* 2sign(x)+sign(y) /
58	ix = ix & 0x7fffffff;
59	iy = iy & 0x7fffffff;
60
61	/* when y = 0 */
62	if ((iy\|ly) == 0) {
63	switch(m) {
64	case 0:
65	case 1: return y; /* atan(+-0,+anything)=+-0 */
66	case 2: return pi; /* atan(+0,-anything) = pi */
67	case 3: return -pi; /* atan(-0,-anything) =-pi */
68	}
69	}
70	/* when x = 0 */
71	if ((ix\|lx) == 0)
72	return m&1 ? -pi/2 : pi/2;
73	/* when x is INF */
74	if (ix == 0x7ff00000) {
75	if (iy == 0x7ff00000) {
76	switch(m) {
77	case 0: return pi/4; /* atan(+INF,+INF) */
78	case 1: return -pi/4; /* atan(-INF,+INF) */
79	case 2: return 3pi/4; / atan(+INF,-INF) */
80	case 3: return -3pi/4; / atan(-INF,-INF) */
81	}
82	} else {
83	switch(m) {
84	case 0: return 0.0; /* atan(+...,+INF) */
85	case 1: return -0.0; /* atan(-...,+INF) */
86	case 2: return pi; /* atan(+...,-INF) */
87	case 3: return -pi; /* atan(-...,-INF) */
88	}
89	}
90	}
91	/* \|y/x\| > 0x1p64 */
92	if (ix+(64<<20) < iy \|\| iy == 0x7ff00000)
93	return m&1 ? -pi/2 : pi/2;
94
95	/* z = atan(\|y/x\|) without spurious underflow */
96	if ((m&2) && iy+(64<<20) < ix) /* \|y/x\| < 0x1p-64, x<0 */
97	z = 0;
98	else
99	z = atan(fabs(y/x));
100	switch (m) {
101	case 0: return z; /* atan(+,+) */
102	case 1: return -z; /* atan(-,+) */
103	case 2: return pi - (z-pi_lo); /* atan(+,-) */
104	default: /* case 3 */
105	return (z-pi_lo) - pi; /* atan(-,-) */
106	}
107	}

lib/libc/wasi/libc-top-half/musl/src/math/atan2f.c deleted-83

...	@@ -1,83 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_atan2f.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	*/
5	/*
6	* ====================================================
7	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
8	*
9	* Developed at SunPro, a Sun Microsystems, Inc. business.
10	* Permission to use, copy, modify, and distribute this
11	* software is freely granted, provided that this notice
12	* is preserved.
13	* ====================================================
14	*/
15
16	#include "libm.h"
17
18	static const float
19	pi = 3.1415927410e+00, /* 0x40490fdb */
20	pi_lo = -8.7422776573e-08; /* 0xb3bbbd2e */
21
22	float atan2f(float y, float x)
23	{
24	float z;
25	uint32_t m,ix,iy;
26
27	if (isnan(x) \|\| isnan(y))
28	return x+y;
29	GET_FLOAT_WORD(ix, x);
30	GET_FLOAT_WORD(iy, y);
31	if (ix == 0x3f800000) /* x=1.0 */
32	return atanf(y);
33	m = ((iy>>31)&1) \| ((ix>>30)&2); /* 2sign(x)+sign(y) /
34	ix &= 0x7fffffff;
35	iy &= 0x7fffffff;
36
37	/* when y = 0 */
38	if (iy == 0) {
39	switch (m) {
40	case 0:
41	case 1: return y; /* atan(+-0,+anything)=+-0 */
42	case 2: return pi; /* atan(+0,-anything) = pi */
43	case 3: return -pi; /* atan(-0,-anything) =-pi */
44	}
45	}
46	/* when x = 0 */
47	if (ix == 0)
48	return m&1 ? -pi/2 : pi/2;
49	/* when x is INF */
50	if (ix == 0x7f800000) {
51	if (iy == 0x7f800000) {
52	switch (m) {
53	case 0: return pi/4; /* atan(+INF,+INF) */
54	case 1: return -pi/4; /* atan(-INF,+INF) */
55	case 2: return 3pi/4; /atan(+INF,-INF)*/
56	case 3: return -3pi/4; /atan(-INF,-INF)*/
57	}
58	} else {
59	switch (m) {
60	case 0: return 0.0f; /* atan(+...,+INF) */
61	case 1: return -0.0f; /* atan(-...,+INF) */
62	case 2: return pi; /* atan(+...,-INF) */
63	case 3: return -pi; /* atan(-...,-INF) */
64	}
65	}
66	}
67	/* \|y/x\| > 0x1p26 */
68	if (ix+(26<<23) < iy \|\| iy == 0x7f800000)
69	return m&1 ? -pi/2 : pi/2;
70
71	/* z = atan(\|y/x\|) with correct underflow */
72	if ((m&2) && iy+(26<<23) < ix) /\|y/x\| < 0x1p-26, x < 0 /
73	z = 0.0;
74	else
75	z = atanf(fabsf(y/x));
76	switch (m) {
77	case 0: return z; /* atan(+,+) */
78	case 1: return -z; /* atan(-,+) */
79	case 2: return pi - (z-pi_lo); /* atan(+,-) */
80	default: /* case 3 */
81	return (z-pi_lo) - pi; /* atan(-,-) */
82	}
83	}

lib/libc/wasi/libc-top-half/musl/src/math/atan2l.c deleted-85

...	@@ -1,85 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_atan2l.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunSoft, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*
12	*/
13	/*
14	* See comments in atan2.c.
15	* Converted to long double by David Schultz <das@FreeBSD.ORG>.
16	*/
17
18	#include "libm.h"
19
20	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
21	long double atan2l(long double y, long double x)
22	{
23	return atan2(y, x);
24	}
25	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
26	#include "__invtrigl.h"
27
28	long double atan2l(long double y, long double x)
29	{
30	union ldshape ux, uy;
31	long double z;
32	int m, ex, ey;
33
34	if (isnan(x) \|\| isnan(y))
35	return x+y;
36	if (x == 1)
37	return atanl(y);
38	ux.f = x;
39	uy.f = y;
40	ex = ux.i.se & 0x7fff;
41	ey = uy.i.se & 0x7fff;
42	m = 2*(ux.i.se>>15) \| uy.i.se>>15;
43	if (y == 0) {
44	switch(m) {
45	case 0:
46	case 1: return y; /* atan(+-0,+anything)=+-0 */
47	case 2: return 2pio2_hi; / atan(+0,-anything) = pi */
48	case 3: return -2pio2_hi; / atan(-0,-anything) =-pi */
49	}
50	}
51	if (x == 0)
52	return m&1 ? -pio2_hi : pio2_hi;
53	if (ex == 0x7fff) {
54	if (ey == 0x7fff) {
55	switch(m) {
56	case 0: return pio2_hi/2; /* atan(+INF,+INF) */
57	case 1: return -pio2_hi/2; /* atan(-INF,+INF) */
58	case 2: return 1.5pio2_hi; / atan(+INF,-INF) */
59	case 3: return -1.5pio2_hi; / atan(-INF,-INF) */
60	}
61	} else {
62	switch(m) {
63	case 0: return 0.0; /* atan(+...,+INF) */
64	case 1: return -0.0; /* atan(-...,+INF) */
65	case 2: return 2pio2_hi; / atan(+...,-INF) */
66	case 3: return -2pio2_hi; / atan(-...,-INF) */
67	}
68	}
69	}
70	if (ex+120 < ey \|\| ey == 0x7fff)
71	return m&1 ? -pio2_hi : pio2_hi;
72	/* z = atan(\|y/x\|) without spurious underflow */
73	if ((m&2) && ey+120 < ex) /* \|y/x\| < 0x1p-120, x<0 */
74	z = 0.0;
75	else
76	z = atanl(fabsl(y/x));
77	switch (m) {
78	case 0: return z; /* atan(+,+) */
79	case 1: return -z; /* atan(-,+) */
80	case 2: return 2pio2_hi-(z-2pio2_lo); /* atan(+,-) */
81	default: /* case 3 */
82	return (z-2pio2_lo)-2pio2_hi; /* atan(-,-) */
83	}
84	}
85	#endif

lib/libc/wasi/libc-top-half/musl/src/math/atanf.c deleted-94

...	@@ -1,94 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_atanf.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	*/
5	/*
6	* ====================================================
7	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
8	*
9	* Developed at SunPro, a Sun Microsystems, Inc. business.
10	* Permission to use, copy, modify, and distribute this
11	* software is freely granted, provided that this notice
12	* is preserved.
13	* ====================================================
14	*/
15
16
17	#include "libm.h"
18
19	static const float atanhi[] = {
20	4.6364760399e-01, /* atan(0.5)hi 0x3eed6338 */
21	7.8539812565e-01, /* atan(1.0)hi 0x3f490fda */
22	9.8279368877e-01, /* atan(1.5)hi 0x3f7b985e */
23	1.5707962513e+00, /* atan(inf)hi 0x3fc90fda */
24	};
25
26	static const float atanlo[] = {
27	5.0121582440e-09, /* atan(0.5)lo 0x31ac3769 */
28	3.7748947079e-08, /* atan(1.0)lo 0x33222168 */
29	3.4473217170e-08, /* atan(1.5)lo 0x33140fb4 */
30	7.5497894159e-08, /* atan(inf)lo 0x33a22168 */
31	};
32
33	static const float aT[] = {
34	3.3333328366e-01,
35	-1.9999158382e-01,
36	1.4253635705e-01,
37	-1.0648017377e-01,
38	6.1687607318e-02,
39	};
40
41	float atanf(float x)
42	{
43	float_t w,s1,s2,z;
44	uint32_t ix,sign;
45	int id;
46
47	GET_FLOAT_WORD(ix, x);
48	sign = ix>>31;
49	ix &= 0x7fffffff;
50	if (ix >= 0x4c800000) { /* if \|x\| >= 2*26 /
51	if (isnan(x))
52	return x;
53	z = atanhi[3] + 0x1p-120f;
54	return sign ? -z : z;
55	}
56	if (ix < 0x3ee00000) { /* \|x\| < 0.4375 */
57	if (ix < 0x39800000) { /* \|x\| < 2*-12 /
58	if (ix < 0x00800000)
59	/* raise underflow for subnormal x */
60	FORCE_EVAL(x*x);
61	return x;
62	}
63	id = -1;
64	} else {
65	x = fabsf(x);
66	if (ix < 0x3f980000) { /* \|x\| < 1.1875 */
67	if (ix < 0x3f300000) { /* 7/16 <= \|x\| < 11/16 */
68	id = 0;
69	x = (2.0f*x - 1.0f)/(2.0f + x);
70	} else { /* 11/16 <= \|x\| < 19/16 */
71	id = 1;
72	x = (x - 1.0f)/(x + 1.0f);
73	}
74	} else {
75	if (ix < 0x401c0000) { /* \|x\| < 2.4375 */
76	id = 2;
77	x = (x - 1.5f)/(1.0f + 1.5f*x);
78	} else { /* 2.4375 <= \|x\| < 2*26 /
79	id = 3;
80	x = -1.0f/x;
81	}
82	}
83	}
84	/* end of argument reduction */
85	z = x*x;
86	w = z*z;
87	/* break sum from i=0 to 10 aT[i]z*(i+1) into odd and even poly /
88	s1 = z(aT[0]+w(aT[2]+w*aT[4]));
89	s2 = w(aT[1]+waT[3]);
90	if (id < 0)
91	return x - x*(s1+s2);
92	z = atanhi[id] - ((x*(s1+s2) - atanlo[id]) - x);
93	return sign ? -z : z;
94	}

lib/libc/wasi/libc-top-half/musl/src/math/atanh.c deleted-29

...	@@ -1,29 +0,0 @@
1	#include "libm.h"
2
3	/* atanh(x) = log((1+x)/(1-x))/2 = log1p(2x/(1-x))/2 ~= x + x^3/3 + o(x^5) */
4	double atanh(double x)
5	{
6	union {double f; uint64_t i;} u = {.f = x};
7	unsigned e = u.i >> 52 & 0x7ff;
8	unsigned s = u.i >> 63;
9	double_t y;
10
11	/* \|x\| */
12	u.i &= (uint64_t)-1/2;
13	y = u.f;
14
15	if (e < 0x3ff - 1) {
16	if (e < 0x3ff - 32) {
17	/* handle underflow */
18	if (e == 0)
19	FORCE_EVAL((float)y);
20	} else {
21	/* \|x\| < 0.5, up to 1.7ulp error */
22	y = 0.5log1p(2y + 2yy/(1-y));
23	}
24	} else {
25	/* avoid overflow */
26	y = 0.5log1p(2(y/(1-y)));
27	}
28	return s ? -y : y;
29	}

lib/libc/wasi/libc-top-half/musl/src/math/atanhf.c deleted-28

...	@@ -1,28 +0,0 @@
1	#include "libm.h"
2
3	/* atanh(x) = log((1+x)/(1-x))/2 = log1p(2x/(1-x))/2 ~= x + x^3/3 + o(x^5) */
4	float atanhf(float x)
5	{
6	union {float f; uint32_t i;} u = {.f = x};
7	unsigned s = u.i >> 31;
8	float_t y;
9
10	/* \|x\| */
11	u.i &= 0x7fffffff;
12	y = u.f;
13
14	if (u.i < 0x3f800000 - (1<<23)) {
15	if (u.i < 0x3f800000 - (32<<23)) {
16	/* handle underflow */
17	if (u.i < (1<<23))
18	FORCE_EVAL((float)(y*y));
19	} else {
20	/* \|x\| < 0.5, up to 1.7ulp error */
21	y = 0.5flog1pf(2y + 2yy/(1-y));
22	}
23	} else {
24	/* avoid overflow */
25	y = 0.5flog1pf(2(y/(1-y)));
26	}
27	return s ? -y : y;
28	}

lib/libc/wasi/libc-top-half/musl/src/math/atanhl.c deleted-35

...	@@ -1,35 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double atanhl(long double x)
5	{
6	return atanh(x);
7	}
8	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
9	/* atanh(x) = log((1+x)/(1-x))/2 = log1p(2x/(1-x))/2 ~= x + x^3/3 + o(x^5) */
10	long double atanhl(long double x)
11	{
12	union ldshape u = {x};
13	unsigned e = u.i.se & 0x7fff;
14	unsigned s = u.i.se >> 15;
15
16	/* \|x\| */
17	u.i.se = e;
18	x = u.f;
19
20	if (e < 0x3ff - 1) {
21	if (e < 0x3ff - LDBL_MANT_DIG/2) {
22	/* handle underflow */
23	if (e == 0)
24	FORCE_EVAL((float)x);
25	} else {
26	/* \|x\| < 0.5, up to 1.7ulp error */
27	x = 0.5log1pl(2x + 2xx/(1-x));
28	}
29	} else {
30	/* avoid overflow */
31	x = 0.5log1pl(2(x/(1-x)));
32	}
33	return s ? -x : x;
34	}
35	#endif

lib/libc/wasi/libc-top-half/musl/src/math/atanl.c deleted-184

...	@@ -1,184 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_atanl.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunPro, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/*
13	* See comments in atan.c.
14	* Converted to long double by David Schultz <das@FreeBSD.ORG>.
15	*/
16
17	#include "libm.h"
18
19	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
20	long double atanl(long double x)
21	{
22	return atan(x);
23	}
24	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
25
26	#if LDBL_MANT_DIG == 64
27	#define EXPMAN(u) ((u.i.se & 0x7fff)<<8 \| (u.i.m>>55 & 0xff))
28
29	static const long double atanhi[] = {
30	4.63647609000806116202e-01L,
31	7.85398163397448309628e-01L,
32	9.82793723247329067960e-01L,
33	1.57079632679489661926e+00L,
34	};
35
36	static const long double atanlo[] = {
37	1.18469937025062860669e-20L,
38	-1.25413940316708300586e-20L,
39	2.55232234165405176172e-20L,
40	-2.50827880633416601173e-20L,
41	};
42
43	static const long double aT[] = {
44	3.33333333333333333017e-01L,
45	-1.99999999999999632011e-01L,
46	1.42857142857046531280e-01L,
47	-1.11111111100562372733e-01L,
48	9.09090902935647302252e-02L,
49	-7.69230552476207730353e-02L,
50	6.66661718042406260546e-02L,
51	-5.88158892835030888692e-02L,
52	5.25499891539726639379e-02L,
53	-4.70119845393155721494e-02L,
54	4.03539201366454414072e-02L,
55	-2.91303858419364158725e-02L,
56	1.24822046299269234080e-02L,
57	};
58
59	static long double T_even(long double x)
60	{
61	return aT[0] + x * (aT[2] + x * (aT[4] + x * (aT[6] +
62	x * (aT[8] + x * (aT[10] + x * aT[12])))));
63	}
64
65	static long double T_odd(long double x)
66	{
67	return aT[1] + x * (aT[3] + x * (aT[5] + x * (aT[7] +
68	x * (aT[9] + x * aT[11]))));
69	}
70	#elif LDBL_MANT_DIG == 113
71	#define EXPMAN(u) ((u.i.se & 0x7fff)<<8 \| u.i.top>>8)
72
73	static const long double atanhi[] = {
74	4.63647609000806116214256231461214397e-01L,
75	7.85398163397448309615660845819875699e-01L,
76	9.82793723247329067985710611014666038e-01L,
77	1.57079632679489661923132169163975140e+00L,
78	};
79
80	static const long double atanlo[] = {
81	4.89509642257333492668618435220297706e-36L,
82	2.16795253253094525619926100651083806e-35L,
83	-2.31288434538183565909319952098066272e-35L,
84	4.33590506506189051239852201302167613e-35L,
85	};
86
87	static const long double aT[] = {
88	3.33333333333333333333333333333333125e-01L,
89	-1.99999999999999999999999999999180430e-01L,
90	1.42857142857142857142857142125269827e-01L,
91	-1.11111111111111111111110834490810169e-01L,
92	9.09090909090909090908522355708623681e-02L,
93	-7.69230769230769230696553844935357021e-02L,
94	6.66666666666666660390096773046256096e-02L,
95	-5.88235294117646671706582985209643694e-02L,
96	5.26315789473666478515847092020327506e-02L,
97	-4.76190476189855517021024424991436144e-02L,
98	4.34782608678695085948531993458097026e-02L,
99	-3.99999999632663469330634215991142368e-02L,
100	3.70370363987423702891250829918659723e-02L,
101	-3.44827496515048090726669907612335954e-02L,
102	3.22579620681420149871973710852268528e-02L,
103	-3.03020767654269261041647570626778067e-02L,
104	2.85641979882534783223403715930946138e-02L,
105	-2.69824879726738568189929461383741323e-02L,
106	2.54194698498808542954187110873675769e-02L,
107	-2.35083879708189059926183138130183215e-02L,
108	2.04832358998165364349957325067131428e-02L,
109	-1.54489555488544397858507248612362957e-02L,
110	8.64492360989278761493037861575248038e-03L,
111	-2.58521121597609872727919154569765469e-03L,
112	};
113
114	static long double T_even(long double x)
115	{
116	return (aT[0] + x * (aT[2] + x * (aT[4] + x * (aT[6] + x * (aT[8] +
117	x * (aT[10] + x * (aT[12] + x * (aT[14] + x * (aT[16] +
118	x * (aT[18] + x * (aT[20] + x * aT[22])))))))))));
119	}
120
121	static long double T_odd(long double x)
122	{
123	return (aT[1] + x * (aT[3] + x * (aT[5] + x * (aT[7] + x * (aT[9] +
124	x * (aT[11] + x * (aT[13] + x * (aT[15] + x * (aT[17] +
125	x * (aT[19] + x * (aT[21] + x * aT[23])))))))))));
126	}
127	#endif
128
129	long double atanl(long double x)
130	{
131	union ldshape u = {x};
132	long double w, s1, s2, z;
133	int id;
134	unsigned e = u.i.se & 0x7fff;
135	unsigned sign = u.i.se >> 15;
136	unsigned expman;
137
138	if (e >= 0x3fff + LDBL_MANT_DIG + 1) { /* if \|x\| is large, atan(x)~=pi/2 */
139	if (isnan(x))
140	return x;
141	return sign ? -atanhi[3] : atanhi[3];
142	}
143	/* Extract the exponent and the first few bits of the mantissa. */
144	expman = EXPMAN(u);
145	if (expman < ((0x3fff - 2) << 8) + 0xc0) { /* \|x\| < 0.4375 */
146	if (e < 0x3fff - (LDBL_MANT_DIG+1)/2) { /* if \|x\| is small, atanl(x)~=x */
147	/* raise underflow if subnormal */
148	if (e == 0)
149	FORCE_EVAL((float)x);
150	return x;
151	}
152	id = -1;
153	} else {
154	x = fabsl(x);
155	if (expman < (0x3fff << 8) + 0x30) { /* \|x\| < 1.1875 */
156	if (expman < ((0x3fff - 1) << 8) + 0x60) { /* 7/16 <= \|x\| < 11/16 */
157	id = 0;
158	x = (2.0*x-1.0)/(2.0+x);
159	} else { /* 11/16 <= \|x\| < 19/16 */
160	id = 1;
161	x = (x-1.0)/(x+1.0);
162	}
163	} else {
164	if (expman < ((0x3fff + 1) << 8) + 0x38) { /* \|x\| < 2.4375 */
165	id = 2;
166	x = (x-1.5)/(1.0+1.5*x);
167	} else { /* 2.4375 <= \|x\| */
168	id = 3;
169	x = -1.0/x;
170	}
171	}
172	}
173	/* end of argument reduction */
174	z = x*x;
175	w = z*z;
176	/* break sum aT[i]z*(i+1) into odd and even poly /
177	s1 = z*T_even(w);
178	s2 = w*T_odd(w);
179	if (id < 0)
180	return x - x*(s1+s2);
181	z = atanhi[id] - ((x*(s1+s2) - atanlo[id]) - x);
182	return sign ? -z : z;
183	}
184	#endif

lib/libc/wasi/libc-top-half/musl/src/math/cbrt.c deleted-103

...	@@ -1,103 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_cbrt.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunPro, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*
12	* Optimized by Bruce D. Evans.
13	*/
14	/* cbrt(x)
15	* Return cube root of x
16	*/
17
18	#include <math.h>
19	#include <stdint.h>
20
21	static const uint32_t
22	B1 = 715094163, /* B1 = (1023-1023/3-0.03306235651)220 /
23	B2 = 696219795; /* B2 = (1023-1023/3-54/3-0.03306235651)220 /
24
25	/* \|1/cbrt(x) - p(x)\| < 2*-23.5 (~[-7.93e-8, 7.929e-8]). /
26	static const double
27	P0 = 1.87595182427177009643, /* 0x3ffe03e6, 0x0f61e692 */
28	P1 = -1.88497979543377169875, /* 0xbffe28e0, 0x92f02420 */
29	P2 = 1.621429720105354466140, /* 0x3ff9f160, 0x4a49d6c2 */
30	P3 = -0.758397934778766047437, /* 0xbfe844cb, 0xbee751d9 */
31	P4 = 0.145996192886612446982; /* 0x3fc2b000, 0xd4e4edd7 */
32
33	double cbrt(double x)
34	{
35	union {double f; uint64_t i;} u = {x};
36	double_t r,s,t,w;
37	uint32_t hx = u.i>>32 & 0x7fffffff;
38
39	if (hx >= 0x7ff00000) /* cbrt(NaN,INF) is itself */
40	return x+x;
41
42	/*
43	* Rough cbrt to 5 bits:
44	* cbrt(2*e(1+m) ~= 2*(e/3)(1+(e%3+m)/3)
45	* where e is integral and >= 0, m is real and in [0, 1), and "/" and
46	* "%" are integer division and modulus with rounding towards minus
47	* infinity. The RHS is always >= the LHS and has a maximum relative
48	* error of about 1 in 16. Adding a bias of -0.03306235651 to the
49	* (e%3+m)/3 term reduces the error to about 1 in 32. With the IEEE
50	* floating point representation, for finite positive normal values,
51	* ordinary integer divison of the value in bits magically gives
52	* almost exactly the RHS of the above provided we first subtract the
53	* exponent bias (1023 for doubles) and later add it back. We do the
54	* subtraction virtually to keep e >= 0 so that ordinary integer
55	* division rounds towards minus infinity; this is also efficient.
56	*/
57	if (hx < 0x00100000) { /* zero or subnormal? */
58	u.f = x*0x1p54;
59	hx = u.i>>32 & 0x7fffffff;
60	if (hx == 0)
61	return x; /* cbrt(0) is itself */
62	hx = hx/3 + B2;
63	} else
64	hx = hx/3 + B1;
65	u.i &= 1ULL<<63;
66	u.i \|= (uint64_t)hx << 32;
67	t = u.f;
68
69	/*
70	* New cbrt to 23 bits:
71	* cbrt(x) = tcbrt(x/t3) ~= tP(t**3/x)
72	* where P(r) is a polynomial of degree 4 that approximates 1/cbrt(r)
73	* to within 2**-23.5 when \|r - 1\| < 1/10. The rough approximation
74	* has produced t such than \|t/cbrt(x) - 1\| ~< 1/32, and cubing this
75	* gives us bounds for r = t**3/x.
76	*
77	* Try to optimize for parallel evaluation as in __tanf.c.
78	*/
79	r = (tt)(t/x);
80	t = t((P0+r(P1+rP2))+((rr)r)(P3+r*P4));
81
82	/*
83	* Round t away from zero to 23 bits (sloppily except for ensuring that
84	* the result is larger in magnitude than cbrt(x) but not much more than
85	* 2 23-bit ulps larger). With rounding towards zero, the error bound
86	* would be ~5/6 instead of ~4/6. With a maximum error of 2 23-bit ulps
87	* in the rounded t, the infinite-precision error in the Newton
88	* approximation barely affects third digit in the final error
89	* 0.667; the error in the rounded t can be up to about 3 23-bit ulps
90	* before the final error is larger than 0.667 ulps.
91	*/
92	u.f = t;
93	u.i = (u.i + 0x80000000) & 0xffffffffc0000000ULL;
94	t = u.f;
95
96	/* one step Newton iteration to 53 bits with error < 0.667 ulps */
97	s = tt; / tt is exact /
98	r = x/s; /* error <= 0.5 ulps; \|r\| < \|t\| */
99	w = t+t; /* t+t is exact */
100	r = (r-t)/(w+r); /* r-t is exact; w+r ~= 3t /
101	t = t+tr; / error <= 0.5 + 0.5/3 + epsilon */
102	return t;
103	}

lib/libc/wasi/libc-top-half/musl/src/math/cbrtf.c deleted-66

...	@@ -1,66 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_cbrtf.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	* Debugged and optimized by Bruce D. Evans.
5	*/
6	/*
7	* ====================================================
8	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
9	*
10	* Developed at SunPro, a Sun Microsystems, Inc. business.
11	* Permission to use, copy, modify, and distribute this
12	* software is freely granted, provided that this notice
13	* is preserved.
14	* ====================================================
15	*/
16	/* cbrtf(x)
17	* Return cube root of x
18	*/
19
20	#include <math.h>
21	#include <stdint.h>
22
23	static const unsigned
24	B1 = 709958130, /* B1 = (127-127.0/3-0.03306235651)223 /
25	B2 = 642849266; /* B2 = (127-127.0/3-24/3-0.03306235651)223 /
26
27	float cbrtf(float x)
28	{
29	double_t r,T;
30	union {float f; uint32_t i;} u = {x};
31	uint32_t hx = u.i & 0x7fffffff;
32
33	if (hx >= 0x7f800000) /* cbrt(NaN,INF) is itself */
34	return x + x;
35
36	/* rough cbrt to 5 bits */
37	if (hx < 0x00800000) { /* zero or subnormal? */
38	if (hx == 0)
39	return x; /* cbrt(+-0) is itself */
40	u.f = x*0x1p24f;
41	hx = u.i & 0x7fffffff;
42	hx = hx/3 + B2;
43	} else
44	hx = hx/3 + B1;
45	u.i &= 0x80000000;
46	u.i \|= hx;
47
48	/*
49	* First step Newton iteration (solving t*t-x/t == 0) to 16 bits. In
50	* double precision so that its terms can be arranged for efficiency
51	* without causing overflow or underflow.
52	*/
53	T = u.f;
54	r = TTT;
55	T = T*((double_t)x+x+r)/(x+r+r);
56
57	/*
58	* Second step Newton iteration to 47 bits. In double precision for
59	* efficiency and accuracy.
60	*/
61	r = TTT;
62	T = T*((double_t)x+x+r)/(x+r+r);
63
64	/* rounding to 24 bits is perfect in round-to-nearest mode */
65	return T;
66	}

lib/libc/wasi/libc-top-half/musl/src/math/cbrtl.c deleted-124

...	@@ -1,124 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_cbrtl.c */
2	/*-
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	* Copyright (c) 2009-2011, Bruce D. Evans, Steven G. Kargl, David Schultz.
6	*
7	* Developed at SunPro, a Sun Microsystems, Inc. business.
8	* Permission to use, copy, modify, and distribute this
9	* software is freely granted, provided that this notice
10	* is preserved.
11	* ====================================================
12	*
13	* The argument reduction and testing for exceptional cases was
14	* written by Steven G. Kargl with input from Bruce D. Evans
15	* and David A. Schultz.
16	*/
17
18	#include "libm.h"
19
20	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
21	long double cbrtl(long double x)
22	{
23	return cbrt(x);
24	}
25	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
26	static const unsigned B1 = 709958130; /* B1 = (127-127.0/3-0.03306235651)223 /
27
28	long double cbrtl(long double x)
29	{
30	union ldshape u = {x}, v;
31	union {float f; uint32_t i;} uft;
32	long double r, s, t, w;
33	double_t dr, dt, dx;
34	float_t ft;
35	int e = u.i.se & 0x7fff;
36	int sign = u.i.se & 0x8000;
37
38	/*
39	* If x = +-Inf, then cbrt(x) = +-Inf.
40	* If x = NaN, then cbrt(x) = NaN.
41	*/
42	if (e == 0x7fff)
43	return x + x;
44	if (e == 0) {
45	/* Adjust subnormal numbers. */
46	u.f *= 0x1p120;
47	e = u.i.se & 0x7fff;
48	/* If x = +-0, then cbrt(x) = +-0. */
49	if (e == 0)
50	return x;
51	e -= 120;
52	}
53	e -= 0x3fff;
54	u.i.se = 0x3fff;
55	x = u.f;
56	switch (e % 3) {
57	case 1:
58	case -2:
59	x *= 2;
60	e--;
61	break;
62	case 2:
63	case -1:
64	x *= 4;
65	e -= 2;
66	break;
67	}
68	v.f = 1.0;
69	v.i.se = sign \| (0x3fff + e/3);
70
71	/*
72	* The following is the guts of s_cbrtf, with the handling of
73	* special values removed and extra care for accuracy not taken,
74	* but with most of the extra accuracy not discarded.
75	*/
76
77	/* ~5-bit estimate: */
78	uft.f = x;
79	uft.i = (uft.i & 0x7fffffff)/3 + B1;
80	ft = uft.f;
81
82	/* ~16-bit estimate: */
83	dx = x;
84	dt = ft;
85	dr = dt * dt * dt;
86	dt = dt * (dx + dx + dr) / (dx + dr + dr);
87
88	/* ~47-bit estimate: */
89	dr = dt * dt * dt;
90	dt = dt * (dx + dx + dr) / (dx + dr + dr);
91
92	#if LDBL_MANT_DIG == 64
93	/*
94	* dt is cbrtl(x) to ~47 bits (after x has been reduced to 1 <= x < 8).
95	* Round it away from zero to 32 bits (32 so that t*t is exact, and
96	* away from zero for technical reasons).
97	*/
98	t = dt + (0x1.0p32L + 0x1.0p-31L) - 0x1.0p32;
99	#elif LDBL_MANT_DIG == 113
100	/*
101	* Round dt away from zero to 47 bits. Since we don't trust the 47,
102	* add 2 47-bit ulps instead of 1 to round up. Rounding is slow and
103	* might be avoidable in this case, since on most machines dt will
104	* have been evaluated in 53-bit precision and the technical reasons
105	* for rounding up might not apply to either case in cbrtl() since
106	* dt is much more accurate than needed.
107	*/
108	t = dt + 0x2.0p-46 + 0x1.0p60L - 0x1.0p60;
109	#endif
110
111	/*
112	* Final step Newton iteration to 64 or 113 bits with
113	* error < 0.667 ulps
114	*/
115	s = tt; / tt is exact /
116	r = x/s; /* error <= 0.5 ulps; \|r\| < \|t\| */
117	w = t+t; /* t+t is exact */
118	r = (r-t)/(w+r); /* r-t is exact; w+r ~= 3t /
119	t = t+tr; / error <= 0.5 + 0.5/3 + epsilon */
120
121	t *= v.f;
122	return t;
123	}
124	#endif

lib/libc/wasi/libc-top-half/musl/src/math/ceill.c deleted-34

...	@@ -1,34 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double ceill(long double x)
5	{
6	return ceil(x);
7	}
8	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
9
10	static const long double toint = 1/LDBL_EPSILON;
11
12	long double ceill(long double x)
13	{
14	union ldshape u = {x};
15	int e = u.i.se & 0x7fff;
16	long double y;
17
18	if (e >= 0x3fff+LDBL_MANT_DIG-1 \|\| x == 0)
19	return x;
20	/* y = int(x) - x, where int(x) is an integer neighbor of x */
21	if (u.i.se >> 15)
22	y = x - toint + toint - x;
23	else
24	y = x + toint - toint - x;
25	/* special case because of non-nearest rounding modes */
26	if (e <= 0x3fff-1) {
27	FORCE_EVAL(y);
28	return u.i.se >> 15 ? -0.0 : 1;
29	}
30	if (y < 0)
31	return x + y + 1;
32	return x + y;
33	}
34	#endif

lib/libc/wasi/libc-top-half/musl/src/math/copysignl.c deleted-16

...	@@ -1,16 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double copysignl(long double x, long double y)
5	{
6	return copysign(x, y);
7	}
8	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
9	long double copysignl(long double x, long double y)
10	{
11	union ldshape ux = {x}, uy = {y};
12	ux.i.se &= 0x7fff;
13	ux.i.se \|= uy.i.se & 0x8000;
14	return ux.f;
15	}
16	#endif

lib/libc/wasi/libc-top-half/musl/src/math/cos.c deleted-77

...	@@ -1,77 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_cos.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunPro, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/* cos(x)
13	* Return cosine function of x.
14	*
15	* kernel function:
16	* __sin ... sine function on [-pi/4,pi/4]
17	* __cos ... cosine function on [-pi/4,pi/4]
18	* __rem_pio2 ... argument reduction routine
19	*
20	* Method.
21	* Let S,C and T denote the sin, cos and tan respectively on
22	* [-PI/4, +PI/4]. Reduce the argument x to y1+y2 = x-k*pi/2
23	* in [-pi/4 , +pi/4], and let n = k mod 4.
24	* We have
25	*
26	* n sin(x) cos(x) tan(x)
27	* ----------------------------------------------------------
28	* 0 S C T
29	* 1 C -S -1/T
30	* 2 -S -C T
31	* 3 -C S -1/T
32	* ----------------------------------------------------------
33	*
34	* Special cases:
35	* Let trig be any of sin, cos, or tan.
36	* trig(+-INF) is NaN, with signals;
37	* trig(NaN) is that NaN;
38	*
39	* Accuracy:
40	* TRIG(x) returns trig(x) nearly rounded
41	*/
42
43	#include "libm.h"
44
45	double cos(double x)
46	{
47	double y[2];
48	uint32_t ix;
49	unsigned n;
50
51	GET_HIGH_WORD(ix, x);
52	ix &= 0x7fffffff;
53
54	/* \|x\| ~< pi/4 */
55	if (ix <= 0x3fe921fb) {
56	if (ix < 0x3e46a09e) { /* \|x\| < 2*-27 sqrt(2) */
57	/* raise inexact if x!=0 */
58	FORCE_EVAL(x + 0x1p120f);
59	return 1.0;
60	}
61	return __cos(x, 0);
62	}
63
64	/* cos(Inf or NaN) is NaN */
65	if (ix >= 0x7ff00000)
66	return x-x;
67
68	/* argument reduction */
69	n = __rem_pio2(x, y);
70	switch (n&3) {
71	case 0: return __cos(y[0], y[1]);
72	case 1: return -__sin(y[0], y[1], 1);
73	case 2: return -__cos(y[0], y[1]);
74	default:
75	return __sin(y[0], y[1], 1);
76	}
77	}

lib/libc/wasi/libc-top-half/musl/src/math/cosf.c deleted-78

...	@@ -1,78 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_cosf.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	* Optimized by Bruce D. Evans.
5	*/
6	/*
7	* ====================================================
8	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
9	*
10	* Developed at SunPro, a Sun Microsystems, Inc. business.
11	* Permission to use, copy, modify, and distribute this
12	* software is freely granted, provided that this notice
13	* is preserved.
14	* ====================================================
15	*/
16
17	#include "libm.h"
18
19	/* Small multiples of pi/2 rounded to double precision. */
20	static const double
21	c1pio2 = 1M_PI_2, / 0x3FF921FB, 0x54442D18 */
22	c2pio2 = 2M_PI_2, / 0x400921FB, 0x54442D18 */
23	c3pio2 = 3M_PI_2, / 0x4012D97C, 0x7F3321D2 */
24	c4pio2 = 4M_PI_2; / 0x401921FB, 0x54442D18 */
25
26	float cosf(float x)
27	{
28	double y;
29	uint32_t ix;
30	unsigned n, sign;
31
32	GET_FLOAT_WORD(ix, x);
33	sign = ix >> 31;
34	ix &= 0x7fffffff;
35
36	if (ix <= 0x3f490fda) { /* \|x\| ~<= pi/4 */
37	if (ix < 0x39800000) { /* \|x\| < 2*-12 /
38	/* raise inexact if x != 0 */
39	FORCE_EVAL(x + 0x1p120f);
40	return 1.0f;
41	}
42	return __cosdf(x);
43	}
44	if (ix <= 0x407b53d1) { /* \|x\| ~<= 5pi/4 /
45	if (ix > 0x4016cbe3) /* \|x\| ~> 3pi/4 /
46	return -__cosdf(sign ? x+c2pio2 : x-c2pio2);
47	else {
48	if (sign)
49	return __sindf(x + c1pio2);
50	else
51	return __sindf(c1pio2 - x);
52	}
53	}
54	if (ix <= 0x40e231d5) { /* \|x\| ~<= 9pi/4 /
55	if (ix > 0x40afeddf) /* \|x\| ~> 7pi/4 /
56	return __cosdf(sign ? x+c4pio2 : x-c4pio2);
57	else {
58	if (sign)
59	return __sindf(-x - c3pio2);
60	else
61	return __sindf(x - c3pio2);
62	}
63	}
64
65	/* cos(Inf or NaN) is NaN */
66	if (ix >= 0x7f800000)
67	return x-x;
68
69	/* general argument reduction needed */
70	n = __rem_pio2f(x,&y);
71	switch (n&3) {
72	case 0: return __cosdf(y);
73	case 1: return __sindf(-y);
74	case 2: return -__cosdf(y);
75	default:
76	return __sindf(y);
77	}
78	}

lib/libc/wasi/libc-top-half/musl/src/math/coshl.c deleted-47

...	@@ -1,47 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double coshl(long double x)
5	{
6	return cosh(x);
7	}
8	#elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
9	long double coshl(long double x)
10	{
11	union ldshape u = {x};
12	unsigned ex = u.i.se & 0x7fff;
13	uint32_t w;
14	long double t;
15
16	/* \|x\| */
17	u.i.se = ex;
18	x = u.f;
19	w = u.i.m >> 32;
20
21	/* \|x\| < log(2) */
22	if (ex < 0x3fff-1 \|\| (ex == 0x3fff-1 && w < 0xb17217f7)) {
23	if (ex < 0x3fff-32) {
24	FORCE_EVAL(x + 0x1p120f);
25	return 1;
26	}
27	t = expm1l(x);
28	return 1 + tt/(2(1+t));
29	}
30
31	/* \|x\| < log(LDBL_MAX) */
32	if (ex < 0x3fff+13 \|\| (ex == 0x3fff+13 && w < 0xb17217f7)) {
33	t = expl(x);
34	return 0.5*(t + 1/t);
35	}
36
37	/* \|x\| > log(LDBL_MAX) or nan */
38	t = expl(0.5*x);
39	return 0.5tt;
40	}
41	#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
42	// TODO: broken implementation to make things compile
43	long double coshl(long double x)
44	{
45	return cosh(x);
46	}
47	#endif

lib/libc/wasi/libc-top-half/musl/src/math/cosl.c deleted-39

...	@@ -1,39 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double cosl(long double x) {
5	return cos(x);
6	}
7	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
8	long double cosl(long double x)
9	{
10	union ldshape u = {x};
11	unsigned n;
12	long double y[2], hi, lo;
13
14	u.i.se &= 0x7fff;
15	if (u.i.se == 0x7fff)
16	return x - x;
17	x = u.f;
18	if (x < M_PI_4) {
19	if (u.i.se < 0x3fff - LDBL_MANT_DIG)
20	/* raise inexact if x!=0 */
21	return 1.0 + x;
22	return __cosl(x, 0);
23	}
24	n = __rem_pio2l(x, y);
25	hi = y[0];
26	lo = y[1];
27	switch (n & 3) {
28	case 0:
29	return __cosl(hi, lo);
30	case 1:
31	return -__sinl(hi, lo, 1);
32	case 2:
33	return -__cosl(hi, lo);
34	case 3:
35	default:
36	return __sinl(hi, lo, 1);
37	}
38	}
39	#endif

lib/libc/wasi/libc-top-half/musl/src/math/erf.c deleted-273

...	@@ -1,273 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_erf.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunPro, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/* double erf(double x)
13	* double erfc(double x)
14	* x
15	* 2 \|\
16	* erf(x) = --------- \| exp(-t*t)dt
17	* sqrt(pi) \\|
18	* 0
19	*
20	* erfc(x) = 1-erf(x)
21	* Note that
22	* erf(-x) = -erf(x)
23	* erfc(-x) = 2 - erfc(x)
24	*
25	* Method:
26	* 1. For \|x\| in [0, 0.84375]
27	* erf(x) = x + x*R(x^2)
28	* erfc(x) = 1 - erf(x) if x in [-.84375,0.25]
29	* = 0.5 + ((0.5-x)-x*R) if x in [0.25,0.84375]
30	* where R = P/Q where P is an odd poly of degree 8 and
31	* Q is an odd poly of degree 10.
32	* -57.90
33	* \| R - (erf(x)-x)/x \| <= 2
34	*
35	*
36	* Remark. The formula is derived by noting
37	* erf(x) = (2/sqrt(pi))*(x - x^3/3 + x^5/10 - x^7/42 + ....)
38	* and that
39	* 2/sqrt(pi) = 1.128379167095512573896158903121545171688
40	* is close to one. The interval is chosen because the fix
41	* point of erf(x) is near 0.6174 (i.e., erf(x)=x when x is
42	* near 0.6174), and by some experiment, 0.84375 is chosen to
43	* guarantee the error is less than one ulp for erf.
44	*
45	* 2. For \|x\| in [0.84375,1.25], let s = \|x\| - 1, and
46	* c = 0.84506291151 rounded to single (24 bits)
47	* erf(x) = sign(x) * (c + P1(s)/Q1(s))
48	* erfc(x) = (1-c) - P1(s)/Q1(s) if x > 0
49	* 1+(c+P1(s)/Q1(s)) if x < 0
50	* \|P1/Q1 - (erf(\|x\|)-c)\| <= 2**-59.06
51	* Remark: here we use the taylor series expansion at x=1.
52	* erf(1+s) = erf(1) + s*Poly(s)
53	* = 0.845.. + P1(s)/Q1(s)
54	* That is, we use rational approximation to approximate
55	* erf(1+s) - (c = (single)0.84506291151)
56	* Note that \|P1/Q1\|< 0.078 for x in [0.84375,1.25]
57	* where
58	* P1(s) = degree 6 poly in s
59	* Q1(s) = degree 6 poly in s
60	*
61	* 3. For x in [1.25,1/0.35(~2.857143)],
62	* erfc(x) = (1/x)exp(-xx-0.5625+R1/S1)
63	* erf(x) = 1 - erfc(x)
64	* where
65	* R1(z) = degree 7 poly in z, (z=1/x^2)
66	* S1(z) = degree 8 poly in z
67	*
68	* 4. For x in [1/0.35,28]
69	* erfc(x) = (1/x)exp(-xx-0.5625+R2/S2) if x > 0
70	* = 2.0 - (1/x)exp(-xx-0.5625+R2/S2) if -6<x<0
71	* = 2.0 - tiny (if x <= -6)
72	* erf(x) = sign(x)*(1.0 - erfc(x)) if x < 6, else
73	* erf(x) = sign(x)*(1.0 - tiny)
74	* where
75	* R2(z) = degree 6 poly in z, (z=1/x^2)
76	* S2(z) = degree 7 poly in z
77	*
78	* Note1:
79	* To compute exp(-x*x-0.5625+R/S), let s be a single
80	* precision number and s := x; then
81	* -xx = -ss + (s-x)*(s+x)
82	* exp(-x*x-0.5626+R/S) =
83	* exp(-ss-0.5625)exp((s-x)*(s+x)+R/S);
84	* Note2:
85	* Here 4 and 5 make use of the asymptotic series
86	* exp(-x*x)
87	* erfc(x) ~ ---------- * ( 1 + Poly(1/x^2) )
88	* x*sqrt(pi)
89	* We use rational approximation to approximate
90	* g(s)=f(1/x^2) = log(erfc(x)x) - xx + 0.5625
91	* Here is the error bound for R1/S1 and R2/S2
92	* \|R1/S1 - f(x)\| < 2**(-62.57)
93	* \|R2/S2 - f(x)\| < 2**(-61.52)
94	*
95	* 5. For inf > x >= 28
96	* erf(x) = sign(x) *(1 - tiny) (raise inexact)
97	* erfc(x) = tiny*tiny (raise underflow) if x > 0
98	* = 2 - tiny if x<0
99	*
100	* 7. Special case:
101	* erf(0) = 0, erf(inf) = 1, erf(-inf) = -1,
102	* erfc(0) = 1, erfc(inf) = 0, erfc(-inf) = 2,
103	* erfc/erf(NaN) is NaN
104	*/
105
106	#include "libm.h"
107
108	static const double
109	erx = 8.45062911510467529297e-01, /* 0x3FEB0AC1, 0x60000000 */
110	/*
111	* Coefficients for approximation to erf on [0,0.84375]
112	*/
113	efx8 = 1.02703333676410069053e+00, /* 0x3FF06EBA, 0x8214DB69 */
114	pp0 = 1.28379167095512558561e-01, /* 0x3FC06EBA, 0x8214DB68 */
115	pp1 = -3.25042107247001499370e-01, /* 0xBFD4CD7D, 0x691CB913 */
116	pp2 = -2.84817495755985104766e-02, /* 0xBF9D2A51, 0xDBD7194F */
117	pp3 = -5.77027029648944159157e-03, /* 0xBF77A291, 0x236668E4 */
118	pp4 = -2.37630166566501626084e-05, /* 0xBEF8EAD6, 0x120016AC */
119	qq1 = 3.97917223959155352819e-01, /* 0x3FD97779, 0xCDDADC09 */
120	qq2 = 6.50222499887672944485e-02, /* 0x3FB0A54C, 0x5536CEBA */
121	qq3 = 5.08130628187576562776e-03, /* 0x3F74D022, 0xC4D36B0F */
122	qq4 = 1.32494738004321644526e-04, /* 0x3F215DC9, 0x221C1A10 */
123	qq5 = -3.96022827877536812320e-06, /* 0xBED09C43, 0x42A26120 */
124	/*
125	* Coefficients for approximation to erf in [0.84375,1.25]
126	*/
127	pa0 = -2.36211856075265944077e-03, /* 0xBF6359B8, 0xBEF77538 */
128	pa1 = 4.14856118683748331666e-01, /* 0x3FDA8D00, 0xAD92B34D */
129	pa2 = -3.72207876035701323847e-01, /* 0xBFD7D240, 0xFBB8C3F1 */
130	pa3 = 3.18346619901161753674e-01, /* 0x3FD45FCA, 0x805120E4 */
131	pa4 = -1.10894694282396677476e-01, /* 0xBFBC6398, 0x3D3E28EC */
132	pa5 = 3.54783043256182359371e-02, /* 0x3FA22A36, 0x599795EB */
133	pa6 = -2.16637559486879084300e-03, /* 0xBF61BF38, 0x0A96073F */
134	qa1 = 1.06420880400844228286e-01, /* 0x3FBB3E66, 0x18EEE323 */
135	qa2 = 5.40397917702171048937e-01, /* 0x3FE14AF0, 0x92EB6F33 */
136	qa3 = 7.18286544141962662868e-02, /* 0x3FB2635C, 0xD99FE9A7 */
137	qa4 = 1.26171219808761642112e-01, /* 0x3FC02660, 0xE763351F */
138	qa5 = 1.36370839120290507362e-02, /* 0x3F8BEDC2, 0x6B51DD1C */
139	qa6 = 1.19844998467991074170e-02, /* 0x3F888B54, 0x5735151D */
140	/*
141	* Coefficients for approximation to erfc in [1.25,1/0.35]
142	*/
143	ra0 = -9.86494403484714822705e-03, /* 0xBF843412, 0x600D6435 */
144	ra1 = -6.93858572707181764372e-01, /* 0xBFE63416, 0xE4BA7360 */
145	ra2 = -1.05586262253232909814e+01, /* 0xC0251E04, 0x41B0E726 */
146	ra3 = -6.23753324503260060396e+01, /* 0xC04F300A, 0xE4CBA38D */
147	ra4 = -1.62396669462573470355e+02, /* 0xC0644CB1, 0x84282266 */
148	ra5 = -1.84605092906711035994e+02, /* 0xC067135C, 0xEBCCABB2 */
149	ra6 = -8.12874355063065934246e+01, /* 0xC0545265, 0x57E4D2F2 */
150	ra7 = -9.81432934416914548592e+00, /* 0xC023A0EF, 0xC69AC25C */
151	sa1 = 1.96512716674392571292e+01, /* 0x4033A6B9, 0xBD707687 */
152	sa2 = 1.37657754143519042600e+02, /* 0x4061350C, 0x526AE721 */
153	sa3 = 4.34565877475229228821e+02, /* 0x407B290D, 0xD58A1A71 */
154	sa4 = 6.45387271733267880336e+02, /* 0x40842B19, 0x21EC2868 */
155	sa5 = 4.29008140027567833386e+02, /* 0x407AD021, 0x57700314 */
156	sa6 = 1.08635005541779435134e+02, /* 0x405B28A3, 0xEE48AE2C */
157	sa7 = 6.57024977031928170135e+00, /* 0x401A47EF, 0x8E484A93 */
158	sa8 = -6.04244152148580987438e-02, /* 0xBFAEEFF2, 0xEE749A62 */
159	/*
160	* Coefficients for approximation to erfc in [1/.35,28]
161	*/
162	rb0 = -9.86494292470009928597e-03, /* 0xBF843412, 0x39E86F4A */
163	rb1 = -7.99283237680523006574e-01, /* 0xBFE993BA, 0x70C285DE */
164	rb2 = -1.77579549177547519889e+01, /* 0xC031C209, 0x555F995A */
165	rb3 = -1.60636384855821916062e+02, /* 0xC064145D, 0x43C5ED98 */
166	rb4 = -6.37566443368389627722e+02, /* 0xC083EC88, 0x1375F228 */
167	rb5 = -1.02509513161107724954e+03, /* 0xC0900461, 0x6A2E5992 */
168	rb6 = -4.83519191608651397019e+02, /* 0xC07E384E, 0x9BDC383F */
169	sb1 = 3.03380607434824582924e+01, /* 0x403E568B, 0x261D5190 */
170	sb2 = 3.25792512996573918826e+02, /* 0x40745CAE, 0x221B9F0A */
171	sb3 = 1.53672958608443695994e+03, /* 0x409802EB, 0x189D5118 */
172	sb4 = 3.19985821950859553908e+03, /* 0x40A8FFB7, 0x688C246A */
173	sb5 = 2.55305040643316442583e+03, /* 0x40A3F219, 0xCEDF3BE6 */
174	sb6 = 4.74528541206955367215e+02, /* 0x407DA874, 0xE79FE763 */
175	sb7 = -2.24409524465858183362e+01; /* 0xC03670E2, 0x42712D62 */
176
177	static double erfc1(double x)
178	{
179	double_t s,P,Q;
180
181	s = fabs(x) - 1;
182	P = pa0+s(pa1+s(pa2+s(pa3+s(pa4+s(pa5+spa6)))));
183	Q = 1+s(qa1+s(qa2+s(qa3+s(qa4+s(qa5+sqa6)))));
184	return 1 - erx - P/Q;
185	}
186
187	static double erfc2(uint32_t ix, double x)
188	{
189	double_t s,R,S;
190	double z;
191
192	if (ix < 0x3ff40000) /* \|x\| < 1.25 */
193	return erfc1(x);
194
195	x = fabs(x);
196	s = 1/(x*x);
197	if (ix < 0x4006db6d) { /* \|x\| < 1/.35 ~ 2.85714 */
198	R = ra0+s(ra1+s(ra2+s(ra3+s(ra4+s*(
199	ra5+s(ra6+sra7))))));
200	S = 1.0+s(sa1+s(sa2+s(sa3+s(sa4+s*(
201	sa5+s(sa6+s(sa7+s*sa8)))))));
202	} else { /* \|x\| > 1/.35 */
203	R = rb0+s(rb1+s(rb2+s(rb3+s(rb4+s*(
204	rb5+s*rb6)))));
205	S = 1.0+s(sb1+s(sb2+s(sb3+s(sb4+s*(
206	sb5+s(sb6+ssb7))))));
207	}
208	z = x;
209	SET_LOW_WORD(z,0);
210	return exp(-zz-0.5625)exp((z-x)*(z+x)+R/S)/x;
211	}
212
213	double erf(double x)
214	{
215	double r,s,z,y;
216	uint32_t ix;
217	int sign;
218
219	GET_HIGH_WORD(ix, x);
220	sign = ix>>31;
221	ix &= 0x7fffffff;
222	if (ix >= 0x7ff00000) {
223	/* erf(nan)=nan, erf(+-inf)=+-1 */
224	return 1-2*sign + 1/x;
225	}
226	if (ix < 0x3feb0000) { /* \|x\| < 0.84375 */
227	if (ix < 0x3e300000) { /* \|x\| < 2*-28 /
228	/* avoid underflow */
229	return 0.125(8x + efx8*x);
230	}
231	z = x*x;
232	r = pp0+z(pp1+z(pp2+z(pp3+zpp4)));
233	s = 1.0+z(qq1+z(qq2+z(qq3+z(qq4+z*qq5))));
234	y = r/s;
235	return x + x*y;
236	}
237	if (ix < 0x40180000) /* 0.84375 <= \|x\| < 6 */
238	y = 1 - erfc2(ix,x);
239	else
240	y = 1 - 0x1p-1022;
241	return sign ? -y : y;
242	}
243
244	double erfc(double x)
245	{
246	double r,s,z,y;
247	uint32_t ix;
248	int sign;
249
250	GET_HIGH_WORD(ix, x);
251	sign = ix>>31;
252	ix &= 0x7fffffff;
253	if (ix >= 0x7ff00000) {
254	/* erfc(nan)=nan, erfc(+-inf)=0,2 */
255	return 2*sign + 1/x;
256	}
257	if (ix < 0x3feb0000) { /* \|x\| < 0.84375 */
258	if (ix < 0x3c700000) /* \|x\| < 2*-56 /
259	return 1.0 - x;
260	z = x*x;
261	r = pp0+z(pp1+z(pp2+z(pp3+zpp4)));
262	s = 1.0+z(qq1+z(qq2+z(qq3+z(qq4+z*qq5))));
263	y = r/s;
264	if (sign \|\| ix < 0x3fd00000) { /* x < 1/4 */
265	return 1.0 - (x+x*y);
266	}
267	return 0.5 - (x - 0.5 + x*y);
268	}
269	if (ix < 0x403c0000) { /* 0.84375 <= \|x\| < 28 */
270	return sign ? 2 - erfc2(ix,x) : erfc2(ix,x);
271	}
272	return sign ? 2 - 0x1p-1022 : 0x1p-1022*0x1p-1022;
273	}

lib/libc/wasi/libc-top-half/musl/src/math/erff.c deleted-183

...	@@ -1,183 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_erff.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	*/
5	/*
6	* ====================================================
7	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
8	*
9	* Developed at SunPro, a Sun Microsystems, Inc. business.
10	* Permission to use, copy, modify, and distribute this
11	* software is freely granted, provided that this notice
12	* is preserved.
13	* ====================================================
14	*/
15
16	#include "libm.h"
17
18	static const float
19	erx = 8.4506291151e-01, /* 0x3f58560b */
20	/*
21	* Coefficients for approximation to erf on [0,0.84375]
22	*/
23	efx8 = 1.0270333290e+00, /* 0x3f8375d4 */
24	pp0 = 1.2837916613e-01, /* 0x3e0375d4 */
25	pp1 = -3.2504209876e-01, /* 0xbea66beb */
26	pp2 = -2.8481749818e-02, /* 0xbce9528f */
27	pp3 = -5.7702702470e-03, /* 0xbbbd1489 */
28	pp4 = -2.3763017452e-05, /* 0xb7c756b1 */
29	qq1 = 3.9791721106e-01, /* 0x3ecbbbce */
30	qq2 = 6.5022252500e-02, /* 0x3d852a63 */
31	qq3 = 5.0813062117e-03, /* 0x3ba68116 */
32	qq4 = 1.3249473704e-04, /* 0x390aee49 */
33	qq5 = -3.9602282413e-06, /* 0xb684e21a */
34	/*
35	* Coefficients for approximation to erf in [0.84375,1.25]
36	*/
37	pa0 = -2.3621185683e-03, /* 0xbb1acdc6 */
38	pa1 = 4.1485610604e-01, /* 0x3ed46805 */
39	pa2 = -3.7220788002e-01, /* 0xbebe9208 */
40	pa3 = 3.1834661961e-01, /* 0x3ea2fe54 */
41	pa4 = -1.1089469492e-01, /* 0xbde31cc2 */
42	pa5 = 3.5478305072e-02, /* 0x3d1151b3 */
43	pa6 = -2.1663755178e-03, /* 0xbb0df9c0 */
44	qa1 = 1.0642088205e-01, /* 0x3dd9f331 */
45	qa2 = 5.4039794207e-01, /* 0x3f0a5785 */
46	qa3 = 7.1828655899e-02, /* 0x3d931ae7 */
47	qa4 = 1.2617121637e-01, /* 0x3e013307 */
48	qa5 = 1.3637083583e-02, /* 0x3c5f6e13 */
49	qa6 = 1.1984500103e-02, /* 0x3c445aa3 */
50	/*
51	* Coefficients for approximation to erfc in [1.25,1/0.35]
52	*/
53	ra0 = -9.8649440333e-03, /* 0xbc21a093 */
54	ra1 = -6.9385856390e-01, /* 0xbf31a0b7 */
55	ra2 = -1.0558626175e+01, /* 0xc128f022 */
56	ra3 = -6.2375331879e+01, /* 0xc2798057 */
57	ra4 = -1.6239666748e+02, /* 0xc322658c */
58	ra5 = -1.8460508728e+02, /* 0xc3389ae7 */
59	ra6 = -8.1287437439e+01, /* 0xc2a2932b */
60	ra7 = -9.8143291473e+00, /* 0xc11d077e */
61	sa1 = 1.9651271820e+01, /* 0x419d35ce */
62	sa2 = 1.3765776062e+02, /* 0x4309a863 */
63	sa3 = 4.3456588745e+02, /* 0x43d9486f */
64	sa4 = 6.4538726807e+02, /* 0x442158c9 */
65	sa5 = 4.2900814819e+02, /* 0x43d6810b */
66	sa6 = 1.0863500214e+02, /* 0x42d9451f */
67	sa7 = 6.5702495575e+00, /* 0x40d23f7c */
68	sa8 = -6.0424413532e-02, /* 0xbd777f97 */
69	/*
70	* Coefficients for approximation to erfc in [1/.35,28]
71	*/
72	rb0 = -9.8649431020e-03, /* 0xbc21a092 */
73	rb1 = -7.9928326607e-01, /* 0xbf4c9dd4 */
74	rb2 = -1.7757955551e+01, /* 0xc18e104b */
75	rb3 = -1.6063638306e+02, /* 0xc320a2ea */
76	rb4 = -6.3756646729e+02, /* 0xc41f6441 */
77	rb5 = -1.0250950928e+03, /* 0xc480230b */
78	rb6 = -4.8351919556e+02, /* 0xc3f1c275 */
79	sb1 = 3.0338060379e+01, /* 0x41f2b459 */
80	sb2 = 3.2579251099e+02, /* 0x43a2e571 */
81	sb3 = 1.5367296143e+03, /* 0x44c01759 */
82	sb4 = 3.1998581543e+03, /* 0x4547fdbb */
83	sb5 = 2.5530502930e+03, /* 0x451f90ce */
84	sb6 = 4.7452853394e+02, /* 0x43ed43a7 */
85	sb7 = -2.2440952301e+01; /* 0xc1b38712 */
86
87	static float erfc1(float x)
88	{
89	float_t s,P,Q;
90
91	s = fabsf(x) - 1;
92	P = pa0+s(pa1+s(pa2+s(pa3+s(pa4+s(pa5+spa6)))));
93	Q = 1+s(qa1+s(qa2+s(qa3+s(qa4+s(qa5+sqa6)))));
94	return 1 - erx - P/Q;
95	}
96
97	static float erfc2(uint32_t ix, float x)
98	{
99	float_t s,R,S;
100	float z;
101
102	if (ix < 0x3fa00000) /* \|x\| < 1.25 */
103	return erfc1(x);
104
105	x = fabsf(x);
106	s = 1/(x*x);
107	if (ix < 0x4036db6d) { /* \|x\| < 1/0.35 */
108	R = ra0+s(ra1+s(ra2+s(ra3+s(ra4+s*(
109	ra5+s(ra6+sra7))))));
110	S = 1.0f+s(sa1+s(sa2+s(sa3+s(sa4+s*(
111	sa5+s(sa6+s(sa7+s*sa8)))))));
112	} else { /* \|x\| >= 1/0.35 */
113	R = rb0+s(rb1+s(rb2+s(rb3+s(rb4+s*(
114	rb5+s*rb6)))));
115	S = 1.0f+s(sb1+s(sb2+s(sb3+s(sb4+s*(
116	sb5+s(sb6+ssb7))))));
117	}
118	GET_FLOAT_WORD(ix, x);
119	SET_FLOAT_WORD(z, ix&0xffffe000);
120	return expf(-zz - 0.5625f) expf((z-x)*(z+x) + R/S)/x;
121	}
122
123	float erff(float x)
124	{
125	float r,s,z,y;
126	uint32_t ix;
127	int sign;
128
129	GET_FLOAT_WORD(ix, x);
130	sign = ix>>31;
131	ix &= 0x7fffffff;
132	if (ix >= 0x7f800000) {
133	/* erf(nan)=nan, erf(+-inf)=+-1 */
134	return 1-2*sign + 1/x;
135	}
136	if (ix < 0x3f580000) { /* \|x\| < 0.84375 */
137	if (ix < 0x31800000) { /* \|x\| < 2*-28 /
138	/avoid underflow /
139	return 0.125f(8x + efx8*x);
140	}
141	z = x*x;
142	r = pp0+z(pp1+z(pp2+z(pp3+zpp4)));
143	s = 1+z(qq1+z(qq2+z(qq3+z(qq4+z*qq5))));
144	y = r/s;
145	return x + x*y;
146	}
147	if (ix < 0x40c00000) /* \|x\| < 6 */
148	y = 1 - erfc2(ix,x);
149	else
150	y = 1 - 0x1p-120f;
151	return sign ? -y : y;
152	}
153
154	float erfcf(float x)
155	{
156	float r,s,z,y;
157	uint32_t ix;
158	int sign;
159
160	GET_FLOAT_WORD(ix, x);
161	sign = ix>>31;
162	ix &= 0x7fffffff;
163	if (ix >= 0x7f800000) {
164	/* erfc(nan)=nan, erfc(+-inf)=0,2 */
165	return 2*sign + 1/x;
166	}
167
168	if (ix < 0x3f580000) { /* \|x\| < 0.84375 */
169	if (ix < 0x23800000) /* \|x\| < 2*-56 /
170	return 1.0f - x;
171	z = x*x;
172	r = pp0+z(pp1+z(pp2+z(pp3+zpp4)));
173	s = 1.0f+z(qq1+z(qq2+z(qq3+z(qq4+z*qq5))));
174	y = r/s;
175	if (sign \|\| ix < 0x3e800000) /* x < 1/4 */
176	return 1.0f - (x+x*y);
177	return 0.5f - (x - 0.5f + x*y);
178	}
179	if (ix < 0x41e00000) { /* \|x\| < 28 */
180	return sign ? 2 - erfc2(ix,x) : erfc2(ix,x);
181	}
182	return sign ? 2 - 0x1p-120f : 0x1p-120f*0x1p-120f;
183	}

lib/libc/wasi/libc-top-half/musl/src/math/erfl.c deleted-353

...	@@ -1,353 +0,0 @@
1	/* origin: OpenBSD /usr/src/lib/libm/src/ld80/e_erfl.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunPro, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/*
13	* Copyright (c) 2008 Stephen L. Moshier <steve@moshier.net>
14	*
15	* Permission to use, copy, modify, and distribute this software for any
16	* purpose with or without fee is hereby granted, provided that the above
17	* copyright notice and this permission notice appear in all copies.
18	*
19	* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
20	* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
21	* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
22	* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
23	* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
24	* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
25	* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
26	*/
27	/* double erf(double x)
28	* double erfc(double x)
29	* x
30	* 2 \|\
31	* erf(x) = --------- \| exp(-t*t)dt
32	* sqrt(pi) \\|
33	* 0
34	*
35	* erfc(x) = 1-erf(x)
36	* Note that
37	* erf(-x) = -erf(x)
38	* erfc(-x) = 2 - erfc(x)
39	*
40	* Method:
41	* 1. For \|x\| in [0, 0.84375]
42	* erf(x) = x + x*R(x^2)
43	* erfc(x) = 1 - erf(x) if x in [-.84375,0.25]
44	* = 0.5 + ((0.5-x)-x*R) if x in [0.25,0.84375]
45	* Remark. The formula is derived by noting
46	* erf(x) = (2/sqrt(pi))*(x - x^3/3 + x^5/10 - x^7/42 + ....)
47	* and that
48	* 2/sqrt(pi) = 1.128379167095512573896158903121545171688
49	* is close to one. The interval is chosen because the fix
50	* point of erf(x) is near 0.6174 (i.e., erf(x)=x when x is
51	* near 0.6174), and by some experiment, 0.84375 is chosen to
52	* guarantee the error is less than one ulp for erf.
53	*
54	* 2. For \|x\| in [0.84375,1.25], let s = \|x\| - 1, and
55	* c = 0.84506291151 rounded to single (24 bits)
56	* erf(x) = sign(x) * (c + P1(s)/Q1(s))
57	* erfc(x) = (1-c) - P1(s)/Q1(s) if x > 0
58	* 1+(c+P1(s)/Q1(s)) if x < 0
59	* Remark: here we use the taylor series expansion at x=1.
60	* erf(1+s) = erf(1) + s*Poly(s)
61	* = 0.845.. + P1(s)/Q1(s)
62	* Note that \|P1/Q1\|< 0.078 for x in [0.84375,1.25]
63	*
64	* 3. For x in [1.25,1/0.35(~2.857143)],
65	* erfc(x) = (1/x)exp(-xx-0.5625+R1(z)/S1(z))
66	* z=1/x^2
67	* erf(x) = 1 - erfc(x)
68	*
69	* 4. For x in [1/0.35,107]
70	* erfc(x) = (1/x)exp(-xx-0.5625+R2/S2) if x > 0
71	* = 2.0 - (1/x)exp(-xx-0.5625+R2(z)/S2(z))
72	* if -6.666<x<0
73	* = 2.0 - tiny (if x <= -6.666)
74	* z=1/x^2
75	* erf(x) = sign(x)*(1.0 - erfc(x)) if x < 6.666, else
76	* erf(x) = sign(x)*(1.0 - tiny)
77	* Note1:
78	* To compute exp(-x*x-0.5625+R/S), let s be a single
79	* precision number and s := x; then
80	* -xx = -ss + (s-x)*(s+x)
81	* exp(-x*x-0.5626+R/S) =
82	* exp(-ss-0.5625)exp((s-x)*(s+x)+R/S);
83	* Note2:
84	* Here 4 and 5 make use of the asymptotic series
85	* exp(-x*x)
86	* erfc(x) ~ ---------- * ( 1 + Poly(1/x^2) )
87	* x*sqrt(pi)
88	*
89	* 5. For inf > x >= 107
90	* erf(x) = sign(x) *(1 - tiny) (raise inexact)
91	* erfc(x) = tiny*tiny (raise underflow) if x > 0
92	* = 2 - tiny if x<0
93	*
94	* 7. Special case:
95	* erf(0) = 0, erf(inf) = 1, erf(-inf) = -1,
96	* erfc(0) = 1, erfc(inf) = 0, erfc(-inf) = 2,
97	* erfc/erf(NaN) is NaN
98	*/
99
100
101	#include "libm.h"
102
103	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
104	long double erfl(long double x)
105	{
106	return erf(x);
107	}
108	long double erfcl(long double x)
109	{
110	return erfc(x);
111	}
112	#elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
113	static const long double
114	erx = 0.845062911510467529296875L,
115
116	/*
117	* Coefficients for approximation to erf on [0,0.84375]
118	*/
119	/* 8 * (2/sqrt(pi) - 1) */
120	efx8 = 1.0270333367641005911692712249723613735048E0L,
121	pp[6] = {
122	1.122751350964552113068262337278335028553E6L,
123	-2.808533301997696164408397079650699163276E6L,
124	-3.314325479115357458197119660818768924100E5L,
125	-6.848684465326256109712135497895525446398E4L,
126	-2.657817695110739185591505062971929859314E3L,
127	-1.655310302737837556654146291646499062882E2L,
128	},
129	qq[6] = {
130	8.745588372054466262548908189000448124232E6L,
131	3.746038264792471129367533128637019611485E6L,
132	7.066358783162407559861156173539693900031E5L,
133	7.448928604824620999413120955705448117056E4L,
134	4.511583986730994111992253980546131408924E3L,
135	1.368902937933296323345610240009071254014E2L,
136	/* 1.000000000000000000000000000000000000000E0 */
137	},
138
139	/*
140	* Coefficients for approximation to erf in [0.84375,1.25]
141	*/
142	/* erf(x+1) = 0.845062911510467529296875 + pa(x)/qa(x)
143	-0.15625 <= x <= +.25
144	Peak relative error 8.5e-22 */
145	pa[8] = {
146	-1.076952146179812072156734957705102256059E0L,
147	1.884814957770385593365179835059971587220E2L,
148	-5.339153975012804282890066622962070115606E1L,
149	4.435910679869176625928504532109635632618E1L,
150	1.683219516032328828278557309642929135179E1L,
151	-2.360236618396952560064259585299045804293E0L,
152	1.852230047861891953244413872297940938041E0L,
153	9.394994446747752308256773044667843200719E-2L,
154	},
155	qa[7] = {
156	4.559263722294508998149925774781887811255E2L,
157	3.289248982200800575749795055149780689738E2L,
158	2.846070965875643009598627918383314457912E2L,
159	1.398715859064535039433275722017479994465E2L,
160	6.060190733759793706299079050985358190726E1L,
161	2.078695677795422351040502569964299664233E1L,
162	4.641271134150895940966798357442234498546E0L,
163	/* 1.000000000000000000000000000000000000000E0 */
164	},
165
166	/*
167	* Coefficients for approximation to erfc in [1.25,1/0.35]
168	*/
169	/* erfc(1/x) = x exp (-1/x^2 - 0.5625 + ra(x^2)/sa(x^2))
170	1/2.85711669921875 < 1/x < 1/1.25
171	Peak relative error 3.1e-21 */
172	ra[] = {
173	1.363566591833846324191000679620738857234E-1L,
174	1.018203167219873573808450274314658434507E1L,
175	1.862359362334248675526472871224778045594E2L,
176	1.411622588180721285284945138667933330348E3L,
177	5.088538459741511988784440103218342840478E3L,
178	8.928251553922176506858267311750789273656E3L,
179	7.264436000148052545243018622742770549982E3L,
180	2.387492459664548651671894725748959751119E3L,
181	2.220916652813908085449221282808458466556E2L,
182	},
183	sa[] = {
184	-1.382234625202480685182526402169222331847E1L,
185	-3.315638835627950255832519203687435946482E2L,
186	-2.949124863912936259747237164260785326692E3L,
187	-1.246622099070875940506391433635999693661E4L,
188	-2.673079795851665428695842853070996219632E4L,
189	-2.880269786660559337358397106518918220991E4L,
190	-1.450600228493968044773354186390390823713E4L,
191	-2.874539731125893533960680525192064277816E3L,
192	-1.402241261419067750237395034116942296027E2L,
193	/* 1.000000000000000000000000000000000000000E0 */
194	},
195
196	/*
197	* Coefficients for approximation to erfc in [1/.35,107]
198	*/
199	/* erfc(1/x) = x exp (-1/x^2 - 0.5625 + rb(x^2)/sb(x^2))
200	1/6.6666259765625 < 1/x < 1/2.85711669921875
201	Peak relative error 4.2e-22 */
202	rb[] = {
203	-4.869587348270494309550558460786501252369E-5L,
204	-4.030199390527997378549161722412466959403E-3L,
205	-9.434425866377037610206443566288917589122E-2L,
206	-9.319032754357658601200655161585539404155E-1L,
207	-4.273788174307459947350256581445442062291E0L,
208	-8.842289940696150508373541814064198259278E0L,
209	-7.069215249419887403187988144752613025255E0L,
210	-1.401228723639514787920274427443330704764E0L,
211	},
212	sb[] = {
213	4.936254964107175160157544545879293019085E-3L,
214	1.583457624037795744377163924895349412015E-1L,
215	1.850647991850328356622940552450636420484E0L,
216	9.927611557279019463768050710008450625415E0L,
217	2.531667257649436709617165336779212114570E1L,
218	2.869752886406743386458304052862814690045E1L,
219	1.182059497870819562441683560749192539345E1L,
220	/* 1.000000000000000000000000000000000000000E0 */
221	},
222	/* erfc(1/x) = x exp (-1/x^2 - 0.5625 + rc(x^2)/sc(x^2))
223	1/107 <= 1/x <= 1/6.6666259765625
224	Peak relative error 1.1e-21 */
225	rc[] = {
226	-8.299617545269701963973537248996670806850E-5L,
227	-6.243845685115818513578933902532056244108E-3L,
228	-1.141667210620380223113693474478394397230E-1L,
229	-7.521343797212024245375240432734425789409E-1L,
230	-1.765321928311155824664963633786967602934E0L,
231	-1.029403473103215800456761180695263439188E0L,
232	},
233	sc[] = {
234	8.413244363014929493035952542677768808601E-3L,
235	2.065114333816877479753334599639158060979E-1L,
236	1.639064941530797583766364412782135680148E0L,
237	4.936788463787115555582319302981666347450E0L,
238	5.005177727208955487404729933261347679090E0L,
239	/* 1.000000000000000000000000000000000000000E0 */
240	};
241
242	static long double erfc1(long double x)
243	{
244	long double s,P,Q;
245
246	s = fabsl(x) - 1;
247	P = pa[0] + s * (pa[1] + s * (pa[2] +
248	s * (pa[3] + s * (pa[4] + s * (pa[5] + s * (pa[6] + s * pa[7]))))));
249	Q = qa[0] + s * (qa[1] + s * (qa[2] +
250	s * (qa[3] + s * (qa[4] + s * (qa[5] + s * (qa[6] + s))))));
251	return 1 - erx - P / Q;
252	}
253
254	static long double erfc2(uint32_t ix, long double x)
255	{
256	union ldshape u;
257	long double s,z,R,S;
258
259	if (ix < 0x3fffa000) /* 0.84375 <= \|x\| < 1.25 */
260	return erfc1(x);
261
262	x = fabsl(x);
263	s = 1 / (x * x);
264	if (ix < 0x4000b6db) { /* 1.25 <= \|x\| < 2.857 ~ 1/.35 */
265	R = ra[0] + s * (ra[1] + s * (ra[2] + s * (ra[3] + s * (ra[4] +
266	s * (ra[5] + s * (ra[6] + s * (ra[7] + s * ra[8])))))));
267	S = sa[0] + s * (sa[1] + s * (sa[2] + s * (sa[3] + s * (sa[4] +
268	s * (sa[5] + s * (sa[6] + s * (sa[7] + s * (sa[8] + s))))))));
269	} else if (ix < 0x4001d555) { /* 2.857 <= \|x\| < 6.6666259765625 */
270	R = rb[0] + s * (rb[1] + s * (rb[2] + s * (rb[3] + s * (rb[4] +
271	s * (rb[5] + s * (rb[6] + s * rb[7]))))));
272	S = sb[0] + s * (sb[1] + s * (sb[2] + s * (sb[3] + s * (sb[4] +
273	s * (sb[5] + s * (sb[6] + s))))));
274	} else { /* 6.666 <= \|x\| < 107 (erfc only) */
275	R = rc[0] + s * (rc[1] + s * (rc[2] + s * (rc[3] +
276	s * (rc[4] + s * rc[5]))));
277	S = sc[0] + s * (sc[1] + s * (sc[2] + s * (sc[3] +
278	s * (sc[4] + s))));
279	}
280	u.f = x;
281	u.i.m &= -1ULL << 40;
282	z = u.f;
283	return expl(-zz - 0.5625) expl((z - x) * (z + x) + R / S) / x;
284	}
285
286	long double erfl(long double x)
287	{
288	long double r, s, z, y;
289	union ldshape u = {x};
290	uint32_t ix = (u.i.se & 0x7fffU)<<16 \| u.i.m>>48;
291	int sign = u.i.se >> 15;
292
293	if (ix >= 0x7fff0000)
294	/* erf(nan)=nan, erf(+-inf)=+-1 */
295	return 1 - 2*sign + 1/x;
296	if (ix < 0x3ffed800) { /* \|x\| < 0.84375 */
297	if (ix < 0x3fde8000) { /* \|x\| < 2*-33 /
298	return 0.125 * (8 * x + efx8 * x); /* avoid underflow */
299	}
300	z = x * x;
301	r = pp[0] + z * (pp[1] +
302	z * (pp[2] + z * (pp[3] + z * (pp[4] + z * pp[5]))));
303	s = qq[0] + z * (qq[1] +
304	z * (qq[2] + z * (qq[3] + z * (qq[4] + z * (qq[5] + z)))));
305	y = r / s;
306	return x + x * y;
307	}
308	if (ix < 0x4001d555) /* \|x\| < 6.6666259765625 */
309	y = 1 - erfc2(ix,x);
310	else
311	y = 1 - 0x1p-16382L;
312	return sign ? -y : y;
313	}
314
315	long double erfcl(long double x)
316	{
317	long double r, s, z, y;
318	union ldshape u = {x};
319	uint32_t ix = (u.i.se & 0x7fffU)<<16 \| u.i.m>>48;
320	int sign = u.i.se >> 15;
321
322	if (ix >= 0x7fff0000)
323	/* erfc(nan) = nan, erfc(+-inf) = 0,2 */
324	return 2*sign + 1/x;
325	if (ix < 0x3ffed800) { /* \|x\| < 0.84375 */
326	if (ix < 0x3fbe0000) /* \|x\| < 2*-65 /
327	return 1.0 - x;
328	z = x * x;
329	r = pp[0] + z * (pp[1] +
330	z * (pp[2] + z * (pp[3] + z * (pp[4] + z * pp[5]))));
331	s = qq[0] + z * (qq[1] +
332	z * (qq[2] + z * (qq[3] + z * (qq[4] + z * (qq[5] + z)))));
333	y = r / s;
334	if (ix < 0x3ffd8000) /* x < 1/4 */
335	return 1.0 - (x + x * y);
336	return 0.5 - (x - 0.5 + x * y);
337	}
338	if (ix < 0x4005d600) /* \|x\| < 107 */
339	return sign ? 2 - erfc2(ix,x) : erfc2(ix,x);
340	y = 0x1p-16382L;
341	return sign ? 2 - y : y*y;
342	}
343	#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
344	// TODO: broken implementation to make things compile
345	long double erfl(long double x)
346	{
347	return erf(x);
348	}
349	long double erfcl(long double x)
350	{
351	return erfc(x);
352	}
353	#endif

lib/libc/wasi/libc-top-half/musl/src/math/exp.c deleted-134

...	@@ -1,134 +0,0 @@
1	/*
2	* Double-precision e^x function.
3	*
4	* Copyright (c) 2018, Arm Limited.
5	* SPDX-License-Identifier: MIT
6	*/
7
8	#include <math.h>
9	#include <stdint.h>
10	#include "libm.h"
11	#include "exp_data.h"
12
13	#define N (1 << EXP_TABLE_BITS)
14	#define InvLn2N __exp_data.invln2N
15	#define NegLn2hiN __exp_data.negln2hiN
16	#define NegLn2loN __exp_data.negln2loN
17	#define Shift __exp_data.shift
18	#define T __exp_data.tab
19	#define C2 __exp_data.poly[5 - EXP_POLY_ORDER]
20	#define C3 __exp_data.poly[6 - EXP_POLY_ORDER]
21	#define C4 __exp_data.poly[7 - EXP_POLY_ORDER]
22	#define C5 __exp_data.poly[8 - EXP_POLY_ORDER]
23
24	/* Handle cases that may overflow or underflow when computing the result that
25	is scale*(1+TMP) without intermediate rounding. The bit representation of
26	scale is in SBITS, however it has a computed exponent that may have
27	overflown into the sign bit so that needs to be adjusted before using it as
28	a double. (int32_t)KI is the k used in the argument reduction and exponent
29	adjustment of scale, positive k here means the result may overflow and
30	negative k means the result may underflow. */
31	static inline double specialcase(double_t tmp, uint64_t sbits, uint64_t ki)
32	{
33	double_t scale, y;
34
35	if ((ki & 0x80000000) == 0) {
36	/* k > 0, the exponent of scale might have overflowed by <= 460. */
37	sbits -= 1009ull << 52;
38	scale = asdouble(sbits);
39	y = 0x1p1009 * (scale + scale * tmp);
40	return eval_as_double(y);
41	}
42	/* k < 0, need special care in the subnormal range. */
43	sbits += 1022ull << 52;
44	scale = asdouble(sbits);
45	y = scale + scale * tmp;
46	if (y < 1.0) {
47	/* Round y to the right precision before scaling it into the subnormal
48	range to avoid double rounding that can cause 0.5+E/2 ulp error where
49	E is the worst-case ulp error outside the subnormal range. So this
50	is only useful if the goal is better than 1 ulp worst-case error. */
51	double_t hi, lo;
52	lo = scale - y + scale * tmp;
53	hi = 1.0 + y;
54	lo = 1.0 - hi + y + lo;
55	y = eval_as_double(hi + lo) - 1.0;
56	/* Avoid -0.0 with downward rounding. */
57	if (WANT_ROUNDING && y == 0.0)
58	y = 0.0;
59	/* The underflow exception needs to be signaled explicitly. */
60	fp_force_eval(fp_barrier(0x1p-1022) * 0x1p-1022);
61	}
62	y = 0x1p-1022 * y;
63	return eval_as_double(y);
64	}
65
66	/* Top 12 bits of a double (sign and exponent bits). */
67	static inline uint32_t top12(double x)
68	{
69	return asuint64(x) >> 52;
70	}
71
72	double exp(double x)
73	{
74	uint32_t abstop;
75	uint64_t ki, idx, top, sbits;
76	double_t kd, z, r, r2, scale, tail, tmp;
77
78	abstop = top12(x) & 0x7ff;
79	if (predict_false(abstop - top12(0x1p-54) >= top12(512.0) - top12(0x1p-54))) {
80	if (abstop - top12(0x1p-54) >= 0x80000000)
81	/* Avoid spurious underflow for tiny x. */
82	/* Note: 0 is common input. */
83	return WANT_ROUNDING ? 1.0 + x : 1.0;
84	if (abstop >= top12(1024.0)) {
85	if (asuint64(x) == asuint64(-INFINITY))
86	return 0.0;
87	if (abstop >= top12(INFINITY))
88	return 1.0 + x;
89	if (asuint64(x) >> 63)
90	return __math_uflow(0);
91	else
92	return __math_oflow(0);
93	}
94	/* Large x is special cased below. */
95	abstop = 0;
96	}
97
98	/* exp(x) = 2^(k/N) * exp(r), with exp(r) in [2^(-1/2N),2^(1/2N)]. */
99	/* x = ln2/Nk + r, with int k and r in [-ln2/2N, ln2/2N]. /
100	z = InvLn2N * x;
101	#if TOINT_INTRINSICS
102	kd = roundtoint(z);
103	ki = converttoint(z);
104	#elif EXP_USE_TOINT_NARROW
105	/* z - kd is in [-0.5-2^-16, 0.5] in all rounding modes. */
106	kd = eval_as_double(z + Shift);
107	ki = asuint64(kd) >> 16;
108	kd = (double_t)(int32_t)ki;
109	#else
110	/* z - kd is in [-1, 1] in non-nearest rounding modes. */
111	kd = eval_as_double(z + Shift);
112	ki = asuint64(kd);
113	kd -= Shift;
114	#endif
115	r = x + kd * NegLn2hiN + kd * NegLn2loN;
116	/* 2^(k/N) ~= scale * (1 + tail). */
117	idx = 2 * (ki % N);
118	top = ki << (52 - EXP_TABLE_BITS);
119	tail = asdouble(T[idx]);
120	/* This is only a valid scale when -1023N < k < 1024N. */
121	sbits = T[idx + 1] + top;
122	/* exp(x) = 2^(k/N) * exp(r) ~= scale + scale * (tail + exp(r) - 1). */
123	/* Evaluation is optimized assuming superscalar pipelined execution. */
124	r2 = r * r;
125	/* Without fma the worst case error is 0.25/N ulp larger. */
126	/* Worst case error is less than 0.5+1.11/N+(abs poly error * 2^53) ulp. */
127	tmp = tail + r + r2 * (C2 + r * C3) + r2 * r2 * (C4 + r * C5);
128	if (predict_false(abstop == 0))
129	return specialcase(tmp, sbits, ki);
130	scale = asdouble(sbits);
131	/* Note: tmp == 0 or \|tmp\| > 2^-200 and scale > 2^-739, so there
132	is no spurious underflow here even without fma. */
133	return eval_as_double(scale + scale * tmp);
134	}

lib/libc/wasi/libc-top-half/musl/src/math/exp10.c deleted-24

...	@@ -1,24 +0,0 @@
1	#define _GNU_SOURCE
2	#include <math.h>
3	#include <stdint.h>
4
5	double exp10(double x)
6	{
7	static const double p10[] = {
8	1e-15, 1e-14, 1e-13, 1e-12, 1e-11, 1e-10,
9	1e-9, 1e-8, 1e-7, 1e-6, 1e-5, 1e-4, 1e-3, 1e-2, 1e-1,
10	1, 1e1, 1e2, 1e3, 1e4, 1e5, 1e6, 1e7, 1e8, 1e9,
11	1e10, 1e11, 1e12, 1e13, 1e14, 1e15
12	};
13	double n, y = modf(x, &n);
14	union {double f; uint64_t i;} u = {n};
15	/* fabs(n) < 16 without raising invalid on nan */
16	if ((u.i>>52 & 0x7ff) < 0x3ff+4) {
17	if (!y) return p10[(int)n+15];
18	y = exp2(3.32192809488736234787031942948939 * y);
19	return y * p10[(int)n+15];
20	}
21	return pow(10.0, x);
22	}
23
24	weak_alias(exp10, pow10);

lib/libc/wasi/libc-top-half/musl/src/math/exp10f.c deleted-22

...	@@ -1,22 +0,0 @@
1	#define _GNU_SOURCE
2	#include <math.h>
3	#include <stdint.h>
4
5	float exp10f(float x)
6	{
7	static const float p10[] = {
8	1e-7f, 1e-6f, 1e-5f, 1e-4f, 1e-3f, 1e-2f, 1e-1f,
9	1, 1e1, 1e2, 1e3, 1e4, 1e5, 1e6, 1e7
10	};
11	float n, y = modff(x, &n);
12	union {float f; uint32_t i;} u = {n};
13	/* fabsf(n) < 8 without raising invalid on nan */
14	if ((u.i>>23 & 0xff) < 0x7f+3) {
15	if (!y) return p10[(int)n+7];
16	y = exp2f(3.32192809488736234787031942948939f * y);
17	return y * p10[(int)n+7];
18	}
19	return exp2(3.32192809488736234787031942948939 * x);
20	}
21
22	weak_alias(exp10f, pow10f);

lib/libc/wasi/libc-top-half/musl/src/math/exp10l.c deleted-32

...	@@ -1,32 +0,0 @@
1	#define _GNU_SOURCE
2	#include <float.h>
3	#include <math.h>
4	#include "libm.h"
5
6	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
7	long double exp10l(long double x)
8	{
9	return exp10(x);
10	}
11	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
12	long double exp10l(long double x)
13	{
14	static const long double p10[] = {
15	1e-15L, 1e-14L, 1e-13L, 1e-12L, 1e-11L, 1e-10L,
16	1e-9L, 1e-8L, 1e-7L, 1e-6L, 1e-5L, 1e-4L, 1e-3L, 1e-2L, 1e-1L,
17	1, 1e1, 1e2, 1e3, 1e4, 1e5, 1e6, 1e7, 1e8, 1e9,
18	1e10, 1e11, 1e12, 1e13, 1e14, 1e15
19	};
20	long double n, y = modfl(x, &n);
21	union ldshape u = {n};
22	/* fabsl(n) < 16 without raising invalid on nan */
23	if ((u.i.se & 0x7fff) < 0x3fff+4) {
24	if (!y) return p10[(int)n+15];
25	y = exp2l(3.32192809488736234787031942948939L * y);
26	return y * p10[(int)n+15];
27	}
28	return powl(10.0, x);
29	}
30	#endif
31
32	weak_alias(exp10l, pow10l);

lib/libc/wasi/libc-top-half/musl/src/math/exp2.c deleted-121

...	@@ -1,121 +0,0 @@
1	/*
2	* Double-precision 2^x function.
3	*
4	* Copyright (c) 2018, Arm Limited.
5	* SPDX-License-Identifier: MIT
6	*/
7
8	#include <math.h>
9	#include <stdint.h>
10	#include "libm.h"
11	#include "exp_data.h"
12
13	#define N (1 << EXP_TABLE_BITS)
14	#define Shift __exp_data.exp2_shift
15	#define T __exp_data.tab
16	#define C1 __exp_data.exp2_poly[0]
17	#define C2 __exp_data.exp2_poly[1]
18	#define C3 __exp_data.exp2_poly[2]
19	#define C4 __exp_data.exp2_poly[3]
20	#define C5 __exp_data.exp2_poly[4]
21
22	/* Handle cases that may overflow or underflow when computing the result that
23	is scale*(1+TMP) without intermediate rounding. The bit representation of
24	scale is in SBITS, however it has a computed exponent that may have
25	overflown into the sign bit so that needs to be adjusted before using it as
26	a double. (int32_t)KI is the k used in the argument reduction and exponent
27	adjustment of scale, positive k here means the result may overflow and
28	negative k means the result may underflow. */
29	static inline double specialcase(double_t tmp, uint64_t sbits, uint64_t ki)
30	{
31	double_t scale, y;
32
33	if ((ki & 0x80000000) == 0) {
34	/* k > 0, the exponent of scale might have overflowed by 1. */
35	sbits -= 1ull << 52;
36	scale = asdouble(sbits);
37	y = 2 * (scale + scale * tmp);
38	return eval_as_double(y);
39	}
40	/* k < 0, need special care in the subnormal range. */
41	sbits += 1022ull << 52;
42	scale = asdouble(sbits);
43	y = scale + scale * tmp;
44	if (y < 1.0) {
45	/* Round y to the right precision before scaling it into the subnormal
46	range to avoid double rounding that can cause 0.5+E/2 ulp error where
47	E is the worst-case ulp error outside the subnormal range. So this
48	is only useful if the goal is better than 1 ulp worst-case error. */
49	double_t hi, lo;
50	lo = scale - y + scale * tmp;
51	hi = 1.0 + y;
52	lo = 1.0 - hi + y + lo;
53	y = eval_as_double(hi + lo) - 1.0;
54	/* Avoid -0.0 with downward rounding. */
55	if (WANT_ROUNDING && y == 0.0)
56	y = 0.0;
57	/* The underflow exception needs to be signaled explicitly. */
58	fp_force_eval(fp_barrier(0x1p-1022) * 0x1p-1022);
59	}
60	y = 0x1p-1022 * y;
61	return eval_as_double(y);
62	}
63
64	/* Top 12 bits of a double (sign and exponent bits). */
65	static inline uint32_t top12(double x)
66	{
67	return asuint64(x) >> 52;
68	}
69
70	double exp2(double x)
71	{
72	uint32_t abstop;
73	uint64_t ki, idx, top, sbits;
74	double_t kd, r, r2, scale, tail, tmp;
75
76	abstop = top12(x) & 0x7ff;
77	if (predict_false(abstop - top12(0x1p-54) >= top12(512.0) - top12(0x1p-54))) {
78	if (abstop - top12(0x1p-54) >= 0x80000000)
79	/* Avoid spurious underflow for tiny x. */
80	/* Note: 0 is common input. */
81	return WANT_ROUNDING ? 1.0 + x : 1.0;
82	if (abstop >= top12(1024.0)) {
83	if (asuint64(x) == asuint64(-INFINITY))
84	return 0.0;
85	if (abstop >= top12(INFINITY))
86	return 1.0 + x;
87	if (!(asuint64(x) >> 63))
88	return __math_oflow(0);
89	else if (asuint64(x) >= asuint64(-1075.0))
90	return __math_uflow(0);
91	}
92	if (2 * asuint64(x) > 2 * asuint64(928.0))
93	/* Large x is special cased below. */
94	abstop = 0;
95	}
96
97	/* exp2(x) = 2^(k/N) * 2^r, with 2^r in [2^(-1/2N),2^(1/2N)]. */
98	/* x = k/N + r, with int k and r in [-1/2N, 1/2N]. */
99	kd = eval_as_double(x + Shift);
100	ki = asuint64(kd); /* k. */
101	kd -= Shift; /* k/N for int k. */
102	r = x - kd;
103	/* 2^(k/N) ~= scale * (1 + tail). */
104	idx = 2 * (ki % N);
105	top = ki << (52 - EXP_TABLE_BITS);
106	tail = asdouble(T[idx]);
107	/* This is only a valid scale when -1023N < k < 1024N. */
108	sbits = T[idx + 1] + top;
109	/* exp2(x) = 2^(k/N) * 2^r ~= scale + scale * (tail + 2^r - 1). */
110	/* Evaluation is optimized assuming superscalar pipelined execution. */
111	r2 = r * r;
112	/* Without fma the worst case error is 0.5/N ulp larger. */
113	/* Worst case error is less than 0.5+0.86/N+(abs poly error * 2^53) ulp. */
114	tmp = tail + r * C1 + r2 * (C2 + r * C3) + r2 * r2 * (C4 + r * C5);
115	if (predict_false(abstop == 0))
116	return specialcase(tmp, sbits, ki);
117	scale = asdouble(sbits);
118	/* Note: tmp == 0 or \|tmp\| > 2^-65 and scale > 2^-928, so there
119	is no spurious underflow here even without fma. */
120	return eval_as_double(scale + scale * tmp);
121	}

lib/libc/wasi/libc-top-half/musl/src/math/exp2f.c deleted-69

...	@@ -1,69 +0,0 @@
1	/*
2	* Single-precision 2^x function.
3	*
4	* Copyright (c) 2017-2018, Arm Limited.
5	* SPDX-License-Identifier: MIT
6	*/
7
8	#include <math.h>
9	#include <stdint.h>
10	#include "libm.h"
11	#include "exp2f_data.h"
12
13	/*
14	EXP2F_TABLE_BITS = 5
15	EXP2F_POLY_ORDER = 3
16
17	ULP error: 0.502 (nearest rounding.)
18	Relative error: 1.69 * 2^-34 in [-1/64, 1/64] (before rounding.)
19	Wrong count: 168353 (all nearest rounding wrong results with fma.)
20	Non-nearest ULP error: 1 (rounded ULP error)
21	*/
22
23	#define N (1 << EXP2F_TABLE_BITS)
24	#define T __exp2f_data.tab
25	#define C __exp2f_data.poly
26	#define SHIFT __exp2f_data.shift_scaled
27
28	static inline uint32_t top12(float x)
29	{
30	return asuint(x) >> 20;
31	}
32
33	float exp2f(float x)
34	{
35	uint32_t abstop;
36	uint64_t ki, t;
37	double_t kd, xd, z, r, r2, y, s;
38
39	xd = (double_t)x;
40	abstop = top12(x) & 0x7ff;
41	if (predict_false(abstop >= top12(128.0f))) {
42	/* \|x\| >= 128 or x is nan. */
43	if (asuint(x) == asuint(-INFINITY))
44	return 0.0f;
45	if (abstop >= top12(INFINITY))
46	return x + x;
47	if (x > 0.0f)
48	return __math_oflowf(0);
49	if (x <= -150.0f)
50	return __math_uflowf(0);
51	}
52
53	/* x = k/N + r with r in [-1/(2N), 1/(2N)] and int k. */
54	kd = eval_as_double(xd + SHIFT);
55	ki = asuint64(kd);
56	kd -= SHIFT; /* k/N for int k. */
57	r = xd - kd;
58
59	/* exp2(x) = 2^(k/N) * 2^r ~= s * (C0r^3 + C1r^2 + C2r + 1) /
60	t = T[ki % N];
61	t += ki << (52 - EXP2F_TABLE_BITS);
62	s = asdouble(t);
63	z = C[0] * r + C[1];
64	r2 = r * r;
65	y = C[2] * r + 1;
66	y = z * r2 + y;
67	y = y * s;
68	return eval_as_float(y);
69	}

lib/libc/wasi/libc-top-half/musl/src/math/exp2f_data.c deleted-35

...	@@ -1,35 +0,0 @@
1	/*
2	* Shared data between expf, exp2f and powf.
3	*
4	* Copyright (c) 2017-2018, Arm Limited.
5	* SPDX-License-Identifier: MIT
6	*/
7
8	#include "exp2f_data.h"
9
10	#define N (1 << EXP2F_TABLE_BITS)
11
12	const struct exp2f_data __exp2f_data = {
13	/* tab[i] = uint(2^(i/N)) - (i << 52-BITS)
14	used for computing 2^(k/N) for an int \|k\| < 150 N as
15	double(tab[k%N] + (k << 52-BITS)) */
16	.tab = {
17	0x3ff0000000000000, 0x3fefd9b0d3158574, 0x3fefb5586cf9890f, 0x3fef9301d0125b51,
18	0x3fef72b83c7d517b, 0x3fef54873168b9aa, 0x3fef387a6e756238, 0x3fef1e9df51fdee1,
19	0x3fef06fe0a31b715, 0x3feef1a7373aa9cb, 0x3feedea64c123422, 0x3feece086061892d,
20	0x3feebfdad5362a27, 0x3feeb42b569d4f82, 0x3feeab07dd485429, 0x3feea47eb03a5585,
21	0x3feea09e667f3bcd, 0x3fee9f75e8ec5f74, 0x3feea11473eb0187, 0x3feea589994cce13,
22	0x3feeace5422aa0db, 0x3feeb737b0cdc5e5, 0x3feec49182a3f090, 0x3feed503b23e255d,
23	0x3feee89f995ad3ad, 0x3feeff76f2fb5e47, 0x3fef199bdd85529c, 0x3fef3720dcef9069,
24	0x3fef5818dcfba487, 0x3fef7c97337b9b5f, 0x3fefa4afa2a490da, 0x3fefd0765b6e4540,
25	},
26	.shift_scaled = 0x1.8p+52 / N,
27	.poly = {
28	0x1.c6af84b912394p-5, 0x1.ebfce50fac4f3p-3, 0x1.62e42ff0c52d6p-1,
29	},
30	.shift = 0x1.8p+52,
31	.invln2_scaled = 0x1.71547652b82fep+0 * N,
32	.poly_scaled = {
33	0x1.c6af84b912394p-5/N/N/N, 0x1.ebfce50fac4f3p-3/N/N, 0x1.62e42ff0c52d6p-1/N,
34	},
35	};

lib/libc/wasi/libc-top-half/musl/src/math/exp2f_data.h deleted-23

...	@@ -1,23 +0,0 @@
1	/*
2	* Copyright (c) 2017-2018, Arm Limited.
3	* SPDX-License-Identifier: MIT
4	*/
5	#ifndef _EXP2F_DATA_H
6	#define _EXP2F_DATA_H
7
8	#include <features.h>
9	#include <stdint.h>
10
11	/* Shared between expf, exp2f and powf. */
12	#define EXP2F_TABLE_BITS 5
13	#define EXP2F_POLY_ORDER 3
14	extern hidden const struct exp2f_data {
15	uint64_t tab[1 << EXP2F_TABLE_BITS];
16	double shift_scaled;
17	double poly[EXP2F_POLY_ORDER];
18	double shift;
19	double invln2_scaled;
20	double poly_scaled[EXP2F_POLY_ORDER];
21	} __exp2f_data;
22
23	#endif

lib/libc/wasi/libc-top-half/musl/src/math/exp2l.c deleted-619

...	@@ -1,619 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/ld80/s_exp2l.c and /usr/src/lib/msun/ld128/s_exp2l.c */
2	/*-
3	* Copyright (c) 2005-2008 David Schultz <das@FreeBSD.ORG>
4	* All rights reserved.
5	*
6	* Redistribution and use in source and binary forms, with or without
7	* modification, are permitted provided that the following conditions
8	* are met:
9	* 1. Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.
11	* 2. Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.
14	*
15	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25	* SUCH DAMAGE.
26	*/
27
28	#include "libm.h"
29
30	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
31	long double exp2l(long double x)
32	{
33	return exp2(x);
34	}
35	#elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
36	#define TBLBITS 7
37	#define TBLSIZE (1 << TBLBITS)
38
39	static const double
40	redux = 0x1.8p63 / TBLSIZE,
41	P1 = 0x1.62e42fefa39efp-1,
42	P2 = 0x1.ebfbdff82c58fp-3,
43	P3 = 0x1.c6b08d7049fap-5,
44	P4 = 0x1.3b2ab6fba4da5p-7,
45	P5 = 0x1.5d8804780a736p-10,
46	P6 = 0x1.430918835e33dp-13;
47
48	static const double tbl[TBLSIZE * 2] = {
49	0x1.6a09e667f3bcdp-1, -0x1.bdd3413b2648p-55,
50	0x1.6c012750bdabfp-1, -0x1.2895667ff0cp-57,
51	0x1.6dfb23c651a2fp-1, -0x1.bbe3a683c88p-58,
52	0x1.6ff7df9519484p-1, -0x1.83c0f25860fp-56,
53	0x1.71f75e8ec5f74p-1, -0x1.16e4786887bp-56,
54	0x1.73f9a48a58174p-1, -0x1.0a8d96c65d5p-55,
55	0x1.75feb564267c9p-1, -0x1.0245957316ep-55,
56	0x1.780694fde5d3fp-1, 0x1.866b80a0216p-55,
57	0x1.7a11473eb0187p-1, -0x1.41577ee0499p-56,
58	0x1.7c1ed0130c132p-1, 0x1.f124cd1164ep-55,
59	0x1.7e2f336cf4e62p-1, 0x1.05d02ba157ap-57,
60	0x1.80427543e1a12p-1, -0x1.27c86626d97p-55,
61	0x1.82589994cce13p-1, -0x1.d4c1dd41533p-55,
62	0x1.8471a4623c7adp-1, -0x1.8d684a341cep-56,
63	0x1.868d99b4492edp-1, -0x1.fc6f89bd4f68p-55,
64	0x1.88ac7d98a6699p-1, 0x1.994c2f37cb5p-55,
65	0x1.8ace5422aa0dbp-1, 0x1.6e9f156864bp-55,
66	0x1.8cf3216b5448cp-1, -0x1.0d55e32e9e4p-57,
67	0x1.8f1ae99157736p-1, 0x1.5cc13a2e397p-56,
68	0x1.9145b0b91ffc6p-1, -0x1.dd6792e5825p-55,
69	0x1.93737b0cdc5e5p-1, -0x1.75fc781b58p-58,
70	0x1.95a44cbc8520fp-1, -0x1.64b7c96a5fp-57,
71	0x1.97d829fde4e5p-1, -0x1.d185b7c1b86p-55,
72	0x1.9a0f170ca07bap-1, -0x1.173bd91cee6p-55,
73	0x1.9c49182a3f09p-1, 0x1.c7c46b071f2p-57,
74	0x1.9e86319e32323p-1, 0x1.824ca78e64cp-57,
75	0x1.a0c667b5de565p-1, -0x1.359495d1cd5p-55,
76	0x1.a309bec4a2d33p-1, 0x1.6305c7ddc368p-55,
77	0x1.a5503b23e255dp-1, -0x1.d2f6edb8d42p-55,
78	0x1.a799e1330b358p-1, 0x1.bcb7ecac564p-55,
79	0x1.a9e6b5579fdbfp-1, 0x1.0fac90ef7fdp-55,
80	0x1.ac36bbfd3f37ap-1, -0x1.f9234cae76dp-56,
81	0x1.ae89f995ad3adp-1, 0x1.7a1cd345dcc8p-55,
82	0x1.b0e07298db666p-1, -0x1.bdef54c80e4p-55,
83	0x1.b33a2b84f15fbp-1, -0x1.2805e3084d8p-58,
84	0x1.b59728de5593ap-1, -0x1.c71dfbbba6ep-55,
85	0x1.b7f76f2fb5e47p-1, -0x1.5584f7e54acp-57,
86	0x1.ba5b030a1064ap-1, -0x1.efcd30e5429p-55,
87	0x1.bcc1e904bc1d2p-1, 0x1.23dd07a2d9fp-56,
88	0x1.bf2c25bd71e09p-1, -0x1.efdca3f6b9c8p-55,
89	0x1.c199bdd85529cp-1, 0x1.11065895049p-56,
90	0x1.c40ab5fffd07ap-1, 0x1.b4537e083c6p-55,
91	0x1.c67f12e57d14bp-1, 0x1.2884dff483c8p-55,
92	0x1.c8f6d9406e7b5p-1, 0x1.1acbc48805cp-57,
93	0x1.cb720dcef9069p-1, 0x1.503cbd1e94ap-57,
94	0x1.cdf0b555dc3fap-1, -0x1.dd83b53829dp-56,
95	0x1.d072d4a07897cp-1, -0x1.cbc3743797a8p-55,
96	0x1.d2f87080d89f2p-1, -0x1.d487b719d858p-55,
97	0x1.d5818dcfba487p-1, 0x1.2ed02d75b37p-56,
98	0x1.d80e316c98398p-1, -0x1.11ec18bedep-55,
99	0x1.da9e603db3285p-1, 0x1.c2300696db5p-55,
100	0x1.dd321f301b46p-1, 0x1.2da5778f019p-55,
101	0x1.dfc97337b9b5fp-1, -0x1.1a5cd4f184b8p-55,
102	0x1.e264614f5a129p-1, -0x1.7b627817a148p-55,
103	0x1.e502ee78b3ff6p-1, 0x1.39e8980a9cdp-56,
104	0x1.e7a51fbc74c83p-1, 0x1.2d522ca0c8ep-55,
105	0x1.ea4afa2a490dap-1, -0x1.e9c23179c288p-55,
106	0x1.ecf482d8e67f1p-1, -0x1.c93f3b411ad8p-55,
107	0x1.efa1bee615a27p-1, 0x1.dc7f486a4b68p-55,
108	0x1.f252b376bba97p-1, 0x1.3a1a5bf0d8e8p-55,
109	0x1.f50765b6e454p-1, 0x1.9d3e12dd8a18p-55,
110	0x1.f7bfdad9cbe14p-1, -0x1.dbb12d00635p-55,
111	0x1.fa7c1819e90d8p-1, 0x1.74853f3a593p-56,
112	0x1.fd3c22b8f71f1p-1, 0x1.2eb74966578p-58,
113	0x1p+0, 0x0p+0,
114	0x1.0163da9fb3335p+0, 0x1.b61299ab8cd8p-54,
115	0x1.02c9a3e778061p+0, -0x1.19083535b08p-56,
116	0x1.04315e86e7f85p+0, -0x1.0a31c1977c98p-54,
117	0x1.059b0d3158574p+0, 0x1.d73e2a475b4p-55,
118	0x1.0706b29ddf6dep+0, -0x1.c91dfe2b13cp-55,
119	0x1.0874518759bc8p+0, 0x1.186be4bb284p-57,
120	0x1.09e3ecac6f383p+0, 0x1.14878183161p-54,
121	0x1.0b5586cf9890fp+0, 0x1.8a62e4adc61p-54,
122	0x1.0cc922b7247f7p+0, 0x1.01edc16e24f8p-54,
123	0x1.0e3ec32d3d1a2p+0, 0x1.03a1727c58p-59,
124	0x1.0fb66affed31bp+0, -0x1.b9bedc44ebcp-57,
125	0x1.11301d0125b51p+0, -0x1.6c51039449bp-54,
126	0x1.12abdc06c31ccp+0, -0x1.1b514b36ca8p-58,
127	0x1.1429aaea92dep+0, -0x1.32fbf9af1368p-54,
128	0x1.15a98c8a58e51p+0, 0x1.2406ab9eeabp-55,
129	0x1.172b83c7d517bp+0, -0x1.19041b9d78ap-55,
130	0x1.18af9388c8deap+0, -0x1.11023d1970f8p-54,
131	0x1.1a35beb6fcb75p+0, 0x1.e5b4c7b4969p-55,
132	0x1.1bbe084045cd4p+0, -0x1.95386352ef6p-54,
133	0x1.1d4873168b9aap+0, 0x1.e016e00a264p-54,
134	0x1.1ed5022fcd91dp+0, -0x1.1df98027bb78p-54,
135	0x1.2063b88628cd6p+0, 0x1.dc775814a85p-55,
136	0x1.21f49917ddc96p+0, 0x1.2a97e9494a6p-55,
137	0x1.2387a6e756238p+0, 0x1.9b07eb6c7058p-54,
138	0x1.251ce4fb2a63fp+0, 0x1.ac155bef4f5p-55,
139	0x1.26b4565e27cddp+0, 0x1.2bd339940eap-55,
140	0x1.284dfe1f56381p+0, -0x1.a4c3a8c3f0d8p-54,
141	0x1.29e9df51fdee1p+0, 0x1.612e8afad12p-55,
142	0x1.2b87fd0dad99p+0, -0x1.10adcd6382p-59,
143	0x1.2d285a6e4030bp+0, 0x1.0024754db42p-54,
144	0x1.2ecafa93e2f56p+0, 0x1.1ca0f45d524p-56,
145	0x1.306fe0a31b715p+0, 0x1.6f46ad23183p-55,
146	0x1.32170fc4cd831p+0, 0x1.a9ce78e1804p-55,
147	0x1.33c08b26416ffp+0, 0x1.327218436598p-54,
148	0x1.356c55f929ff1p+0, -0x1.b5cee5c4e46p-55,
149	0x1.371a7373aa9cbp+0, -0x1.63aeabf42ebp-54,
150	0x1.38cae6d05d866p+0, -0x1.e958d3c99048p-54,
151	0x1.3a7db34e59ff7p+0, -0x1.5e436d661f6p-56,
152	0x1.3c32dc313a8e5p+0, -0x1.efff8375d2ap-54,
153	0x1.3dea64c123422p+0, 0x1.ada0911f09fp-55,
154	0x1.3fa4504ac801cp+0, -0x1.7d023f956fap-54,
155	0x1.4160a21f72e2ap+0, -0x1.ef3691c309p-58,
156	0x1.431f5d950a897p+0, -0x1.1c7dde35f7ap-55,
157	0x1.44e086061892dp+0, 0x1.89b7a04ef8p-59,
158	0x1.46a41ed1d0057p+0, 0x1.c944bd1648a8p-54,
159	0x1.486a2b5c13cdp+0, 0x1.3c1a3b69062p-56,
160	0x1.4a32af0d7d3dep+0, 0x1.9cb62f3d1be8p-54,
161	0x1.4bfdad5362a27p+0, 0x1.d4397afec42p-56,
162	0x1.4dcb299fddd0dp+0, 0x1.8ecdbbc6a78p-54,
163	0x1.4f9b2769d2ca7p+0, -0x1.4b309d25958p-54,
164	0x1.516daa2cf6642p+0, -0x1.f768569bd94p-55,
165	0x1.5342b569d4f82p+0, -0x1.07abe1db13dp-55,
166	0x1.551a4ca5d920fp+0, -0x1.d689cefede6p-55,
167	0x1.56f4736b527dap+0, 0x1.9bb2c011d938p-54,
168	0x1.58d12d497c7fdp+0, 0x1.295e15b9a1ep-55,
169	0x1.5ab07dd485429p+0, 0x1.6324c0546478p-54,
170	0x1.5c9268a5946b7p+0, 0x1.c4b1b81698p-60,
171	0x1.5e76f15ad2148p+0, 0x1.ba6f93080e68p-54,
172	0x1.605e1b976dc09p+0, -0x1.3e2429b56de8p-54,
173	0x1.6247eb03a5585p+0, -0x1.383c17e40b48p-54,
174	0x1.6434634ccc32p+0, -0x1.c483c759d89p-55,
175	0x1.6623882552225p+0, -0x1.bb60987591cp-54,
176	0x1.68155d44ca973p+0, 0x1.038ae44f74p-57,
177	};
178
179	/*
180	* exp2l(x): compute the base 2 exponential of x
181	*
182	* Accuracy: Peak error < 0.511 ulp.
183	*
184	* Method: (equally-spaced tables)
185	*
186	* Reduce x:
187	* x = 2**k + y, for integer k and \|y\| <= 1/2.
188	* Thus we have exp2l(x) = 2*k exp2(y).
189	*
190	* Reduce y:
191	* y = i/TBLSIZE + z for integer i near y * TBLSIZE.
192	* Thus we have exp2(y) = exp2(i/TBLSIZE) * exp2(z),
193	* with \|z\| <= 2**-(TBLBITS+1).
194	*
195	* We compute exp2(i/TBLSIZE) via table lookup and exp2(z) via a
196	* degree-6 minimax polynomial with maximum error under 2**-69.
197	* The table entries each have 104 bits of accuracy, encoded as
198	* a pair of double precision values.
199	*/
200	long double exp2l(long double x)
201	{
202	union ldshape u = {x};
203	int e = u.i.se & 0x7fff;
204	long double r, z;
205	uint32_t i0;
206	union {uint32_t u; int32_t i;} k;
207
208	/* Filter out exceptional cases. */
209	if (e >= 0x3fff + 13) { /* \|x\| >= 8192 or x is NaN */
210	if (u.i.se >= 0x3fff + 14 && u.i.se >> 15 == 0)
211	/* overflow */
212	return x * 0x1p16383L;
213	if (e == 0x7fff) /* -inf or -nan */
214	return -1/x;
215	if (x < -16382) {
216	if (x <= -16446 \|\| x - 0x1p63 + 0x1p63 != x)
217	/* underflow */
218	FORCE_EVAL((float)(-0x1p-149/x));
219	if (x <= -16446)
220	return 0;
221	}
222	} else if (e < 0x3fff - 64) {
223	return 1 + x;
224	}
225
226	/*
227	* Reduce x, computing z, i0, and k. The low bits of x + redux
228	* contain the 16-bit integer part of the exponent (k) followed by
229	* TBLBITS fractional bits (i0). We use bit tricks to extract these
230	* as integers, then set z to the remainder.
231	*
232	* Example: Suppose x is 0xabc.123456p0 and TBLBITS is 8.
233	* Then the low-order word of x + redux is 0x000abc12,
234	* We split this into k = 0xabc and i0 = 0x12 (adjusted to
235	* index into the table), then we compute z = 0x0.003456p0.
236	*/
237	u.f = x + redux;
238	i0 = u.i.m + TBLSIZE / 2;
239	k.u = i0 / TBLSIZE * TBLSIZE;
240	k.i /= TBLSIZE;
241	i0 %= TBLSIZE;
242	u.f -= redux;
243	z = x - u.f;
244
245	/* Compute r = exp2l(y) = exp2lt[i0] * p(z). */
246	long double t_hi = tbl[2*i0];
247	long double t_lo = tbl[2*i0 + 1];
248	/* XXX This gives > 1 ulp errors outside of FE_TONEAREST mode */
249	r = t_lo + (t_hi + t_lo) * z * (P1 + z * (P2 + z * (P3 + z * (P4
250	+ z * (P5 + z * P6))))) + t_hi;
251
252	return scalbnl(r, k.i);
253	}
254	#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
255	#define TBLBITS 7
256	#define TBLSIZE (1 << TBLBITS)
257
258	static const long double
259	P1 = 0x1.62e42fefa39ef35793c7673007e6p-1L,
260	P2 = 0x1.ebfbdff82c58ea86f16b06ec9736p-3L,
261	P3 = 0x1.c6b08d704a0bf8b33a762bad3459p-5L,
262	P4 = 0x1.3b2ab6fba4e7729ccbbe0b4f3fc2p-7L,
263	P5 = 0x1.5d87fe78a67311071dee13fd11d9p-10L,
264	P6 = 0x1.430912f86c7876f4b663b23c5fe5p-13L;
265
266	static const double
267	P7 = 0x1.ffcbfc588b041p-17,
268	P8 = 0x1.62c0223a5c7c7p-20,
269	P9 = 0x1.b52541ff59713p-24,
270	P10 = 0x1.e4cf56a391e22p-28,
271	redux = 0x1.8p112 / TBLSIZE;
272
273	static const long double tbl[TBLSIZE] = {
274	0x1.6a09e667f3bcc908b2fb1366dfeap-1L,
275	0x1.6c012750bdabeed76a99800f4edep-1L,
276	0x1.6dfb23c651a2ef220e2cbe1bc0d4p-1L,
277	0x1.6ff7df9519483cf87e1b4f3e1e98p-1L,
278	0x1.71f75e8ec5f73dd2370f2ef0b148p-1L,
279	0x1.73f9a48a58173bd5c9a4e68ab074p-1L,
280	0x1.75feb564267c8bf6e9aa33a489a8p-1L,
281	0x1.780694fde5d3f619ae02808592a4p-1L,
282	0x1.7a11473eb0186d7d51023f6ccb1ap-1L,
283	0x1.7c1ed0130c1327c49334459378dep-1L,
284	0x1.7e2f336cf4e62105d02ba1579756p-1L,
285	0x1.80427543e1a11b60de67649a3842p-1L,
286	0x1.82589994cce128acf88afab34928p-1L,
287	0x1.8471a4623c7acce52f6b97c6444cp-1L,
288	0x1.868d99b4492ec80e41d90ac2556ap-1L,
289	0x1.88ac7d98a669966530bcdf2d4cc0p-1L,
290	0x1.8ace5422aa0db5ba7c55a192c648p-1L,
291	0x1.8cf3216b5448bef2aa1cd161c57ap-1L,
292	0x1.8f1ae991577362b982745c72eddap-1L,
293	0x1.9145b0b91ffc588a61b469f6b6a0p-1L,
294	0x1.93737b0cdc5e4f4501c3f2540ae8p-1L,
295	0x1.95a44cbc8520ee9b483695a0e7fep-1L,
296	0x1.97d829fde4e4f8b9e920f91e8eb6p-1L,
297	0x1.9a0f170ca07b9ba3109b8c467844p-1L,
298	0x1.9c49182a3f0901c7c46b071f28dep-1L,
299	0x1.9e86319e323231824ca78e64c462p-1L,
300	0x1.a0c667b5de564b29ada8b8cabbacp-1L,
301	0x1.a309bec4a2d3358c171f770db1f4p-1L,
302	0x1.a5503b23e255c8b424491caf88ccp-1L,
303	0x1.a799e1330b3586f2dfb2b158f31ep-1L,
304	0x1.a9e6b5579fdbf43eb243bdff53a2p-1L,
305	0x1.ac36bbfd3f379c0db966a3126988p-1L,
306	0x1.ae89f995ad3ad5e8734d17731c80p-1L,
307	0x1.b0e07298db66590842acdfc6fb4ep-1L,
308	0x1.b33a2b84f15faf6bfd0e7bd941b0p-1L,
309	0x1.b59728de559398e3881111648738p-1L,
310	0x1.b7f76f2fb5e46eaa7b081ab53ff6p-1L,
311	0x1.ba5b030a10649840cb3c6af5b74cp-1L,
312	0x1.bcc1e904bc1d2247ba0f45b3d06cp-1L,
313	0x1.bf2c25bd71e088408d7025190cd0p-1L,
314	0x1.c199bdd85529c2220cb12a0916bap-1L,
315	0x1.c40ab5fffd07a6d14df820f17deap-1L,
316	0x1.c67f12e57d14b4a2137fd20f2a26p-1L,
317	0x1.c8f6d9406e7b511acbc48805c3f6p-1L,
318	0x1.cb720dcef90691503cbd1e949d0ap-1L,
319	0x1.cdf0b555dc3f9c44f8958fac4f12p-1L,
320	0x1.d072d4a07897b8d0f22f21a13792p-1L,
321	0x1.d2f87080d89f18ade123989ea50ep-1L,
322	0x1.d5818dcfba48725da05aeb66dff8p-1L,
323	0x1.d80e316c98397bb84f9d048807a0p-1L,
324	0x1.da9e603db3285708c01a5b6d480cp-1L,
325	0x1.dd321f301b4604b695de3c0630c0p-1L,
326	0x1.dfc97337b9b5eb968cac39ed284cp-1L,
327	0x1.e264614f5a128a12761fa17adc74p-1L,
328	0x1.e502ee78b3ff6273d130153992d0p-1L,
329	0x1.e7a51fbc74c834b548b2832378a4p-1L,
330	0x1.ea4afa2a490d9858f73a18f5dab4p-1L,
331	0x1.ecf482d8e67f08db0312fb949d50p-1L,
332	0x1.efa1bee615a27771fd21a92dabb6p-1L,
333	0x1.f252b376bba974e8696fc3638f24p-1L,
334	0x1.f50765b6e4540674f84b762861a6p-1L,
335	0x1.f7bfdad9cbe138913b4bfe72bd78p-1L,
336	0x1.fa7c1819e90d82e90a7e74b26360p-1L,
337	0x1.fd3c22b8f71f10975ba4b32bd006p-1L,
338	0x1.0000000000000000000000000000p+0L,
339	0x1.0163da9fb33356d84a66ae336e98p+0L,
340	0x1.02c9a3e778060ee6f7caca4f7a18p+0L,
341	0x1.04315e86e7f84bd738f9a20da442p+0L,
342	0x1.059b0d31585743ae7c548eb68c6ap+0L,
343	0x1.0706b29ddf6ddc6dc403a9d87b1ep+0L,
344	0x1.0874518759bc808c35f25d942856p+0L,
345	0x1.09e3ecac6f3834521e060c584d5cp+0L,
346	0x1.0b5586cf9890f6298b92b7184200p+0L,
347	0x1.0cc922b7247f7407b705b893dbdep+0L,
348	0x1.0e3ec32d3d1a2020742e4f8af794p+0L,
349	0x1.0fb66affed31af232091dd8a169ep+0L,
350	0x1.11301d0125b50a4ebbf1aed9321cp+0L,
351	0x1.12abdc06c31cbfb92bad324d6f84p+0L,
352	0x1.1429aaea92ddfb34101943b2588ep+0L,
353	0x1.15a98c8a58e512480d573dd562aep+0L,
354	0x1.172b83c7d517adcdf7c8c50eb162p+0L,
355	0x1.18af9388c8de9bbbf70b9a3c269cp+0L,
356	0x1.1a35beb6fcb753cb698f692d2038p+0L,
357	0x1.1bbe084045cd39ab1e72b442810ep+0L,
358	0x1.1d4873168b9aa7805b8028990be8p+0L,
359	0x1.1ed5022fcd91cb8819ff61121fbep+0L,
360	0x1.2063b88628cd63b8eeb0295093f6p+0L,
361	0x1.21f49917ddc962552fd29294bc20p+0L,
362	0x1.2387a6e75623866c1fadb1c159c0p+0L,
363	0x1.251ce4fb2a63f3582ab7de9e9562p+0L,
364	0x1.26b4565e27cdd257a673281d3068p+0L,
365	0x1.284dfe1f5638096cf15cf03c9fa0p+0L,
366	0x1.29e9df51fdee12c25d15f5a25022p+0L,
367	0x1.2b87fd0dad98ffddea46538fca24p+0L,
368	0x1.2d285a6e4030b40091d536d0733ep+0L,
369	0x1.2ecafa93e2f5611ca0f45d5239a4p+0L,
370	0x1.306fe0a31b7152de8d5a463063bep+0L,
371	0x1.32170fc4cd8313539cf1c3009330p+0L,
372	0x1.33c08b26416ff4c9c8610d96680ep+0L,
373	0x1.356c55f929ff0c94623476373be4p+0L,
374	0x1.371a7373aa9caa7145502f45452ap+0L,
375	0x1.38cae6d05d86585a9cb0d9bed530p+0L,
376	0x1.3a7db34e59ff6ea1bc9299e0a1fep+0L,
377	0x1.3c32dc313a8e484001f228b58cf0p+0L,
378	0x1.3dea64c12342235b41223e13d7eep+0L,
379	0x1.3fa4504ac801ba0bf701aa417b9cp+0L,
380	0x1.4160a21f72e29f84325b8f3dbacap+0L,
381	0x1.431f5d950a896dc704439410b628p+0L,
382	0x1.44e086061892d03136f409df0724p+0L,
383	0x1.46a41ed1d005772512f459229f0ap+0L,
384	0x1.486a2b5c13cd013c1a3b69062f26p+0L,
385	0x1.4a32af0d7d3de672d8bcf46f99b4p+0L,
386	0x1.4bfdad5362a271d4397afec42e36p+0L,
387	0x1.4dcb299fddd0d63b36ef1a9e19dep+0L,
388	0x1.4f9b2769d2ca6ad33d8b69aa0b8cp+0L,
389	0x1.516daa2cf6641c112f52c84d6066p+0L,
390	0x1.5342b569d4f81df0a83c49d86bf4p+0L,
391	0x1.551a4ca5d920ec52ec620243540cp+0L,
392	0x1.56f4736b527da66ecb004764e61ep+0L,
393	0x1.58d12d497c7fd252bc2b7343d554p+0L,
394	0x1.5ab07dd48542958c93015191e9a8p+0L,
395	0x1.5c9268a5946b701c4b1b81697ed4p+0L,
396	0x1.5e76f15ad21486e9be4c20399d12p+0L,
397	0x1.605e1b976dc08b076f592a487066p+0L,
398	0x1.6247eb03a5584b1f0fa06fd2d9eap+0L,
399	0x1.6434634ccc31fc76f8714c4ee122p+0L,
400	0x1.66238825522249127d9e29b92ea2p+0L,
401	0x1.68155d44ca973081c57227b9f69ep+0L,
402	};
403
404	static const float eps[TBLSIZE] = {
405	-0x1.5c50p-101,
406	-0x1.5d00p-106,
407	0x1.8e90p-102,
408	-0x1.5340p-103,
409	0x1.1bd0p-102,
410	-0x1.4600p-105,
411	-0x1.7a40p-104,
412	0x1.d590p-102,
413	-0x1.d590p-101,
414	0x1.b100p-103,
415	-0x1.0d80p-105,
416	0x1.6b00p-103,
417	-0x1.9f00p-105,
418	0x1.c400p-103,
419	0x1.e120p-103,
420	-0x1.c100p-104,
421	-0x1.9d20p-103,
422	0x1.a800p-108,
423	0x1.4c00p-106,
424	-0x1.9500p-106,
425	0x1.6900p-105,
426	-0x1.29d0p-100,
427	0x1.4c60p-103,
428	0x1.13a0p-102,
429	-0x1.5b60p-103,
430	-0x1.1c40p-103,
431	0x1.db80p-102,
432	0x1.91a0p-102,
433	0x1.dc00p-105,
434	0x1.44c0p-104,
435	0x1.9710p-102,
436	0x1.8760p-103,
437	-0x1.a720p-103,
438	0x1.ed20p-103,
439	-0x1.49c0p-102,
440	-0x1.e000p-111,
441	0x1.86a0p-103,
442	0x1.2b40p-103,
443	-0x1.b400p-108,
444	0x1.1280p-99,
445	-0x1.02d8p-102,
446	-0x1.e3d0p-103,
447	-0x1.b080p-105,
448	-0x1.f100p-107,
449	-0x1.16c0p-105,
450	-0x1.1190p-103,
451	-0x1.a7d2p-100,
452	0x1.3450p-103,
453	-0x1.67c0p-105,
454	0x1.4b80p-104,
455	-0x1.c4e0p-103,
456	0x1.6000p-108,
457	-0x1.3f60p-105,
458	0x1.93f0p-104,
459	0x1.5fe0p-105,
460	0x1.6f80p-107,
461	-0x1.7600p-106,
462	0x1.21e0p-106,
463	-0x1.3a40p-106,
464	-0x1.40c0p-104,
465	-0x1.9860p-105,
466	-0x1.5d40p-108,
467	-0x1.1d70p-106,
468	0x1.2760p-105,
469	0x0.0000p+0,
470	0x1.21e2p-104,
471	-0x1.9520p-108,
472	-0x1.5720p-106,
473	-0x1.4810p-106,
474	-0x1.be00p-109,
475	0x1.0080p-105,
476	-0x1.5780p-108,
477	-0x1.d460p-105,
478	-0x1.6140p-105,
479	0x1.4630p-104,
480	0x1.ad50p-103,
481	0x1.82e0p-105,
482	0x1.1d3cp-101,
483	0x1.6100p-107,
484	0x1.ec30p-104,
485	0x1.f200p-108,
486	0x1.0b40p-103,
487	0x1.3660p-102,
488	0x1.d9d0p-103,
489	-0x1.02d0p-102,
490	0x1.b070p-103,
491	0x1.b9c0p-104,
492	-0x1.01c0p-103,
493	-0x1.dfe0p-103,
494	0x1.1b60p-104,
495	-0x1.ae94p-101,
496	-0x1.3340p-104,
497	0x1.b3d8p-102,
498	-0x1.6e40p-105,
499	-0x1.3670p-103,
500	0x1.c140p-104,
501	0x1.1840p-101,
502	0x1.1ab0p-102,
503	-0x1.a400p-104,
504	0x1.1f00p-104,
505	-0x1.7180p-103,
506	0x1.4ce0p-102,
507	0x1.9200p-107,
508	-0x1.54c0p-103,
509	0x1.1b80p-105,
510	-0x1.1828p-101,
511	0x1.5720p-102,
512	-0x1.a060p-100,
513	0x1.9160p-102,
514	0x1.a280p-104,
515	0x1.3400p-107,
516	0x1.2b20p-102,
517	0x1.7800p-108,
518	0x1.cfd0p-101,
519	0x1.2ef0p-102,
520	-0x1.2760p-99,
521	0x1.b380p-104,
522	0x1.0048p-101,
523	-0x1.60b0p-102,
524	0x1.a1ccp-100,
525	-0x1.a640p-104,
526	-0x1.08a0p-101,
527	0x1.7e60p-102,
528	0x1.22c0p-103,
529	-0x1.7200p-106,
530	0x1.f0f0p-102,
531	0x1.eb4ep-99,
532	0x1.c6e0p-103,
533	};
534
535	/*
536	* exp2l(x): compute the base 2 exponential of x
537	*
538	* Accuracy: Peak error < 0.502 ulp.
539	*
540	* Method: (accurate tables)
541	*
542	* Reduce x:
543	* x = 2**k + y, for integer k and \|y\| <= 1/2.
544	* Thus we have exp2(x) = 2*k exp2(y).
545	*
546	* Reduce y:
547	* y = i/TBLSIZE + z - eps[i] for integer i near y * TBLSIZE.
548	* Thus we have exp2(y) = exp2(i/TBLSIZE) * exp2(z - eps[i]),
549	* with \|z - eps[i]\| <= 2-8 + 2-98 for the table used.
550	*
551	* We compute exp2(i/TBLSIZE) via table lookup and exp2(z - eps[i]) via
552	* a degree-10 minimax polynomial with maximum error under 2**-120.
553	* The values in exp2t[] and eps[] are chosen such that
554	* exp2t[i] = exp2(i/TBLSIZE + eps[i]), and eps[i] is a small offset such
555	* that exp2t[i] is accurate to 2**-122.
556	*
557	* Note that the range of i is +-TBLSIZE/2, so we actually index the tables
558	* by i0 = i + TBLSIZE/2.
559	*
560	* This method is due to Gal, with many details due to Gal and Bachelis:
561	*
562	* Gal, S. and Bachelis, B. An Accurate Elementary Mathematical Library
563	* for the IEEE Floating Point Standard. TOMS 17(1), 26-46 (1991).
564	*/
565	long double
566	exp2l(long double x)
567	{
568	union ldshape u = {x};
569	int e = u.i.se & 0x7fff;
570	long double r, z, t;
571	uint32_t i0;
572	union {uint32_t u; int32_t i;} k;
573
574	/* Filter out exceptional cases. */
575	if (e >= 0x3fff + 14) { /* \|x\| >= 16384 or x is NaN */
576	if (u.i.se >= 0x3fff + 15 && u.i.se >> 15 == 0)
577	/* overflow */
578	return x * 0x1p16383L;
579	if (e == 0x7fff) /* -inf or -nan */
580	return -1/x;
581	if (x < -16382) {
582	if (x <= -16495 \|\| x - 0x1p112 + 0x1p112 != x)
583	/* underflow */
584	FORCE_EVAL((float)(-0x1p-149/x));
585	if (x <= -16446)
586	return 0;
587	}
588	} else if (e < 0x3fff - 114) {
589	return 1 + x;
590	}
591
592	/*
593	* Reduce x, computing z, i0, and k. The low bits of x + redux
594	* contain the 16-bit integer part of the exponent (k) followed by
595	* TBLBITS fractional bits (i0). We use bit tricks to extract these
596	* as integers, then set z to the remainder.
597	*
598	* Example: Suppose x is 0xabc.123456p0 and TBLBITS is 8.
599	* Then the low-order word of x + redux is 0x000abc12,
600	* We split this into k = 0xabc and i0 = 0x12 (adjusted to
601	* index into the table), then we compute z = 0x0.003456p0.
602	*/
603	u.f = x + redux;
604	i0 = u.i2.lo + TBLSIZE / 2;
605	k.u = i0 / TBLSIZE * TBLSIZE;
606	k.i /= TBLSIZE;
607	i0 %= TBLSIZE;
608	u.f -= redux;
609	z = x - u.f;
610
611	/* Compute r = exp2(y) = exp2t[i0] * p(z - eps[i]). */
612	t = tbl[i0];
613	z -= eps[i0];
614	r = t + t * z * (P1 + z * (P2 + z * (P3 + z * (P4 + z * (P5 + z * (P6
615	+ z * (P7 + z * (P8 + z * (P9 + z * P10)))))))));
616
617	return scalbnl(r, k.i);
618	}
619	#endif

lib/libc/wasi/libc-top-half/musl/src/math/exp_data.c deleted-182

...	@@ -1,182 +0,0 @@
1	/*
2	* Shared data between exp, exp2 and pow.
3	*
4	* Copyright (c) 2018, Arm Limited.
5	* SPDX-License-Identifier: MIT
6	*/
7
8	#include "exp_data.h"
9
10	#define N (1 << EXP_TABLE_BITS)
11
12	const struct exp_data __exp_data = {
13	// N/ln2
14	.invln2N = 0x1.71547652b82fep0 * N,
15	// -ln2/N
16	.negln2hiN = -0x1.62e42fefa0000p-8,
17	.negln2loN = -0x1.cf79abc9e3b3ap-47,
18	// Used for rounding when !TOINT_INTRINSICS
19	#if EXP_USE_TOINT_NARROW
20	.shift = 0x1800000000.8p0,
21	#else
22	.shift = 0x1.8p52,
23	#endif
24	// exp polynomial coefficients.
25	.poly = {
26	// abs error: 1.555*2^-66
27	// ulp error: 0.509 (0.511 without fma)
28	// if \|x\| < ln2/256+eps
29	// abs error if \|x\| < ln2/256+0x1p-15: 1.09*2^-65
30	// abs error if \|x\| < ln2/128: 1.7145*2^-56
31	0x1.ffffffffffdbdp-2,
32	0x1.555555555543cp-3,
33	0x1.55555cf172b91p-5,
34	0x1.1111167a4d017p-7,
35	},
36	.exp2_shift = 0x1.8p52 / N,
37	// exp2 polynomial coefficients.
38	.exp2_poly = {
39	// abs error: 1.2195*2^-65
40	// ulp error: 0.507 (0.511 without fma)
41	// if \|x\| < 1/256
42	// abs error if \|x\| < 1/128: 1.9941*2^-56
43	0x1.62e42fefa39efp-1,
44	0x1.ebfbdff82c424p-3,
45	0x1.c6b08d70cf4b5p-5,
46	0x1.3b2abd24650ccp-7,
47	0x1.5d7e09b4e3a84p-10,
48	},
49	// 2^(k/N) ~= H[k]*(1 + T[k]) for int k in [0,N)
50	// tab[2*k] = asuint64(T[k])
51	// tab[2*k+1] = asuint64(H[k]) - (k << 52)/N
52	.tab = {
53	0x0, 0x3ff0000000000000,
54	0x3c9b3b4f1a88bf6e, 0x3feff63da9fb3335,
55	0xbc7160139cd8dc5d, 0x3fefec9a3e778061,
56	0xbc905e7a108766d1, 0x3fefe315e86e7f85,
57	0x3c8cd2523567f613, 0x3fefd9b0d3158574,
58	0xbc8bce8023f98efa, 0x3fefd06b29ddf6de,
59	0x3c60f74e61e6c861, 0x3fefc74518759bc8,
60	0x3c90a3e45b33d399, 0x3fefbe3ecac6f383,
61	0x3c979aa65d837b6d, 0x3fefb5586cf9890f,
62	0x3c8eb51a92fdeffc, 0x3fefac922b7247f7,
63	0x3c3ebe3d702f9cd1, 0x3fefa3ec32d3d1a2,
64	0xbc6a033489906e0b, 0x3fef9b66affed31b,
65	0xbc9556522a2fbd0e, 0x3fef9301d0125b51,
66	0xbc5080ef8c4eea55, 0x3fef8abdc06c31cc,
67	0xbc91c923b9d5f416, 0x3fef829aaea92de0,
68	0x3c80d3e3e95c55af, 0x3fef7a98c8a58e51,
69	0xbc801b15eaa59348, 0x3fef72b83c7d517b,
70	0xbc8f1ff055de323d, 0x3fef6af9388c8dea,
71	0x3c8b898c3f1353bf, 0x3fef635beb6fcb75,
72	0xbc96d99c7611eb26, 0x3fef5be084045cd4,
73	0x3c9aecf73e3a2f60, 0x3fef54873168b9aa,
74	0xbc8fe782cb86389d, 0x3fef4d5022fcd91d,
75	0x3c8a6f4144a6c38d, 0x3fef463b88628cd6,
76	0x3c807a05b0e4047d, 0x3fef3f49917ddc96,
77	0x3c968efde3a8a894, 0x3fef387a6e756238,
78	0x3c875e18f274487d, 0x3fef31ce4fb2a63f,
79	0x3c80472b981fe7f2, 0x3fef2b4565e27cdd,
80	0xbc96b87b3f71085e, 0x3fef24dfe1f56381,
81	0x3c82f7e16d09ab31, 0x3fef1e9df51fdee1,
82	0xbc3d219b1a6fbffa, 0x3fef187fd0dad990,
83	0x3c8b3782720c0ab4, 0x3fef1285a6e4030b,
84	0x3c6e149289cecb8f, 0x3fef0cafa93e2f56,
85	0x3c834d754db0abb6, 0x3fef06fe0a31b715,
86	0x3c864201e2ac744c, 0x3fef0170fc4cd831,
87	0x3c8fdd395dd3f84a, 0x3feefc08b26416ff,
88	0xbc86a3803b8e5b04, 0x3feef6c55f929ff1,
89	0xbc924aedcc4b5068, 0x3feef1a7373aa9cb,
90	0xbc9907f81b512d8e, 0x3feeecae6d05d866,
91	0xbc71d1e83e9436d2, 0x3feee7db34e59ff7,
92	0xbc991919b3ce1b15, 0x3feee32dc313a8e5,
93	0x3c859f48a72a4c6d, 0x3feedea64c123422,
94	0xbc9312607a28698a, 0x3feeda4504ac801c,
95	0xbc58a78f4817895b, 0x3feed60a21f72e2a,
96	0xbc7c2c9b67499a1b, 0x3feed1f5d950a897,
97	0x3c4363ed60c2ac11, 0x3feece086061892d,
98	0x3c9666093b0664ef, 0x3feeca41ed1d0057,
99	0x3c6ecce1daa10379, 0x3feec6a2b5c13cd0,
100	0x3c93ff8e3f0f1230, 0x3feec32af0d7d3de,
101	0x3c7690cebb7aafb0, 0x3feebfdad5362a27,
102	0x3c931dbdeb54e077, 0x3feebcb299fddd0d,
103	0xbc8f94340071a38e, 0x3feeb9b2769d2ca7,
104	0xbc87deccdc93a349, 0x3feeb6daa2cf6642,
105	0xbc78dec6bd0f385f, 0x3feeb42b569d4f82,
106	0xbc861246ec7b5cf6, 0x3feeb1a4ca5d920f,
107	0x3c93350518fdd78e, 0x3feeaf4736b527da,
108	0x3c7b98b72f8a9b05, 0x3feead12d497c7fd,
109	0x3c9063e1e21c5409, 0x3feeab07dd485429,
110	0x3c34c7855019c6ea, 0x3feea9268a5946b7,
111	0x3c9432e62b64c035, 0x3feea76f15ad2148,
112	0xbc8ce44a6199769f, 0x3feea5e1b976dc09,
113	0xbc8c33c53bef4da8, 0x3feea47eb03a5585,
114	0xbc845378892be9ae, 0x3feea34634ccc320,
115	0xbc93cedd78565858, 0x3feea23882552225,
116	0x3c5710aa807e1964, 0x3feea155d44ca973,
117	0xbc93b3efbf5e2228, 0x3feea09e667f3bcd,
118	0xbc6a12ad8734b982, 0x3feea012750bdabf,
119	0xbc6367efb86da9ee, 0x3fee9fb23c651a2f,
120	0xbc80dc3d54e08851, 0x3fee9f7df9519484,
121	0xbc781f647e5a3ecf, 0x3fee9f75e8ec5f74,
122	0xbc86ee4ac08b7db0, 0x3fee9f9a48a58174,
123	0xbc8619321e55e68a, 0x3fee9feb564267c9,
124	0x3c909ccb5e09d4d3, 0x3feea0694fde5d3f,
125	0xbc7b32dcb94da51d, 0x3feea11473eb0187,
126	0x3c94ecfd5467c06b, 0x3feea1ed0130c132,
127	0x3c65ebe1abd66c55, 0x3feea2f336cf4e62,
128	0xbc88a1c52fb3cf42, 0x3feea427543e1a12,
129	0xbc9369b6f13b3734, 0x3feea589994cce13,
130	0xbc805e843a19ff1e, 0x3feea71a4623c7ad,
131	0xbc94d450d872576e, 0x3feea8d99b4492ed,
132	0x3c90ad675b0e8a00, 0x3feeaac7d98a6699,
133	0x3c8db72fc1f0eab4, 0x3feeace5422aa0db,
134	0xbc65b6609cc5e7ff, 0x3feeaf3216b5448c,
135	0x3c7bf68359f35f44, 0x3feeb1ae99157736,
136	0xbc93091fa71e3d83, 0x3feeb45b0b91ffc6,
137	0xbc5da9b88b6c1e29, 0x3feeb737b0cdc5e5,
138	0xbc6c23f97c90b959, 0x3feeba44cbc8520f,
139	0xbc92434322f4f9aa, 0x3feebd829fde4e50,
140	0xbc85ca6cd7668e4b, 0x3feec0f170ca07ba,
141	0x3c71affc2b91ce27, 0x3feec49182a3f090,
142	0x3c6dd235e10a73bb, 0x3feec86319e32323,
143	0xbc87c50422622263, 0x3feecc667b5de565,
144	0x3c8b1c86e3e231d5, 0x3feed09bec4a2d33,
145	0xbc91bbd1d3bcbb15, 0x3feed503b23e255d,
146	0x3c90cc319cee31d2, 0x3feed99e1330b358,
147	0x3c8469846e735ab3, 0x3feede6b5579fdbf,
148	0xbc82dfcd978e9db4, 0x3feee36bbfd3f37a,
149	0x3c8c1a7792cb3387, 0x3feee89f995ad3ad,
150	0xbc907b8f4ad1d9fa, 0x3feeee07298db666,
151	0xbc55c3d956dcaeba, 0x3feef3a2b84f15fb,
152	0xbc90a40e3da6f640, 0x3feef9728de5593a,
153	0xbc68d6f438ad9334, 0x3feeff76f2fb5e47,
154	0xbc91eee26b588a35, 0x3fef05b030a1064a,
155	0x3c74ffd70a5fddcd, 0x3fef0c1e904bc1d2,
156	0xbc91bdfbfa9298ac, 0x3fef12c25bd71e09,
157	0x3c736eae30af0cb3, 0x3fef199bdd85529c,
158	0x3c8ee3325c9ffd94, 0x3fef20ab5fffd07a,
159	0x3c84e08fd10959ac, 0x3fef27f12e57d14b,
160	0x3c63cdaf384e1a67, 0x3fef2f6d9406e7b5,
161	0x3c676b2c6c921968, 0x3fef3720dcef9069,
162	0xbc808a1883ccb5d2, 0x3fef3f0b555dc3fa,
163	0xbc8fad5d3ffffa6f, 0x3fef472d4a07897c,
164	0xbc900dae3875a949, 0x3fef4f87080d89f2,
165	0x3c74a385a63d07a7, 0x3fef5818dcfba487,
166	0xbc82919e2040220f, 0x3fef60e316c98398,
167	0x3c8e5a50d5c192ac, 0x3fef69e603db3285,
168	0x3c843a59ac016b4b, 0x3fef7321f301b460,
169	0xbc82d52107b43e1f, 0x3fef7c97337b9b5f,
170	0xbc892ab93b470dc9, 0x3fef864614f5a129,
171	0x3c74b604603a88d3, 0x3fef902ee78b3ff6,
172	0x3c83c5ec519d7271, 0x3fef9a51fbc74c83,
173	0xbc8ff7128fd391f0, 0x3fefa4afa2a490da,
174	0xbc8dae98e223747d, 0x3fefaf482d8e67f1,
175	0x3c8ec3bc41aa2008, 0x3fefba1bee615a27,
176	0x3c842b94c3a9eb32, 0x3fefc52b376bba97,
177	0x3c8a64a931d185ee, 0x3fefd0765b6e4540,
178	0xbc8e37bae43be3ed, 0x3fefdbfdad9cbe14,
179	0x3c77893b4d91cd9d, 0x3fefe7c1819e90d8,
180	0x3c5305c14160cc89, 0x3feff3c22b8f71f1,
181	},
182	};

lib/libc/wasi/libc-top-half/musl/src/math/exp_data.h deleted-26

...	@@ -1,26 +0,0 @@
1	/*
2	* Copyright (c) 2018, Arm Limited.
3	* SPDX-License-Identifier: MIT
4	*/
5	#ifndef _EXP_DATA_H
6	#define _EXP_DATA_H
7
8	#include <features.h>
9	#include <stdint.h>
10
11	#define EXP_TABLE_BITS 7
12	#define EXP_POLY_ORDER 5
13	#define EXP_USE_TOINT_NARROW 0
14	#define EXP2_POLY_ORDER 5
15	extern hidden const struct exp_data {
16	double invln2N;
17	double shift;
18	double negln2hiN;
19	double negln2loN;
20	double poly[4]; /* Last four coefficients. */
21	double exp2_shift;
22	double exp2_poly[EXP2_POLY_ORDER];
23	uint64_t tab[2*(1 << EXP_TABLE_BITS)];
24	} __exp_data;
25
26	#endif

lib/libc/wasi/libc-top-half/musl/src/math/expf.c deleted-80

...	@@ -1,80 +0,0 @@
1	/*
2	* Single-precision e^x function.
3	*
4	* Copyright (c) 2017-2018, Arm Limited.
5	* SPDX-License-Identifier: MIT
6	*/
7
8	#include <math.h>
9	#include <stdint.h>
10	#include "libm.h"
11	#include "exp2f_data.h"
12
13	/*
14	EXP2F_TABLE_BITS = 5
15	EXP2F_POLY_ORDER = 3
16
17	ULP error: 0.502 (nearest rounding.)
18	Relative error: 1.69 * 2^-34 in [-ln2/64, ln2/64] (before rounding.)
19	Wrong count: 170635 (all nearest rounding wrong results with fma.)
20	Non-nearest ULP error: 1 (rounded ULP error)
21	*/
22
23	#define N (1 << EXP2F_TABLE_BITS)
24	#define InvLn2N __exp2f_data.invln2_scaled
25	#define T __exp2f_data.tab
26	#define C __exp2f_data.poly_scaled
27
28	static inline uint32_t top12(float x)
29	{
30	return asuint(x) >> 20;
31	}
32
33	float expf(float x)
34	{
35	uint32_t abstop;
36	uint64_t ki, t;
37	double_t kd, xd, z, r, r2, y, s;
38
39	xd = (double_t)x;
40	abstop = top12(x) & 0x7ff;
41	if (predict_false(abstop >= top12(88.0f))) {
42	/* \|x\| >= 88 or x is nan. */
43	if (asuint(x) == asuint(-INFINITY))
44	return 0.0f;
45	if (abstop >= top12(INFINITY))
46	return x + x;
47	if (x > 0x1.62e42ep6f) /* x > log(0x1p128) ~= 88.72 */
48	return __math_oflowf(0);
49	if (x < -0x1.9fe368p6f) /* x < log(0x1p-150) ~= -103.97 */
50	return __math_uflowf(0);
51	}
52
53	/* xN/Ln2 = k + r with r in [-1/2, 1/2] and int k. /
54	z = InvLn2N * xd;
55
56	/* Round and convert z to int, the result is in [-150N, 128N] and
57	ideally ties-to-even rule is used, otherwise the magnitude of r
58	can be bigger which gives larger approximation error. */
59	#if TOINT_INTRINSICS
60	kd = roundtoint(z);
61	ki = converttoint(z);
62	#else
63	# define SHIFT __exp2f_data.shift
64	kd = eval_as_double(z + SHIFT);
65	ki = asuint64(kd);
66	kd -= SHIFT;
67	#endif
68	r = z - kd;
69
70	/* exp(x) = 2^(k/N) * 2^(r/N) ~= s * (C0r^3 + C1r^2 + C2r + 1) /
71	t = T[ki % N];
72	t += ki << (52 - EXP2F_TABLE_BITS);
73	s = asdouble(t);
74	z = C[0] * r + C[1];
75	r2 = r * r;
76	y = C[2] * r + 1;
77	y = z * r2 + y;
78	y = y * s;
79	return eval_as_float(y);
80	}

lib/libc/wasi/libc-top-half/musl/src/math/expl.c deleted-128

...	@@ -1,128 +0,0 @@
1	/* origin: OpenBSD /usr/src/lib/libm/src/ld80/e_expl.c */
2	/*
3	* Copyright (c) 2008 Stephen L. Moshier <steve@moshier.net>
4	*
5	* Permission to use, copy, modify, and distribute this software for any
6	* purpose with or without fee is hereby granted, provided that the above
7	* copyright notice and this permission notice appear in all copies.
8	*
9	* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10	* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11	* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12	* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13	* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14	* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15	* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16	*/
17	/*
18	* Exponential function, long double precision
19	*
20	*
21	* SYNOPSIS:
22	*
23	* long double x, y, expl();
24	*
25	* y = expl( x );
26	*
27	*
28	* DESCRIPTION:
29	*
30	* Returns e (2.71828...) raised to the x power.
31	*
32	* Range reduction is accomplished by separating the argument
33	* into an integer k and fraction f such that
34	*
35	* x k f
36	* e = 2 e.
37	*
38	* A Pade' form of degree 5/6 is used to approximate exp(f) - 1
39	* in the basic range [-0.5 ln 2, 0.5 ln 2].
40	*
41	*
42	* ACCURACY:
43	*
44	* Relative error:
45	* arithmetic domain # trials peak rms
46	* IEEE +-10000 50000 1.12e-19 2.81e-20
47	*
48	*
49	* Error amplification in the exponential function can be
50	* a serious matter. The error propagation involves
51	* exp( X(1+delta) ) = exp(X) ( 1 + X*delta + ... ),
52	* which shows that a 1 lsb error in representing X produces
53	* a relative error of X times 1 lsb in the function.
54	* While the routine gives an accurate result for arguments
55	* that are exactly represented by a long double precision
56	* computer number, the result contains amplified roundoff
57	* error for large arguments not exactly represented.
58	*
59	*
60	* ERROR MESSAGES:
61	*
62	* message condition value returned
63	* exp underflow x < MINLOG 0.0
64	* exp overflow x > MAXLOG MAXNUM
65	*
66	*/
67
68	#include "libm.h"
69
70	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
71	long double expl(long double x)
72	{
73	return exp(x);
74	}
75	#elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
76
77	static const long double P[3] = {
78	1.2617719307481059087798E-4L,
79	3.0299440770744196129956E-2L,
80	9.9999999999999999991025E-1L,
81	};
82	static const long double Q[4] = {
83	3.0019850513866445504159E-6L,
84	2.5244834034968410419224E-3L,
85	2.2726554820815502876593E-1L,
86	2.0000000000000000000897E0L,
87	};
88	static const long double
89	LN2HI = 6.9314575195312500000000E-1L,
90	LN2LO = 1.4286068203094172321215E-6L,
91	LOG2E = 1.4426950408889634073599E0L;
92
93	long double expl(long double x)
94	{
95	long double px, xx;
96	int k;
97
98	if (isnan(x))
99	return x;
100	if (x > 11356.5234062941439488L) /* x > ln(2^16384 - 0.5) */
101	return x * 0x1p16383L;
102	if (x < -11399.4985314888605581L) /* x < ln(2^-16446) */
103	return -0x1p-16445L/x;
104
105	/* Express ex = ef 2**k
106	* = e**(f + k ln(2))
107	*/
108	px = floorl(LOG2E * x + 0.5);
109	k = px;
110	x -= px * LN2HI;
111	x -= px * LN2LO;
112
113	/* rational approximation of the fractional part:
114	* ex = 1 + 2x P(x2)/(Q(x2) - x P(x2))
115	*/
116	xx = x * x;
117	px = x * __polevll(xx, P, 2);
118	x = px/(__polevll(xx, Q, 3) - px);
119	x = 1.0 + 2.0 * x;
120	return scalbnl(x, k);
121	}
122	#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
123	// TODO: broken implementation to make things compile
124	long double expl(long double x)
125	{
126	return exp(x);
127	}
128	#endif

lib/libc/wasi/libc-top-half/musl/src/math/expm1.c deleted-201

...	@@ -1,201 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_expm1.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunPro, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/* expm1(x)
13	* Returns exp(x)-1, the exponential of x minus 1.
14	*
15	* Method
16	* 1. Argument reduction:
17	* Given x, find r and integer k such that
18	*
19	* x = kln2 + r, \|r\| <= 0.5ln2 ~ 0.34658
20	*
21	* Here a correction term c will be computed to compensate
22	* the error in r when rounded to a floating-point number.
23	*
24	* 2. Approximating expm1(r) by a special rational function on
25	* the interval [0,0.34658]:
26	* Since
27	* r*(exp(r)+1)/(exp(r)-1) = 2+ r^2/6 - r^4/360 + ...
28	* we define R1(r*r) by
29	* r(exp(r)+1)/(exp(r)-1) = 2+ r^2/6 R1(r*r)
30	* That is,
31	* R1(r*2) = 6/r ((exp(r)+1)/(exp(r)-1) - 2/r)
32	* = 6/r * ( 1 + 2.0*(1/(exp(r)-1) - 1/r))
33	* = 1 - r^2/60 + r^4/2520 - r^6/100800 + ...
34	* We use a special Remez algorithm on [0,0.347] to generate
35	* a polynomial of degree 5 in r*r to approximate R1. The
36	* maximum error of this polynomial approximation is bounded
37	* by 2**-61. In other words,
38	* R1(z) ~ 1.0 + Q1z + Q2z*2 + Q3z*3 + Q4z*4 + Q5z**5
39	* where Q1 = -1.6666666666666567384E-2,
40	* Q2 = 3.9682539681370365873E-4,
41	* Q3 = -9.9206344733435987357E-6,
42	* Q4 = 2.5051361420808517002E-7,
43	* Q5 = -6.2843505682382617102E-9;
44	* z = r*r,
45	* with error bounded by
46	* \| 5 \| -61
47	* \| 1.0+Q1z+...+Q5z - R1(z) \| <= 2
48	* \| \|
49	*
50	* expm1(r) = exp(r)-1 is then computed by the following
51	* specific way which minimize the accumulation rounding error:
52	* 2 3
53	* r r [ 3 - (R1 + R1*r/2) ]
54	* expm1(r) = r + --- + --- * [--------------------]
55	* 2 2 [ 6 - r(3 - R1r/2) ]
56	*
57	* To compensate the error in the argument reduction, we use
58	* expm1(r+c) = expm1(r) + c + expm1(r)*c
59	* ~ expm1(r) + c + r*c
60	* Thus c+r*c will be added in as the correction terms for
61	* expm1(r+c). Now rearrange the term to avoid optimization
62	* screw up:
63	* ( 2 2 )
64	* ({ ( r [ R1 - (3 - R1*r/2) ] ) } r )
65	* expm1(r+c)~r - ({r(--- [--------------------]-c)-c} - --- )
66	* ({ ( 2 [ 6 - r(3 - R1r/2) ] ) } 2 )
67	* ( )
68	*
69	* = r - E
70	* 3. Scale back to obtain expm1(x):
71	* From step 1, we have
72	* expm1(x) = either 2^k*[expm1(r)+1] - 1
73	* = or 2^k*[expm1(r) + (1-2^-k)]
74	* 4. Implementation notes:
75	* (A). To save one multiplication, we scale the coefficient Qi
76	* to Qi*2^i, and replace z by (x^2)/2.
77	* (B). To achieve maximum accuracy, we compute expm1(x) by
78	* (i) if x < -56*ln2, return -1.0, (raise inexact if x!=inf)
79	* (ii) if k=0, return r-E
80	* (iii) if k=-1, return 0.5*(r-E)-0.5
81	* (iv) if k=1 if r < -0.25, return 2*((r+0.5)- E)
82	* else return 1.0+2.0*(r-E);
83	* (v) if (k<-2\|\|k>56) return 2^k(1-(E-r)) - 1 (or exp(x)-1)
84	* (vi) if k <= 20, return 2^k((1-2^-k)-(E-r)), else
85	* (vii) return 2^k(1-((E+2^-k)-r))
86	*
87	* Special cases:
88	* expm1(INF) is INF, expm1(NaN) is NaN;
89	* expm1(-INF) is -1, and
90	* for finite argument, only expm1(0)=0 is exact.
91	*
92	* Accuracy:
93	* according to an error analysis, the error is always less than
94	* 1 ulp (unit in the last place).
95	*
96	* Misc. info.
97	* For IEEE double
98	* if x > 7.09782712893383973096e+02 then expm1(x) overflow
99	*
100	* Constants:
101	* The hexadecimal values are the intended ones for the following
102	* constants. The decimal values may be used, provided that the
103	* compiler will convert from decimal to binary accurately enough
104	* to produce the hexadecimal values shown.
105	*/
106
107	#include "libm.h"
108
109	static const double
110	o_threshold = 7.09782712893383973096e+02, /* 0x40862E42, 0xFEFA39EF */
111	ln2_hi = 6.93147180369123816490e-01, /* 0x3fe62e42, 0xfee00000 */
112	ln2_lo = 1.90821492927058770002e-10, /* 0x3dea39ef, 0x35793c76 */
113	invln2 = 1.44269504088896338700e+00, /* 0x3ff71547, 0x652b82fe */
114	/* Scaled Q's: Qn_here = 2*n Qn_above, for R(2z) where z = hxs = xx/2: */
115	Q1 = -3.33333333333331316428e-02, /* BFA11111 111110F4 */
116	Q2 = 1.58730158725481460165e-03, /* 3F5A01A0 19FE5585 */
117	Q3 = -7.93650757867487942473e-05, /* BF14CE19 9EAADBB7 */
118	Q4 = 4.00821782732936239552e-06, /* 3ED0CFCA 86E65239 */
119	Q5 = -2.01099218183624371326e-07; /* BE8AFDB7 6E09C32D */
120
121	double expm1(double x)
122	{
123	double_t y,hi,lo,c,t,e,hxs,hfx,r1,twopk;
124	union {double f; uint64_t i;} u = {x};
125	uint32_t hx = u.i>>32 & 0x7fffffff;
126	int k, sign = u.i>>63;
127
128	/* filter out huge and non-finite argument */
129	if (hx >= 0x4043687A) { /* if \|x\|>=56ln2 /
130	if (isnan(x))
131	return x;
132	if (sign)
133	return -1;
134	if (x > o_threshold) {
135	x *= 0x1p1023;
136	return x;
137	}
138	}
139
140	/* argument reduction */
141	if (hx > 0x3fd62e42) { /* if \|x\| > 0.5 ln2 */
142	if (hx < 0x3FF0A2B2) { /* and \|x\| < 1.5 ln2 */
143	if (!sign) {
144	hi = x - ln2_hi;
145	lo = ln2_lo;
146	k = 1;
147	} else {
148	hi = x + ln2_hi;
149	lo = -ln2_lo;
150	k = -1;
151	}
152	} else {
153	k = invln2*x + (sign ? -0.5 : 0.5);
154	t = k;
155	hi = x - tln2_hi; / tln2_hi is exact here /
156	lo = t*ln2_lo;
157	}
158	x = hi-lo;
159	c = (hi-x)-lo;
160	} else if (hx < 0x3c900000) { /* \|x\| < 2*-54, return x /
161	if (hx < 0x00100000)
162	FORCE_EVAL((float)x);
163	return x;
164	} else
165	k = 0;
166
167	/* x is now in primary range */
168	hfx = 0.5*x;
169	hxs = x*hfx;
170	r1 = 1.0+hxs(Q1+hxs(Q2+hxs(Q3+hxs(Q4+hxs*Q5))));
171	t = 3.0-r1*hfx;
172	e = hxs((r1-t)/(6.0 - xt));
173	if (k == 0) /* c is 0 */
174	return x - (x*e-hxs);
175	e = x*(e-c) - c;
176	e -= hxs;
177	/* exp(x) ~ 2^k (x_reduced - e + 1) */
178	if (k == -1)
179	return 0.5*(x-e) - 0.5;
180	if (k == 1) {
181	if (x < -0.25)
182	return -2.0*(e-(x+0.5));
183	return 1.0+2.0*(x-e);
184	}
185	u.i = (uint64_t)(0x3ff + k)<<52; /* 2^k */
186	twopk = u.f;
187	if (k < 0 \|\| k > 56) { /* suffice to return exp(x)-1 */
188	y = x - e + 1.0;
189	if (k == 1024)
190	y = y2.00x1p1023;
191	else
192	y = y*twopk;
193	return y - 1.0;
194	}
195	u.i = (uint64_t)(0x3ff - k)<<52; /* 2^-k */
196	if (k < 20)
197	y = (x-e+(1-u.f))*twopk;
198	else
199	y = (x-(e+u.f)+1)*twopk;
200	return y;
201	}

lib/libc/wasi/libc-top-half/musl/src/math/expm1f.c deleted-110

...	@@ -1,110 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_expm1f.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	*/
5	/*
6	* ====================================================
7	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
8	*
9	* Developed at SunPro, a Sun Microsystems, Inc. business.
10	* Permission to use, copy, modify, and distribute this
11	* software is freely granted, provided that this notice
12	* is preserved.
13	* ====================================================
14	*/
15
16	#include "libm.h"
17
18	static const float
19	ln2_hi = 6.9313812256e-01, /* 0x3f317180 */
20	ln2_lo = 9.0580006145e-06, /* 0x3717f7d1 */
21	invln2 = 1.4426950216e+00, /* 0x3fb8aa3b */
22	/*
23	* Domain [-0.34568, 0.34568], range ~[-6.694e-10, 6.696e-10]:
24	* \|6 / x * (1 + 2 * (1 / (exp(x) - 1) - 1 / x)) - q(x)\| < 2**-30.04
25	* Scaled coefficients: Qn_here = 2*n Qn_for_q (see s_expm1.c):
26	*/
27	Q1 = -3.3333212137e-2, /* -0x888868.0p-28 */
28	Q2 = 1.5807170421e-3; /* 0xcf3010.0p-33 */
29
30	float expm1f(float x)
31	{
32	float_t y,hi,lo,c,t,e,hxs,hfx,r1,twopk;
33	union {float f; uint32_t i;} u = {x};
34	uint32_t hx = u.i & 0x7fffffff;
35	int k, sign = u.i >> 31;
36
37	/* filter out huge and non-finite argument */
38	if (hx >= 0x4195b844) { /* if \|x\|>=27ln2 /
39	if (hx > 0x7f800000) /* NaN */
40	return x;
41	if (sign)
42	return -1;
43	if (hx > 0x42b17217) { /* x > log(FLT_MAX) */
44	x *= 0x1p127f;
45	return x;
46	}
47	}
48
49	/* argument reduction */
50	if (hx > 0x3eb17218) { /* if \|x\| > 0.5 ln2 */
51	if (hx < 0x3F851592) { /* and \|x\| < 1.5 ln2 */
52	if (!sign) {
53	hi = x - ln2_hi;
54	lo = ln2_lo;
55	k = 1;
56	} else {
57	hi = x + ln2_hi;
58	lo = -ln2_lo;
59	k = -1;
60	}
61	} else {
62	k = invln2*x + (sign ? -0.5f : 0.5f);
63	t = k;
64	hi = x - tln2_hi; / tln2_hi is exact here /
65	lo = t*ln2_lo;
66	}
67	x = hi-lo;
68	c = (hi-x)-lo;
69	} else if (hx < 0x33000000) { /* when \|x\|<2*-25, return x /
70	if (hx < 0x00800000)
71	FORCE_EVAL(x*x);
72	return x;
73	} else
74	k = 0;
75
76	/* x is now in primary range */
77	hfx = 0.5f*x;
78	hxs = x*hfx;
79	r1 = 1.0f+hxs(Q1+hxsQ2);
80	t = 3.0f - r1*hfx;
81	e = hxs((r1-t)/(6.0f - xt));
82	if (k == 0) /* c is 0 */
83	return x - (x*e-hxs);
84	e = x*(e-c) - c;
85	e -= hxs;
86	/* exp(x) ~ 2^k (x_reduced - e + 1) */
87	if (k == -1)
88	return 0.5f*(x-e) - 0.5f;
89	if (k == 1) {
90	if (x < -0.25f)
91	return -2.0f*(e-(x+0.5f));
92	return 1.0f + 2.0f*(x-e);
93	}
94	u.i = (0x7f+k)<<23; /* 2^k */
95	twopk = u.f;
96	if (k < 0 \|\| k > 56) { /* suffice to return exp(x)-1 */
97	y = x - e + 1.0f;
98	if (k == 128)
99	y = y2.0f0x1p127f;
100	else
101	y = y*twopk;
102	return y - 1.0f;
103	}
104	u.i = (0x7f-k)<<23; /* 2^-k */
105	if (k < 23)
106	y = (x-e+(1-u.f))*twopk;
107	else
108	y = (x-(e+u.f)+1)*twopk;
109	return y;
110	}

lib/libc/wasi/libc-top-half/musl/src/math/expm1l.c deleted-123

...	@@ -1,123 +0,0 @@
1	/* origin: OpenBSD /usr/src/lib/libm/src/ld80/e_expm1l.c */
2	/*
3	* Copyright (c) 2008 Stephen L. Moshier <steve@moshier.net>
4	*
5	* Permission to use, copy, modify, and distribute this software for any
6	* purpose with or without fee is hereby granted, provided that the above
7	* copyright notice and this permission notice appear in all copies.
8	*
9	* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10	* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11	* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12	* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13	* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14	* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15	* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16	*/
17	/*
18	* Exponential function, minus 1
19	* Long double precision
20	*
21	*
22	* SYNOPSIS:
23	*
24	* long double x, y, expm1l();
25	*
26	* y = expm1l( x );
27	*
28	*
29	* DESCRIPTION:
30	*
31	* Returns e (2.71828...) raised to the x power, minus 1.
32	*
33	* Range reduction is accomplished by separating the argument
34	* into an integer k and fraction f such that
35	*
36	* x k f
37	* e = 2 e.
38	*
39	* An expansion x + .5 x^2 + x^3 R(x) approximates exp(f) - 1
40	* in the basic range [-0.5 ln 2, 0.5 ln 2].
41	*
42	*
43	* ACCURACY:
44	*
45	* Relative error:
46	* arithmetic domain # trials peak rms
47	* IEEE -45,+maxarg 200,000 1.2e-19 2.5e-20
48	*/
49
50	#include "libm.h"
51
52	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
53	long double expm1l(long double x)
54	{
55	return expm1(x);
56	}
57	#elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
58
59	/* exp(x) - 1 = x + 0.5 x^2 + x^3 P(x)/Q(x)
60	-.5 ln 2 < x < .5 ln 2
61	Theoretical peak relative error = 3.4e-22 */
62	static const long double
63	P0 = -1.586135578666346600772998894928250240826E4L,
64	P1 = 2.642771505685952966904660652518429479531E3L,
65	P2 = -3.423199068835684263987132888286791620673E2L,
66	P3 = 1.800826371455042224581246202420972737840E1L,
67	P4 = -5.238523121205561042771939008061958820811E-1L,
68	Q0 = -9.516813471998079611319047060563358064497E4L,
69	Q1 = 3.964866271411091674556850458227710004570E4L,
70	Q2 = -7.207678383830091850230366618190187434796E3L,
71	Q3 = 7.206038318724600171970199625081491823079E2L,
72	Q4 = -4.002027679107076077238836622982900945173E1L,
73	/* Q5 = 1.000000000000000000000000000000000000000E0 */
74	/* C1 + C2 = ln 2 */
75	C1 = 6.93145751953125E-1L,
76	C2 = 1.428606820309417232121458176568075500134E-6L,
77	/* ln 2^-65 */
78	minarg = -4.5054566736396445112120088E1L,
79	/* ln 2^16384 */
80	maxarg = 1.1356523406294143949492E4L;
81
82	long double expm1l(long double x)
83	{
84	long double px, qx, xx;
85	int k;
86
87	if (isnan(x))
88	return x;
89	if (x > maxarg)
90	return x0x1p16383L; / overflow, unless x==inf */
91	if (x == 0.0)
92	return x;
93	if (x < minarg)
94	return -1.0;
95
96	xx = C1 + C2;
97	/* Express x = ln 2 (k + remainder), remainder not exceeding 1/2. */
98	px = floorl(0.5 + x / xx);
99	k = px;
100	/* remainder times ln 2 */
101	x -= px * C1;
102	x -= px * C2;
103
104	/* Approximate exp(remainder ln 2).*/
105	px = (((( P4 * x + P3) * x + P2) * x + P1) * x + P0) * x;
106	qx = (((( x + Q4) * x + Q3) * x + Q2) * x + Q1) * x + Q0;
107	xx = x * x;
108	qx = x + (0.5 * xx + xx * px / qx);
109
110	/* exp(x) = exp(k ln 2) exp(remainder ln 2) = 2^k exp(remainder ln 2).
111	We have qx = exp(remainder ln 2) - 1, so
112	exp(x) - 1 = 2^k (qx + 1) - 1 = 2^k qx + 2^k - 1. */
113	px = scalbnl(1.0, k);
114	x = px * qx + (px - 1.0);
115	return x;
116	}
117	#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
118	// TODO: broken implementation to make things compile
119	long double expm1l(long double x)
120	{
121	return expm1(x);
122	}
123	#endif

lib/libc/wasi/libc-top-half/musl/src/math/fabsl.c deleted-15

...	@@ -1,15 +0,0 @@
1	#include "libm.h"
2	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
3	long double fabsl(long double x)
4	{
5	return fabs(x);
6	}
7	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
8	long double fabsl(long double x)
9	{
10	union ldshape u = {x};
11
12	u.i.se &= 0x7fff;
13	return u.f;
14	}
15	#endif

lib/libc/wasi/libc-top-half/musl/src/math/fdim.c deleted-10

...	@@ -1,10 +0,0 @@
1	#include <math.h>
2
3	double fdim(double x, double y)
4	{
5	if (isnan(x))
6	return x;
7	if (isnan(y))
8	return y;
9	return x > y ? x - y : 0;
10	}

lib/libc/wasi/libc-top-half/musl/src/math/fdimf.c deleted-10

...	@@ -1,10 +0,0 @@
1	#include <math.h>
2
3	float fdimf(float x, float y)
4	{
5	if (isnan(x))
6	return x;
7	if (isnan(y))
8	return y;
9	return x > y ? x - y : 0;
10	}

lib/libc/wasi/libc-top-half/musl/src/math/fdiml.c deleted-18

...	@@ -1,18 +0,0 @@
1	#include <math.h>
2	#include <float.h>
3
4	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
5	long double fdiml(long double x, long double y)
6	{
7	return fdim(x, y);
8	}
9	#else
10	long double fdiml(long double x, long double y)
11	{
12	if (isnan(x))
13	return x;
14	if (isnan(y))
15	return y;
16	return x > y ? x - y : 0;
17	}
18	#endif

lib/libc/wasi/libc-top-half/musl/src/math/finite.c deleted-7

...	@@ -1,7 +0,0 @@
1	#define _GNU_SOURCE
2	#include <math.h>
3
4	int finite(double x)
5	{
6	return isfinite(x);
7	}

lib/libc/wasi/libc-top-half/musl/src/math/finitef.c deleted-7

...	@@ -1,7 +0,0 @@
1	#define _GNU_SOURCE
2	#include <math.h>
3
4	int finitef(float x)
5	{
6	return isfinite(x);
7	}

lib/libc/wasi/libc-top-half/musl/src/math/floorl.c deleted-34

...	@@ -1,34 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double floorl(long double x)
5	{
6	return floor(x);
7	}
8	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
9
10	static const long double toint = 1/LDBL_EPSILON;
11
12	long double floorl(long double x)
13	{
14	union ldshape u = {x};
15	int e = u.i.se & 0x7fff;
16	long double y;
17
18	if (e >= 0x3fff+LDBL_MANT_DIG-1 \|\| x == 0)
19	return x;
20	/* y = int(x) - x, where int(x) is an integer neighbor of x */
21	if (u.i.se >> 15)
22	y = x - toint + toint - x;
23	else
24	y = x + toint - toint - x;
25	/* special case because of non-nearest rounding modes */
26	if (e <= 0x3fff-1) {
27	FORCE_EVAL(y);
28	return u.i.se >> 15 ? -1 : 0;
29	}
30	if (y > 0)
31	return x + y - 1;
32	return x + y;
33	}
34	#endif

lib/libc/wasi/libc-top-half/musl/src/math/fma.c deleted-183

...	@@ -1,183 +0,0 @@
1	#include <stdint.h>
2	#include <float.h>
3	#include <math.h>
4	#include "atomic.h"
5
6	#define ASUINT64(x) ((union {double f; uint64_t i;}){x}).i
7	#define ZEROINFNAN (0x7ff-0x3ff-52-1)
8
9	struct num { uint64_t m; int e; int sign; };
10
11	static struct num normalize(double x)
12	{
13	uint64_t ix = ASUINT64(x);
14	int e = ix>>52;
15	int sign = e & 0x800;
16	e &= 0x7ff;
17	if (!e) {
18	ix = ASUINT64(x*0x1p63);
19	e = ix>>52 & 0x7ff;
20	e = e ? e-63 : 0x800;
21	}
22	ix &= (1ull<<52)-1;
23	ix \|= 1ull<<52;
24	ix <<= 1;
25	e -= 0x3ff + 52 + 1;
26	return (struct num){ix,e,sign};
27	}
28
29	static void mul(uint64_t hi, uint64_t lo, uint64_t x, uint64_t y)
30	{
31	uint64_t t1,t2,t3;
32	uint64_t xlo = (uint32_t)x, xhi = x>>32;
33	uint64_t ylo = (uint32_t)y, yhi = y>>32;
34
35	t1 = xlo*ylo;
36	t2 = xloyhi + xhiylo;
37	t3 = xhi*yhi;
38	*lo = t1 + (t2<<32);
39	hi = t3 + (t2>>32) + (t1 > lo);
40	}
41
42	double fma(double x, double y, double z)
43	{
44	#pragma STDC FENV_ACCESS ON
45
46	/* normalize so top 10bits and last bit are 0 */
47	struct num nx, ny, nz;
48	nx = normalize(x);
49	ny = normalize(y);
50	nz = normalize(z);
51
52	if (nx.e >= ZEROINFNAN \|\| ny.e >= ZEROINFNAN)
53	return x*y + z;
54	if (nz.e >= ZEROINFNAN) {
55	if (nz.e > ZEROINFNAN) /* z==0 */
56	return x*y + z;
57	return z;
58	}
59
60	/* mul: r = xy /
61	uint64_t rhi, rlo, zhi, zlo;
62	mul(&rhi, &rlo, nx.m, ny.m);
63	/* either top 20 or 21 bits of rhi and last 2 bits of rlo are 0 */
64
65	/* align exponents */
66	int e = nx.e + ny.e;
67	int d = nz.e - e;
68	/* shift bits z<<=kz, r>>=kr, so kz+kr == d, set e = e+kr (== ez-kz) */
69	if (d > 0) {
70	if (d < 64) {
71	zlo = nz.m<<d;
72	zhi = nz.m>>64-d;
73	} else {
74	zlo = 0;
75	zhi = nz.m;
76	e = nz.e - 64;
77	d -= 64;
78	if (d == 0) {
79	} else if (d < 64) {
80	rlo = rhi<<64-d \| rlo>>d \| !!(rlo<<64-d);
81	rhi = rhi>>d;
82	} else {
83	rlo = 1;
84	rhi = 0;
85	}
86	}
87	} else {
88	zhi = 0;
89	d = -d;
90	if (d == 0) {
91	zlo = nz.m;
92	} else if (d < 64) {
93	zlo = nz.m>>d \| !!(nz.m<<64-d);
94	} else {
95	zlo = 1;
96	}
97	}
98
99	/* add */
100	int sign = nx.sign^ny.sign;
101	int samesign = !(sign^nz.sign);
102	int nonzero = 1;
103	if (samesign) {
104	/* r += z */
105	rlo += zlo;
106	rhi += zhi + (rlo < zlo);
107	} else {
108	/* r -= z */
109	uint64_t t = rlo;
110	rlo -= zlo;
111	rhi = rhi - zhi - (t < rlo);
112	if (rhi>>63) {
113	rlo = -rlo;
114	rhi = -rhi-!!rlo;
115	sign = !sign;
116	}
117	nonzero = !!rhi;
118	}
119
120	/* set rhi to top 63bit of the result (last bit is sticky) */
121	if (nonzero) {
122	e += 64;
123	d = a_clz_64(rhi)-1;
124	/* note: d > 0 */
125	rhi = rhi<<d \| rlo>>64-d \| !!(rlo<<d);
126	} else if (rlo) {
127	d = a_clz_64(rlo)-1;
128	if (d < 0)
129	rhi = rlo>>1 \| (rlo&1);
130	else
131	rhi = rlo<<d;
132	} else {
133	/* exact +-0 */
134	return x*y + z;
135	}
136	e -= d;
137
138	/* convert to double */
139	int64_t i = rhi; /* i is in [1<<62,(1<<63)-1] */
140	if (sign)
141	i = -i;
142	double r = i; /* \|r\| is in [0x1p62,0x1p63] */
143
144	if (e < -1022-62) {
145	/* result is subnormal before rounding */
146	if (e == -1022-63) {
147	double c = 0x1p63;
148	if (sign)
149	c = -c;
150	if (r == c) {
151	/* min normal after rounding, underflow depends
152	on arch behaviour which can be imitated by
153	a double to float conversion */
154	float fltmin = 0x0.ffffff8p-63FLT_MIN r;
155	return DBL_MIN/FLT_MIN * fltmin;
156	}
157	/* one bit is lost when scaled, add another top bit to
158	only round once at conversion if it is inexact */
159	if (rhi << 53) {
160	i = rhi>>1 \| (rhi&1) \| 1ull<<62;
161	if (sign)
162	i = -i;
163	r = i;
164	r = 2r - c; / remove top bit */
165
166	/* raise underflow portably, such that it
167	cannot be optimized away */
168	{
169	double_t tiny = DBL_MIN/FLT_MIN * r;
170	r += (double)(tinytiny) (r-r);
171	}
172	}
173	} else {
174	/* only round once when scaled */
175	d = 10;
176	i = ( rhi>>d \| !!(rhi<<64-d) ) << d;
177	if (sign)
178	i = -i;
179	r = i;
180	}
181	}
182	return scalbn(r, e);
183	}

lib/libc/wasi/libc-top-half/musl/src/math/fmaf.c deleted-92

...	@@ -1,92 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_fmaf.c */
2	/*-
3	* Copyright (c) 2005-2011 David Schultz <das@FreeBSD.ORG>
4	* All rights reserved.
5	*
6	* Redistribution and use in source and binary forms, with or without
7	* modification, are permitted provided that the following conditions
8	* are met:
9	* 1. Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.
11	* 2. Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.
14	*
15	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25	* SUCH DAMAGE.
26	*/
27
28	#include <fenv.h>
29	#include <math.h>
30	#include <stdint.h>
31
32	/*
33	* Fused multiply-add: Compute x * y + z with a single rounding error.
34	*
35	* A double has more than twice as much precision than a float, so
36	* direct double-precision arithmetic suffices, except where double
37	* rounding occurs.
38	*/
39	float fmaf(float x, float y, float z)
40	{
41	#pragma STDC FENV_ACCESS ON
42	double xy, result;
43	union {double f; uint64_t i;} u;
44	int e;
45
46	xy = (double)x * y;
47	result = xy + z;
48	u.f = result;
49	e = u.i>>52 & 0x7ff;
50	/* Common case: The double precision result is fine. */
51	if ((u.i & 0x1fffffff) != 0x10000000 \|\| /* not a halfway case */
52	e == 0x7ff \|\| /* NaN */
53	(result - xy == z && result - z == xy) \|\| /* exact */
54	fegetround() != FE_TONEAREST) /* not round-to-nearest */
55	{
56	/*
57	underflow may not be raised correctly, example:
58	fmaf(0x1p-120f, 0x1p-120f, 0x1p-149f)
59	*/
60	#if defined(FE_INEXACT) && defined(FE_UNDERFLOW)
61	if (e < 0x3ff-126 && e >= 0x3ff-149 && fetestexcept(FE_INEXACT)) {
62	feclearexcept(FE_INEXACT);
63	/* TODO: gcc and clang bug workaround */
64	volatile float vz = z;
65	result = xy + vz;
66	if (fetestexcept(FE_INEXACT))
67	feraiseexcept(FE_UNDERFLOW);
68	else
69	feraiseexcept(FE_INEXACT);
70	}
71	#endif
72	z = result;
73	return z;
74	}
75
76	/*
77	* If result is inexact, and exactly halfway between two float values,
78	* we need to adjust the low-order bit in the direction of the error.
79	*/
80	double err;
81	int neg = u.i >> 63;
82	if (neg == (z > xy))
83	err = xy - result + z;
84	else
85	err = z - result + xy;
86	if (neg == (err < 0))
87	u.i++;
88	else
89	u.i--;
90	z = u.f;
91	return z;
92	}

lib/libc/wasi/libc-top-half/musl/src/math/fmaxl.c deleted-21

...	@@ -1,21 +0,0 @@
1	#include <math.h>
2	#include <float.h>
3
4	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
5	long double fmaxl(long double x, long double y)
6	{
7	return fmax(x, y);
8	}
9	#else
10	long double fmaxl(long double x, long double y)
11	{
12	if (isnan(x))
13	return y;
14	if (isnan(y))
15	return x;
16	/* handle signed zeros, see C99 Annex F.9.9.2 */
17	if (signbit(x) != signbit(y))
18	return signbit(x) ? y : x;
19	return x < y ? y : x;
20	}
21	#endif

lib/libc/wasi/libc-top-half/musl/src/math/fminl.c deleted-21

...	@@ -1,21 +0,0 @@
1	#include <math.h>
2	#include <float.h>
3
4	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
5	long double fminl(long double x, long double y)
6	{
7	return fmin(x, y);
8	}
9	#else
10	long double fminl(long double x, long double y)
11	{
12	if (isnan(x))
13	return y;
14	if (isnan(y))
15	return x;
16	/* handle signed zeros, see C99 Annex F.9.9.2 */
17	if (signbit(x) != signbit(y))
18	return signbit(x) ? x : y;
19	return x < y ? x : y;
20	}
21	#endif

lib/libc/wasi/libc-top-half/musl/src/math/fmod.c deleted-68

...	@@ -1,68 +0,0 @@
1	#include <math.h>
2	#include <stdint.h>
3
4	double fmod(double x, double y)
5	{
6	union {double f; uint64_t i;} ux = {x}, uy = {y};
7	int ex = ux.i>>52 & 0x7ff;
8	int ey = uy.i>>52 & 0x7ff;
9	int sx = ux.i>>63;
10	uint64_t i;
11
12	/* in the followings uxi should be ux.i, but then gcc wrongly adds */
13	/* float load/store to inner loops ruining performance and code size */
14	uint64_t uxi = ux.i;
15
16	if (uy.i<<1 == 0 \|\| isnan(y) \|\| ex == 0x7ff)
17	return (xy)/(xy);
18	if (uxi<<1 <= uy.i<<1) {
19	if (uxi<<1 == uy.i<<1)
20	return 0*x;
21	return x;
22	}
23
24	/* normalize x and y */
25	if (!ex) {
26	for (i = uxi<<12; i>>63 == 0; ex--, i <<= 1);
27	uxi <<= -ex + 1;
28	} else {
29	uxi &= -1ULL >> 12;
30	uxi \|= 1ULL << 52;
31	}
32	if (!ey) {
33	for (i = uy.i<<12; i>>63 == 0; ey--, i <<= 1);
34	uy.i <<= -ey + 1;
35	} else {
36	uy.i &= -1ULL >> 12;
37	uy.i \|= 1ULL << 52;
38	}
39
40	/* x mod y */
41	for (; ex > ey; ex--) {
42	i = uxi - uy.i;
43	if (i >> 63 == 0) {
44	if (i == 0)
45	return 0*x;
46	uxi = i;
47	}
48	uxi <<= 1;
49	}
50	i = uxi - uy.i;
51	if (i >> 63 == 0) {
52	if (i == 0)
53	return 0*x;
54	uxi = i;
55	}
56	for (; uxi>>52 == 0; uxi <<= 1, ex--);
57
58	/* scale result */
59	if (ex > 0) {
60	uxi -= 1ULL << 52;
61	uxi \|= (uint64_t)ex << 52;
62	} else {
63	uxi >>= -ex + 1;
64	}
65	uxi \|= (uint64_t)sx << 63;
66	ux.i = uxi;
67	return ux.f;
68	}

lib/libc/wasi/libc-top-half/musl/src/math/fmodf.c deleted-65

...	@@ -1,65 +0,0 @@
1	#include <math.h>
2	#include <stdint.h>
3
4	float fmodf(float x, float y)
5	{
6	union {float f; uint32_t i;} ux = {x}, uy = {y};
7	int ex = ux.i>>23 & 0xff;
8	int ey = uy.i>>23 & 0xff;
9	uint32_t sx = ux.i & 0x80000000;
10	uint32_t i;
11	uint32_t uxi = ux.i;
12
13	if (uy.i<<1 == 0 \|\| isnan(y) \|\| ex == 0xff)
14	return (xy)/(xy);
15	if (uxi<<1 <= uy.i<<1) {
16	if (uxi<<1 == uy.i<<1)
17	return 0*x;
18	return x;
19	}
20
21	/* normalize x and y */
22	if (!ex) {
23	for (i = uxi<<9; i>>31 == 0; ex--, i <<= 1);
24	uxi <<= -ex + 1;
25	} else {
26	uxi &= -1U >> 9;
27	uxi \|= 1U << 23;
28	}
29	if (!ey) {
30	for (i = uy.i<<9; i>>31 == 0; ey--, i <<= 1);
31	uy.i <<= -ey + 1;
32	} else {
33	uy.i &= -1U >> 9;
34	uy.i \|= 1U << 23;
35	}
36
37	/* x mod y */
38	for (; ex > ey; ex--) {
39	i = uxi - uy.i;
40	if (i >> 31 == 0) {
41	if (i == 0)
42	return 0*x;
43	uxi = i;
44	}
45	uxi <<= 1;
46	}
47	i = uxi - uy.i;
48	if (i >> 31 == 0) {
49	if (i == 0)
50	return 0*x;
51	uxi = i;
52	}
53	for (; uxi>>23 == 0; uxi <<= 1, ex--);
54
55	/* scale result up */
56	if (ex > 0) {
57	uxi -= 1U << 23;
58	uxi \|= (uint32_t)ex << 23;
59	} else {
60	uxi >>= -ex + 1;
61	}
62	uxi \|= sx;
63	ux.i = uxi;
64	return ux.f;
65	}

lib/libc/wasi/libc-top-half/musl/src/math/fmodl.c deleted-105

...	@@ -1,105 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double fmodl(long double x, long double y)
5	{
6	return fmod(x, y);
7	}
8	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
9	long double fmodl(long double x, long double y)
10	{
11	union ldshape ux = {x}, uy = {y};
12	int ex = ux.i.se & 0x7fff;
13	int ey = uy.i.se & 0x7fff;
14	int sx = ux.i.se & 0x8000;
15
16	if (y == 0 \|\| isnan(y) \|\| ex == 0x7fff)
17	return (xy)/(xy);
18	ux.i.se = ex;
19	uy.i.se = ey;
20	if (ux.f <= uy.f) {
21	if (ux.f == uy.f)
22	return 0*x;
23	return x;
24	}
25
26	/* normalize x and y */
27	if (!ex) {
28	ux.f *= 0x1p120f;
29	ex = ux.i.se - 120;
30	}
31	if (!ey) {
32	uy.f *= 0x1p120f;
33	ey = uy.i.se - 120;
34	}
35
36	/* x mod y */
37	#if LDBL_MANT_DIG == 64
38	uint64_t i, mx, my;
39	mx = ux.i.m;
40	my = uy.i.m;
41	for (; ex > ey; ex--) {
42	i = mx - my;
43	if (mx >= my) {
44	if (i == 0)
45	return 0*x;
46	mx = 2*i;
47	} else if (2*mx < mx) {
48	mx = 2*mx - my;
49	} else {
50	mx = 2*mx;
51	}
52	}
53	i = mx - my;
54	if (mx >= my) {
55	if (i == 0)
56	return 0*x;
57	mx = i;
58	}
59	for (; mx >> 63 == 0; mx *= 2, ex--);
60	ux.i.m = mx;
61	#elif LDBL_MANT_DIG == 113
62	uint64_t hi, lo, xhi, xlo, yhi, ylo;
63	xhi = (ux.i2.hi & -1ULL>>16) \| 1ULL<<48;
64	yhi = (uy.i2.hi & -1ULL>>16) \| 1ULL<<48;
65	xlo = ux.i2.lo;
66	ylo = uy.i2.lo;
67	for (; ex > ey; ex--) {
68	hi = xhi - yhi;
69	lo = xlo - ylo;
70	if (xlo < ylo)
71	hi -= 1;
72	if (hi >> 63 == 0) {
73	if ((hi\|lo) == 0)
74	return 0*x;
75	xhi = 2*hi + (lo>>63);
76	xlo = 2*lo;
77	} else {
78	xhi = 2*xhi + (xlo>>63);
79	xlo = 2*xlo;
80	}
81	}
82	hi = xhi - yhi;
83	lo = xlo - ylo;
84	if (xlo < ylo)
85	hi -= 1;
86	if (hi >> 63 == 0) {
87	if ((hi\|lo) == 0)
88	return 0*x;
89	xhi = hi;
90	xlo = lo;
91	}
92	for (; xhi >> 48 == 0; xhi = 2xhi + (xlo>>63), xlo = 2xlo, ex--);
93	ux.i2.hi = xhi;
94	ux.i2.lo = xlo;
95	#endif
96
97	/* scale result */
98	if (ex <= 0) {
99	ux.i.se = (ex+120)\|sx;
100	ux.f *= 0x1p-120f;
101	} else
102	ux.i.se = ex\|sx;
103	return ux.f;
104	}
105	#endif

lib/libc/wasi/libc-top-half/musl/src/math/frexp.c deleted-23

...	@@ -1,23 +0,0 @@
1	#include <math.h>
2	#include <stdint.h>
3
4	double frexp(double x, int *e)
5	{
6	union { double d; uint64_t i; } y = { x };
7	int ee = y.i>>52 & 0x7ff;
8
9	if (!ee) {
10	if (x) {
11	x = frexp(x*0x1p64, e);
12	*e -= 64;
13	} else *e = 0;
14	return x;
15	} else if (ee == 0x7ff) {
16	return x;
17	}
18
19	*e = ee - 0x3fe;
20	y.i &= 0x800fffffffffffffull;
21	y.i \|= 0x3fe0000000000000ull;
22	return y.d;
23	}

lib/libc/wasi/libc-top-half/musl/src/math/frexpf.c deleted-23

...	@@ -1,23 +0,0 @@
1	#include <math.h>
2	#include <stdint.h>
3
4	float frexpf(float x, int *e)
5	{
6	union { float f; uint32_t i; } y = { x };
7	int ee = y.i>>23 & 0xff;
8
9	if (!ee) {
10	if (x) {
11	x = frexpf(x*0x1p64, e);
12	*e -= 64;
13	} else *e = 0;
14	return x;
15	} else if (ee == 0xff) {
16	return x;
17	}
18
19	*e = ee - 0x7e;
20	y.i &= 0x807ffffful;
21	y.i \|= 0x3f000000ul;
22	return y.f;
23	}

lib/libc/wasi/libc-top-half/musl/src/math/frexpl.c deleted-29

...	@@ -1,29 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double frexpl(long double x, int *e)
5	{
6	return frexp(x, e);
7	}
8	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
9	long double frexpl(long double x, int *e)
10	{
11	union ldshape u = {x};
12	int ee = u.i.se & 0x7fff;
13
14	if (!ee) {
15	if (x) {
16	x = frexpl(x*0x1p120, e);
17	*e -= 120;
18	} else *e = 0;
19	return x;
20	} else if (ee == 0x7fff) {
21	return x;
22	}
23
24	*e = ee - 0x3ffe;
25	u.i.se &= 0x8000;
26	u.i.se \|= 0x3ffe;
27	return u.f;
28	}
29	#endif

lib/libc/wasi/libc-top-half/musl/src/math/hypot.c deleted-67

...	@@ -1,67 +0,0 @@
1	#include <math.h>
2	#include <stdint.h>
3	#include <float.h>
4
5	#if FLT_EVAL_METHOD > 1U && LDBL_MANT_DIG == 64
6	#define SPLIT (0x1p32 + 1)
7	#else
8	#define SPLIT (0x1p27 + 1)
9	#endif
10
11	static void sq(double_t hi, double_t lo, double x)
12	{
13	double_t xh, xl, xc;
14
15	xc = (double_t)x*SPLIT;
16	xh = x - xc + xc;
17	xl = x - xh;
18	hi = (double_t)xx;
19	lo = xhxh - hi + 2xhxl + xlxl;
20	}
21
22	double hypot(double x, double y)
23	{
24	union {double f; uint64_t i;} ux = {x}, uy = {y}, ut;
25	int ex, ey;
26	double_t hx, lx, hy, ly, z;
27
28	/* arrange \|x\| >= \|y\| */
29	ux.i &= -1ULL>>1;
30	uy.i &= -1ULL>>1;
31	if (ux.i < uy.i) {
32	ut = ux;
33	ux = uy;
34	uy = ut;
35	}
36
37	/* special cases */
38	ex = ux.i>>52;
39	ey = uy.i>>52;
40	x = ux.f;
41	y = uy.f;
42	/* note: hypot(inf,nan) == inf */
43	if (ey == 0x7ff)
44	return y;
45	if (ex == 0x7ff \|\| uy.i == 0)
46	return x;
47	/* note: hypot(x,y) ~= x + yy/x/2 with inexact for small y/x /
48	/* 64 difference is enough for ld80 double_t */
49	if (ex - ey > 64)
50	return x + y;
51
52	/* precise sqrt argument in nearest rounding mode without overflow */
53	/* xhxh must not overflow and xlxl must not underflow in sq */
54	z = 1;
55	if (ex > 0x3ff+510) {
56	z = 0x1p700;
57	x *= 0x1p-700;
58	y *= 0x1p-700;
59	} else if (ey < 0x3ff-450) {
60	z = 0x1p-700;
61	x *= 0x1p700;
62	y *= 0x1p700;
63	}
64	sq(&hx, &lx, x);
65	sq(&hy, &ly, y);
66	return z*sqrt(ly+lx+hy+hx);
67	}

lib/libc/wasi/libc-top-half/musl/src/math/hypotf.c deleted-35

...	@@ -1,35 +0,0 @@
1	#include <math.h>
2	#include <stdint.h>
3
4	float hypotf(float x, float y)
5	{
6	union {float f; uint32_t i;} ux = {x}, uy = {y}, ut;
7	float_t z;
8
9	ux.i &= -1U>>1;
10	uy.i &= -1U>>1;
11	if (ux.i < uy.i) {
12	ut = ux;
13	ux = uy;
14	uy = ut;
15	}
16
17	x = ux.f;
18	y = uy.f;
19	if (uy.i == 0xff<<23)
20	return y;
21	if (ux.i >= 0xff<<23 \|\| uy.i == 0 \|\| ux.i - uy.i >= 25<<23)
22	return x + y;
23
24	z = 1;
25	if (ux.i >= (0x7f+60)<<23) {
26	z = 0x1p90f;
27	x *= 0x1p-90f;
28	y *= 0x1p-90f;
29	} else if (uy.i < (0x7f-60)<<23) {
30	z = 0x1p-90f;
31	x *= 0x1p90f;
32	y *= 0x1p90f;
33	}
34	return zsqrtf((double)xx + (double)y*y);
35	}

lib/libc/wasi/libc-top-half/musl/src/math/hypotl.c deleted-66

...	@@ -1,66 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double hypotl(long double x, long double y)
5	{
6	return hypot(x, y);
7	}
8	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
9	#if LDBL_MANT_DIG == 64
10	#define SPLIT (0x1p32L+1)
11	#elif LDBL_MANT_DIG == 113
12	#define SPLIT (0x1p57L+1)
13	#endif
14
15	static void sq(long double hi, long double lo, long double x)
16	{
17	long double xh, xl, xc;
18	xc = x*SPLIT;
19	xh = x - xc + xc;
20	xl = x - xh;
21	hi = xx;
22	lo = xhxh - hi + 2xhxl + xlxl;
23	}
24
25	long double hypotl(long double x, long double y)
26	{
27	union ldshape ux = {x}, uy = {y};
28	int ex, ey;
29	long double hx, lx, hy, ly, z;
30
31	ux.i.se &= 0x7fff;
32	uy.i.se &= 0x7fff;
33	if (ux.i.se < uy.i.se) {
34	ex = uy.i.se;
35	ey = ux.i.se;
36	x = uy.f;
37	y = ux.f;
38	} else {
39	ex = ux.i.se;
40	ey = uy.i.se;
41	x = ux.f;
42	y = uy.f;
43	}
44
45	if (ex == 0x7fff && isinf(y))
46	return y;
47	if (ex == 0x7fff \|\| y == 0)
48	return x;
49	if (ex - ey > LDBL_MANT_DIG)
50	return x + y;
51
52	z = 1;
53	if (ex > 0x3fff+8000) {
54	z = 0x1p10000L;
55	x *= 0x1p-10000L;
56	y *= 0x1p-10000L;
57	} else if (ey < 0x3fff-8000) {
58	z = 0x1p-10000L;
59	x *= 0x1p10000L;
60	y *= 0x1p10000L;
61	}
62	sq(&hx, &lx, x);
63	sq(&hy, &ly, y);
64	return z*sqrtl(ly+lx+hy+hx);
65	}
66	#endif

lib/libc/wasi/libc-top-half/musl/src/math/ilogb.c deleted-26

...	@@ -1,26 +0,0 @@
1	#include <limits.h>
2	#include "libm.h"
3
4	int ilogb(double x)
5	{
6	#pragma STDC FENV_ACCESS ON
7	union {double f; uint64_t i;} u = {x};
8	uint64_t i = u.i;
9	int e = i>>52 & 0x7ff;
10
11	if (!e) {
12	i <<= 12;
13	if (i == 0) {
14	FORCE_EVAL(0/0.0f);
15	return FP_ILOGB0;
16	}
17	/* subnormal x */
18	for (e = -0x3ff; i>>63 == 0; e--, i<<=1);
19	return e;
20	}
21	if (e == 0x7ff) {
22	FORCE_EVAL(0/0.0f);
23	return i<<12 ? FP_ILOGBNAN : INT_MAX;
24	}
25	return e - 0x3ff;
26	}

lib/libc/wasi/libc-top-half/musl/src/math/ilogbf.c deleted-26

...	@@ -1,26 +0,0 @@
1	#include <limits.h>
2	#include "libm.h"
3
4	int ilogbf(float x)
5	{
6	#pragma STDC FENV_ACCESS ON
7	union {float f; uint32_t i;} u = {x};
8	uint32_t i = u.i;
9	int e = i>>23 & 0xff;
10
11	if (!e) {
12	i <<= 9;
13	if (i == 0) {
14	FORCE_EVAL(0/0.0f);
15	return FP_ILOGB0;
16	}
17	/* subnormal x */
18	for (e = -0x7f; i>>31 == 0; e--, i<<=1);
19	return e;
20	}
21	if (e == 0xff) {
22	FORCE_EVAL(0/0.0f);
23	return i<<9 ? FP_ILOGBNAN : INT_MAX;
24	}
25	return e - 0x7f;
26	}

lib/libc/wasi/libc-top-half/musl/src/math/ilogbl.c deleted-55

...	@@ -1,55 +0,0 @@
1	#include <limits.h>
2	#include "libm.h"
3
4	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
5	int ilogbl(long double x)
6	{
7	return ilogb(x);
8	}
9	#elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
10	int ilogbl(long double x)
11	{
12	#pragma STDC FENV_ACCESS ON
13	union ldshape u = {x};
14	uint64_t m = u.i.m;
15	int e = u.i.se & 0x7fff;
16
17	if (!e) {
18	if (m == 0) {
19	FORCE_EVAL(0/0.0f);
20	return FP_ILOGB0;
21	}
22	/* subnormal x */
23	for (e = -0x3fff+1; m>>63 == 0; e--, m<<=1);
24	return e;
25	}
26	if (e == 0x7fff) {
27	FORCE_EVAL(0/0.0f);
28	return m<<1 ? FP_ILOGBNAN : INT_MAX;
29	}
30	return e - 0x3fff;
31	}
32	#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
33	int ilogbl(long double x)
34	{
35	#pragma STDC FENV_ACCESS ON
36	union ldshape u = {x};
37	int e = u.i.se & 0x7fff;
38
39	if (!e) {
40	if (x == 0) {
41	FORCE_EVAL(0/0.0f);
42	return FP_ILOGB0;
43	}
44	/* subnormal x */
45	x *= 0x1p120;
46	return ilogbl(x) - 120;
47	}
48	if (e == 0x7fff) {
49	FORCE_EVAL(0/0.0f);
50	u.i.se = 0;
51	return u.f ? FP_ILOGBNAN : INT_MAX;
52	}
53	return e - 0x3fff;
54	}
55	#endif

lib/libc/wasi/libc-top-half/musl/src/math/j0.c deleted-375

...	@@ -1,375 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_j0.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunSoft, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/* j0(x), y0(x)
13	* Bessel function of the first and second kinds of order zero.
14	* Method -- j0(x):
15	* 1. For tiny x, we use j0(x) = 1 - x^2/4 + x^4/64 - ...
16	* 2. Reduce x to \|x\| since j0(x)=j0(-x), and
17	* for x in (0,2)
18	* j0(x) = 1-z/4+ z^2R0/S0, where z = xx;
19	* (precision: \|j0-1+z/4-z^2R0/S0 \|<2**-63.67 )
20	* for x in (2,inf)
21	* j0(x) = sqrt(2/(pix))(p0(x)cos(x0)-q0(x)sin(x0))
22	* where x0 = x-pi/4. It is better to compute sin(x0),cos(x0)
23	* as follow:
24	* cos(x0) = cos(x)cos(pi/4)+sin(x)sin(pi/4)
25	* = 1/sqrt(2) * (cos(x) + sin(x))
26	* sin(x0) = sin(x)cos(pi/4)-cos(x)sin(pi/4)
27	* = 1/sqrt(2) * (sin(x) - cos(x))
28	* (To avoid cancellation, use
29	* sin(x) +- cos(x) = -cos(2x)/(sin(x) -+ cos(x))
30	* to compute the worse one.)
31	*
32	* 3 Special cases
33	* j0(nan)= nan
34	* j0(0) = 1
35	* j0(inf) = 0
36	*
37	* Method -- y0(x):
38	* 1. For x<2.
39	* Since
40	* y0(x) = 2/pi(j0(x)(ln(x/2)+Euler) + x^2/4 - ...)
41	* therefore y0(x)-2/pij0(x)ln(x) is an even function.
42	* We use the following function to approximate y0,
43	* y0(x) = U(z)/V(z) + (2/pi)(j0(x)ln(x)), z= x^2
44	* where
45	* U(z) = u00 + u01z + ... + u06z^6
46	* V(z) = 1 + v01z + ... + v04z^4
47	* with absolute approximation error bounded by 2**-72.
48	* Note: For tiny x, U/V = u0 and j0(x)~1, hence
49	* y0(tiny) = u0 + (2/pi)ln(tiny), (choose tiny<2*-27)
50	* 2. For x>=2.
51	* y0(x) = sqrt(2/(pix))(p0(x)cos(x0)+q0(x)sin(x0))
52	* where x0 = x-pi/4. It is better to compute sin(x0),cos(x0)
53	* by the method mentioned above.
54	* 3. Special cases: y0(0)=-inf, y0(x<0)=NaN, y0(inf)=0.
55	*/
56
57	#include "libm.h"
58
59	static double pzero(double), qzero(double);
60
61	static const double
62	invsqrtpi = 5.64189583547756279280e-01, /* 0x3FE20DD7, 0x50429B6D */
63	tpi = 6.36619772367581382433e-01; /* 0x3FE45F30, 0x6DC9C883 */
64
65	/* common method when \|x\|>=2 */
66	static double common(uint32_t ix, double x, int y0)
67	{
68	double s,c,ss,cc,z;
69
70	/*
71	* j0(x) = sqrt(2/(pix))(p0(x)cos(x-pi/4)-q0(x)sin(x-pi/4))
72	* y0(x) = sqrt(2/(pix))(p0(x)sin(x-pi/4)+q0(x)cos(x-pi/4))
73	*
74	* sin(x-pi/4) = (sin(x) - cos(x))/sqrt(2)
75	* cos(x-pi/4) = (sin(x) + cos(x))/sqrt(2)
76	* sin(x) +- cos(x) = -cos(2x)/(sin(x) -+ cos(x))
77	*/
78	s = sin(x);
79	c = cos(x);
80	if (y0)
81	c = -c;
82	cc = s+c;
83	/* avoid overflow in 2x, big ulp error when x>=0x1p1023 /
84	if (ix < 0x7fe00000) {
85	ss = s-c;
86	z = -cos(2*x);
87	if (s*c < 0)
88	cc = z/ss;
89	else
90	ss = z/cc;
91	if (ix < 0x48000000) {
92	if (y0)
93	ss = -ss;
94	cc = pzero(x)cc-qzero(x)ss;
95	}
96	}
97	return invsqrtpi*cc/sqrt(x);
98	}
99
100	/* R0/S0 on [0, 2.00] */
101	static const double
102	R02 = 1.56249999999999947958e-02, /* 0x3F8FFFFF, 0xFFFFFFFD */
103	R03 = -1.89979294238854721751e-04, /* 0xBF28E6A5, 0xB61AC6E9 */
104	R04 = 1.82954049532700665670e-06, /* 0x3EBEB1D1, 0x0C503919 */
105	R05 = -4.61832688532103189199e-09, /* 0xBE33D5E7, 0x73D63FCE */
106	S01 = 1.56191029464890010492e-02, /* 0x3F8FFCE8, 0x82C8C2A4 */
107	S02 = 1.16926784663337450260e-04, /* 0x3F1EA6D2, 0xDD57DBF4 */
108	S03 = 5.13546550207318111446e-07, /* 0x3EA13B54, 0xCE84D5A9 */
109	S04 = 1.16614003333790000205e-09; /* 0x3E1408BC, 0xF4745D8F */
110
111	double j0(double x)
112	{
113	double z,r,s;
114	uint32_t ix;
115
116	GET_HIGH_WORD(ix, x);
117	ix &= 0x7fffffff;
118
119	/* j0(+-inf)=0, j0(nan)=nan */
120	if (ix >= 0x7ff00000)
121	return 1/(x*x);
122	x = fabs(x);
123
124	if (ix >= 0x40000000) { /* \|x\| >= 2 */
125	/* large ulp error near zeros: 2.4, 5.52, 8.6537,.. */
126	return common(ix,x,0);
127	}
128
129	/* 1 - xx/4 + xxR(x^2)/S(x^2) /
130	if (ix >= 0x3f200000) { /* \|x\| >= 2*-13 /
131	/* up to 4ulp error close to 2 */
132	z = x*x;
133	r = z(R02+z(R03+z(R04+zR05)));
134	s = 1+z(S01+z(S02+z(S03+zS04)));
135	return (1+x/2)(1-x/2) + z(r/s);
136	}
137
138	/* 1 - xx/4 /
139	/* prevent underflow */
140	/* inexact should be raised when x!=0, this is not done correctly */
141	if (ix >= 0x38000000) /* \|x\| >= 2*-127 /
142	x = 0.25xx;
143	return 1 - x;
144	}
145
146	static const double
147	u00 = -7.38042951086872317523e-02, /* 0xBFB2E4D6, 0x99CBD01F */
148	u01 = 1.76666452509181115538e-01, /* 0x3FC69D01, 0x9DE9E3FC */
149	u02 = -1.38185671945596898896e-02, /* 0xBF8C4CE8, 0xB16CFA97 */
150	u03 = 3.47453432093683650238e-04, /* 0x3F36C54D, 0x20B29B6B */
151	u04 = -3.81407053724364161125e-06, /* 0xBECFFEA7, 0x73D25CAD */
152	u05 = 1.95590137035022920206e-08, /* 0x3E550057, 0x3B4EABD4 */
153	u06 = -3.98205194132103398453e-11, /* 0xBDC5E43D, 0x693FB3C8 */
154	v01 = 1.27304834834123699328e-02, /* 0x3F8A1270, 0x91C9C71A */
155	v02 = 7.60068627350353253702e-05, /* 0x3F13ECBB, 0xF578C6C1 */
156	v03 = 2.59150851840457805467e-07, /* 0x3E91642D, 0x7FF202FD */
157	v04 = 4.41110311332675467403e-10; /* 0x3DFE5018, 0x3BD6D9EF */
158
159	double y0(double x)
160	{
161	double z,u,v;
162	uint32_t ix,lx;
163
164	EXTRACT_WORDS(ix, lx, x);
165
166	/* y0(nan)=nan, y0(<0)=nan, y0(0)=-inf, y0(inf)=0 */
167	if ((ix<<1 \| lx) == 0)
168	return -1/0.0;
169	if (ix>>31)
170	return 0/0.0;
171	if (ix >= 0x7ff00000)
172	return 1/x;
173
174	if (ix >= 0x40000000) { /* x >= 2 */
175	/* large ulp errors near zeros: 3.958, 7.086,.. */
176	return common(ix,x,1);
177	}
178
179	/* U(x^2)/V(x^2) + (2/pi)j0(x)log(x) */
180	if (ix >= 0x3e400000) { /* x >= 2*-27 /
181	/* large ulp error near the first zero, x ~= 0.89 */
182	z = x*x;
183	u = u00+z(u01+z(u02+z(u03+z(u04+z(u05+zu06)))));
184	v = 1.0+z(v01+z(v02+z(v03+zv04)));
185	return u/v + tpi(j0(x)log(x));
186	}
187	return u00 + tpi*log(x);
188	}
189
190	/* The asymptotic expansions of pzero is
191	* 1 - 9/128 s^2 + 11025/98304 s^4 - ..., where s = 1/x.
192	* For x >= 2, We approximate pzero by
193	* pzero(x) = 1 + (R/S)
194	* where R = pR0 + pR1s^2 + pR2s^4 + ... + pR5*s^10
195	* S = 1 + pS0s^2 + ... + pS4s^10
196	* and
197	* \| pzero(x)-1-R/S \| <= 2 ** ( -60.26)
198	*/
199	static const double pR8[6] = { /* for x in [inf, 8]=1/[0,0.125] */
200	0.00000000000000000000e+00, /* 0x00000000, 0x00000000 */
201	-7.03124999999900357484e-02, /* 0xBFB1FFFF, 0xFFFFFD32 */
202	-8.08167041275349795626e+00, /* 0xC02029D0, 0xB44FA779 */
203	-2.57063105679704847262e+02, /* 0xC0701102, 0x7B19E863 */
204	-2.48521641009428822144e+03, /* 0xC0A36A6E, 0xCD4DCAFC */
205	-5.25304380490729545272e+03, /* 0xC0B4850B, 0x36CC643D */
206	};
207	static const double pS8[5] = {
208	1.16534364619668181717e+02, /* 0x405D2233, 0x07A96751 */
209	3.83374475364121826715e+03, /* 0x40ADF37D, 0x50596938 */
210	4.05978572648472545552e+04, /* 0x40E3D2BB, 0x6EB6B05F */
211	1.16752972564375915681e+05, /* 0x40FC810F, 0x8F9FA9BD */
212	4.76277284146730962675e+04, /* 0x40E74177, 0x4F2C49DC */
213	};
214
215	static const double pR5[6] = { /* for x in [8,4.5454]=1/[0.125,0.22001] */
216	-1.14125464691894502584e-11, /* 0xBDA918B1, 0x47E495CC */
217	-7.03124940873599280078e-02, /* 0xBFB1FFFF, 0xE69AFBC6 */
218	-4.15961064470587782438e+00, /* 0xC010A370, 0xF90C6BBF */
219	-6.76747652265167261021e+01, /* 0xC050EB2F, 0x5A7D1783 */
220	-3.31231299649172967747e+02, /* 0xC074B3B3, 0x6742CC63 */
221	-3.46433388365604912451e+02, /* 0xC075A6EF, 0x28A38BD7 */
222	};
223	static const double pS5[5] = {
224	6.07539382692300335975e+01, /* 0x404E6081, 0x0C98C5DE */
225	1.05125230595704579173e+03, /* 0x40906D02, 0x5C7E2864 */
226	5.97897094333855784498e+03, /* 0x40B75AF8, 0x8FBE1D60 */
227	9.62544514357774460223e+03, /* 0x40C2CCB8, 0xFA76FA38 */
228	2.40605815922939109441e+03, /* 0x40A2CC1D, 0xC70BE864 */
229	};
230
231	static const double pR3[6] = {/* for x in [4.547,2.8571]=1/[0.2199,0.35001] */
232	-2.54704601771951915620e-09, /* 0xBE25E103, 0x6FE1AA86 */
233	-7.03119616381481654654e-02, /* 0xBFB1FFF6, 0xF7C0E24B */
234	-2.40903221549529611423e+00, /* 0xC00345B2, 0xAEA48074 */
235	-2.19659774734883086467e+01, /* 0xC035F74A, 0x4CB94E14 */
236	-5.80791704701737572236e+01, /* 0xC04D0A22, 0x420A1A45 */
237	-3.14479470594888503854e+01, /* 0xC03F72AC, 0xA892D80F */
238	};
239	static const double pS3[5] = {
240	3.58560338055209726349e+01, /* 0x4041ED92, 0x84077DD3 */
241	3.61513983050303863820e+02, /* 0x40769839, 0x464A7C0E */
242	1.19360783792111533330e+03, /* 0x4092A66E, 0x6D1061D6 */
243	1.12799679856907414432e+03, /* 0x40919FFC, 0xB8C39B7E */
244	1.73580930813335754692e+02, /* 0x4065B296, 0xFC379081 */
245	};
246
247	static const double pR2[6] = {/* for x in [2.8570,2]=1/[0.3499,0.5] */
248	-8.87534333032526411254e-08, /* 0xBE77D316, 0xE927026D */
249	-7.03030995483624743247e-02, /* 0xBFB1FF62, 0x495E1E42 */
250	-1.45073846780952986357e+00, /* 0xBFF73639, 0x8A24A843 */
251	-7.63569613823527770791e+00, /* 0xC01E8AF3, 0xEDAFA7F3 */
252	-1.11931668860356747786e+01, /* 0xC02662E6, 0xC5246303 */
253	-3.23364579351335335033e+00, /* 0xC009DE81, 0xAF8FE70F */
254	};
255	static const double pS2[5] = {
256	2.22202997532088808441e+01, /* 0x40363865, 0x908B5959 */
257	1.36206794218215208048e+02, /* 0x4061069E, 0x0EE8878F */
258	2.70470278658083486789e+02, /* 0x4070E786, 0x42EA079B */
259	1.53875394208320329881e+02, /* 0x40633C03, 0x3AB6FAFF */
260	1.46576176948256193810e+01, /* 0x402D50B3, 0x44391809 */
261	};
262
263	static double pzero(double x)
264	{
265	const double p,q;
266	double_t z,r,s;
267	uint32_t ix;
268
269	GET_HIGH_WORD(ix, x);
270	ix &= 0x7fffffff;
271	if (ix >= 0x40200000){p = pR8; q = pS8;}
272	else if (ix >= 0x40122E8B){p = pR5; q = pS5;}
273	else if (ix >= 0x4006DB6D){p = pR3; q = pS3;}
274	else /ix >= 0x40000000/ {p = pR2; q = pS2;}
275	z = 1.0/(x*x);
276	r = p[0]+z(p[1]+z(p[2]+z(p[3]+z(p[4]+z*p[5]))));
277	s = 1.0+z(q[0]+z(q[1]+z(q[2]+z(q[3]+z*q[4]))));
278	return 1.0 + r/s;
279	}
280
281
282	/* For x >= 8, the asymptotic expansions of qzero is
283	* -1/8 s + 75/1024 s^3 - ..., where s = 1/x.
284	* We approximate pzero by
285	* qzero(x) = s*(-1.25 + (R/S))
286	* where R = qR0 + qR1s^2 + qR2s^4 + ... + qR5*s^10
287	* S = 1 + qS0s^2 + ... + qS5s^12
288	* and
289	* \| qzero(x)/s +1.25-R/S \| <= 2 ** ( -61.22)
290	*/
291	static const double qR8[6] = { /* for x in [inf, 8]=1/[0,0.125] */
292	0.00000000000000000000e+00, /* 0x00000000, 0x00000000 */
293	7.32421874999935051953e-02, /* 0x3FB2BFFF, 0xFFFFFE2C */
294	1.17682064682252693899e+01, /* 0x40278952, 0x5BB334D6 */
295	5.57673380256401856059e+02, /* 0x40816D63, 0x15301825 */
296	8.85919720756468632317e+03, /* 0x40C14D99, 0x3E18F46D */
297	3.70146267776887834771e+04, /* 0x40E212D4, 0x0E901566 */
298	};
299	static const double qS8[6] = {
300	1.63776026895689824414e+02, /* 0x406478D5, 0x365B39BC */
301	8.09834494656449805916e+03, /* 0x40BFA258, 0x4E6B0563 */
302	1.42538291419120476348e+05, /* 0x41016652, 0x54D38C3F */
303	8.03309257119514397345e+05, /* 0x412883DA, 0x83A52B43 */
304	8.40501579819060512818e+05, /* 0x4129A66B, 0x28DE0B3D */
305	-3.43899293537866615225e+05, /* 0xC114FD6D, 0x2C9530C5 */
306	};
307
308	static const double qR5[6] = { /* for x in [8,4.5454]=1/[0.125,0.22001] */
309	1.84085963594515531381e-11, /* 0x3DB43D8F, 0x29CC8CD9 */
310	7.32421766612684765896e-02, /* 0x3FB2BFFF, 0xD172B04C */
311	5.83563508962056953777e+00, /* 0x401757B0, 0xB9953DD3 */
312	1.35111577286449829671e+02, /* 0x4060E392, 0x0A8788E9 */
313	1.02724376596164097464e+03, /* 0x40900CF9, 0x9DC8C481 */
314	1.98997785864605384631e+03, /* 0x409F17E9, 0x53C6E3A6 */
315	};
316	static const double qS5[6] = {
317	8.27766102236537761883e+01, /* 0x4054B1B3, 0xFB5E1543 */
318	2.07781416421392987104e+03, /* 0x40A03BA0, 0xDA21C0CE */
319	1.88472887785718085070e+04, /* 0x40D267D2, 0x7B591E6D */
320	5.67511122894947329769e+04, /* 0x40EBB5E3, 0x97E02372 */
321	3.59767538425114471465e+04, /* 0x40E19118, 0x1F7A54A0 */
322	-5.35434275601944773371e+03, /* 0xC0B4EA57, 0xBEDBC609 */
323	};
324
325	static const double qR3[6] = {/* for x in [4.547,2.8571]=1/[0.2199,0.35001] */
326	4.37741014089738620906e-09, /* 0x3E32CD03, 0x6ADECB82 */
327	7.32411180042911447163e-02, /* 0x3FB2BFEE, 0x0E8D0842 */
328	3.34423137516170720929e+00, /* 0x400AC0FC, 0x61149CF5 */
329	4.26218440745412650017e+01, /* 0x40454F98, 0x962DAEDD */
330	1.70808091340565596283e+02, /* 0x406559DB, 0xE25EFD1F */
331	1.66733948696651168575e+02, /* 0x4064D77C, 0x81FA21E0 */
332	};
333	static const double qS3[6] = {
334	4.87588729724587182091e+01, /* 0x40486122, 0xBFE343A6 */
335	7.09689221056606015736e+02, /* 0x40862D83, 0x86544EB3 */
336	3.70414822620111362994e+03, /* 0x40ACF04B, 0xE44DFC63 */
337	6.46042516752568917582e+03, /* 0x40B93C6C, 0xD7C76A28 */
338	2.51633368920368957333e+03, /* 0x40A3A8AA, 0xD94FB1C0 */
339	-1.49247451836156386662e+02, /* 0xC062A7EB, 0x201CF40F */
340	};
341
342	static const double qR2[6] = {/* for x in [2.8570,2]=1/[0.3499,0.5] */
343	1.50444444886983272379e-07, /* 0x3E84313B, 0x54F76BDB */
344	7.32234265963079278272e-02, /* 0x3FB2BEC5, 0x3E883E34 */
345	1.99819174093815998816e+00, /* 0x3FFFF897, 0xE727779C */
346	1.44956029347885735348e+01, /* 0x402CFDBF, 0xAAF96FE5 */
347	3.16662317504781540833e+01, /* 0x403FAA8E, 0x29FBDC4A */
348	1.62527075710929267416e+01, /* 0x403040B1, 0x71814BB4 */
349	};
350	static const double qS2[6] = {
351	3.03655848355219184498e+01, /* 0x403E5D96, 0xF7C07AED */
352	2.69348118608049844624e+02, /* 0x4070D591, 0xE4D14B40 */
353	8.44783757595320139444e+02, /* 0x408A6645, 0x22B3BF22 */
354	8.82935845112488550512e+02, /* 0x408B977C, 0x9C5CC214 */
355	2.12666388511798828631e+02, /* 0x406A9553, 0x0E001365 */
356	-5.31095493882666946917e+00, /* 0xC0153E6A, 0xF8B32931 */
357	};
358
359	static double qzero(double x)
360	{
361	const double p,q;
362	double_t s,r,z;
363	uint32_t ix;
364
365	GET_HIGH_WORD(ix, x);
366	ix &= 0x7fffffff;
367	if (ix >= 0x40200000){p = qR8; q = qS8;}
368	else if (ix >= 0x40122E8B){p = qR5; q = qS5;}
369	else if (ix >= 0x4006DB6D){p = qR3; q = qS3;}
370	else /ix >= 0x40000000/ {p = qR2; q = qS2;}
371	z = 1.0/(x*x);
372	r = p[0]+z(p[1]+z(p[2]+z(p[3]+z(p[4]+z*p[5]))));
373	s = 1.0+z(q[0]+z(q[1]+z(q[2]+z(q[3]+z(q[4]+zq[5])))));
374	return (-.125 + r/s)/x;
375	}

lib/libc/wasi/libc-top-half/musl/src/math/j0f.c deleted-314

...	@@ -1,314 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_j0f.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	*/
5	/*
6	* ====================================================
7	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
8	*
9	* Developed at SunPro, a Sun Microsystems, Inc. business.
10	* Permission to use, copy, modify, and distribute this
11	* software is freely granted, provided that this notice
12	* is preserved.
13	* ====================================================
14	*/
15
16	#define _GNU_SOURCE
17	#include "libm.h"
18
19	static float pzerof(float), qzerof(float);
20
21	static const float
22	invsqrtpi = 5.6418961287e-01, /* 0x3f106ebb */
23	tpi = 6.3661974669e-01; /* 0x3f22f983 */
24
25	static float common(uint32_t ix, float x, int y0)
26	{
27	float z,s,c,ss,cc;
28	/*
29	* j0(x) = 1/sqrt(pi) * (P(0,x)cc - Q(0,x)ss) / sqrt(x)
30	* y0(x) = 1/sqrt(pi) * (P(0,x)ss + Q(0,x)cc) / sqrt(x)
31	*/
32	s = sinf(x);
33	c = cosf(x);
34	if (y0)
35	c = -c;
36	cc = s+c;
37	if (ix < 0x7f000000) {
38	ss = s-c;
39	z = -cosf(2*x);
40	if (s*c < 0)
41	cc = z/ss;
42	else
43	ss = z/cc;
44	if (ix < 0x58800000) {
45	if (y0)
46	ss = -ss;
47	cc = pzerof(x)cc-qzerof(x)ss;
48	}
49	}
50	return invsqrtpi*cc/sqrtf(x);
51	}
52
53	/* R0/S0 on [0, 2.00] */
54	static const float
55	R02 = 1.5625000000e-02, /* 0x3c800000 */
56	R03 = -1.8997929874e-04, /* 0xb947352e */
57	R04 = 1.8295404516e-06, /* 0x35f58e88 */
58	R05 = -4.6183270541e-09, /* 0xb19eaf3c */
59	S01 = 1.5619102865e-02, /* 0x3c7fe744 */
60	S02 = 1.1692678527e-04, /* 0x38f53697 */
61	S03 = 5.1354652442e-07, /* 0x3509daa6 */
62	S04 = 1.1661400734e-09; /* 0x30a045e8 */
63
64	float j0f(float x)
65	{
66	float z,r,s;
67	uint32_t ix;
68
69	GET_FLOAT_WORD(ix, x);
70	ix &= 0x7fffffff;
71	if (ix >= 0x7f800000)
72	return 1/(x*x);
73	x = fabsf(x);
74
75	if (ix >= 0x40000000) { /* \|x\| >= 2 */
76	/* large ulp error near zeros */
77	return common(ix, x, 0);
78	}
79	if (ix >= 0x3a000000) { /* \|x\| >= 2*-11 /
80	/* up to 4ulp error near 2 */
81	z = x*x;
82	r = z(R02+z(R03+z(R04+zR05)));
83	s = 1+z(S01+z(S02+z(S03+zS04)));
84	return (1+x/2)(1-x/2) + z(r/s);
85	}
86	if (ix >= 0x21800000) /* \|x\| >= 2*-60 /
87	x = 0.25fxx;
88	return 1 - x;
89	}
90
91	static const float
92	u00 = -7.3804296553e-02, /* 0xbd9726b5 */
93	u01 = 1.7666645348e-01, /* 0x3e34e80d */
94	u02 = -1.3818567619e-02, /* 0xbc626746 */
95	u03 = 3.4745343146e-04, /* 0x39b62a69 */
96	u04 = -3.8140706238e-06, /* 0xb67ff53c */
97	u05 = 1.9559013964e-08, /* 0x32a802ba */
98	u06 = -3.9820518410e-11, /* 0xae2f21eb */
99	v01 = 1.2730483897e-02, /* 0x3c509385 */
100	v02 = 7.6006865129e-05, /* 0x389f65e0 */
101	v03 = 2.5915085189e-07, /* 0x348b216c */
102	v04 = 4.4111031494e-10; /* 0x2ff280c2 */
103
104	float y0f(float x)
105	{
106	float z,u,v;
107	uint32_t ix;
108
109	GET_FLOAT_WORD(ix, x);
110	if ((ix & 0x7fffffff) == 0)
111	return -1/0.0f;
112	if (ix>>31)
113	return 0/0.0f;
114	if (ix >= 0x7f800000)
115	return 1/x;
116	if (ix >= 0x40000000) { /* \|x\| >= 2.0 */
117	/* large ulp error near zeros */
118	return common(ix,x,1);
119	}
120	if (ix >= 0x39000000) { /* x >= 2*-13 /
121	/* large ulp error at x ~= 0.89 */
122	z = x*x;
123	u = u00+z(u01+z(u02+z(u03+z(u04+z(u05+zu06)))));
124	v = 1+z(v01+z(v02+z(v03+zv04)));
125	return u/v + tpi(j0f(x)logf(x));
126	}
127	return u00 + tpi*logf(x);
128	}
129
130	/* The asymptotic expansions of pzero is
131	* 1 - 9/128 s^2 + 11025/98304 s^4 - ..., where s = 1/x.
132	* For x >= 2, We approximate pzero by
133	* pzero(x) = 1 + (R/S)
134	* where R = pR0 + pR1s^2 + pR2s^4 + ... + pR5*s^10
135	* S = 1 + pS0s^2 + ... + pS4s^10
136	* and
137	* \| pzero(x)-1-R/S \| <= 2 ** ( -60.26)
138	*/
139	static const float pR8[6] = { /* for x in [inf, 8]=1/[0,0.125] */
140	0.0000000000e+00, /* 0x00000000 */
141	-7.0312500000e-02, /* 0xbd900000 */
142	-8.0816707611e+00, /* 0xc1014e86 */
143	-2.5706311035e+02, /* 0xc3808814 */
144	-2.4852163086e+03, /* 0xc51b5376 */
145	-5.2530439453e+03, /* 0xc5a4285a */
146	};
147	static const float pS8[5] = {
148	1.1653436279e+02, /* 0x42e91198 */
149	3.8337448730e+03, /* 0x456f9beb */
150	4.0597855469e+04, /* 0x471e95db */
151	1.1675296875e+05, /* 0x47e4087c */
152	4.7627726562e+04, /* 0x473a0bba */
153	};
154	static const float pR5[6] = { /* for x in [8,4.5454]=1/[0.125,0.22001] */
155	-1.1412546255e-11, /* 0xad48c58a */
156	-7.0312492549e-02, /* 0xbd8fffff */
157	-4.1596107483e+00, /* 0xc0851b88 */
158	-6.7674766541e+01, /* 0xc287597b */
159	-3.3123129272e+02, /* 0xc3a59d9b */
160	-3.4643338013e+02, /* 0xc3ad3779 */
161	};
162	static const float pS5[5] = {
163	6.0753936768e+01, /* 0x42730408 */
164	1.0512523193e+03, /* 0x44836813 */
165	5.9789707031e+03, /* 0x45bad7c4 */
166	9.6254453125e+03, /* 0x461665c8 */
167	2.4060581055e+03, /* 0x451660ee */
168	};
169
170	static const float pR3[6] = {/* for x in [4.547,2.8571]=1/[0.2199,0.35001] */
171	-2.5470459075e-09, /* 0xb12f081b */
172	-7.0311963558e-02, /* 0xbd8fffb8 */
173	-2.4090321064e+00, /* 0xc01a2d95 */
174	-2.1965976715e+01, /* 0xc1afba52 */
175	-5.8079170227e+01, /* 0xc2685112 */
176	-3.1447946548e+01, /* 0xc1fb9565 */
177	};
178	static const float pS3[5] = {
179	3.5856033325e+01, /* 0x420f6c94 */
180	3.6151397705e+02, /* 0x43b4c1ca */
181	1.1936077881e+03, /* 0x44953373 */
182	1.1279968262e+03, /* 0x448cffe6 */
183	1.7358093262e+02, /* 0x432d94b8 */
184	};
185
186	static const float pR2[6] = {/* for x in [2.8570,2]=1/[0.3499,0.5] */
187	-8.8753431271e-08, /* 0xb3be98b7 */
188	-7.0303097367e-02, /* 0xbd8ffb12 */
189	-1.4507384300e+00, /* 0xbfb9b1cc */
190	-7.6356959343e+00, /* 0xc0f4579f */
191	-1.1193166733e+01, /* 0xc1331736 */
192	-3.2336456776e+00, /* 0xc04ef40d */
193	};
194	static const float pS2[5] = {
195	2.2220300674e+01, /* 0x41b1c32d */
196	1.3620678711e+02, /* 0x430834f0 */
197	2.7047027588e+02, /* 0x43873c32 */
198	1.5387539673e+02, /* 0x4319e01a */
199	1.4657617569e+01, /* 0x416a859a */
200	};
201
202	static float pzerof(float x)
203	{
204	const float p,q;
205	float_t z,r,s;
206	uint32_t ix;
207
208	GET_FLOAT_WORD(ix, x);
209	ix &= 0x7fffffff;
210	if (ix >= 0x41000000){p = pR8; q = pS8;}
211	else if (ix >= 0x409173eb){p = pR5; q = pS5;}
212	else if (ix >= 0x4036d917){p = pR3; q = pS3;}
213	else /ix >= 0x40000000/ {p = pR2; q = pS2;}
214	z = 1.0f/(x*x);
215	r = p[0]+z(p[1]+z(p[2]+z(p[3]+z(p[4]+z*p[5]))));
216	s = 1.0f+z(q[0]+z(q[1]+z(q[2]+z(q[3]+z*q[4]))));
217	return 1.0f + r/s;
218	}
219
220
221	/* For x >= 8, the asymptotic expansions of qzero is
222	* -1/8 s + 75/1024 s^3 - ..., where s = 1/x.
223	* We approximate pzero by
224	* qzero(x) = s*(-1.25 + (R/S))
225	* where R = qR0 + qR1s^2 + qR2s^4 + ... + qR5*s^10
226	* S = 1 + qS0s^2 + ... + qS5s^12
227	* and
228	* \| qzero(x)/s +1.25-R/S \| <= 2 ** ( -61.22)
229	*/
230	static const float qR8[6] = { /* for x in [inf, 8]=1/[0,0.125] */
231	0.0000000000e+00, /* 0x00000000 */
232	7.3242187500e-02, /* 0x3d960000 */
233	1.1768206596e+01, /* 0x413c4a93 */
234	5.5767340088e+02, /* 0x440b6b19 */
235	8.8591972656e+03, /* 0x460a6cca */
236	3.7014625000e+04, /* 0x471096a0 */
237	};
238	static const float qS8[6] = {
239	1.6377603149e+02, /* 0x4323c6aa */
240	8.0983447266e+03, /* 0x45fd12c2 */
241	1.4253829688e+05, /* 0x480b3293 */
242	8.0330925000e+05, /* 0x49441ed4 */
243	8.4050156250e+05, /* 0x494d3359 */
244	-3.4389928125e+05, /* 0xc8a7eb69 */
245	};
246
247	static const float qR5[6] = { /* for x in [8,4.5454]=1/[0.125,0.22001] */
248	1.8408595828e-11, /* 0x2da1ec79 */
249	7.3242180049e-02, /* 0x3d95ffff */
250	5.8356351852e+00, /* 0x40babd86 */
251	1.3511157227e+02, /* 0x43071c90 */
252	1.0272437744e+03, /* 0x448067cd */
253	1.9899779053e+03, /* 0x44f8bf4b */
254	};
255	static const float qS5[6] = {
256	8.2776611328e+01, /* 0x42a58da0 */
257	2.0778142090e+03, /* 0x4501dd07 */
258	1.8847289062e+04, /* 0x46933e94 */
259	5.6751113281e+04, /* 0x475daf1d */
260	3.5976753906e+04, /* 0x470c88c1 */
261	-5.3543427734e+03, /* 0xc5a752be */
262	};
263
264	static const float qR3[6] = {/* for x in [4.547,2.8571]=1/[0.2199,0.35001] */
265	4.3774099900e-09, /* 0x3196681b */
266	7.3241114616e-02, /* 0x3d95ff70 */
267	3.3442313671e+00, /* 0x405607e3 */
268	4.2621845245e+01, /* 0x422a7cc5 */
269	1.7080809021e+02, /* 0x432acedf */
270	1.6673394775e+02, /* 0x4326bbe4 */
271	};
272	static const float qS3[6] = {
273	4.8758872986e+01, /* 0x42430916 */
274	7.0968920898e+02, /* 0x44316c1c */
275	3.7041481934e+03, /* 0x4567825f */
276	6.4604252930e+03, /* 0x45c9e367 */
277	2.5163337402e+03, /* 0x451d4557 */
278	-1.4924745178e+02, /* 0xc3153f59 */
279	};
280
281	static const float qR2[6] = {/* for x in [2.8570,2]=1/[0.3499,0.5] */
282	1.5044444979e-07, /* 0x342189db */
283	7.3223426938e-02, /* 0x3d95f62a */
284	1.9981917143e+00, /* 0x3fffc4bf */
285	1.4495602608e+01, /* 0x4167edfd */
286	3.1666231155e+01, /* 0x41fd5471 */
287	1.6252708435e+01, /* 0x4182058c */
288	};
289	static const float qS2[6] = {
290	3.0365585327e+01, /* 0x41f2ecb8 */
291	2.6934811401e+02, /* 0x4386ac8f */
292	8.4478375244e+02, /* 0x44533229 */
293	8.8293585205e+02, /* 0x445cbbe5 */
294	2.1266638184e+02, /* 0x4354aa98 */
295	-5.3109550476e+00, /* 0xc0a9f358 */
296	};
297
298	static float qzerof(float x)
299	{
300	const float p,q;
301	float_t s,r,z;
302	uint32_t ix;
303
304	GET_FLOAT_WORD(ix, x);
305	ix &= 0x7fffffff;
306	if (ix >= 0x41000000){p = qR8; q = qS8;}
307	else if (ix >= 0x409173eb){p = qR5; q = qS5;}
308	else if (ix >= 0x4036d917){p = qR3; q = qS3;}
309	else /ix >= 0x40000000/ {p = qR2; q = qS2;}
310	z = 1.0f/(x*x);
311	r = p[0]+z(p[1]+z(p[2]+z(p[3]+z(p[4]+z*p[5]))));
312	s = 1.0f+z(q[0]+z(q[1]+z(q[2]+z(q[3]+z(q[4]+zq[5])))));
313	return (-.125f + r/s)/x;
314	}

lib/libc/wasi/libc-top-half/musl/src/math/j1.c deleted-362

...	@@ -1,362 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_j1.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunSoft, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/* j1(x), y1(x)
13	* Bessel function of the first and second kinds of order zero.
14	* Method -- j1(x):
15	* 1. For tiny x, we use j1(x) = x/2 - x^3/16 + x^5/384 - ...
16	* 2. Reduce x to \|x\| since j1(x)=-j1(-x), and
17	* for x in (0,2)
18	* j1(x) = x/2 + xzR0/S0, where z = x*x;
19	* (precision: \|j1/x - 1/2 - R0/S0 \|<2**-61.51 )
20	* for x in (2,inf)
21	* j1(x) = sqrt(2/(pix))(p1(x)cos(x1)-q1(x)sin(x1))
22	* y1(x) = sqrt(2/(pix))(p1(x)sin(x1)+q1(x)cos(x1))
23	* where x1 = x-3*pi/4. It is better to compute sin(x1),cos(x1)
24	* as follow:
25	* cos(x1) = cos(x)cos(3pi/4)+sin(x)sin(3pi/4)
26	* = 1/sqrt(2) * (sin(x) - cos(x))
27	* sin(x1) = sin(x)cos(3pi/4)-cos(x)sin(3pi/4)
28	* = -1/sqrt(2) * (sin(x) + cos(x))
29	* (To avoid cancellation, use
30	* sin(x) +- cos(x) = -cos(2x)/(sin(x) -+ cos(x))
31	* to compute the worse one.)
32	*
33	* 3 Special cases
34	* j1(nan)= nan
35	* j1(0) = 0
36	* j1(inf) = 0
37	*
38	* Method -- y1(x):
39	* 1. screen out x<=0 cases: y1(0)=-inf, y1(x<0)=NaN
40	* 2. For x<2.
41	* Since
42	* y1(x) = 2/pi(j1(x)(ln(x/2)+Euler)-1/x-x/2+5/64*x^3-...)
43	* therefore y1(x)-2/pij1(x)ln(x)-1/x is an odd function.
44	* We use the following function to approximate y1,
45	* y1(x) = xU(z)/V(z) + (2/pi)(j1(x)*ln(x)-1/x), z= x^2
46	* where for x in [0,2] (abs err less than 2**-65.89)
47	* U(z) = U0[0] + U0[1]z + ... + U0[4]z^4
48	* V(z) = 1 + v0[0]z + ... + v0[4]z^5
49	* Note: For tiny x, 1/x dominate y1 and hence
50	* y1(tiny) = -2/pi/tiny, (choose tiny<2**-54)
51	* 3. For x>=2.
52	* y1(x) = sqrt(2/(pix))(p1(x)sin(x1)+q1(x)cos(x1))
53	* where x1 = x-3*pi/4. It is better to compute sin(x1),cos(x1)
54	* by method mentioned above.
55	*/
56
57	#include "libm.h"
58
59	static double pone(double), qone(double);
60
61	static const double
62	invsqrtpi = 5.64189583547756279280e-01, /* 0x3FE20DD7, 0x50429B6D */
63	tpi = 6.36619772367581382433e-01; /* 0x3FE45F30, 0x6DC9C883 */
64
65	static double common(uint32_t ix, double x, int y1, int sign)
66	{
67	double z,s,c,ss,cc;
68
69	/*
70	* j1(x) = sqrt(2/(pix))(p1(x)cos(x-3pi/4)-q1(x)sin(x-3pi/4))
71	* y1(x) = sqrt(2/(pix))(p1(x)sin(x-3pi/4)+q1(x)cos(x-3pi/4))
72	*
73	* sin(x-3pi/4) = -(sin(x) + cos(x))/sqrt(2)
74	* cos(x-3pi/4) = (sin(x) - cos(x))/sqrt(2)
75	* sin(x) +- cos(x) = -cos(2x)/(sin(x) -+ cos(x))
76	*/
77	s = sin(x);
78	if (y1)
79	s = -s;
80	c = cos(x);
81	cc = s-c;
82	if (ix < 0x7fe00000) {
83	/* avoid overflow in 2x /
84	ss = -s-c;
85	z = cos(2*x);
86	if (s*c > 0)
87	cc = z/ss;
88	else
89	ss = z/cc;
90	if (ix < 0x48000000) {
91	if (y1)
92	ss = -ss;
93	cc = pone(x)cc-qone(x)ss;
94	}
95	}
96	if (sign)
97	cc = -cc;
98	return invsqrtpi*cc/sqrt(x);
99	}
100
101	/* R0/S0 on [0,2] */
102	static const double
103	r00 = -6.25000000000000000000e-02, /* 0xBFB00000, 0x00000000 */
104	r01 = 1.40705666955189706048e-03, /* 0x3F570D9F, 0x98472C61 */
105	r02 = -1.59955631084035597520e-05, /* 0xBEF0C5C6, 0xBA169668 */
106	r03 = 4.96727999609584448412e-08, /* 0x3E6AAAFA, 0x46CA0BD9 */
107	s01 = 1.91537599538363460805e-02, /* 0x3F939D0B, 0x12637E53 */
108	s02 = 1.85946785588630915560e-04, /* 0x3F285F56, 0xB9CDF664 */
109	s03 = 1.17718464042623683263e-06, /* 0x3EB3BFF8, 0x333F8498 */
110	s04 = 5.04636257076217042715e-09, /* 0x3E35AC88, 0xC97DFF2C */
111	s05 = 1.23542274426137913908e-11; /* 0x3DAB2ACF, 0xCFB97ED8 */
112
113	double j1(double x)
114	{
115	double z,r,s;
116	uint32_t ix;
117	int sign;
118
119	GET_HIGH_WORD(ix, x);
120	sign = ix>>31;
121	ix &= 0x7fffffff;
122	if (ix >= 0x7ff00000)
123	return 1/(x*x);
124	if (ix >= 0x40000000) /* \|x\| >= 2 */
125	return common(ix, fabs(x), 0, sign);
126	if (ix >= 0x38000000) { /* \|x\| >= 2*-127 /
127	z = x*x;
128	r = z(r00+z(r01+z(r02+zr03)));
129	s = 1+z(s01+z(s02+z(s03+z(s04+z*s05))));
130	z = r/s;
131	} else
132	/* avoid underflow, raise inexact if x!=0 */
133	z = x;
134	return (0.5 + z)*x;
135	}
136
137	static const double U0[5] = {
138	-1.96057090646238940668e-01, /* 0xBFC91866, 0x143CBC8A */
139	5.04438716639811282616e-02, /* 0x3FA9D3C7, 0x76292CD1 */
140	-1.91256895875763547298e-03, /* 0xBF5F55E5, 0x4844F50F */
141	2.35252600561610495928e-05, /* 0x3EF8AB03, 0x8FA6B88E */
142	-9.19099158039878874504e-08, /* 0xBE78AC00, 0x569105B8 */
143	};
144	static const double V0[5] = {
145	1.99167318236649903973e-02, /* 0x3F94650D, 0x3F4DA9F0 */
146	2.02552581025135171496e-04, /* 0x3F2A8C89, 0x6C257764 */
147	1.35608801097516229404e-06, /* 0x3EB6C05A, 0x894E8CA6 */
148	6.22741452364621501295e-09, /* 0x3E3ABF1D, 0x5BA69A86 */
149	1.66559246207992079114e-11, /* 0x3DB25039, 0xDACA772A */
150	};
151
152	double y1(double x)
153	{
154	double z,u,v;
155	uint32_t ix,lx;
156
157	EXTRACT_WORDS(ix, lx, x);
158	/* y1(nan)=nan, y1(<0)=nan, y1(0)=-inf, y1(inf)=0 */
159	if ((ix<<1 \| lx) == 0)
160	return -1/0.0;
161	if (ix>>31)
162	return 0/0.0;
163	if (ix >= 0x7ff00000)
164	return 1/x;
165
166	if (ix >= 0x40000000) /* x >= 2 */
167	return common(ix, x, 1, 0);
168	if (ix < 0x3c900000) /* x < 2*-54 /
169	return -tpi/x;
170	z = x*x;
171	u = U0[0]+z(U0[1]+z(U0[2]+z(U0[3]+zU0[4])));
172	v = 1+z(V0[0]+z(V0[1]+z(V0[2]+z(V0[3]+z*V0[4]))));
173	return x(u/v) + tpi(j1(x)*log(x)-1/x);
174	}
175
176	/* For x >= 8, the asymptotic expansions of pone is
177	* 1 + 15/128 s^2 - 4725/2^15 s^4 - ..., where s = 1/x.
178	* We approximate pone by
179	* pone(x) = 1 + (R/S)
180	* where R = pr0 + pr1s^2 + pr2s^4 + ... + pr5*s^10
181	* S = 1 + ps0s^2 + ... + ps4s^10
182	* and
183	* \| pone(x)-1-R/S \| <= 2 ** ( -60.06)
184	*/
185
186	static const double pr8[6] = { /* for x in [inf, 8]=1/[0,0.125] */
187	0.00000000000000000000e+00, /* 0x00000000, 0x00000000 */
188	1.17187499999988647970e-01, /* 0x3FBDFFFF, 0xFFFFFCCE */
189	1.32394806593073575129e+01, /* 0x402A7A9D, 0x357F7FCE */
190	4.12051854307378562225e+02, /* 0x4079C0D4, 0x652EA590 */
191	3.87474538913960532227e+03, /* 0x40AE457D, 0xA3A532CC */
192	7.91447954031891731574e+03, /* 0x40BEEA7A, 0xC32782DD */
193	};
194	static const double ps8[5] = {
195	1.14207370375678408436e+02, /* 0x405C8D45, 0x8E656CAC */
196	3.65093083420853463394e+03, /* 0x40AC85DC, 0x964D274F */
197	3.69562060269033463555e+04, /* 0x40E20B86, 0x97C5BB7F */
198	9.76027935934950801311e+04, /* 0x40F7D42C, 0xB28F17BB */
199	3.08042720627888811578e+04, /* 0x40DE1511, 0x697A0B2D */
200	};
201
202	static const double pr5[6] = { /* for x in [8,4.5454]=1/[0.125,0.22001] */
203	1.31990519556243522749e-11, /* 0x3DAD0667, 0xDAE1CA7D */
204	1.17187493190614097638e-01, /* 0x3FBDFFFF, 0xE2C10043 */
205	6.80275127868432871736e+00, /* 0x401B3604, 0x6E6315E3 */
206	1.08308182990189109773e+02, /* 0x405B13B9, 0x452602ED */
207	5.17636139533199752805e+02, /* 0x40802D16, 0xD052D649 */
208	5.28715201363337541807e+02, /* 0x408085B8, 0xBB7E0CB7 */
209	};
210	static const double ps5[5] = {
211	5.92805987221131331921e+01, /* 0x404DA3EA, 0xA8AF633D */
212	9.91401418733614377743e+02, /* 0x408EFB36, 0x1B066701 */
213	5.35326695291487976647e+03, /* 0x40B4E944, 0x5706B6FB */
214	7.84469031749551231769e+03, /* 0x40BEA4B0, 0xB8A5BB15 */
215	1.50404688810361062679e+03, /* 0x40978030, 0x036F5E51 */
216	};
217
218	static const double pr3[6] = {
219	3.02503916137373618024e-09, /* 0x3E29FC21, 0xA7AD9EDD */
220	1.17186865567253592491e-01, /* 0x3FBDFFF5, 0x5B21D17B */
221	3.93297750033315640650e+00, /* 0x400F76BC, 0xE85EAD8A */
222	3.51194035591636932736e+01, /* 0x40418F48, 0x9DA6D129 */
223	9.10550110750781271918e+01, /* 0x4056C385, 0x4D2C1837 */
224	4.85590685197364919645e+01, /* 0x4048478F, 0x8EA83EE5 */
225	};
226	static const double ps3[5] = {
227	3.47913095001251519989e+01, /* 0x40416549, 0xA134069C */
228	3.36762458747825746741e+02, /* 0x40750C33, 0x07F1A75F */
229	1.04687139975775130551e+03, /* 0x40905B7C, 0x5037D523 */
230	8.90811346398256432622e+02, /* 0x408BD67D, 0xA32E31E9 */
231	1.03787932439639277504e+02, /* 0x4059F26D, 0x7C2EED53 */
232	};
233
234	static const double pr2[6] = {/* for x in [2.8570,2]=1/[0.3499,0.5] */
235	1.07710830106873743082e-07, /* 0x3E7CE9D4, 0xF65544F4 */
236	1.17176219462683348094e-01, /* 0x3FBDFF42, 0xBE760D83 */
237	2.36851496667608785174e+00, /* 0x4002F2B7, 0xF98FAEC0 */
238	1.22426109148261232917e+01, /* 0x40287C37, 0x7F71A964 */
239	1.76939711271687727390e+01, /* 0x4031B1A8, 0x177F8EE2 */
240	5.07352312588818499250e+00, /* 0x40144B49, 0xA574C1FE */
241	};
242	static const double ps2[5] = {
243	2.14364859363821409488e+01, /* 0x40356FBD, 0x8AD5ECDC */
244	1.25290227168402751090e+02, /* 0x405F5293, 0x14F92CD5 */
245	2.32276469057162813669e+02, /* 0x406D08D8, 0xD5A2DBD9 */
246	1.17679373287147100768e+02, /* 0x405D6B7A, 0xDA1884A9 */
247	8.36463893371618283368e+00, /* 0x4020BAB1, 0xF44E5192 */
248	};
249
250	static double pone(double x)
251	{
252	const double p,q;
253	double_t z,r,s;
254	uint32_t ix;
255
256	GET_HIGH_WORD(ix, x);
257	ix &= 0x7fffffff;
258	if (ix >= 0x40200000){p = pr8; q = ps8;}
259	else if (ix >= 0x40122E8B){p = pr5; q = ps5;}
260	else if (ix >= 0x4006DB6D){p = pr3; q = ps3;}
261	else /ix >= 0x40000000/ {p = pr2; q = ps2;}
262	z = 1.0/(x*x);
263	r = p[0]+z(p[1]+z(p[2]+z(p[3]+z(p[4]+z*p[5]))));
264	s = 1.0+z(q[0]+z(q[1]+z(q[2]+z(q[3]+z*q[4]))));
265	return 1.0+ r/s;
266	}
267
268	/* For x >= 8, the asymptotic expansions of qone is
269	* 3/8 s - 105/1024 s^3 - ..., where s = 1/x.
270	* We approximate pone by
271	* qone(x) = s*(0.375 + (R/S))
272	* where R = qr1s^2 + qr2s^4 + ... + qr5*s^10
273	* S = 1 + qs1s^2 + ... + qs6s^12
274	* and
275	* \| qone(x)/s -0.375-R/S \| <= 2 ** ( -61.13)
276	*/
277
278	static const double qr8[6] = { /* for x in [inf, 8]=1/[0,0.125] */
279	0.00000000000000000000e+00, /* 0x00000000, 0x00000000 */
280	-1.02539062499992714161e-01, /* 0xBFBA3FFF, 0xFFFFFDF3 */
281	-1.62717534544589987888e+01, /* 0xC0304591, 0xA26779F7 */
282	-7.59601722513950107896e+02, /* 0xC087BCD0, 0x53E4B576 */
283	-1.18498066702429587167e+04, /* 0xC0C724E7, 0x40F87415 */
284	-4.84385124285750353010e+04, /* 0xC0E7A6D0, 0x65D09C6A */
285	};
286	static const double qs8[6] = {
287	1.61395369700722909556e+02, /* 0x40642CA6, 0xDE5BCDE5 */
288	7.82538599923348465381e+03, /* 0x40BE9162, 0xD0D88419 */
289	1.33875336287249578163e+05, /* 0x4100579A, 0xB0B75E98 */
290	7.19657723683240939863e+05, /* 0x4125F653, 0x72869C19 */
291	6.66601232617776375264e+05, /* 0x412457D2, 0x7719AD5C */
292	-2.94490264303834643215e+05, /* 0xC111F969, 0x0EA5AA18 */
293	};
294
295	static const double qr5[6] = { /* for x in [8,4.5454]=1/[0.125,0.22001] */
296	-2.08979931141764104297e-11, /* 0xBDB6FA43, 0x1AA1A098 */
297	-1.02539050241375426231e-01, /* 0xBFBA3FFF, 0xCB597FEF */
298	-8.05644828123936029840e+00, /* 0xC0201CE6, 0xCA03AD4B */
299	-1.83669607474888380239e+02, /* 0xC066F56D, 0x6CA7B9B0 */
300	-1.37319376065508163265e+03, /* 0xC09574C6, 0x6931734F */
301	-2.61244440453215656817e+03, /* 0xC0A468E3, 0x88FDA79D */
302	};
303	static const double qs5[6] = {
304	8.12765501384335777857e+01, /* 0x405451B2, 0xFF5A11B2 */
305	1.99179873460485964642e+03, /* 0x409F1F31, 0xE77BF839 */
306	1.74684851924908907677e+04, /* 0x40D10F1F, 0x0D64CE29 */
307	4.98514270910352279316e+04, /* 0x40E8576D, 0xAABAD197 */
308	2.79480751638918118260e+04, /* 0x40DB4B04, 0xCF7C364B */
309	-4.71918354795128470869e+03, /* 0xC0B26F2E, 0xFCFFA004 */
310	};
311
312	static const double qr3[6] = {
313	-5.07831226461766561369e-09, /* 0xBE35CFA9, 0xD38FC84F */
314	-1.02537829820837089745e-01, /* 0xBFBA3FEB, 0x51AEED54 */
315	-4.61011581139473403113e+00, /* 0xC01270C2, 0x3302D9FF */
316	-5.78472216562783643212e+01, /* 0xC04CEC71, 0xC25D16DA */
317	-2.28244540737631695038e+02, /* 0xC06C87D3, 0x4718D55F */
318	-2.19210128478909325622e+02, /* 0xC06B66B9, 0x5F5C1BF6 */
319	};
320	static const double qs3[6] = {
321	4.76651550323729509273e+01, /* 0x4047D523, 0xCCD367E4 */
322	6.73865112676699709482e+02, /* 0x40850EEB, 0xC031EE3E */
323	3.38015286679526343505e+03, /* 0x40AA684E, 0x448E7C9A */
324	5.54772909720722782367e+03, /* 0x40B5ABBA, 0xA61D54A6 */
325	1.90311919338810798763e+03, /* 0x409DBC7A, 0x0DD4DF4B */
326	-1.35201191444307340817e+02, /* 0xC060E670, 0x290A311F */
327	};
328
329	static const double qr2[6] = {/* for x in [2.8570,2]=1/[0.3499,0.5] */
330	-1.78381727510958865572e-07, /* 0xBE87F126, 0x44C626D2 */
331	-1.02517042607985553460e-01, /* 0xBFBA3E8E, 0x9148B010 */
332	-2.75220568278187460720e+00, /* 0xC0060484, 0x69BB4EDA */
333	-1.96636162643703720221e+01, /* 0xC033A9E2, 0xC168907F */
334	-4.23253133372830490089e+01, /* 0xC04529A3, 0xDE104AAA */
335	-2.13719211703704061733e+01, /* 0xC0355F36, 0x39CF6E52 */
336	};
337	static const double qs2[6] = {
338	2.95333629060523854548e+01, /* 0x403D888A, 0x78AE64FF */
339	2.52981549982190529136e+02, /* 0x406F9F68, 0xDB821CBA */
340	7.57502834868645436472e+02, /* 0x4087AC05, 0xCE49A0F7 */
341	7.39393205320467245656e+02, /* 0x40871B25, 0x48D4C029 */
342	1.55949003336666123687e+02, /* 0x40637E5E, 0x3C3ED8D4 */
343	-4.95949898822628210127e+00, /* 0xC013D686, 0xE71BE86B */
344	};
345
346	static double qone(double x)
347	{
348	const double p,q;
349	double_t s,r,z;
350	uint32_t ix;
351
352	GET_HIGH_WORD(ix, x);
353	ix &= 0x7fffffff;
354	if (ix >= 0x40200000){p = qr8; q = qs8;}
355	else if (ix >= 0x40122E8B){p = qr5; q = qs5;}
356	else if (ix >= 0x4006DB6D){p = qr3; q = qs3;}
357	else /ix >= 0x40000000/ {p = qr2; q = qs2;}
358	z = 1.0/(x*x);
359	r = p[0]+z(p[1]+z(p[2]+z(p[3]+z(p[4]+z*p[5]))));
360	s = 1.0+z(q[0]+z(q[1]+z(q[2]+z(q[3]+z(q[4]+zq[5])))));
361	return (.375 + r/s)/x;
362	}

lib/libc/wasi/libc-top-half/musl/src/math/j1f.c deleted-310

...	@@ -1,310 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_j1f.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	*/
5	/*
6	* ====================================================
7	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
8	*
9	* Developed at SunPro, a Sun Microsystems, Inc. business.
10	* Permission to use, copy, modify, and distribute this
11	* software is freely granted, provided that this notice
12	* is preserved.
13	* ====================================================
14	*/
15
16	#define _GNU_SOURCE
17	#include "libm.h"
18
19	static float ponef(float), qonef(float);
20
21	static const float
22	invsqrtpi = 5.6418961287e-01, /* 0x3f106ebb */
23	tpi = 6.3661974669e-01; /* 0x3f22f983 */
24
25	static float common(uint32_t ix, float x, int y1, int sign)
26	{
27	double z,s,c,ss,cc;
28
29	s = sinf(x);
30	if (y1)
31	s = -s;
32	c = cosf(x);
33	cc = s-c;
34	if (ix < 0x7f000000) {
35	ss = -s-c;
36	z = cosf(2*x);
37	if (s*c > 0)
38	cc = z/ss;
39	else
40	ss = z/cc;
41	if (ix < 0x58800000) {
42	if (y1)
43	ss = -ss;
44	cc = ponef(x)cc-qonef(x)ss;
45	}
46	}
47	if (sign)
48	cc = -cc;
49	return invsqrtpi*cc/sqrtf(x);
50	}
51
52	/* R0/S0 on [0,2] */
53	static const float
54	r00 = -6.2500000000e-02, /* 0xbd800000 */
55	r01 = 1.4070566976e-03, /* 0x3ab86cfd */
56	r02 = -1.5995563444e-05, /* 0xb7862e36 */
57	r03 = 4.9672799207e-08, /* 0x335557d2 */
58	s01 = 1.9153760746e-02, /* 0x3c9ce859 */
59	s02 = 1.8594678841e-04, /* 0x3942fab6 */
60	s03 = 1.1771846857e-06, /* 0x359dffc2 */
61	s04 = 5.0463624390e-09, /* 0x31ad6446 */
62	s05 = 1.2354227016e-11; /* 0x2d59567e */
63
64	float j1f(float x)
65	{
66	float z,r,s;
67	uint32_t ix;
68	int sign;
69
70	GET_FLOAT_WORD(ix, x);
71	sign = ix>>31;
72	ix &= 0x7fffffff;
73	if (ix >= 0x7f800000)
74	return 1/(x*x);
75	if (ix >= 0x40000000) /* \|x\| >= 2 */
76	return common(ix, fabsf(x), 0, sign);
77	if (ix >= 0x39000000) { /* \|x\| >= 2*-13 /
78	z = x*x;
79	r = z(r00+z(r01+z(r02+zr03)));
80	s = 1+z(s01+z(s02+z(s03+z(s04+z*s05))));
81	z = 0.5f + r/s;
82	} else
83	z = 0.5f;
84	return z*x;
85	}
86
87	static const float U0[5] = {
88	-1.9605709612e-01, /* 0xbe48c331 */
89	5.0443872809e-02, /* 0x3d4e9e3c */
90	-1.9125689287e-03, /* 0xbafaaf2a */
91	2.3525259166e-05, /* 0x37c5581c */
92	-9.1909917899e-08, /* 0xb3c56003 */
93	};
94	static const float V0[5] = {
95	1.9916731864e-02, /* 0x3ca3286a */
96	2.0255257550e-04, /* 0x3954644b */
97	1.3560879779e-06, /* 0x35b602d4 */
98	6.2274145840e-09, /* 0x31d5f8eb */
99	1.6655924903e-11, /* 0x2d9281cf */
100	};
101
102	float y1f(float x)
103	{
104	float z,u,v;
105	uint32_t ix;
106
107	GET_FLOAT_WORD(ix, x);
108	if ((ix & 0x7fffffff) == 0)
109	return -1/0.0f;
110	if (ix>>31)
111	return 0/0.0f;
112	if (ix >= 0x7f800000)
113	return 1/x;
114	if (ix >= 0x40000000) /* \|x\| >= 2.0 */
115	return common(ix,x,1,0);
116	if (ix < 0x33000000) /* x < 2*-25 /
117	return -tpi/x;
118	z = x*x;
119	u = U0[0]+z(U0[1]+z(U0[2]+z(U0[3]+zU0[4])));
120	v = 1.0f+z(V0[0]+z(V0[1]+z(V0[2]+z(V0[3]+z*V0[4]))));
121	return x(u/v) + tpi(j1f(x)*logf(x)-1.0f/x);
122	}
123
124	/* For x >= 8, the asymptotic expansions of pone is
125	* 1 + 15/128 s^2 - 4725/2^15 s^4 - ..., where s = 1/x.
126	* We approximate pone by
127	* pone(x) = 1 + (R/S)
128	* where R = pr0 + pr1s^2 + pr2s^4 + ... + pr5*s^10
129	* S = 1 + ps0s^2 + ... + ps4s^10
130	* and
131	* \| pone(x)-1-R/S \| <= 2 ** ( -60.06)
132	*/
133
134	static const float pr8[6] = { /* for x in [inf, 8]=1/[0,0.125] */
135	0.0000000000e+00, /* 0x00000000 */
136	1.1718750000e-01, /* 0x3df00000 */
137	1.3239480972e+01, /* 0x4153d4ea */
138	4.1205184937e+02, /* 0x43ce06a3 */
139	3.8747453613e+03, /* 0x45722bed */
140	7.9144794922e+03, /* 0x45f753d6 */
141	};
142	static const float ps8[5] = {
143	1.1420736694e+02, /* 0x42e46a2c */
144	3.6509309082e+03, /* 0x45642ee5 */
145	3.6956207031e+04, /* 0x47105c35 */
146	9.7602796875e+04, /* 0x47bea166 */
147	3.0804271484e+04, /* 0x46f0a88b */
148	};
149
150	static const float pr5[6] = { /* for x in [8,4.5454]=1/[0.125,0.22001] */
151	1.3199052094e-11, /* 0x2d68333f */
152	1.1718749255e-01, /* 0x3defffff */
153	6.8027510643e+00, /* 0x40d9b023 */
154	1.0830818176e+02, /* 0x42d89dca */
155	5.1763616943e+02, /* 0x440168b7 */
156	5.2871520996e+02, /* 0x44042dc6 */
157	};
158	static const float ps5[5] = {
159	5.9280597687e+01, /* 0x426d1f55 */
160	9.9140142822e+02, /* 0x4477d9b1 */
161	5.3532670898e+03, /* 0x45a74a23 */
162	7.8446904297e+03, /* 0x45f52586 */
163	1.5040468750e+03, /* 0x44bc0180 */
164	};
165
166	static const float pr3[6] = {
167	3.0250391081e-09, /* 0x314fe10d */
168	1.1718686670e-01, /* 0x3defffab */
169	3.9329774380e+00, /* 0x407bb5e7 */
170	3.5119403839e+01, /* 0x420c7a45 */
171	9.1055007935e+01, /* 0x42b61c2a */
172	4.8559066772e+01, /* 0x42423c7c */
173	};
174	static const float ps3[5] = {
175	3.4791309357e+01, /* 0x420b2a4d */
176	3.3676245117e+02, /* 0x43a86198 */
177	1.0468714600e+03, /* 0x4482dbe3 */
178	8.9081134033e+02, /* 0x445eb3ed */
179	1.0378793335e+02, /* 0x42cf936c */
180	};
181
182	static const float pr2[6] = {/* for x in [2.8570,2]=1/[0.3499,0.5] */
183	1.0771083225e-07, /* 0x33e74ea8 */
184	1.1717621982e-01, /* 0x3deffa16 */
185	2.3685150146e+00, /* 0x401795c0 */
186	1.2242610931e+01, /* 0x4143e1bc */
187	1.7693971634e+01, /* 0x418d8d41 */
188	5.0735230446e+00, /* 0x40a25a4d */
189	};
190	static const float ps2[5] = {
191	2.1436485291e+01, /* 0x41ab7dec */
192	1.2529022980e+02, /* 0x42fa9499 */
193	2.3227647400e+02, /* 0x436846c7 */
194	1.1767937469e+02, /* 0x42eb5bd7 */
195	8.3646392822e+00, /* 0x4105d590 */
196	};
197
198	static float ponef(float x)
199	{
200	const float p,q;
201	float_t z,r,s;
202	uint32_t ix;
203
204	GET_FLOAT_WORD(ix, x);
205	ix &= 0x7fffffff;
206	if (ix >= 0x41000000){p = pr8; q = ps8;}
207	else if (ix >= 0x409173eb){p = pr5; q = ps5;}
208	else if (ix >= 0x4036d917){p = pr3; q = ps3;}
209	else /ix >= 0x40000000/ {p = pr2; q = ps2;}
210	z = 1.0f/(x*x);
211	r = p[0]+z(p[1]+z(p[2]+z(p[3]+z(p[4]+z*p[5]))));
212	s = 1.0f+z(q[0]+z(q[1]+z(q[2]+z(q[3]+z*q[4]))));
213	return 1.0f + r/s;
214	}
215
216	/* For x >= 8, the asymptotic expansions of qone is
217	* 3/8 s - 105/1024 s^3 - ..., where s = 1/x.
218	* We approximate pone by
219	* qone(x) = s*(0.375 + (R/S))
220	* where R = qr1s^2 + qr2s^4 + ... + qr5*s^10
221	* S = 1 + qs1s^2 + ... + qs6s^12
222	* and
223	* \| qone(x)/s -0.375-R/S \| <= 2 ** ( -61.13)
224	*/
225
226	static const float qr8[6] = { /* for x in [inf, 8]=1/[0,0.125] */
227	0.0000000000e+00, /* 0x00000000 */
228	-1.0253906250e-01, /* 0xbdd20000 */
229	-1.6271753311e+01, /* 0xc1822c8d */
230	-7.5960174561e+02, /* 0xc43de683 */
231	-1.1849806641e+04, /* 0xc639273a */
232	-4.8438511719e+04, /* 0xc73d3683 */
233	};
234	static const float qs8[6] = {
235	1.6139537048e+02, /* 0x43216537 */
236	7.8253862305e+03, /* 0x45f48b17 */
237	1.3387534375e+05, /* 0x4802bcd6 */
238	7.1965775000e+05, /* 0x492fb29c */
239	6.6660125000e+05, /* 0x4922be94 */
240	-2.9449025000e+05, /* 0xc88fcb48 */
241	};
242
243	static const float qr5[6] = { /* for x in [8,4.5454]=1/[0.125,0.22001] */
244	-2.0897993405e-11, /* 0xadb7d219 */
245	-1.0253904760e-01, /* 0xbdd1fffe */
246	-8.0564479828e+00, /* 0xc100e736 */
247	-1.8366960144e+02, /* 0xc337ab6b */
248	-1.3731937256e+03, /* 0xc4aba633 */
249	-2.6124443359e+03, /* 0xc523471c */
250	};
251	static const float qs5[6] = {
252	8.1276550293e+01, /* 0x42a28d98 */
253	1.9917987061e+03, /* 0x44f8f98f */
254	1.7468484375e+04, /* 0x468878f8 */
255	4.9851425781e+04, /* 0x4742bb6d */
256	2.7948074219e+04, /* 0x46da5826 */
257	-4.7191835938e+03, /* 0xc5937978 */
258	};
259
260	static const float qr3[6] = {
261	-5.0783124372e-09, /* 0xb1ae7d4f */
262	-1.0253783315e-01, /* 0xbdd1ff5b */
263	-4.6101160049e+00, /* 0xc0938612 */
264	-5.7847221375e+01, /* 0xc267638e */
265	-2.2824453735e+02, /* 0xc3643e9a */
266	-2.1921012878e+02, /* 0xc35b35cb */
267	};
268	static const float qs3[6] = {
269	4.7665153503e+01, /* 0x423ea91e */
270	6.7386511230e+02, /* 0x4428775e */
271	3.3801528320e+03, /* 0x45534272 */
272	5.5477290039e+03, /* 0x45ad5dd5 */
273	1.9031191406e+03, /* 0x44ede3d0 */
274	-1.3520118713e+02, /* 0xc3073381 */
275	};
276
277	static const float qr2[6] = {/* for x in [2.8570,2]=1/[0.3499,0.5] */
278	-1.7838172539e-07, /* 0xb43f8932 */
279	-1.0251704603e-01, /* 0xbdd1f475 */
280	-2.7522056103e+00, /* 0xc0302423 */
281	-1.9663616180e+01, /* 0xc19d4f16 */
282	-4.2325313568e+01, /* 0xc2294d1f */
283	-2.1371921539e+01, /* 0xc1aaf9b2 */
284	};
285	static const float qs2[6] = {
286	2.9533363342e+01, /* 0x41ec4454 */
287	2.5298155212e+02, /* 0x437cfb47 */
288	7.5750280762e+02, /* 0x443d602e */
289	7.3939318848e+02, /* 0x4438d92a */
290	1.5594900513e+02, /* 0x431bf2f2 */
291	-4.9594988823e+00, /* 0xc09eb437 */
292	};
293
294	static float qonef(float x)
295	{
296	const float p,q;
297	float_t s,r,z;
298	uint32_t ix;
299
300	GET_FLOAT_WORD(ix, x);
301	ix &= 0x7fffffff;
302	if (ix >= 0x41000000){p = qr8; q = qs8;}
303	else if (ix >= 0x409173eb){p = qr5; q = qs5;}
304	else if (ix >= 0x4036d917){p = qr3; q = qs3;}
305	else /ix >= 0x40000000/ {p = qr2; q = qs2;}
306	z = 1.0f/(x*x);
307	r = p[0]+z(p[1]+z(p[2]+z(p[3]+z(p[4]+z*p[5]))));
308	s = 1.0f+z(q[0]+z(q[1]+z(q[2]+z(q[3]+z(q[4]+zq[5])))));
309	return (.375f + r/s)/x;
310	}

lib/libc/wasi/libc-top-half/musl/src/math/jn.c deleted-280

...	@@ -1,280 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_jn.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunSoft, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/*
13	* jn(n, x), yn(n, x)
14	* floating point Bessel's function of the 1st and 2nd kind
15	* of order n
16	*
17	* Special cases:
18	* y0(0)=y1(0)=yn(n,0) = -inf with division by zero signal;
19	* y0(-ve)=y1(-ve)=yn(n,-ve) are NaN with invalid signal.
20	* Note 2. About jn(n,x), yn(n,x)
21	* For n=0, j0(x) is called,
22	* for n=1, j1(x) is called,
23	* for n<=x, forward recursion is used starting
24	* from values of j0(x) and j1(x).
25	* for n>x, a continued fraction approximation to
26	* j(n,x)/j(n-1,x) is evaluated and then backward
27	* recursion is used starting from a supposed value
28	* for j(n,x). The resulting value of j(0,x) is
29	* compared with the actual value to correct the
30	* supposed value of j(n,x).
31	*
32	* yn(n,x) is similar in all respects, except
33	* that forward recursion is used for all
34	* values of n>1.
35	*/
36
37	#include "libm.h"
38
39	static const double invsqrtpi = 5.64189583547756279280e-01; /* 0x3FE20DD7, 0x50429B6D */
40
41	double jn(int n, double x)
42	{
43	uint32_t ix, lx;
44	int nm1, i, sign;
45	double a, b, temp;
46
47	EXTRACT_WORDS(ix, lx, x);
48	sign = ix>>31;
49	ix &= 0x7fffffff;
50
51	if ((ix \| (lx\|-lx)>>31) > 0x7ff00000) /* nan */
52	return x;
53
54	/* J(-n,x) = (-1)^n * J(n, x), J(n, -x) = (-1)^n * J(n, x)
55	* Thus, J(-n,x) = J(n,-x)
56	*/
57	/* nm1 = \|n\|-1 is used instead of \|n\| to handle n==INT_MIN */
58	if (n == 0)
59	return j0(x);
60	if (n < 0) {
61	nm1 = -(n+1);
62	x = -x;
63	sign ^= 1;
64	} else
65	nm1 = n-1;
66	if (nm1 == 0)
67	return j1(x);
68
69	sign &= n; /* even n: 0, odd n: signbit(x) */
70	x = fabs(x);
71	if ((ix\|lx) == 0 \|\| ix == 0x7ff00000) /* if x is 0 or inf */
72	b = 0.0;
73	else if (nm1 < x) {
74	/* Safe to use J(n+1,x)=2n/x J(n,x)-J(n-1,x) /
75	if (ix >= 0x52d00000) { /* x > 2*302 /
76	/* (x >> n**2)
77	* Jn(x) = cos(x-(2n+1)pi/4)sqrt(2/x*pi)
78	* Yn(x) = sin(x-(2n+1)pi/4)sqrt(2/x*pi)
79	* Let s=sin(x), c=cos(x),
80	* xn=x-(2n+1)*pi/4, sqt2 = sqrt(2),then
81	*
82	* n sin(xn)sqt2 cos(xn)sqt2
83	* ----------------------------------
84	* 0 s-c c+s
85	* 1 -s-c -c+s
86	* 2 -s+c -c-s
87	* 3 s+c c-s
88	*/
89	switch(nm1&3) {
90	case 0: temp = -cos(x)+sin(x); break;
91	case 1: temp = -cos(x)-sin(x); break;
92	case 2: temp = cos(x)-sin(x); break;
93	default:
94	case 3: temp = cos(x)+sin(x); break;
95	}
96	b = invsqrtpi*temp/sqrt(x);
97	} else {
98	a = j0(x);
99	b = j1(x);
100	for (i=0; i<nm1; ) {
101	i++;
102	temp = b;
103	b = b(2.0i/x) - a; /* avoid underflow */
104	a = temp;
105	}
106	}
107	} else {
108	if (ix < 0x3e100000) { /* x < 2*-29 /
109	/* x is tiny, return the first Taylor expansion of J(n,x)
110	* J(n,x) = 1/n!*(x/2)^n - ...
111	*/
112	if (nm1 > 32) /* underflow */
113	b = 0.0;
114	else {
115	temp = x*0.5;
116	b = temp;
117	a = 1.0;
118	for (i=2; i<=nm1+1; i++) {
119	a = (double)i; / a = n! */
120	b = temp; / b = (x/2)^n */
121	}
122	b = b/a;
123	}
124	} else {
125	/* use backward recurrence */
126	/* x x^2 x^2
127	* J(n,x)/J(n-1,x) = ---- ------ ------ .....
128	* 2n - 2(n+1) - 2(n+2)
129	*
130	* 1 1 1
131	* (for large x) = ---- ------ ------ .....
132	* 2n 2(n+1) 2(n+2)
133	* -- - ------ - ------ -
134	* x x x
135	*
136	* Let w = 2n/x and h=2/x, then the above quotient
137	* is equal to the continued fraction:
138	* 1
139	* = -----------------------
140	* 1
141	* w - -----------------
142	* 1
143	* w+h - ---------
144	* w+2h - ...
145	*
146	* To determine how many terms needed, let
147	* Q(0) = w, Q(1) = w(w+h) - 1,
148	* Q(k) = (w+kh)Q(k-1) - Q(k-2),
149	* When Q(k) > 1e4 good for single
150	* When Q(k) > 1e9 good for double
151	* When Q(k) > 1e17 good for quadruple
152	*/
153	/* determine k */
154	double t,q0,q1,w,h,z,tmp,nf;
155	int k;
156
157	nf = nm1 + 1.0;
158	w = 2*nf/x;
159	h = 2/x;
160	z = w+h;
161	q0 = w;
162	q1 = w*z - 1.0;
163	k = 1;
164	while (q1 < 1.0e9) {
165	k += 1;
166	z += h;
167	tmp = z*q1 - q0;
168	q0 = q1;
169	q1 = tmp;
170	}
171	for (t=0.0, i=k; i>=0; i--)
172	t = 1/(2*(i+nf)/x - t);
173	a = t;
174	b = 1.0;
175	/* estimate log((2/x)^nn!) = nlog(2/x)+n*ln(n)
176	* Hence, if n*(log(2n/x)) > ...
177	* single 8.8722839355e+01
178	* double 7.09782712893383973096e+02
179	* long double 1.1356523406294143949491931077970765006170e+04
180	* then recurrent value may overflow and the result is
181	* likely underflow to zero
182	*/
183	tmp = nf*log(fabs(w));
184	if (tmp < 7.09782712893383973096e+02) {
185	for (i=nm1; i>0; i--) {
186	temp = b;
187	b = b(2.0i)/x - a;
188	a = temp;
189	}
190	} else {
191	for (i=nm1; i>0; i--) {
192	temp = b;
193	b = b(2.0i)/x - a;
194	a = temp;
195	/* scale b to avoid spurious overflow */
196	if (b > 0x1p500) {
197	a /= b;
198	t /= b;
199	b = 1.0;
200	}
201	}
202	}
203	z = j0(x);
204	w = j1(x);
205	if (fabs(z) >= fabs(w))
206	b = t*z/b;
207	else
208	b = t*w/a;
209	}
210	}
211	return sign ? -b : b;
212	}
213
214
215	double yn(int n, double x)
216	{
217	uint32_t ix, lx, ib;
218	int nm1, sign, i;
219	double a, b, temp;
220
221	EXTRACT_WORDS(ix, lx, x);
222	sign = ix>>31;
223	ix &= 0x7fffffff;
224
225	if ((ix \| (lx\|-lx)>>31) > 0x7ff00000) /* nan */
226	return x;
227	if (sign && (ix\|lx)!=0) /* x < 0 */
228	return 0/0.0;
229	if (ix == 0x7ff00000)
230	return 0.0;
231
232	if (n == 0)
233	return y0(x);
234	if (n < 0) {
235	nm1 = -(n+1);
236	sign = n&1;
237	} else {
238	nm1 = n-1;
239	sign = 0;
240	}
241	if (nm1 == 0)
242	return sign ? -y1(x) : y1(x);
243
244	if (ix >= 0x52d00000) { /* x > 2*302 /
245	/* (x >> n**2)
246	* Jn(x) = cos(x-(2n+1)pi/4)sqrt(2/x*pi)
247	* Yn(x) = sin(x-(2n+1)pi/4)sqrt(2/x*pi)
248	* Let s=sin(x), c=cos(x),
249	* xn=x-(2n+1)*pi/4, sqt2 = sqrt(2),then
250	*
251	* n sin(xn)sqt2 cos(xn)sqt2
252	* ----------------------------------
253	* 0 s-c c+s
254	* 1 -s-c -c+s
255	* 2 -s+c -c-s
256	* 3 s+c c-s
257	*/
258	switch(nm1&3) {
259	case 0: temp = -sin(x)-cos(x); break;
260	case 1: temp = -sin(x)+cos(x); break;
261	case 2: temp = sin(x)+cos(x); break;
262	default:
263	case 3: temp = sin(x)-cos(x); break;
264	}
265	b = invsqrtpi*temp/sqrt(x);
266	} else {
267	a = y0(x);
268	b = y1(x);
269	/* quit if b is -inf */
270	GET_HIGH_WORD(ib, b);
271	for (i=0; i<nm1 && ib!=0xfff00000; ){
272	i++;
273	temp = b;
274	b = (2.0i/x)b - a;
275	GET_HIGH_WORD(ib, b);
276	a = temp;
277	}
278	}
279	return sign ? -b : b;
280	}

lib/libc/wasi/libc-top-half/musl/src/math/jnf.c deleted-202

...	@@ -1,202 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_jnf.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	*/
5	/*
6	* ====================================================
7	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
8	*
9	* Developed at SunPro, a Sun Microsystems, Inc. business.
10	* Permission to use, copy, modify, and distribute this
11	* software is freely granted, provided that this notice
12	* is preserved.
13	* ====================================================
14	*/
15
16	#define _GNU_SOURCE
17	#include "libm.h"
18
19	float jnf(int n, float x)
20	{
21	uint32_t ix;
22	int nm1, sign, i;
23	float a, b, temp;
24
25	GET_FLOAT_WORD(ix, x);
26	sign = ix>>31;
27	ix &= 0x7fffffff;
28	if (ix > 0x7f800000) /* nan */
29	return x;
30
31	/* J(-n,x) = J(n,-x), use \|n\|-1 to avoid overflow in -n */
32	if (n == 0)
33	return j0f(x);
34	if (n < 0) {
35	nm1 = -(n+1);
36	x = -x;
37	sign ^= 1;
38	} else
39	nm1 = n-1;
40	if (nm1 == 0)
41	return j1f(x);
42
43	sign &= n; /* even n: 0, odd n: signbit(x) */
44	x = fabsf(x);
45	if (ix == 0 \|\| ix == 0x7f800000) /* if x is 0 or inf */
46	b = 0.0f;
47	else if (nm1 < x) {
48	/* Safe to use J(n+1,x)=2n/x J(n,x)-J(n-1,x) /
49	a = j0f(x);
50	b = j1f(x);
51	for (i=0; i<nm1; ){
52	i++;
53	temp = b;
54	b = b(2.0fi/x) - a;
55	a = temp;
56	}
57	} else {
58	if (ix < 0x35800000) { /* x < 2*-20 /
59	/* x is tiny, return the first Taylor expansion of J(n,x)
60	* J(n,x) = 1/n!*(x/2)^n - ...
61	*/
62	if (nm1 > 8) /* underflow */
63	nm1 = 8;
64	temp = 0.5f * x;
65	b = temp;
66	a = 1.0f;
67	for (i=2; i<=nm1+1; i++) {
68	a = (float)i; / a = n! */
69	b = temp; / b = (x/2)^n */
70	}
71	b = b/a;
72	} else {
73	/* use backward recurrence */
74	/* x x^2 x^2
75	* J(n,x)/J(n-1,x) = ---- ------ ------ .....
76	* 2n - 2(n+1) - 2(n+2)
77	*
78	* 1 1 1
79	* (for large x) = ---- ------ ------ .....
80	* 2n 2(n+1) 2(n+2)
81	* -- - ------ - ------ -
82	* x x x
83	*
84	* Let w = 2n/x and h=2/x, then the above quotient
85	* is equal to the continued fraction:
86	* 1
87	* = -----------------------
88	* 1
89	* w - -----------------
90	* 1
91	* w+h - ---------
92	* w+2h - ...
93	*
94	* To determine how many terms needed, let
95	* Q(0) = w, Q(1) = w(w+h) - 1,
96	* Q(k) = (w+kh)Q(k-1) - Q(k-2),
97	* When Q(k) > 1e4 good for single
98	* When Q(k) > 1e9 good for double
99	* When Q(k) > 1e17 good for quadruple
100	*/
101	/* determine k */
102	float t,q0,q1,w,h,z,tmp,nf;
103	int k;
104
105	nf = nm1+1.0f;
106	w = 2*nf/x;
107	h = 2/x;
108	z = w+h;
109	q0 = w;
110	q1 = w*z - 1.0f;
111	k = 1;
112	while (q1 < 1.0e4f) {
113	k += 1;
114	z += h;
115	tmp = z*q1 - q0;
116	q0 = q1;
117	q1 = tmp;
118	}
119	for (t=0.0f, i=k; i>=0; i--)
120	t = 1.0f/(2*(i+nf)/x-t);
121	a = t;
122	b = 1.0f;
123	/* estimate log((2/x)^nn!) = nlog(2/x)+n*ln(n)
124	* Hence, if n*(log(2n/x)) > ...
125	* single 8.8722839355e+01
126	* double 7.09782712893383973096e+02
127	* long double 1.1356523406294143949491931077970765006170e+04
128	* then recurrent value may overflow and the result is
129	* likely underflow to zero
130	*/
131	tmp = nf*logf(fabsf(w));
132	if (tmp < 88.721679688f) {
133	for (i=nm1; i>0; i--) {
134	temp = b;
135	b = 2.0fib/x - a;
136	a = temp;
137	}
138	} else {
139	for (i=nm1; i>0; i--){
140	temp = b;
141	b = 2.0fib/x - a;
142	a = temp;
143	/* scale b to avoid spurious overflow */
144	if (b > 0x1p60f) {
145	a /= b;
146	t /= b;
147	b = 1.0f;
148	}
149	}
150	}
151	z = j0f(x);
152	w = j1f(x);
153	if (fabsf(z) >= fabsf(w))
154	b = t*z/b;
155	else
156	b = t*w/a;
157	}
158	}
159	return sign ? -b : b;
160	}
161
162	float ynf(int n, float x)
163	{
164	uint32_t ix, ib;
165	int nm1, sign, i;
166	float a, b, temp;
167
168	GET_FLOAT_WORD(ix, x);
169	sign = ix>>31;
170	ix &= 0x7fffffff;
171	if (ix > 0x7f800000) /* nan */
172	return x;
173	if (sign && ix != 0) /* x < 0 */
174	return 0/0.0f;
175	if (ix == 0x7f800000)
176	return 0.0f;
177
178	if (n == 0)
179	return y0f(x);
180	if (n < 0) {
181	nm1 = -(n+1);
182	sign = n&1;
183	} else {
184	nm1 = n-1;
185	sign = 0;
186	}
187	if (nm1 == 0)
188	return sign ? -y1f(x) : y1f(x);
189
190	a = y0f(x);
191	b = y1f(x);
192	/* quit if b is -inf */
193	GET_FLOAT_WORD(ib,b);
194	for (i = 0; i < nm1 && ib != 0xff800000; ) {
195	i++;
196	temp = b;
197	b = (2.0fi/x)b - a;
198	GET_FLOAT_WORD(ib, b);
199	a = temp;
200	}
201	return sign ? -b : b;
202	}

lib/libc/wasi/libc-top-half/musl/src/math/ldexp.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <math.h>
2
3	double ldexp(double x, int n)
4	{
5	return scalbn(x, n);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/ldexpf.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <math.h>
2
3	float ldexpf(float x, int n)
4	{
5	return scalbnf(x, n);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/ldexpl.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <math.h>
2
3	long double ldexpl(long double x, int n)
4	{
5	return scalbnl(x, n);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/lgamma.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <math.h>
2	#include "libm.h"
3
4	double lgamma(double x)
5	{
6	return __lgamma_r(x, &__signgam);
7	}

lib/libc/wasi/libc-top-half/musl/src/math/lgamma_r.c deleted-283

...	@@ -1,283 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_lgamma_r.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunSoft, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*
12	*/
13	/* lgamma_r(x, signgamp)
14	* Reentrant version of the logarithm of the Gamma function
15	* with user provide pointer for the sign of Gamma(x).
16	*
17	* Method:
18	* 1. Argument Reduction for 0 < x <= 8
19	* Since gamma(1+s)=s*gamma(s), for x in [0,8], we may
20	* reduce x to a number in [1.5,2.5] by
21	* lgamma(1+s) = log(s) + lgamma(s)
22	* for example,
23	* lgamma(7.3) = log(6.3) + lgamma(6.3)
24	* = log(6.3*5.3) + lgamma(5.3)
25	* = log(6.35.34.33.32.3) + lgamma(2.3)
26	* 2. Polynomial approximation of lgamma around its
27	* minimun ymin=1.461632144968362245 to maintain monotonicity.
28	* On [ymin-0.23, ymin+0.27] (i.e., [1.23164,1.73163]), use
29	* Let z = x-ymin;
30	* lgamma(x) = -1.214862905358496078218 + z^2*poly(z)
31	* where
32	* poly(z) is a 14 degree polynomial.
33	* 2. Rational approximation in the primary interval [2,3]
34	* We use the following approximation:
35	* s = x-2.0;
36	* lgamma(x) = 0.5s + sP(s)/Q(s)
37	* with accuracy
38	* \|P/Q - (lgamma(x)-0.5s)\| < 2**-61.71
39	* Our algorithms are based on the following observation
40	*
41	* zeta(2)-1 2 zeta(3)-1 3
42	* lgamma(2+s) = s(1-Euler) + --------- s - --------- * s + ...
43	* 2 3
44	*
45	* where Euler = 0.5771... is the Euler constant, which is very
46	* close to 0.5.
47	*
48	* 3. For x>=8, we have
49	* lgamma(x)~(x-0.5)log(x)-x+0.5log(2pi)+1/(12x)-1/(360x*3)+....
50	* (better formula:
51	* lgamma(x)~(x-0.5)(log(x)-1)-.5(log(2pi)-1) + ...)
52	* Let z = 1/x, then we approximation
53	* f(z) = lgamma(x) - (x-0.5)(log(x)-1)
54	* by
55	* 3 5 11
56	* w = w0 + w1z + w2z + w3z + ... + w6z
57	* where
58	* \|w - f(z)\| < 2**-58.74
59	*
60	* 4. For negative x, since (G is gamma function)
61	* -xG(-x)G(x) = pi/sin(pi*x),
62	* we have
63	* G(x) = pi/(sin(pix)(-x)*G(-x))
64	* since G(-x) is positive, sign(G(x)) = sign(sin(pi*x)) for x<0
65	* Hence, for x<0, signgam = sign(sin(pi*x)) and
66	* lgamma(x) = log(\|Gamma(x)\|)
67	* = log(pi/(\|xsin(pix)\|)) - lgamma(-x);
68	* Note: one should avoid compute pi*(-x) directly in the
69	* computation of sin(pi*(-x)).
70	*
71	* 5. Special Cases
72	* lgamma(2+s) ~ s*(1-Euler) for tiny s
73	* lgamma(1) = lgamma(2) = 0
74	* lgamma(x) ~ -log(\|x\|) for tiny x
75	* lgamma(0) = lgamma(neg.integer) = inf and raise divide-by-zero
76	* lgamma(inf) = inf
77	* lgamma(-inf) = inf (bug for bug compatible with C99!?)
78	*
79	*/
80
81	#include "libm.h"
82
83	static const double
84	pi = 3.14159265358979311600e+00, /* 0x400921FB, 0x54442D18 */
85	a0 = 7.72156649015328655494e-02, /* 0x3FB3C467, 0xE37DB0C8 */
86	a1 = 3.22467033424113591611e-01, /* 0x3FD4A34C, 0xC4A60FAD */
87	a2 = 6.73523010531292681824e-02, /* 0x3FB13E00, 0x1A5562A7 */
88	a3 = 2.05808084325167332806e-02, /* 0x3F951322, 0xAC92547B */
89	a4 = 7.38555086081402883957e-03, /* 0x3F7E404F, 0xB68FEFE8 */
90	a5 = 2.89051383673415629091e-03, /* 0x3F67ADD8, 0xCCB7926B */
91	a6 = 1.19270763183362067845e-03, /* 0x3F538A94, 0x116F3F5D */
92	a7 = 5.10069792153511336608e-04, /* 0x3F40B6C6, 0x89B99C00 */
93	a8 = 2.20862790713908385557e-04, /* 0x3F2CF2EC, 0xED10E54D */
94	a9 = 1.08011567247583939954e-04, /* 0x3F1C5088, 0x987DFB07 */
95	a10 = 2.52144565451257326939e-05, /* 0x3EFA7074, 0x428CFA52 */
96	a11 = 4.48640949618915160150e-05, /* 0x3F07858E, 0x90A45837 */
97	tc = 1.46163214496836224576e+00, /* 0x3FF762D8, 0x6356BE3F */
98	tf = -1.21486290535849611461e-01, /* 0xBFBF19B9, 0xBCC38A42 */
99	/* tt = -(tail of tf) */
100	tt = -3.63867699703950536541e-18, /* 0xBC50C7CA, 0xA48A971F */
101	t0 = 4.83836122723810047042e-01, /* 0x3FDEF72B, 0xC8EE38A2 */
102	t1 = -1.47587722994593911752e-01, /* 0xBFC2E427, 0x8DC6C509 */
103	t2 = 6.46249402391333854778e-02, /* 0x3FB08B42, 0x94D5419B */
104	t3 = -3.27885410759859649565e-02, /* 0xBFA0C9A8, 0xDF35B713 */
105	t4 = 1.79706750811820387126e-02, /* 0x3F9266E7, 0x970AF9EC */
106	t5 = -1.03142241298341437450e-02, /* 0xBF851F9F, 0xBA91EC6A */
107	t6 = 6.10053870246291332635e-03, /* 0x3F78FCE0, 0xE370E344 */
108	t7 = -3.68452016781138256760e-03, /* 0xBF6E2EFF, 0xB3E914D7 */
109	t8 = 2.25964780900612472250e-03, /* 0x3F6282D3, 0x2E15C915 */
110	t9 = -1.40346469989232843813e-03, /* 0xBF56FE8E, 0xBF2D1AF1 */
111	t10 = 8.81081882437654011382e-04, /* 0x3F4CDF0C, 0xEF61A8E9 */
112	t11 = -5.38595305356740546715e-04, /* 0xBF41A610, 0x9C73E0EC */
113	t12 = 3.15632070903625950361e-04, /* 0x3F34AF6D, 0x6C0EBBF7 */
114	t13 = -3.12754168375120860518e-04, /* 0xBF347F24, 0xECC38C38 */
115	t14 = 3.35529192635519073543e-04, /* 0x3F35FD3E, 0xE8C2D3F4 */
116	u0 = -7.72156649015328655494e-02, /* 0xBFB3C467, 0xE37DB0C8 */
117	u1 = 6.32827064025093366517e-01, /* 0x3FE4401E, 0x8B005DFF */
118	u2 = 1.45492250137234768737e+00, /* 0x3FF7475C, 0xD119BD6F */
119	u3 = 9.77717527963372745603e-01, /* 0x3FEF4976, 0x44EA8450 */
120	u4 = 2.28963728064692451092e-01, /* 0x3FCD4EAE, 0xF6010924 */
121	u5 = 1.33810918536787660377e-02, /* 0x3F8B678B, 0xBF2BAB09 */
122	v1 = 2.45597793713041134822e+00, /* 0x4003A5D7, 0xC2BD619C */
123	v2 = 2.12848976379893395361e+00, /* 0x40010725, 0xA42B18F5 */
124	v3 = 7.69285150456672783825e-01, /* 0x3FE89DFB, 0xE45050AF */
125	v4 = 1.04222645593369134254e-01, /* 0x3FBAAE55, 0xD6537C88 */
126	v5 = 3.21709242282423911810e-03, /* 0x3F6A5ABB, 0x57D0CF61 */
127	s0 = -7.72156649015328655494e-02, /* 0xBFB3C467, 0xE37DB0C8 */
128	s1 = 2.14982415960608852501e-01, /* 0x3FCB848B, 0x36E20878 */
129	s2 = 3.25778796408930981787e-01, /* 0x3FD4D98F, 0x4F139F59 */
130	s3 = 1.46350472652464452805e-01, /* 0x3FC2BB9C, 0xBEE5F2F7 */
131	s4 = 2.66422703033638609560e-02, /* 0x3F9B481C, 0x7E939961 */
132	s5 = 1.84028451407337715652e-03, /* 0x3F5E26B6, 0x7368F239 */
133	s6 = 3.19475326584100867617e-05, /* 0x3F00BFEC, 0xDD17E945 */
134	r1 = 1.39200533467621045958e+00, /* 0x3FF645A7, 0x62C4AB74 */
135	r2 = 7.21935547567138069525e-01, /* 0x3FE71A18, 0x93D3DCDC */
136	r3 = 1.71933865632803078993e-01, /* 0x3FC601ED, 0xCCFBDF27 */
137	r4 = 1.86459191715652901344e-02, /* 0x3F9317EA, 0x742ED475 */
138	r5 = 7.77942496381893596434e-04, /* 0x3F497DDA, 0xCA41A95B */
139	r6 = 7.32668430744625636189e-06, /* 0x3EDEBAF7, 0xA5B38140 */
140	w0 = 4.18938533204672725052e-01, /* 0x3FDACFE3, 0x90C97D69 */
141	w1 = 8.33333333333329678849e-02, /* 0x3FB55555, 0x5555553B */
142	w2 = -2.77777777728775536470e-03, /* 0xBF66C16C, 0x16B02E5C */
143	w3 = 7.93650558643019558500e-04, /* 0x3F4A019F, 0x98CF38B6 */
144	w4 = -5.95187557450339963135e-04, /* 0xBF4380CB, 0x8C0FE741 */
145	w5 = 8.36339918996282139126e-04, /* 0x3F4B67BA, 0x4CDAD5D1 */
146	w6 = -1.63092934096575273989e-03; /* 0xBF5AB89D, 0x0B9E43E4 */
147
148	/* sin(pix) assuming x > 2^-100, if sin(pix)==0 the sign is arbitrary */
149	static double sin_pi(double x)
150	{
151	int n;
152
153	/* spurious inexact if odd int */
154	x = 2.0(x0.5 - floor(x0.5)); / x mod 2.0 */
155
156	n = (int)(x*4.0);
157	n = (n+1)/2;
158	x -= n*0.5f;
159	x *= pi;
160
161	switch (n) {
162	default: /* case 4: */
163	case 0: return __sin(x, 0.0, 0);
164	case 1: return __cos(x, 0.0);
165	case 2: return __sin(-x, 0.0, 0);
166	case 3: return -__cos(x, 0.0);
167	}
168	}
169
170	double __lgamma_r(double x, int *signgamp)
171	{
172	union {double f; uint64_t i;} u = {x};
173	double_t t,y,z,nadj,p,p1,p2,p3,q,r,w;
174	uint32_t ix;
175	int sign,i;
176
177	/* purge off +-inf, NaN, +-0, tiny and negative arguments */
178	*signgamp = 1;
179	sign = u.i>>63;
180	ix = u.i>>32 & 0x7fffffff;
181	if (ix >= 0x7ff00000)
182	return x*x;
183	if (ix < (0x3ff-70)<<20) { /* \|x\|<2*-70, return -log(\|x\|) /
184	if(sign) {
185	x = -x;
186	*signgamp = -1;
187	}
188	return -log(x);
189	}
190	if (sign) {
191	x = -x;
192	t = sin_pi(x);
193	if (t == 0.0) /* -integer */
194	return 1.0/(x-x);
195	if (t > 0.0)
196	*signgamp = -1;
197	else
198	t = -t;
199	nadj = log(pi/(t*x));
200	}
201
202	/* purge off 1 and 2 */
203	if ((ix == 0x3ff00000 \|\| ix == 0x40000000) && (uint32_t)u.i == 0)
204	r = 0;
205	/* for x < 2.0 */
206	else if (ix < 0x40000000) {
207	if (ix <= 0x3feccccc) { /* lgamma(x) = lgamma(x+1)-log(x) */
208	r = -log(x);
209	if (ix >= 0x3FE76944) {
210	y = 1.0 - x;
211	i = 0;
212	} else if (ix >= 0x3FCDA661) {
213	y = x - (tc-1.0);
214	i = 1;
215	} else {
216	y = x;
217	i = 2;
218	}
219	} else {
220	r = 0.0;
221	if (ix >= 0x3FFBB4C3) { /* [1.7316,2] */
222	y = 2.0 - x;
223	i = 0;
224	} else if(ix >= 0x3FF3B4C4) { /* [1.23,1.73] */
225	y = x - tc;
226	i = 1;
227	} else {
228	y = x - 1.0;
229	i = 2;
230	}
231	}
232	switch (i) {
233	case 0:
234	z = y*y;
235	p1 = a0+z(a2+z(a4+z(a6+z(a8+z*a10))));
236	p2 = z(a1+z(a3+z(a5+z(a7+z(a9+za11)))));
237	p = y*p1+p2;
238	r += (p-0.5*y);
239	break;
240	case 1:
241	z = y*y;
242	w = z*y;
243	p1 = t0+w(t3+w(t6+w(t9 +wt12))); /* parallel comp */
244	p2 = t1+w(t4+w(t7+w(t10+wt13)));
245	p3 = t2+w(t5+w(t8+w(t11+wt14)));
246	p = zp1-(tt-w(p2+y*p3));
247	r += tf + p;
248	break;
249	case 2:
250	p1 = y(u0+y(u1+y(u2+y(u3+y(u4+yu5)))));
251	p2 = 1.0+y(v1+y(v2+y(v3+y(v4+y*v5))));
252	r += -0.5*y + p1/p2;
253	}
254	} else if (ix < 0x40200000) { /* x < 8.0 */
255	i = (int)x;
256	y = x - (double)i;
257	p = y(s0+y(s1+y(s2+y(s3+y(s4+y(s5+y*s6))))));
258	q = 1.0+y(r1+y(r2+y(r3+y(r4+y(r5+yr6)))));
259	r = 0.5*y+p/q;
260	z = 1.0; /* lgamma(1+s) = log(s) + lgamma(s) */
261	switch (i) {
262	case 7: z = y + 6.0; / FALLTHRU */
263	case 6: z = y + 5.0; / FALLTHRU */
264	case 5: z = y + 4.0; / FALLTHRU */
265	case 4: z = y + 3.0; / FALLTHRU */
266	case 3: z = y + 2.0; / FALLTHRU */
267	r += log(z);
268	break;
269	}
270	} else if (ix < 0x43900000) { /* 8.0 <= x < 2*58 /
271	t = log(x);
272	z = 1.0/x;
273	y = z*z;
274	w = w0+z(w1+y(w2+y(w3+y(w4+y(w5+yw6)))));
275	r = (x-0.5)*(t-1.0)+w;
276	} else /* 2*58 <= x <= inf /
277	r = x*(log(x)-1.0);
278	if (sign)
279	r = nadj - r;
280	return r;
281	}
282
283	weak_alias(__lgamma_r, lgamma_r);

lib/libc/wasi/libc-top-half/musl/src/math/lgammaf.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <math.h>
2	#include "libm.h"
3
4	float lgammaf(float x)
5	{
6	return __lgammaf_r(x, &__signgam);
7	}

lib/libc/wasi/libc-top-half/musl/src/math/lgammaf_r.c deleted-218

...	@@ -1,218 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_lgammaf_r.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	*/
5	/*
6	* ====================================================
7	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
8	*
9	* Developed at SunPro, a Sun Microsystems, Inc. business.
10	* Permission to use, copy, modify, and distribute this
11	* software is freely granted, provided that this notice
12	* is preserved.
13	* ====================================================
14	*/
15
16	#include "libm.h"
17
18	static const float
19	pi = 3.1415927410e+00, /* 0x40490fdb */
20	a0 = 7.7215664089e-02, /* 0x3d9e233f */
21	a1 = 3.2246702909e-01, /* 0x3ea51a66 */
22	a2 = 6.7352302372e-02, /* 0x3d89f001 */
23	a3 = 2.0580807701e-02, /* 0x3ca89915 */
24	a4 = 7.3855509982e-03, /* 0x3bf2027e */
25	a5 = 2.8905137442e-03, /* 0x3b3d6ec6 */
26	a6 = 1.1927076848e-03, /* 0x3a9c54a1 */
27	a7 = 5.1006977446e-04, /* 0x3a05b634 */
28	a8 = 2.2086278477e-04, /* 0x39679767 */
29	a9 = 1.0801156895e-04, /* 0x38e28445 */
30	a10 = 2.5214456400e-05, /* 0x37d383a2 */
31	a11 = 4.4864096708e-05, /* 0x383c2c75 */
32	tc = 1.4616321325e+00, /* 0x3fbb16c3 */
33	tf = -1.2148628384e-01, /* 0xbdf8cdcd */
34	/* tt = -(tail of tf) */
35	tt = 6.6971006518e-09, /* 0x31e61c52 */
36	t0 = 4.8383611441e-01, /* 0x3ef7b95e */
37	t1 = -1.4758771658e-01, /* 0xbe17213c */
38	t2 = 6.4624942839e-02, /* 0x3d845a15 */
39	t3 = -3.2788541168e-02, /* 0xbd064d47 */
40	t4 = 1.7970675603e-02, /* 0x3c93373d */
41	t5 = -1.0314224288e-02, /* 0xbc28fcfe */
42	t6 = 6.1005386524e-03, /* 0x3bc7e707 */
43	t7 = -3.6845202558e-03, /* 0xbb7177fe */
44	t8 = 2.2596477065e-03, /* 0x3b141699 */
45	t9 = -1.4034647029e-03, /* 0xbab7f476 */
46	t10 = 8.8108185446e-04, /* 0x3a66f867 */
47	t11 = -5.3859531181e-04, /* 0xba0d3085 */
48	t12 = 3.1563205994e-04, /* 0x39a57b6b */
49	t13 = -3.1275415677e-04, /* 0xb9a3f927 */
50	t14 = 3.3552918467e-04, /* 0x39afe9f7 */
51	u0 = -7.7215664089e-02, /* 0xbd9e233f */
52	u1 = 6.3282704353e-01, /* 0x3f2200f4 */
53	u2 = 1.4549225569e+00, /* 0x3fba3ae7 */
54	u3 = 9.7771751881e-01, /* 0x3f7a4bb2 */
55	u4 = 2.2896373272e-01, /* 0x3e6a7578 */
56	u5 = 1.3381091878e-02, /* 0x3c5b3c5e */
57	v1 = 2.4559779167e+00, /* 0x401d2ebe */
58	v2 = 2.1284897327e+00, /* 0x4008392d */
59	v3 = 7.6928514242e-01, /* 0x3f44efdf */
60	v4 = 1.0422264785e-01, /* 0x3dd572af */
61	v5 = 3.2170924824e-03, /* 0x3b52d5db */
62	s0 = -7.7215664089e-02, /* 0xbd9e233f */
63	s1 = 2.1498242021e-01, /* 0x3e5c245a */
64	s2 = 3.2577878237e-01, /* 0x3ea6cc7a */
65	s3 = 1.4635047317e-01, /* 0x3e15dce6 */
66	s4 = 2.6642270386e-02, /* 0x3cda40e4 */
67	s5 = 1.8402845599e-03, /* 0x3af135b4 */
68	s6 = 3.1947532989e-05, /* 0x3805ff67 */
69	r1 = 1.3920053244e+00, /* 0x3fb22d3b */
70	r2 = 7.2193557024e-01, /* 0x3f38d0c5 */
71	r3 = 1.7193385959e-01, /* 0x3e300f6e */
72	r4 = 1.8645919859e-02, /* 0x3c98bf54 */
73	r5 = 7.7794247773e-04, /* 0x3a4beed6 */
74	r6 = 7.3266842264e-06, /* 0x36f5d7bd */
75	w0 = 4.1893854737e-01, /* 0x3ed67f1d */
76	w1 = 8.3333335817e-02, /* 0x3daaaaab */
77	w2 = -2.7777778450e-03, /* 0xbb360b61 */
78	w3 = 7.9365057172e-04, /* 0x3a500cfd */
79	w4 = -5.9518753551e-04, /* 0xba1c065c */
80	w5 = 8.3633989561e-04, /* 0x3a5b3dd2 */
81	w6 = -1.6309292987e-03; /* 0xbad5c4e8 */
82
83	/* sin(pix) assuming x > 2^-100, if sin(pix)==0 the sign is arbitrary */
84	static float sin_pi(float x)
85	{
86	double_t y;
87	int n;
88
89	/* spurious inexact if odd int */
90	x = 2(x0.5f - floorf(x0.5f)); / x mod 2.0 */
91
92	n = (int)(x*4);
93	n = (n+1)/2;
94	y = x - n*0.5f;
95	y *= 3.14159265358979323846;
96	switch (n) {
97	default: /* case 4: */
98	case 0: return __sindf(y);
99	case 1: return __cosdf(y);
100	case 2: return __sindf(-y);
101	case 3: return -__cosdf(y);
102	}
103	}
104
105	float __lgammaf_r(float x, int *signgamp)
106	{
107	union {float f; uint32_t i;} u = {x};
108	float t,y,z,nadj,p,p1,p2,p3,q,r,w;
109	uint32_t ix;
110	int i,sign;
111
112	/* purge off +-inf, NaN, +-0, tiny and negative arguments */
113	*signgamp = 1;
114	sign = u.i>>31;
115	ix = u.i & 0x7fffffff;
116	if (ix >= 0x7f800000)
117	return x*x;
118	if (ix < 0x35000000) { /* \|x\| < 2*-21, return -log(\|x\|) /
119	if (sign) {
120	*signgamp = -1;
121	x = -x;
122	}
123	return -logf(x);
124	}
125	if (sign) {
126	x = -x;
127	t = sin_pi(x);
128	if (t == 0.0f) /* -integer */
129	return 1.0f/(x-x);
130	if (t > 0.0f)
131	*signgamp = -1;
132	else
133	t = -t;
134	nadj = logf(pi/(t*x));
135	}
136
137	/* purge off 1 and 2 */
138	if (ix == 0x3f800000 \|\| ix == 0x40000000)
139	r = 0;
140	/* for x < 2.0 */
141	else if (ix < 0x40000000) {
142	if (ix <= 0x3f666666) { /* lgamma(x) = lgamma(x+1)-log(x) */
143	r = -logf(x);
144	if (ix >= 0x3f3b4a20) {
145	y = 1.0f - x;
146	i = 0;
147	} else if (ix >= 0x3e6d3308) {
148	y = x - (tc-1.0f);
149	i = 1;
150	} else {
151	y = x;
152	i = 2;
153	}
154	} else {
155	r = 0.0f;
156	if (ix >= 0x3fdda618) { /* [1.7316,2] */
157	y = 2.0f - x;
158	i = 0;
159	} else if (ix >= 0x3F9da620) { /* [1.23,1.73] */
160	y = x - tc;
161	i = 1;
162	} else {
163	y = x - 1.0f;
164	i = 2;
165	}
166	}
167	switch(i) {
168	case 0:
169	z = y*y;
170	p1 = a0+z(a2+z(a4+z(a6+z(a8+z*a10))));
171	p2 = z(a1+z(a3+z(a5+z(a7+z(a9+za11)))));
172	p = y*p1+p2;
173	r += p - 0.5f*y;
174	break;
175	case 1:
176	z = y*y;
177	w = z*y;
178	p1 = t0+w(t3+w(t6+w(t9 +wt12))); /* parallel comp */
179	p2 = t1+w(t4+w(t7+w(t10+wt13)));
180	p3 = t2+w(t5+w(t8+w(t11+wt14)));
181	p = zp1-(tt-w(p2+y*p3));
182	r += (tf + p);
183	break;
184	case 2:
185	p1 = y(u0+y(u1+y(u2+y(u3+y(u4+yu5)))));
186	p2 = 1.0f+y(v1+y(v2+y(v3+y(v4+y*v5))));
187	r += -0.5f*y + p1/p2;
188	}
189	} else if (ix < 0x41000000) { /* x < 8.0 */
190	i = (int)x;
191	y = x - (float)i;
192	p = y(s0+y(s1+y(s2+y(s3+y(s4+y(s5+y*s6))))));
193	q = 1.0f+y(r1+y(r2+y(r3+y(r4+y(r5+yr6)))));
194	r = 0.5f*y+p/q;
195	z = 1.0f; /* lgamma(1+s) = log(s) + lgamma(s) */
196	switch (i) {
197	case 7: z = y + 6.0f; / FALLTHRU */
198	case 6: z = y + 5.0f; / FALLTHRU */
199	case 5: z = y + 4.0f; / FALLTHRU */
200	case 4: z = y + 3.0f; / FALLTHRU */
201	case 3: z = y + 2.0f; / FALLTHRU */
202	r += logf(z);
203	break;
204	}
205	} else if (ix < 0x5c800000) { /* 8.0 <= x < 2*58 /
206	t = logf(x);
207	z = 1.0f/x;
208	y = z*z;
209	w = w0+z(w1+y(w2+y(w3+y(w4+y(w5+yw6)))));
210	r = (x-0.5f)*(t-1.0f)+w;
211	} else /* 2*58 <= x <= inf /
212	r = x*(logf(x)-1.0f);
213	if (sign)
214	r = nadj - r;
215	return r;
216	}
217
218	weak_alias(__lgammaf_r, lgammaf_r);

lib/libc/wasi/libc-top-half/musl/src/math/lgammal.c deleted-353

...	@@ -1,353 +0,0 @@
1	/* origin: OpenBSD /usr/src/lib/libm/src/ld80/e_lgammal.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunPro, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/*
13	* Copyright (c) 2008 Stephen L. Moshier <steve@moshier.net>
14	*
15	* Permission to use, copy, modify, and distribute this software for any
16	* purpose with or without fee is hereby granted, provided that the above
17	* copyright notice and this permission notice appear in all copies.
18	*
19	* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
20	* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
21	* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
22	* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
23	* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
24	* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
25	* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
26	*/
27	/* lgammal(x)
28	* Reentrant version of the logarithm of the Gamma function
29	* with user provide pointer for the sign of Gamma(x).
30	*
31	* Method:
32	* 1. Argument Reduction for 0 < x <= 8
33	* Since gamma(1+s)=s*gamma(s), for x in [0,8], we may
34	* reduce x to a number in [1.5,2.5] by
35	* lgamma(1+s) = log(s) + lgamma(s)
36	* for example,
37	* lgamma(7.3) = log(6.3) + lgamma(6.3)
38	* = log(6.3*5.3) + lgamma(5.3)
39	* = log(6.35.34.33.32.3) + lgamma(2.3)
40	* 2. Polynomial approximation of lgamma around its
41	* minimun ymin=1.461632144968362245 to maintain monotonicity.
42	* On [ymin-0.23, ymin+0.27] (i.e., [1.23164,1.73163]), use
43	* Let z = x-ymin;
44	* lgamma(x) = -1.214862905358496078218 + z^2*poly(z)
45	* 2. Rational approximation in the primary interval [2,3]
46	* We use the following approximation:
47	* s = x-2.0;
48	* lgamma(x) = 0.5s + sP(s)/Q(s)
49	* Our algorithms are based on the following observation
50	*
51	* zeta(2)-1 2 zeta(3)-1 3
52	* lgamma(2+s) = s(1-Euler) + --------- s - --------- * s + ...
53	* 2 3
54	*
55	* where Euler = 0.5771... is the Euler constant, which is very
56	* close to 0.5.
57	*
58	* 3. For x>=8, we have
59	* lgamma(x)~(x-0.5)log(x)-x+0.5log(2pi)+1/(12x)-1/(360x*3)+....
60	* (better formula:
61	* lgamma(x)~(x-0.5)(log(x)-1)-.5(log(2pi)-1) + ...)
62	* Let z = 1/x, then we approximation
63	* f(z) = lgamma(x) - (x-0.5)(log(x)-1)
64	* by
65	* 3 5 11
66	* w = w0 + w1z + w2z + w3z + ... + w6z
67	*
68	* 4. For negative x, since (G is gamma function)
69	* -xG(-x)G(x) = pi/sin(pi*x),
70	* we have
71	* G(x) = pi/(sin(pix)(-x)*G(-x))
72	* since G(-x) is positive, sign(G(x)) = sign(sin(pi*x)) for x<0
73	* Hence, for x<0, signgam = sign(sin(pi*x)) and
74	* lgamma(x) = log(\|Gamma(x)\|)
75	* = log(pi/(\|xsin(pix)\|)) - lgamma(-x);
76	* Note: one should avoid compute pi*(-x) directly in the
77	* computation of sin(pi*(-x)).
78	*
79	* 5. Special Cases
80	* lgamma(2+s) ~ s*(1-Euler) for tiny s
81	* lgamma(1)=lgamma(2)=0
82	* lgamma(x) ~ -log(x) for tiny x
83	* lgamma(0) = lgamma(inf) = inf
84	* lgamma(-integer) = +-inf
85	*
86	*/
87
88	#define _GNU_SOURCE
89	#include "libm.h"
90
91	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
92	long double __lgammal_r(long double x, int *sg)
93	{
94	return __lgamma_r(x, sg);
95	}
96	#elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
97	static const long double
98	pi = 3.14159265358979323846264L,
99
100	/* lgam(1+x) = 0.5 x + x a(x)/b(x)
101	-0.268402099609375 <= x <= 0
102	peak relative error 6.6e-22 */
103	a0 = -6.343246574721079391729402781192128239938E2L,
104	a1 = 1.856560238672465796768677717168371401378E3L,
105	a2 = 2.404733102163746263689288466865843408429E3L,
106	a3 = 8.804188795790383497379532868917517596322E2L,
107	a4 = 1.135361354097447729740103745999661157426E2L,
108	a5 = 3.766956539107615557608581581190400021285E0L,
109
110	b0 = 8.214973713960928795704317259806842490498E3L,
111	b1 = 1.026343508841367384879065363925870888012E4L,
112	b2 = 4.553337477045763320522762343132210919277E3L,
113	b3 = 8.506975785032585797446253359230031874803E2L,
114	b4 = 6.042447899703295436820744186992189445813E1L,
115	/* b5 = 1.000000000000000000000000000000000000000E0 */
116
117
118	tc = 1.4616321449683623412626595423257213284682E0L,
119	tf = -1.2148629053584961146050602565082954242826E-1, /* double precision */
120	/* tt = (tail of tf), i.e. tf + tt has extended precision. */
121	tt = 3.3649914684731379602768989080467587736363E-18L,
122	/* lgam ( 1.4616321449683623412626595423257213284682E0 ) =
123	-1.2148629053584960809551455717769158215135617312999903886372437313313530E-1 */
124
125	/* lgam (x + tc) = tf + tt + x g(x)/h(x)
126	-0.230003726999612341262659542325721328468 <= x
127	<= 0.2699962730003876587373404576742786715318
128	peak relative error 2.1e-21 */
129	g0 = 3.645529916721223331888305293534095553827E-18L,
130	g1 = 5.126654642791082497002594216163574795690E3L,
131	g2 = 8.828603575854624811911631336122070070327E3L,
132	g3 = 5.464186426932117031234820886525701595203E3L,
133	g4 = 1.455427403530884193180776558102868592293E3L,
134	g5 = 1.541735456969245924860307497029155838446E2L,
135	g6 = 4.335498275274822298341872707453445815118E0L,
136
137	h0 = 1.059584930106085509696730443974495979641E4L,
138	h1 = 2.147921653490043010629481226937850618860E4L,
139	h2 = 1.643014770044524804175197151958100656728E4L,
140	h3 = 5.869021995186925517228323497501767586078E3L,
141	h4 = 9.764244777714344488787381271643502742293E2L,
142	h5 = 6.442485441570592541741092969581997002349E1L,
143	/* h6 = 1.000000000000000000000000000000000000000E0 */
144
145
146	/* lgam (x+1) = -0.5 x + x u(x)/v(x)
147	-0.100006103515625 <= x <= 0.231639862060546875
148	peak relative error 1.3e-21 */
149	u0 = -8.886217500092090678492242071879342025627E1L,
150	u1 = 6.840109978129177639438792958320783599310E2L,
151	u2 = 2.042626104514127267855588786511809932433E3L,
152	u3 = 1.911723903442667422201651063009856064275E3L,
153	u4 = 7.447065275665887457628865263491667767695E2L,
154	u5 = 1.132256494121790736268471016493103952637E2L,
155	u6 = 4.484398885516614191003094714505960972894E0L,
156
157	v0 = 1.150830924194461522996462401210374632929E3L,
158	v1 = 3.399692260848747447377972081399737098610E3L,
159	v2 = 3.786631705644460255229513563657226008015E3L,
160	v3 = 1.966450123004478374557778781564114347876E3L,
161	v4 = 4.741359068914069299837355438370682773122E2L,
162	v5 = 4.508989649747184050907206782117647852364E1L,
163	/* v6 = 1.000000000000000000000000000000000000000E0 */
164
165
166	/* lgam (x+2) = .5 x + x s(x)/r(x)
167	0 <= x <= 1
168	peak relative error 7.2e-22 */
169	s0 = 1.454726263410661942989109455292824853344E6L,
170	s1 = -3.901428390086348447890408306153378922752E6L,
171	s2 = -6.573568698209374121847873064292963089438E6L,
172	s3 = -3.319055881485044417245964508099095984643E6L,
173	s4 = -7.094891568758439227560184618114707107977E5L,
174	s5 = -6.263426646464505837422314539808112478303E4L,
175	s6 = -1.684926520999477529949915657519454051529E3L,
176
177	r0 = -1.883978160734303518163008696712983134698E7L,
178	r1 = -2.815206082812062064902202753264922306830E7L,
179	r2 = -1.600245495251915899081846093343626358398E7L,
180	r3 = -4.310526301881305003489257052083370058799E6L,
181	r4 = -5.563807682263923279438235987186184968542E5L,
182	r5 = -3.027734654434169996032905158145259713083E4L,
183	r6 = -4.501995652861105629217250715790764371267E2L,
184	/* r6 = 1.000000000000000000000000000000000000000E0 */
185
186
187	/* lgam(x) = ( x - 0.5 ) * log(x) - x + LS2PI + 1/x w(1/x^2)
188	x >= 8
189	Peak relative error 1.51e-21
190	w0 = LS2PI - 0.5 */
191	w0 = 4.189385332046727417803e-1L,
192	w1 = 8.333333333333331447505E-2L,
193	w2 = -2.777777777750349603440E-3L,
194	w3 = 7.936507795855070755671E-4L,
195	w4 = -5.952345851765688514613E-4L,
196	w5 = 8.412723297322498080632E-4L,
197	w6 = -1.880801938119376907179E-3L,
198	w7 = 4.885026142432270781165E-3L;
199
200	/* sin(pix) assuming x > 2^-1000, if sin(pix)==0 the sign is arbitrary */
201	static long double sin_pi(long double x)
202	{
203	int n;
204
205	/* spurious inexact if odd int */
206	x *= 0.5;
207	x = 2.0(x - floorl(x)); / x mod 2.0 */
208
209	n = (int)(x*4.0);
210	n = (n+1)/2;
211	x -= n*0.5f;
212	x *= pi;
213
214	switch (n) {
215	default: /* case 4: */
216	case 0: return __sinl(x, 0.0, 0);
217	case 1: return __cosl(x, 0.0);
218	case 2: return __sinl(-x, 0.0, 0);
219	case 3: return -__cosl(x, 0.0);
220	}
221	}
222
223	long double __lgammal_r(long double x, int *sg) {
224	long double t, y, z, nadj, p, p1, p2, q, r, w;
225	union ldshape u = {x};
226	uint32_t ix = (u.i.se & 0x7fffU)<<16 \| u.i.m>>48;
227	int sign = u.i.se >> 15;
228	int i;
229
230	*sg = 1;
231
232	/* purge off +-inf, NaN, +-0, tiny and negative arguments */
233	if (ix >= 0x7fff0000)
234	return x * x;
235	if (ix < 0x3fc08000) { /* \|x\|<2*-63, return -log(\|x\|) /
236	if (sign) {
237	*sg = -1;
238	x = -x;
239	}
240	return -logl(x);
241	}
242	if (sign) {
243	x = -x;
244	t = sin_pi(x);
245	if (t == 0.0)
246	return 1.0 / (x-x); /* -integer */
247	if (t > 0.0)
248	*sg = -1;
249	else
250	t = -t;
251	nadj = logl(pi / (t * x));
252	}
253
254	/* purge off 1 and 2 (so the sign is ok with downward rounding) */
255	if ((ix == 0x3fff8000 \|\| ix == 0x40008000) && u.i.m == 0) {
256	r = 0;
257	} else if (ix < 0x40008000) { /* x < 2.0 */
258	if (ix <= 0x3ffee666) { /* 8.99993896484375e-1 */
259	/* lgamma(x) = lgamma(x+1) - log(x) */
260	r = -logl(x);
261	if (ix >= 0x3ffebb4a) { /* 7.31597900390625e-1 */
262	y = x - 1.0;
263	i = 0;
264	} else if (ix >= 0x3ffced33) { /* 2.31639862060546875e-1 */
265	y = x - (tc - 1.0);
266	i = 1;
267	} else { /* x < 0.23 */
268	y = x;
269	i = 2;
270	}
271	} else {
272	r = 0.0;
273	if (ix >= 0x3fffdda6) { /* 1.73162841796875 */
274	/* [1.7316,2] */
275	y = x - 2.0;
276	i = 0;
277	} else if (ix >= 0x3fff9da6) { /* 1.23162841796875 */
278	/* [1.23,1.73] */
279	y = x - tc;
280	i = 1;
281	} else {
282	/* [0.9, 1.23] */
283	y = x - 1.0;
284	i = 2;
285	}
286	}
287	switch (i) {
288	case 0:
289	p1 = a0 + y * (a1 + y * (a2 + y * (a3 + y * (a4 + y * a5))));
290	p2 = b0 + y * (b1 + y * (b2 + y * (b3 + y * (b4 + y))));
291	r += 0.5 * y + y * p1/p2;
292	break;
293	case 1:
294	p1 = g0 + y * (g1 + y * (g2 + y * (g3 + y * (g4 + y * (g5 + y * g6)))));
295	p2 = h0 + y * (h1 + y * (h2 + y * (h3 + y * (h4 + y * (h5 + y)))));
296	p = tt + y * p1/p2;
297	r += (tf + p);
298	break;
299	case 2:
300	p1 = y * (u0 + y * (u1 + y * (u2 + y * (u3 + y * (u4 + y * (u5 + y * u6))))));
301	p2 = v0 + y * (v1 + y * (v2 + y * (v3 + y * (v4 + y * (v5 + y)))));
302	r += (-0.5 * y + p1 / p2);
303	}
304	} else if (ix < 0x40028000) { /* 8.0 */
305	/* x < 8.0 */
306	i = (int)x;
307	y = x - (double)i;
308	p = y * (s0 + y * (s1 + y * (s2 + y * (s3 + y * (s4 + y * (s5 + y * s6))))));
309	q = r0 + y * (r1 + y * (r2 + y * (r3 + y * (r4 + y * (r5 + y * (r6 + y))))));
310	r = 0.5 * y + p / q;
311	z = 1.0;
312	/* lgamma(1+s) = log(s) + lgamma(s) */
313	switch (i) {
314	case 7:
315	z = (y + 6.0); / FALLTHRU */
316	case 6:
317	z = (y + 5.0); / FALLTHRU */
318	case 5:
319	z = (y + 4.0); / FALLTHRU */
320	case 4:
321	z = (y + 3.0); / FALLTHRU */
322	case 3:
323	z = (y + 2.0); / FALLTHRU */
324	r += logl(z);
325	break;
326	}
327	} else if (ix < 0x40418000) { /* 2^66 */
328	/* 8.0 <= x < 2*66 /
329	t = logl(x);
330	z = 1.0 / x;
331	y = z * z;
332	w = w0 + z * (w1 + y * (w2 + y * (w3 + y * (w4 + y * (w5 + y * (w6 + y * w7))))));
333	r = (x - 0.5) * (t - 1.0) + w;
334	} else /* 2*66 <= x <= inf /
335	r = x * (logl(x) - 1.0);
336	if (sign)
337	r = nadj - r;
338	return r;
339	}
340	#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
341	// TODO: broken implementation to make things compile
342	long double __lgammal_r(long double x, int *sg)
343	{
344	return __lgamma_r(x, sg);
345	}
346	#endif
347
348	long double lgammal(long double x)
349	{
350	return __lgammal_r(x, &__signgam);
351	}
352
353	weak_alias(__lgammal_r, lgammal_r);

lib/libc/wasi/libc-top-half/musl/src/math/llrint.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <math.h>
2
3	/* uses LLONG_MAX > 2^53, see comments in lrint.c */
4
5	long long llrint(double x)
6	{
7	return rint(x);
8	}

lib/libc/wasi/libc-top-half/musl/src/math/llrintf.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <math.h>
2
3	/* uses LLONG_MAX > 2^24, see comments in lrint.c */
4
5	long long llrintf(float x)
6	{
7	return rintf(x);
8	}

lib/libc/wasi/libc-top-half/musl/src/math/llrintl.c deleted-36

...	@@ -1,36 +0,0 @@
1	#include <limits.h>
2	#include <fenv.h>
3	#include "libm.h"
4
5
6	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
7	long long llrintl(long double x)
8	{
9	return llrint(x);
10	}
11	#elif defined(FE_INEXACT)
12	/*
13	see comments in lrint.c
14
15	Note that if LLONG_MAX == 0x7fffffffffffffff && LDBL_MANT_DIG == 64
16	then x == 2**63 - 0.5 is the only input that overflows and
17	raises inexact (with tonearest or upward rounding mode)
18	*/
19	long long llrintl(long double x)
20	{
21	#pragma STDC FENV_ACCESS ON
22	int e;
23
24	e = fetestexcept(FE_INEXACT);
25	x = rintl(x);
26	if (!e && (x > LLONG_MAX \|\| x < LLONG_MIN))
27	feclearexcept(FE_INEXACT);
28	/* conversion */
29	return x;
30	}
31	#else
32	long long llrintl(long double x)
33	{
34	return rintl(x);
35	}
36	#endif

lib/libc/wasi/libc-top-half/musl/src/math/llround.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <math.h>
2
3	long long llround(double x)
4	{
5	return round(x);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/llroundf.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <math.h>
2
3	long long llroundf(float x)
4	{
5	return roundf(x);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/llroundl.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <math.h>
2
3	long long llroundl(long double x)
4	{
5	return roundl(x);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/log.c deleted-112

...	@@ -1,112 +0,0 @@
1	/*
2	* Double-precision log(x) function.
3	*
4	* Copyright (c) 2018, Arm Limited.
5	* SPDX-License-Identifier: MIT
6	*/
7
8	#include <math.h>
9	#include <stdint.h>
10	#include "libm.h"
11	#include "log_data.h"
12
13	#define T __log_data.tab
14	#define T2 __log_data.tab2
15	#define B __log_data.poly1
16	#define A __log_data.poly
17	#define Ln2hi __log_data.ln2hi
18	#define Ln2lo __log_data.ln2lo
19	#define N (1 << LOG_TABLE_BITS)
20	#define OFF 0x3fe6000000000000
21
22	/* Top 16 bits of a double. */
23	static inline uint32_t top16(double x)
24	{
25	return asuint64(x) >> 48;
26	}
27
28	double log(double x)
29	{
30	double_t w, z, r, r2, r3, y, invc, logc, kd, hi, lo;
31	uint64_t ix, iz, tmp;
32	uint32_t top;
33	int k, i;
34
35	ix = asuint64(x);
36	top = top16(x);
37	#define LO asuint64(1.0 - 0x1p-4)
38	#define HI asuint64(1.0 + 0x1.09p-4)
39	if (predict_false(ix - LO < HI - LO)) {
40	/* Handle close to 1.0 inputs separately. */
41	/* Fix sign of zero with downward rounding when x==1. */
42	if (WANT_ROUNDING && predict_false(ix == asuint64(1.0)))
43	return 0;
44	r = x - 1.0;
45	r2 = r * r;
46	r3 = r * r2;
47	y = r3 *
48	(B[1] + r * B[2] + r2 * B[3] +
49	r3 * (B[4] + r * B[5] + r2 * B[6] +
50	r3 * (B[7] + r * B[8] + r2 * B[9] + r3 * B[10])));
51	/* Worst-case error is around 0.507 ULP. */
52	w = r * 0x1p27;
53	double_t rhi = r + w - w;
54	double_t rlo = r - rhi;
55	w = rhi * rhi * B[0]; /* B[0] == -0.5. */
56	hi = r + w;
57	lo = r - hi + w;
58	lo += B[0] * rlo * (rhi + r);
59	y += lo;
60	y += hi;
61	return eval_as_double(y);
62	}
63	if (predict_false(top - 0x0010 >= 0x7ff0 - 0x0010)) {
64	/* x < 0x1p-1022 or inf or nan. */
65	if (ix * 2 == 0)
66	return __math_divzero(1);
67	if (ix == asuint64(INFINITY)) /* log(inf) == inf. */
68	return x;
69	if ((top & 0x8000) \|\| (top & 0x7ff0) == 0x7ff0)
70	return __math_invalid(x);
71	/* x is subnormal, normalize it. */
72	ix = asuint64(x * 0x1p52);
73	ix -= 52ULL << 52;
74	}
75
76	/* x = 2^k z; where z is in range [OFF,2*OFF) and exact.
77	The range is split into N subintervals.
78	The ith subinterval contains z and c is near its center. */
79	tmp = ix - OFF;
80	i = (tmp >> (52 - LOG_TABLE_BITS)) % N;
81	k = (int64_t)tmp >> 52; /* arithmetic shift */
82	iz = ix - (tmp & 0xfffULL << 52);
83	invc = T[i].invc;
84	logc = T[i].logc;
85	z = asdouble(iz);
86
87	/* log(x) = log1p(z/c-1) + log(c) + kLn2. /
88	/* r ~= z/c - 1, \|r\| < 1/(2N). /
89	#if __FP_FAST_FMA
90	/* rounding error: 0x1p-55/N. */
91	r = __builtin_fma(z, invc, -1.0);
92	#else
93	/* rounding error: 0x1p-55/N + 0x1p-66. */
94	r = (z - T2[i].chi - T2[i].clo) * invc;
95	#endif
96	kd = (double_t)k;
97
98	/* hi + lo = r + log(c) + kLn2. /
99	w = kd * Ln2hi + logc;
100	hi = w + r;
101	lo = w - hi + r + kd * Ln2lo;
102
103	/* log(x) = lo + (log1p(r) - r) + hi. */
104	r2 = r * r; /* rounding error: 0x1p-54/N^2. */
105	/* Worst case error if \|y\| > 0x1p-5:
106	0.5 + 4.13/N + abs-poly-error*2^57 ULP (+ 0.002 ULP without fma)
107	Worst case error if \|y\| > 0x1p-4:
108	0.5 + 2.06/N + abs-poly-error2^56 ULP (+ 0.001 ULP without fma). /
109	y = lo + r2 * A[0] +
110	r * r2 * (A[1] + r * A[2] + r2 * (A[3] + r * A[4])) + hi;
111	return eval_as_double(y);
112	}

lib/libc/wasi/libc-top-half/musl/src/math/log10.c deleted-101

...	@@ -1,101 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_log10.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunSoft, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/*
13	* Return the base 10 logarithm of x. See log.c for most comments.
14	*
15	* Reduce x to 2^k (1+f) and calculate r = log(1+f) - f + f*f/2
16	* as in log.c, then combine and scale in extra precision:
17	* log10(x) = (f - ff/2 + r)/log(10) + klog10(2)
18	*/
19
20	#include <math.h>
21	#include <stdint.h>
22
23	static const double
24	ivln10hi = 4.34294481878168880939e-01, /* 0x3fdbcb7b, 0x15200000 */
25	ivln10lo = 2.50829467116452752298e-11, /* 0x3dbb9438, 0xca9aadd5 */
26	log10_2hi = 3.01029995663611771306e-01, /* 0x3FD34413, 0x509F6000 */
27	log10_2lo = 3.69423907715893078616e-13, /* 0x3D59FEF3, 0x11F12B36 */
28	Lg1 = 6.666666666666735130e-01, /* 3FE55555 55555593 */
29	Lg2 = 3.999999999940941908e-01, /* 3FD99999 9997FA04 */
30	Lg3 = 2.857142874366239149e-01, /* 3FD24924 94229359 */
31	Lg4 = 2.222219843214978396e-01, /* 3FCC71C5 1D8E78AF */
32	Lg5 = 1.818357216161805012e-01, /* 3FC74664 96CB03DE */
33	Lg6 = 1.531383769920937332e-01, /* 3FC39A09 D078C69F */
34	Lg7 = 1.479819860511658591e-01; /* 3FC2F112 DF3E5244 */
35
36	double log10(double x)
37	{
38	union {double f; uint64_t i;} u = {x};
39	double_t hfsq,f,s,z,R,w,t1,t2,dk,y,hi,lo,val_hi,val_lo;
40	uint32_t hx;
41	int k;
42
43	hx = u.i>>32;
44	k = 0;
45	if (hx < 0x00100000 \|\| hx>>31) {
46	if (u.i<<1 == 0)
47	return -1/(xx); / log(+-0)=-inf */
48	if (hx>>31)
49	return (x-x)/0.0; /* log(-#) = NaN */
50	/* subnormal number, scale x up */
51	k -= 54;
52	x *= 0x1p54;
53	u.f = x;
54	hx = u.i>>32;
55	} else if (hx >= 0x7ff00000) {
56	return x;
57	} else if (hx == 0x3ff00000 && u.i<<32 == 0)
58	return 0;
59
60	/* reduce x into [sqrt(2)/2, sqrt(2)] */
61	hx += 0x3ff00000 - 0x3fe6a09e;
62	k += (int)(hx>>20) - 0x3ff;
63	hx = (hx&0x000fffff) + 0x3fe6a09e;
64	u.i = (uint64_t)hx<<32 \| (u.i&0xffffffff);
65	x = u.f;
66
67	f = x - 1.0;
68	hfsq = 0.5ff;
69	s = f/(2.0+f);
70	z = s*s;
71	w = z*z;
72	t1 = w(Lg2+w(Lg4+w*Lg6));
73	t2 = z(Lg1+w(Lg3+w(Lg5+wLg7)));
74	R = t2 + t1;
75
76	/* See log2.c for details. */
77	/* hi+lo = f - hfsq + s(hfsq+R) ~ log(1+f) /
78	hi = f - hfsq;
79	u.f = hi;
80	u.i &= (uint64_t)-1<<32;
81	hi = u.f;
82	lo = f - hi - hfsq + s*(hfsq+R);
83
84	/* val_hi+val_lo ~ log10(1+f) + klog10(2) /
85	val_hi = hi*ivln10hi;
86	dk = k;
87	y = dk*log10_2hi;
88	val_lo = dklog10_2lo + (lo+hi)ivln10lo + lo*ivln10hi;
89
90	/*
91	* Extra precision in for adding y is not strictly needed
92	* since there is no very large cancellation near x = sqrt(2) or
93	* x = 1/sqrt(2), but we do it anyway since it costs little on CPUs
94	* with some parallelism and it reduces the error for many args.
95	*/
96	w = y + val_hi;
97	val_lo += (y - w) + val_hi;
98	val_hi = w;
99
100	return val_lo + val_hi;
101	}

lib/libc/wasi/libc-top-half/musl/src/math/log10f.c deleted-77

...	@@ -1,77 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_log10f.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunPro, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/*
13	* See comments in log10.c.
14	*/
15
16	#include <math.h>
17	#include <stdint.h>
18
19	static const float
20	ivln10hi = 4.3432617188e-01, /* 0x3ede6000 */
21	ivln10lo = -3.1689971365e-05, /* 0xb804ead9 */
22	log10_2hi = 3.0102920532e-01, /* 0x3e9a2080 */
23	log10_2lo = 7.9034151668e-07, /* 0x355427db */
24	/* \|(log(1+s)-log(1-s))/s - Lg(s)\| < 2*-34.24 (~[-4.95e-11, 4.97e-11]). /
25	Lg1 = 0xaaaaaa.0p-24, /* 0.66666662693 */
26	Lg2 = 0xccce13.0p-25, /* 0.40000972152 */
27	Lg3 = 0x91e9ee.0p-25, /* 0.28498786688 */
28	Lg4 = 0xf89e26.0p-26; /* 0.24279078841 */
29
30	float log10f(float x)
31	{
32	union {float f; uint32_t i;} u = {x};
33	float_t hfsq,f,s,z,R,w,t1,t2,dk,hi,lo;
34	uint32_t ix;
35	int k;
36
37	ix = u.i;
38	k = 0;
39	if (ix < 0x00800000 \|\| ix>>31) { /* x < 2*-126 /
40	if (ix<<1 == 0)
41	return -1/(xx); / log(+-0)=-inf */
42	if (ix>>31)
43	return (x-x)/0.0f; /* log(-#) = NaN */
44	/* subnormal number, scale up x */
45	k -= 25;
46	x *= 0x1p25f;
47	u.f = x;
48	ix = u.i;
49	} else if (ix >= 0x7f800000) {
50	return x;
51	} else if (ix == 0x3f800000)
52	return 0;
53
54	/* reduce x into [sqrt(2)/2, sqrt(2)] */
55	ix += 0x3f800000 - 0x3f3504f3;
56	k += (int)(ix>>23) - 0x7f;
57	ix = (ix&0x007fffff) + 0x3f3504f3;
58	u.i = ix;
59	x = u.f;
60
61	f = x - 1.0f;
62	s = f/(2.0f + f);
63	z = s*s;
64	w = z*z;
65	t1= w(Lg2+wLg4);
66	t2= z(Lg1+wLg3);
67	R = t2 + t1;
68	hfsq = 0.5fff;
69
70	hi = f - hfsq;
71	u.f = hi;
72	u.i &= 0xfffff000;
73	hi = u.f;
74	lo = f - hi - hfsq + s*(hfsq+R);
75	dk = k;
76	return dklog10_2lo + (lo+hi)ivln10lo + loivln10hi + hiivln10hi + dk*log10_2hi;
77	}

lib/libc/wasi/libc-top-half/musl/src/math/log10l.c deleted-191

...	@@ -1,191 +0,0 @@
1	/* origin: OpenBSD /usr/src/lib/libm/src/ld80/e_log10l.c */
2	/*
3	* Copyright (c) 2008 Stephen L. Moshier <steve@moshier.net>
4	*
5	* Permission to use, copy, modify, and distribute this software for any
6	* purpose with or without fee is hereby granted, provided that the above
7	* copyright notice and this permission notice appear in all copies.
8	*
9	* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10	* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11	* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12	* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13	* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14	* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15	* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16	*/
17	/*
18	* Common logarithm, long double precision
19	*
20	*
21	* SYNOPSIS:
22	*
23	* long double x, y, log10l();
24	*
25	* y = log10l( x );
26	*
27	*
28	* DESCRIPTION:
29	*
30	* Returns the base 10 logarithm of x.
31	*
32	* The argument is separated into its exponent and fractional
33	* parts. If the exponent is between -1 and +1, the logarithm
34	* of the fraction is approximated by
35	*
36	* log(1+x) = x - 0.5 x2 + x3 P(x)/Q(x).
37	*
38	* Otherwise, setting z = 2(x-1)/x+1),
39	*
40	* log(x) = z + z**3 P(z)/Q(z).
41	*
42	*
43	* ACCURACY:
44	*
45	* Relative error:
46	* arithmetic domain # trials peak rms
47	* IEEE 0.5, 2.0 30000 9.0e-20 2.6e-20
48	* IEEE exp(+-10000) 30000 6.0e-20 2.3e-20
49	*
50	* In the tests over the interval exp(+-10000), the logarithms
51	* of the random arguments were uniformly distributed over
52	* [-10000, +10000].
53	*
54	* ERROR MESSAGES:
55	*
56	* log singularity: x = 0; returns MINLOG
57	* log domain: x < 0; returns MINLOG
58	*/
59
60	#include "libm.h"
61
62	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
63	long double log10l(long double x)
64	{
65	return log10(x);
66	}
67	#elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
68	/* Coefficients for log(1+x) = x - x2/2 + x3 P(x)/Q(x)
69	* 1/sqrt(2) <= x < sqrt(2)
70	* Theoretical peak relative error = 6.2e-22
71	*/
72	static const long double P[] = {
73	4.9962495940332550844739E-1L,
74	1.0767376367209449010438E1L,
75	7.7671073698359539859595E1L,
76	2.5620629828144409632571E2L,
77	4.2401812743503691187826E2L,
78	3.4258224542413922935104E2L,
79	1.0747524399916215149070E2L,
80	};
81	static const long double Q[] = {
82	/* 1.0000000000000000000000E0,*/
83	2.3479774160285863271658E1L,
84	1.9444210022760132894510E2L,
85	7.7952888181207260646090E2L,
86	1.6911722418503949084863E3L,
87	2.0307734695595183428202E3L,
88	1.2695660352705325274404E3L,
89	3.2242573199748645407652E2L,
90	};
91
92	/* Coefficients for log(x) = z + z^3 P(z^2)/Q(z^2),
93	* where z = 2(x-1)/(x+1)
94	* 1/sqrt(2) <= x < sqrt(2)
95	* Theoretical peak relative error = 6.16e-22
96	*/
97	static const long double R[4] = {
98	1.9757429581415468984296E-3L,
99	-7.1990767473014147232598E-1L,
100	1.0777257190312272158094E1L,
101	-3.5717684488096787370998E1L,
102	};
103	static const long double S[4] = {
104	/* 1.00000000000000000000E0L,*/
105	-2.6201045551331104417768E1L,
106	1.9361891836232102174846E2L,
107	-4.2861221385716144629696E2L,
108	};
109	/* log10(2) */
110	#define L102A 0.3125L
111	#define L102B -1.1470004336018804786261e-2L
112	/* log10(e) */
113	#define L10EA 0.5L
114	#define L10EB -6.5705518096748172348871e-2L
115
116	#define SQRTH 0.70710678118654752440L
117
118	long double log10l(long double x)
119	{
120	long double y, z;
121	int e;
122
123	if (isnan(x))
124	return x;
125	if(x <= 0.0) {
126	if(x == 0.0)
127	return -1.0 / (x*x);
128	return (x - x) / 0.0;
129	}
130	if (x == INFINITY)
131	return INFINITY;
132	/* separate mantissa from exponent */
133	/* Note, frexp is used so that denormal numbers
134	* will be handled properly.
135	*/
136	x = frexpl(x, &e);
137
138	/* logarithm using log(x) = z + z**3 P(z)/Q(z),
139	* where z = 2(x-1)/x+1)
140	*/
141	if (e > 2 \|\| e < -2) {
142	if (x < SQRTH) { /* 2(2x-1)/(2x+1) */
143	e -= 1;
144	z = x - 0.5;
145	y = 0.5 * z + 0.5;
146	} else { /* 2 (x-1)/(x+1) */
147	z = x - 0.5;
148	z -= 0.5;
149	y = 0.5 * x + 0.5;
150	}
151	x = z / y;
152	z = x*x;
153	y = x * (z * __polevll(z, R, 3) / __p1evll(z, S, 3));
154	goto done;
155	}
156
157	/* logarithm using log(1+x) = x - .5x2 + x3 P(x)/Q(x) */
158	if (x < SQRTH) {
159	e -= 1;
160	x = 2.0*x - 1.0;
161	} else {
162	x = x - 1.0;
163	}
164	z = x*x;
165	y = x * (z * __polevll(x, P, 6) / __p1evll(x, Q, 7));
166	y = y - 0.5*z;
167
168	done:
169	/* Multiply log of fraction by log10(e)
170	* and base 2 exponent by log10(2).
171	*
172	* *CAUTION*
173	*
174	* This sequence of operations is critical and it may
175	* be horribly defeated by some compiler optimizers.
176	*/
177	z = y * (L10EB);
178	z += x * (L10EB);
179	z += e * (L102B);
180	z += y * (L10EA);
181	z += x * (L10EA);
182	z += e * (L102A);
183	return z;
184	}
185	#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
186	// TODO: broken implementation to make things compile
187	long double log10l(long double x)
188	{
189	return log10(x);
190	}
191	#endif

lib/libc/wasi/libc-top-half/musl/src/math/log1p.c deleted-122

...	@@ -1,122 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_log1p.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunPro, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/* double log1p(double x)
13	* Return the natural logarithm of 1+x.
14	*
15	* Method :
16	* 1. Argument Reduction: find k and f such that
17	* 1+x = 2^k * (1+f),
18	* where sqrt(2)/2 < 1+f < sqrt(2) .
19	*
20	* Note. If k=0, then f=x is exact. However, if k!=0, then f
21	* may not be representable exactly. In that case, a correction
22	* term is need. Let u=1+x rounded. Let c = (1+x)-u, then
23	* log(1+x) - log(u) ~ c/u. Thus, we proceed to compute log(u),
24	* and add back the correction term c/u.
25	* (Note: when x > 2**53, one can simply return log(x))
26	*
27	* 2. Approximation of log(1+f): See log.c
28	*
29	* 3. Finally, log1p(x) = k*ln2 + log(1+f) + c/u. See log.c
30	*
31	* Special cases:
32	* log1p(x) is NaN with signal if x < -1 (including -INF) ;
33	* log1p(+INF) is +INF; log1p(-1) is -INF with signal;
34	* log1p(NaN) is that NaN with no signal.
35	*
36	* Accuracy:
37	* according to an error analysis, the error is always less than
38	* 1 ulp (unit in the last place).
39	*
40	* Constants:
41	* The hexadecimal values are the intended ones for the following
42	* constants. The decimal values may be used, provided that the
43	* compiler will convert from decimal to binary accurately enough
44	* to produce the hexadecimal values shown.
45	*
46	* Note: Assuming log() return accurate answer, the following
47	* algorithm can be used to compute log1p(x) to within a few ULP:
48	*
49	* u = 1+x;
50	* if(u==1.0) return x ; else
51	* return log(u)*(x/(u-1.0));
52	*
53	* See HP-15C Advanced Functions Handbook, p.193.
54	*/
55
56	#include "libm.h"
57
58	static const double
59	ln2_hi = 6.93147180369123816490e-01, /* 3fe62e42 fee00000 */
60	ln2_lo = 1.90821492927058770002e-10, /* 3dea39ef 35793c76 */
61	Lg1 = 6.666666666666735130e-01, /* 3FE55555 55555593 */
62	Lg2 = 3.999999999940941908e-01, /* 3FD99999 9997FA04 */
63	Lg3 = 2.857142874366239149e-01, /* 3FD24924 94229359 */
64	Lg4 = 2.222219843214978396e-01, /* 3FCC71C5 1D8E78AF */
65	Lg5 = 1.818357216161805012e-01, /* 3FC74664 96CB03DE */
66	Lg6 = 1.531383769920937332e-01, /* 3FC39A09 D078C69F */
67	Lg7 = 1.479819860511658591e-01; /* 3FC2F112 DF3E5244 */
68
69	double log1p(double x)
70	{
71	union {double f; uint64_t i;} u = {x};
72	double_t hfsq,f,c,s,z,R,w,t1,t2,dk;
73	uint32_t hx,hu;
74	int k;
75
76	hx = u.i>>32;
77	k = 1;
78	if (hx < 0x3fda827a \|\| hx>>31) { /* 1+x < sqrt(2)+ */
79	if (hx >= 0xbff00000) { /* x <= -1.0 */
80	if (x == -1)
81	return x/0.0; /* log1p(-1) = -inf */
82	return (x-x)/0.0; /* log1p(x<-1) = NaN */
83	}
84	if (hx<<1 < 0x3ca00000<<1) { /* \|x\| < 2*-53 /
85	/* underflow if subnormal */
86	if ((hx&0x7ff00000) == 0)
87	FORCE_EVAL((float)x);
88	return x;
89	}
90	if (hx <= 0xbfd2bec4) { /* sqrt(2)/2- <= 1+x < sqrt(2)+ */
91	k = 0;
92	c = 0;
93	f = x;
94	}
95	} else if (hx >= 0x7ff00000)
96	return x;
97	if (k) {
98	u.f = 1 + x;
99	hu = u.i>>32;
100	hu += 0x3ff00000 - 0x3fe6a09e;
101	k = (int)(hu>>20) - 0x3ff;
102	/* correction term ~ log(1+x)-log(u), avoid underflow in c/u */
103	if (k < 54) {
104	c = k >= 2 ? 1-(u.f-x) : x-(u.f-1);
105	c /= u.f;
106	} else
107	c = 0;
108	/* reduce u into [sqrt(2)/2, sqrt(2)] */
109	hu = (hu&0x000fffff) + 0x3fe6a09e;
110	u.i = (uint64_t)hu<<32 \| (u.i&0xffffffff);
111	f = u.f - 1;
112	}
113	hfsq = 0.5ff;
114	s = f/(2.0+f);
115	z = s*s;
116	w = z*z;
117	t1 = w(Lg2+w(Lg4+w*Lg6));
118	t2 = z(Lg1+w(Lg3+w(Lg5+wLg7)));
119	R = t2 + t1;
120	dk = k;
121	return s(hfsq+R) + (dkln2_lo+c) - hfsq + f + dk*ln2_hi;
122	}

lib/libc/wasi/libc-top-half/musl/src/math/log1pf.c deleted-77

...	@@ -1,77 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_log1pf.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunPro, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12
13	#include "libm.h"
14
15	static const float
16	ln2_hi = 6.9313812256e-01, /* 0x3f317180 */
17	ln2_lo = 9.0580006145e-06, /* 0x3717f7d1 */
18	/* \|(log(1+s)-log(1-s))/s - Lg(s)\| < 2*-34.24 (~[-4.95e-11, 4.97e-11]). /
19	Lg1 = 0xaaaaaa.0p-24, /* 0.66666662693 */
20	Lg2 = 0xccce13.0p-25, /* 0.40000972152 */
21	Lg3 = 0x91e9ee.0p-25, /* 0.28498786688 */
22	Lg4 = 0xf89e26.0p-26; /* 0.24279078841 */
23
24	float log1pf(float x)
25	{
26	union {float f; uint32_t i;} u = {x};
27	float_t hfsq,f,c,s,z,R,w,t1,t2,dk;
28	uint32_t ix,iu;
29	int k;
30
31	ix = u.i;
32	k = 1;
33	if (ix < 0x3ed413d0 \|\| ix>>31) { /* 1+x < sqrt(2)+ */
34	if (ix >= 0xbf800000) { /* x <= -1.0 */
35	if (x == -1)
36	return x/0.0f; /* log1p(-1)=+inf */
37	return (x-x)/0.0f; /* log1p(x<-1)=NaN */
38	}
39	if (ix<<1 < 0x33800000<<1) { /* \|x\| < 2*-24 /
40	/* underflow if subnormal */
41	if ((ix&0x7f800000) == 0)
42	FORCE_EVAL(x*x);
43	return x;
44	}
45	if (ix <= 0xbe95f619) { /* sqrt(2)/2- <= 1+x < sqrt(2)+ */
46	k = 0;
47	c = 0;
48	f = x;
49	}
50	} else if (ix >= 0x7f800000)
51	return x;
52	if (k) {
53	u.f = 1 + x;
54	iu = u.i;
55	iu += 0x3f800000 - 0x3f3504f3;
56	k = (int)(iu>>23) - 0x7f;
57	/* correction term ~ log(1+x)-log(u), avoid underflow in c/u */
58	if (k < 25) {
59	c = k >= 2 ? 1-(u.f-x) : x-(u.f-1);
60	c /= u.f;
61	} else
62	c = 0;
63	/* reduce u into [sqrt(2)/2, sqrt(2)] */
64	iu = (iu&0x007fffff) + 0x3f3504f3;
65	u.i = iu;
66	f = u.f - 1;
67	}
68	s = f/(2.0f + f);
69	z = s*s;
70	w = z*z;
71	t1= w(Lg2+wLg4);
72	t2= z(Lg1+wLg3);
73	R = t2 + t1;
74	hfsq = 0.5fff;
75	dk = k;
76	return s(hfsq+R) + (dkln2_lo+c) - hfsq + f + dk*ln2_hi;
77	}

lib/libc/wasi/libc-top-half/musl/src/math/log1pl.c deleted-177

...	@@ -1,177 +0,0 @@
1	/* origin: OpenBSD /usr/src/lib/libm/src/ld80/s_log1pl.c */
2	/*
3	* Copyright (c) 2008 Stephen L. Moshier <steve@moshier.net>
4	*
5	* Permission to use, copy, modify, and distribute this software for any
6	* purpose with or without fee is hereby granted, provided that the above
7	* copyright notice and this permission notice appear in all copies.
8	*
9	* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10	* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11	* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12	* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13	* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14	* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15	* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16	*/
17	/*
18	* Relative error logarithm
19	* Natural logarithm of 1+x, long double precision
20	*
21	*
22	* SYNOPSIS:
23	*
24	* long double x, y, log1pl();
25	*
26	* y = log1pl( x );
27	*
28	*
29	* DESCRIPTION:
30	*
31	* Returns the base e (2.718...) logarithm of 1+x.
32	*
33	* The argument 1+x is separated into its exponent and fractional
34	* parts. If the exponent is between -1 and +1, the logarithm
35	* of the fraction is approximated by
36	*
37	* log(1+x) = x - 0.5 x^2 + x^3 P(x)/Q(x).
38	*
39	* Otherwise, setting z = 2(x-1)/x+1),
40	*
41	* log(x) = z + z^3 P(z)/Q(z).
42	*
43	*
44	* ACCURACY:
45	*
46	* Relative error:
47	* arithmetic domain # trials peak rms
48	* IEEE -1.0, 9.0 100000 8.2e-20 2.5e-20
49	*/
50
51	#include "libm.h"
52
53	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
54	long double log1pl(long double x)
55	{
56	return log1p(x);
57	}
58	#elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
59	/* Coefficients for log(1+x) = x - x^2 / 2 + x^3 P(x)/Q(x)
60	* 1/sqrt(2) <= x < sqrt(2)
61	* Theoretical peak relative error = 2.32e-20
62	*/
63	static const long double P[] = {
64	4.5270000862445199635215E-5L,
65	4.9854102823193375972212E-1L,
66	6.5787325942061044846969E0L,
67	2.9911919328553073277375E1L,
68	6.0949667980987787057556E1L,
69	5.7112963590585538103336E1L,
70	2.0039553499201281259648E1L,
71	};
72	static const long double Q[] = {
73	/* 1.0000000000000000000000E0,*/
74	1.5062909083469192043167E1L,
75	8.3047565967967209469434E1L,
76	2.2176239823732856465394E2L,
77	3.0909872225312059774938E2L,
78	2.1642788614495947685003E2L,
79	6.0118660497603843919306E1L,
80	};
81
82	/* Coefficients for log(x) = z + z^3 P(z^2)/Q(z^2),
83	* where z = 2(x-1)/(x+1)
84	* 1/sqrt(2) <= x < sqrt(2)
85	* Theoretical peak relative error = 6.16e-22
86	*/
87	static const long double R[4] = {
88	1.9757429581415468984296E-3L,
89	-7.1990767473014147232598E-1L,
90	1.0777257190312272158094E1L,
91	-3.5717684488096787370998E1L,
92	};
93	static const long double S[4] = {
94	/* 1.00000000000000000000E0L,*/
95	-2.6201045551331104417768E1L,
96	1.9361891836232102174846E2L,
97	-4.2861221385716144629696E2L,
98	};
99	static const long double C1 = 6.9314575195312500000000E-1L;
100	static const long double C2 = 1.4286068203094172321215E-6L;
101
102	#define SQRTH 0.70710678118654752440L
103
104	long double log1pl(long double xm1)
105	{
106	long double x, y, z;
107	int e;
108
109	if (isnan(xm1))
110	return xm1;
111	if (xm1 == INFINITY)
112	return xm1;
113	if (xm1 == 0.0)
114	return xm1;
115
116	x = xm1 + 1.0;
117
118	/* Test for domain errors. */
119	if (x <= 0.0) {
120	if (x == 0.0)
121	return -1/(xx); / -inf with divbyzero */
122	return 0/0.0f; /* nan with invalid */
123	}
124
125	/* Separate mantissa from exponent.
126	Use frexp so that denormal numbers will be handled properly. */
127	x = frexpl(x, &e);
128
129	/* logarithm using log(x) = z + z^3 P(z)/Q(z),
130	where z = 2(x-1)/x+1) */
131	if (e > 2 \|\| e < -2) {
132	if (x < SQRTH) { /* 2(2x-1)/(2x+1) */
133	e -= 1;
134	z = x - 0.5;
135	y = 0.5 * z + 0.5;
136	} else { /* 2 (x-1)/(x+1) */
137	z = x - 0.5;
138	z -= 0.5;
139	y = 0.5 * x + 0.5;
140	}
141	x = z / y;
142	z = x*x;
143	z = x * (z * __polevll(z, R, 3) / __p1evll(z, S, 3));
144	z = z + e * C2;
145	z = z + x;
146	z = z + e * C1;
147	return z;
148	}
149
150	/* logarithm using log(1+x) = x - .5x2 + x3 P(x)/Q(x) */
151	if (x < SQRTH) {
152	e -= 1;
153	if (e != 0)
154	x = 2.0 * x - 1.0;
155	else
156	x = xm1;
157	} else {
158	if (e != 0)
159	x = x - 1.0;
160	else
161	x = xm1;
162	}
163	z = x*x;
164	y = x * (z * __polevll(x, P, 6) / __p1evll(x, Q, 6));
165	y = y + e * C2;
166	z = y - 0.5 * z;
167	z = z + x;
168	z = z + e * C1;
169	return z;
170	}
171	#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
172	// TODO: broken implementation to make things compile
173	long double log1pl(long double x)
174	{
175	return log1p(x);
176	}
177	#endif

lib/libc/wasi/libc-top-half/musl/src/math/log2.c deleted-122

...	@@ -1,122 +0,0 @@
1	/*
2	* Double-precision log2(x) function.
3	*
4	* Copyright (c) 2018, Arm Limited.
5	* SPDX-License-Identifier: MIT
6	*/
7
8	#include <math.h>
9	#include <stdint.h>
10	#include "libm.h"
11	#include "log2_data.h"
12
13	#define T __log2_data.tab
14	#define T2 __log2_data.tab2
15	#define B __log2_data.poly1
16	#define A __log2_data.poly
17	#define InvLn2hi __log2_data.invln2hi
18	#define InvLn2lo __log2_data.invln2lo
19	#define N (1 << LOG2_TABLE_BITS)
20	#define OFF 0x3fe6000000000000
21
22	/* Top 16 bits of a double. */
23	static inline uint32_t top16(double x)
24	{
25	return asuint64(x) >> 48;
26	}
27
28	double log2(double x)
29	{
30	double_t z, r, r2, r4, y, invc, logc, kd, hi, lo, t1, t2, t3, p;
31	uint64_t ix, iz, tmp;
32	uint32_t top;
33	int k, i;
34
35	ix = asuint64(x);
36	top = top16(x);
37	#define LO asuint64(1.0 - 0x1.5b51p-5)
38	#define HI asuint64(1.0 + 0x1.6ab2p-5)
39	if (predict_false(ix - LO < HI - LO)) {
40	/* Handle close to 1.0 inputs separately. */
41	/* Fix sign of zero with downward rounding when x==1. */
42	if (WANT_ROUNDING && predict_false(ix == asuint64(1.0)))
43	return 0;
44	r = x - 1.0;
45	#if __FP_FAST_FMA
46	hi = r * InvLn2hi;
47	lo = r * InvLn2lo + __builtin_fma(r, InvLn2hi, -hi);
48	#else
49	double_t rhi, rlo;
50	rhi = asdouble(asuint64(r) & -1ULL << 32);
51	rlo = r - rhi;
52	hi = rhi * InvLn2hi;
53	lo = rlo * InvLn2hi + r * InvLn2lo;
54	#endif
55	r2 = r * r; /* rounding error: 0x1p-62. */
56	r4 = r2 * r2;
57	/* Worst-case error is less than 0.54 ULP (0.55 ULP without fma). */
58	p = r2 * (B[0] + r * B[1]);
59	y = hi + p;
60	lo += hi - y + p;
61	lo += r4 * (B[2] + r * B[3] + r2 * (B[4] + r * B[5]) +
62	r4 * (B[6] + r * B[7] + r2 * (B[8] + r * B[9])));
63	y += lo;
64	return eval_as_double(y);
65	}
66	if (predict_false(top - 0x0010 >= 0x7ff0 - 0x0010)) {
67	/* x < 0x1p-1022 or inf or nan. */
68	if (ix * 2 == 0)
69	return __math_divzero(1);
70	if (ix == asuint64(INFINITY)) /* log(inf) == inf. */
71	return x;
72	if ((top & 0x8000) \|\| (top & 0x7ff0) == 0x7ff0)
73	return __math_invalid(x);
74	/* x is subnormal, normalize it. */
75	ix = asuint64(x * 0x1p52);
76	ix -= 52ULL << 52;
77	}
78
79	/* x = 2^k z; where z is in range [OFF,2*OFF) and exact.
80	The range is split into N subintervals.
81	The ith subinterval contains z and c is near its center. */
82	tmp = ix - OFF;
83	i = (tmp >> (52 - LOG2_TABLE_BITS)) % N;
84	k = (int64_t)tmp >> 52; /* arithmetic shift */
85	iz = ix - (tmp & 0xfffULL << 52);
86	invc = T[i].invc;
87	logc = T[i].logc;
88	z = asdouble(iz);
89	kd = (double_t)k;
90
91	/* log2(x) = log2(z/c) + log2(c) + k. */
92	/* r ~= z/c - 1, \|r\| < 1/(2N). /
93	#if __FP_FAST_FMA
94	/* rounding error: 0x1p-55/N. */
95	r = __builtin_fma(z, invc, -1.0);
96	t1 = r * InvLn2hi;
97	t2 = r * InvLn2lo + __builtin_fma(r, InvLn2hi, -t1);
98	#else
99	double_t rhi, rlo;
100	/* rounding error: 0x1p-55/N + 0x1p-65. */
101	r = (z - T2[i].chi - T2[i].clo) * invc;
102	rhi = asdouble(asuint64(r) & -1ULL << 32);
103	rlo = r - rhi;
104	t1 = rhi * InvLn2hi;
105	t2 = rlo * InvLn2hi + r * InvLn2lo;
106	#endif
107
108	/* hi + lo = r/ln2 + log2(c) + k. */
109	t3 = kd + logc;
110	hi = t3 + t1;
111	lo = t3 - hi + t1 + t2;
112
113	/* log2(r+1) = r/ln2 + r^2poly(r). /
114	/* Evaluation is optimized assuming superscalar pipelined execution. */
115	r2 = r * r; /* rounding error: 0x1p-54/N^2. */
116	r4 = r2 * r2;
117	/* Worst-case error if \|y\| > 0x1p-4: 0.547 ULP (0.550 ULP without fma).
118	~ 0.5 + 2/N/ln2 + abs-poly-error0x1p56 ULP (+ 0.003 ULP without fma). /
119	p = A[0] + r * A[1] + r2 * (A[2] + r * A[3]) + r4 * (A[4] + r * A[5]);
120	y = lo + r2 * p + hi;
121	return eval_as_double(y);
122	}

lib/libc/wasi/libc-top-half/musl/src/math/log2_data.c deleted-201

...	@@ -1,201 +0,0 @@
1	/*
2	* Data for log2.
3	*
4	* Copyright (c) 2018, Arm Limited.
5	* SPDX-License-Identifier: MIT
6	*/
7
8	#include "log2_data.h"
9
10	#define N (1 << LOG2_TABLE_BITS)
11
12	const struct log2_data __log2_data = {
13	// First coefficient: 0x1.71547652b82fe1777d0ffda0d24p0
14	.invln2hi = 0x1.7154765200000p+0,
15	.invln2lo = 0x1.705fc2eefa200p-33,
16	.poly1 = {
17	// relative error: 0x1.2fad8188p-63
18	// in -0x1.5b51p-5 0x1.6ab2p-5
19	-0x1.71547652b82fep-1,
20	0x1.ec709dc3a03f7p-2,
21	-0x1.71547652b7c3fp-2,
22	0x1.2776c50f05be4p-2,
23	-0x1.ec709dd768fe5p-3,
24	0x1.a61761ec4e736p-3,
25	-0x1.7153fbc64a79bp-3,
26	0x1.484d154f01b4ap-3,
27	-0x1.289e4a72c383cp-3,
28	0x1.0b32f285aee66p-3,
29	},
30	.poly = {
31	// relative error: 0x1.a72c2bf8p-58
32	// abs error: 0x1.67a552c8p-66
33	// in -0x1.f45p-8 0x1.f45p-8
34	-0x1.71547652b8339p-1,
35	0x1.ec709dc3a04bep-2,
36	-0x1.7154764702ffbp-2,
37	0x1.2776c50034c48p-2,
38	-0x1.ec7b328ea92bcp-3,
39	0x1.a6225e117f92ep-3,
40	},
41	/* Algorithm:
42
43	x = 2^k z
44	log2(x) = k + log2(c) + log2(z/c)
45	log2(z/c) = poly(z/c - 1)
46
47	where z is in [1.6p-1; 1.6p0] which is split into N subintervals and z falls
48	into the ith one, then table entries are computed as
49
50	tab[i].invc = 1/c
51	tab[i].logc = (double)log2(c)
52	tab2[i].chi = (double)c
53	tab2[i].clo = (double)(c - (double)c)
54
55	where c is near the center of the subinterval and is chosen by trying +-2^29
56	floating point invc candidates around 1/center and selecting one for which
57
58	1) the rounding error in 0x1.8p10 + logc is 0,
59	2) the rounding error in z - chi - clo is < 0x1p-64 and
60	3) the rounding error in (double)log2(c) is minimized (< 0x1p-68).
61
62	Note: 1) ensures that k + logc can be computed without rounding error, 2)
63	ensures that z/c - 1 can be computed as (z - chi - clo)*invc with close to a
64	single rounding error when there is no fast fma for z*invc - 1, 3) ensures
65	that logc + poly(z/c - 1) has small error, however near x == 1 when
66	\|log2(x)\| < 0x1p-4, this is not enough so that is special cased. */
67	.tab = {
68	{0x1.724286bb1acf8p+0, -0x1.1095feecdb000p-1},
69	{0x1.6e1f766d2cca1p+0, -0x1.08494bd76d000p-1},
70	{0x1.6a13d0e30d48ap+0, -0x1.00143aee8f800p-1},
71	{0x1.661ec32d06c85p+0, -0x1.efec5360b4000p-2},
72	{0x1.623fa951198f8p+0, -0x1.dfdd91ab7e000p-2},
73	{0x1.5e75ba4cf026cp+0, -0x1.cffae0cc79000p-2},
74	{0x1.5ac055a214fb8p+0, -0x1.c043811fda000p-2},
75	{0x1.571ed0f166e1ep+0, -0x1.b0b67323ae000p-2},
76	{0x1.53909590bf835p+0, -0x1.a152f5a2db000p-2},
77	{0x1.5014fed61adddp+0, -0x1.9217f5af86000p-2},
78	{0x1.4cab88e487bd0p+0, -0x1.8304db0719000p-2},
79	{0x1.49539b4334feep+0, -0x1.74189f9a9e000p-2},
80	{0x1.460cbdfafd569p+0, -0x1.6552bb5199000p-2},
81	{0x1.42d664ee4b953p+0, -0x1.56b23a29b1000p-2},
82	{0x1.3fb01111dd8a6p+0, -0x1.483650f5fa000p-2},
83	{0x1.3c995b70c5836p+0, -0x1.39de937f6a000p-2},
84	{0x1.3991c4ab6fd4ap+0, -0x1.2baa1538d6000p-2},
85	{0x1.3698e0ce099b5p+0, -0x1.1d98340ca4000p-2},
86	{0x1.33ae48213e7b2p+0, -0x1.0fa853a40e000p-2},
87	{0x1.30d191985bdb1p+0, -0x1.01d9c32e73000p-2},
88	{0x1.2e025cab271d7p+0, -0x1.e857da2fa6000p-3},
89	{0x1.2b404cf13cd82p+0, -0x1.cd3c8633d8000p-3},
90	{0x1.288b02c7ccb50p+0, -0x1.b26034c14a000p-3},
91	{0x1.25e2263944de5p+0, -0x1.97c1c2f4fe000p-3},
92	{0x1.234563d8615b1p+0, -0x1.7d6023f800000p-3},
93	{0x1.20b46e33eaf38p+0, -0x1.633a71a05e000p-3},
94	{0x1.1e2eefdcda3ddp+0, -0x1.494f5e9570000p-3},
95	{0x1.1bb4a580b3930p+0, -0x1.2f9e424e0a000p-3},
96	{0x1.19453847f2200p+0, -0x1.162595afdc000p-3},
97	{0x1.16e06c0d5d73cp+0, -0x1.f9c9a75bd8000p-4},
98	{0x1.1485f47b7e4c2p+0, -0x1.c7b575bf9c000p-4},
99	{0x1.12358ad0085d1p+0, -0x1.960c60ff48000p-4},
100	{0x1.0fef00f532227p+0, -0x1.64ce247b60000p-4},
101	{0x1.0db2077d03a8fp+0, -0x1.33f78b2014000p-4},
102	{0x1.0b7e6d65980d9p+0, -0x1.0387d1a42c000p-4},
103	{0x1.0953efe7b408dp+0, -0x1.a6f9208b50000p-5},
104	{0x1.07325cac53b83p+0, -0x1.47a954f770000p-5},
105	{0x1.05197e40d1b5cp+0, -0x1.d23a8c50c0000p-6},
106	{0x1.03091c1208ea2p+0, -0x1.16a2629780000p-6},
107	{0x1.0101025b37e21p+0, -0x1.720f8d8e80000p-8},
108	{0x1.fc07ef9caa76bp-1, 0x1.6fe53b1500000p-7},
109	{0x1.f4465d3f6f184p-1, 0x1.11ccce10f8000p-5},
110	{0x1.ecc079f84107fp-1, 0x1.c4dfc8c8b8000p-5},
111	{0x1.e573a99975ae8p-1, 0x1.3aa321e574000p-4},
112	{0x1.de5d6f0bd3de6p-1, 0x1.918a0d08b8000p-4},
113	{0x1.d77b681ff38b3p-1, 0x1.e72e9da044000p-4},
114	{0x1.d0cb5724de943p-1, 0x1.1dcd2507f6000p-3},
115	{0x1.ca4b2dc0e7563p-1, 0x1.476ab03dea000p-3},
116	{0x1.c3f8ee8d6cb51p-1, 0x1.7074377e22000p-3},
117	{0x1.bdd2b4f020c4cp-1, 0x1.98ede8ba94000p-3},
118	{0x1.b7d6c006015cap-1, 0x1.c0db86ad2e000p-3},
119	{0x1.b20366e2e338fp-1, 0x1.e840aafcee000p-3},
120	{0x1.ac57026295039p-1, 0x1.0790ab4678000p-2},
121	{0x1.a6d01bc2731ddp-1, 0x1.1ac056801c000p-2},
122	{0x1.a16d3bc3ff18bp-1, 0x1.2db11d4fee000p-2},
123	{0x1.9c2d14967feadp-1, 0x1.406464ec58000p-2},
124	{0x1.970e4f47c9902p-1, 0x1.52dbe093af000p-2},
125	{0x1.920fb3982bcf2p-1, 0x1.651902050d000p-2},
126	{0x1.8d30187f759f1p-1, 0x1.771d2cdeaf000p-2},
127	{0x1.886e5ebb9f66dp-1, 0x1.88e9c857d9000p-2},
128	{0x1.83c97b658b994p-1, 0x1.9a80155e16000p-2},
129	{0x1.7f405ffc61022p-1, 0x1.abe186ed3d000p-2},
130	{0x1.7ad22181415cap-1, 0x1.bd0f2aea0e000p-2},
131	{0x1.767dcf99eff8cp-1, 0x1.ce0a43dbf4000p-2},
132	},
133	#if !__FP_FAST_FMA
134	.tab2 = {
135	{0x1.6200012b90a8ep-1, 0x1.904ab0644b605p-55},
136	{0x1.66000045734a6p-1, 0x1.1ff9bea62f7a9p-57},
137	{0x1.69fffc325f2c5p-1, 0x1.27ecfcb3c90bap-55},
138	{0x1.6e00038b95a04p-1, 0x1.8ff8856739326p-55},
139	{0x1.71fffe09994e3p-1, 0x1.afd40275f82b1p-55},
140	{0x1.7600015590e1p-1, -0x1.2fd75b4238341p-56},
141	{0x1.7a00012655bd5p-1, 0x1.808e67c242b76p-56},
142	{0x1.7e0003259e9a6p-1, -0x1.208e426f622b7p-57},
143	{0x1.81fffedb4b2d2p-1, -0x1.402461ea5c92fp-55},
144	{0x1.860002dfafcc3p-1, 0x1.df7f4a2f29a1fp-57},
145	{0x1.89ffff78c6b5p-1, -0x1.e0453094995fdp-55},
146	{0x1.8e00039671566p-1, -0x1.a04f3bec77b45p-55},
147	{0x1.91fffe2bf1745p-1, -0x1.7fa34400e203cp-56},
148	{0x1.95fffcc5c9fd1p-1, -0x1.6ff8005a0695dp-56},
149	{0x1.9a0003bba4767p-1, 0x1.0f8c4c4ec7e03p-56},
150	{0x1.9dfffe7b92da5p-1, 0x1.e7fd9478c4602p-55},
151	{0x1.a1fffd72efdafp-1, -0x1.a0c554dcdae7ep-57},
152	{0x1.a5fffde04ff95p-1, 0x1.67da98ce9b26bp-55},
153	{0x1.a9fffca5e8d2bp-1, -0x1.284c9b54c13dep-55},
154	{0x1.adfffddad03eap-1, 0x1.812c8ea602e3cp-58},
155	{0x1.b1ffff10d3d4dp-1, -0x1.efaddad27789cp-55},
156	{0x1.b5fffce21165ap-1, 0x1.3cb1719c61237p-58},
157	{0x1.b9fffd950e674p-1, 0x1.3f7d94194cep-56},
158	{0x1.be000139ca8afp-1, 0x1.50ac4215d9bcp-56},
159	{0x1.c20005b46df99p-1, 0x1.beea653e9c1c9p-57},
160	{0x1.c600040b9f7aep-1, -0x1.c079f274a70d6p-56},
161	{0x1.ca0006255fd8ap-1, -0x1.a0b4076e84c1fp-56},
162	{0x1.cdfffd94c095dp-1, 0x1.8f933f99ab5d7p-55},
163	{0x1.d1ffff975d6cfp-1, -0x1.82c08665fe1bep-58},
164	{0x1.d5fffa2561c93p-1, -0x1.b04289bd295f3p-56},
165	{0x1.d9fff9d228b0cp-1, 0x1.70251340fa236p-55},
166	{0x1.de00065bc7e16p-1, -0x1.5011e16a4d80cp-56},
167	{0x1.e200002f64791p-1, 0x1.9802f09ef62ep-55},
168	{0x1.e600057d7a6d8p-1, -0x1.e0b75580cf7fap-56},
169	{0x1.ea00027edc00cp-1, -0x1.c848309459811p-55},
170	{0x1.ee0006cf5cb7cp-1, -0x1.f8027951576f4p-55},
171	{0x1.f2000782b7dccp-1, -0x1.f81d97274538fp-55},
172	{0x1.f6000260c450ap-1, -0x1.071002727ffdcp-59},
173	{0x1.f9fffe88cd533p-1, -0x1.81bdce1fda8bp-58},
174	{0x1.fdfffd50f8689p-1, 0x1.7f91acb918e6ep-55},
175	{0x1.0200004292367p+0, 0x1.b7ff365324681p-54},
176	{0x1.05fffe3e3d668p+0, 0x1.6fa08ddae957bp-55},
177	{0x1.0a0000a85a757p+0, -0x1.7e2de80d3fb91p-58},
178	{0x1.0e0001a5f3fccp+0, -0x1.1823305c5f014p-54},
179	{0x1.11ffff8afbaf5p+0, -0x1.bfabb6680bac2p-55},
180	{0x1.15fffe54d91adp+0, -0x1.d7f121737e7efp-54},
181	{0x1.1a00011ac36e1p+0, 0x1.c000a0516f5ffp-54},
182	{0x1.1e00019c84248p+0, -0x1.082fbe4da5dap-54},
183	{0x1.220000ffe5e6ep+0, -0x1.8fdd04c9cfb43p-55},
184	{0x1.26000269fd891p+0, 0x1.cfe2a7994d182p-55},
185	{0x1.2a00029a6e6dap+0, -0x1.00273715e8bc5p-56},
186	{0x1.2dfffe0293e39p+0, 0x1.b7c39dab2a6f9p-54},
187	{0x1.31ffff7dcf082p+0, 0x1.df1336edc5254p-56},
188	{0x1.35ffff05a8b6p+0, -0x1.e03564ccd31ebp-54},
189	{0x1.3a0002e0eaeccp+0, 0x1.5f0e74bd3a477p-56},
190	{0x1.3e000043bb236p+0, 0x1.c7dcb149d8833p-54},
191	{0x1.4200002d187ffp+0, 0x1.e08afcf2d3d28p-56},
192	{0x1.460000d387cb1p+0, 0x1.20837856599a6p-55},
193	{0x1.4a00004569f89p+0, -0x1.9fa5c904fbcd2p-55},
194	{0x1.4e000043543f3p+0, -0x1.81125ed175329p-56},
195	{0x1.51fffcc027f0fp+0, 0x1.883d8847754dcp-54},
196	{0x1.55ffffd87b36fp+0, -0x1.709e731d02807p-55},
197	{0x1.59ffff21df7bap+0, 0x1.7f79f68727b02p-55},
198	{0x1.5dfffebfc3481p+0, -0x1.180902e30e93ep-54},
199	},
200	#endif
201	};

lib/libc/wasi/libc-top-half/musl/src/math/log2_data.h deleted-28

...	@@ -1,28 +0,0 @@
1	/*
2	* Copyright (c) 2018, Arm Limited.
3	* SPDX-License-Identifier: MIT
4	*/
5	#ifndef _LOG2_DATA_H
6	#define _LOG2_DATA_H
7
8	#include <features.h>
9
10	#define LOG2_TABLE_BITS 6
11	#define LOG2_POLY_ORDER 7
12	#define LOG2_POLY1_ORDER 11
13	extern hidden const struct log2_data {
14	double invln2hi;
15	double invln2lo;
16	double poly[LOG2_POLY_ORDER - 1];
17	double poly1[LOG2_POLY1_ORDER - 1];
18	struct {
19	double invc, logc;
20	} tab[1 << LOG2_TABLE_BITS];
21	#if !__FP_FAST_FMA
22	struct {
23	double chi, clo;
24	} tab2[1 << LOG2_TABLE_BITS];
25	#endif
26	} __log2_data;
27
28	#endif

lib/libc/wasi/libc-top-half/musl/src/math/log2f.c deleted-72

...	@@ -1,72 +0,0 @@
1	/*
2	* Single-precision log2 function.
3	*
4	* Copyright (c) 2017-2018, Arm Limited.
5	* SPDX-License-Identifier: MIT
6	*/
7
8	#include <math.h>
9	#include <stdint.h>
10	#include "libm.h"
11	#include "log2f_data.h"
12
13	/*
14	LOG2F_TABLE_BITS = 4
15	LOG2F_POLY_ORDER = 4
16
17	ULP error: 0.752 (nearest rounding.)
18	Relative error: 1.9 * 2^-26 (before rounding.)
19	*/
20
21	#define N (1 << LOG2F_TABLE_BITS)
22	#define T __log2f_data.tab
23	#define A __log2f_data.poly
24	#define OFF 0x3f330000
25
26	float log2f(float x)
27	{
28	double_t z, r, r2, p, y, y0, invc, logc;
29	uint32_t ix, iz, top, tmp;
30	int k, i;
31
32	ix = asuint(x);
33	/* Fix sign of zero with downward rounding when x==1. */
34	if (WANT_ROUNDING && predict_false(ix == 0x3f800000))
35	return 0;
36	if (predict_false(ix - 0x00800000 >= 0x7f800000 - 0x00800000)) {
37	/* x < 0x1p-126 or inf or nan. */
38	if (ix * 2 == 0)
39	return __math_divzerof(1);
40	if (ix == 0x7f800000) /* log2(inf) == inf. */
41	return x;
42	if ((ix & 0x80000000) \|\| ix * 2 >= 0xff000000)
43	return __math_invalidf(x);
44	/* x is subnormal, normalize it. */
45	ix = asuint(x * 0x1p23f);
46	ix -= 23 << 23;
47	}
48
49	/* x = 2^k z; where z is in range [OFF,2*OFF] and exact.
50	The range is split into N subintervals.
51	The ith subinterval contains z and c is near its center. */
52	tmp = ix - OFF;
53	i = (tmp >> (23 - LOG2F_TABLE_BITS)) % N;
54	top = tmp & 0xff800000;
55	iz = ix - top;
56	k = (int32_t)tmp >> 23; /* arithmetic shift */
57	invc = T[i].invc;
58	logc = T[i].logc;
59	z = (double_t)asfloat(iz);
60
61	/* log2(x) = log1p(z/c-1)/ln2 + log2(c) + k */
62	r = z * invc - 1;
63	y0 = logc + (double_t)k;
64
65	/* Pipelined polynomial evaluation to approximate log1p(r)/ln2. */
66	r2 = r * r;
67	y = A[1] * r + A[2];
68	y = A[0] * r2 + y;
69	p = A[3] * r + y0;
70	y = y * r2 + p;
71	return eval_as_float(y);
72	}

lib/libc/wasi/libc-top-half/musl/src/math/log2f_data.c deleted-33

...	@@ -1,33 +0,0 @@
1	/*
2	* Data definition for log2f.
3	*
4	* Copyright (c) 2017-2018, Arm Limited.
5	* SPDX-License-Identifier: MIT
6	*/
7
8	#include "log2f_data.h"
9
10	const struct log2f_data __log2f_data = {
11	.tab = {
12	{ 0x1.661ec79f8f3bep+0, -0x1.efec65b963019p-2 },
13	{ 0x1.571ed4aaf883dp+0, -0x1.b0b6832d4fca4p-2 },
14	{ 0x1.49539f0f010bp+0, -0x1.7418b0a1fb77bp-2 },
15	{ 0x1.3c995b0b80385p+0, -0x1.39de91a6dcf7bp-2 },
16	{ 0x1.30d190c8864a5p+0, -0x1.01d9bf3f2b631p-2 },
17	{ 0x1.25e227b0b8eap+0, -0x1.97c1d1b3b7afp-3 },
18	{ 0x1.1bb4a4a1a343fp+0, -0x1.2f9e393af3c9fp-3 },
19	{ 0x1.12358f08ae5bap+0, -0x1.960cbbf788d5cp-4 },
20	{ 0x1.0953f419900a7p+0, -0x1.a6f9db6475fcep-5 },
21	{ 0x1p+0, 0x0p+0 },
22	{ 0x1.e608cfd9a47acp-1, 0x1.338ca9f24f53dp-4 },
23	{ 0x1.ca4b31f026aap-1, 0x1.476a9543891bap-3 },
24	{ 0x1.b2036576afce6p-1, 0x1.e840b4ac4e4d2p-3 },
25	{ 0x1.9c2d163a1aa2dp-1, 0x1.40645f0c6651cp-2 },
26	{ 0x1.886e6037841edp-1, 0x1.88e9c2c1b9ff8p-2 },
27	{ 0x1.767dcf5534862p-1, 0x1.ce0a44eb17bccp-2 },
28	},
29	.poly = {
30	-0x1.712b6f70a7e4dp-2, 0x1.ecabf496832ep-2, -0x1.715479ffae3dep-1,
31	0x1.715475f35c8b8p0,
32	}
33	};

lib/libc/wasi/libc-top-half/musl/src/math/log2f_data.h deleted-19

...	@@ -1,19 +0,0 @@
1	/*
2	* Copyright (c) 2017-2018, Arm Limited.
3	* SPDX-License-Identifier: MIT
4	*/
5	#ifndef _LOG2F_DATA_H
6	#define _LOG2F_DATA_H
7
8	#include <features.h>
9
10	#define LOG2F_TABLE_BITS 4
11	#define LOG2F_POLY_ORDER 4
12	extern hidden const struct log2f_data {
13	struct {
14	double invc, logc;
15	} tab[1 << LOG2F_TABLE_BITS];
16	double poly[LOG2F_POLY_ORDER];
17	} __log2f_data;
18
19	#endif

lib/libc/wasi/libc-top-half/musl/src/math/log2l.c deleted-182

...	@@ -1,182 +0,0 @@
1	/* origin: OpenBSD /usr/src/lib/libm/src/ld80/e_log2l.c */
2	/*
3	* Copyright (c) 2008 Stephen L. Moshier <steve@moshier.net>
4	*
5	* Permission to use, copy, modify, and distribute this software for any
6	* purpose with or without fee is hereby granted, provided that the above
7	* copyright notice and this permission notice appear in all copies.
8	*
9	* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10	* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11	* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12	* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13	* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14	* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15	* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16	*/
17	/*
18	* Base 2 logarithm, long double precision
19	*
20	*
21	* SYNOPSIS:
22	*
23	* long double x, y, log2l();
24	*
25	* y = log2l( x );
26	*
27	*
28	* DESCRIPTION:
29	*
30	* Returns the base 2 logarithm of x.
31	*
32	* The argument is separated into its exponent and fractional
33	* parts. If the exponent is between -1 and +1, the (natural)
34	* logarithm of the fraction is approximated by
35	*
36	* log(1+x) = x - 0.5 x2 + x3 P(x)/Q(x).
37	*
38	* Otherwise, setting z = 2(x-1)/x+1),
39	*
40	* log(x) = z + z**3 P(z)/Q(z).
41	*
42	*
43	* ACCURACY:
44	*
45	* Relative error:
46	* arithmetic domain # trials peak rms
47	* IEEE 0.5, 2.0 30000 9.8e-20 2.7e-20
48	* IEEE exp(+-10000) 70000 5.4e-20 2.3e-20
49	*
50	* In the tests over the interval exp(+-10000), the logarithms
51	* of the random arguments were uniformly distributed over
52	* [-10000, +10000].
53	*/
54
55	#include "libm.h"
56
57	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
58	long double log2l(long double x)
59	{
60	return log2(x);
61	}
62	#elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
63	/* Coefficients for ln(1+x) = x - x2/2 + x3 P(x)/Q(x)
64	* 1/sqrt(2) <= x < sqrt(2)
65	* Theoretical peak relative error = 6.2e-22
66	*/
67	static const long double P[] = {
68	4.9962495940332550844739E-1L,
69	1.0767376367209449010438E1L,
70	7.7671073698359539859595E1L,
71	2.5620629828144409632571E2L,
72	4.2401812743503691187826E2L,
73	3.4258224542413922935104E2L,
74	1.0747524399916215149070E2L,
75	};
76	static const long double Q[] = {
77	/* 1.0000000000000000000000E0,*/
78	2.3479774160285863271658E1L,
79	1.9444210022760132894510E2L,
80	7.7952888181207260646090E2L,
81	1.6911722418503949084863E3L,
82	2.0307734695595183428202E3L,
83	1.2695660352705325274404E3L,
84	3.2242573199748645407652E2L,
85	};
86
87	/* Coefficients for log(x) = z + z^3 P(z^2)/Q(z^2),
88	* where z = 2(x-1)/(x+1)
89	* 1/sqrt(2) <= x < sqrt(2)
90	* Theoretical peak relative error = 6.16e-22
91	*/
92	static const long double R[4] = {
93	1.9757429581415468984296E-3L,
94	-7.1990767473014147232598E-1L,
95	1.0777257190312272158094E1L,
96	-3.5717684488096787370998E1L,
97	};
98	static const long double S[4] = {
99	/* 1.00000000000000000000E0L,*/
100	-2.6201045551331104417768E1L,
101	1.9361891836232102174846E2L,
102	-4.2861221385716144629696E2L,
103	};
104	/* log2(e) - 1 */
105	#define LOG2EA 4.4269504088896340735992e-1L
106
107	#define SQRTH 0.70710678118654752440L
108
109	long double log2l(long double x)
110	{
111	long double y, z;
112	int e;
113
114	if (isnan(x))
115	return x;
116	if (x == INFINITY)
117	return x;
118	if (x <= 0.0) {
119	if (x == 0.0)
120	return -1/(xx); / -inf with divbyzero */
121	return 0/0.0f; /* nan with invalid */
122	}
123
124	/* separate mantissa from exponent */
125	/* Note, frexp is used so that denormal numbers
126	* will be handled properly.
127	*/
128	x = frexpl(x, &e);
129
130	/* logarithm using log(x) = z + z**3 P(z)/Q(z),
131	* where z = 2(x-1)/x+1)
132	*/
133	if (e > 2 \|\| e < -2) {
134	if (x < SQRTH) { /* 2(2x-1)/(2x+1) */
135	e -= 1;
136	z = x - 0.5;
137	y = 0.5 * z + 0.5;
138	} else { /* 2 (x-1)/(x+1) */
139	z = x - 0.5;
140	z -= 0.5;
141	y = 0.5 * x + 0.5;
142	}
143	x = z / y;
144	z = x*x;
145	y = x * (z * __polevll(z, R, 3) / __p1evll(z, S, 3));
146	goto done;
147	}
148
149	/* logarithm using log(1+x) = x - .5x2 + x3 P(x)/Q(x) */
150	if (x < SQRTH) {
151	e -= 1;
152	x = 2.0*x - 1.0;
153	} else {
154	x = x - 1.0;
155	}
156	z = x*x;
157	y = x * (z * __polevll(x, P, 6) / __p1evll(x, Q, 7));
158	y = y - 0.5*z;
159
160	done:
161	/* Multiply log of fraction by log2(e)
162	* and base 2 exponent by 1
163	*
164	* *CAUTION*
165	*
166	* This sequence of operations is critical and it may
167	* be horribly defeated by some compiler optimizers.
168	*/
169	z = y * LOG2EA;
170	z += x * LOG2EA;
171	z += y;
172	z += x;
173	z += e;
174	return z;
175	}
176	#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
177	// TODO: broken implementation to make things compile
178	long double log2l(long double x)
179	{
180	return log2(x);
181	}
182	#endif

lib/libc/wasi/libc-top-half/musl/src/math/log_data.c deleted-328

...	@@ -1,328 +0,0 @@
1	/*
2	* Data for log.
3	*
4	* Copyright (c) 2018, Arm Limited.
5	* SPDX-License-Identifier: MIT
6	*/
7
8	#include "log_data.h"
9
10	#define N (1 << LOG_TABLE_BITS)
11
12	const struct log_data __log_data = {
13	.ln2hi = 0x1.62e42fefa3800p-1,
14	.ln2lo = 0x1.ef35793c76730p-45,
15	.poly1 = {
16	// relative error: 0x1.c04d76cp-63
17	// in -0x1p-4 0x1.09p-4 (\|log(1+x)\| > 0x1p-4 outside the interval)
18	-0x1p-1,
19	0x1.5555555555577p-2,
20	-0x1.ffffffffffdcbp-3,
21	0x1.999999995dd0cp-3,
22	-0x1.55555556745a7p-3,
23	0x1.24924a344de3p-3,
24	-0x1.fffffa4423d65p-4,
25	0x1.c7184282ad6cap-4,
26	-0x1.999eb43b068ffp-4,
27	0x1.78182f7afd085p-4,
28	-0x1.5521375d145cdp-4,
29	},
30	.poly = {
31	// relative error: 0x1.926199e8p-56
32	// abs error: 0x1.882ff33p-65
33	// in -0x1.fp-9 0x1.fp-9
34	-0x1.0000000000001p-1,
35	0x1.555555551305bp-2,
36	-0x1.fffffffeb459p-3,
37	0x1.999b324f10111p-3,
38	-0x1.55575e506c89fp-3,
39	},
40	/* Algorithm:
41
42	x = 2^k z
43	log(x) = k ln2 + log(c) + log(z/c)
44	log(z/c) = poly(z/c - 1)
45
46	where z is in [1.6p-1; 1.6p0] which is split into N subintervals and z falls
47	into the ith one, then table entries are computed as
48
49	tab[i].invc = 1/c
50	tab[i].logc = (double)log(c)
51	tab2[i].chi = (double)c
52	tab2[i].clo = (double)(c - (double)c)
53
54	where c is near the center of the subinterval and is chosen by trying +-2^29
55	floating point invc candidates around 1/center and selecting one for which
56
57	1) the rounding error in 0x1.8p9 + logc is 0,
58	2) the rounding error in z - chi - clo is < 0x1p-66 and
59	3) the rounding error in (double)log(c) is minimized (< 0x1p-66).
60
61	Note: 1) ensures that k*ln2hi + logc can be computed without rounding error,
62	2) ensures that z/c - 1 can be computed as (z - chi - clo)*invc with close to
63	a single rounding error when there is no fast fma for z*invc - 1, 3) ensures
64	that logc + poly(z/c - 1) has small error, however near x == 1 when
65	\|log(x)\| < 0x1p-4, this is not enough so that is special cased. */
66	.tab = {
67	{0x1.734f0c3e0de9fp+0, -0x1.7cc7f79e69000p-2},
68	{0x1.713786a2ce91fp+0, -0x1.76feec20d0000p-2},
69	{0x1.6f26008fab5a0p+0, -0x1.713e31351e000p-2},
70	{0x1.6d1a61f138c7dp+0, -0x1.6b85b38287800p-2},
71	{0x1.6b1490bc5b4d1p+0, -0x1.65d5590807800p-2},
72	{0x1.69147332f0cbap+0, -0x1.602d076180000p-2},
73	{0x1.6719f18224223p+0, -0x1.5a8ca86909000p-2},
74	{0x1.6524f99a51ed9p+0, -0x1.54f4356035000p-2},
75	{0x1.63356aa8f24c4p+0, -0x1.4f637c36b4000p-2},
76	{0x1.614b36b9ddc14p+0, -0x1.49da7fda85000p-2},
77	{0x1.5f66452c65c4cp+0, -0x1.445923989a800p-2},
78	{0x1.5d867b5912c4fp+0, -0x1.3edf439b0b800p-2},
79	{0x1.5babccb5b90dep+0, -0x1.396ce448f7000p-2},
80	{0x1.59d61f2d91a78p+0, -0x1.3401e17bda000p-2},
81	{0x1.5805612465687p+0, -0x1.2e9e2ef468000p-2},
82	{0x1.56397cee76bd3p+0, -0x1.2941b3830e000p-2},
83	{0x1.54725e2a77f93p+0, -0x1.23ec58cda8800p-2},
84	{0x1.52aff42064583p+0, -0x1.1e9e129279000p-2},
85	{0x1.50f22dbb2bddfp+0, -0x1.1956d2b48f800p-2},
86	{0x1.4f38f4734ded7p+0, -0x1.141679ab9f800p-2},
87	{0x1.4d843cfde2840p+0, -0x1.0edd094ef9800p-2},
88	{0x1.4bd3ec078a3c8p+0, -0x1.09aa518db1000p-2},
89	{0x1.4a27fc3e0258ap+0, -0x1.047e65263b800p-2},
90	{0x1.4880524d48434p+0, -0x1.feb224586f000p-3},
91	{0x1.46dce1b192d0bp+0, -0x1.f474a7517b000p-3},
92	{0x1.453d9d3391854p+0, -0x1.ea4443d103000p-3},
93	{0x1.43a2744b4845ap+0, -0x1.e020d44e9b000p-3},
94	{0x1.420b54115f8fbp+0, -0x1.d60a22977f000p-3},
95	{0x1.40782da3ef4b1p+0, -0x1.cc00104959000p-3},
96	{0x1.3ee8f5d57fe8fp+0, -0x1.c202956891000p-3},
97	{0x1.3d5d9a00b4ce9p+0, -0x1.b81178d811000p-3},
98	{0x1.3bd60c010c12bp+0, -0x1.ae2c9ccd3d000p-3},
99	{0x1.3a5242b75dab8p+0, -0x1.a45402e129000p-3},
100	{0x1.38d22cd9fd002p+0, -0x1.9a877681df000p-3},
101	{0x1.3755bc5847a1cp+0, -0x1.90c6d69483000p-3},
102	{0x1.35dce49ad36e2p+0, -0x1.87120a645c000p-3},
103	{0x1.34679984dd440p+0, -0x1.7d68fb4143000p-3},
104	{0x1.32f5cceffcb24p+0, -0x1.73cb83c627000p-3},
105	{0x1.3187775a10d49p+0, -0x1.6a39a9b376000p-3},
106	{0x1.301c8373e3990p+0, -0x1.60b3154b7a000p-3},
107	{0x1.2eb4ebb95f841p+0, -0x1.5737d76243000p-3},
108	{0x1.2d50a0219a9d1p+0, -0x1.4dc7b8fc23000p-3},
109	{0x1.2bef9a8b7fd2ap+0, -0x1.4462c51d20000p-3},
110	{0x1.2a91c7a0c1babp+0, -0x1.3b08abc830000p-3},
111	{0x1.293726014b530p+0, -0x1.31b996b490000p-3},
112	{0x1.27dfa5757a1f5p+0, -0x1.2875490a44000p-3},
113	{0x1.268b39b1d3bbfp+0, -0x1.1f3b9f879a000p-3},
114	{0x1.2539d838ff5bdp+0, -0x1.160c8252ca000p-3},
115	{0x1.23eb7aac9083bp+0, -0x1.0ce7f57f72000p-3},
116	{0x1.22a012ba940b6p+0, -0x1.03cdc49fea000p-3},
117	{0x1.2157996cc4132p+0, -0x1.f57bdbc4b8000p-4},
118	{0x1.201201dd2fc9bp+0, -0x1.e370896404000p-4},
119	{0x1.1ecf4494d480bp+0, -0x1.d17983ef94000p-4},
120	{0x1.1d8f5528f6569p+0, -0x1.bf9674ed8a000p-4},
121	{0x1.1c52311577e7cp+0, -0x1.adc79202f6000p-4},
122	{0x1.1b17c74cb26e9p+0, -0x1.9c0c3e7288000p-4},
123	{0x1.19e010c2c1ab6p+0, -0x1.8a646b372c000p-4},
124	{0x1.18ab07bb670bdp+0, -0x1.78d01b3ac0000p-4},
125	{0x1.1778a25efbcb6p+0, -0x1.674f145380000p-4},
126	{0x1.1648d354c31dap+0, -0x1.55e0e6d878000p-4},
127	{0x1.151b990275fddp+0, -0x1.4485cdea1e000p-4},
128	{0x1.13f0ea432d24cp+0, -0x1.333d94d6aa000p-4},
129	{0x1.12c8b7210f9dap+0, -0x1.22079f8c56000p-4},
130	{0x1.11a3028ecb531p+0, -0x1.10e4698622000p-4},
131	{0x1.107fbda8434afp+0, -0x1.ffa6c6ad20000p-5},
132	{0x1.0f5ee0f4e6bb3p+0, -0x1.dda8d4a774000p-5},
133	{0x1.0e4065d2a9fcep+0, -0x1.bbcece4850000p-5},
134	{0x1.0d244632ca521p+0, -0x1.9a1894012c000p-5},
135	{0x1.0c0a77ce2981ap+0, -0x1.788583302c000p-5},
136	{0x1.0af2f83c636d1p+0, -0x1.5715e67d68000p-5},
137	{0x1.09ddb98a01339p+0, -0x1.35c8a49658000p-5},
138	{0x1.08cabaf52e7dfp+0, -0x1.149e364154000p-5},
139	{0x1.07b9f2f4e28fbp+0, -0x1.e72c082eb8000p-6},
140	{0x1.06ab58c358f19p+0, -0x1.a55f152528000p-6},
141	{0x1.059eea5ecf92cp+0, -0x1.63d62cf818000p-6},
142	{0x1.04949cdd12c90p+0, -0x1.228fb8caa0000p-6},
143	{0x1.038c6c6f0ada9p+0, -0x1.c317b20f90000p-7},
144	{0x1.02865137932a9p+0, -0x1.419355daa0000p-7},
145	{0x1.0182427ea7348p+0, -0x1.81203c2ec0000p-8},
146	{0x1.008040614b195p+0, -0x1.0040979240000p-9},
147	{0x1.fe01ff726fa1ap-1, 0x1.feff384900000p-9},
148	{0x1.fa11cc261ea74p-1, 0x1.7dc41353d0000p-7},
149	{0x1.f6310b081992ep-1, 0x1.3cea3c4c28000p-6},
150	{0x1.f25f63ceeadcdp-1, 0x1.b9fc114890000p-6},
151	{0x1.ee9c8039113e7p-1, 0x1.1b0d8ce110000p-5},
152	{0x1.eae8078cbb1abp-1, 0x1.58a5bd001c000p-5},
153	{0x1.e741aa29d0c9bp-1, 0x1.95c8340d88000p-5},
154	{0x1.e3a91830a99b5p-1, 0x1.d276aef578000p-5},
155	{0x1.e01e009609a56p-1, 0x1.07598e598c000p-4},
156	{0x1.dca01e577bb98p-1, 0x1.253f5e30d2000p-4},
157	{0x1.d92f20b7c9103p-1, 0x1.42edd8b380000p-4},
158	{0x1.d5cac66fb5ccep-1, 0x1.606598757c000p-4},
159	{0x1.d272caa5ede9dp-1, 0x1.7da76356a0000p-4},
160	{0x1.cf26e3e6b2ccdp-1, 0x1.9ab434e1c6000p-4},
161	{0x1.cbe6da2a77902p-1, 0x1.b78c7bb0d6000p-4},
162	{0x1.c8b266d37086dp-1, 0x1.d431332e72000p-4},
163	{0x1.c5894bd5d5804p-1, 0x1.f0a3171de6000p-4},
164	{0x1.c26b533bb9f8cp-1, 0x1.067152b914000p-3},
165	{0x1.bf583eeece73fp-1, 0x1.147858292b000p-3},
166	{0x1.bc4fd75db96c1p-1, 0x1.2266ecdca3000p-3},
167	{0x1.b951e0c864a28p-1, 0x1.303d7a6c55000p-3},
168	{0x1.b65e2c5ef3e2cp-1, 0x1.3dfc33c331000p-3},
169	{0x1.b374867c9888bp-1, 0x1.4ba366b7a8000p-3},
170	{0x1.b094b211d304ap-1, 0x1.5933928d1f000p-3},
171	{0x1.adbe885f2ef7ep-1, 0x1.66acd2418f000p-3},
172	{0x1.aaf1d31603da2p-1, 0x1.740f8ec669000p-3},
173	{0x1.a82e63fd358a7p-1, 0x1.815c0f51af000p-3},
174	{0x1.a5740ef09738bp-1, 0x1.8e92954f68000p-3},
175	{0x1.a2c2a90ab4b27p-1, 0x1.9bb3602f84000p-3},
176	{0x1.a01a01393f2d1p-1, 0x1.a8bed1c2c0000p-3},
177	{0x1.9d79f24db3c1bp-1, 0x1.b5b515c01d000p-3},
178	{0x1.9ae2505c7b190p-1, 0x1.c2967ccbcc000p-3},
179	{0x1.9852ef297ce2fp-1, 0x1.cf635d5486000p-3},
180	{0x1.95cbaeea44b75p-1, 0x1.dc1bd3446c000p-3},
181	{0x1.934c69de74838p-1, 0x1.e8c01b8cfe000p-3},
182	{0x1.90d4f2f6752e6p-1, 0x1.f5509c0179000p-3},
183	{0x1.8e6528effd79dp-1, 0x1.00e6c121fb800p-2},
184	{0x1.8bfce9fcc007cp-1, 0x1.071b80e93d000p-2},
185	{0x1.899c0dabec30ep-1, 0x1.0d46b9e867000p-2},
186	{0x1.87427aa2317fbp-1, 0x1.13687334bd000p-2},
187	{0x1.84f00acb39a08p-1, 0x1.1980d67234800p-2},
188	{0x1.82a49e8653e55p-1, 0x1.1f8ffe0cc8000p-2},
189	{0x1.8060195f40260p-1, 0x1.2595fd7636800p-2},
190	{0x1.7e22563e0a329p-1, 0x1.2b9300914a800p-2},
191	{0x1.7beb377dcb5adp-1, 0x1.3187210436000p-2},
192	{0x1.79baa679725c2p-1, 0x1.377266dec1800p-2},
193	{0x1.77907f2170657p-1, 0x1.3d54ffbaf3000p-2},
194	{0x1.756cadbd6130cp-1, 0x1.432eee32fe000p-2},
195	},
196	#if !__FP_FAST_FMA
197	.tab2 = {
198	{0x1.61000014fb66bp-1, 0x1.e026c91425b3cp-56},
199	{0x1.63000034db495p-1, 0x1.dbfea48005d41p-55},
200	{0x1.650000d94d478p-1, 0x1.e7fa786d6a5b7p-55},
201	{0x1.67000074e6fadp-1, 0x1.1fcea6b54254cp-57},
202	{0x1.68ffffedf0faep-1, -0x1.c7e274c590efdp-56},
203	{0x1.6b0000763c5bcp-1, -0x1.ac16848dcda01p-55},
204	{0x1.6d0001e5cc1f6p-1, 0x1.33f1c9d499311p-55},
205	{0x1.6efffeb05f63ep-1, -0x1.e80041ae22d53p-56},
206	{0x1.710000e86978p-1, 0x1.bff6671097952p-56},
207	{0x1.72ffffc67e912p-1, 0x1.c00e226bd8724p-55},
208	{0x1.74fffdf81116ap-1, -0x1.e02916ef101d2p-57},
209	{0x1.770000f679c9p-1, -0x1.7fc71cd549c74p-57},
210	{0x1.78ffffa7ec835p-1, 0x1.1bec19ef50483p-55},
211	{0x1.7affffe20c2e6p-1, -0x1.07e1729cc6465p-56},
212	{0x1.7cfffed3fc9p-1, -0x1.08072087b8b1cp-55},
213	{0x1.7efffe9261a76p-1, 0x1.dc0286d9df9aep-55},
214	{0x1.81000049ca3e8p-1, 0x1.97fd251e54c33p-55},
215	{0x1.8300017932c8fp-1, -0x1.afee9b630f381p-55},
216	{0x1.850000633739cp-1, 0x1.9bfbf6b6535bcp-55},
217	{0x1.87000204289c6p-1, -0x1.bbf65f3117b75p-55},
218	{0x1.88fffebf57904p-1, -0x1.9006ea23dcb57p-55},
219	{0x1.8b00022bc04dfp-1, -0x1.d00df38e04b0ap-56},
220	{0x1.8cfffe50c1b8ap-1, -0x1.8007146ff9f05p-55},
221	{0x1.8effffc918e43p-1, 0x1.3817bd07a7038p-55},
222	{0x1.910001efa5fc7p-1, 0x1.93e9176dfb403p-55},
223	{0x1.9300013467bb9p-1, 0x1.f804e4b980276p-56},
224	{0x1.94fffe6ee076fp-1, -0x1.f7ef0d9ff622ep-55},
225	{0x1.96fffde3c12d1p-1, -0x1.082aa962638bap-56},
226	{0x1.98ffff4458a0dp-1, -0x1.7801b9164a8efp-55},
227	{0x1.9afffdd982e3ep-1, -0x1.740e08a5a9337p-55},
228	{0x1.9cfffed49fb66p-1, 0x1.fce08c19bep-60},
229	{0x1.9f00020f19c51p-1, -0x1.a3faa27885b0ap-55},
230	{0x1.a10001145b006p-1, 0x1.4ff489958da56p-56},
231	{0x1.a300007bbf6fap-1, 0x1.cbeab8a2b6d18p-55},
232	{0x1.a500010971d79p-1, 0x1.8fecadd78793p-55},
233	{0x1.a70001df52e48p-1, -0x1.f41763dd8abdbp-55},
234	{0x1.a90001c593352p-1, -0x1.ebf0284c27612p-55},
235	{0x1.ab0002a4f3e4bp-1, -0x1.9fd043cff3f5fp-57},
236	{0x1.acfffd7ae1ed1p-1, -0x1.23ee7129070b4p-55},
237	{0x1.aefffee510478p-1, 0x1.a063ee00edea3p-57},
238	{0x1.b0fffdb650d5bp-1, 0x1.a06c8381f0ab9p-58},
239	{0x1.b2ffffeaaca57p-1, -0x1.9011e74233c1dp-56},
240	{0x1.b4fffd995badcp-1, -0x1.9ff1068862a9fp-56},
241	{0x1.b7000249e659cp-1, 0x1.aff45d0864f3ep-55},
242	{0x1.b8ffff987164p-1, 0x1.cfe7796c2c3f9p-56},
243	{0x1.bafffd204cb4fp-1, -0x1.3ff27eef22bc4p-57},
244	{0x1.bcfffd2415c45p-1, -0x1.cffb7ee3bea21p-57},
245	{0x1.beffff86309dfp-1, -0x1.14103972e0b5cp-55},
246	{0x1.c0fffe1b57653p-1, 0x1.bc16494b76a19p-55},
247	{0x1.c2ffff1fa57e3p-1, -0x1.4feef8d30c6edp-57},
248	{0x1.c4fffdcbfe424p-1, -0x1.43f68bcec4775p-55},
249	{0x1.c6fffed54b9f7p-1, 0x1.47ea3f053e0ecp-55},
250	{0x1.c8fffeb998fd5p-1, 0x1.383068df992f1p-56},
251	{0x1.cb0002125219ap-1, -0x1.8fd8e64180e04p-57},
252	{0x1.ccfffdd94469cp-1, 0x1.e7ebe1cc7ea72p-55},
253	{0x1.cefffeafdc476p-1, 0x1.ebe39ad9f88fep-55},
254	{0x1.d1000169af82bp-1, 0x1.57d91a8b95a71p-56},
255	{0x1.d30000d0ff71dp-1, 0x1.9c1906970c7dap-55},
256	{0x1.d4fffea790fc4p-1, -0x1.80e37c558fe0cp-58},
257	{0x1.d70002edc87e5p-1, -0x1.f80d64dc10f44p-56},
258	{0x1.d900021dc82aap-1, -0x1.47c8f94fd5c5cp-56},
259	{0x1.dafffd86b0283p-1, 0x1.c7f1dc521617ep-55},
260	{0x1.dd000296c4739p-1, 0x1.8019eb2ffb153p-55},
261	{0x1.defffe54490f5p-1, 0x1.e00d2c652cc89p-57},
262	{0x1.e0fffcdabf694p-1, -0x1.f8340202d69d2p-56},
263	{0x1.e2fffdb52c8ddp-1, 0x1.b00c1ca1b0864p-56},
264	{0x1.e4ffff24216efp-1, 0x1.2ffa8b094ab51p-56},
265	{0x1.e6fffe88a5e11p-1, -0x1.7f673b1efbe59p-58},
266	{0x1.e9000119eff0dp-1, -0x1.4808d5e0bc801p-55},
267	{0x1.eafffdfa51744p-1, 0x1.80006d54320b5p-56},
268	{0x1.ed0001a127fa1p-1, -0x1.002f860565c92p-58},
269	{0x1.ef00007babcc4p-1, -0x1.540445d35e611p-55},
270	{0x1.f0ffff57a8d02p-1, -0x1.ffb3139ef9105p-59},
271	{0x1.f30001ee58ac7p-1, 0x1.a81acf2731155p-55},
272	{0x1.f4ffff5823494p-1, 0x1.a3f41d4d7c743p-55},
273	{0x1.f6ffffca94c6bp-1, -0x1.202f41c987875p-57},
274	{0x1.f8fffe1f9c441p-1, 0x1.77dd1f477e74bp-56},
275	{0x1.fafffd2e0e37ep-1, -0x1.f01199a7ca331p-57},
276	{0x1.fd0001c77e49ep-1, 0x1.181ee4bceacb1p-56},
277	{0x1.feffff7e0c331p-1, -0x1.e05370170875ap-57},
278	{0x1.00ffff465606ep+0, -0x1.a7ead491c0adap-55},
279	{0x1.02ffff3867a58p+0, -0x1.77f69c3fcb2ep-54},
280	{0x1.04ffffdfc0d17p+0, 0x1.7bffe34cb945bp-54},
281	{0x1.0700003cd4d82p+0, 0x1.20083c0e456cbp-55},
282	{0x1.08ffff9f2cbe8p+0, -0x1.dffdfbe37751ap-57},
283	{0x1.0b000010cda65p+0, -0x1.13f7faee626ebp-54},
284	{0x1.0d00001a4d338p+0, 0x1.07dfa79489ff7p-55},
285	{0x1.0effffadafdfdp+0, -0x1.7040570d66bcp-56},
286	{0x1.110000bbafd96p+0, 0x1.e80d4846d0b62p-55},
287	{0x1.12ffffae5f45dp+0, 0x1.dbffa64fd36efp-54},
288	{0x1.150000dd59ad9p+0, 0x1.a0077701250aep-54},
289	{0x1.170000f21559ap+0, 0x1.dfdf9e2e3deeep-55},
290	{0x1.18ffffc275426p+0, 0x1.10030dc3b7273p-54},
291	{0x1.1b000123d3c59p+0, 0x1.97f7980030188p-54},
292	{0x1.1cffff8299eb7p+0, -0x1.5f932ab9f8c67p-57},
293	{0x1.1effff48ad4p+0, 0x1.37fbf9da75bebp-54},
294	{0x1.210000c8b86a4p+0, 0x1.f806b91fd5b22p-54},
295	{0x1.2300003854303p+0, 0x1.3ffc2eb9fbf33p-54},
296	{0x1.24fffffbcf684p+0, 0x1.601e77e2e2e72p-56},
297	{0x1.26ffff52921d9p+0, 0x1.ffcbb767f0c61p-56},
298	{0x1.2900014933a3cp+0, -0x1.202ca3c02412bp-56},
299	{0x1.2b00014556313p+0, -0x1.2808233f21f02p-54},
300	{0x1.2cfffebfe523bp+0, -0x1.8ff7e384fdcf2p-55},
301	{0x1.2f0000bb8ad96p+0, -0x1.5ff51503041c5p-55},
302	{0x1.30ffffb7ae2afp+0, -0x1.10071885e289dp-55},
303	{0x1.32ffffeac5f7fp+0, -0x1.1ff5d3fb7b715p-54},
304	{0x1.350000ca66756p+0, 0x1.57f82228b82bdp-54},
305	{0x1.3700011fbf721p+0, 0x1.000bac40dd5ccp-55},
306	{0x1.38ffff9592fb9p+0, -0x1.43f9d2db2a751p-54},
307	{0x1.3b00004ddd242p+0, 0x1.57f6b707638e1p-55},
308	{0x1.3cffff5b2c957p+0, 0x1.a023a10bf1231p-56},
309	{0x1.3efffeab0b418p+0, 0x1.87f6d66b152bp-54},
310	{0x1.410001532aff4p+0, 0x1.7f8375f198524p-57},
311	{0x1.4300017478b29p+0, 0x1.301e672dc5143p-55},
312	{0x1.44fffe795b463p+0, 0x1.9ff69b8b2895ap-55},
313	{0x1.46fffe80475ep+0, -0x1.5c0b19bc2f254p-54},
314	{0x1.48fffef6fc1e7p+0, 0x1.b4009f23a2a72p-54},
315	{0x1.4afffe5bea704p+0, -0x1.4ffb7bf0d7d45p-54},
316	{0x1.4d000171027dep+0, -0x1.9c06471dc6a3dp-54},
317	{0x1.4f0000ff03ee2p+0, 0x1.77f890b85531cp-54},
318	{0x1.5100012dc4bd1p+0, 0x1.004657166a436p-57},
319	{0x1.530001605277ap+0, -0x1.6bfcece233209p-54},
320	{0x1.54fffecdb704cp+0, -0x1.902720505a1d7p-55},
321	{0x1.56fffef5f54a9p+0, 0x1.bbfe60ec96412p-54},
322	{0x1.5900017e61012p+0, 0x1.87ec581afef9p-55},
323	{0x1.5b00003c93e92p+0, -0x1.f41080abf0ccp-54},
324	{0x1.5d0001d4919bcp+0, -0x1.8812afb254729p-54},
325	{0x1.5efffe7b87a89p+0, -0x1.47eb780ed6904p-54},
326	},
327	#endif
328	};

lib/libc/wasi/libc-top-half/musl/src/math/log_data.h deleted-28

...	@@ -1,28 +0,0 @@
1	/*
2	* Copyright (c) 2018, Arm Limited.
3	* SPDX-License-Identifier: MIT
4	*/
5	#ifndef _LOG_DATA_H
6	#define _LOG_DATA_H
7
8	#include <features.h>
9
10	#define LOG_TABLE_BITS 7
11	#define LOG_POLY_ORDER 6
12	#define LOG_POLY1_ORDER 12
13	extern hidden const struct log_data {
14	double ln2hi;
15	double ln2lo;
16	double poly[LOG_POLY_ORDER - 1]; /* First coefficient is 1. */
17	double poly1[LOG_POLY1_ORDER - 1];
18	struct {
19	double invc, logc;
20	} tab[1 << LOG_TABLE_BITS];
21	#if !__FP_FAST_FMA
22	struct {
23	double chi, clo;
24	} tab2[1 << LOG_TABLE_BITS];
25	#endif
26	} __log_data;
27
28	#endif

lib/libc/wasi/libc-top-half/musl/src/math/logb.c deleted-17

...	@@ -1,17 +0,0 @@
1	#include <math.h>
2
3	/*
4	special cases:
5	logb(+-0) = -inf, and raise divbyzero
6	logb(+-inf) = +inf
7	logb(nan) = nan
8	*/
9
10	double logb(double x)
11	{
12	if (!isfinite(x))
13	return x * x;
14	if (x == 0)
15	return -1/(x*x);
16	return ilogb(x);
17	}

lib/libc/wasi/libc-top-half/musl/src/math/logbf.c deleted-10

...	@@ -1,10 +0,0 @@
1	#include <math.h>
2
3	float logbf(float x)
4	{
5	if (!isfinite(x))
6	return x * x;
7	if (x == 0)
8	return -1/(x*x);
9	return ilogbf(x);
10	}

lib/libc/wasi/libc-top-half/musl/src/math/logbl.c deleted-16

...	@@ -1,16 +0,0 @@
1	#include <math.h>
2	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
3	long double logbl(long double x)
4	{
5	return logb(x);
6	}
7	#else
8	long double logbl(long double x)
9	{
10	if (!isfinite(x))
11	return x * x;
12	if (x == 0)
13	return -1/(x*x);
14	return ilogbl(x);
15	}
16	#endif

lib/libc/wasi/libc-top-half/musl/src/math/logf.c deleted-71

...	@@ -1,71 +0,0 @@
1	/*
2	* Single-precision log function.
3	*
4	* Copyright (c) 2017-2018, Arm Limited.
5	* SPDX-License-Identifier: MIT
6	*/
7
8	#include <math.h>
9	#include <stdint.h>
10	#include "libm.h"
11	#include "logf_data.h"
12
13	/*
14	LOGF_TABLE_BITS = 4
15	LOGF_POLY_ORDER = 4
16
17	ULP error: 0.818 (nearest rounding.)
18	Relative error: 1.957 * 2^-26 (before rounding.)
19	*/
20
21	#define T __logf_data.tab
22	#define A __logf_data.poly
23	#define Ln2 __logf_data.ln2
24	#define N (1 << LOGF_TABLE_BITS)
25	#define OFF 0x3f330000
26
27	float logf(float x)
28	{
29	double_t z, r, r2, y, y0, invc, logc;
30	uint32_t ix, iz, tmp;
31	int k, i;
32
33	ix = asuint(x);
34	/* Fix sign of zero with downward rounding when x==1. */
35	if (WANT_ROUNDING && predict_false(ix == 0x3f800000))
36	return 0;
37	if (predict_false(ix - 0x00800000 >= 0x7f800000 - 0x00800000)) {
38	/* x < 0x1p-126 or inf or nan. */
39	if (ix * 2 == 0)
40	return __math_divzerof(1);
41	if (ix == 0x7f800000) /* log(inf) == inf. */
42	return x;
43	if ((ix & 0x80000000) \|\| ix * 2 >= 0xff000000)
44	return __math_invalidf(x);
45	/* x is subnormal, normalize it. */
46	ix = asuint(x * 0x1p23f);
47	ix -= 23 << 23;
48	}
49
50	/* x = 2^k z; where z is in range [OFF,2*OFF] and exact.
51	The range is split into N subintervals.
52	The ith subinterval contains z and c is near its center. */
53	tmp = ix - OFF;
54	i = (tmp >> (23 - LOGF_TABLE_BITS)) % N;
55	k = (int32_t)tmp >> 23; /* arithmetic shift */
56	iz = ix - (tmp & 0x1ff << 23);
57	invc = T[i].invc;
58	logc = T[i].logc;
59	z = (double_t)asfloat(iz);
60
61	/* log(x) = log1p(z/c-1) + log(c) + kLn2 /
62	r = z * invc - 1;
63	y0 = logc + (double_t)k * Ln2;
64
65	/* Pipelined polynomial evaluation to approximate log1p(r). */
66	r2 = r * r;
67	y = A[1] * r + A[2];
68	y = A[0] * r2 + y;
69	y = y * r2 + (y0 + r);
70	return eval_as_float(y);
71	}

lib/libc/wasi/libc-top-half/musl/src/math/logf_data.c deleted-33

...	@@ -1,33 +0,0 @@
1	/*
2	* Data definition for logf.
3	*
4	* Copyright (c) 2017-2018, Arm Limited.
5	* SPDX-License-Identifier: MIT
6	*/
7
8	#include "logf_data.h"
9
10	const struct logf_data __logf_data = {
11	.tab = {
12	{ 0x1.661ec79f8f3bep+0, -0x1.57bf7808caadep-2 },
13	{ 0x1.571ed4aaf883dp+0, -0x1.2bef0a7c06ddbp-2 },
14	{ 0x1.49539f0f010bp+0, -0x1.01eae7f513a67p-2 },
15	{ 0x1.3c995b0b80385p+0, -0x1.b31d8a68224e9p-3 },
16	{ 0x1.30d190c8864a5p+0, -0x1.6574f0ac07758p-3 },
17	{ 0x1.25e227b0b8eap+0, -0x1.1aa2bc79c81p-3 },
18	{ 0x1.1bb4a4a1a343fp+0, -0x1.a4e76ce8c0e5ep-4 },
19	{ 0x1.12358f08ae5bap+0, -0x1.1973c5a611cccp-4 },
20	{ 0x1.0953f419900a7p+0, -0x1.252f438e10c1ep-5 },
21	{ 0x1p+0, 0x0p+0 },
22	{ 0x1.e608cfd9a47acp-1, 0x1.aa5aa5df25984p-5 },
23	{ 0x1.ca4b31f026aap-1, 0x1.c5e53aa362eb4p-4 },
24	{ 0x1.b2036576afce6p-1, 0x1.526e57720db08p-3 },
25	{ 0x1.9c2d163a1aa2dp-1, 0x1.bc2860d22477p-3 },
26	{ 0x1.886e6037841edp-1, 0x1.1058bc8a07ee1p-2 },
27	{ 0x1.767dcf5534862p-1, 0x1.4043057b6ee09p-2 },
28	},
29	.ln2 = 0x1.62e42fefa39efp-1,
30	.poly = {
31	-0x1.00ea348b88334p-2, 0x1.5575b0be00b6ap-2, -0x1.ffffef20a4123p-2,
32	}
33	};

lib/libc/wasi/libc-top-half/musl/src/math/logf_data.h deleted-20

...	@@ -1,20 +0,0 @@
1	/*
2	* Copyright (c) 2017-2018, Arm Limited.
3	* SPDX-License-Identifier: MIT
4	*/
5	#ifndef _LOGF_DATA_H
6	#define _LOGF_DATA_H
7
8	#include <features.h>
9
10	#define LOGF_TABLE_BITS 4
11	#define LOGF_POLY_ORDER 4
12	extern hidden const struct logf_data {
13	struct {
14	double invc, logc;
15	} tab[1 << LOGF_TABLE_BITS];
16	double ln2;
17	double poly[LOGF_POLY_ORDER - 1]; /* First order coefficient is 1. */
18	} __logf_data;
19
20	#endif

lib/libc/wasi/libc-top-half/musl/src/math/logl.c deleted-175

...	@@ -1,175 +0,0 @@
1	/* origin: OpenBSD /usr/src/lib/libm/src/ld80/e_logl.c */
2	/*
3	* Copyright (c) 2008 Stephen L. Moshier <steve@moshier.net>
4	*
5	* Permission to use, copy, modify, and distribute this software for any
6	* purpose with or without fee is hereby granted, provided that the above
7	* copyright notice and this permission notice appear in all copies.
8	*
9	* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10	* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11	* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12	* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13	* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14	* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15	* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16	*/
17	/*
18	* Natural logarithm, long double precision
19	*
20	*
21	* SYNOPSIS:
22	*
23	* long double x, y, logl();
24	*
25	* y = logl( x );
26	*
27	*
28	* DESCRIPTION:
29	*
30	* Returns the base e (2.718...) logarithm of x.
31	*
32	* The argument is separated into its exponent and fractional
33	* parts. If the exponent is between -1 and +1, the logarithm
34	* of the fraction is approximated by
35	*
36	* log(1+x) = x - 0.5 x2 + x3 P(x)/Q(x).
37	*
38	* Otherwise, setting z = 2(x-1)/(x+1),
39	*
40	* log(x) = log(1+z/2) - log(1-z/2) = z + z**3 P(z)/Q(z).
41	*
42	*
43	* ACCURACY:
44	*
45	* Relative error:
46	* arithmetic domain # trials peak rms
47	* IEEE 0.5, 2.0 150000 8.71e-20 2.75e-20
48	* IEEE exp(+-10000) 100000 5.39e-20 2.34e-20
49	*
50	* In the tests over the interval exp(+-10000), the logarithms
51	* of the random arguments were uniformly distributed over
52	* [-10000, +10000].
53	*/
54
55	#include "libm.h"
56
57	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
58	long double logl(long double x)
59	{
60	return log(x);
61	}
62	#elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
63	/* Coefficients for log(1+x) = x - x2/2 + x3 P(x)/Q(x)
64	* 1/sqrt(2) <= x < sqrt(2)
65	* Theoretical peak relative error = 2.32e-20
66	*/
67	static const long double P[] = {
68	4.5270000862445199635215E-5L,
69	4.9854102823193375972212E-1L,
70	6.5787325942061044846969E0L,
71	2.9911919328553073277375E1L,
72	6.0949667980987787057556E1L,
73	5.7112963590585538103336E1L,
74	2.0039553499201281259648E1L,
75	};
76	static const long double Q[] = {
77	/* 1.0000000000000000000000E0,*/
78	1.5062909083469192043167E1L,
79	8.3047565967967209469434E1L,
80	2.2176239823732856465394E2L,
81	3.0909872225312059774938E2L,
82	2.1642788614495947685003E2L,
83	6.0118660497603843919306E1L,
84	};
85
86	/* Coefficients for log(x) = z + z^3 P(z^2)/Q(z^2),
87	* where z = 2(x-1)/(x+1)
88	* 1/sqrt(2) <= x < sqrt(2)
89	* Theoretical peak relative error = 6.16e-22
90	*/
91	static const long double R[4] = {
92	1.9757429581415468984296E-3L,
93	-7.1990767473014147232598E-1L,
94	1.0777257190312272158094E1L,
95	-3.5717684488096787370998E1L,
96	};
97	static const long double S[4] = {
98	/* 1.00000000000000000000E0L,*/
99	-2.6201045551331104417768E1L,
100	1.9361891836232102174846E2L,
101	-4.2861221385716144629696E2L,
102	};
103	static const long double C1 = 6.9314575195312500000000E-1L;
104	static const long double C2 = 1.4286068203094172321215E-6L;
105
106	#define SQRTH 0.70710678118654752440L
107
108	long double logl(long double x)
109	{
110	long double y, z;
111	int e;
112
113	if (isnan(x))
114	return x;
115	if (x == INFINITY)
116	return x;
117	if (x <= 0.0) {
118	if (x == 0.0)
119	return -1/(xx); / -inf with divbyzero */
120	return 0/0.0f; /* nan with invalid */
121	}
122
123	/* separate mantissa from exponent */
124	/* Note, frexp is used so that denormal numbers
125	* will be handled properly.
126	*/
127	x = frexpl(x, &e);
128
129	/* logarithm using log(x) = z + z**3 P(z)/Q(z),
130	* where z = 2(x-1)/(x+1)
131	*/
132	if (e > 2 \|\| e < -2) {
133	if (x < SQRTH) { /* 2(2x-1)/(2x+1) */
134	e -= 1;
135	z = x - 0.5;
136	y = 0.5 * z + 0.5;
137	} else { /* 2 (x-1)/(x+1) */
138	z = x - 0.5;
139	z -= 0.5;
140	y = 0.5 * x + 0.5;
141	}
142	x = z / y;
143	z = x*x;
144	z = x * (z * __polevll(z, R, 3) / __p1evll(z, S, 3));
145	z = z + e * C2;
146	z = z + x;
147	z = z + e * C1;
148	return z;
149	}
150
151	/* logarithm using log(1+x) = x - .5x2 + x3 P(x)/Q(x) */
152	if (x < SQRTH) {
153	e -= 1;
154	x = 2.0*x - 1.0;
155	} else {
156	x = x - 1.0;
157	}
158	z = x*x;
159	y = x * (z * __polevll(x, P, 6) / __p1evll(x, Q, 6));
160	y = y + e * C2;
161	z = y - 0.5*z;
162	/* Note, the sum of above terms does not exceed x/4,
163	* so it contributes at most about 1/4 lsb to the error.
164	*/
165	z = z + x;
166	z = z + e * C1; /* This sum has an error of 1/2 lsb. */
167	return z;
168	}
169	#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
170	// TODO: broken implementation to make things compile
171	long double logl(long double x)
172	{
173	return log(x);
174	}
175	#endif

lib/libc/wasi/libc-top-half/musl/src/math/lrint.c deleted-72

...	@@ -1,72 +0,0 @@
1	#include <limits.h>
2	#include <fenv.h>
3	#include <math.h>
4	#include "libm.h"
5
6	/*
7	If the result cannot be represented (overflow, nan), then
8	lrint raises the invalid exception.
9
10	Otherwise if the input was not an integer then the inexact
11	exception is raised.
12
13	C99 is a bit vague about whether inexact exception is
14	allowed to be raised when invalid is raised.
15	(F.9 explicitly allows spurious inexact exceptions, F.9.6.5
16	does not make it clear if that rule applies to lrint, but
17	IEEE 754r 7.8 seems to forbid spurious inexact exception in
18	the ineger conversion functions)
19
20	So we try to make sure that no spurious inexact exception is
21	raised in case of an overflow.
22
23	If the bit size of long > precision of double, then there
24	cannot be inexact rounding in case the result overflows,
25	otherwise LONG_MAX and LONG_MIN can be represented exactly
26	as a double.
27	*/
28
29	#if LONG_MAX < 1U<<53 && defined(FE_INEXACT)
30	#include <float.h>
31	#include <stdint.h>
32	#if FLT_EVAL_METHOD==0 \|\| FLT_EVAL_METHOD==1
33	#define EPS DBL_EPSILON
34	#elif FLT_EVAL_METHOD==2
35	#define EPS LDBL_EPSILON
36	#endif
37	#ifdef __GNUC__
38	/* avoid stack frame in lrint */
39	__attribute__((noinline))
40	#endif
41	static long lrint_slow(double x)
42	{
43	#pragma STDC FENV_ACCESS ON
44	int e;
45
46	e = fetestexcept(FE_INEXACT);
47	x = rint(x);
48	if (!e && (x > LONG_MAX \|\| x < LONG_MIN))
49	feclearexcept(FE_INEXACT);
50	/* conversion */
51	return x;
52	}
53
54	long lrint(double x)
55	{
56	uint32_t abstop = asuint64(x)>>32 & 0x7fffffff;
57	uint64_t sign = asuint64(x) & (1ULL << 63);
58
59	if (abstop < 0x41dfffff) {
60	/* \|x\| < 0x7ffffc00, no overflow */
61	double_t toint = asdouble(asuint64(1/EPS) \| sign);
62	double_t y = x + toint - toint;
63	return (long)y;
64	}
65	return lrint_slow(x);
66	}
67	#else
68	long lrint(double x)
69	{
70	return rint(x);
71	}
72	#endif

lib/libc/wasi/libc-top-half/musl/src/math/lrintf.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <math.h>
2
3	/* uses LONG_MAX > 2^24, see comments in lrint.c */
4
5	long lrintf(float x)
6	{
7	return rintf(x);
8	}

lib/libc/wasi/libc-top-half/musl/src/math/lrintl.c deleted-36

...	@@ -1,36 +0,0 @@
1	#include <limits.h>
2	#include <fenv.h>
3	#include "libm.h"
4
5
6	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
7	long lrintl(long double x)
8	{
9	return lrint(x);
10	}
11	#elif defined(FE_INEXACT)
12	/*
13	see comments in lrint.c
14
15	Note that if LONG_MAX == 0x7fffffffffffffff && LDBL_MANT_DIG == 64
16	then x == 2**63 - 0.5 is the only input that overflows and
17	raises inexact (with tonearest or upward rounding mode)
18	*/
19	long lrintl(long double x)
20	{
21	#pragma STDC FENV_ACCESS ON
22	int e;
23
24	e = fetestexcept(FE_INEXACT);
25	x = rintl(x);
26	if (!e && (x > LONG_MAX \|\| x < LONG_MIN))
27	feclearexcept(FE_INEXACT);
28	/* conversion */
29	return x;
30	}
31	#else
32	long lrintl(long double x)
33	{
34	return rintl(x);
35	}
36	#endif

lib/libc/wasi/libc-top-half/musl/src/math/lround.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <math.h>
2
3	long lround(double x)
4	{
5	return round(x);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/lroundf.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <math.h>
2
3	long lroundf(float x)
4	{
5	return roundf(x);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/lroundl.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <math.h>
2
3	long lroundl(long double x)
4	{
5	return roundl(x);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/modf.c deleted-34

...	@@ -1,34 +0,0 @@
1	#include "libm.h"
2
3	double modf(double x, double *iptr)
4	{
5	union {double f; uint64_t i;} u = {x};
6	uint64_t mask;
7	int e = (int)(u.i>>52 & 0x7ff) - 0x3ff;
8
9	/* no fractional part */
10	if (e >= 52) {
11	*iptr = x;
12	if (e == 0x400 && u.i<<12 != 0) /* nan */
13	return x;
14	u.i &= 1ULL<<63;
15	return u.f;
16	}
17
18	/* no integral part*/
19	if (e < 0) {
20	u.i &= 1ULL<<63;
21	*iptr = u.f;
22	return x;
23	}
24
25	mask = -1ULL>>12>>e;
26	if ((u.i & mask) == 0) {
27	*iptr = x;
28	u.i &= 1ULL<<63;
29	return u.f;
30	}
31	u.i &= ~mask;
32	*iptr = u.f;
33	return x - u.f;
34	}

lib/libc/wasi/libc-top-half/musl/src/math/modff.c deleted-34

...	@@ -1,34 +0,0 @@
1	#include "libm.h"
2
3	float modff(float x, float *iptr)
4	{
5	union {float f; uint32_t i;} u = {x};
6	uint32_t mask;
7	int e = (int)(u.i>>23 & 0xff) - 0x7f;
8
9	/* no fractional part */
10	if (e >= 23) {
11	*iptr = x;
12	if (e == 0x80 && u.i<<9 != 0) { /* nan */
13	return x;
14	}
15	u.i &= 0x80000000;
16	return u.f;
17	}
18	/* no integral part */
19	if (e < 0) {
20	u.i &= 0x80000000;
21	*iptr = u.f;
22	return x;
23	}
24
25	mask = 0x007fffff>>e;
26	if ((u.i & mask) == 0) {
27	*iptr = x;
28	u.i &= 0x80000000;
29	return u.f;
30	}
31	u.i &= ~mask;
32	*iptr = u.f;
33	return x - u.f;
34	}

lib/libc/wasi/libc-top-half/musl/src/math/modfl.c deleted-53

...	@@ -1,53 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double modfl(long double x, long double *iptr)
5	{
6	double d;
7	long double r;
8
9	r = modf(x, &d);
10	*iptr = d;
11	return r;
12	}
13	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
14
15	static const long double toint = 1/LDBL_EPSILON;
16
17	long double modfl(long double x, long double *iptr)
18	{
19	union ldshape u = {x};
20	int e = (u.i.se & 0x7fff) - 0x3fff;
21	int s = u.i.se >> 15;
22	long double absx;
23	long double y;
24
25	/* no fractional part */
26	if (e >= LDBL_MANT_DIG-1) {
27	*iptr = x;
28	if (isnan(x))
29	return x;
30	return s ? -0.0 : 0.0;
31	}
32
33	/* no integral part*/
34	if (e < 0) {
35	*iptr = s ? -0.0 : 0.0;
36	return x;
37	}
38
39	/* raises spurious inexact */
40	absx = s ? -x : x;
41	y = absx + toint - toint - absx;
42	if (y == 0) {
43	*iptr = x;
44	return s ? -0.0 : 0.0;
45	}
46	if (y > 0)
47	y -= 1;
48	if (s)
49	y = -y;
50	*iptr = x + y;
51	return -y;
52	}
53	#endif

lib/libc/wasi/libc-top-half/musl/src/math/nan.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <math.h>
2
3	double nan(const char *s)
4	{
5	return NAN;
6	}

lib/libc/wasi/libc-top-half/musl/src/math/nanf.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <math.h>
2
3	float nanf(const char *s)
4	{
5	return NAN;
6	}

lib/libc/wasi/libc-top-half/musl/src/math/nanl.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <math.h>
2
3	long double nanl(const char *s)
4	{
5	return NAN;
6	}

lib/libc/wasi/libc-top-half/musl/src/math/nearbyintl.c deleted-26

...	@@ -1,26 +0,0 @@
1	#include <math.h>
2	#include <float.h>
3
4	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
5	long double nearbyintl(long double x)
6	{
7	return nearbyint(x);
8	}
9	#else
10	#include <fenv.h>
11	long double nearbyintl(long double x)
12	{
13	#ifdef FE_INEXACT
14	#pragma STDC FENV_ACCESS ON
15	int e;
16
17	e = fetestexcept(FE_INEXACT);
18	#endif
19	x = rintl(x);
20	#ifdef FE_INEXACT
21	if (!e)
22	feclearexcept(FE_INEXACT);
23	#endif
24	return x;
25	}
26	#endif

lib/libc/wasi/libc-top-half/musl/src/math/nextafter.c deleted-31

...	@@ -1,31 +0,0 @@
1	#include "libm.h"
2
3	double nextafter(double x, double y)
4	{
5	union {double f; uint64_t i;} ux={x}, uy={y};
6	uint64_t ax, ay;
7	int e;
8
9	if (isnan(x) \|\| isnan(y))
10	return x + y;
11	if (ux.i == uy.i)
12	return y;
13	ax = ux.i & -1ULL/2;
14	ay = uy.i & -1ULL/2;
15	if (ax == 0) {
16	if (ay == 0)
17	return y;
18	ux.i = (uy.i & 1ULL<<63) \| 1;
19	} else if (ax > ay \|\| ((ux.i ^ uy.i) & 1ULL<<63))
20	ux.i--;
21	else
22	ux.i++;
23	e = ux.i >> 52 & 0x7ff;
24	/* raise overflow if ux.f is infinite and x is finite */
25	if (e == 0x7ff)
26	FORCE_EVAL(x+x);
27	/* raise underflow if ux.f is subnormal or zero */
28	if (e == 0)
29	FORCE_EVAL(xx + ux.fux.f);
30	return ux.f;
31	}

lib/libc/wasi/libc-top-half/musl/src/math/nextafterf.c deleted-30

...	@@ -1,30 +0,0 @@
1	#include "libm.h"
2
3	float nextafterf(float x, float y)
4	{
5	union {float f; uint32_t i;} ux={x}, uy={y};
6	uint32_t ax, ay, e;
7
8	if (isnan(x) \|\| isnan(y))
9	return x + y;
10	if (ux.i == uy.i)
11	return y;
12	ax = ux.i & 0x7fffffff;
13	ay = uy.i & 0x7fffffff;
14	if (ax == 0) {
15	if (ay == 0)
16	return y;
17	ux.i = (uy.i & 0x80000000) \| 1;
18	} else if (ax > ay \|\| ((ux.i ^ uy.i) & 0x80000000))
19	ux.i--;
20	else
21	ux.i++;
22	e = ux.i & 0x7f800000;
23	/* raise overflow if ux.f is infinite and x is finite */
24	if (e == 0x7f800000)
25	FORCE_EVAL(x+x);
26	/* raise underflow if ux.f is subnormal or zero */
27	if (e == 0)
28	FORCE_EVAL(xx + ux.fux.f);
29	return ux.f;
30	}

lib/libc/wasi/libc-top-half/musl/src/math/nextafterl.c deleted-75

...	@@ -1,75 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double nextafterl(long double x, long double y)
5	{
6	return nextafter(x, y);
7	}
8	#elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
9	long double nextafterl(long double x, long double y)
10	{
11	union ldshape ux, uy;
12
13	if (isnan(x) \|\| isnan(y))
14	return x + y;
15	if (x == y)
16	return y;
17	ux.f = x;
18	if (x == 0) {
19	uy.f = y;
20	ux.i.m = 1;
21	ux.i.se = uy.i.se & 0x8000;
22	} else if ((x < y) == !(ux.i.se & 0x8000)) {
23	ux.i.m++;
24	if (ux.i.m << 1 == 0) {
25	ux.i.m = 1ULL << 63;
26	ux.i.se++;
27	}
28	} else {
29	if (ux.i.m << 1 == 0) {
30	ux.i.se--;
31	if (ux.i.se)
32	ux.i.m = 0;
33	}
34	ux.i.m--;
35	}
36	/* raise overflow if ux is infinite and x is finite */
37	if ((ux.i.se & 0x7fff) == 0x7fff)
38	return x + x;
39	/* raise underflow if ux is subnormal or zero */
40	if ((ux.i.se & 0x7fff) == 0)
41	FORCE_EVAL(xx + ux.fux.f);
42	return ux.f;
43	}
44	#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
45	long double nextafterl(long double x, long double y)
46	{
47	union ldshape ux, uy;
48
49	if (isnan(x) \|\| isnan(y))
50	return x + y;
51	if (x == y)
52	return y;
53	ux.f = x;
54	if (x == 0) {
55	uy.f = y;
56	ux.i.lo = 1;
57	ux.i.se = uy.i.se & 0x8000;
58	} else if ((x < y) == !(ux.i.se & 0x8000)) {
59	ux.i2.lo++;
60	if (ux.i2.lo == 0)
61	ux.i2.hi++;
62	} else {
63	if (ux.i2.lo == 0)
64	ux.i2.hi--;
65	ux.i2.lo--;
66	}
67	/* raise overflow if ux is infinite and x is finite */
68	if ((ux.i.se & 0x7fff) == 0x7fff)
69	return x + x;
70	/* raise underflow if ux is subnormal or zero */
71	if ((ux.i.se & 0x7fff) == 0)
72	FORCE_EVAL(xx + ux.fux.f);
73	return ux.f;
74	}
75	#endif

lib/libc/wasi/libc-top-half/musl/src/math/nexttoward.c deleted-42

...	@@ -1,42 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	double nexttoward(double x, long double y)
5	{
6	return nextafter(x, y);
7	}
8	#else
9	double nexttoward(double x, long double y)
10	{
11	union {double f; uint64_t i;} ux = {x};
12	int e;
13
14	if (isnan(x) \|\| isnan(y))
15	return x + y;
16	if (x == y)
17	return y;
18	if (x == 0) {
19	ux.i = 1;
20	if (signbit(y))
21	ux.i \|= 1ULL<<63;
22	} else if (x < y) {
23	if (signbit(x))
24	ux.i--;
25	else
26	ux.i++;
27	} else {
28	if (signbit(x))
29	ux.i++;
30	else
31	ux.i--;
32	}
33	e = ux.i>>52 & 0x7ff;
34	/* raise overflow if ux.f is infinite and x is finite */
35	if (e == 0x7ff)
36	FORCE_EVAL(x+x);
37	/* raise underflow if ux.f is subnormal or zero */
38	if (e == 0)
39	FORCE_EVAL(xx + ux.fux.f);
40	return ux.f;
41	}
42	#endif

lib/libc/wasi/libc-top-half/musl/src/math/nexttowardf.c deleted-35

...	@@ -1,35 +0,0 @@
1	#include "libm.h"
2
3	float nexttowardf(float x, long double y)
4	{
5	union {float f; uint32_t i;} ux = {x};
6	uint32_t e;
7
8	if (isnan(x) \|\| isnan(y))
9	return x + y;
10	if (x == y)
11	return y;
12	if (x == 0) {
13	ux.i = 1;
14	if (signbit(y))
15	ux.i \|= 0x80000000;
16	} else if (x < y) {
17	if (signbit(x))
18	ux.i--;
19	else
20	ux.i++;
21	} else {
22	if (signbit(x))
23	ux.i++;
24	else
25	ux.i--;
26	}
27	e = ux.i & 0x7f800000;
28	/* raise overflow if ux.f is infinite and x is finite */
29	if (e == 0x7f800000)
30	FORCE_EVAL(x+x);
31	/* raise underflow if ux.f is subnormal or zero */
32	if (e == 0)
33	FORCE_EVAL(xx + ux.fux.f);
34	return ux.f;
35	}

lib/libc/wasi/libc-top-half/musl/src/math/nexttowardl.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <math.h>
2
3	long double nexttowardl(long double x, long double y)
4	{
5	return nextafterl(x, y);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/pow.c deleted-343

...	@@ -1,343 +0,0 @@
1	/*
2	* Double-precision x^y function.
3	*
4	* Copyright (c) 2018, Arm Limited.
5	* SPDX-License-Identifier: MIT
6	*/
7
8	#include <math.h>
9	#include <stdint.h>
10	#include "libm.h"
11	#include "exp_data.h"
12	#include "pow_data.h"
13
14	/*
15	Worst-case error: 0.54 ULP (~= ulperr_exp + 1024Ln2relerr_log*2^53)
16	relerr_log: 1.3 * 2^-68 (Relative error of log, 1.5 * 2^-68 without fma)
17	ulperr_exp: 0.509 ULP (ULP error of exp, 0.511 ULP without fma)
18	*/
19
20	#define T __pow_log_data.tab
21	#define A __pow_log_data.poly
22	#define Ln2hi __pow_log_data.ln2hi
23	#define Ln2lo __pow_log_data.ln2lo
24	#define N (1 << POW_LOG_TABLE_BITS)
25	#define OFF 0x3fe6955500000000
26
27	/* Top 12 bits of a double (sign and exponent bits). */
28	static inline uint32_t top12(double x)
29	{
30	return asuint64(x) >> 52;
31	}
32
33	/* Compute y+TAIL = log(x) where the rounded result is y and TAIL has about
34	additional 15 bits precision. IX is the bit representation of x, but
35	normalized in the subnormal range using the sign bit for the exponent. */
36	static inline double_t log_inline(uint64_t ix, double_t *tail)
37	{
38	/* double_t for better performance on targets with FLT_EVAL_METHOD==2. */
39	double_t z, r, y, invc, logc, logctail, kd, hi, t1, t2, lo, lo1, lo2, p;
40	uint64_t iz, tmp;
41	int k, i;
42
43	/* x = 2^k z; where z is in range [OFF,2*OFF) and exact.
44	The range is split into N subintervals.
45	The ith subinterval contains z and c is near its center. */
46	tmp = ix - OFF;
47	i = (tmp >> (52 - POW_LOG_TABLE_BITS)) % N;
48	k = (int64_t)tmp >> 52; /* arithmetic shift */
49	iz = ix - (tmp & 0xfffULL << 52);
50	z = asdouble(iz);
51	kd = (double_t)k;
52
53	/* log(x) = kLn2 + log(c) + log1p(z/c-1). /
54	invc = T[i].invc;
55	logc = T[i].logc;
56	logctail = T[i].logctail;
57
58	/* Note: 1/c is j/N or j/N/2 where j is an integer in [N,2N) and
59	\|z/c - 1\| < 1/N, so r = z/c - 1 is exactly representible. */
60	#if __FP_FAST_FMA
61	r = __builtin_fma(z, invc, -1.0);
62	#else
63	/* Split z such that rhi, rlo and rhirhi are exact and \|rlo\| <= \|r\|. /
64	double_t zhi = asdouble((iz + (1ULL << 31)) & (-1ULL << 32));
65	double_t zlo = z - zhi;
66	double_t rhi = zhi * invc - 1.0;
67	double_t rlo = zlo * invc;
68	r = rhi + rlo;
69	#endif
70
71	/* kLn2 + log(c) + r. /
72	t1 = kd * Ln2hi + logc;
73	t2 = t1 + r;
74	lo1 = kd * Ln2lo + logctail;
75	lo2 = t1 - t2 + r;
76
77	/* Evaluation is optimized assuming superscalar pipelined execution. */
78	double_t ar, ar2, ar3, lo3, lo4;
79	ar = A[0] * r; /* A[0] = -0.5. */
80	ar2 = r * ar;
81	ar3 = r * ar2;
82	/* kLn2 + log(c) + r + A[0]rr. /
83	#if __FP_FAST_FMA
84	hi = t2 + ar2;
85	lo3 = __builtin_fma(ar, r, -ar2);
86	lo4 = t2 - hi + ar2;
87	#else
88	double_t arhi = A[0] * rhi;
89	double_t arhi2 = rhi * arhi;
90	hi = t2 + arhi2;
91	lo3 = rlo * (ar + arhi);
92	lo4 = t2 - hi + arhi2;
93	#endif
94	/* p = log1p(r) - r - A[0]rr. */
95	p = (ar3 * (A[1] + r * A[2] +
96	ar2 * (A[3] + r * A[4] + ar2 * (A[5] + r * A[6]))));
97	lo = lo1 + lo2 + lo3 + lo4 + p;
98	y = hi + lo;
99	*tail = hi - y + lo;
100	return y;
101	}
102
103	#undef N
104	#undef T
105	#define N (1 << EXP_TABLE_BITS)
106	#define InvLn2N __exp_data.invln2N
107	#define NegLn2hiN __exp_data.negln2hiN
108	#define NegLn2loN __exp_data.negln2loN
109	#define Shift __exp_data.shift
110	#define T __exp_data.tab
111	#define C2 __exp_data.poly[5 - EXP_POLY_ORDER]
112	#define C3 __exp_data.poly[6 - EXP_POLY_ORDER]
113	#define C4 __exp_data.poly[7 - EXP_POLY_ORDER]
114	#define C5 __exp_data.poly[8 - EXP_POLY_ORDER]
115	#define C6 __exp_data.poly[9 - EXP_POLY_ORDER]
116
117	/* Handle cases that may overflow or underflow when computing the result that
118	is scale*(1+TMP) without intermediate rounding. The bit representation of
119	scale is in SBITS, however it has a computed exponent that may have
120	overflown into the sign bit so that needs to be adjusted before using it as
121	a double. (int32_t)KI is the k used in the argument reduction and exponent
122	adjustment of scale, positive k here means the result may overflow and
123	negative k means the result may underflow. */
124	static inline double specialcase(double_t tmp, uint64_t sbits, uint64_t ki)
125	{
126	double_t scale, y;
127
128	if ((ki & 0x80000000) == 0) {
129	/* k > 0, the exponent of scale might have overflowed by <= 460. */
130	sbits -= 1009ull << 52;
131	scale = asdouble(sbits);
132	y = 0x1p1009 * (scale + scale * tmp);
133	return eval_as_double(y);
134	}
135	/* k < 0, need special care in the subnormal range. */
136	sbits += 1022ull << 52;
137	/* Note: sbits is signed scale. */
138	scale = asdouble(sbits);
139	y = scale + scale * tmp;
140	if (fabs(y) < 1.0) {
141	/* Round y to the right precision before scaling it into the subnormal
142	range to avoid double rounding that can cause 0.5+E/2 ulp error where
143	E is the worst-case ulp error outside the subnormal range. So this
144	is only useful if the goal is better than 1 ulp worst-case error. */
145	double_t hi, lo, one = 1.0;
146	if (y < 0.0)
147	one = -1.0;
148	lo = scale - y + scale * tmp;
149	hi = one + y;
150	lo = one - hi + y + lo;
151	y = eval_as_double(hi + lo) - one;
152	/* Fix the sign of 0. */
153	if (y == 0.0)
154	y = asdouble(sbits & 0x8000000000000000);
155	/* The underflow exception needs to be signaled explicitly. */
156	fp_force_eval(fp_barrier(0x1p-1022) * 0x1p-1022);
157	}
158	y = 0x1p-1022 * y;
159	return eval_as_double(y);
160	}
161
162	#define SIGN_BIAS (0x800 << EXP_TABLE_BITS)
163
164	/* Computes sign*exp(x+xtail) where \|xtail\| < 2^-8/N and \|xtail\| <= \|x\|.
165	The sign_bias argument is SIGN_BIAS or 0 and sets the sign to -1 or 1. */
166	static inline double exp_inline(double_t x, double_t xtail, uint32_t sign_bias)
167	{
168	uint32_t abstop;
169	uint64_t ki, idx, top, sbits;
170	/* double_t for better performance on targets with FLT_EVAL_METHOD==2. */
171	double_t kd, z, r, r2, scale, tail, tmp;
172
173	abstop = top12(x) & 0x7ff;
174	if (predict_false(abstop - top12(0x1p-54) >=
175	top12(512.0) - top12(0x1p-54))) {
176	if (abstop - top12(0x1p-54) >= 0x80000000) {
177	/* Avoid spurious underflow for tiny x. */
178	/* Note: 0 is common input. */
179	double_t one = WANT_ROUNDING ? 1.0 + x : 1.0;
180	return sign_bias ? -one : one;
181	}
182	if (abstop >= top12(1024.0)) {
183	/* Note: inf and nan are already handled. */
184	if (asuint64(x) >> 63)
185	return __math_uflow(sign_bias);
186	else
187	return __math_oflow(sign_bias);
188	}
189	/* Large x is special cased below. */
190	abstop = 0;
191	}
192
193	/* exp(x) = 2^(k/N) * exp(r), with exp(r) in [2^(-1/2N),2^(1/2N)]. */
194	/* x = ln2/Nk + r, with int k and r in [-ln2/2N, ln2/2N]. /
195	z = InvLn2N * x;
196	#if TOINT_INTRINSICS
197	kd = roundtoint(z);
198	ki = converttoint(z);
199	#elif EXP_USE_TOINT_NARROW
200	/* z - kd is in [-0.5-2^-16, 0.5] in all rounding modes. */
201	kd = eval_as_double(z + Shift);
202	ki = asuint64(kd) >> 16;
203	kd = (double_t)(int32_t)ki;
204	#else
205	/* z - kd is in [-1, 1] in non-nearest rounding modes. */
206	kd = eval_as_double(z + Shift);
207	ki = asuint64(kd);
208	kd -= Shift;
209	#endif
210	r = x + kd * NegLn2hiN + kd * NegLn2loN;
211	/* The code assumes 2^-200 < \|xtail\| < 2^-8/N. */
212	r += xtail;
213	/* 2^(k/N) ~= scale * (1 + tail). */
214	idx = 2 * (ki % N);
215	top = (ki + sign_bias) << (52 - EXP_TABLE_BITS);
216	tail = asdouble(T[idx]);
217	/* This is only a valid scale when -1023N < k < 1024N. */
218	sbits = T[idx + 1] + top;
219	/* exp(x) = 2^(k/N) * exp(r) ~= scale + scale * (tail + exp(r) - 1). */
220	/* Evaluation is optimized assuming superscalar pipelined execution. */
221	r2 = r * r;
222	/* Without fma the worst case error is 0.25/N ulp larger. */
223	/* Worst case error is less than 0.5+1.11/N+(abs poly error * 2^53) ulp. */
224	tmp = tail + r + r2 * (C2 + r * C3) + r2 * r2 * (C4 + r * C5);
225	if (predict_false(abstop == 0))
226	return specialcase(tmp, sbits, ki);
227	scale = asdouble(sbits);
228	/* Note: tmp == 0 or \|tmp\| > 2^-200 and scale > 2^-739, so there
229	is no spurious underflow here even without fma. */
230	return eval_as_double(scale + scale * tmp);
231	}
232
233	/* Returns 0 if not int, 1 if odd int, 2 if even int. The argument is
234	the bit representation of a non-zero finite floating-point value. */
235	static inline int checkint(uint64_t iy)
236	{
237	int e = iy >> 52 & 0x7ff;
238	if (e < 0x3ff)
239	return 0;
240	if (e > 0x3ff + 52)
241	return 2;
242	if (iy & ((1ULL << (0x3ff + 52 - e)) - 1))
243	return 0;
244	if (iy & (1ULL << (0x3ff + 52 - e)))
245	return 1;
246	return 2;
247	}
248
249	/* Returns 1 if input is the bit representation of 0, infinity or nan. */
250	static inline int zeroinfnan(uint64_t i)
251	{
252	return 2 * i - 1 >= 2 * asuint64(INFINITY) - 1;
253	}
254
255	double pow(double x, double y)
256	{
257	uint32_t sign_bias = 0;
258	uint64_t ix, iy;
259	uint32_t topx, topy;
260
261	ix = asuint64(x);
262	iy = asuint64(y);
263	topx = top12(x);
264	topy = top12(y);
265	if (predict_false(topx - 0x001 >= 0x7ff - 0x001 \|\|
266	(topy & 0x7ff) - 0x3be >= 0x43e - 0x3be)) {
267	/* Note: if \|y\| > 1075 * ln2 * 2^53 ~= 0x1.749p62 then pow(x,y) = inf/0
268	and if \|y\| < 2^-54 / 1075 ~= 0x1.e7b6p-65 then pow(x,y) = +-1. */
269	/* Special cases: (x < 0x1p-126 or inf or nan) or
270	(\|y\| < 0x1p-65 or \|y\| >= 0x1p63 or nan). */
271	if (predict_false(zeroinfnan(iy))) {
272	if (2 * iy == 0)
273	return issignaling_inline(x) ? x + y : 1.0;
274	if (ix == asuint64(1.0))
275	return issignaling_inline(y) ? x + y : 1.0;
276	if (2 * ix > 2 * asuint64(INFINITY) \|\|
277	2 * iy > 2 * asuint64(INFINITY))
278	return x + y;
279	if (2 * ix == 2 * asuint64(1.0))
280	return 1.0;
281	if ((2 * ix < 2 * asuint64(1.0)) == !(iy >> 63))
282	return 0.0; /* \|x\|<1 && y==inf or \|x\|>1 && y==-inf. */
283	return y * y;
284	}
285	if (predict_false(zeroinfnan(ix))) {
286	double_t x2 = x * x;
287	if (ix >> 63 && checkint(iy) == 1)
288	x2 = -x2;
289	/* Without the barrier some versions of clang hoist the 1/x2 and
290	thus division by zero exception can be signaled spuriously. */
291	return iy >> 63 ? fp_barrier(1 / x2) : x2;
292	}
293	/* Here x and y are non-zero finite. */
294	if (ix >> 63) {
295	/* Finite x < 0. */
296	int yint = checkint(iy);
297	if (yint == 0)
298	return __math_invalid(x);
299	if (yint == 1)
300	sign_bias = SIGN_BIAS;
301	ix &= 0x7fffffffffffffff;
302	topx &= 0x7ff;
303	}
304	if ((topy & 0x7ff) - 0x3be >= 0x43e - 0x3be) {
305	/* Note: sign_bias == 0 here because y is not odd. */
306	if (ix == asuint64(1.0))
307	return 1.0;
308	if ((topy & 0x7ff) < 0x3be) {
309	/* \|y\| < 2^-65, x^y ~= 1 + ylog(x). /
310	if (WANT_ROUNDING)
311	return ix > asuint64(1.0) ? 1.0 + y :
312	1.0 - y;
313	else
314	return 1.0;
315	}
316	return (ix > asuint64(1.0)) == (topy < 0x800) ?
317	__math_oflow(0) :
318	__math_uflow(0);
319	}
320	if (topx == 0) {
321	/* Normalize subnormal x so exponent becomes negative. */
322	ix = asuint64(x * 0x1p52);
323	ix &= 0x7fffffffffffffff;
324	ix -= 52ULL << 52;
325	}
326	}
327
328	double_t lo;
329	double_t hi = log_inline(ix, &lo);
330	double_t ehi, elo;
331	#if __FP_FAST_FMA
332	ehi = y * hi;
333	elo = y * lo + __builtin_fma(y, hi, -ehi);
334	#else
335	double_t yhi = asdouble(iy & -1ULL << 27);
336	double_t ylo = y - yhi;
337	double_t lhi = asdouble(asuint64(hi) & -1ULL << 27);
338	double_t llo = hi - lhi + lo;
339	ehi = yhi * lhi;
340	elo = ylo * lhi + y * llo; /* \|elo\| < \|ehi\| * 2^-25. */
341	#endif
342	return exp_inline(ehi, elo, sign_bias);
343	}

lib/libc/wasi/libc-top-half/musl/src/math/pow_data.c deleted-180

...	@@ -1,180 +0,0 @@
1	/*
2	* Data for the log part of pow.
3	*
4	* Copyright (c) 2018, Arm Limited.
5	* SPDX-License-Identifier: MIT
6	*/
7
8	#include "pow_data.h"
9
10	#define N (1 << POW_LOG_TABLE_BITS)
11
12	const struct pow_log_data __pow_log_data = {
13	.ln2hi = 0x1.62e42fefa3800p-1,
14	.ln2lo = 0x1.ef35793c76730p-45,
15	.poly = {
16	// relative error: 0x1.11922ap-70
17	// in -0x1.6bp-8 0x1.6bp-8
18	// Coefficients are scaled to match the scaling during evaluation.
19	-0x1p-1,
20	0x1.555555555556p-2 * -2,
21	-0x1.0000000000006p-2 * -2,
22	0x1.999999959554ep-3 * 4,
23	-0x1.555555529a47ap-3 * 4,
24	0x1.2495b9b4845e9p-3 * -8,
25	-0x1.0002b8b263fc3p-3 * -8,
26	},
27	/* Algorithm:
28
29	x = 2^k z
30	log(x) = k ln2 + log(c) + log(z/c)
31	log(z/c) = poly(z/c - 1)
32
33	where z is in [0x1.69555p-1; 0x1.69555p0] which is split into N subintervals
34	and z falls into the ith one, then table entries are computed as
35
36	tab[i].invc = 1/c
37	tab[i].logc = round(0x1p43*log(c))/0x1p43
38	tab[i].logctail = (double)(log(c) - logc)
39
40	where c is chosen near the center of the subinterval such that 1/c has only a
41	few precision bits so z/c - 1 is exactly representible as double:
42
43	1/c = center < 1 ? round(N/center)/N : round(2*N/center)/N/2
44
45	Note: \|z/c - 1\| < 1/N for the chosen c, \|log(c) - logc - logctail\| < 0x1p-97,
46	the last few bits of logc are rounded away so k*ln2hi + logc has no rounding
47	error and the interval for z is selected such that near x == 1, where log(x)
48	is tiny, large cancellation error is avoided in logc + poly(z/c - 1). */
49	.tab = {
50	#define A(a, b, c) {a, 0, b, c},
51	A(0x1.6a00000000000p+0, -0x1.62c82f2b9c800p-2, 0x1.ab42428375680p-48)
52	A(0x1.6800000000000p+0, -0x1.5d1bdbf580800p-2, -0x1.ca508d8e0f720p-46)
53	A(0x1.6600000000000p+0, -0x1.5767717455800p-2, -0x1.362a4d5b6506dp-45)
54	A(0x1.6400000000000p+0, -0x1.51aad872df800p-2, -0x1.684e49eb067d5p-49)
55	A(0x1.6200000000000p+0, -0x1.4be5f95777800p-2, -0x1.41b6993293ee0p-47)
56	A(0x1.6000000000000p+0, -0x1.4618bc21c6000p-2, 0x1.3d82f484c84ccp-46)
57	A(0x1.5e00000000000p+0, -0x1.404308686a800p-2, 0x1.c42f3ed820b3ap-50)
58	A(0x1.5c00000000000p+0, -0x1.3a64c55694800p-2, 0x1.0b1c686519460p-45)
59	A(0x1.5a00000000000p+0, -0x1.347dd9a988000p-2, 0x1.5594dd4c58092p-45)
60	A(0x1.5800000000000p+0, -0x1.2e8e2bae12000p-2, 0x1.67b1e99b72bd8p-45)
61	A(0x1.5600000000000p+0, -0x1.2895a13de8800p-2, 0x1.5ca14b6cfb03fp-46)
62	A(0x1.5600000000000p+0, -0x1.2895a13de8800p-2, 0x1.5ca14b6cfb03fp-46)
63	A(0x1.5400000000000p+0, -0x1.22941fbcf7800p-2, -0x1.65a242853da76p-46)
64	A(0x1.5200000000000p+0, -0x1.1c898c1699800p-2, -0x1.fafbc68e75404p-46)
65	A(0x1.5000000000000p+0, -0x1.1675cababa800p-2, 0x1.f1fc63382a8f0p-46)
66	A(0x1.4e00000000000p+0, -0x1.1058bf9ae4800p-2, -0x1.6a8c4fd055a66p-45)
67	A(0x1.4c00000000000p+0, -0x1.0a324e2739000p-2, -0x1.c6bee7ef4030ep-47)
68	A(0x1.4a00000000000p+0, -0x1.0402594b4d000p-2, -0x1.036b89ef42d7fp-48)
69	A(0x1.4a00000000000p+0, -0x1.0402594b4d000p-2, -0x1.036b89ef42d7fp-48)
70	A(0x1.4800000000000p+0, -0x1.fb9186d5e4000p-3, 0x1.d572aab993c87p-47)
71	A(0x1.4600000000000p+0, -0x1.ef0adcbdc6000p-3, 0x1.b26b79c86af24p-45)
72	A(0x1.4400000000000p+0, -0x1.e27076e2af000p-3, -0x1.72f4f543fff10p-46)
73	A(0x1.4200000000000p+0, -0x1.d5c216b4fc000p-3, 0x1.1ba91bbca681bp-45)
74	A(0x1.4000000000000p+0, -0x1.c8ff7c79aa000p-3, 0x1.7794f689f8434p-45)
75	A(0x1.4000000000000p+0, -0x1.c8ff7c79aa000p-3, 0x1.7794f689f8434p-45)
76	A(0x1.3e00000000000p+0, -0x1.bc286742d9000p-3, 0x1.94eb0318bb78fp-46)
77	A(0x1.3c00000000000p+0, -0x1.af3c94e80c000p-3, 0x1.a4e633fcd9066p-52)
78	A(0x1.3a00000000000p+0, -0x1.a23bc1fe2b000p-3, -0x1.58c64dc46c1eap-45)
79	A(0x1.3a00000000000p+0, -0x1.a23bc1fe2b000p-3, -0x1.58c64dc46c1eap-45)
80	A(0x1.3800000000000p+0, -0x1.9525a9cf45000p-3, -0x1.ad1d904c1d4e3p-45)
81	A(0x1.3600000000000p+0, -0x1.87fa06520d000p-3, 0x1.bbdbf7fdbfa09p-45)
82	A(0x1.3400000000000p+0, -0x1.7ab890210e000p-3, 0x1.bdb9072534a58p-45)
83	A(0x1.3400000000000p+0, -0x1.7ab890210e000p-3, 0x1.bdb9072534a58p-45)
84	A(0x1.3200000000000p+0, -0x1.6d60fe719d000p-3, -0x1.0e46aa3b2e266p-46)
85	A(0x1.3000000000000p+0, -0x1.5ff3070a79000p-3, -0x1.e9e439f105039p-46)
86	A(0x1.3000000000000p+0, -0x1.5ff3070a79000p-3, -0x1.e9e439f105039p-46)
87	A(0x1.2e00000000000p+0, -0x1.526e5e3a1b000p-3, -0x1.0de8b90075b8fp-45)
88	A(0x1.2c00000000000p+0, -0x1.44d2b6ccb8000p-3, 0x1.70cc16135783cp-46)
89	A(0x1.2c00000000000p+0, -0x1.44d2b6ccb8000p-3, 0x1.70cc16135783cp-46)
90	A(0x1.2a00000000000p+0, -0x1.371fc201e9000p-3, 0x1.178864d27543ap-48)
91	A(0x1.2800000000000p+0, -0x1.29552f81ff000p-3, -0x1.48d301771c408p-45)
92	A(0x1.2600000000000p+0, -0x1.1b72ad52f6000p-3, -0x1.e80a41811a396p-45)
93	A(0x1.2600000000000p+0, -0x1.1b72ad52f6000p-3, -0x1.e80a41811a396p-45)
94	A(0x1.2400000000000p+0, -0x1.0d77e7cd09000p-3, 0x1.a699688e85bf4p-47)
95	A(0x1.2400000000000p+0, -0x1.0d77e7cd09000p-3, 0x1.a699688e85bf4p-47)
96	A(0x1.2200000000000p+0, -0x1.fec9131dbe000p-4, -0x1.575545ca333f2p-45)
97	A(0x1.2000000000000p+0, -0x1.e27076e2b0000p-4, 0x1.a342c2af0003cp-45)
98	A(0x1.2000000000000p+0, -0x1.e27076e2b0000p-4, 0x1.a342c2af0003cp-45)
99	A(0x1.1e00000000000p+0, -0x1.c5e548f5bc000p-4, -0x1.d0c57585fbe06p-46)
100	A(0x1.1c00000000000p+0, -0x1.a926d3a4ae000p-4, 0x1.53935e85baac8p-45)
101	A(0x1.1c00000000000p+0, -0x1.a926d3a4ae000p-4, 0x1.53935e85baac8p-45)
102	A(0x1.1a00000000000p+0, -0x1.8c345d631a000p-4, 0x1.37c294d2f5668p-46)
103	A(0x1.1a00000000000p+0, -0x1.8c345d631a000p-4, 0x1.37c294d2f5668p-46)
104	A(0x1.1800000000000p+0, -0x1.6f0d28ae56000p-4, -0x1.69737c93373dap-45)
105	A(0x1.1600000000000p+0, -0x1.51b073f062000p-4, 0x1.f025b61c65e57p-46)
106	A(0x1.1600000000000p+0, -0x1.51b073f062000p-4, 0x1.f025b61c65e57p-46)
107	A(0x1.1400000000000p+0, -0x1.341d7961be000p-4, 0x1.c5edaccf913dfp-45)
108	A(0x1.1400000000000p+0, -0x1.341d7961be000p-4, 0x1.c5edaccf913dfp-45)
109	A(0x1.1200000000000p+0, -0x1.16536eea38000p-4, 0x1.47c5e768fa309p-46)
110	A(0x1.1000000000000p+0, -0x1.f0a30c0118000p-5, 0x1.d599e83368e91p-45)
111	A(0x1.1000000000000p+0, -0x1.f0a30c0118000p-5, 0x1.d599e83368e91p-45)
112	A(0x1.0e00000000000p+0, -0x1.b42dd71198000p-5, 0x1.c827ae5d6704cp-46)
113	A(0x1.0e00000000000p+0, -0x1.b42dd71198000p-5, 0x1.c827ae5d6704cp-46)
114	A(0x1.0c00000000000p+0, -0x1.77458f632c000p-5, -0x1.cfc4634f2a1eep-45)
115	A(0x1.0c00000000000p+0, -0x1.77458f632c000p-5, -0x1.cfc4634f2a1eep-45)
116	A(0x1.0a00000000000p+0, -0x1.39e87b9fec000p-5, 0x1.502b7f526feaap-48)
117	A(0x1.0a00000000000p+0, -0x1.39e87b9fec000p-5, 0x1.502b7f526feaap-48)
118	A(0x1.0800000000000p+0, -0x1.f829b0e780000p-6, -0x1.980267c7e09e4p-45)
119	A(0x1.0800000000000p+0, -0x1.f829b0e780000p-6, -0x1.980267c7e09e4p-45)
120	A(0x1.0600000000000p+0, -0x1.7b91b07d58000p-6, -0x1.88d5493faa639p-45)
121	A(0x1.0400000000000p+0, -0x1.fc0a8b0fc0000p-7, -0x1.f1e7cf6d3a69cp-50)
122	A(0x1.0400000000000p+0, -0x1.fc0a8b0fc0000p-7, -0x1.f1e7cf6d3a69cp-50)
123	A(0x1.0200000000000p+0, -0x1.fe02a6b100000p-8, -0x1.9e23f0dda40e4p-46)
124	A(0x1.0200000000000p+0, -0x1.fe02a6b100000p-8, -0x1.9e23f0dda40e4p-46)
125	A(0x1.0000000000000p+0, 0x0.0000000000000p+0, 0x0.0000000000000p+0)
126	A(0x1.0000000000000p+0, 0x0.0000000000000p+0, 0x0.0000000000000p+0)
127	A(0x1.fc00000000000p-1, 0x1.0101575890000p-7, -0x1.0c76b999d2be8p-46)
128	A(0x1.f800000000000p-1, 0x1.0205658938000p-6, -0x1.3dc5b06e2f7d2p-45)
129	A(0x1.f400000000000p-1, 0x1.8492528c90000p-6, -0x1.aa0ba325a0c34p-45)
130	A(0x1.f000000000000p-1, 0x1.0415d89e74000p-5, 0x1.111c05cf1d753p-47)
131	A(0x1.ec00000000000p-1, 0x1.466aed42e0000p-5, -0x1.c167375bdfd28p-45)
132	A(0x1.e800000000000p-1, 0x1.894aa149fc000p-5, -0x1.97995d05a267dp-46)
133	A(0x1.e400000000000p-1, 0x1.ccb73cdddc000p-5, -0x1.a68f247d82807p-46)
134	A(0x1.e200000000000p-1, 0x1.eea31c006c000p-5, -0x1.e113e4fc93b7bp-47)
135	A(0x1.de00000000000p-1, 0x1.1973bd1466000p-4, -0x1.5325d560d9e9bp-45)
136	A(0x1.da00000000000p-1, 0x1.3bdf5a7d1e000p-4, 0x1.cc85ea5db4ed7p-45)
137	A(0x1.d600000000000p-1, 0x1.5e95a4d97a000p-4, -0x1.c69063c5d1d1ep-45)
138	A(0x1.d400000000000p-1, 0x1.700d30aeac000p-4, 0x1.c1e8da99ded32p-49)
139	A(0x1.d000000000000p-1, 0x1.9335e5d594000p-4, 0x1.3115c3abd47dap-45)
140	A(0x1.cc00000000000p-1, 0x1.b6ac88dad6000p-4, -0x1.390802bf768e5p-46)
141	A(0x1.ca00000000000p-1, 0x1.c885801bc4000p-4, 0x1.646d1c65aacd3p-45)
142	A(0x1.c600000000000p-1, 0x1.ec739830a2000p-4, -0x1.dc068afe645e0p-45)
143	A(0x1.c400000000000p-1, 0x1.fe89139dbe000p-4, -0x1.534d64fa10afdp-45)
144	A(0x1.c000000000000p-1, 0x1.1178e8227e000p-3, 0x1.1ef78ce2d07f2p-45)
145	A(0x1.be00000000000p-1, 0x1.1aa2b7e23f000p-3, 0x1.ca78e44389934p-45)
146	A(0x1.ba00000000000p-1, 0x1.2d1610c868000p-3, 0x1.39d6ccb81b4a1p-47)
147	A(0x1.b800000000000p-1, 0x1.365fcb0159000p-3, 0x1.62fa8234b7289p-51)
148	A(0x1.b400000000000p-1, 0x1.4913d8333b000p-3, 0x1.5837954fdb678p-45)
149	A(0x1.b200000000000p-1, 0x1.527e5e4a1b000p-3, 0x1.633e8e5697dc7p-45)
150	A(0x1.ae00000000000p-1, 0x1.6574ebe8c1000p-3, 0x1.9cf8b2c3c2e78p-46)
151	A(0x1.ac00000000000p-1, 0x1.6f0128b757000p-3, -0x1.5118de59c21e1p-45)
152	A(0x1.aa00000000000p-1, 0x1.7898d85445000p-3, -0x1.c661070914305p-46)
153	A(0x1.a600000000000p-1, 0x1.8beafeb390000p-3, -0x1.73d54aae92cd1p-47)
154	A(0x1.a400000000000p-1, 0x1.95a5adcf70000p-3, 0x1.7f22858a0ff6fp-47)
155	A(0x1.a000000000000p-1, 0x1.a93ed3c8ae000p-3, -0x1.8724350562169p-45)
156	A(0x1.9e00000000000p-1, 0x1.b31d8575bd000p-3, -0x1.c358d4eace1aap-47)
157	A(0x1.9c00000000000p-1, 0x1.bd087383be000p-3, -0x1.d4bc4595412b6p-45)
158	A(0x1.9a00000000000p-1, 0x1.c6ffbc6f01000p-3, -0x1.1ec72c5962bd2p-48)
159	A(0x1.9600000000000p-1, 0x1.db13db0d49000p-3, -0x1.aff2af715b035p-45)
160	A(0x1.9400000000000p-1, 0x1.e530effe71000p-3, 0x1.212276041f430p-51)
161	A(0x1.9200000000000p-1, 0x1.ef5ade4dd0000p-3, -0x1.a211565bb8e11p-51)
162	A(0x1.9000000000000p-1, 0x1.f991c6cb3b000p-3, 0x1.bcbecca0cdf30p-46)
163	A(0x1.8c00000000000p-1, 0x1.07138604d5800p-2, 0x1.89cdb16ed4e91p-48)
164	A(0x1.8a00000000000p-1, 0x1.0c42d67616000p-2, 0x1.7188b163ceae9p-45)
165	A(0x1.8800000000000p-1, 0x1.1178e8227e800p-2, -0x1.c210e63a5f01cp-45)
166	A(0x1.8600000000000p-1, 0x1.16b5ccbacf800p-2, 0x1.b9acdf7a51681p-45)
167	A(0x1.8400000000000p-1, 0x1.1bf99635a6800p-2, 0x1.ca6ed5147bdb7p-45)
168	A(0x1.8200000000000p-1, 0x1.214456d0eb800p-2, 0x1.a87deba46baeap-47)
169	A(0x1.7e00000000000p-1, 0x1.2bef07cdc9000p-2, 0x1.a9cfa4a5004f4p-45)
170	A(0x1.7c00000000000p-1, 0x1.314f1e1d36000p-2, -0x1.8e27ad3213cb8p-45)
171	A(0x1.7a00000000000p-1, 0x1.36b6776be1000p-2, 0x1.16ecdb0f177c8p-46)
172	A(0x1.7800000000000p-1, 0x1.3c25277333000p-2, 0x1.83b54b606bd5cp-46)
173	A(0x1.7600000000000p-1, 0x1.419b423d5e800p-2, 0x1.8e436ec90e09dp-47)
174	A(0x1.7400000000000p-1, 0x1.4718dc271c800p-2, -0x1.f27ce0967d675p-45)
175	A(0x1.7200000000000p-1, 0x1.4c9e09e173000p-2, -0x1.e20891b0ad8a4p-45)
176	A(0x1.7000000000000p-1, 0x1.522ae0738a000p-2, 0x1.ebe708164c759p-45)
177	A(0x1.6e00000000000p-1, 0x1.57bf753c8d000p-2, 0x1.fadedee5d40efp-46)
178	A(0x1.6c00000000000p-1, 0x1.5d5bddf596000p-2, -0x1.a0b2a08a465dcp-47)
179	},
180	};

lib/libc/wasi/libc-top-half/musl/src/math/pow_data.h deleted-22

...	@@ -1,22 +0,0 @@
1	/*
2	* Copyright (c) 2018, Arm Limited.
3	* SPDX-License-Identifier: MIT
4	*/
5	#ifndef _POW_DATA_H
6	#define _POW_DATA_H
7
8	#include <features.h>
9
10	#define POW_LOG_TABLE_BITS 7
11	#define POW_LOG_POLY_ORDER 8
12	extern hidden const struct pow_log_data {
13	double ln2hi;
14	double ln2lo;
15	double poly[POW_LOG_POLY_ORDER - 1]; /* First coefficient is 1. */
16	/* Note: the pad field is unused, but allows slightly faster indexing. */
17	struct {
18	double invc, pad, logc, logctail;
19	} tab[1 << POW_LOG_TABLE_BITS];
20	} __pow_log_data;
21
22	#endif

lib/libc/wasi/libc-top-half/musl/src/math/powf.c deleted-185

...	@@ -1,185 +0,0 @@
1	/*
2	* Copyright (c) 2017-2018, Arm Limited.
3	* SPDX-License-Identifier: MIT
4	*/
5
6	#include <math.h>
7	#include <stdint.h>
8	#include "libm.h"
9	#include "exp2f_data.h"
10	#include "powf_data.h"
11
12	/*
13	POWF_LOG2_POLY_ORDER = 5
14	EXP2F_TABLE_BITS = 5
15
16	ULP error: 0.82 (~ 0.5 + relerr*2^24)
17	relerr: 1.27 * 2^-26 (Relative error ~= 128Ln2relerr_log2 + relerr_exp2)
18	relerr_log2: 1.83 * 2^-33 (Relative error of logx.)
19	relerr_exp2: 1.69 * 2^-34 (Relative error of exp2(ylogx).)
20	*/
21
22	#define N (1 << POWF_LOG2_TABLE_BITS)
23	#define T __powf_log2_data.tab
24	#define A __powf_log2_data.poly
25	#define OFF 0x3f330000
26
27	/* Subnormal input is normalized so ix has negative biased exponent.
28	Output is multiplied by N (POWF_SCALE) if TOINT_INTRINICS is set. */
29	static inline double_t log2_inline(uint32_t ix)
30	{
31	double_t z, r, r2, r4, p, q, y, y0, invc, logc;
32	uint32_t iz, top, tmp;
33	int k, i;
34
35	/* x = 2^k z; where z is in range [OFF,2*OFF] and exact.
36	The range is split into N subintervals.
37	The ith subinterval contains z and c is near its center. */
38	tmp = ix - OFF;
39	i = (tmp >> (23 - POWF_LOG2_TABLE_BITS)) % N;
40	top = tmp & 0xff800000;
41	iz = ix - top;
42	k = (int32_t)top >> (23 - POWF_SCALE_BITS); /* arithmetic shift */
43	invc = T[i].invc;
44	logc = T[i].logc;
45	z = (double_t)asfloat(iz);
46
47	/* log2(x) = log1p(z/c-1)/ln2 + log2(c) + k */
48	r = z * invc - 1;
49	y0 = logc + (double_t)k;
50
51	/* Pipelined polynomial evaluation to approximate log1p(r)/ln2. */
52	r2 = r * r;
53	y = A[0] * r + A[1];
54	p = A[2] * r + A[3];
55	r4 = r2 * r2;
56	q = A[4] * r + y0;
57	q = p * r2 + q;
58	y = y * r4 + q;
59	return y;
60	}
61
62	#undef N
63	#undef T
64	#define N (1 << EXP2F_TABLE_BITS)
65	#define T __exp2f_data.tab
66	#define SIGN_BIAS (1 << (EXP2F_TABLE_BITS + 11))
67
68	/* The output of log2 and thus the input of exp2 is either scaled by N
69	(in case of fast toint intrinsics) or not. The unscaled xd must be
70	in [-1021,1023], sign_bias sets the sign of the result. */
71	static inline float exp2_inline(double_t xd, uint32_t sign_bias)
72	{
73	uint64_t ki, ski, t;
74	double_t kd, z, r, r2, y, s;
75
76	#if TOINT_INTRINSICS
77	#define C __exp2f_data.poly_scaled
78	/* Nx = k + r with r in [-1/2, 1/2] /
79	kd = roundtoint(xd); /* k */
80	ki = converttoint(xd);
81	#else
82	#define C __exp2f_data.poly
83	#define SHIFT __exp2f_data.shift_scaled
84	/* x = k/N + r with r in [-1/(2N), 1/(2N)] */
85	kd = eval_as_double(xd + SHIFT);
86	ki = asuint64(kd);
87	kd -= SHIFT; /* k/N */
88	#endif
89	r = xd - kd;
90
91	/* exp2(x) = 2^(k/N) * 2^r ~= s * (C0r^3 + C1r^2 + C2r + 1) /
92	t = T[ki % N];
93	ski = ki + sign_bias;
94	t += ski << (52 - EXP2F_TABLE_BITS);
95	s = asdouble(t);
96	z = C[0] * r + C[1];
97	r2 = r * r;
98	y = C[2] * r + 1;
99	y = z * r2 + y;
100	y = y * s;
101	return eval_as_float(y);
102	}
103
104	/* Returns 0 if not int, 1 if odd int, 2 if even int. The argument is
105	the bit representation of a non-zero finite floating-point value. */
106	static inline int checkint(uint32_t iy)
107	{
108	int e = iy >> 23 & 0xff;
109	if (e < 0x7f)
110	return 0;
111	if (e > 0x7f + 23)
112	return 2;
113	if (iy & ((1 << (0x7f + 23 - e)) - 1))
114	return 0;
115	if (iy & (1 << (0x7f + 23 - e)))
116	return 1;
117	return 2;
118	}
119
120	static inline int zeroinfnan(uint32_t ix)
121	{
122	return 2 * ix - 1 >= 2u * 0x7f800000 - 1;
123	}
124
125	float powf(float x, float y)
126	{
127	uint32_t sign_bias = 0;
128	uint32_t ix, iy;
129
130	ix = asuint(x);
131	iy = asuint(y);
132	if (predict_false(ix - 0x00800000 >= 0x7f800000 - 0x00800000 \|\|
133	zeroinfnan(iy))) {
134	/* Either (x < 0x1p-126 or inf or nan) or (y is 0 or inf or nan). */
135	if (predict_false(zeroinfnan(iy))) {
136	if (2 * iy == 0)
137	return issignalingf_inline(x) ? x + y : 1.0f;
138	if (ix == 0x3f800000)
139	return issignalingf_inline(y) ? x + y : 1.0f;
140	if (2 * ix > 2u * 0x7f800000 \|\|
141	2 * iy > 2u * 0x7f800000)
142	return x + y;
143	if (2 * ix == 2 * 0x3f800000)
144	return 1.0f;
145	if ((2 * ix < 2 * 0x3f800000) == !(iy & 0x80000000))
146	return 0.0f; /* \|x\|<1 && y==inf or \|x\|>1 && y==-inf. */
147	return y * y;
148	}
149	if (predict_false(zeroinfnan(ix))) {
150	float_t x2 = x * x;
151	if (ix & 0x80000000 && checkint(iy) == 1)
152	x2 = -x2;
153	/* Without the barrier some versions of clang hoist the 1/x2 and
154	thus division by zero exception can be signaled spuriously. */
155	return iy & 0x80000000 ? fp_barrierf(1 / x2) : x2;
156	}
157	/* x and y are non-zero finite. */
158	if (ix & 0x80000000) {
159	/* Finite x < 0. */
160	int yint = checkint(iy);
161	if (yint == 0)
162	return __math_invalidf(x);
163	if (yint == 1)
164	sign_bias = SIGN_BIAS;
165	ix &= 0x7fffffff;
166	}
167	if (ix < 0x00800000) {
168	/* Normalize subnormal x so exponent becomes negative. */
169	ix = asuint(x * 0x1p23f);
170	ix &= 0x7fffffff;
171	ix -= 23 << 23;
172	}
173	}
174	double_t logx = log2_inline(ix);
175	double_t ylogx = y * logx; /* cannot overflow, y is single prec. */
176	if (predict_false((asuint64(ylogx) >> 47 & 0xffff) >=
177	asuint64(126.0 * POWF_SCALE) >> 47)) {
178	/* \|ylog(x)\| >= 126. /
179	if (ylogx > 0x1.fffffffd1d571p+6 * POWF_SCALE)
180	return __math_oflowf(sign_bias);
181	if (ylogx <= -150.0 * POWF_SCALE)
182	return __math_uflowf(sign_bias);
183	}
184	return exp2_inline(ylogx, sign_bias);
185	}

lib/libc/wasi/libc-top-half/musl/src/math/powf_data.c deleted-34

...	@@ -1,34 +0,0 @@
1	/*
2	* Data definition for powf.
3	*
4	* Copyright (c) 2017-2018, Arm Limited.
5	* SPDX-License-Identifier: MIT
6	*/
7
8	#include "powf_data.h"
9
10	const struct powf_log2_data __powf_log2_data = {
11	.tab = {
12	{ 0x1.661ec79f8f3bep+0, -0x1.efec65b963019p-2 * POWF_SCALE },
13	{ 0x1.571ed4aaf883dp+0, -0x1.b0b6832d4fca4p-2 * POWF_SCALE },
14	{ 0x1.49539f0f010bp+0, -0x1.7418b0a1fb77bp-2 * POWF_SCALE },
15	{ 0x1.3c995b0b80385p+0, -0x1.39de91a6dcf7bp-2 * POWF_SCALE },
16	{ 0x1.30d190c8864a5p+0, -0x1.01d9bf3f2b631p-2 * POWF_SCALE },
17	{ 0x1.25e227b0b8eap+0, -0x1.97c1d1b3b7afp-3 * POWF_SCALE },
18	{ 0x1.1bb4a4a1a343fp+0, -0x1.2f9e393af3c9fp-3 * POWF_SCALE },
19	{ 0x1.12358f08ae5bap+0, -0x1.960cbbf788d5cp-4 * POWF_SCALE },
20	{ 0x1.0953f419900a7p+0, -0x1.a6f9db6475fcep-5 * POWF_SCALE },
21	{ 0x1p+0, 0x0p+0 * POWF_SCALE },
22	{ 0x1.e608cfd9a47acp-1, 0x1.338ca9f24f53dp-4 * POWF_SCALE },
23	{ 0x1.ca4b31f026aap-1, 0x1.476a9543891bap-3 * POWF_SCALE },
24	{ 0x1.b2036576afce6p-1, 0x1.e840b4ac4e4d2p-3 * POWF_SCALE },
25	{ 0x1.9c2d163a1aa2dp-1, 0x1.40645f0c6651cp-2 * POWF_SCALE },
26	{ 0x1.886e6037841edp-1, 0x1.88e9c2c1b9ff8p-2 * POWF_SCALE },
27	{ 0x1.767dcf5534862p-1, 0x1.ce0a44eb17bccp-2 * POWF_SCALE },
28	},
29	.poly = {
30	0x1.27616c9496e0bp-2 * POWF_SCALE, -0x1.71969a075c67ap-2 * POWF_SCALE,
31	0x1.ec70a6ca7baddp-2 * POWF_SCALE, -0x1.7154748bef6c8p-1 * POWF_SCALE,
32	0x1.71547652ab82bp0 * POWF_SCALE,
33	}
34	};

lib/libc/wasi/libc-top-half/musl/src/math/powf_data.h deleted-26

...	@@ -1,26 +0,0 @@
1	/*
2	* Copyright (c) 2017-2018, Arm Limited.
3	* SPDX-License-Identifier: MIT
4	*/
5	#ifndef _POWF_DATA_H
6	#define _POWF_DATA_H
7
8	#include "libm.h"
9	#include "exp2f_data.h"
10
11	#define POWF_LOG2_TABLE_BITS 4
12	#define POWF_LOG2_POLY_ORDER 5
13	#if TOINT_INTRINSICS
14	#define POWF_SCALE_BITS EXP2F_TABLE_BITS
15	#else
16	#define POWF_SCALE_BITS 0
17	#endif
18	#define POWF_SCALE ((double)(1 << POWF_SCALE_BITS))
19	extern hidden const struct powf_log2_data {
20	struct {
21	double invc, logc;
22	} tab[1 << POWF_LOG2_TABLE_BITS];
23	double poly[POWF_LOG2_POLY_ORDER];
24	} __powf_log2_data;
25
26	#endif

lib/libc/wasi/libc-top-half/musl/src/math/remainder.c deleted-9

...	@@ -1,9 +0,0 @@
1	#include <math.h>
2
3	double remainder(double x, double y)
4	{
5	int q;
6	return remquo(x, y, &q);
7	}
8
9	weak_alias(remainder, drem);

lib/libc/wasi/libc-top-half/musl/src/math/remainderf.c deleted-9

...	@@ -1,9 +0,0 @@
1	#include <math.h>
2
3	float remainderf(float x, float y)
4	{
5	int q;
6	return remquof(x, y, &q);
7	}
8
9	weak_alias(remainderf, dremf);

lib/libc/wasi/libc-top-half/musl/src/math/remainderl.c deleted-15

...	@@ -1,15 +0,0 @@
1	#include <math.h>
2	#include <float.h>
3
4	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
5	long double remainderl(long double x, long double y)
6	{
7	return remainder(x, y);
8	}
9	#else
10	long double remainderl(long double x, long double y)
11	{
12	int q;
13	return remquol(x, y, &q);
14	}
15	#endif

lib/libc/wasi/libc-top-half/musl/src/math/remquo.c deleted-82

...	@@ -1,82 +0,0 @@
1	#include <math.h>
2	#include <stdint.h>
3
4	double remquo(double x, double y, int *quo)
5	{
6	union {double f; uint64_t i;} ux = {x}, uy = {y};
7	int ex = ux.i>>52 & 0x7ff;
8	int ey = uy.i>>52 & 0x7ff;
9	int sx = ux.i>>63;
10	int sy = uy.i>>63;
11	uint32_t q;
12	uint64_t i;
13	uint64_t uxi = ux.i;
14
15	*quo = 0;
16	if (uy.i<<1 == 0 \|\| isnan(y) \|\| ex == 0x7ff)
17	return (xy)/(xy);
18	if (ux.i<<1 == 0)
19	return x;
20
21	/* normalize x and y */
22	if (!ex) {
23	for (i = uxi<<12; i>>63 == 0; ex--, i <<= 1);
24	uxi <<= -ex + 1;
25	} else {
26	uxi &= -1ULL >> 12;
27	uxi \|= 1ULL << 52;
28	}
29	if (!ey) {
30	for (i = uy.i<<12; i>>63 == 0; ey--, i <<= 1);
31	uy.i <<= -ey + 1;
32	} else {
33	uy.i &= -1ULL >> 12;
34	uy.i \|= 1ULL << 52;
35	}
36
37	q = 0;
38	if (ex < ey) {
39	if (ex+1 == ey)
40	goto end;
41	return x;
42	}
43
44	/* x mod y */
45	for (; ex > ey; ex--) {
46	i = uxi - uy.i;
47	if (i >> 63 == 0) {
48	uxi = i;
49	q++;
50	}
51	uxi <<= 1;
52	q <<= 1;
53	}
54	i = uxi - uy.i;
55	if (i >> 63 == 0) {
56	uxi = i;
57	q++;
58	}
59	if (uxi == 0)
60	ex = -60;
61	else
62	for (; uxi>>52 == 0; uxi <<= 1, ex--);
63	end:
64	/* scale result and decide between \|x\| and \|x\|-\|y\| */
65	if (ex > 0) {
66	uxi -= 1ULL << 52;
67	uxi \|= (uint64_t)ex << 52;
68	} else {
69	uxi >>= -ex + 1;
70	}
71	ux.i = uxi;
72	x = ux.f;
73	if (sy)
74	y = -y;
75	if (ex == ey \|\| (ex+1 == ey && (2x > y \|\| (2x == y && q%2)))) {
76	x -= y;
77	q++;
78	}
79	q &= 0x7fffffff;
80	*quo = sx^sy ? -(int)q : (int)q;
81	return sx ? -x : x;
82	}

lib/libc/wasi/libc-top-half/musl/src/math/remquof.c deleted-82

...	@@ -1,82 +0,0 @@
1	#include <math.h>
2	#include <stdint.h>
3
4	float remquof(float x, float y, int *quo)
5	{
6	union {float f; uint32_t i;} ux = {x}, uy = {y};
7	int ex = ux.i>>23 & 0xff;
8	int ey = uy.i>>23 & 0xff;
9	int sx = ux.i>>31;
10	int sy = uy.i>>31;
11	uint32_t q;
12	uint32_t i;
13	uint32_t uxi = ux.i;
14
15	*quo = 0;
16	if (uy.i<<1 == 0 \|\| isnan(y) \|\| ex == 0xff)
17	return (xy)/(xy);
18	if (ux.i<<1 == 0)
19	return x;
20
21	/* normalize x and y */
22	if (!ex) {
23	for (i = uxi<<9; i>>31 == 0; ex--, i <<= 1);
24	uxi <<= -ex + 1;
25	} else {
26	uxi &= -1U >> 9;
27	uxi \|= 1U << 23;
28	}
29	if (!ey) {
30	for (i = uy.i<<9; i>>31 == 0; ey--, i <<= 1);
31	uy.i <<= -ey + 1;
32	} else {
33	uy.i &= -1U >> 9;
34	uy.i \|= 1U << 23;
35	}
36
37	q = 0;
38	if (ex < ey) {
39	if (ex+1 == ey)
40	goto end;
41	return x;
42	}
43
44	/* x mod y */
45	for (; ex > ey; ex--) {
46	i = uxi - uy.i;
47	if (i >> 31 == 0) {
48	uxi = i;
49	q++;
50	}
51	uxi <<= 1;
52	q <<= 1;
53	}
54	i = uxi - uy.i;
55	if (i >> 31 == 0) {
56	uxi = i;
57	q++;
58	}
59	if (uxi == 0)
60	ex = -30;
61	else
62	for (; uxi>>23 == 0; uxi <<= 1, ex--);
63	end:
64	/* scale result and decide between \|x\| and \|x\|-\|y\| */
65	if (ex > 0) {
66	uxi -= 1U << 23;
67	uxi \|= (uint32_t)ex << 23;
68	} else {
69	uxi >>= -ex + 1;
70	}
71	ux.i = uxi;
72	x = ux.f;
73	if (sy)
74	y = -y;
75	if (ex == ey \|\| (ex+1 == ey && (2x > y \|\| (2x == y && q%2)))) {
76	x -= y;
77	q++;
78	}
79	q &= 0x7fffffff;
80	*quo = sx^sy ? -(int)q : (int)q;
81	return sx ? -x : x;
82	}

lib/libc/wasi/libc-top-half/musl/src/math/remquol.c deleted-124

...	@@ -1,124 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double remquol(long double x, long double y, int *quo)
5	{
6	return remquo(x, y, quo);
7	}
8	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
9	long double remquol(long double x, long double y, int *quo)
10	{
11	union ldshape ux = {x}, uy = {y};
12	int ex = ux.i.se & 0x7fff;
13	int ey = uy.i.se & 0x7fff;
14	int sx = ux.i.se >> 15;
15	int sy = uy.i.se >> 15;
16	uint32_t q;
17
18	*quo = 0;
19	if (y == 0 \|\| isnan(y) \|\| ex == 0x7fff)
20	return (xy)/(xy);
21	if (x == 0)
22	return x;
23
24	/* normalize x and y */
25	if (!ex) {
26	ux.i.se = ex;
27	ux.f *= 0x1p120f;
28	ex = ux.i.se - 120;
29	}
30	if (!ey) {
31	uy.i.se = ey;
32	uy.f *= 0x1p120f;
33	ey = uy.i.se - 120;
34	}
35
36	q = 0;
37	if (ex >= ey) {
38	/* x mod y */
39	#if LDBL_MANT_DIG == 64
40	uint64_t i, mx, my;
41	mx = ux.i.m;
42	my = uy.i.m;
43	for (; ex > ey; ex--) {
44	i = mx - my;
45	if (mx >= my) {
46	mx = 2*i;
47	q++;
48	q <<= 1;
49	} else if (2*mx < mx) {
50	mx = 2*mx - my;
51	q <<= 1;
52	q++;
53	} else {
54	mx = 2*mx;
55	q <<= 1;
56	}
57	}
58	i = mx - my;
59	if (mx >= my) {
60	mx = i;
61	q++;
62	}
63	if (mx == 0)
64	ex = -120;
65	else
66	for (; mx >> 63 == 0; mx *= 2, ex--);
67	ux.i.m = mx;
68	#elif LDBL_MANT_DIG == 113
69	uint64_t hi, lo, xhi, xlo, yhi, ylo;
70	xhi = (ux.i2.hi & -1ULL>>16) \| 1ULL<<48;
71	yhi = (uy.i2.hi & -1ULL>>16) \| 1ULL<<48;
72	xlo = ux.i2.lo;
73	ylo = ux.i2.lo;
74	for (; ex > ey; ex--) {
75	hi = xhi - yhi;
76	lo = xlo - ylo;
77	if (xlo < ylo)
78	hi -= 1;
79	if (hi >> 63 == 0) {
80	xhi = 2*hi + (lo>>63);
81	xlo = 2*lo;
82	q++;
83	} else {
84	xhi = 2*xhi + (xlo>>63);
85	xlo = 2*xlo;
86	}
87	q <<= 1;
88	}
89	hi = xhi - yhi;
90	lo = xlo - ylo;
91	if (xlo < ylo)
92	hi -= 1;
93	if (hi >> 63 == 0) {
94	xhi = hi;
95	xlo = lo;
96	q++;
97	}
98	if ((xhi\|xlo) == 0)
99	ex = -120;
100	else
101	for (; xhi >> 48 == 0; xhi = 2xhi + (xlo>>63), xlo = 2xlo, ex--);
102	ux.i2.hi = xhi;
103	ux.i2.lo = xlo;
104	#endif
105	}
106
107	/* scale result and decide between \|x\| and \|x\|-\|y\| */
108	if (ex <= 0) {
109	ux.i.se = ex + 120;
110	ux.f *= 0x1p-120f;
111	} else
112	ux.i.se = ex;
113	x = ux.f;
114	if (sy)
115	y = -y;
116	if (ex == ey \|\| (ex+1 == ey && (2x > y \|\| (2x == y && q%2)))) {
117	x -= y;
118	q++;
119	}
120	q &= 0x7fffffff;
121	*quo = sx^sy ? -(int)q : (int)q;
122	return sx ? -x : x;
123	}
124	#endif

lib/libc/wasi/libc-top-half/musl/src/math/rintl.c deleted-29

...	@@ -1,29 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double rintl(long double x)
5	{
6	return rint(x);
7	}
8	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
9
10	static const long double toint = 1/LDBL_EPSILON;
11
12	long double rintl(long double x)
13	{
14	union ldshape u = {x};
15	int e = u.i.se & 0x7fff;
16	int s = u.i.se >> 15;
17	long double y;
18
19	if (e >= 0x3fff+LDBL_MANT_DIG-1)
20	return x;
21	if (s)
22	y = x - toint + toint;
23	else
24	y = x + toint - toint;
25	if (y == 0)
26	return 0*x;
27	return y;
28	}
29	#endif

lib/libc/wasi/libc-top-half/musl/src/math/round.c deleted-35

...	@@ -1,35 +0,0 @@
1	#include "libm.h"
2
3	#if FLT_EVAL_METHOD==0 \|\| FLT_EVAL_METHOD==1
4	#define EPS DBL_EPSILON
5	#elif FLT_EVAL_METHOD==2
6	#define EPS LDBL_EPSILON
7	#endif
8	static const double_t toint = 1/EPS;
9
10	double round(double x)
11	{
12	union {double f; uint64_t i;} u = {x};
13	int e = u.i >> 52 & 0x7ff;
14	double_t y;
15
16	if (e >= 0x3ff+52)
17	return x;
18	if (u.i >> 63)
19	x = -x;
20	if (e < 0x3ff-1) {
21	/* raise inexact if x!=0 */
22	FORCE_EVAL(x + toint);
23	return 0*u.f;
24	}
25	y = x + toint - toint - x;
26	if (y > 0.5)
27	y = y + x - 1;
28	else if (y <= -0.5)
29	y = y + x + 1;
30	else
31	y = y + x;
32	if (u.i >> 63)
33	y = -y;
34	return y;
35	}

lib/libc/wasi/libc-top-half/musl/src/math/roundf.c deleted-36

...	@@ -1,36 +0,0 @@
1	#include "libm.h"
2
3	#if FLT_EVAL_METHOD==0
4	#define EPS FLT_EPSILON
5	#elif FLT_EVAL_METHOD==1
6	#define EPS DBL_EPSILON
7	#elif FLT_EVAL_METHOD==2
8	#define EPS LDBL_EPSILON
9	#endif
10	static const float_t toint = 1/EPS;
11
12	float roundf(float x)
13	{
14	union {float f; uint32_t i;} u = {x};
15	int e = u.i >> 23 & 0xff;
16	float_t y;
17
18	if (e >= 0x7f+23)
19	return x;
20	if (u.i >> 31)
21	x = -x;
22	if (e < 0x7f-1) {
23	FORCE_EVAL(x + toint);
24	return 0*u.f;
25	}
26	y = x + toint - toint - x;
27	if (y > 0.5f)
28	y = y + x - 1;
29	else if (y <= -0.5f)
30	y = y + x + 1;
31	else
32	y = y + x;
33	if (u.i >> 31)
34	y = -y;
35	return y;
36	}

lib/libc/wasi/libc-top-half/musl/src/math/roundl.c deleted-37

...	@@ -1,37 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double roundl(long double x)
5	{
6	return round(x);
7	}
8	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
9
10	static const long double toint = 1/LDBL_EPSILON;
11
12	long double roundl(long double x)
13	{
14	union ldshape u = {x};
15	int e = u.i.se & 0x7fff;
16	long double y;
17
18	if (e >= 0x3fff+LDBL_MANT_DIG-1)
19	return x;
20	if (u.i.se >> 15)
21	x = -x;
22	if (e < 0x3fff-1) {
23	FORCE_EVAL(x + toint);
24	return 0*u.f;
25	}
26	y = x + toint - toint - x;
27	if (y > 0.5)
28	y = y + x - 1;
29	else if (y <= -0.5)
30	y = y + x + 1;
31	else
32	y = y + x;
33	if (u.i.se >> 15)
34	y = -y;
35	return y;
36	}
37	#endif

lib/libc/wasi/libc-top-half/musl/src/math/scalb.c deleted-35

...	@@ -1,35 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_scalb.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunSoft, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/*
13	* scalb(x, fn) is provide for
14	* passing various standard test suite. One
15	* should use scalbn() instead.
16	*/
17
18	#define _GNU_SOURCE
19	#include <math.h>
20
21	double scalb(double x, double fn)
22	{
23	if (isnan(x) \|\| isnan(fn))
24	return x*fn;
25	if (!isfinite(fn)) {
26	if (fn > 0.0)
27	return x*fn;
28	else
29	return x/(-fn);
30	}
31	if (rint(fn) != fn) return (fn-fn)/(fn-fn);
32	if ( fn > 65000.0) return scalbn(x, 65000);
33	if (-fn > 65000.0) return scalbn(x,-65000);
34	return scalbn(x,(int)fn);
35	}

lib/libc/wasi/libc-top-half/musl/src/math/scalbf.c deleted-32

...	@@ -1,32 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/e_scalbf.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	*/
5	/*
6	* ====================================================
7	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
8	*
9	* Developed at SunPro, a Sun Microsystems, Inc. business.
10	* Permission to use, copy, modify, and distribute this
11	* software is freely granted, provided that this notice
12	* is preserved.
13	* ====================================================
14	*/
15
16	#define _GNU_SOURCE
17	#include <math.h>
18
19	float scalbf(float x, float fn)
20	{
21	if (isnan(x) \|\| isnan(fn)) return x*fn;
22	if (!isfinite(fn)) {
23	if (fn > 0.0f)
24	return x*fn;
25	else
26	return x/(-fn);
27	}
28	if (rintf(fn) != fn) return (fn-fn)/(fn-fn);
29	if ( fn > 65000.0f) return scalbnf(x, 65000);
30	if (-fn > 65000.0f) return scalbnf(x,-65000);
31	return scalbnf(x,(int)fn);
32	}

lib/libc/wasi/libc-top-half/musl/src/math/scalbln.c deleted-11

...	@@ -1,11 +0,0 @@
1	#include <limits.h>
2	#include <math.h>
3
4	double scalbln(double x, long n)
5	{
6	if (n > INT_MAX)
7	n = INT_MAX;
8	else if (n < INT_MIN)
9	n = INT_MIN;
10	return scalbn(x, n);
11	}

lib/libc/wasi/libc-top-half/musl/src/math/scalblnf.c deleted-11

...	@@ -1,11 +0,0 @@
1	#include <limits.h>
2	#include <math.h>
3
4	float scalblnf(float x, long n)
5	{
6	if (n > INT_MAX)
7	n = INT_MAX;
8	else if (n < INT_MIN)
9	n = INT_MIN;
10	return scalbnf(x, n);
11	}

lib/libc/wasi/libc-top-half/musl/src/math/scalblnl.c deleted-19

...	@@ -1,19 +0,0 @@
1	#include <limits.h>
2	#include <math.h>
3	#include <float.h>
4
5	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
6	long double scalblnl(long double x, long n)
7	{
8	return scalbln(x, n);
9	}
10	#else
11	long double scalblnl(long double x, long n)
12	{
13	if (n > INT_MAX)
14	n = INT_MAX;
15	else if (n < INT_MIN)
16	n = INT_MIN;
17	return scalbnl(x, n);
18	}
19	#endif

lib/libc/wasi/libc-top-half/musl/src/math/scalbn.c deleted-33

...	@@ -1,33 +0,0 @@
1	#include <math.h>
2	#include <stdint.h>
3
4	double scalbn(double x, int n)
5	{
6	union {double f; uint64_t i;} u;
7	double_t y = x;
8
9	if (n > 1023) {
10	y *= 0x1p1023;
11	n -= 1023;
12	if (n > 1023) {
13	y *= 0x1p1023;
14	n -= 1023;
15	if (n > 1023)
16	n = 1023;
17	}
18	} else if (n < -1022) {
19	/* make sure final n < -53 to avoid double
20	rounding in the subnormal range */
21	y = 0x1p-1022 0x1p53;
22	n += 1022 - 53;
23	if (n < -1022) {
24	y = 0x1p-1022 0x1p53;
25	n += 1022 - 53;
26	if (n < -1022)
27	n = -1022;
28	}
29	}
30	u.i = (uint64_t)(0x3ff+n)<<52;
31	x = y * u.f;
32	return x;
33	}

lib/libc/wasi/libc-top-half/musl/src/math/scalbnf.c deleted-31

...	@@ -1,31 +0,0 @@
1	#include <math.h>
2	#include <stdint.h>
3
4	float scalbnf(float x, int n)
5	{
6	union {float f; uint32_t i;} u;
7	float_t y = x;
8
9	if (n > 127) {
10	y *= 0x1p127f;
11	n -= 127;
12	if (n > 127) {
13	y *= 0x1p127f;
14	n -= 127;
15	if (n > 127)
16	n = 127;
17	}
18	} else if (n < -126) {
19	y = 0x1p-126f 0x1p24f;
20	n += 126 - 24;
21	if (n < -126) {
22	y = 0x1p-126f 0x1p24f;
23	n += 126 - 24;
24	if (n < -126)
25	n = -126;
26	}
27	}
28	u.i = (uint32_t)(0x7f+n)<<23;
29	x = y * u.f;
30	return x;
31	}

lib/libc/wasi/libc-top-half/musl/src/math/scalbnl.c deleted-36

...	@@ -1,36 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double scalbnl(long double x, int n)
5	{
6	return scalbn(x, n);
7	}
8	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
9	long double scalbnl(long double x, int n)
10	{
11	union ldshape u;
12
13	if (n > 16383) {
14	x *= 0x1p16383L;
15	n -= 16383;
16	if (n > 16383) {
17	x *= 0x1p16383L;
18	n -= 16383;
19	if (n > 16383)
20	n = 16383;
21	}
22	} else if (n < -16382) {
23	x = 0x1p-16382L 0x1p113L;
24	n += 16382 - 113;
25	if (n < -16382) {
26	x = 0x1p-16382L 0x1p113L;
27	n += 16382 - 113;
28	if (n < -16382)
29	n = -16382;
30	}
31	}
32	u.f = 1.0;
33	u.i.se = 0x3fff + n;
34	return x * u.f;
35	}
36	#endif

lib/libc/wasi/libc-top-half/musl/src/math/signgam.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <math.h>
2	#include "libm.h"
3
4	int __signgam = 0;
5
6	weak_alias(__signgam, signgam);

lib/libc/wasi/libc-top-half/musl/src/math/significand.c deleted-7

...	@@ -1,7 +0,0 @@
1	#define _GNU_SOURCE
2	#include <math.h>
3
4	double significand(double x)
5	{
6	return scalbn(x, -ilogb(x));
7	}

lib/libc/wasi/libc-top-half/musl/src/math/significandf.c deleted-7

...	@@ -1,7 +0,0 @@
1	#define _GNU_SOURCE
2	#include <math.h>
3
4	float significandf(float x)
5	{
6	return scalbnf(x, -ilogbf(x));
7	}

lib/libc/wasi/libc-top-half/musl/src/math/sin.c deleted-78

...	@@ -1,78 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_sin.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunPro, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/* sin(x)
13	* Return sine function of x.
14	*
15	* kernel function:
16	* __sin ... sine function on [-pi/4,pi/4]
17	* __cos ... cose function on [-pi/4,pi/4]
18	* __rem_pio2 ... argument reduction routine
19	*
20	* Method.
21	* Let S,C and T denote the sin, cos and tan respectively on
22	* [-PI/4, +PI/4]. Reduce the argument x to y1+y2 = x-k*pi/2
23	* in [-pi/4 , +pi/4], and let n = k mod 4.
24	* We have
25	*
26	* n sin(x) cos(x) tan(x)
27	* ----------------------------------------------------------
28	* 0 S C T
29	* 1 C -S -1/T
30	* 2 -S -C T
31	* 3 -C S -1/T
32	* ----------------------------------------------------------
33	*
34	* Special cases:
35	* Let trig be any of sin, cos, or tan.
36	* trig(+-INF) is NaN, with signals;
37	* trig(NaN) is that NaN;
38	*
39	* Accuracy:
40	* TRIG(x) returns trig(x) nearly rounded
41	*/
42
43	#include "libm.h"
44
45	double sin(double x)
46	{
47	double y[2];
48	uint32_t ix;
49	unsigned n;
50
51	/* High word of x. */
52	GET_HIGH_WORD(ix, x);
53	ix &= 0x7fffffff;
54
55	/* \|x\| ~< pi/4 */
56	if (ix <= 0x3fe921fb) {
57	if (ix < 0x3e500000) { /* \|x\| < 2*-26 /
58	/* raise inexact if x != 0 and underflow if subnormal*/
59	FORCE_EVAL(ix < 0x00100000 ? x/0x1p120f : x+0x1p120f);
60	return x;
61	}
62	return __sin(x, 0.0, 0);
63	}
64
65	/* sin(Inf or NaN) is NaN */
66	if (ix >= 0x7ff00000)
67	return x - x;
68
69	/* argument reduction needed */
70	n = __rem_pio2(x, y);
71	switch (n&3) {
72	case 0: return __sin(y[0], y[1], 1);
73	case 1: return __cos(y[0], y[1]);
74	case 2: return -__sin(y[0], y[1], 1);
75	default:
76	return -__cos(y[0], y[1]);
77	}
78	}

lib/libc/wasi/libc-top-half/musl/src/math/sincos.c deleted-69

...	@@ -1,69 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_sin.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunPro, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12
13	#define _GNU_SOURCE
14	#include "libm.h"
15
16	void sincos(double x, double sin, double cos)
17	{
18	double y[2], s, c;
19	uint32_t ix;
20	unsigned n;
21
22	GET_HIGH_WORD(ix, x);
23	ix &= 0x7fffffff;
24
25	/* \|x\| ~< pi/4 */
26	if (ix <= 0x3fe921fb) {
27	/* if \|x\| < 2*-27 sqrt(2) */
28	if (ix < 0x3e46a09e) {
29	/* raise inexact if x!=0 and underflow if subnormal */
30	FORCE_EVAL(ix < 0x00100000 ? x/0x1p120f : x+0x1p120f);
31	*sin = x;
32	*cos = 1.0;
33	return;
34	}
35	*sin = __sin(x, 0.0, 0);
36	*cos = __cos(x, 0.0);
37	return;
38	}
39
40	/* sincos(Inf or NaN) is NaN */
41	if (ix >= 0x7ff00000) {
42	sin = cos = x - x;
43	return;
44	}
45
46	/* argument reduction needed */
47	n = __rem_pio2(x, y);
48	s = __sin(y[0], y[1], 1);
49	c = __cos(y[0], y[1]);
50	switch (n&3) {
51	case 0:
52	*sin = s;
53	*cos = c;
54	break;
55	case 1:
56	*sin = c;
57	*cos = -s;
58	break;
59	case 2:
60	*sin = -s;
61	*cos = -c;
62	break;
63	case 3:
64	default:
65	*sin = -c;
66	*cos = s;
67	break;
68	}
69	}

lib/libc/wasi/libc-top-half/musl/src/math/sincosf.c deleted-117

...	@@ -1,117 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_sinf.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	* Optimized by Bruce D. Evans.
5	*/
6	/*
7	* ====================================================
8	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
9	*
10	* Developed at SunPro, a Sun Microsystems, Inc. business.
11	* Permission to use, copy, modify, and distribute this
12	* software is freely granted, provided that this notice
13	* is preserved.
14	* ====================================================
15	*/
16
17	#define _GNU_SOURCE
18	#include "libm.h"
19
20	/* Small multiples of pi/2 rounded to double precision. */
21	static const double
22	s1pio2 = 1M_PI_2, / 0x3FF921FB, 0x54442D18 */
23	s2pio2 = 2M_PI_2, / 0x400921FB, 0x54442D18 */
24	s3pio2 = 3M_PI_2, / 0x4012D97C, 0x7F3321D2 */
25	s4pio2 = 4M_PI_2; / 0x401921FB, 0x54442D18 */
26
27	void sincosf(float x, float sin, float cos)
28	{
29	double y;
30	float_t s, c;
31	uint32_t ix;
32	unsigned n, sign;
33
34	GET_FLOAT_WORD(ix, x);
35	sign = ix >> 31;
36	ix &= 0x7fffffff;
37
38	/* \|x\| ~<= pi/4 */
39	if (ix <= 0x3f490fda) {
40	/* \|x\| < 2*-12 /
41	if (ix < 0x39800000) {
42	/* raise inexact if x!=0 and underflow if subnormal */
43	FORCE_EVAL(ix < 0x00100000 ? x/0x1p120f : x+0x1p120f);
44	*sin = x;
45	*cos = 1.0f;
46	return;
47	}
48	*sin = __sindf(x);
49	*cos = __cosdf(x);
50	return;
51	}
52
53	/* \|x\| ~<= 5pi/4 /
54	if (ix <= 0x407b53d1) {
55	if (ix <= 0x4016cbe3) { /* \|x\| ~<= 3pi/4 */
56	if (sign) {
57	*sin = -__cosdf(x + s1pio2);
58	*cos = __sindf(x + s1pio2);
59	} else {
60	*sin = __cosdf(s1pio2 - x);
61	*cos = __sindf(s1pio2 - x);
62	}
63	return;
64	}
65	/* -sin(x+c) is not correct if x+c could be 0: -0 vs +0 */
66	*sin = -__sindf(sign ? x + s2pio2 : x - s2pio2);
67	*cos = -__cosdf(sign ? x + s2pio2 : x - s2pio2);
68	return;
69	}
70
71	/* \|x\| ~<= 9pi/4 /
72	if (ix <= 0x40e231d5) {
73	if (ix <= 0x40afeddf) { /* \|x\| ~<= 7pi/4 /
74	if (sign) {
75	*sin = __cosdf(x + s3pio2);
76	*cos = -__sindf(x + s3pio2);
77	} else {
78	*sin = -__cosdf(x - s3pio2);
79	*cos = __sindf(x - s3pio2);
80	}
81	return;
82	}
83	*sin = __sindf(sign ? x + s4pio2 : x - s4pio2);
84	*cos = __cosdf(sign ? x + s4pio2 : x - s4pio2);
85	return;
86	}
87
88	/* sin(Inf or NaN) is NaN */
89	if (ix >= 0x7f800000) {
90	sin = cos = x - x;
91	return;
92	}
93
94	/* general argument reduction needed */
95	n = __rem_pio2f(x, &y);
96	s = __sindf(y);
97	c = __cosdf(y);
98	switch (n&3) {
99	case 0:
100	*sin = s;
101	*cos = c;
102	break;
103	case 1:
104	*sin = c;
105	*cos = -s;
106	break;
107	case 2:
108	*sin = -s;
109	*cos = -c;
110	break;
111	case 3:
112	default:
113	*sin = -c;
114	*cos = s;
115	break;
116	}
117	}

lib/libc/wasi/libc-top-half/musl/src/math/sincosl.c deleted-60

...	@@ -1,60 +0,0 @@
1	#define _GNU_SOURCE
2	#include "libm.h"
3
4	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
5	void sincosl(long double x, long double sin, long double cos)
6	{
7	double sind, cosd;
8	sincos(x, &sind, &cosd);
9	*sin = sind;
10	*cos = cosd;
11	}
12	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
13	void sincosl(long double x, long double sin, long double cos)
14	{
15	union ldshape u = {x};
16	unsigned n;
17	long double y[2], s, c;
18
19	u.i.se &= 0x7fff;
20	if (u.i.se == 0x7fff) {
21	sin = cos = x - x;
22	return;
23	}
24	if (u.f < M_PI_4) {
25	if (u.i.se < 0x3fff - LDBL_MANT_DIG) {
26	/* raise underflow if subnormal */
27	if (u.i.se == 0) FORCE_EVAL(x*0x1p-120f);
28	*sin = x;
29	/* raise inexact if x!=0 */
30	*cos = 1.0 + x;
31	return;
32	}
33	*sin = __sinl(x, 0, 0);
34	*cos = __cosl(x, 0);
35	return;
36	}
37	n = __rem_pio2l(x, y);
38	s = __sinl(y[0], y[1], 1);
39	c = __cosl(y[0], y[1]);
40	switch (n & 3) {
41	case 0:
42	*sin = s;
43	*cos = c;
44	break;
45	case 1:
46	*sin = c;
47	*cos = -s;
48	break;
49	case 2:
50	*sin = -s;
51	*cos = -c;
52	break;
53	case 3:
54	default:
55	*sin = -c;
56	*cos = s;
57	break;
58	}
59	}
60	#endif

lib/libc/wasi/libc-top-half/musl/src/math/sinf.c deleted-76

...	@@ -1,76 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_sinf.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	* Optimized by Bruce D. Evans.
5	*/
6	/*
7	* ====================================================
8	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
9	*
10	* Developed at SunPro, a Sun Microsystems, Inc. business.
11	* Permission to use, copy, modify, and distribute this
12	* software is freely granted, provided that this notice
13	* is preserved.
14	* ====================================================
15	*/
16
17	#include "libm.h"
18
19	/* Small multiples of pi/2 rounded to double precision. */
20	static const double
21	s1pio2 = 1M_PI_2, / 0x3FF921FB, 0x54442D18 */
22	s2pio2 = 2M_PI_2, / 0x400921FB, 0x54442D18 */
23	s3pio2 = 3M_PI_2, / 0x4012D97C, 0x7F3321D2 */
24	s4pio2 = 4M_PI_2; / 0x401921FB, 0x54442D18 */
25
26	float sinf(float x)
27	{
28	double y;
29	uint32_t ix;
30	int n, sign;
31
32	GET_FLOAT_WORD(ix, x);
33	sign = ix >> 31;
34	ix &= 0x7fffffff;
35
36	if (ix <= 0x3f490fda) { /* \|x\| ~<= pi/4 */
37	if (ix < 0x39800000) { /* \|x\| < 2*-12 /
38	/* raise inexact if x!=0 and underflow if subnormal */
39	FORCE_EVAL(ix < 0x00800000 ? x/0x1p120f : x+0x1p120f);
40	return x;
41	}
42	return __sindf(x);
43	}
44	if (ix <= 0x407b53d1) { /* \|x\| ~<= 5pi/4 /
45	if (ix <= 0x4016cbe3) { /* \|x\| ~<= 3pi/4 */
46	if (sign)
47	return -__cosdf(x + s1pio2);
48	else
49	return __cosdf(x - s1pio2);
50	}
51	return __sindf(sign ? -(x + s2pio2) : -(x - s2pio2));
52	}
53	if (ix <= 0x40e231d5) { /* \|x\| ~<= 9pi/4 /
54	if (ix <= 0x40afeddf) { /* \|x\| ~<= 7pi/4 /
55	if (sign)
56	return __cosdf(x + s3pio2);
57	else
58	return -__cosdf(x - s3pio2);
59	}
60	return __sindf(sign ? x + s4pio2 : x - s4pio2);
61	}
62
63	/* sin(Inf or NaN) is NaN */
64	if (ix >= 0x7f800000)
65	return x - x;
66
67	/* general argument reduction needed */
68	n = __rem_pio2f(x, &y);
69	switch (n&3) {
70	case 0: return __sindf(y);
71	case 1: return __cosdf(y);
72	case 2: return __sindf(-y);
73	default:
74	return -__cosdf(y);
75	}
76	}

lib/libc/wasi/libc-top-half/musl/src/math/sinhl.c deleted-43

...	@@ -1,43 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double sinhl(long double x)
5	{
6	return sinh(x);
7	}
8	#elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
9	long double sinhl(long double x)
10	{
11	union ldshape u = {x};
12	unsigned ex = u.i.se & 0x7fff;
13	long double h, t, absx;
14
15	h = 0.5;
16	if (u.i.se & 0x8000)
17	h = -h;
18	/* \|x\| */
19	u.i.se = ex;
20	absx = u.f;
21
22	/* \|x\| < log(LDBL_MAX) */
23	if (ex < 0x3fff+13 \|\| (ex == 0x3fff+13 && u.i.m>>32 < 0xb17217f7)) {
24	t = expm1l(absx);
25	if (ex < 0x3fff) {
26	if (ex < 0x3fff-32)
27	return x;
28	return h(2t - t*t/(1+t));
29	}
30	return h*(t + t/(t+1));
31	}
32
33	/* \|x\| > log(LDBL_MAX) or nan */
34	t = expl(0.5*absx);
35	return htt;
36	}
37	#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
38	// TODO: broken implementation to make things compile
39	long double sinhl(long double x)
40	{
41	return sinh(x);
42	}
43	#endif

lib/libc/wasi/libc-top-half/musl/src/math/sinl.c deleted-41

...	@@ -1,41 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double sinl(long double x)
5	{
6	return sin(x);
7	}
8	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
9	long double sinl(long double x)
10	{
11	union ldshape u = {x};
12	unsigned n;
13	long double y[2], hi, lo;
14
15	u.i.se &= 0x7fff;
16	if (u.i.se == 0x7fff)
17	return x - x;
18	if (u.f < M_PI_4) {
19	if (u.i.se < 0x3fff - LDBL_MANT_DIG/2) {
20	/* raise inexact if x!=0 and underflow if subnormal */
21	FORCE_EVAL(u.i.se == 0 ? x*0x1p-120f : x+0x1p120f);
22	return x;
23	}
24	return __sinl(x, 0.0, 0);
25	}
26	n = __rem_pio2l(x, y);
27	hi = y[0];
28	lo = y[1];
29	switch (n & 3) {
30	case 0:
31	return __sinl(hi, lo, 1);
32	case 1:
33	return __cosl(hi, lo);
34	case 2:
35	return -__sinl(hi, lo, 1);
36	case 3:
37	default:
38	return -__cosl(hi, lo);
39	}
40	}
41	#endif

lib/libc/wasi/libc-top-half/musl/src/math/sqrt_data.c deleted-19

...	@@ -1,19 +0,0 @@
1	#include "sqrt_data.h"
2	const uint16_t __rsqrt_tab[128] = {
3	0xb451,0xb2f0,0xb196,0xb044,0xaef9,0xadb6,0xac79,0xab43,
4	0xaa14,0xa8eb,0xa7c8,0xa6aa,0xa592,0xa480,0xa373,0xa26b,
5	0xa168,0xa06a,0x9f70,0x9e7b,0x9d8a,0x9c9d,0x9bb5,0x9ad1,
6	0x99f0,0x9913,0x983a,0x9765,0x9693,0x95c4,0x94f8,0x9430,
7	0x936b,0x92a9,0x91ea,0x912e,0x9075,0x8fbe,0x8f0a,0x8e59,
8	0x8daa,0x8cfe,0x8c54,0x8bac,0x8b07,0x8a64,0x89c4,0x8925,
9	0x8889,0x87ee,0x8756,0x86c0,0x862b,0x8599,0x8508,0x8479,
10	0x83ec,0x8361,0x82d8,0x8250,0x81c9,0x8145,0x80c2,0x8040,
11	0xff02,0xfd0e,0xfb25,0xf947,0xf773,0xf5aa,0xf3ea,0xf234,
12	0xf087,0xeee3,0xed47,0xebb3,0xea27,0xe8a3,0xe727,0xe5b2,
13	0xe443,0xe2dc,0xe17a,0xe020,0xdecb,0xdd7d,0xdc34,0xdaf1,
14	0xd9b3,0xd87b,0xd748,0xd61a,0xd4f1,0xd3cd,0xd2ad,0xd192,
15	0xd07b,0xcf69,0xce5b,0xcd51,0xcc4a,0xcb48,0xca4a,0xc94f,
16	0xc858,0xc764,0xc674,0xc587,0xc49d,0xc3b7,0xc2d4,0xc1f4,
17	0xc116,0xc03c,0xbf65,0xbe90,0xbdbe,0xbcef,0xbc23,0xbb59,
18	0xba91,0xb9cc,0xb90a,0xb84a,0xb78c,0xb6d0,0xb617,0xb560,
19	};

lib/libc/wasi/libc-top-half/musl/src/math/sqrt_data.h deleted-13

...	@@ -1,13 +0,0 @@
1	#ifndef _SQRT_DATA_H
2	#define _SQRT_DATA_H
3
4	#include <features.h>
5	#include <stdint.h>
6
7	/* if x in [1,2): i = (int)(64*x);
8	if x in [2,4): i = (int)(32*x-64);
9	__rsqrt_tab[i]*2^-16 is estimating 1/sqrt(x) with small relative error:
10	\|__rsqrt_tab[i]0x1p-16sqrt(x) - 1\| < -0x1.fdp-9 < 2^-8 */
11	extern hidden const uint16_t __rsqrt_tab[128];
12
13	#endif

lib/libc/wasi/libc-top-half/musl/src/math/sqrtl.c deleted-259

...	@@ -1,259 +0,0 @@
1	#include <stdint.h>
2	#include <math.h>
3	#include <float.h>
4	#include "libm.h"
5
6	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
7	long double sqrtl(long double x)
8	{
9	return sqrt(x);
10	}
11	#elif (LDBL_MANT_DIG == 113 \|\| LDBL_MANT_DIG == 64) && LDBL_MAX_EXP == 16384
12	#include "sqrt_data.h"
13
14	#define FENV_SUPPORT 1
15
16	typedef struct {
17	uint64_t hi;
18	uint64_t lo;
19	} u128;
20
21	/* top: 16 bit sign+exponent, x: significand. */
22	static inline long double mkldbl(uint64_t top, u128 x)
23	{
24	union ldshape u;
25	#if LDBL_MANT_DIG == 113
26	u.i2.hi = x.hi;
27	u.i2.lo = x.lo;
28	u.i2.hi &= 0x0000ffffffffffff;
29	u.i2.hi \|= top << 48;
30	#elif LDBL_MANT_DIG == 64
31	u.i.se = top;
32	u.i.m = x.lo;
33	/* force the top bit on non-zero (and non-subnormal) results. */
34	if (top & 0x7fff)
35	u.i.m \|= 0x8000000000000000;
36	#endif
37	return u.f;
38	}
39
40	/* return: top 16 bit is sign+exp and following bits are the significand. */
41	static inline u128 asu128(long double x)
42	{
43	union ldshape u = {.f=x};
44	u128 r;
45	#if LDBL_MANT_DIG == 113
46	r.hi = u.i2.hi;
47	r.lo = u.i2.lo;
48	#elif LDBL_MANT_DIG == 64
49	r.lo = u.i.m<<49;
50	/* ignore the top bit: pseudo numbers are not handled. */
51	r.hi = u.i.m>>15;
52	r.hi &= 0x0000ffffffffffff;
53	r.hi \|= (uint64_t)u.i.se << 48;
54	#endif
55	return r;
56	}
57
58	/* returns ab2^-32 - e, with error 0 <= e < 1. */
59	static inline uint32_t mul32(uint32_t a, uint32_t b)
60	{
61	return (uint64_t)a*b >> 32;
62	}
63
64	/* returns ab2^-64 - e, with error 0 <= e < 3. */
65	static inline uint64_t mul64(uint64_t a, uint64_t b)
66	{
67	uint64_t ahi = a>>32;
68	uint64_t alo = a&0xffffffff;
69	uint64_t bhi = b>>32;
70	uint64_t blo = b&0xffffffff;
71	return ahibhi + (ahiblo >> 32) + (alo*bhi >> 32);
72	}
73
74	static inline u128 add64(u128 a, uint64_t b)
75	{
76	u128 r;
77	r.lo = a.lo + b;
78	r.hi = a.hi;
79	if (r.lo < a.lo)
80	r.hi++;
81	return r;
82	}
83
84	static inline u128 add128(u128 a, u128 b)
85	{
86	u128 r;
87	r.lo = a.lo + b.lo;
88	r.hi = a.hi + b.hi;
89	if (r.lo < a.lo)
90	r.hi++;
91	return r;
92	}
93
94	static inline u128 sub64(u128 a, uint64_t b)
95	{
96	u128 r;
97	r.lo = a.lo - b;
98	r.hi = a.hi;
99	if (a.lo < b)
100	r.hi--;
101	return r;
102	}
103
104	static inline u128 sub128(u128 a, u128 b)
105	{
106	u128 r;
107	r.lo = a.lo - b.lo;
108	r.hi = a.hi - b.hi;
109	if (a.lo < b.lo)
110	r.hi--;
111	return r;
112	}
113
114	/* a<<n, 0 <= n <= 127 */
115	static inline u128 lsh(u128 a, int n)
116	{
117	if (n == 0)
118	return a;
119	if (n >= 64) {
120	a.hi = a.lo<<(n-64);
121	a.lo = 0;
122	} else {
123	a.hi = (a.hi<<n) \| (a.lo>>(64-n));
124	a.lo = a.lo<<n;
125	}
126	return a;
127	}
128
129	/* a>>n, 0 <= n <= 127 */
130	static inline u128 rsh(u128 a, int n)
131	{
132	if (n == 0)
133	return a;
134	if (n >= 64) {
135	a.lo = a.hi>>(n-64);
136	a.hi = 0;
137	} else {
138	a.lo = (a.lo>>n) \| (a.hi<<(64-n));
139	a.hi = a.hi>>n;
140	}
141	return a;
142	}
143
144	/* returns ab exactly. /
145	static inline u128 mul64_128(uint64_t a, uint64_t b)
146	{
147	u128 r;
148	uint64_t ahi = a>>32;
149	uint64_t alo = a&0xffffffff;
150	uint64_t bhi = b>>32;
151	uint64_t blo = b&0xffffffff;
152	uint64_t lo1 = ((ahiblo)&0xffffffff) + ((alobhi)&0xffffffff) + (alo*blo>>32);
153	uint64_t lo2 = (alo*blo)&0xffffffff;
154	r.hi = ahibhi + (ahiblo>>32) + (alo*bhi>>32) + (lo1>>32);
155	r.lo = (lo1<<32) + lo2;
156	return r;
157	}
158
159	/* returns ab2^-128 - e, with error 0 <= e < 7. */
160	static inline u128 mul128(u128 a, u128 b)
161	{
162	u128 hi = mul64_128(a.hi, b.hi);
163	uint64_t m1 = mul64(a.hi, b.lo);
164	uint64_t m2 = mul64(a.lo, b.hi);
165	return add64(add64(hi, m1), m2);
166	}
167
168	/* returns ab % 2^128. /
169	static inline u128 mul128_tail(u128 a, u128 b)
170	{
171	u128 lo = mul64_128(a.lo, b.lo);
172	lo.hi += a.hib.lo + a.lob.hi;
173	return lo;
174	}
175
176
177	/* see sqrt.c for detailed comments. */
178
179	long double sqrtl(long double x)
180	{
181	u128 ix, ml;
182	uint64_t top;
183
184	ix = asu128(x);
185	top = ix.hi >> 48;
186	if (predict_false(top - 0x0001 >= 0x7fff - 0x0001)) {
187	/* x < 0x1p-16382 or inf or nan. */
188	if (2*ix.hi == 0 && ix.lo == 0)
189	return x;
190	if (ix.hi == 0x7fff000000000000 && ix.lo == 0)
191	return x;
192	if (top >= 0x7fff)
193	return __math_invalidl(x);
194	/* x is subnormal, normalize it. */
195	ix = asu128(x * 0x1p112);
196	top = ix.hi >> 48;
197	top -= 112;
198	}
199
200	/* x = 4^e m; with int e and m in [1, 4) */
201	int even = top & 1;
202	ml = lsh(ix, 15);
203	ml.hi \|= 0x8000000000000000;
204	if (even) ml = rsh(ml, 1);
205	top = (top + 0x3fff) >> 1;
206
207	/* r ~ 1/sqrt(m) */
208	static const uint64_t three = 0xc0000000;
209	uint64_t r, s, d, u, i;
210	i = (ix.hi >> 42) % 128;
211	r = (uint32_t)__rsqrt_tab[i] << 16;
212	/* \|r sqrt(m) - 1\| < 0x1p-8 */
213	s = mul32(ml.hi>>32, r);
214	d = mul32(s, r);
215	u = three - d;
216	r = mul32(u, r) << 1;
217	/* \|r sqrt(m) - 1\| < 0x1.7bp-16, switch to 64bit */
218	r = r<<32;
219	s = mul64(ml.hi, r);
220	d = mul64(s, r);
221	u = (three<<32) - d;
222	r = mul64(u, r) << 1;
223	/* \|r sqrt(m) - 1\| < 0x1.a5p-31 */
224	s = mul64(u, s) << 1;
225	d = mul64(s, r);
226	u = (three<<32) - d;
227	r = mul64(u, r) << 1;
228	/* \|r sqrt(m) - 1\| < 0x1.c001p-59, switch to 128bit */
229
230	static const u128 threel = {.hi=three<<32, .lo=0};
231	u128 rl, sl, dl, ul;
232	rl.hi = r;
233	rl.lo = 0;
234	sl = mul128(ml, rl);
235	dl = mul128(sl, rl);
236	ul = sub128(threel, dl);
237	sl = mul128(ul, sl); /* repr: 3.125 */
238	/* -0x1p-116 < s - sqrt(m) < 0x3.8001p-125 */
239	sl = rsh(sub64(sl, 4), 125-(LDBL_MANT_DIG-1));
240	/* s < sqrt(m) < s + 1 ULP + tiny */
241
242	long double y;
243	u128 d2, d1, d0;
244	d0 = sub128(lsh(ml, 2*(LDBL_MANT_DIG-1)-126), mul128_tail(sl,sl));
245	d1 = sub128(sl, d0);
246	d2 = add128(add64(sl, 1), d1);
247	sl = add64(sl, d1.hi >> 63);
248	y = mkldbl(top, sl);
249	if (FENV_SUPPORT) {
250	/* handle rounding modes and inexact exception. */
251	top = predict_false((d2.hi\|d2.lo)==0) ? 0 : 1;
252	top \|= ((d1.hi^d2.hi)&0x8000000000000000) >> 48;
253	y += mkldbl(top, (u128){0});
254	}
255	return y;
256	}
257	#else
258	#error unsupported long double format
259	#endif

lib/libc/wasi/libc-top-half/musl/src/math/tan.c deleted-70

...	@@ -1,70 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_tan.c */
2	/*
3	* ====================================================
4	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5	*
6	* Developed at SunPro, a Sun Microsystems, Inc. business.
7	* Permission to use, copy, modify, and distribute this
8	* software is freely granted, provided that this notice
9	* is preserved.
10	* ====================================================
11	*/
12	/* tan(x)
13	* Return tangent function of x.
14	*
15	* kernel function:
16	* __tan ... tangent function on [-pi/4,pi/4]
17	* __rem_pio2 ... argument reduction routine
18	*
19	* Method.
20	* Let S,C and T denote the sin, cos and tan respectively on
21	* [-PI/4, +PI/4]. Reduce the argument x to y1+y2 = x-k*pi/2
22	* in [-pi/4 , +pi/4], and let n = k mod 4.
23	* We have
24	*
25	* n sin(x) cos(x) tan(x)
26	* ----------------------------------------------------------
27	* 0 S C T
28	* 1 C -S -1/T
29	* 2 -S -C T
30	* 3 -C S -1/T
31	* ----------------------------------------------------------
32	*
33	* Special cases:
34	* Let trig be any of sin, cos, or tan.
35	* trig(+-INF) is NaN, with signals;
36	* trig(NaN) is that NaN;
37	*
38	* Accuracy:
39	* TRIG(x) returns trig(x) nearly rounded
40	*/
41
42	#include "libm.h"
43
44	double tan(double x)
45	{
46	double y[2];
47	uint32_t ix;
48	unsigned n;
49
50	GET_HIGH_WORD(ix, x);
51	ix &= 0x7fffffff;
52
53	/* \|x\| ~< pi/4 */
54	if (ix <= 0x3fe921fb) {
55	if (ix < 0x3e400000) { /* \|x\| < 2*-27 /
56	/* raise inexact if x!=0 and underflow if subnormal */
57	FORCE_EVAL(ix < 0x00100000 ? x/0x1p120f : x+0x1p120f);
58	return x;
59	}
60	return __tan(x, 0.0, 0);
61	}
62
63	/* tan(Inf or NaN) is NaN */
64	if (ix >= 0x7ff00000)
65	return x - x;
66
67	/* argument reduction */
68	n = __rem_pio2(x, y);
69	return __tan(y[0], y[1], n&1);
70	}

lib/libc/wasi/libc-top-half/musl/src/math/tanf.c deleted-64

...	@@ -1,64 +0,0 @@
1	/* origin: FreeBSD /usr/src/lib/msun/src/s_tanf.c */
2	/*
3	* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
4	* Optimized by Bruce D. Evans.
5	*/
6	/*
7	* ====================================================
8	* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
9	*
10	* Developed at SunPro, a Sun Microsystems, Inc. business.
11	* Permission to use, copy, modify, and distribute this
12	* software is freely granted, provided that this notice
13	* is preserved.
14	* ====================================================
15	*/
16
17	#include "libm.h"
18
19	/* Small multiples of pi/2 rounded to double precision. */
20	static const double
21	t1pio2 = 1M_PI_2, / 0x3FF921FB, 0x54442D18 */
22	t2pio2 = 2M_PI_2, / 0x400921FB, 0x54442D18 */
23	t3pio2 = 3M_PI_2, / 0x4012D97C, 0x7F3321D2 */
24	t4pio2 = 4M_PI_2; / 0x401921FB, 0x54442D18 */
25
26	float tanf(float x)
27	{
28	double y;
29	uint32_t ix;
30	unsigned n, sign;
31
32	GET_FLOAT_WORD(ix, x);
33	sign = ix >> 31;
34	ix &= 0x7fffffff;
35
36	if (ix <= 0x3f490fda) { /* \|x\| ~<= pi/4 */
37	if (ix < 0x39800000) { /* \|x\| < 2*-12 /
38	/* raise inexact if x!=0 and underflow if subnormal */
39	FORCE_EVAL(ix < 0x00800000 ? x/0x1p120f : x+0x1p120f);
40	return x;
41	}
42	return __tandf(x, 0);
43	}
44	if (ix <= 0x407b53d1) { /* \|x\| ~<= 5pi/4 /
45	if (ix <= 0x4016cbe3) /* \|x\| ~<= 3pi/4 */
46	return __tandf((sign ? x+t1pio2 : x-t1pio2), 1);
47	else
48	return __tandf((sign ? x+t2pio2 : x-t2pio2), 0);
49	}
50	if (ix <= 0x40e231d5) { /* \|x\| ~<= 9pi/4 /
51	if (ix <= 0x40afeddf) /* \|x\| ~<= 7pi/4 /
52	return __tandf((sign ? x+t3pio2 : x-t3pio2), 1);
53	else
54	return __tandf((sign ? x+t4pio2 : x-t4pio2), 0);
55	}
56
57	/* tan(Inf or NaN) is NaN */
58	if (ix >= 0x7f800000)
59	return x - x;
60
61	/* argument reduction */
62	n = __rem_pio2f(x, &y);
63	return __tandf(y, n&1);
64	}

lib/libc/wasi/libc-top-half/musl/src/math/tanh.c deleted-45

...	@@ -1,45 +0,0 @@
1	#include "libm.h"
2
3	/* tanh(x) = (exp(x) - exp(-x))/(exp(x) + exp(-x))
4	* = (exp(2x) - 1)/(exp(2x) - 1 + 2)
5	* = (1 - exp(-2x))/(exp(-2x) - 1 + 2)
6	*/
7	double tanh(double x)
8	{
9	union {double f; uint64_t i;} u = {.f = x};
10	uint32_t w;
11	int sign;
12	double_t t;
13
14	/* x = \|x\| */
15	sign = u.i >> 63;
16	u.i &= (uint64_t)-1/2;
17	x = u.f;
18	w = u.i >> 32;
19
20	if (w > 0x3fe193ea) {
21	/* \|x\| > log(3)/2 ~= 0.5493 or nan */
22	if (w > 0x40340000) {
23	/* \|x\| > 20 or nan */
24	/* note: this branch avoids raising overflow */
25	t = 1 - 0/x;
26	} else {
27	t = expm1(2*x);
28	t = 1 - 2/(t+2);
29	}
30	} else if (w > 0x3fd058ae) {
31	/* \|x\| > log(5/3)/2 ~= 0.2554 */
32	t = expm1(2*x);
33	t = t/(t+2);
34	} else if (w >= 0x00100000) {
35	/* \|x\| >= 0x1p-1022, up to 2ulp error in [0.1,0.2554] */
36	t = expm1(-2*x);
37	t = -t/(t+2);
38	} else {
39	/* \|x\| is subnormal */
40	/* note: the branch above would not raise underflow in [0x1p-1023,0x1p-1022) */
41	FORCE_EVAL((float)x);
42	t = x;
43	}
44	return sign ? -t : t;
45	}

lib/libc/wasi/libc-top-half/musl/src/math/tanhf.c deleted-39

...	@@ -1,39 +0,0 @@
1	#include "libm.h"
2
3	float tanhf(float x)
4	{
5	union {float f; uint32_t i;} u = {.f = x};
6	uint32_t w;
7	int sign;
8	float t;
9
10	/* x = \|x\| */
11	sign = u.i >> 31;
12	u.i &= 0x7fffffff;
13	x = u.f;
14	w = u.i;
15
16	if (w > 0x3f0c9f54) {
17	/* \|x\| > log(3)/2 ~= 0.5493 or nan */
18	if (w > 0x41200000) {
19	/* \|x\| > 10 */
20	t = 1 + 0/x;
21	} else {
22	t = expm1f(2*x);
23	t = 1 - 2/(t+2);
24	}
25	} else if (w > 0x3e82c578) {
26	/* \|x\| > log(5/3)/2 ~= 0.2554 */
27	t = expm1f(2*x);
28	t = t/(t+2);
29	} else if (w >= 0x00800000) {
30	/* \|x\| >= 0x1p-126 */
31	t = expm1f(-2*x);
32	t = -t/(t+2);
33	} else {
34	/* \|x\| is subnormal */
35	FORCE_EVAL(x*x);
36	t = x;
37	}
38	return sign ? -t : t;
39	}

lib/libc/wasi/libc-top-half/musl/src/math/tanhl.c deleted-48

...	@@ -1,48 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double tanhl(long double x)
5	{
6	return tanh(x);
7	}
8	#elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
9	long double tanhl(long double x)
10	{
11	union ldshape u = {x};
12	unsigned ex = u.i.se & 0x7fff;
13	unsigned sign = u.i.se & 0x8000;
14	uint32_t w;
15	long double t;
16
17	/* x = \|x\| */
18	u.i.se = ex;
19	x = u.f;
20	w = u.i.m >> 32;
21
22	if (ex > 0x3ffe \|\| (ex == 0x3ffe && w > 0x8c9f53d5)) {
23	/* \|x\| > log(3)/2 ~= 0.5493 or nan */
24	if (ex >= 0x3fff+5) {
25	/* \|x\| >= 32 */
26	t = 1 + 0/(x + 0x1p-120f);
27	} else {
28	t = expm1l(2*x);
29	t = 1 - 2/(t+2);
30	}
31	} else if (ex > 0x3ffd \|\| (ex == 0x3ffd && w > 0x82c577d4)) {
32	/* \|x\| > log(5/3)/2 ~= 0.2554 */
33	t = expm1l(2*x);
34	t = t/(t+2);
35	} else {
36	/* \|x\| is small */
37	t = expm1l(-2*x);
38	t = -t/(t+2);
39	}
40	return sign ? -t : t;
41	}
42	#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
43	// TODO: broken implementation to make things compile
44	long double tanhl(long double x)
45	{
46	return tanh(x);
47	}
48	#endif

lib/libc/wasi/libc-top-half/musl/src/math/tanl.c deleted-29

...	@@ -1,29 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double tanl(long double x)
5	{
6	return tan(x);
7	}
8	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
9	long double tanl(long double x)
10	{
11	union ldshape u = {x};
12	long double y[2];
13	unsigned n;
14
15	u.i.se &= 0x7fff;
16	if (u.i.se == 0x7fff)
17	return x - x;
18	if (u.f < M_PI_4) {
19	if (u.i.se < 0x3fff - LDBL_MANT_DIG/2) {
20	/* raise inexact if x!=0 and underflow if subnormal */
21	FORCE_EVAL(u.i.se == 0 ? x*0x1p-120f : x+0x1p120f);
22	return x;
23	}
24	return __tanl(x, 0, 0);
25	}
26	n = __rem_pio2l(x, y);
27	return __tanl(y[0], y[1], n&1);
28	}
29	#endif

lib/libc/wasi/libc-top-half/musl/src/math/tgamma.c deleted-222

...	@@ -1,222 +0,0 @@
1	/*
2	"A Precision Approximation of the Gamma Function" - Cornelius Lanczos (1964)
3	"Lanczos Implementation of the Gamma Function" - Paul Godfrey (2001)
4	"An Analysis of the Lanczos Gamma Approximation" - Glendon Ralph Pugh (2004)
5
6	approximation method:
7
8	(x - 0.5) S(x)
9	Gamma(x) = (x + g - 0.5) * ----------------
10	exp(x + g - 0.5)
11
12	with
13	a1 a2 a3 aN
14	S(x) ~= [ a0 + ----- + ----- + ----- + ... + ----- ]
15	x + 1 x + 2 x + 3 x + N
16
17	with a0, a1, a2, a3,.. aN constants which depend on g.
18
19	for x < 0 the following reflection formula is used:
20
21	Gamma(x)*Gamma(-x) = -pi/(x sin(pi x))
22
23	most ideas and constants are from boost and python
24	*/
25	#include "libm.h"
26
27	static const double pi = 3.141592653589793238462643383279502884;
28
29	/* sin(pi x) with x > 0x1p-100, if sin(pix)==0 the sign is arbitrary /
30	static double sinpi(double x)
31	{
32	int n;
33
34	/* argument reduction: x = \|x\| mod 2 */
35	/* spurious inexact when x is odd int */
36	x = x * 0.5;
37	x = 2 * (x - floor(x));
38
39	/* reduce x into [-.25,.25] */
40	n = 4 * x;
41	n = (n+1)/2;
42	x -= n * 0.5;
43
44	x *= pi;
45	switch (n) {
46	default: /* case 4 */
47	case 0:
48	return __sin(x, 0, 0);
49	case 1:
50	return __cos(x, 0);
51	case 2:
52	return __sin(-x, 0, 0);
53	case 3:
54	return -__cos(x, 0);
55	}
56	}
57
58	#define N 12
59	//static const double g = 6.024680040776729583740234375;
60	static const double gmhalf = 5.524680040776729583740234375;
61	static const double Snum[N+1] = {
62	23531376880.410759688572007674451636754734846804940,
63	42919803642.649098768957899047001988850926355848959,
64	35711959237.355668049440185451547166705960488635843,
65	17921034426.037209699919755754458931112671403265390,
66	6039542586.3520280050642916443072979210699388420708,
67	1439720407.3117216736632230727949123939715485786772,
68	248874557.86205415651146038641322942321632125127801,
69	31426415.585400194380614231628318205362874684987640,
70	2876370.6289353724412254090516208496135991145378768,
71	186056.26539522349504029498971604569928220784236328,
72	8071.6720023658162106380029022722506138218516325024,
73	210.82427775157934587250973392071336271166969580291,
74	2.5066282746310002701649081771338373386264310793408,
75	};
76	static const double Sden[N+1] = {
77	0, 39916800, 120543840, 150917976, 105258076, 45995730, 13339535,
78	2637558, 357423, 32670, 1925, 66, 1,
79	};
80	/* n! for small integer n */
81	static const double fact[] = {
82	1, 1, 2, 6, 24, 120, 720, 5040.0, 40320.0, 362880.0, 3628800.0, 39916800.0,
83	479001600.0, 6227020800.0, 87178291200.0, 1307674368000.0, 20922789888000.0,
84	355687428096000.0, 6402373705728000.0, 121645100408832000.0,
85	2432902008176640000.0, 51090942171709440000.0, 1124000727777607680000.0,
86	};
87
88	/* S(x) rational function for positive x */
89	static double S(double x)
90	{
91	double_t num = 0, den = 0;
92	int i;
93
94	/* to avoid overflow handle large x differently */
95	if (x < 8)
96	for (i = N; i >= 0; i--) {
97	num = num * x + Snum[i];
98	den = den * x + Sden[i];
99	}
100	else
101	for (i = 0; i <= N; i++) {
102	num = num / x + Snum[i];
103	den = den / x + Sden[i];
104	}
105	return num/den;
106	}
107
108	double tgamma(double x)
109	{
110	union {double f; uint64_t i;} u = {x};
111	double absx, y;
112	double_t dy, z, r;
113	uint32_t ix = u.i>>32 & 0x7fffffff;
114	int sign = u.i>>63;
115
116	/* special cases */
117	if (ix >= 0x7ff00000)
118	/* tgamma(nan)=nan, tgamma(inf)=inf, tgamma(-inf)=nan with invalid */
119	return x + INFINITY;
120	if (ix < (0x3ff-54)<<20)
121	/* \|x\| < 2^-54: tgamma(x) ~ 1/x, +-0 raises div-by-zero */
122	return 1/x;
123
124	/* integer arguments */
125	/* raise inexact when non-integer */
126	if (x == floor(x)) {
127	if (sign)
128	return 0/0.0;
129	if (x <= sizeof fact/sizeof *fact)
130	return fact[(int)x - 1];
131	}
132
133	/* x >= 172: tgamma(x)=inf with overflow */
134	/* x =< -184: tgamma(x)=+-0 with underflow */
135	if (ix >= 0x40670000) { /* \|x\| >= 184 */
136	if (sign) {
137	FORCE_EVAL((float)(0x1p-126/x));
138	if (floor(x) * 0.5 == floor(x * 0.5))
139	return 0;
140	return -0.0;
141	}
142	x *= 0x1p1023;
143	return x;
144	}
145
146	absx = sign ? -x : x;
147
148	/* handle the error of x + g - 0.5 */
149	y = absx + gmhalf;
150	if (absx > gmhalf) {
151	dy = y - absx;
152	dy -= gmhalf;
153	} else {
154	dy = y - gmhalf;
155	dy -= absx;
156	}
157
158	z = absx - 0.5;
159	r = S(absx) * exp(-y);
160	if (x < 0) {
161	/* reflection formula for negative x */
162	/* sinpi(absx) is not 0, integers are already handled */
163	r = -pi / (sinpi(absx) * absx * r);
164	dy = -dy;
165	z = -z;
166	}
167	r += dy * (gmhalf+0.5) * r / y;
168	z = pow(y, 0.5*z);
169	y = r * z * z;
170	return y;
171	}
172
173	#if 0
174	double __lgamma_r(double x, int *sign)
175	{
176	double r, absx;
177
178	*sign = 1;
179
180	/* special cases */
181	if (!isfinite(x))
182	/* lgamma(nan)=nan, lgamma(+-inf)=inf */
183	return x*x;
184
185	/* integer arguments */
186	if (x == floor(x) && x <= 2) {
187	/* n <= 0: lgamma(n)=inf with divbyzero */
188	/* n == 1,2: lgamma(n)=0 */
189	if (x <= 0)
190	return 1/0.0;
191	return 0;
192	}
193
194	absx = fabs(x);
195
196	/* lgamma(x) ~ -log(\|x\|) for tiny \|x\| */
197	if (absx < 0x1p-54) {
198	sign = 1 - 2!!signbit(x);
199	return -log(absx);
200	}
201
202	/* use tgamma for smaller \|x\| */
203	if (absx < 128) {
204	x = tgamma(x);
205	sign = 1 - 2!!signbit(x);
206	return log(fabs(x));
207	}
208
209	/* second term (log(S)-g) could be more precise here.. */
210	/* or with stirling: (\|x\|-0.5)(log(\|x\|)-1) + poly(1/\|x\|) /
211	r = (absx-0.5)*(log(absx+gmhalf)-1) + (log(S(absx)) - (gmhalf+0.5));
212	if (x < 0) {
213	/* reflection formula for negative x */
214	x = sinpi(absx);
215	sign = 2!!signbit(x) - 1;
216	r = log(pi/(fabs(x)*absx)) - r;
217	}
218	return r;
219	}
220
221	weak_alias(__lgamma_r, lgamma_r);
222	#endif

lib/libc/wasi/libc-top-half/musl/src/math/tgammaf.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <math.h>
2
3	float tgammaf(float x)
4	{
5	return tgamma(x);
6	}

lib/libc/wasi/libc-top-half/musl/src/math/tgammal.c deleted-281

...	@@ -1,281 +0,0 @@
1	/* origin: OpenBSD /usr/src/lib/libm/src/ld80/e_tgammal.c */
2	/*
3	* Copyright (c) 2008 Stephen L. Moshier <steve@moshier.net>
4	*
5	* Permission to use, copy, modify, and distribute this software for any
6	* purpose with or without fee is hereby granted, provided that the above
7	* copyright notice and this permission notice appear in all copies.
8	*
9	* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10	* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11	* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12	* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13	* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14	* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15	* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16	*/
17	/*
18	* Gamma function
19	*
20	*
21	* SYNOPSIS:
22	*
23	* long double x, y, tgammal();
24	*
25	* y = tgammal( x );
26	*
27	*
28	* DESCRIPTION:
29	*
30	* Returns gamma function of the argument. The result is
31	* correctly signed.
32	*
33	* Arguments \|x\| <= 13 are reduced by recurrence and the function
34	* approximated by a rational function of degree 7/8 in the
35	* interval (2,3). Large arguments are handled by Stirling's
36	* formula. Large negative arguments are made positive using
37	* a reflection formula.
38	*
39	*
40	* ACCURACY:
41	*
42	* Relative error:
43	* arithmetic domain # trials peak rms
44	* IEEE -40,+40 10000 3.6e-19 7.9e-20
45	* IEEE -1755,+1755 10000 4.8e-18 6.5e-19
46	*
47	* Accuracy for large arguments is dominated by error in powl().
48	*
49	*/
50
51	#include "libm.h"
52
53	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
54	long double tgammal(long double x)
55	{
56	return tgamma(x);
57	}
58	#elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384
59	/*
60	tgamma(x+2) = tgamma(x+2) P(x)/Q(x)
61	0 <= x <= 1
62	Relative error
63	n=7, d=8
64	Peak error = 1.83e-20
65	Relative error spread = 8.4e-23
66	*/
67	static const long double P[8] = {
68	4.212760487471622013093E-5L,
69	4.542931960608009155600E-4L,
70	4.092666828394035500949E-3L,
71	2.385363243461108252554E-2L,
72	1.113062816019361559013E-1L,
73	3.629515436640239168939E-1L,
74	8.378004301573126728826E-1L,
75	1.000000000000000000009E0L,
76	};
77	static const long double Q[9] = {
78	-1.397148517476170440917E-5L,
79	2.346584059160635244282E-4L,
80	-1.237799246653152231188E-3L,
81	-7.955933682494738320586E-4L,
82	2.773706565840072979165E-2L,
83	-4.633887671244534213831E-2L,
84	-2.243510905670329164562E-1L,
85	4.150160950588455434583E-1L,
86	9.999999999999999999908E-1L,
87	};
88
89	/*
90	static const long double P[] = {
91	-3.01525602666895735709e0L,
92	-3.25157411956062339893e1L,
93	-2.92929976820724030353e2L,
94	-1.70730828800510297666e3L,
95	-7.96667499622741999770e3L,
96	-2.59780216007146401957e4L,
97	-5.99650230220855581642e4L,
98	-7.15743521530849602425e4L
99	};
100	static const long double Q[] = {
101	1.00000000000000000000e0L,
102	-1.67955233807178858919e1L,
103	8.85946791747759881659e1L,
104	5.69440799097468430177e1L,
105	-1.98526250512761318471e3L,
106	3.31667508019495079814e3L,
107	1.60577839621734713377e4L,
108	-2.97045081369399940529e4L,
109	-7.15743521530849602412e4L
110	};
111	*/
112	#define MAXGAML 1755.455L
113	/static const long double LOGPI = 1.14472988584940017414L;/
114
115	/* Stirling's formula for the gamma function
116	tgamma(x) = sqrt(2 pi) x^(x-.5) exp(-x) (1 + 1/x P(1/x))
117	z(x) = x
118	13 <= x <= 1024
119	Relative error
120	n=8, d=0
121	Peak error = 9.44e-21
122	Relative error spread = 8.8e-4
123	*/
124	static const long double STIR[9] = {
125	7.147391378143610789273E-4L,
126	-2.363848809501759061727E-5L,
127	-5.950237554056330156018E-4L,
128	6.989332260623193171870E-5L,
129	7.840334842744753003862E-4L,
130	-2.294719747873185405699E-4L,
131	-2.681327161876304418288E-3L,
132	3.472222222230075327854E-3L,
133	8.333333333333331800504E-2L,
134	};
135
136	#define MAXSTIR 1024.0L
137	static const long double SQTPI = 2.50662827463100050242E0L;
138
139	/* 1/tgamma(x) = z P(z)
140	* z(x) = 1/x
141	* 0 < x < 0.03125
142	* Peak relative error 4.2e-23
143	*/
144	static const long double S[9] = {
145	-1.193945051381510095614E-3L,
146	7.220599478036909672331E-3L,
147	-9.622023360406271645744E-3L,
148	-4.219773360705915470089E-2L,
149	1.665386113720805206758E-1L,
150	-4.200263503403344054473E-2L,
151	-6.558780715202540684668E-1L,
152	5.772156649015328608253E-1L,
153	1.000000000000000000000E0L,
154	};
155
156	/* 1/tgamma(-x) = z P(z)
157	* z(x) = 1/x
158	* 0 < x < 0.03125
159	* Peak relative error 5.16e-23
160	* Relative error spread = 2.5e-24
161	*/
162	static const long double SN[9] = {
163	1.133374167243894382010E-3L,
164	7.220837261893170325704E-3L,
165	9.621911155035976733706E-3L,
166	-4.219773343731191721664E-2L,
167	-1.665386113944413519335E-1L,
168	-4.200263503402112910504E-2L,
169	6.558780715202536547116E-1L,
170	5.772156649015328608727E-1L,
171	-1.000000000000000000000E0L,
172	};
173
174	static const long double PIL = 3.1415926535897932384626L;
175
176	/* Gamma function computed by Stirling's formula.
177	*/
178	static long double stirf(long double x)
179	{
180	long double y, w, v;
181
182	w = 1.0/x;
183	/* For large x, use rational coefficients from the analytical expansion. */
184	if (x > 1024.0)
185	w = (((((6.97281375836585777429E-5L * w
186	+ 7.84039221720066627474E-4L) * w
187	- 2.29472093621399176955E-4L) * w
188	- 2.68132716049382716049E-3L) * w
189	+ 3.47222222222222222222E-3L) * w
190	+ 8.33333333333333333333E-2L) * w
191	+ 1.0;
192	else
193	w = 1.0 + w * __polevll(w, STIR, 8);
194	y = expl(x);
195	if (x > MAXSTIR) { /* Avoid overflow in pow() */
196	v = powl(x, 0.5L * x - 0.25L);
197	y = v * (v / y);
198	} else {
199	y = powl(x, x - 0.5L) / y;
200	}
201	y = SQTPI * y * w;
202	return y;
203	}
204
205	long double tgammal(long double x)
206	{
207	long double p, q, z;
208
209	if (!isfinite(x))
210	return x + INFINITY;
211
212	q = fabsl(x);
213	if (q > 13.0) {
214	if (x < 0.0) {
215	p = floorl(q);
216	z = q - p;
217	if (z == 0)
218	return 0 / z;
219	if (q > MAXGAML) {
220	z = 0;
221	} else {
222	if (z > 0.5) {
223	p += 1.0;
224	z = q - p;
225	}
226	z = q * sinl(PIL * z);
227	z = fabsl(z) * stirf(q);
228	z = PIL/z;
229	}
230	if (0.5 * p == floorl(q * 0.5))
231	z = -z;
232	} else if (x > MAXGAML) {
233	z = x * 0x1p16383L;
234	} else {
235	z = stirf(x);
236	}
237	return z;
238	}
239
240	z = 1.0;
241	while (x >= 3.0) {
242	x -= 1.0;
243	z *= x;
244	}
245	while (x < -0.03125L) {
246	z /= x;
247	x += 1.0;
248	}
249	if (x <= 0.03125L)
250	goto small;
251	while (x < 2.0) {
252	z /= x;
253	x += 1.0;
254	}
255	if (x == 2.0)
256	return z;
257
258	x -= 2.0;
259	p = __polevll(x, P, 7);
260	q = __polevll(x, Q, 8);
261	z = z * p / q;
262	return z;
263
264	small:
265	/* z==1 if x was originally +-0 */
266	if (x == 0 && z != 1)
267	return x / x;
268	if (x < 0.0) {
269	x = -x;
270	q = z / (x * __polevll(x, SN, 8));
271	} else
272	q = z / (x * __polevll(x, S, 8));
273	return q;
274	}
275	#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
276	// TODO: broken implementation to make things compile
277	long double tgammal(long double x)
278	{
279	return tgamma(x);
280	}
281	#endif

lib/libc/wasi/libc-top-half/musl/src/math/truncl.c deleted-34

...	@@ -1,34 +0,0 @@
1	#include "libm.h"
2
3	#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4	long double truncl(long double x)
5	{
6	return trunc(x);
7	}
8	#elif (LDBL_MANT_DIG == 64 \|\| LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
9
10	static const long double toint = 1/LDBL_EPSILON;
11
12	long double truncl(long double x)
13	{
14	union ldshape u = {x};
15	int e = u.i.se & 0x7fff;
16	int s = u.i.se >> 15;
17	long double y;
18
19	if (e >= 0x3fff+LDBL_MANT_DIG-1)
20	return x;
21	if (e <= 0x3fff-1) {
22	FORCE_EVAL(x + 0x1p120f);
23	return x*0;
24	}
25	/* y = int(\|x\|) - \|x\|, where int(\|x\|) is an integer neighbor of \|x\| */
26	if (s)
27	x = -x;
28	y = x + toint - toint - x;
29	if (y > 0)
30	y -= 1;
31	x += y;
32	return s ? -x : x;
33	}
34	#endif

lib/libc/wasi/libc-top-half/musl/src/misc/a64l.c deleted-29

...	@@ -1,29 +0,0 @@
1	#include <stdlib.h>
2	#include <string.h>
3	#include <stdint.h>
4
5	static const char digits[] =
6	"./0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz";
7
8	long a64l(const char *s)
9	{
10	int e;
11	uint32_t x = 0;
12	for (e=0; e<36 && *s; e+=6, s++) {
13	const char d = strchr(digits, s);
14	if (!d) break;
15	x \|= (uint32_t)(d-digits)<<e;
16	}
17	return (int32_t)x;
18	}
19
20	char *l64a(long x0)
21	{
22	static char s[7];
23	char *p;
24	uint32_t x = x0;
25	for (p=s; x; p++, x>>=6)
26	*p = digits[x&63];
27	*p = 0;
28	return s;
29	}

lib/libc/wasi/libc-top-half/musl/src/misc/basename.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <string.h>
2	#include <libgen.h>
3
4	char basename(char s)
5	{
6	size_t i;
7	if (!s \|\| !*s) return ".";
8	i = strlen(s)-1;
9	for (; i&&s[i]=='/'; i--) s[i] = 0;
10	for (; i&&s[i-1]!='/'; i--);
11	return s+i;
12	}
13
14	weak_alias(basename, __xpg_basename);

lib/libc/wasi/libc-top-half/musl/src/misc/dirname.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <string.h>
2	#include <libgen.h>
3
4	char dirname(char s)
5	{
6	size_t i;
7	if (!s \|\| !*s) return ".";
8	i = strlen(s)-1;
9	for (; s[i]=='/'; i--) if (!i) return "/";
10	for (; s[i]!='/'; i--) if (!i) return ".";
11	for (; s[i]=='/'; i--) if (!i) return "/";
12	s[i+1] = 0;
13	return s;
14	}

lib/libc/wasi/libc-top-half/musl/src/misc/ffs.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <strings.h>
2	#include "atomic.h"
3
4	int ffs(int i)
5	{
6	return i ? a_ctz_l(i)+1 : 0;
7	}

lib/libc/wasi/libc-top-half/musl/src/misc/ffsl.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <strings.h>
2	#include "atomic.h"
3
4	int ffsl(long i)
5	{
6	return i ? a_ctz_l(i)+1 : 0;
7	}

lib/libc/wasi/libc-top-half/musl/src/misc/ffsll.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <strings.h>
2	#include "atomic.h"
3
4	int ffsll(long long i)
5	{
6	return i ? a_ctz_64(i)+1 : 0;
7	}

lib/libc/wasi/libc-top-half/musl/src/misc/getdomainname.c deleted-17

...	@@ -1,17 +0,0 @@
1	#define _GNU_SOURCE
2	#include <unistd.h>
3	#include <sys/utsname.h>
4	#include <string.h>
5	#include <errno.h>
6
7	int getdomainname(char *name, size_t len)
8	{
9	struct utsname temp;
10	uname(&temp);
11	if (!len \|\| strlen(temp.domainname) >= len) {
12	errno = EINVAL;
13	return -1;
14	}
15	strcpy(name, temp.domainname);
16	return 0;
17	}

lib/libc/wasi/libc-top-half/musl/src/misc/gethostid.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <unistd.h>
2
3	long gethostid()
4	{
5	return 0;
6	}

lib/libc/wasi/libc-top-half/musl/src/misc/getopt.c deleted-105

...	@@ -1,105 +0,0 @@
1	#define _BSD_SOURCE
2	#include <unistd.h>
3	#include <wchar.h>
4	#include <string.h>
5	#include <limits.h>
6	#include <stdlib.h>
7	#include "locale_impl.h"
8	#include "stdio_impl.h"
9
10	char *optarg;
11	int optind=1, opterr=1, optopt, __optpos, __optreset=0;
12
13	#define optpos __optpos
14	weak_alias(__optreset, optreset);
15
16	void __getopt_msg(const char a, const char b, const char *c, size_t l)
17	{
18	FILE *f = stderr;
19	b = __lctrans_cur(b);
20	FLOCK(f);
21	fputs(a, f)>=0
22	&& fwrite(b, strlen(b), 1, f)
23	&& fwrite(c, 1, l, f)==l
24	&& putc('\n', f);
25	FUNLOCK(f);
26	}
27
28	int getopt(int argc, char * const argv[], const char *optstring)
29	{
30	int i;
31	wchar_t c, d;
32	int k, l;
33	char *optchar;
34
35	if (!optind \|\| __optreset) {
36	__optreset = 0;
37	__optpos = 0;
38	optind = 1;
39	}
40
41	if (optind >= argc \|\| !argv[optind])
42	return -1;
43
44	if (argv[optind][0] != '-') {
45	if (optstring[0] == '-') {
46	optarg = argv[optind++];
47	return 1;
48	}
49	return -1;
50	}
51
52	if (!argv[optind][1])
53	return -1;
54
55	if (argv[optind][1] == '-' && !argv[optind][2])
56	return optind++, -1;
57
58	if (!optpos) optpos++;
59	if ((k = mbtowc(&c, argv[optind]+optpos, MB_LEN_MAX)) < 0) {
60	k = 1;
61	c = 0xfffd; /* replacement char */
62	}
63	optchar = argv[optind]+optpos;
64	optpos += k;
65
66	if (!argv[optind][optpos]) {
67	optind++;
68	optpos = 0;
69	}
70
71	if (optstring[0] == '-' \|\| optstring[0] == '+')
72	optstring++;
73
74	i = 0;
75	d = 0;
76	do {
77	l = mbtowc(&d, optstring+i, MB_LEN_MAX);
78	if (l>0) i+=l; else i++;
79	} while (l && d != c);
80
81	if (d != c \|\| c == ':') {
82	optopt = c;
83	if (optstring[0] != ':' && opterr)
84	__getopt_msg(argv[0], ": unrecognized option: ", optchar, k);
85	return '?';
86	}
87	if (optstring[i] == ':') {
88	optarg = 0;
89	if (optstring[i+1] != ':' \|\| optpos) {
90	optarg = argv[optind++] + optpos;
91	optpos = 0;
92	}
93	if (optind > argc) {
94	optopt = c;
95	if (optstring[0] == ':') return ':';
96	if (opterr) __getopt_msg(argv[0],
97	": option requires an argument: ",
98	optchar, k);
99	return '?';
100	}
101	}
102	return c;
103	}
104
105	weak_alias(getopt, __posix_getopt);

lib/libc/wasi/libc-top-half/musl/src/misc/getopt_long.c deleted-148

...	@@ -1,148 +0,0 @@
1	#define _GNU_SOURCE
2	#include <stddef.h>
3	#include <stdlib.h>
4	#include <limits.h>
5	#include <getopt.h>
6	#include <stdio.h>
7	#include <string.h>
8	#include "stdio_impl.h"
9
10	extern int __optpos, __optreset;
11
12	static void permute(char const argv, int dest, int src)
13	{
14	char av = (char )argv;
15	char *tmp = av[src];
16	int i;
17	for (i=src; i>dest; i--)
18	av[i] = av[i-1];
19	av[dest] = tmp;
20	}
21
22	static int __getopt_long_core(int argc, char const argv, const char optstring, const struct option longopts, int *idx, int longonly);
23
24	static int __getopt_long(int argc, char const argv, const char optstring, const struct option longopts, int *idx, int longonly)
25	{
26	int ret, skipped, resumed;
27	if (!optind \|\| __optreset) {
28	__optreset = 0;
29	__optpos = 0;
30	optind = 1;
31	}
32	if (optind >= argc \|\| !argv[optind]) return -1;
33	skipped = optind;
34	if (optstring[0] != '+' && optstring[0] != '-') {
35	int i;
36	for (i=optind; ; i++) {
37	if (i >= argc \|\| !argv[i]) return -1;
38	if (argv[i][0] == '-' && argv[i][1]) break;
39	}
40	optind = i;
41	}
42	resumed = optind;
43	ret = __getopt_long_core(argc, argv, optstring, longopts, idx, longonly);
44	if (resumed > skipped) {
45	int i, cnt = optind-resumed;
46	for (i=0; i<cnt; i++)
47	permute(argv, skipped, optind-1);
48	optind = skipped + cnt;
49	}
50	return ret;
51	}
52
53	static int __getopt_long_core(int argc, char const argv, const char optstring, const struct option longopts, int *idx, int longonly)
54	{
55	optarg = 0;
56	if (longopts && argv[optind][0] == '-' &&
57	((longonly && argv[optind][1] && argv[optind][1] != '-') \|\|
58	(argv[optind][1] == '-' && argv[optind][2])))
59	{
60	int colon = optstring[optstring[0]=='+'\|\|optstring[0]=='-']==':';
61	int i, cnt, match;
62	char arg, opt, *start = argv[optind]+1;
63	for (cnt=i=0; longopts[i].name; i++) {
64	const char *name = longopts[i].name;
65	opt = start;
66	if (*opt == '-') opt++;
67	while (opt && opt != '=' && opt == name)
68	name++, opt++;
69	if (opt && opt != '=') continue;
70	arg = opt;
71	match = i;
72	if (!*name) {
73	cnt = 1;
74	break;
75	}
76	cnt++;
77	}
78	if (cnt==1 && longonly && arg-start == mblen(start, MB_LEN_MAX)) {
79	int l = arg-start;
80	for (i=0; optstring[i]; i++) {
81	int j;
82	for (j=0; j<l && start[j]==optstring[i+j]; j++);
83	if (j==l) {
84	cnt++;
85	break;
86	}
87	}
88	}
89	if (cnt==1) {
90	i = match;
91	opt = arg;
92	optind++;
93	if (*opt == '=') {
94	if (!longopts[i].has_arg) {
95	optopt = longopts[i].val;
96	if (colon \|\| !opterr)
97	return '?';
98	__getopt_msg(argv[0],
99	": option does not take an argument: ",
100	longopts[i].name,
101	strlen(longopts[i].name));
102	return '?';
103	}
104	optarg = opt+1;
105	} else if (longopts[i].has_arg == required_argument) {
106	if (!(optarg = argv[optind])) {
107	optopt = longopts[i].val;
108	if (colon) return ':';
109	if (!opterr) return '?';
110	__getopt_msg(argv[0],
111	": option requires an argument: ",
112	longopts[i].name,
113	strlen(longopts[i].name));
114	return '?';
115	}
116	optind++;
117	}
118	if (idx) *idx = i;
119	if (longopts[i].flag) {
120	*longopts[i].flag = longopts[i].val;
121	return 0;
122	}
123	return longopts[i].val;
124	}
125	if (argv[optind][1] == '-') {
126	optopt = 0;
127	if (!colon && opterr)
128	__getopt_msg(argv[0], cnt ?
129	": option is ambiguous: " :
130	": unrecognized option: ",
131	argv[optind]+2,
132	strlen(argv[optind]+2));
133	optind++;
134	return '?';
135	}
136	}
137	return getopt(argc, argv, optstring);
138	}
139
140	int getopt_long(int argc, char const argv, const char optstring, const struct option longopts, int *idx)
141	{
142	return __getopt_long(argc, argv, optstring, longopts, idx, 0);
143	}
144
145	int getopt_long_only(int argc, char const argv, const char optstring, const struct option longopts, int *idx)
146	{
147	return __getopt_long(argc, argv, optstring, longopts, idx, 1);
148	}

lib/libc/wasi/libc-top-half/musl/src/misc/getsubopt.c deleted-23

...	@@ -1,23 +0,0 @@
1	#include <stdlib.h>
2	#include <string.h>
3
4	int getsubopt(char *opt, char const keys, char *val)
5	{
6	char s = opt;
7	int i;
8
9	*val = NULL;
10	*opt = strchr(s, ',');
11	if (opt) (*opt)++ = 0;
12	else *opt = s + strlen(s);
13
14	for (i=0; keys[i]; i++) {
15	size_t l = strlen(keys[i]);
16	if (strncmp(keys[i], s, l)) continue;
17	if (s[l] == '=')
18	*val = s + l + 1;
19	else if (s[l]) continue;
20	return i;
21	}
22	return -1;
23	}

lib/libc/wasi/libc-top-half/musl/src/misc/realpath.c deleted-156

...	@@ -1,156 +0,0 @@
1	#include <stdlib.h>
2	#include <limits.h>
3	#include <errno.h>
4	#include <unistd.h>
5	#include <string.h>
6
7	static size_t slash_len(const char *s)
8	{
9	const char *s0 = s;
10	while (*s == '/') s++;
11	return s-s0;
12	}
13
14	char realpath(const char restrict filename, char *restrict resolved)
15	{
16	char stack[PATH_MAX+1];
17	char output[PATH_MAX];
18	size_t p, q, l, l0, cnt=0, nup=0;
19	int check_dir=0;
20
21	if (!filename) {
22	errno = EINVAL;
23	return 0;
24	}
25	l = strnlen(filename, sizeof stack);
26	if (!l) {
27	errno = ENOENT;
28	return 0;
29	}
30	if (l >= PATH_MAX) goto toolong;
31	p = sizeof stack - l - 1;
32	q = 0;
33	memcpy(stack+p, filename, l+1);
34
35	/* Main loop. Each iteration pops the next part from stack of
36	* remaining path components and consumes any slashes that follow.
37	* If not a link, it's moved to output; if a link, contents are
38	* pushed to the stack. */
39	restart:
40	for (; ; p+=slash_len(stack+p)) {
41	/* If stack starts with /, the whole component is / or //
42	* and the output state must be reset. */
43	if (stack[p] == '/') {
44	check_dir=0;
45	nup=0;
46	q=0;
47	output[q++] = '/';
48	p++;
49	/* Initial // is special. */
50	if (stack[p] == '/' && stack[p+1] != '/')
51	output[q++] = '/';
52	continue;
53	}
54
55	char *z = __strchrnul(stack+p, '/');
56	l0 = l = z-(stack+p);
57
58	if (!l && !check_dir) break;
59
60	/* Skip any . component but preserve check_dir status. */
61	if (l==1 && stack[p]=='.') {
62	p += l;
63	continue;
64	}
65
66	/* Copy next component onto output at least temporarily, to
67	* call readlink, but wait to advance output position until
68	* determining it's not a link. */
69	if (q && output[q-1] != '/') {
70	if (!p) goto toolong;
71	stack[--p] = '/';
72	l++;
73	}
74	if (q+l >= PATH_MAX) goto toolong;
75	memcpy(output+q, stack+p, l);
76	output[q+l] = 0;
77	p += l;
78
79	int up = 0;
80	if (l0==2 && stack[p-2]=='.' && stack[p-1]=='.') {
81	up = 1;
82	/* Any non-.. path components we could cancel start
83	* after nup repetitions of the 3-byte string "../";
84	* if there are none, accumulate .. components to
85	* later apply to cwd, if needed. */
86	if (q <= 3*nup) {
87	nup++;
88	q += l;
89	continue;
90	}
91	/* When previous components are already known to be
92	* directories, processing .. can skip readlink. */
93	if (!check_dir) goto skip_readlink;
94	}
95	ssize_t k = readlink(output, stack, p);
96	if (k==p) goto toolong;
97	if (!k) {
98	errno = ENOENT;
99	return 0;
100	}
101	if (k<0) {
102	if (errno != EINVAL) return 0;
103	skip_readlink:
104	check_dir = 0;
105	if (up) {
106	while(q && output[q-1]!='/') q--;
107	if (q>1 && (q>2 \|\| output[0]!='/')) q--;
108	continue;
109	}
110	if (l0) q += l;
111	check_dir = stack[p];
112	continue;
113	}
114	if (++cnt == SYMLOOP_MAX) {
115	errno = ELOOP;
116	return 0;
117	}
118
119	/* If link contents end in /, strip any slashes already on
120	* stack to avoid /->// or //->/// or spurious toolong. */
121	if (stack[k-1]=='/') while (stack[p]=='/') p++;
122	p -= k;
123	memmove(stack+p, stack, k);
124
125	/* Skip the stack advancement in case we have a new
126	* absolute base path. */
127	goto restart;
128	}
129
130	output[q] = 0;
131
132	if (output[0] != '/') {
133	if (!getcwd(stack, sizeof stack)) return 0;
134	l = strlen(stack);
135	/* Cancel any initial .. components. */
136	p = 0;
137	while (nup--) {
138	while(l>1 && stack[l-1]!='/') l--;
139	if (l>1) l--;
140	p += 2;
141	if (p<q) p++;
142	}
143	if (q-p && stack[l-1]!='/') stack[l++] = '/';
144	if (l + (q-p) + 1 >= PATH_MAX) goto toolong;
145	memmove(output + l, output + p, q - p + 1);
146	memcpy(output, stack, l);
147	q = l + q-p;
148	}
149
150	if (resolved) return memcpy(resolved, output, q+1);
151	else return strdup(output);
152
153	toolong:
154	errno = ENAMETOOLONG;
155	return 0;
156	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/btowc.c deleted-10

...	@@ -1,10 +0,0 @@
1	#include <stdio.h>
2	#include <wchar.h>
3	#include <stdlib.h>
4	#include "internal.h"
5
6	wint_t btowc(int c)
7	{
8	int b = (unsigned char)c;
9	return b<128U ? b : (MB_CUR_MAX==1 && c!=EOF) ? CODEUNIT(c) : WEOF;
10	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/c16rtomb.c deleted-35

...	@@ -1,35 +0,0 @@
1	#include <uchar.h>
2	#include <errno.h>
3	#include <wchar.h>
4
5	size_t c16rtomb(char restrict s, char16_t c16, mbstate_t restrict ps)
6	{
7	static unsigned internal_state;
8	if (!ps) ps = (void *)&internal_state;
9	unsigned x = (unsigned )ps;
10	wchar_t wc;
11
12	if (!s) {
13	if (*x) goto ilseq;
14	return 1;
15	}
16
17	if (!*x && c16 - 0xd800u < 0x400) {
18	*x = c16 - 0xd7c0 << 10;
19	return 0;
20	}
21
22	if (*x) {
23	if (c16 - 0xdc00u >= 0x400) goto ilseq;
24	else wc = *x + c16 - 0xdc00;
25	*x = 0;
26	} else {
27	wc = c16;
28	}
29	return wcrtomb(s, wc, 0);
30
31	ilseq:
32	*x = 0;
33	errno = EILSEQ;
34	return -1;
35	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/c32rtomb.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <uchar.h>
2	#include <wchar.h>
3
4	size_t c32rtomb(char restrict s, char32_t c32, mbstate_t restrict ps)
5	{
6	return wcrtomb(s, c32, ps);
7	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/internal.c deleted-26

...	@@ -1,26 +0,0 @@
1	#include "internal.h"
2
3	#define C(x) ( x<2 ? -1 : ( R(0x80,0xc0) \| x ) )
4	#define D(x) C((x+16))
5	#define E(x) ( ( x==0 ? R(0xa0,0xc0) : \
6	x==0xd ? R(0x80,0xa0) : \
7	R(0x80,0xc0) ) \
8	\| ( R(0x80,0xc0) >> 6 ) \
9	\| x )
10	#define F(x) ( ( x>=5 ? 0 : \
11	x==0 ? R(0x90,0xc0) : \
12	x==4 ? R(0x80,0x90) : \
13	R(0x80,0xc0) ) \
14	\| ( R(0x80,0xc0) >> 6 ) \
15	\| ( R(0x80,0xc0) >> 12 ) \
16	\| x )
17
18	const uint32_t bittab[] = {
19	C(0x2),C(0x3),C(0x4),C(0x5),C(0x6),C(0x7),
20	C(0x8),C(0x9),C(0xa),C(0xb),C(0xc),C(0xd),C(0xe),C(0xf),
21	D(0x0),D(0x1),D(0x2),D(0x3),D(0x4),D(0x5),D(0x6),D(0x7),
22	D(0x8),D(0x9),D(0xa),D(0xb),D(0xc),D(0xd),D(0xe),D(0xf),
23	E(0x0),E(0x1),E(0x2),E(0x3),E(0x4),E(0x5),E(0x6),E(0x7),
24	E(0x8),E(0x9),E(0xa),E(0xb),E(0xc),E(0xd),E(0xe),E(0xf),
25	F(0x0),F(0x1),F(0x2),F(0x3),F(0x4)
26	};

lib/libc/wasi/libc-top-half/musl/src/multibyte/internal.h deleted-24

...	@@ -1,24 +0,0 @@
1	#define bittab __fsmu8
2
3	#include <stdint.h>
4	#include <features.h>
5
6	extern hidden const uint32_t bittab[];
7
8	/* Upper 6 state bits are a negative integer offset to bound-check next byte */
9	/* equivalent to: ( (b-0x80) \| (b+offset) ) & ~0x3f */
10	#define OOB(c,b) (((((b)>>3)-0x10)\|(((b)>>3)+((int32_t)(c)>>26))) & ~7)
11
12	/* Interval [a,b). Either a must be 80 or b must be c0, lower 3 bits clear. */
13	#define R(a,b) ((uint32_t)((a==0x80 ? 0x40u-b : 0u-a) << 23))
14	#define FAILSTATE R(0x80,0x80)
15
16	#define SA 0xc2u
17	#define SB 0xf4u
18
19	/* Arbitrary encoding for representing code units instead of characters. */
20	#define CODEUNIT(c) (0xdfff & (signed char)(c))
21	#define IS_CODEUNIT(c) ((unsigned)(c)-0xdf80 < 0x80)
22
23	/* Get inline definition of MB_CUR_MAX. */
24	#include "locale_impl.h"

lib/libc/wasi/libc-top-half/musl/src/multibyte/mblen.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <stdlib.h>
2
3	int mblen(const char *s, size_t n)
4	{
5	return mbtowc(0, s, n);
6	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/mbrlen.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <wchar.h>
2
3	size_t mbrlen(const char restrict s, size_t n, mbstate_t restrict st)
4	{
5	static unsigned internal;
6	return mbrtowc(0, s, n, st ? st : (mbstate_t *)&internal);
7	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/mbrtoc16.c deleted-30

...	@@ -1,30 +0,0 @@
1	#include <uchar.h>
2	#include <wchar.h>
3
4	size_t mbrtoc16(char16_t restrict pc16, const char restrict s, size_t n, mbstate_t *restrict ps)
5	{
6	static unsigned internal_state;
7	if (!ps) ps = (void *)&internal_state;
8	unsigned pending = (unsigned )ps;
9
10	if (!s) return mbrtoc16(0, "", 1, ps);
11
12	/* mbrtowc states for partial UTF-8 characters have the high bit set;
13	* we use nonzero states without high bit for pending surrogates. */
14	if ((int)*pending > 0) {
15	if (pc16) pc16 = pending;
16	*pending = 0;
17	return -3;
18	}
19
20	wchar_t wc;
21	size_t ret = mbrtowc(&wc, s, n, ps);
22	if (ret <= 4) {
23	if (wc >= 0x10000) {
24	*pending = (wc & 0x3ff) + 0xdc00;
25	wc = 0xd7c0 + (wc >> 10);
26	}
27	if (pc16) *pc16 = wc;
28	}
29	return ret;
30	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/mbrtoc32.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <uchar.h>
2	#include <wchar.h>
3
4	size_t mbrtoc32(char32_t restrict pc32, const char restrict s, size_t n, mbstate_t *restrict ps)
5	{
6	static unsigned internal_state;
7	if (!ps) ps = (void *)&internal_state;
8	if (!s) return mbrtoc32(0, "", 1, ps);
9	wchar_t wc;
10	size_t ret = mbrtowc(&wc, s, n, ps);
11	if (ret <= 4 && pc32) *pc32 = wc;
12	return ret;
13	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/mbrtowc.c deleted-51

...	@@ -1,51 +0,0 @@
1	#include <stdlib.h>
2	#include <wchar.h>
3	#include <errno.h>
4	#include "internal.h"
5
6	size_t mbrtowc(wchar_t restrict wc, const char restrict src, size_t n, mbstate_t *restrict st)
7	{
8	static unsigned internal_state;
9	unsigned c;
10	const unsigned char s = (const void )src;
11	const unsigned N = n;
12	wchar_t dummy;
13
14	if (!st) st = (void *)&internal_state;
15	c = (unsigned )st;
16
17	if (!s) {
18	if (c) goto ilseq;
19	return 0;
20	} else if (!wc) wc = &dummy;
21
22	if (!n) return -2;
23	if (!c) {
24	if (s < 0x80) return !!(wc = *s);
25	if (MB_CUR_MAX==1) return (wc = CODEUNIT(s)), 1;
26	if (*s-SA > SB-SA) goto ilseq;
27	c = bittab[*s++-SA]; n--;
28	}
29
30	if (n) {
31	if (OOB(c,*s)) goto ilseq;
32	loop:
33	c = c<<6 \| *s++-0x80; n--;
34	if (!(c&(1U<<31))) {
35	(unsigned )st = 0;
36	*wc = c;
37	return N-n;
38	}
39	if (n) {
40	if (*s-0x80u >= 0x40) goto ilseq;
41	goto loop;
42	}
43	}
44
45	(unsigned )st = c;
46	return -2;
47	ilseq:
48	(unsigned )st = 0;
49	errno = EILSEQ;
50	return -1;
51	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/mbsinit.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <wchar.h>
2
3	int mbsinit(const mbstate_t *st)
4	{
5	return !st \|\| !(unsigned )st;
6	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/mbsnrtowcs.c deleted-55

...	@@ -1,55 +0,0 @@
1	#include <wchar.h>
2
3	size_t mbsnrtowcs(wchar_t restrict wcs, const char restrict src, size_t n, size_t wn, mbstate_t restrict st)
4	{
5	size_t l, cnt=0, n2;
6	wchar_t *ws, wbuf[256];
7	const char s = src;
8	const char *tmp_s;
9
10	if (!wcs) ws = wbuf, wn = sizeof wbuf / sizeof *wbuf;
11	else ws = wcs;
12
13	/* making sure output buffer size is at most n/4 will ensure
14	* that mbsrtowcs never reads more than n input bytes. thus
15	* we can use mbsrtowcs as long as it's practical.. */
16
17	while ( s && wn && ( (n2=n/4)>=wn \|\| n2>32 ) ) {
18	if (n2>=wn) n2=wn;
19	tmp_s = s;
20	l = mbsrtowcs(ws, &s, n2, st);
21	if (!(l+1)) {
22	cnt = l;
23	wn = 0;
24	break;
25	}
26	if (ws != wbuf) {
27	ws += l;
28	wn -= l;
29	}
30	n = s ? n - (s - tmp_s) : 0;
31	cnt += l;
32	}
33	if (s) while (wn && n) {
34	l = mbrtowc(ws, s, n, st);
35	if (l+2<=2) {
36	if (!(l+1)) {
37	cnt = l;
38	break;
39	}
40	if (!l) {
41	s = 0;
42	break;
43	}
44	/* have to roll back partial character */
45	(unsigned )st = 0;
46	break;
47	}
48	s += l; n -= l;
49	/* safe - this loop runs fewer than sizeof(wbuf)/8 times */
50	ws++; wn--;
51	cnt++;
52	}
53	if (wcs) *src = s;
54	return cnt;
55	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/mbsrtowcs.c deleted-120

...	@@ -1,120 +0,0 @@
1	#include <stdint.h>
2	#include <wchar.h>
3	#include <errno.h>
4	#include <string.h>
5	#include <stdlib.h>
6	#include "internal.h"
7
8	size_t mbsrtowcs(wchar_t restrict ws, const char restrict src, size_t wn, mbstate_t restrict st)
9	{
10	const unsigned char s = (const void )*src;
11	size_t wn0 = wn;
12	unsigned c = 0;
13
14	if (st && (c = (unsigned )st)) {
15	if (ws) {
16	(unsigned )st = 0;
17	goto resume;
18	} else {
19	goto resume0;
20	}
21	}
22
23	if (MB_CUR_MAX==1) {
24	if (!ws) return strlen((const char *)s);
25	for (;;) {
26	if (!wn) {
27	src = (const void )s;
28	return wn0;
29	}
30	if (!*s) break;
31	c = *s++;
32	*ws++ = CODEUNIT(c);
33	wn--;
34	}
35	*ws = 0;
36	*src = 0;
37	return wn0-wn;
38	}
39
40	if (!ws) for (;;) {
41	#ifdef __GNUC__
42	typedef uint32_t __attribute__((__may_alias__)) w32;
43	if (*s-1u < 0x7f && (uintptr_t)s%4 == 0) {
44	while (!(( (w32)s \| (w32)s-0x01010101) & 0x80808080)) {
45	s += 4;
46	wn -= 4;
47	}
48	}
49	#endif
50	if (*s-1u < 0x7f) {
51	s++;
52	wn--;
53	continue;
54	}
55	if (*s-SA > SB-SA) break;
56	c = bittab[*s++-SA];
57	resume0:
58	if (OOB(c,*s)) { s--; break; }
59	s++;
60	if (c&(1U<<25)) {
61	if (*s-0x80u >= 0x40) { s-=2; break; }
62	s++;
63	if (c&(1U<<19)) {
64	if (*s-0x80u >= 0x40) { s-=3; break; }
65	s++;
66	}
67	}
68	wn--;
69	c = 0;
70	} else for (;;) {
71	if (!wn) {
72	src = (const void )s;
73	return wn0;
74	}
75	#ifdef __GNUC__
76	typedef uint32_t __attribute__((__may_alias__)) w32;
77	if (*s-1u < 0x7f && (uintptr_t)s%4 == 0) {
78	while (wn>=5 && !(( (w32)s \| (w32)s-0x01010101) & 0x80808080)) {
79	ws++ = s++;
80	ws++ = s++;
81	ws++ = s++;
82	ws++ = s++;
83	wn -= 4;
84	}
85	}
86	#endif
87	if (*s-1u < 0x7f) {
88	ws++ = s++;
89	wn--;
90	continue;
91	}
92	if (*s-SA > SB-SA) break;
93	c = bittab[*s++-SA];
94	resume:
95	if (OOB(c,*s)) { s--; break; }
96	c = (c<<6) \| *s++-0x80;
97	if (c&(1U<<31)) {
98	if (*s-0x80u >= 0x40) { s-=2; break; }
99	c = (c<<6) \| *s++-0x80;
100	if (c&(1U<<31)) {
101	if (*s-0x80u >= 0x40) { s-=3; break; }
102	c = (c<<6) \| *s++-0x80;
103	}
104	}
105	*ws++ = c;
106	wn--;
107	c = 0;
108	}
109
110	if (!c && !*s) {
111	if (ws) {
112	*ws = 0;
113	*src = 0;
114	}
115	return wn0-wn;
116	}
117	errno = EILSEQ;
118	if (ws) src = (const void )s;
119	return -1;
120	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/mbstowcs.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <stdlib.h>
2	#include <wchar.h>
3
4	size_t mbstowcs(wchar_t restrict ws, const char restrict s, size_t wn)
5	{
6	return mbsrtowcs(ws, (void*)&s, wn, 0);
7	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/mbtowc.c deleted-47

...	@@ -1,47 +0,0 @@
1	#include <stdlib.h>
2	#include <wchar.h>
3	#include <errno.h>
4	#include "internal.h"
5
6	int mbtowc(wchar_t restrict wc, const char restrict src, size_t n)
7	{
8	unsigned c;
9	const unsigned char s = (const void )src;
10	wchar_t dummy;
11
12	if (!s) return 0;
13	if (!n) goto ilseq;
14	if (!wc) wc = &dummy;
15
16	if (s < 0x80) return !!(wc = *s);
17	if (MB_CUR_MAX==1) return (wc = CODEUNIT(s)), 1;
18	if (*s-SA > SB-SA) goto ilseq;
19	c = bittab[*s++-SA];
20
21	/* Avoid excessive checks against n: If shifting the state n-1
22	* times does not clear the high bit, then the value of n is
23	* insufficient to read a character */
24	if (n<4 && ((c<<(6*n-6)) & (1U<<31))) goto ilseq;
25
26	if (OOB(c,*s)) goto ilseq;
27	c = c<<6 \| *s++-0x80;
28	if (!(c&(1U<<31))) {
29	*wc = c;
30	return 2;
31	}
32
33	if (*s-0x80u >= 0x40) goto ilseq;
34	c = c<<6 \| *s++-0x80;
35	if (!(c&(1U<<31))) {
36	*wc = c;
37	return 3;
38	}
39
40	if (*s-0x80u >= 0x40) goto ilseq;
41	wc = c<<6 \| s++-0x80;
42	return 4;
43
44	ilseq:
45	errno = EILSEQ;
46	return -1;
47	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/wcrtomb.c deleted-37

...	@@ -1,37 +0,0 @@
1	#include <stdlib.h>
2	#include <wchar.h>
3	#include <errno.h>
4	#include "internal.h"
5
6	size_t wcrtomb(char restrict s, wchar_t wc, mbstate_t restrict st)
7	{
8	if (!s) return 1;
9	if ((unsigned)wc < 0x80) {
10	*s = wc;
11	return 1;
12	} else if (MB_CUR_MAX == 1) {
13	if (!IS_CODEUNIT(wc)) {
14	errno = EILSEQ;
15	return -1;
16	}
17	*s = wc;
18	return 1;
19	} else if ((unsigned)wc < 0x800) {
20	*s++ = 0xc0 \| (wc>>6);
21	*s = 0x80 \| (wc&0x3f);
22	return 2;
23	} else if ((unsigned)wc < 0xd800 \|\| (unsigned)wc-0xe000 < 0x2000) {
24	*s++ = 0xe0 \| (wc>>12);
25	*s++ = 0x80 \| ((wc>>6)&0x3f);
26	*s = 0x80 \| (wc&0x3f);
27	return 3;
28	} else if ((unsigned)wc-0x10000 < 0x100000) {
29	*s++ = 0xf0 \| (wc>>18);
30	*s++ = 0x80 \| ((wc>>12)&0x3f);
31	*s++ = 0x80 \| ((wc>>6)&0x3f);
32	*s = 0x80 \| (wc&0x3f);
33	return 4;
34	}
35	errno = EILSEQ;
36	return -1;
37	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/wcsnrtombs.c deleted-35

...	@@ -1,35 +0,0 @@
1	#include <wchar.h>
2	#include <limits.h>
3	#include <string.h>
4
5	size_t wcsnrtombs(char restrict dst, const wchar_t restrict wcs, size_t wn, size_t n, mbstate_t restrict st)
6	{
7	const wchar_t ws = wcs;
8	size_t cnt = 0;
9	if (!dst) n=0;
10	while (ws && wn) {
11	char tmp[MB_LEN_MAX];
12	size_t l = wcrtomb(n<MB_LEN_MAX ? tmp : dst, *ws, 0);
13	if (l==-1) {
14	cnt = -1;
15	break;
16	}
17	if (dst) {
18	if (n<MB_LEN_MAX) {
19	if (l>n) break;
20	memcpy(dst, tmp, l);
21	}
22	dst += l;
23	n -= l;
24	}
25	if (!*ws) {
26	ws = 0;
27	break;
28	}
29	ws++;
30	wn--;
31	cnt += l;
32	}
33	if (dst) *wcs = ws;
34	return cnt;
35	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/wcsrtombs.c deleted-55

...	@@ -1,55 +0,0 @@
1	#include <wchar.h>
2
3	size_t wcsrtombs(char restrict s, const wchar_t restrict ws, size_t n, mbstate_t restrict st)
4	{
5	const wchar_t *ws2;
6	char buf[4];
7	size_t N = n, l;
8	if (!s) {
9	for (n=0, ws2=ws; ws2; ws2++) {
10	if (*ws2 >= 0x80u) {
11	l = wcrtomb(buf, *ws2, 0);
12	if (!(l+1)) return -1;
13	n += l;
14	} else n++;
15	}
16	return n;
17	}
18	while (n>=4) {
19	if (**ws-1u >= 0x7fu) {
20	if (!**ws) {
21	*s = 0;
22	*ws = 0;
23	return N-n;
24	}
25	l = wcrtomb(s, **ws, 0);
26	if (!(l+1)) return -1;
27	s += l;
28	n -= l;
29	} else {
30	s++ = *ws;
31	n--;
32	}
33	(*ws)++;
34	}
35	while (n) {
36	if (**ws-1u >= 0x7fu) {
37	if (!**ws) {
38	*s = 0;
39	*ws = 0;
40	return N-n;
41	}
42	l = wcrtomb(buf, **ws, 0);
43	if (!(l+1)) return -1;
44	if (l>n) return N-n;
45	wcrtomb(s, **ws, 0);
46	s += l;
47	n -= l;
48	} else {
49	s++ = *ws;
50	n--;
51	}
52	(*ws)++;
53	}
54	return N;
55	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/wcstombs.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <stdlib.h>
2	#include <wchar.h>
3
4	size_t wcstombs(char restrict s, const wchar_t restrict ws, size_t n)
5	{
6	return wcsrtombs(s, &(const wchar_t *){ws}, n, 0);
7	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/wctob.c deleted-11

...	@@ -1,11 +0,0 @@
1	#include <wchar.h>
2	#include <stdio.h>
3	#include <stdlib.h>
4	#include "internal.h"
5
6	int wctob(wint_t c)
7	{
8	if (c < 128U) return c;
9	if (MB_CUR_MAX==1 && IS_CODEUNIT(c)) return (unsigned char)c;
10	return EOF;
11	}

lib/libc/wasi/libc-top-half/musl/src/multibyte/wctomb.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <stdlib.h>
2	#include <wchar.h>
3
4	int wctomb(char *s, wchar_t wc)
5	{
6	if (!s) return 0;
7	return wcrtomb(s, wc, 0);
8	}

lib/libc/wasi/libc-top-half/musl/src/network/htonl.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <netinet/in.h>
2	#include <byteswap.h>
3
4	uint32_t htonl(uint32_t n)
5	{
6	union { int i; char c; } u = { 1 };
7	return u.c ? bswap_32(n) : n;
8	}

lib/libc/wasi/libc-top-half/musl/src/network/htons.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <netinet/in.h>
2	#include <byteswap.h>
3
4	uint16_t htons(uint16_t n)
5	{
6	union { int i; char c; } u = { 1 };
7	return u.c ? bswap_16(n) : n;
8	}

lib/libc/wasi/libc-top-half/musl/src/network/in6addr_any.c deleted-3

...	@@ -1,3 +0,0 @@
1	#include <netinet/in.h>
2
3	const struct in6_addr in6addr_any = IN6ADDR_ANY_INIT;

lib/libc/wasi/libc-top-half/musl/src/network/in6addr_loopback.c deleted-3

...	@@ -1,3 +0,0 @@
1	#include <netinet/in.h>
2
3	const struct in6_addr in6addr_loopback = IN6ADDR_LOOPBACK_INIT;

lib/libc/wasi/libc-top-half/musl/src/network/inet_aton.c deleted-41

...	@@ -1,41 +0,0 @@
1	#include <ctype.h>
2	#include <sys/socket.h>
3	#include <netinet/in.h>
4	#include <arpa/inet.h>
5	#include <stdlib.h>
6
7	int __inet_aton(const char s0, struct in_addr dest)
8	{
9	const char *s = s0;
10	unsigned char d = (void )dest;
11	unsigned long a[4] = { 0 };
12	char *z;
13	int i;
14
15	for (i=0; i<4; i++) {
16	a[i] = strtoul(s, &z, 0);
17	if (z==s \|\| (z && z != '.') \|\| !isdigit(*s))
18	return 0;
19	if (!*z) break;
20	s=z+1;
21	}
22	if (i==4) return 0;
23	switch (i) {
24	case 0:
25	a[1] = a[0] & 0xffffff;
26	a[0] >>= 24;
27	case 1:
28	a[2] = a[1] & 0xffff;
29	a[1] >>= 16;
30	case 2:
31	a[3] = a[2] & 0xff;
32	a[2] >>= 8;
33	}
34	for (i=0; i<4; i++) {
35	if (a[i] > 255) return 0;
36	d[i] = a[i];
37	}
38	return 1;
39	}
40
41	weak_alias(__inet_aton, inet_aton);

lib/libc/wasi/libc-top-half/musl/src/network/inet_ntop.c deleted-54

...	@@ -1,54 +0,0 @@
1	#include <sys/socket.h>
2	#include <arpa/inet.h>
3	#include <errno.h>
4	#include <stdio.h>
5	#include <string.h>
6
7	const char inet_ntop(int af, const void restrict a0, char *restrict s, socklen_t l)
8	{
9	const unsigned char *a = a0;
10	int i, j, max, best;
11	char buf[100];
12
13	switch (af) {
14	case AF_INET:
15	if (snprintf(s, l, "%d.%d.%d.%d", a[0],a[1],a[2],a[3]) < l)
16	return s;
17	break;
18	case AF_INET6:
19	if (memcmp(a, "\0\0\0\0\0\0\0\0\0\0\377\377", 12))
20	snprintf(buf, sizeof buf,
21	"%x:%x:%x:%x:%x:%x:%x:%x",
22	256a[0]+a[1],256a[2]+a[3],
23	256a[4]+a[5],256a[6]+a[7],
24	256a[8]+a[9],256a[10]+a[11],
25	256a[12]+a[13],256a[14]+a[15]);
26	else
27	snprintf(buf, sizeof buf,
28	"%x:%x:%x:%x:%x:%x:%d.%d.%d.%d",
29	256a[0]+a[1],256a[2]+a[3],
30	256a[4]+a[5],256a[6]+a[7],
31	256a[8]+a[9],256a[10]+a[11],
32	a[12],a[13],a[14],a[15]);
33	/* Replace longest /(^0\|:)[:0]{2,}/ with "::" */
34	for (i=best=0, max=2; buf[i]; i++) {
35	if (i && buf[i] != ':') continue;
36	j = strspn(buf+i, ":0");
37	if (j>max) best=i, max=j;
38	}
39	if (max>3) {
40	buf[best] = buf[best+1] = ':';
41	memmove(buf+best+2, buf+best+max, i-best-max+1);
42	}
43	if (strlen(buf) < l) {
44	strcpy(s, buf);
45	return s;
46	}
47	break;
48	default:
49	errno = EAFNOSUPPORT;
50	return 0;
51	}
52	errno = ENOSPC;
53	return 0;
54	}

lib/libc/wasi/libc-top-half/musl/src/network/inet_pton.c deleted-71

...	@@ -1,71 +0,0 @@
1	#include <sys/socket.h>
2	#include <arpa/inet.h>
3	#include <ctype.h>
4	#include <errno.h>
5	#include <string.h>
6
7	static int hexval(unsigned c)
8	{
9	if (c-'0'<10) return c-'0';
10	c \|= 32;
11	if (c-'a'<6) return c-'a'+10;
12	return -1;
13	}
14
15	int inet_pton(int af, const char restrict s, void restrict a0)
16	{
17	uint16_t ip[8];
18	unsigned char *a = a0;
19	int i, j, v, d, brk=-1, need_v4=0;
20
21	if (af==AF_INET) {
22	for (i=0; i<4; i++) {
23	for (v=j=0; j<3 && isdigit(s[j]); j++)
24	v = 10*v + s[j]-'0';
25	if (j==0 \|\| (j>1 && s[0]=='0') \|\| v>255) return 0;
26	a[i] = v;
27	if (s[j]==0 && i==3) return 1;
28	if (s[j]!='.') return 0;
29	s += j+1;
30	}
31	return 0;
32	} else if (af!=AF_INET6) {
33	errno = EAFNOSUPPORT;
34	return -1;
35	}
36
37	if (s==':' && ++s!=':') return 0;
38
39	for (i=0; ; i++) {
40	if (s[0]==':' && brk<0) {
41	brk=i;
42	ip[i&7]=0;
43	if (!*++s) break;
44	if (i==7) return 0;
45	continue;
46	}
47	for (v=j=0; j<4 && (d=hexval(s[j]))>=0; j++)
48	v=16*v+d;
49	if (j==0) return 0;
50	ip[i&7] = v;
51	if (!s[j] && (brk>=0 \|\| i==7)) break;
52	if (i==7) return 0;
53	if (s[j]!=':') {
54	if (s[j]!='.' \|\| (i<6 && brk<0)) return 0;
55	need_v4=1;
56	i++;
57	break;
58	}
59	s += j+1;
60	}
61	if (brk>=0) {
62	memmove(ip+brk+7-i, ip+brk, 2*(i+1-brk));
63	for (j=0; j<7-i; j++) ip[brk+j] = 0;
64	}
65	for (j=0; j<8; j++) {
66	*a++ = ip[j]>>8;
67	*a++ = ip[j];
68	}
69	if (need_v4 && inet_pton(AF_INET, (void *)s, a-4) <= 0) return 0;
70	return 1;
71	}

lib/libc/wasi/libc-top-half/musl/src/network/lookup.h deleted-55

...	@@ -1,55 +0,0 @@
1	#ifndef LOOKUP_H
2	#define LOOKUP_H
3
4	#include <stdint.h>
5	#include <stddef.h>
6	#include <features.h>
7	#include <netinet/in.h>
8	#include <netdb.h>
9
10	struct aibuf {
11	struct addrinfo ai;
12	union sa {
13	struct sockaddr_in sin;
14	struct sockaddr_in6 sin6;
15	} sa;
16	volatile int lock[1];
17	short slot, ref;
18	};
19
20	struct address {
21	int family;
22	unsigned scopeid;
23	uint8_t addr[16];
24	int sortkey;
25	};
26
27	struct service {
28	uint16_t port;
29	unsigned char proto, socktype;
30	};
31
32	#define MAXNS 3
33
34	struct resolvconf {
35	struct address ns[MAXNS];
36	unsigned nns, attempts, ndots;
37	unsigned timeout;
38	};
39
40	/* The limit of 48 results is a non-sharp bound on the number of addresses
41	* that can fit in one 512-byte DNS packet full of v4 results and a second
42	* packet full of v6 results. Due to headers, the actual limit is lower. */
43	#define MAXADDRS 48
44	#define MAXSERVS 2
45
46	hidden int __lookup_serv(struct service buf[static MAXSERVS], const char *name, int proto, int socktype, int flags);
47	hidden int __lookup_name(struct address buf[static MAXADDRS], char canon[static 256], const char *name, int family, int flags);
48	hidden int __lookup_ipliteral(struct address buf[static 1], const char *name, int family);
49
50	hidden int __get_resolv_conf(struct resolvconf , char , size_t);
51	hidden int __res_msend_rc(int, const unsigned char const , const int , unsigned char const , int , int, const struct resolvconf *);
52
53	hidden int __dns_parse(const unsigned char , int, int ()(void , int, const void , int, const void ), void );
54
55	#endif

lib/libc/wasi/libc-top-half/musl/src/network/netlink.h deleted-94

...	@@ -1,94 +0,0 @@
1	#include <stdint.h>
2
3	/* linux/netlink.h */
4
5	#define NETLINK_ROUTE 0
6
7	struct nlmsghdr {
8	uint32_t nlmsg_len;
9	uint16_t nlmsg_type;
10	uint16_t nlmsg_flags;
11	uint32_t nlmsg_seq;
12	uint32_t nlmsg_pid;
13	};
14
15	#define NLM_F_REQUEST 1
16	#define NLM_F_MULTI 2
17	#define NLM_F_ACK 4
18
19	#define NLM_F_ROOT 0x100
20	#define NLM_F_MATCH 0x200
21	#define NLM_F_ATOMIC 0x400
22	#define NLM_F_DUMP (NLM_F_ROOT\|NLM_F_MATCH)
23
24	#define NLMSG_NOOP 0x1
25	#define NLMSG_ERROR 0x2
26	#define NLMSG_DONE 0x3
27	#define NLMSG_OVERRUN 0x4
28
29	/* linux/rtnetlink.h */
30
31	#define RTM_NEWLINK 16
32	#define RTM_GETLINK 18
33	#define RTM_NEWADDR 20
34	#define RTM_GETADDR 22
35
36	struct rtattr {
37	unsigned short rta_len;
38	unsigned short rta_type;
39	};
40
41	struct rtgenmsg {
42	unsigned char rtgen_family;
43	};
44
45	struct ifinfomsg {
46	unsigned char ifi_family;
47	unsigned char __ifi_pad;
48	unsigned short ifi_type;
49	int ifi_index;
50	unsigned ifi_flags;
51	unsigned ifi_change;
52	};
53
54	/* linux/if_link.h */
55
56	#define IFLA_ADDRESS 1
57	#define IFLA_BROADCAST 2
58	#define IFLA_IFNAME 3
59	#define IFLA_STATS 7
60
61	/* linux/if_addr.h */
62
63	struct ifaddrmsg {
64	uint8_t ifa_family;
65	uint8_t ifa_prefixlen;
66	uint8_t ifa_flags;
67	uint8_t ifa_scope;
68	uint32_t ifa_index;
69	};
70
71	#define IFA_ADDRESS 1
72	#define IFA_LOCAL 2
73	#define IFA_LABEL 3
74	#define IFA_BROADCAST 4
75
76	/* musl */
77
78	#define NETLINK_ALIGN(len) (((len)+3) & ~3)
79	#define NLMSG_DATA(nlh) ((void)((char)(nlh)+sizeof(struct nlmsghdr)))
80	#define NLMSG_DATALEN(nlh) ((nlh)->nlmsg_len-sizeof(struct nlmsghdr))
81	#define NLMSG_DATAEND(nlh) ((char*)(nlh)+(nlh)->nlmsg_len)
82	#define NLMSG_NEXT(nlh) (struct nlmsghdr)((char)(nlh)+NETLINK_ALIGN((nlh)->nlmsg_len))
83	#define NLMSG_OK(nlh,end) ((char)(end)-(char)(nlh) >= sizeof(struct nlmsghdr))
84
85	#define RTA_DATA(rta) ((void)((char)(rta)+sizeof(struct rtattr)))
86	#define RTA_DATALEN(rta) ((rta)->rta_len-sizeof(struct rtattr))
87	#define RTA_DATAEND(rta) ((char*)(rta)+(rta)->rta_len)
88	#define RTA_NEXT(rta) (struct rtattr)((char)(rta)+NETLINK_ALIGN((rta)->rta_len))
89	#define RTA_OK(nlh,end) ((char)(end)-(char)(rta) >= sizeof(struct rtattr))
90
91	#define NLMSG_RTA(nlh,len) ((void)((char)(nlh)+sizeof(struct nlmsghdr)+NETLINK_ALIGN(len)))
92	#define NLMSG_RTAOK(rta,nlh) RTA_OK(rta,NLMSG_DATAEND(nlh))
93
94	hidden int __rtnetlink_enumerate(int link_af, int addr_af, int (cb)(void ctx, struct nlmsghdr h), void ctx);

lib/libc/wasi/libc-top-half/musl/src/network/ntohl.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <netinet/in.h>
2	#include <byteswap.h>
3
4	uint32_t ntohl(uint32_t n)
5	{
6	union { int i; char c; } u = { 1 };
7	return u.c ? bswap_32(n) : n;
8	}

lib/libc/wasi/libc-top-half/musl/src/network/ntohs.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <netinet/in.h>
2	#include <byteswap.h>
3
4	uint16_t ntohs(uint16_t n)
5	{
6	union { int i; char c; } u = { 1 };
7	return u.c ? bswap_16(n) : n;
8	}

lib/libc/wasi/libc-top-half/musl/src/prng/__rand48_step.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <stdint.h>
2	#include "rand48.h"
3
4	uint64_t __rand48_step(unsigned short xi, unsigned short lc)
5	{
6	uint64_t a, x;
7	x = xi[0] \| xi[1]+0U<<16 \| xi[2]+0ULL<<32;
8	a = lc[0] \| lc[1]+0U<<16 \| lc[2]+0ULL<<32;
9	x = a*x + lc[3];
10	xi[0] = x;
11	xi[1] = x>>16;
12	xi[2] = x>>32;
13	return x & 0xffffffffffffull;
14	}

lib/libc/wasi/libc-top-half/musl/src/prng/__seed48.c deleted-3

...	@@ -1,3 +0,0 @@
1	#include "rand48.h"
2
3	unsigned short __seed48[7] = { 0, 0, 0, 0xe66d, 0xdeec, 0x5, 0xb };

lib/libc/wasi/libc-top-half/musl/src/prng/drand48.c deleted-17

...	@@ -1,17 +0,0 @@
1	#include <stdlib.h>
2	#include <inttypes.h>
3	#include "rand48.h"
4
5	double erand48(unsigned short s[3])
6	{
7	union {
8	uint64_t u;
9	double f;
10	} x = { 0x3ff0000000000000ULL \| __rand48_step(s, __seed48+3)<<4 };
11	return x.f - 1.0;
12	}
13
14	double drand48(void)
15	{
16	return erand48(__seed48);
17	}

lib/libc/wasi/libc-top-half/musl/src/prng/lcong48.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <stdlib.h>
2	#include <string.h>
3	#include "rand48.h"
4
5	void lcong48(unsigned short p[7])
6	{
7	memcpy(__seed48, p, sizeof __seed48);
8	}

lib/libc/wasi/libc-top-half/musl/src/prng/lrand48.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <stdlib.h>
2	#include <inttypes.h>
3	#include "rand48.h"
4
5	long nrand48(unsigned short s[3])
6	{
7	return __rand48_step(s, __seed48+3) >> 17;
8	}
9
10	long lrand48(void)
11	{
12	return nrand48(__seed48);
13	}

lib/libc/wasi/libc-top-half/musl/src/prng/mrand48.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <stdlib.h>
2	#include <inttypes.h>
3	#include "rand48.h"
4
5	long jrand48(unsigned short s[3])
6	{
7	return (int32_t)(__rand48_step(s, __seed48+3) >> 16);
8	}
9
10	long mrand48(void)
11	{
12	return jrand48(__seed48);
13	}

lib/libc/wasi/libc-top-half/musl/src/prng/rand.c deleted-15

...	@@ -1,15 +0,0 @@
1	#include <stdlib.h>
2	#include <stdint.h>
3
4	static uint64_t seed;
5
6	void srand(unsigned s)
7	{
8	seed = s-1;
9	}
10
11	int rand(void)
12	{
13	seed = 6364136223846793005ULL*seed + 1;
14	return seed>>33;
15	}

lib/libc/wasi/libc-top-half/musl/src/prng/rand48.h deleted-5

...	@@ -1,5 +0,0 @@
1	#include <stdint.h>
2	#include <features.h>
3
4	hidden uint64_t __rand48_step(unsigned short xi, unsigned short lc);
5	extern hidden unsigned short __seed48[7];

lib/libc/wasi/libc-top-half/musl/src/prng/rand_r.c deleted-15

...	@@ -1,15 +0,0 @@
1	#include <stdlib.h>
2
3	static unsigned temper(unsigned x)
4	{
5	x ^= x>>11;
6	x ^= x<<7 & 0x9D2C5680;
7	x ^= x<<15 & 0xEFC60000;
8	x ^= x>>18;
9	return x;
10	}
11
12	int rand_r(unsigned *seed)
13	{
14	return temper(seed = seed * 1103515245 + 12345)/2;
15	}

lib/libc/wasi/libc-top-half/musl/src/prng/seed48.c deleted-11

...	@@ -1,11 +0,0 @@
1	#include <stdlib.h>
2	#include <string.h>
3	#include "rand48.h"
4
5	unsigned short seed48(unsigned short s)
6	{
7	static unsigned short p[3];
8	memcpy(p, __seed48, sizeof p);
9	memcpy(__seed48, s, sizeof p);
10	return p;
11	}

lib/libc/wasi/libc-top-half/musl/src/prng/srand48.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <stdlib.h>
2
3	void srand48(long seed)
4	{
5	seed48((unsigned short [3]){ 0x330e, seed, seed>>16 });
6	}

lib/libc/wasi/libc-top-half/musl/src/regex/fnmatch.c deleted-321

...	@@ -1,321 +0,0 @@
1	/*
2	* An implementation of what I call the "Sea of Stars" algorithm for
3	* POSIX fnmatch(). The basic idea is that we factor the pattern into
4	* a head component (which we match first and can reject without ever
5	* measuring the length of the string), an optional tail component
6	* (which only exists if the pattern contains at least one star), and
7	* an optional "sea of stars", a set of star-separated components
8	* between the head and tail. After the head and tail matches have
9	* been removed from the input string, the components in the "sea of
10	* stars" are matched sequentially by searching for their first
11	* occurrence past the end of the previous match.
12	*
13	* - Rich Felker, April 2012
14	*/
15
16	#include <string.h>
17	#include <fnmatch.h>
18	#include <stdlib.h>
19	#include <wchar.h>
20	#include <wctype.h>
21	#include "locale_impl.h"
22
23	#define END 0
24	#define UNMATCHABLE -2
25	#define BRACKET -3
26	#define QUESTION -4
27	#define STAR -5
28
29	static int str_next(const char str, size_t n, size_t step)
30	{
31	if (!n) {
32	*step = 0;
33	return 0;
34	}
35	if (str[0] >= 128U) {
36	wchar_t wc;
37	int k = mbtowc(&wc, str, n);
38	if (k<0) {
39	*step = 1;
40	return -1;
41	}
42	*step = k;
43	return wc;
44	}
45	*step = 1;
46	return str[0];
47	}
48
49	static int pat_next(const char pat, size_t m, size_t step, int flags)
50	{
51	int esc = 0;
52	if (!m \|\| !*pat) {
53	*step = 0;
54	return END;
55	}
56	*step = 1;
57	if (pat[0]=='\\' && pat[1] && !(flags & FNM_NOESCAPE)) {
58	*step = 2;
59	pat++;
60	esc = 1;
61	goto escaped;
62	}
63	if (pat[0]=='[') {
64	size_t k = 1;
65	if (k<m) if (pat[k] == '^' \|\| pat[k] == '!') k++;
66	if (k<m) if (pat[k] == ']') k++;
67	for (; k<m && pat[k] && pat[k]!=']'; k++) {
68	if (k+1<m && pat[k+1] && pat[k]=='[' && (pat[k+1]==':' \|\| pat[k+1]=='.' \|\| pat[k+1]=='=')) {
69	int z = pat[k+1];
70	k+=2;
71	if (k<m && pat[k]) k++;
72	while (k<m && pat[k] && (pat[k-1]!=z \|\| pat[k]!=']')) k++;
73	if (k==m \|\| !pat[k]) break;
74	}
75	}
76	if (k==m \|\| !pat[k]) {
77	*step = 1;
78	return '[';
79	}
80	*step = k+1;
81	return BRACKET;
82	}
83	if (pat[0] == '*')
84	return STAR;
85	if (pat[0] == '?')
86	return QUESTION;
87	escaped:
88	if (pat[0] >= 128U) {
89	wchar_t wc;
90	int k = mbtowc(&wc, pat, m);
91	if (k<0) {
92	*step = 0;
93	return UNMATCHABLE;
94	}
95	*step = k + esc;
96	return wc;
97	}
98	return pat[0];
99	}
100
101	static int casefold(int k)
102	{
103	int c = towupper(k);
104	return c == k ? towlower(k) : c;
105	}
106
107	static int match_bracket(const char *p, int k, int kfold)
108	{
109	wchar_t wc;
110	int inv = 0;
111	p++;
112	if (p=='^' \|\| p=='!') {
113	inv = 1;
114	p++;
115	}
116	if (*p==']') {
117	if (k==']') return !inv;
118	p++;
119	} else if (*p=='-') {
120	if (k=='-') return !inv;
121	p++;
122	}
123	wc = p[-1];
124	for (; *p != ']'; p++) {
125	if (p[0]=='-' && p[1]!=']') {
126	wchar_t wc2;
127	int l = mbtowc(&wc2, p+1, 4);
128	if (l < 0) return 0;
129	if (wc <= wc2)
130	if ((unsigned)k-wc <= wc2-wc \|\|
131	(unsigned)kfold-wc <= wc2-wc)
132	return !inv;
133	p += l-1;
134	continue;
135	}
136	if (p[0]=='[' && (p[1]==':' \|\| p[1]=='.' \|\| p[1]=='=')) {
137	const char *p0 = p+2;
138	int z = p[1];
139	p+=3;
140	while (p[-1]!=z \|\| p[0]!=']') p++;
141	if (z == ':' && p-1-p0 < 16) {
142	char buf[16];
143	memcpy(buf, p0, p-1-p0);
144	buf[p-1-p0] = 0;
145	if (iswctype(k, wctype(buf)) \|\|
146	iswctype(kfold, wctype(buf)))
147	return !inv;
148	}
149	continue;
150	}
151	if (*p < 128U) {
152	wc = (unsigned char)*p;
153	} else {
154	int l = mbtowc(&wc, p, 4);
155	if (l < 0) return 0;
156	p += l-1;
157	}
158	if (wc==k \|\| wc==kfold) return !inv;
159	}
160	return inv;
161	}
162
163	static int fnmatch_internal(const char pat, size_t m, const char str, size_t n, int flags)
164	{
165	const char p, ptail, *endpat;
166	const char s, stail, *endstr;
167	size_t pinc, sinc, tailcnt=0;
168	int c, k, kfold;
169
170	if (flags & FNM_PERIOD) {
171	if (str == '.' && pat != '.')
172	return FNM_NOMATCH;
173	}
174	for (;;) {
175	switch ((c = pat_next(pat, m, &pinc, flags))) {
176	case UNMATCHABLE:
177	return FNM_NOMATCH;
178	case STAR:
179	pat++;
180	m--;
181	break;
182	default:
183	k = str_next(str, n, &sinc);
184	if (k <= 0)
185	return (c==END) ? 0 : FNM_NOMATCH;
186	str += sinc;
187	n -= sinc;
188	kfold = flags & FNM_CASEFOLD ? casefold(k) : k;
189	if (c == BRACKET) {
190	if (!match_bracket(pat, k, kfold))
191	return FNM_NOMATCH;
192	} else if (c != QUESTION && k != c && kfold != c) {
193	return FNM_NOMATCH;
194	}
195	pat+=pinc;
196	m-=pinc;
197	continue;
198	}
199	break;
200	}
201
202	/* Compute real pat length if it was initially unknown/-1 */
203	m = strnlen(pat, m);
204	endpat = pat + m;
205
206	/* Find the last * in pat and count chars needed after it */
207	for (p=ptail=pat; p<endpat; p+=pinc) {
208	switch (pat_next(p, endpat-p, &pinc, flags)) {
209	case UNMATCHABLE:
210	return FNM_NOMATCH;
211	case STAR:
212	tailcnt=0;
213	ptail = p+1;
214	break;
215	default:
216	tailcnt++;
217	break;
218	}
219	}
220
221	/* Past this point we need not check for UNMATCHABLE in pat,
222	* because all of pat has already been parsed once. */
223
224	/* Compute real str length if it was initially unknown/-1 */
225	n = strnlen(str, n);
226	endstr = str + n;
227	if (n < tailcnt) return FNM_NOMATCH;
228
229	/* Find the final tailcnt chars of str, accounting for UTF-8.
230	* On illegal sequences we may get it wrong, but in that case
231	* we necessarily have a matching failure anyway. */
232	for (s=endstr; s>str && tailcnt; tailcnt--) {
233	if (s[-1] < 128U \|\| MB_CUR_MAX==1) s--;
234	else while ((unsigned char)*--s-0x80U<0x40 && s>str);
235	}
236	if (tailcnt) return FNM_NOMATCH;
237	stail = s;
238
239	/* Check that the pat and str tails match */
240	p = ptail;
241	for (;;) {
242	c = pat_next(p, endpat-p, &pinc, flags);
243	p += pinc;
244	if ((k = str_next(s, endstr-s, &sinc)) <= 0) {
245	if (c != END) return FNM_NOMATCH;
246	break;
247	}
248	s += sinc;
249	kfold = flags & FNM_CASEFOLD ? casefold(k) : k;
250	if (c == BRACKET) {
251	if (!match_bracket(p-pinc, k, kfold))
252	return FNM_NOMATCH;
253	} else if (c != QUESTION && k != c && kfold != c) {
254	return FNM_NOMATCH;
255	}
256	}
257
258	/* We're all done with the tails now, so throw them out */
259	endstr = stail;
260	endpat = ptail;
261
262	/* Match pattern components until there are none left */
263	while (pat<endpat) {
264	p = pat;
265	s = str;
266	for (;;) {
267	c = pat_next(p, endpat-p, &pinc, flags);
268	p += pinc;
269	/* Encountering * completes/commits a component */
270	if (c == STAR) {
271	pat = p;
272	str = s;
273	break;
274	}
275	k = str_next(s, endstr-s, &sinc);
276	if (!k)
277	return FNM_NOMATCH;
278	kfold = flags & FNM_CASEFOLD ? casefold(k) : k;
279	if (c == BRACKET) {
280	if (!match_bracket(p-pinc, k, kfold))
281	break;
282	} else if (c != QUESTION && k != c && kfold != c) {
283	break;
284	}
285	s += sinc;
286	}
287	if (c == STAR) continue;
288	/* If we failed, advance str, by 1 char if it's a valid
289	* char, or past all invalid bytes otherwise. */
290	k = str_next(str, endstr-str, &sinc);
291	if (k > 0) str += sinc;
292	else for (str++; str_next(str, endstr-str, &sinc)<0; str++);
293	}
294
295	return 0;
296	}
297
298	int fnmatch(const char pat, const char str, int flags)
299	{
300	const char s, p;
301	size_t inc;
302	int c;
303	if (flags & FNM_PATHNAME) for (;;) {
304	for (s=str; s && s!='/'; s++);
305	for (p=pat; (c=pat_next(p, -1, &inc, flags))!=END && c!='/'; p+=inc);
306	if (c!=s && (!s \|\| !(flags & FNM_LEADING_DIR)))
307	return FNM_NOMATCH;
308	if (fnmatch_internal(pat, p-pat, str, s-str, flags))
309	return FNM_NOMATCH;
310	if (!c) return 0;
311	str = s+1;
312	pat = p+inc;
313	} else if (flags & FNM_LEADING_DIR) {
314	for (s=str; *s; s++) {
315	if (*s != '/') continue;
316	if (!fnmatch_internal(pat, -1, str, s-str, flags))
317	return 0;
318	}
319	}
320	return fnmatch_internal(pat, -1, str, -1, flags);
321	}

lib/libc/wasi/libc-top-half/musl/src/regex/regerror.c deleted-37

...	@@ -1,37 +0,0 @@
1	#include <string.h>
2	#include <regex.h>
3	#include <stdio.h>
4	#include "locale_impl.h"
5
6	/* Error message strings for error codes listed in `regex.h'. This list
7	needs to be in sync with the codes listed there, naturally. */
8
9	/* Converted to single string by Rich Felker to remove the need for
10	* data relocations at runtime, 27 Feb 2006. */
11
12	static const char messages[] = {
13	"No error\0"
14	"No match\0"
15	"Invalid regexp\0"
16	"Unknown collating element\0"
17	"Unknown character class name\0"
18	"Trailing backslash\0"
19	"Invalid back reference\0"
20	"Missing ']'\0"
21	"Missing ')'\0"
22	"Missing '}'\0"
23	"Invalid contents of {}\0"
24	"Invalid character range\0"
25	"Out of memory\0"
26	"Repetition not preceded by valid expression\0"
27	"\0Unknown error"
28	};
29
30	size_t regerror(int e, const regex_t restrict preg, char restrict buf, size_t size)
31	{
32	const char *s;
33	for (s=messages; e && *s; e--, s+=strlen(s)+1);
34	if (!*s) s++;
35	s = LCTRANS_CUR(s);
36	return 1+snprintf(buf, size, "%s", s);
37	}

lib/libc/wasi/libc-top-half/musl/src/search/hsearch.c deleted-153

...	@@ -1,153 +0,0 @@
1	#define _GNU_SOURCE
2	#include <stdlib.h>
3	#include <string.h>
4	#include <search.h>
5
6	/*
7	open addressing hash table with 2^n table size
8	quadratic probing is used in case of hash collision
9	tab indices and hash are size_t
10	after resize fails with ENOMEM the state of tab is still usable
11
12	with the posix api items cannot be iterated and length cannot be queried
13	*/
14
15	#define MINSIZE 8
16	#define MAXSIZE ((size_t)-1/2 + 1)
17
18	struct __tab {
19	ENTRY *entries;
20	size_t mask;
21	size_t used;
22	};
23
24	static struct hsearch_data htab;
25
26	static int __hcreate_r(size_t, struct hsearch_data *);
27	static void __hdestroy_r(struct hsearch_data *);
28	static int __hsearch_r(ENTRY, ACTION, ENTRY *, struct hsearch_data );
29
30	static size_t keyhash(char *k)
31	{
32	unsigned char p = (void )k;
33	size_t h = 0;
34
35	while (*p)
36	h = 31h + p++;
37	return h;
38	}
39
40	static int resize(size_t nel, struct hsearch_data *htab)
41	{
42	size_t newsize;
43	size_t i, j;
44	ENTRY e, newe;
45	ENTRY *oldtab = htab->__tab->entries;
46	ENTRY *oldend = htab->__tab->entries + htab->__tab->mask + 1;
47
48	if (nel > MAXSIZE)
49	nel = MAXSIZE;
50	for (newsize = MINSIZE; newsize < nel; newsize *= 2);
51	htab->__tab->entries = calloc(newsize, sizeof *htab->__tab->entries);
52	if (!htab->__tab->entries) {
53	htab->__tab->entries = oldtab;
54	return 0;
55	}
56	htab->__tab->mask = newsize - 1;
57	if (!oldtab)
58	return 1;
59	for (e = oldtab; e < oldend; e++)
60	if (e->key) {
61	for (i=keyhash(e->key),j=1; ; i+=j++) {
62	newe = htab->__tab->entries + (i & htab->__tab->mask);
63	if (!newe->key)
64	break;
65	}
66	newe = e;
67	}
68	free(oldtab);
69	return 1;
70	}
71
72	int hcreate(size_t nel)
73	{
74	return __hcreate_r(nel, &htab);
75	}
76
77	void hdestroy(void)
78	{
79	__hdestroy_r(&htab);
80	}
81
82	static ENTRY lookup(char key, size_t hash, struct hsearch_data *htab)
83	{
84	size_t i, j;
85	ENTRY *e;
86
87	for (i=hash,j=1; ; i+=j++) {
88	e = htab->__tab->entries + (i & htab->__tab->mask);
89	if (!e->key \|\| strcmp(e->key, key) == 0)
90	break;
91	}
92	return e;
93	}
94
95	ENTRY *hsearch(ENTRY item, ACTION action)
96	{
97	ENTRY *e;
98
99	__hsearch_r(item, action, &e, &htab);
100	return e;
101	}
102
103	static int __hcreate_r(size_t nel, struct hsearch_data *htab)
104	{
105	int r;
106
107	htab->__tab = calloc(1, sizeof *htab->__tab);
108	if (!htab->__tab)
109	return 0;
110	r = resize(nel, htab);
111	if (r == 0) {
112	free(htab->__tab);
113	htab->__tab = 0;
114	}
115	return r;
116	}
117	weak_alias(__hcreate_r, hcreate_r);
118
119	static void __hdestroy_r(struct hsearch_data *htab)
120	{
121	if (htab->__tab) free(htab->__tab->entries);
122	free(htab->__tab);
123	htab->__tab = 0;
124	}
125	weak_alias(__hdestroy_r, hdestroy_r);
126
127	static int __hsearch_r(ENTRY item, ACTION action, ENTRY *retval, struct hsearch_data htab)
128	{
129	size_t hash = keyhash(item.key);
130	ENTRY *e = lookup(item.key, hash, htab);
131
132	if (e->key) {
133	*retval = e;
134	return 1;
135	}
136	if (action == FIND) {
137	*retval = 0;
138	return 0;
139	}
140	*e = item;
141	if (++htab->__tab->used > htab->__tab->mask - htab->__tab->mask/4) {
142	if (!resize(2*htab->__tab->used, htab)) {
143	htab->__tab->used--;
144	e->key = 0;
145	*retval = 0;
146	return 0;
147	}
148	e = lookup(item.key, hash, htab);
149	}
150	*retval = e;
151	return 1;
152	}
153	weak_alias(__hsearch_r, hsearch_r);

lib/libc/wasi/libc-top-half/musl/src/search/insque.c deleted-32

...	@@ -1,32 +0,0 @@
1	#include <search.h>
2
3	struct node {
4	struct node *next;
5	struct node *prev;
6	};
7
8	void insque(void element, void pred)
9	{
10	struct node *e = element;
11	struct node *p = pred;
12
13	if (!p) {
14	e->next = e->prev = 0;
15	return;
16	}
17	e->next = p->next;
18	e->prev = p;
19	p->next = e;
20	if (e->next)
21	e->next->prev = e;
22	}
23
24	void remque(void *element)
25	{
26	struct node *e = element;
27
28	if (e->next)
29	e->next->prev = e->prev;
30	if (e->prev)
31	e->prev->next = e->next;
32	}

lib/libc/wasi/libc-top-half/musl/src/search/lsearch.c deleted-31

...	@@ -1,31 +0,0 @@
1	#include <search.h>
2	#include <string.h>
3
4	void lsearch(const void key, void base, size_t nelp, size_t width,
5	int (compar)(const void , const void *))
6	{
7	char (*p)[width] = base;
8	size_t n = *nelp;
9	size_t i;
10
11	for (i = 0; i < n; i++)
12	if (compar(key, p[i]) == 0)
13	return p[i];
14	*nelp = n+1;
15	return memcpy(p[n], key, width);
16	}
17
18	void lfind(const void key, const void base, size_t nelp,
19	size_t width, int (compar)(const void , const void *))
20	{
21	char (p)[width] = (void )base;
22	size_t n = *nelp;
23	size_t i;
24
25	for (i = 0; i < n; i++)
26	if (compar(key, p[i]) == 0)
27	return p[i];
28	return 0;
29	}
30
31

lib/libc/wasi/libc-top-half/musl/src/search/tdelete.c deleted-49

...	@@ -1,49 +0,0 @@
1	#include <stdlib.h>
2	#include <search.h>
3	#include "tsearch.h"
4
5	void tdelete(const void restrict key, void **restrict rootp,
6	int(cmp)(const void , const void *))
7	{
8	if (!rootp)
9	return 0;
10
11	void **a[MAXH+1];
12	struct node n = rootp;
13	struct node *parent;
14	struct node *child;
15	int i=0;
16	/* *a[0] is an arbitrary non-null pointer that is returned when
17	the root node is deleted. */
18	a[i++] = rootp;
19	a[i++] = rootp;
20	for (;;) {
21	if (!n)
22	return 0;
23	int c = cmp(key, n->key);
24	if (!c)
25	break;
26	a[i++] = &n->a[c>0];
27	n = n->a[c>0];
28	}
29	parent = *a[i-2];
30	if (n->a[0]) {
31	/* free the preceding node instead of the deleted one. */
32	struct node *deleted = n;
33	a[i++] = &n->a[0];
34	n = n->a[0];
35	while (n->a[1]) {
36	a[i++] = &n->a[1];
37	n = n->a[1];
38	}
39	deleted->key = n->key;
40	child = n->a[0];
41	} else {
42	child = n->a[1];
43	}
44	/* freed node has at most one child, move it up and rebalance. */
45	free(n);
46	*a[--i] = child;
47	while (--i && __tsearch_balance(a[i]));
48	return parent;
49	}

lib/libc/wasi/libc-top-half/musl/src/search/tdestroy.c deleted-16

...	@@ -1,16 +0,0 @@
1	#define _GNU_SOURCE
2	#include <stdlib.h>
3	#include <search.h>
4	#include "tsearch.h"
5
6	void tdestroy(void root, void (freekey)(void *))
7	{
8	struct node *r = root;
9
10	if (r == 0)
11	return;
12	tdestroy(r->a[0], freekey);
13	tdestroy(r->a[1], freekey);
14	if (freekey) freekey((void *)r->key);
15	free(r);
16	}

lib/libc/wasi/libc-top-half/musl/src/search/tfind.c deleted-20

...	@@ -1,20 +0,0 @@
1	#include <search.h>
2	#include "tsearch.h"
3
4	void tfind(const void key, void const rootp,
5	int(cmp)(const void , const void *))
6	{
7	if (!rootp)
8	return 0;
9
10	struct node n = rootp;
11	for (;;) {
12	if (!n)
13	break;
14	int c = cmp(key, n->key);
15	if (!c)
16	break;
17	n = n->a[c>0];
18	}
19	return n;
20	}

lib/libc/wasi/libc-top-half/musl/src/search/tsearch.c deleted-92

...	@@ -1,92 +0,0 @@
1	#include <stdlib.h>
2	#include <search.h>
3	#include "tsearch.h"
4
5	static inline int height(struct node *n) { return n ? n->h : 0; }
6
7	static int rot(void *p, struct node x, int dir /* deeper side */)
8	{
9	struct node *y = x->a[dir];
10	struct node *z = y->a[!dir];
11	int hx = x->h;
12	int hz = height(z);
13	if (hz > height(y->a[dir])) {
14	/*
15	* x
16	* / \ dir z
17	* A y / \
18	* / \ --> x y
19	* z D /\| \|\
20	* / \ A B C D
21	* B C
22	*/
23	x->a[dir] = z->a[!dir];
24	y->a[!dir] = z->a[dir];
25	z->a[!dir] = x;
26	z->a[dir] = y;
27	x->h = hz;
28	y->h = hz;
29	z->h = hz+1;
30	} else {
31	/*
32	* x y
33	* / \ / \
34	* A y --> x D
35	* / \ / \
36	* z D A z
37	*/
38	x->a[dir] = z;
39	y->a[!dir] = x;
40	x->h = hz+1;
41	y->h = hz+2;
42	z = y;
43	}
44	*p = z;
45	return z->h - hx;
46	}
47
48	/* balance p, return 0 if height is unchanged. /
49	int __tsearch_balance(void **p)
50	{
51	struct node n = p;
52	int h0 = height(n->a[0]);
53	int h1 = height(n->a[1]);
54	if (h0 - h1 + 1u < 3u) {
55	int old = n->h;
56	n->h = h0<h1 ? h1+1 : h0+1;
57	return n->h - old;
58	}
59	return rot(p, n, h0<h1);
60	}
61
62	void tsearch(const void key, void **rootp,
63	int (cmp)(const void , const void *))
64	{
65	if (!rootp)
66	return 0;
67
68	void **a[MAXH];
69	struct node n = rootp;
70	struct node *r;
71	int i=0;
72	a[i++] = rootp;
73	for (;;) {
74	if (!n)
75	break;
76	int c = cmp(key, n->key);
77	if (!c)
78	return n;
79	a[i++] = &n->a[c>0];
80	n = n->a[c>0];
81	}
82	r = malloc(sizeof *r);
83	if (!r)
84	return 0;
85	r->key = key;
86	r->a[0] = r->a[1] = 0;
87	r->h = 1;
88	/* insert new node, rebalance ancestors. */
89	*a[--i] = r;
90	while (i && __tsearch_balance(a[--i]));
91	return r;
92	}

lib/libc/wasi/libc-top-half/musl/src/search/tsearch.h deleted-13

...	@@ -1,13 +0,0 @@
1	#include <search.h>
2	#include <features.h>
3
4	/* AVL tree height < 1.44log2(nodes+2)-0.3, MAXH is a safe upper bound. /
5	#define MAXH (sizeof(void)8*3/2)
6
7	struct node {
8	const void *key;
9	void *a[2];
10	int h;
11	};
12
13	hidden int __tsearch_balance(void **);

lib/libc/wasi/libc-top-half/musl/src/search/twalk.c deleted-22

...	@@ -1,22 +0,0 @@
1	#include <search.h>
2	#include "tsearch.h"
3
4	static void walk(const struct node r, void (action)(const void *, VISIT, int), int d)
5	{
6	if (!r)
7	return;
8	if (r->h == 1)
9	action(r, leaf, d);
10	else {
11	action(r, preorder, d);
12	walk(r->a[0], action, d+1);
13	action(r, postorder, d);
14	walk(r->a[1], action, d+1);
15	action(r, endorder, d);
16	}
17	}
18
19	void twalk(const void root, void (action)(const void *, VISIT, int))
20	{
21	walk(root, action, 0);
22	}

lib/libc/wasi/libc-top-half/musl/src/signal/psignal.c deleted-27

...	@@ -1,27 +0,0 @@
1	#include "stdio_impl.h"
2	#include <string.h>
3	#include <signal.h>
4	#include <errno.h>
5
6	void psignal(int sig, const char *msg)
7	{
8	FILE *f = stderr;
9	char *s = strsignal(sig);
10
11	FLOCK(f);
12
13	/* Save stderr's orientation and encoding rule, since psignal is not
14	* permitted to change them. Save errno and restore it if there is no
15	* error since fprintf might change it even on success but psignal is
16	* not permitted to do so. */
17	void *old_locale = f->locale;
18	int old_mode = f->mode;
19	int old_errno = errno;
20
21	if (fprintf(f, "%s%s%s\n", msg?msg:"", msg?": ":"", s)>=0)
22	errno = old_errno;
23	f->mode = old_mode;
24	f->locale = old_locale;
25
26	FUNLOCK(f);
27	}

lib/libc/wasi/libc-top-half/musl/src/stdio/__fclose_ca.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "stdio_impl.h"
2
3	int __fclose_ca(FILE *f)
4	{
5	return f->close(f);
6	}

lib/libc/wasi/libc-top-half/musl/src/stdio/__fmodeflags.c deleted-16

...	@@ -1,16 +0,0 @@
1	#include <fcntl.h>
2	#include <string.h>
3
4	int __fmodeflags(const char *mode)
5	{
6	int flags;
7	if (strchr(mode, '+')) flags = O_RDWR;
8	else if (*mode == 'r') flags = O_RDONLY;
9	else flags = O_WRONLY;
10	if (strchr(mode, 'x')) flags \|= O_EXCL;
11	if (strchr(mode, 'e')) flags \|= O_CLOEXEC;
12	if (*mode != 'r') flags \|= O_CREAT;
13	if (*mode == 'w') flags \|= O_TRUNC;
14	if (*mode == 'a') flags \|= O_APPEND;
15	return flags;
16	}

lib/libc/wasi/libc-top-half/musl/src/stdio/__overflow.c deleted-10

...	@@ -1,10 +0,0 @@
1	#include "stdio_impl.h"
2
3	int __overflow(FILE *f, int _c)
4	{
5	unsigned char c = _c;
6	if (!f->wend && __towrite(f)) return EOF;
7	if (f->wpos != f->wend && c != f->lbf) return *f->wpos++ = c;
8	if (f->write(f, &c, 1)!=1) return EOF;
9	return c;
10	}

lib/libc/wasi/libc-top-half/musl/src/stdio/__stdio_exit.c deleted-25

...	@@ -1,25 +0,0 @@
1	#include "stdio_impl.h"
2
3	static FILE *volatile dummy_file = 0;
4	weak_alias(dummy_file, __stdin_used);
5	weak_alias(dummy_file, __stdout_used);
6	weak_alias(dummy_file, __stderr_used);
7
8	static void close_file(FILE *f)
9	{
10	if (!f) return;
11	FFINALLOCK(f);
12	if (f->wpos != f->wbase) f->write(f, 0, 0);
13	if (f->rpos != f->rend) f->seek(f, f->rpos-f->rend, SEEK_CUR);
14	}
15
16	void __stdio_exit(void)
17	{
18	FILE *f;
19	for (f=*__ofl_lock(); f; f=f->next) close_file(f);
20	close_file(__stdin_used);
21	close_file(__stdout_used);
22	close_file(__stderr_used);
23	}
24
25	weak_alias(__stdio_exit, __stdio_exit_needed);

lib/libc/wasi/libc-top-half/musl/src/stdio/__toread.c deleted-19

...	@@ -1,19 +0,0 @@
1	#include <stdio_impl.h>
2
3	int __toread(FILE *f)
4	{
5	f->mode \|= f->mode-1;
6	if (f->wpos != f->wbase) f->write(f, 0, 0);
7	f->wpos = f->wbase = f->wend = 0;
8	if (f->flags & F_NORD) {
9	f->flags \|= F_ERR;
10	return EOF;
11	}
12	f->rpos = f->rend = f->buf + f->buf_size;
13	return (f->flags & F_EOF) ? EOF : 0;
14	}
15
16	hidden void __toread_needs_stdio_exit()
17	{
18	__stdio_exit_needed();
19	}

lib/libc/wasi/libc-top-half/musl/src/stdio/__towrite.c deleted-23

...	@@ -1,23 +0,0 @@
1	#include "stdio_impl.h"
2
3	int __towrite(FILE *f)
4	{
5	f->mode \|= f->mode-1;
6	if (f->flags & F_NOWR) {
7	f->flags \|= F_ERR;
8	return EOF;
9	}
10	/* Clear read buffer (easier than summoning nasal demons) */
11	f->rpos = f->rend = 0;
12
13	/* Activate write through the buffer. */
14	f->wpos = f->wbase = f->buf;
15	f->wend = f->buf + f->buf_size;
16
17	return 0;
18	}
19
20	hidden void __towrite_needs_stdio_exit()
21	{
22	__stdio_exit_needed();
23	}

lib/libc/wasi/libc-top-half/musl/src/stdio/__uflow.c deleted-11

...	@@ -1,11 +0,0 @@
1	#include "stdio_impl.h"
2
3	/* This function assumes it will never be called if there is already
4	* data buffered for reading. */
5
6	int __uflow(FILE *f)
7	{
8	unsigned char c;
9	if (!__toread(f) && f->read(f, &c, 1)==1) return c;
10	return EOF;
11	}

lib/libc/wasi/libc-top-half/musl/src/stdio/asprintf.c deleted-13

...	@@ -1,13 +0,0 @@
1	#define _GNU_SOURCE
2	#include <stdio.h>
3	#include <stdarg.h>
4
5	int asprintf(char *s, const char fmt, ...)
6	{
7	int ret;
8	va_list ap;
9	va_start(ap, fmt);
10	ret = vasprintf(s, fmt, ap);
11	va_end(ap);
12	return ret;
13	}

lib/libc/wasi/libc-top-half/musl/src/stdio/clearerr.c deleted-10

...	@@ -1,10 +0,0 @@
1	#include "stdio_impl.h"
2
3	void clearerr(FILE *f)
4	{
5	FLOCK(f);
6	f->flags &= ~(F_EOF\|F_ERR);
7	FUNLOCK(f);
8	}
9
10	weak_alias(clearerr, clearerr_unlocked);

lib/libc/wasi/libc-top-half/musl/src/stdio/dprintf.c deleted-12

...	@@ -1,12 +0,0 @@
1	#include <stdio.h>
2	#include <stdarg.h>
3
4	int dprintf(int fd, const char *restrict fmt, ...)
5	{
6	int ret;
7	va_list ap;
8	va_start(ap, fmt);
9	ret = vdprintf(fd, fmt, ap);
10	va_end(ap);
11	return ret;
12	}

lib/libc/wasi/libc-top-half/musl/src/stdio/ext.c deleted-57

...	@@ -1,57 +0,0 @@
1	#define _GNU_SOURCE
2	#include "stdio_impl.h"
3	#include <stdio_ext.h>
4
5	void _flushlbf(void)
6	{
7	fflush(0);
8	}
9
10	int __fsetlocking(FILE *f, int type)
11	{
12	return 0;
13	}
14
15	int __fwriting(FILE *f)
16	{
17	return (f->flags & F_NORD) \|\| f->wend;
18	}
19
20	int __freading(FILE *f)
21	{
22	return (f->flags & F_NOWR) \|\| f->rend;
23	}
24
25	int __freadable(FILE *f)
26	{
27	return !(f->flags & F_NORD);
28	}
29
30	int __fwritable(FILE *f)
31	{
32	return !(f->flags & F_NOWR);
33	}
34
35	int __flbf(FILE *f)
36	{
37	return f->lbf >= 0;
38	}
39
40	size_t __fbufsize(FILE *f)
41	{
42	return f->buf_size;
43	}
44
45	size_t __fpending(FILE *f)
46	{
47	return f->wend ? f->wpos - f->wbase : 0;
48	}
49
50	int __fpurge(FILE *f)
51	{
52	f->wpos = f->wbase = f->wend = 0;
53	f->rpos = f->rend = 0;
54	return 0;
55	}
56
57	weak_alias(__fpurge, fpurge);

lib/libc/wasi/libc-top-half/musl/src/stdio/ext2.c deleted-24

...	@@ -1,24 +0,0 @@
1	#include "stdio_impl.h"
2	#include <stdio_ext.h>
3
4	size_t __freadahead(FILE *f)
5	{
6	return f->rend ? f->rend - f->rpos : 0;
7	}
8
9	const char __freadptr(FILE f, size_t *sizep)
10	{
11	if (f->rpos == f->rend) return 0;
12	*sizep = f->rend - f->rpos;
13	return (const char *)f->rpos;
14	}
15
16	void __freadptrinc(FILE *f, size_t inc)
17	{
18	f->rpos += inc;
19	}
20
21	void __fseterr(FILE *f)
22	{
23	f->flags \|= F_ERR;
24	}

lib/libc/wasi/libc-top-half/musl/src/stdio/fclose.c deleted-38

...	@@ -1,38 +0,0 @@
1	#include "stdio_impl.h"
2	#include <stdlib.h>
3
4	static void dummy(FILE *f) { }
5	weak_alias(dummy, __unlist_locked_file);
6
7	int fclose(FILE *f)
8	{
9	int r;
10
11	FLOCK(f);
12	r = fflush(f);
13	r \|= f->close(f);
14	FUNLOCK(f);
15
16	/* Past this point, f is closed and any further explict access
17	* to it is undefined. However, it still exists as an entry in
18	* the open file list and possibly in the thread's locked files
19	* list, if it was closed while explicitly locked. Functions
20	* which process these lists must tolerate dead FILE objects
21	* (which necessarily have inactive buffer pointers) without
22	* producing any side effects. */
23
24	if (f->flags & F_PERM) return r;
25
26	__unlist_locked_file(f);
27
28	FILE **head = __ofl_lock();
29	if (f->prev) f->prev->next = f->next;
30	if (f->next) f->next->prev = f->prev;
31	if (head == f) head = f->next;
32	__ofl_unlock();
33
34	free(f->getln_buf);
35	free(f);
36
37	return r;
38	}

lib/libc/wasi/libc-top-half/musl/src/stdio/feof.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include "stdio_impl.h"
2
3	#undef feof
4
5	int feof(FILE *f)
6	{
7	FLOCK(f);
8	int ret = !!(f->flags & F_EOF);
9	FUNLOCK(f);
10	return ret;
11	}
12
13	weak_alias(feof, feof_unlocked);
14	weak_alias(feof, _IO_feof_unlocked);

lib/libc/wasi/libc-top-half/musl/src/stdio/ferror.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include "stdio_impl.h"
2
3	#undef ferror
4
5	int ferror(FILE *f)
6	{
7	FLOCK(f);
8	int ret = !!(f->flags & F_ERR);
9	FUNLOCK(f);
10	return ret;
11	}
12
13	weak_alias(ferror, ferror_unlocked);
14	weak_alias(ferror, _IO_ferror_unlocked);

lib/libc/wasi/libc-top-half/musl/src/stdio/fflush.c deleted-47

...	@@ -1,47 +0,0 @@
1	#include "stdio_impl.h"
2
3	/* stdout.c will override this if linked */
4	static FILE *volatile dummy = 0;
5	weak_alias(dummy, __stdout_used);
6	weak_alias(dummy, __stderr_used);
7
8	int fflush(FILE *f)
9	{
10	if (!f) {
11	int r = 0;
12	if (__stdout_used) r \|= fflush(__stdout_used);
13	if (__stderr_used) r \|= fflush(__stderr_used);
14
15	for (f=*__ofl_lock(); f; f=f->next) {
16	FLOCK(f);
17	if (f->wpos != f->wbase) r \|= fflush(f);
18	FUNLOCK(f);
19	}
20	__ofl_unlock();
21
22	return r;
23	}
24
25	FLOCK(f);
26
27	/* If writing, flush output */
28	if (f->wpos != f->wbase) {
29	f->write(f, 0, 0);
30	if (!f->wpos) {
31	FUNLOCK(f);
32	return EOF;
33	}
34	}
35
36	/* If reading, sync position, per POSIX */
37	if (f->rpos != f->rend) f->seek(f, f->rpos-f->rend, SEEK_CUR);
38
39	/* Clear read and write modes */
40	f->wpos = f->wbase = f->wend = 0;
41	f->rpos = f->rend = 0;
42
43	FUNLOCK(f);
44	return 0;
45	}
46
47	weak_alias(fflush, fflush_unlocked);

lib/libc/wasi/libc-top-half/musl/src/stdio/fgetln.c deleted-21

...	@@ -1,21 +0,0 @@
1	#define _GNU_SOURCE
2	#include "stdio_impl.h"
3	#include <string.h>
4
5	char fgetln(FILE f, size_t *plen)
6	{
7	char ret = 0, z;
8	ssize_t l;
9	FLOCK(f);
10	ungetc(getc_unlocked(f), f);
11	if (f->rend && (z=memchr(f->rpos, '\n', f->rend - f->rpos))) {
12	ret = (char *)f->rpos;
13	*plen = ++z - ret;
14	f->rpos = (void *)z;
15	} else if ((l = getline(&f->getln_buf, (size_t[]){0}, f)) > 0) {
16	*plen = l;
17	ret = f->getln_buf;
18	}
19	FUNLOCK(f);
20	return ret;
21	}

lib/libc/wasi/libc-top-half/musl/src/stdio/fgets.c deleted-48

...	@@ -1,48 +0,0 @@
1	#include "stdio_impl.h"
2	#include <string.h>
3
4	#define MIN(a,b) ((a)<(b) ? (a) : (b))
5
6	char fgets(char restrict s, int n, FILE *restrict f)
7	{
8	char *p = s;
9	unsigned char *z;
10	size_t k;
11	int c;
12
13	FLOCK(f);
14
15	if (n--<=1) {
16	f->mode \|= f->mode-1;
17	FUNLOCK(f);
18	if (n) return 0;
19	*s = 0;
20	return s;
21	}
22
23	while (n) {
24	if (f->rpos != f->rend) {
25	z = memchr(f->rpos, '\n', f->rend - f->rpos);
26	k = z ? z - f->rpos + 1 : f->rend - f->rpos;
27	k = MIN(k, n);
28	memcpy(p, f->rpos, k);
29	f->rpos += k;
30	p += k;
31	n -= k;
32	if (z \|\| !n) break;
33	}
34	if ((c = getc_unlocked(f)) < 0) {
35	if (p==s \|\| !feof(f)) s = 0;
36	break;
37	}
38	n--;
39	if ((*p++ = c) == '\n') break;
40	}
41	if (s) *p = 0;
42
43	FUNLOCK(f);
44
45	return s;
46	}
47
48	weak_alias(fgets, fgets_unlocked);

lib/libc/wasi/libc-top-half/musl/src/stdio/fgetwc.c deleted-68

...	@@ -1,68 +0,0 @@
1	#include "stdio_impl.h"
2	#include "locale_impl.h"
3	#include <wchar.h>
4	#include <errno.h>
5
6	static wint_t __fgetwc_unlocked_internal(FILE *f)
7	{
8	wchar_t wc;
9	int c;
10	size_t l;
11
12	/* Convert character from buffer if possible */
13	if (f->rpos != f->rend) {
14	l = mbtowc(&wc, (void *)f->rpos, f->rend - f->rpos);
15	if (l+1 >= 1) {
16	f->rpos += l + !l; /* l==0 means 1 byte, null */
17	return wc;
18	}
19	}
20
21	/* Convert character byte-by-byte */
22	mbstate_t st = { 0 };
23	unsigned char b;
24	int first = 1;
25	do {
26	b = c = getc_unlocked(f);
27	if (c < 0) {
28	if (!first) {
29	f->flags \|= F_ERR;
30	errno = EILSEQ;
31	}
32	return WEOF;
33	}
34	l = mbrtowc(&wc, (void *)&b, 1, &st);
35	if (l == -1) {
36	if (!first) {
37	f->flags \|= F_ERR;
38	ungetc(b, f);
39	}
40	return WEOF;
41	}
42	first = 0;
43	} while (l == -2);
44
45	return wc;
46	}
47
48	wint_t __fgetwc_unlocked(FILE *f)
49	{
50	locale_t ploc = &CURRENT_LOCALE, loc = ploc;
51	if (f->mode <= 0) fwide(f, 1);
52	*ploc = f->locale;
53	wchar_t wc = __fgetwc_unlocked_internal(f);
54	*ploc = loc;
55	return wc;
56	}
57
58	wint_t fgetwc(FILE *f)
59	{
60	wint_t c;
61	FLOCK(f);
62	c = __fgetwc_unlocked(f);
63	FUNLOCK(f);
64	return c;
65	}
66
67	weak_alias(__fgetwc_unlocked, fgetwc_unlocked);
68	weak_alias(__fgetwc_unlocked, getwc_unlocked);

lib/libc/wasi/libc-top-half/musl/src/stdio/fgetws.c deleted-28

...	@@ -1,28 +0,0 @@
1	#include "stdio_impl.h"
2	#include <wchar.h>
3
4	wint_t __fgetwc_unlocked(FILE *);
5
6	wchar_t fgetws(wchar_t restrict s, int n, FILE *restrict f)
7	{
8	wchar_t *p = s;
9
10	if (!n--) return s;
11
12	FLOCK(f);
13
14	for (; n; n--) {
15	wint_t c = __fgetwc_unlocked(f);
16	if (c == WEOF) break;
17	*p++ = c;
18	if (c == '\n') break;
19	}
20	*p = 0;
21	if (ferror(f)) p = s;
22
23	FUNLOCK(f);
24
25	return (p == s) ? NULL : s;
26	}
27
28	weak_alias(fgetws, fgetws_unlocked);

lib/libc/wasi/libc-top-half/musl/src/stdio/fileno.c deleted-16

...	@@ -1,16 +0,0 @@
1	#include "stdio_impl.h"
2	#include <errno.h>
3
4	int fileno(FILE *f)
5	{
6	FLOCK(f);
7	int fd = f->fd;
8	FUNLOCK(f);
9	if (fd < 0) {
10	errno = EBADF;
11	return -1;
12	}
13	return fd;
14	}
15
16	weak_alias(fileno, fileno_unlocked);

lib/libc/wasi/libc-top-half/musl/src/stdio/fopencookie.c deleted-135

...	@@ -1,135 +0,0 @@
1	#define _GNU_SOURCE
2	#include "stdio_impl.h"
3	#include <stdlib.h>
4	#include <sys/ioctl.h>
5	#include <fcntl.h>
6	#include <errno.h>
7	#include <string.h>
8
9	struct fcookie {
10	void *cookie;
11	cookie_io_functions_t iofuncs;
12	};
13
14	struct cookie_FILE {
15	FILE f;
16	struct fcookie fc;
17	unsigned char buf[UNGET+BUFSIZ];
18	};
19
20	static size_t cookieread(FILE f, unsigned char buf, size_t len)
21	{
22	struct fcookie *fc = f->cookie;
23	ssize_t ret = -1;
24	size_t remain = len, readlen = 0;
25	size_t len2 = len - !!f->buf_size;
26
27	if (!fc->iofuncs.read) goto bail;
28
29	if (len2) {
30	ret = fc->iofuncs.read(fc->cookie, (char *) buf, len2);
31	if (ret <= 0) goto bail;
32
33	readlen += ret;
34	remain -= ret;
35	}
36
37	if (!f->buf_size \|\| remain > !!f->buf_size) return readlen;
38
39	f->rpos = f->buf;
40	ret = fc->iofuncs.read(fc->cookie, (char *) f->rpos, f->buf_size);
41	if (ret <= 0) goto bail;
42	f->rend = f->rpos + ret;
43
44	buf[readlen++] = *f->rpos++;
45
46	return readlen;
47
48	bail:
49	f->flags \|= ret == 0 ? F_EOF : F_ERR;
50	f->rpos = f->rend = f->buf;
51	return readlen;
52	}
53
54	static size_t cookiewrite(FILE f, const unsigned char buf, size_t len)
55	{
56	struct fcookie *fc = f->cookie;
57	ssize_t ret;
58	size_t len2 = f->wpos - f->wbase;
59	if (!fc->iofuncs.write) return len;
60	if (len2) {
61	f->wpos = f->wbase;
62	if (cookiewrite(f, f->wpos, len2) < len2) return 0;
63	}
64	ret = fc->iofuncs.write(fc->cookie, (const char *) buf, len);
65	if (ret < 0) {
66	f->wpos = f->wbase = f->wend = 0;
67	f->flags \|= F_ERR;
68	return 0;
69	}
70	return ret;
71	}
72
73	static off_t cookieseek(FILE *f, off_t off, int whence)
74	{
75	struct fcookie *fc = f->cookie;
76	int res;
77	if (whence > 2U) {
78	errno = EINVAL;
79	return -1;
80	}
81	if (!fc->iofuncs.seek) {
82	errno = ENOTSUP;
83	return -1;
84	}
85	res = fc->iofuncs.seek(fc->cookie, &off, whence);
86	if (res < 0)
87	return res;
88	return off;
89	}
90
91	static int cookieclose(FILE *f)
92	{
93	struct fcookie *fc = f->cookie;
94	if (fc->iofuncs.close) return fc->iofuncs.close(fc->cookie);
95	return 0;
96	}
97
98	FILE fopencookie(void cookie, const char *mode, cookie_io_functions_t iofuncs)
99	{
100	struct cookie_FILE *f;
101
102	/* Check for valid initial mode character */
103	if (!strchr("rwa", *mode)) {
104	errno = EINVAL;
105	return 0;
106	}
107
108	/* Allocate FILE+fcookie+buffer or fail */
109	if (!(f=malloc(sizeof *f))) return 0;
110
111	/* Zero-fill only the struct, not the buffer */
112	memset(&f->f, 0, sizeof f->f);
113
114	/* Impose mode restrictions */
115	if (!strchr(mode, '+')) f->f.flags = (*mode == 'r') ? F_NOWR : F_NORD;
116
117	/* Set up our fcookie */
118	f->fc.cookie = cookie;
119	f->fc.iofuncs = iofuncs;
120
121	f->f.fd = -1;
122	f->f.cookie = &f->fc;
123	f->f.buf = f->buf + UNGET;
124	f->f.buf_size = sizeof f->buf - UNGET;
125	f->f.lbf = EOF;
126
127	/* Initialize op ptrs. No problem if some are unneeded. */
128	f->f.read = cookieread;
129	f->f.write = cookiewrite;
130	f->f.seek = cookieseek;
131	f->f.close = cookieclose;
132
133	/* Add new FILE to open file list */
134	return __ofl_add(&f->f);
135	}

lib/libc/wasi/libc-top-half/musl/src/stdio/fprintf.c deleted-12

...	@@ -1,12 +0,0 @@
1	#include <stdio.h>
2	#include <stdarg.h>
3
4	int fprintf(FILE restrict f, const char restrict fmt, ...)
5	{
6	int ret;
7	va_list ap;
8	va_start(ap, fmt);
9	ret = vfprintf(f, fmt, ap);
10	va_end(ap);
11	return ret;
12	}

lib/libc/wasi/libc-top-half/musl/src/stdio/fputs.c deleted-10

...	@@ -1,10 +0,0 @@
1	#include "stdio_impl.h"
2	#include <string.h>
3
4	int fputs(const char restrict s, FILE restrict f)
5	{
6	size_t l = strlen(s);
7	return (fwrite(s, 1, l, f)==l) - 1;
8	}
9
10	weak_alias(fputs, fputs_unlocked);

lib/libc/wasi/libc-top-half/musl/src/stdio/fputwc.c deleted-40

...	@@ -1,40 +0,0 @@
1	#include "stdio_impl.h"
2	#include "locale_impl.h"
3	#include <wchar.h>
4	#include <limits.h>
5	#include <ctype.h>
6
7	wint_t __fputwc_unlocked(wchar_t c, FILE *f)
8	{
9	char mbc[MB_LEN_MAX];
10	int l;
11	locale_t ploc = &CURRENT_LOCALE, loc = ploc;
12
13	if (f->mode <= 0) fwide(f, 1);
14	*ploc = f->locale;
15
16	if (isascii(c)) {
17	c = putc_unlocked(c, f);
18	} else if (f->wpos + MB_LEN_MAX < f->wend) {
19	l = wctomb((void *)f->wpos, c);
20	if (l < 0) c = WEOF;
21	else f->wpos += l;
22	} else {
23	l = wctomb(mbc, c);
24	if (l < 0 \|\| __fwritex((void *)mbc, l, f) < l) c = WEOF;
25	}
26	if (c==WEOF) f->flags \|= F_ERR;
27	*ploc = loc;
28	return c;
29	}
30
31	wint_t fputwc(wchar_t c, FILE *f)
32	{
33	FLOCK(f);
34	c = __fputwc_unlocked(c, f);
35	FUNLOCK(f);
36	return c;
37	}
38
39	weak_alias(__fputwc_unlocked, fputwc_unlocked);
40	weak_alias(__fputwc_unlocked, putwc_unlocked);

lib/libc/wasi/libc-top-half/musl/src/stdio/fputws.c deleted-29

...	@@ -1,29 +0,0 @@
1	#include "stdio_impl.h"
2	#include "locale_impl.h"
3	#include <wchar.h>
4
5	int fputws(const wchar_t restrict ws, FILE restrict f)
6	{
7	unsigned char buf[BUFSIZ];
8	size_t l=0;
9	locale_t ploc = &CURRENT_LOCALE, loc = ploc;
10
11	FLOCK(f);
12
13	fwide(f, 1);
14	*ploc = f->locale;
15
16	while (ws && (l = wcsrtombs((void )buf, (void)&ws, sizeof buf, 0))+1 > 1)
17	if (__fwritex(buf, l, f) < l) {
18	FUNLOCK(f);
19	*ploc = loc;
20	return -1;
21	}
22
23	FUNLOCK(f);
24
25	*ploc = loc;
26	return l; /* 0 or -1 */
27	}
28
29	weak_alias(fputws, fputws_unlocked);

lib/libc/wasi/libc-top-half/musl/src/stdio/fread.c deleted-38

...	@@ -1,38 +0,0 @@
1	#include "stdio_impl.h"
2	#include <string.h>
3
4	#define MIN(a,b) ((a)<(b) ? (a) : (b))
5
6	size_t fread(void restrict destv, size_t size, size_t nmemb, FILE restrict f)
7	{
8	unsigned char *dest = destv;
9	size_t len = size*nmemb, l = len, k;
10	if (!size) nmemb = 0;
11
12	FLOCK(f);
13
14	f->mode \|= f->mode-1;
15
16	if (f->rpos != f->rend) {
17	/* First exhaust the buffer. */
18	k = MIN(f->rend - f->rpos, l);
19	memcpy(dest, f->rpos, k);
20	f->rpos += k;
21	dest += k;
22	l -= k;
23	}
24
25	/* Read the remainder directly */
26	for (; l; l-=k, dest+=k) {
27	k = __toread(f) ? 0 : f->read(f, dest, l);
28	if (!k) {
29	FUNLOCK(f);
30	return (len-l)/size;
31	}
32	}
33
34	FUNLOCK(f);
35	return nmemb;
36	}
37
38	weak_alias(fread, fread_unlocked);

lib/libc/wasi/libc-top-half/musl/src/stdio/fscanf.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <stdio.h>
2	#include <stdarg.h>
3
4	int fscanf(FILE restrict f, const char restrict fmt, ...)
5	{
6	int ret;
7	va_list ap;
8	va_start(ap, fmt);
9	ret = vfscanf(f, fmt, ap);
10	va_end(ap);
11	return ret;
12	}
13
14	weak_alias(fscanf, __isoc99_fscanf);

lib/libc/wasi/libc-top-half/musl/src/stdio/fwide.c deleted-16

...	@@ -1,16 +0,0 @@
1	#include <wchar.h>
2	#include "stdio_impl.h"
3	#include "locale_impl.h"
4
5	int fwide(FILE *f, int mode)
6	{
7	FLOCK(f);
8	if (mode) {
9	if (!f->locale) f->locale = MB_CUR_MAX==1
10	? C_LOCALE : UTF8_LOCALE;
11	if (!f->mode) f->mode = mode>0 ? 1 : -1;
12	}
13	mode = f->mode;
14	FUNLOCK(f);
15	return mode;
16	}

lib/libc/wasi/libc-top-half/musl/src/stdio/fwprintf.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <stdio.h>
2	#include <stdarg.h>
3	#include <wchar.h>
4
5	int fwprintf(FILE restrict f, const wchar_t restrict fmt, ...)
6	{
7	int ret;
8	va_list ap;
9	va_start(ap, fmt);
10	ret = vfwprintf(f, fmt, ap);
11	va_end(ap);
12	return ret;
13	}

lib/libc/wasi/libc-top-half/musl/src/stdio/fwrite.c deleted-38

...	@@ -1,38 +0,0 @@
1	#include "stdio_impl.h"
2	#include <string.h>
3
4	size_t __fwritex(const unsigned char restrict s, size_t l, FILE restrict f)
5	{
6	size_t i=0;
7
8	if (!f->wend && __towrite(f)) return 0;
9
10	if (l > f->wend - f->wpos) return f->write(f, s, l);
11
12	if (f->lbf >= 0) {
13	/* Match /^(.\n\|)/ /
14	for (i=l; i && s[i-1] != '\n'; i--);
15	if (i) {
16	size_t n = f->write(f, s, i);
17	if (n < i) return n;
18	s += i;
19	l -= i;
20	}
21	}
22
23	memcpy(f->wpos, s, l);
24	f->wpos += l;
25	return l+i;
26	}
27
28	size_t fwrite(const void restrict src, size_t size, size_t nmemb, FILE restrict f)
29	{
30	size_t k, l = size*nmemb;
31	if (!size) nmemb = 0;
32	FLOCK(f);
33	k = __fwritex(src, l, f);
34	FUNLOCK(f);
35	return k==l ? nmemb : k/size;
36	}
37
38	weak_alias(fwrite, fwrite_unlocked);

lib/libc/wasi/libc-top-half/musl/src/stdio/fwscanf.c deleted-15

...	@@ -1,15 +0,0 @@
1	#include <stdio.h>
2	#include <stdarg.h>
3	#include <wchar.h>
4
5	int fwscanf(FILE restrict f, const wchar_t restrict fmt, ...)
6	{
7	int ret;
8	va_list ap;
9	va_start(ap, fmt);
10	ret = vfwscanf(f, fmt, ap);
11	va_end(ap);
12	return ret;
13	}
14
15	weak_alias(fwscanf,__isoc99_fwscanf);

lib/libc/wasi/libc-top-half/musl/src/stdio/getc_unlocked.c deleted-9

...	@@ -1,9 +0,0 @@
1	#include "stdio_impl.h"
2
3	int (getc_unlocked)(FILE *f)
4	{
5	return getc_unlocked(f);
6	}
7
8	weak_alias (getc_unlocked, fgetc_unlocked);
9	weak_alias (getc_unlocked, _IO_getc_unlocked);

lib/libc/wasi/libc-top-half/musl/src/stdio/getchar_unlocked.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "stdio_impl.h"
2
3	int getchar_unlocked(void)
4	{
5	return getc_unlocked(stdin);
6	}

lib/libc/wasi/libc-top-half/musl/src/stdio/getdelim.c deleted-83

...	@@ -1,83 +0,0 @@
1	#include "stdio_impl.h"
2	#include <string.h>
3	#include <stdlib.h>
4	#include <inttypes.h>
5	#include <errno.h>
6
7	ssize_t getdelim(char *restrict s, size_t restrict n, int delim, FILE *restrict f)
8	{
9	char *tmp;
10	unsigned char *z;
11	size_t k;
12	size_t i=0;
13	int c;
14
15	FLOCK(f);
16
17	if (!n \|\| !s) {
18	f->mode \|= f->mode-1;
19	f->flags \|= F_ERR;
20	FUNLOCK(f);
21	errno = EINVAL;
22	return -1;
23	}
24
25	if (!s) n=0;
26
27	for (;;) {
28	if (f->rpos != f->rend) {
29	z = memchr(f->rpos, delim, f->rend - f->rpos);
30	k = z ? z - f->rpos + 1 : f->rend - f->rpos;
31	} else {
32	z = 0;
33	k = 0;
34	}
35	if (i+k >= *n) {
36	size_t m = i+k+2;
37	if (!z && m < SIZE_MAX/4) m += m/2;
38	tmp = realloc(*s, m);
39	if (!tmp) {
40	m = i+k+2;
41	tmp = realloc(*s, m);
42	if (!tmp) {
43	/* Copy as much as fits and ensure no
44	* pushback remains in the FILE buf. */
45	k = *n-i;
46	memcpy(*s+i, f->rpos, k);
47	f->rpos += k;
48	f->mode \|= f->mode-1;
49	f->flags \|= F_ERR;
50	FUNLOCK(f);
51	errno = ENOMEM;
52	return -1;
53	}
54	}
55	*s = tmp;
56	*n = m;
57	}
58	if (k) {
59	memcpy(*s+i, f->rpos, k);
60	f->rpos += k;
61	i += k;
62	}
63	if (z) break;
64	if ((c = getc_unlocked(f)) == EOF) {
65	if (!i \|\| !feof(f)) {
66	FUNLOCK(f);
67	return -1;
68	}
69	break;
70	}
71	/* If the byte read by getc won't fit without growing the
72	* output buffer, push it back for next iteration. */
73	if (i+1 >= n) --f->rpos = c;
74	else if (((*s)[i++] = c) == delim) break;
75	}
76	(*s)[i] = 0;
77
78	FUNLOCK(f);
79
80	return i;
81	}
82
83	weak_alias(getdelim, __getdelim);

lib/libc/wasi/libc-top-half/musl/src/stdio/getline.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <stdio.h>
2
3	ssize_t getline(char *restrict s, size_t restrict n, FILE *restrict f)
4	{
5	return getdelim(s, n, '\n', f);
6	}

lib/libc/wasi/libc-top-half/musl/src/stdio/getw.c deleted-8

...	@@ -1,8 +0,0 @@
1	#define _GNU_SOURCE
2	#include <stdio.h>
3
4	int getw(FILE *f)
5	{
6	int x;
7	return fread(&x, sizeof x, 1, f) ? x : EOF;
8	}

lib/libc/wasi/libc-top-half/musl/src/stdio/getwc.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include "stdio_impl.h"
2	#include <wchar.h>
3
4	wint_t getwc(FILE *f)
5	{
6	return fgetwc(f);
7	}

lib/libc/wasi/libc-top-half/musl/src/stdio/getwchar.c deleted-9

...	@@ -1,9 +0,0 @@
1	#include "stdio_impl.h"
2	#include <wchar.h>
3
4	wint_t getwchar(void)
5	{
6	return fgetwc(stdin);
7	}
8
9	weak_alias(getwchar, getwchar_unlocked);

lib/libc/wasi/libc-top-half/musl/src/stdio/ofl_add.c deleted-11

...	@@ -1,11 +0,0 @@
1	#include "stdio_impl.h"
2
3	FILE __ofl_add(FILE f)
4	{
5	FILE **head = __ofl_lock();
6	f->next = *head;
7	if (head) (head)->prev = f;
8	*head = f;
9	__ofl_unlock();
10	return f;
11	}

lib/libc/wasi/libc-top-half/musl/src/stdio/perror.c deleted-30

...	@@ -1,30 +0,0 @@
1	#include <stdio.h>
2	#include <string.h>
3	#include <errno.h>
4	#include "stdio_impl.h"
5
6	void perror(const char *msg)
7	{
8	FILE *f = stderr;
9	char *errstr = strerror(errno);
10
11	FLOCK(f);
12
13	/* Save stderr's orientation and encoding rule, since perror is not
14	* permitted to change them. */
15	void *old_locale = f->locale;
16	int old_mode = f->mode;
17
18	if (msg && *msg) {
19	fwrite(msg, strlen(msg), 1, f);
20	fputc(':', f);
21	fputc(' ', f);
22	}
23	fwrite(errstr, strlen(errstr), 1, f);
24	fputc('\n', f);
25
26	f->mode = old_mode;
27	f->locale = old_locale;
28
29	FUNLOCK(f);
30	}

lib/libc/wasi/libc-top-half/musl/src/stdio/putc_unlocked.c deleted-9

...	@@ -1,9 +0,0 @@
1	#include "stdio_impl.h"
2
3	int (putc_unlocked)(int c, FILE *f)
4	{
5	return putc_unlocked(c, f);
6	}
7
8	weak_alias(putc_unlocked, fputc_unlocked);
9	weak_alias(putc_unlocked, _IO_putc_unlocked);

lib/libc/wasi/libc-top-half/musl/src/stdio/putchar_unlocked.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include "stdio_impl.h"
2
3	int putchar_unlocked(int c)
4	{
5	return putc_unlocked(c, stdout);
6	}

lib/libc/wasi/libc-top-half/musl/src/stdio/puts.c deleted-10

...	@@ -1,10 +0,0 @@
1	#include "stdio_impl.h"
2
3	int puts(const char *s)
4	{
5	int r;
6	FLOCK(stdout);
7	r = -(fputs(s, stdout) < 0 \|\| putc_unlocked('\n', stdout) < 0);
8	FUNLOCK(stdout);
9	return r;
10	}

lib/libc/wasi/libc-top-half/musl/src/stdio/putw.c deleted-7

...	@@ -1,7 +0,0 @@
1	#define _GNU_SOURCE
2	#include <stdio.h>
3
4	int putw(int x, FILE *f)
5	{
6	return (int)fwrite(&x, sizeof x, 1, f)-1;
7	}

lib/libc/wasi/libc-top-half/musl/src/stdio/putwc.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include "stdio_impl.h"
2	#include <wchar.h>
3
4	wint_t putwc(wchar_t c, FILE *f)
5	{
6	return fputwc(c, f);
7	}

lib/libc/wasi/libc-top-half/musl/src/stdio/putwchar.c deleted-9

...	@@ -1,9 +0,0 @@
1	#include "stdio_impl.h"
2	#include <wchar.h>
3
4	wint_t putwchar(wchar_t c)
5	{
6	return fputwc(c, stdout);
7	}
8
9	weak_alias(putwchar, putwchar_unlocked);

lib/libc/wasi/libc-top-half/musl/src/stdio/rewind.c deleted-9

...	@@ -1,9 +0,0 @@
1	#include "stdio_impl.h"
2
3	void rewind(FILE *f)
4	{
5	FLOCK(f);
6	__fseeko_unlocked(f, 0, SEEK_SET);
7	f->flags &= ~F_ERR;
8	FUNLOCK(f);
9	}

lib/libc/wasi/libc-top-half/musl/src/stdio/scanf.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <stdio.h>
2	#include <stdarg.h>
3
4	int scanf(const char *restrict fmt, ...)
5	{
6	int ret;
7	va_list ap;
8	va_start(ap, fmt);
9	ret = vscanf(fmt, ap);
10	va_end(ap);
11	return ret;
12	}
13
14	weak_alias(scanf,__isoc99_scanf);

lib/libc/wasi/libc-top-half/musl/src/stdio/setbuf.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <stdio.h>
2
3	void setbuf(FILE restrict f, char restrict buf)
4	{
5	setvbuf(f, buf, buf ? _IOFBF : _IONBF, BUFSIZ);
6	}

lib/libc/wasi/libc-top-half/musl/src/stdio/setbuffer.c deleted-7

...	@@ -1,7 +0,0 @@
1	#define _GNU_SOURCE
2	#include <stdio.h>
3
4	void setbuffer(FILE f, char buf, size_t size)
5	{
6	setvbuf(f, buf, buf ? _IOFBF : _IONBF, size);
7	}

lib/libc/wasi/libc-top-half/musl/src/stdio/setlinebuf.c deleted-7

...	@@ -1,7 +0,0 @@
1	#define _GNU_SOURCE
2	#include <stdio.h>
3
4	void setlinebuf(FILE *f)
5	{
6	setvbuf(f, 0, _IOLBF, 0);
7	}

lib/libc/wasi/libc-top-half/musl/src/stdio/setvbuf.c deleted-29

...	@@ -1,29 +0,0 @@
1	#include "stdio_impl.h"
2
3	/* The behavior of this function is undefined except when it is the first
4	* operation on the stream, so the presence or absence of locking is not
5	* observable in a program whose behavior is defined. Thus no locking is
6	* performed here. No allocation of buffers is performed, but a buffer
7	* provided by the caller is used as long as it is suitably sized. */
8
9	int setvbuf(FILE restrict f, char restrict buf, int type, size_t size)
10	{
11	f->lbf = EOF;
12
13	if (type == _IONBF) {
14	f->buf_size = 0;
15	} else if (type == _IOLBF \|\| type == _IOFBF) {
16	if (buf && size >= UNGET) {
17	f->buf = (void *)(buf + UNGET);
18	f->buf_size = size - UNGET;
19	}
20	if (type == _IOLBF && f->buf_size)
21	f->lbf = '\n';
22	} else {
23	return -1;
24	}
25
26	f->flags \|= F_SVB;
27
28	return 0;
29	}

lib/libc/wasi/libc-top-half/musl/src/stdio/snprintf.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <stdio.h>
2	#include <stdarg.h>
3
4	int snprintf(char restrict s, size_t n, const char restrict fmt, ...)
5	{
6	int ret;
7	va_list ap;
8	va_start(ap, fmt);
9	ret = vsnprintf(s, n, fmt, ap);
10	va_end(ap);
11	return ret;
12	}
13

lib/libc/wasi/libc-top-half/musl/src/stdio/sprintf.c deleted-12

...	@@ -1,12 +0,0 @@
1	#include <stdio.h>
2	#include <stdarg.h>
3
4	int sprintf(char restrict s, const char restrict fmt, ...)
5	{
6	int ret;
7	va_list ap;
8	va_start(ap, fmt);
9	ret = vsprintf(s, fmt, ap);
10	va_end(ap);
11	return ret;
12	}

lib/libc/wasi/libc-top-half/musl/src/stdio/sscanf.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <stdio.h>
2	#include <stdarg.h>
3
4	int sscanf(const char restrict s, const char restrict fmt, ...)
5	{
6	int ret;
7	va_list ap;
8	va_start(ap, fmt);
9	ret = vsscanf(s, fmt, ap);
10	va_end(ap);
11	return ret;
12	}
13
14	weak_alias(sscanf,__isoc99_sscanf);

lib/libc/wasi/libc-top-half/musl/src/stdio/swprintf.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <stdarg.h>
2	#include <wchar.h>
3
4	int swprintf(wchar_t restrict s, size_t n, const wchar_t restrict fmt, ...)
5	{
6	int ret;
7	va_list ap;
8	va_start(ap, fmt);
9	ret = vswprintf(s, n, fmt, ap);
10	va_end(ap);
11	return ret;
12	}
13

lib/libc/wasi/libc-top-half/musl/src/stdio/swscanf.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <stdarg.h>
2	#include <wchar.h>
3
4	int swscanf(const wchar_t restrict s, const wchar_t restrict fmt, ...)
5	{
6	int ret;
7	va_list ap;
8	va_start(ap, fmt);
9	ret = vswscanf(s, fmt, ap);
10	va_end(ap);
11	return ret;
12	}
13
14	weak_alias(swscanf,__isoc99_swscanf);

lib/libc/wasi/libc-top-half/musl/src/stdio/ungetwc.c deleted-35

...	@@ -1,35 +0,0 @@
1	#include "stdio_impl.h"
2	#include "locale_impl.h"
3	#include <wchar.h>
4	#include <limits.h>
5	#include <ctype.h>
6	#include <string.h>
7
8	wint_t ungetwc(wint_t c, FILE *f)
9	{
10	unsigned char mbc[MB_LEN_MAX];
11	int l;
12	locale_t ploc = &CURRENT_LOCALE, loc = ploc;
13
14	FLOCK(f);
15
16	if (f->mode <= 0) fwide(f, 1);
17	*ploc = f->locale;
18
19	if (!f->rpos) __toread(f);
20	if (!f->rpos \|\| c == WEOF \|\| (l = wcrtomb((void *)mbc, c, 0)) < 0 \|\|
21	f->rpos < f->buf - UNGET + l) {
22	FUNLOCK(f);
23	*ploc = loc;
24	return WEOF;
25	}
26
27	if (isascii(c)) *--f->rpos = c;
28	else memcpy(f->rpos -= l, mbc, l);
29
30	f->flags &= ~F_EOF;
31
32	FUNLOCK(f);
33	*ploc = loc;
34	return c;
35	}

lib/libc/wasi/libc-top-half/musl/src/stdio/vasprintf.c deleted-15

...	@@ -1,15 +0,0 @@
1	#define _GNU_SOURCE
2	#include <stdio.h>
3	#include <stdarg.h>
4	#include <stdlib.h>
5
6	int vasprintf(char *s, const char fmt, va_list ap)
7	{
8	va_list ap2;
9	va_copy(ap2, ap);
10	int l = vsnprintf(0, 0, fmt, ap2);
11	va_end(ap2);
12
13	if (l<0 \|\| !(*s=malloc(l+1U))) return -1;
14	return vsnprintf(*s, l+1U, fmt, ap);
15	}

lib/libc/wasi/libc-top-half/musl/src/stdio/vprintf.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <stdio.h>
2
3	int vprintf(const char *restrict fmt, va_list ap)
4	{
5	return vfprintf(stdout, fmt, ap);
6	}

lib/libc/wasi/libc-top-half/musl/src/stdio/vscanf.c deleted-9

...	@@ -1,9 +0,0 @@
1	#include <stdio.h>
2	#include <stdarg.h>
3
4	int vscanf(const char *restrict fmt, va_list ap)
5	{
6	return vfscanf(stdin, fmt, ap);
7	}
8
9	weak_alias(vscanf,__isoc99_vscanf);

lib/libc/wasi/libc-top-half/musl/src/stdio/vsprintf.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <stdio.h>
2	#include <limits.h>
3
4	int vsprintf(char restrict s, const char restrict fmt, va_list ap)
5	{
6	return vsnprintf(s, INT_MAX, fmt, ap);
7	}

lib/libc/wasi/libc-top-half/musl/src/stdio/vwprintf.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <stdio.h>
2	#include <wchar.h>
3
4	int vwprintf(const wchar_t *restrict fmt, va_list ap)
5	{
6	return vfwprintf(stdout, fmt, ap);
7	}

lib/libc/wasi/libc-top-half/musl/src/stdio/vwscanf.c deleted-10

...	@@ -1,10 +0,0 @@
1	#include <stdio.h>
2	#include <stdarg.h>
3	#include <wchar.h>
4
5	int vwscanf(const wchar_t *restrict fmt, va_list ap)
6	{
7	return vfwscanf(stdin, fmt, ap);
8	}
9
10	weak_alias(vwscanf,__isoc99_vwscanf);

lib/libc/wasi/libc-top-half/musl/src/stdio/wprintf.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <stdio.h>
2	#include <stdarg.h>
3	#include <wchar.h>
4
5	int wprintf(const wchar_t *restrict fmt, ...)
6	{
7	int ret;
8	va_list ap;
9	va_start(ap, fmt);
10	ret = vwprintf(fmt, ap);
11	va_end(ap);
12	return ret;
13	}

lib/libc/wasi/libc-top-half/musl/src/stdio/wscanf.c deleted-15

...	@@ -1,15 +0,0 @@
1	#include <stdio.h>
2	#include <stdarg.h>
3	#include <wchar.h>
4
5	int wscanf(const wchar_t *restrict fmt, ...)
6	{
7	int ret;
8	va_list ap;
9	va_start(ap, fmt);
10	ret = vwscanf(fmt, ap);
11	va_end(ap);
12	return ret;
13	}
14
15	weak_alias(wscanf,__isoc99_wscanf);

lib/libc/wasi/libc-top-half/musl/src/stdlib/abs.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <stdlib.h>
2
3	int abs(int a)
4	{
5	return a>0 ? a : -a;
6	}

lib/libc/wasi/libc-top-half/musl/src/stdlib/atof.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <stdlib.h>
2
3	double atof(const char *s)
4	{
5	return strtod(s, 0);
6	}

lib/libc/wasi/libc-top-half/musl/src/stdlib/atoi.c deleted-16

...	@@ -1,16 +0,0 @@
1	#include <stdlib.h>
2	#include <ctype.h>
3
4	int atoi(const char *s)
5	{
6	int n=0, neg=0;
7	while (isspace(*s)) s++;
8	switch (*s) {
9	case '-': neg=1;
10	case '+': s++;
11	}
12	/* Compute n as a negative number to avoid overflow on INT_MIN */
13	while (isdigit(*s))
14	n = 10n - (s++ - '0');
15	return neg ? n : -n;
16	}

lib/libc/wasi/libc-top-half/musl/src/stdlib/atol.c deleted-17

...	@@ -1,17 +0,0 @@
1	#include <stdlib.h>
2	#include <ctype.h>
3
4	long atol(const char *s)
5	{
6	long n=0;
7	int neg=0;
8	while (isspace(*s)) s++;
9	switch (*s) {
10	case '-': neg=1;
11	case '+': s++;
12	}
13	/* Compute n as a negative number to avoid overflow on LONG_MIN */
14	while (isdigit(*s))
15	n = 10n - (s++ - '0');
16	return neg ? n : -n;
17	}

lib/libc/wasi/libc-top-half/musl/src/stdlib/atoll.c deleted-17

...	@@ -1,17 +0,0 @@
1	#include <stdlib.h>
2	#include <ctype.h>
3
4	long long atoll(const char *s)
5	{
6	long long n=0;
7	int neg=0;
8	while (isspace(*s)) s++;
9	switch (*s) {
10	case '-': neg=1;
11	case '+': s++;
12	}
13	/* Compute n as a negative number to avoid overflow on LLONG_MIN */
14	while (isdigit(*s))
15	n = 10n - (s++ - '0');
16	return neg ? n : -n;
17	}

lib/libc/wasi/libc-top-half/musl/src/stdlib/bsearch.c deleted-20

...	@@ -1,20 +0,0 @@
1	#include <stdlib.h>
2
3	void bsearch(const void key, const void base, size_t nel, size_t width, int (cmp)(const void , const void ))
4	{
5	void *try;
6	int sign;
7	while (nel > 0) {
8	try = (char )base + width(nel/2);
9	sign = cmp(key, try);
10	if (sign < 0) {
11	nel /= 2;
12	} else if (sign > 0) {
13	base = (char *)try + width;
14	nel -= nel/2+1;
15	} else {
16	return try;
17	}
18	}
19	return NULL;
20	}

lib/libc/wasi/libc-top-half/musl/src/stdlib/div.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <stdlib.h>
2
3	div_t div(int num, int den)
4	{
5	return (div_t){ num/den, num%den };
6	}

lib/libc/wasi/libc-top-half/musl/src/stdlib/ecvt.c deleted-20

...	@@ -1,20 +0,0 @@
1	#define _GNU_SOURCE
2	#include <stdlib.h>
3	#include <stdio.h>
4
5	char ecvt(double x, int n, int dp, int *sign)
6	{
7	static char buf[16];
8	char tmp[32];
9	int i, j;
10
11	if (n-1U > 15) n = 15;
12	sprintf(tmp, "%.*e", n-1, x);
13	i = *sign = (tmp[0]=='-');
14	for (j=0; tmp[i]!='e'; j+=(tmp[i++]!='.'))
15	buf[j] = tmp[i];
16	buf[j] = 0;
17	*dp = atoi(tmp+i+1)+1;
18
19	return buf;
20	}

lib/libc/wasi/libc-top-half/musl/src/stdlib/fcvt.c deleted-25

...	@@ -1,25 +0,0 @@
1	#define _GNU_SOURCE
2	#include <stdlib.h>
3	#include <stdio.h>
4	#include <string.h>
5
6	char fcvt(double x, int n, int dp, int *sign)
7	{
8	char tmp[1500];
9	int i, lz;
10
11	if (n > 1400U) n = 1400;
12	sprintf(tmp, "%.*f", n, x);
13	i = (tmp[0] == '-');
14	if (tmp[i] == '0') lz = strspn(tmp+i+2, "0");
15	else lz = -(int)strcspn(tmp+i, ".");
16
17	if (n<=lz) {
18	*sign = i;
19	*dp = 1;
20	if (n>14U) n = 14;
21	return "000000000000000"+14-n;
22	}
23
24	return ecvt(x, n-lz, dp, sign);
25	}

lib/libc/wasi/libc-top-half/musl/src/stdlib/gcvt.c deleted-9

...	@@ -1,9 +0,0 @@
1	#define _GNU_SOURCE
2	#include <stdlib.h>
3	#include <stdio.h>
4
5	char gcvt(double x, int n, char b)
6	{
7	sprintf(b, "%.*g", n, x);
8	return b;
9	}

lib/libc/wasi/libc-top-half/musl/src/stdlib/imaxabs.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <inttypes.h>
2
3	intmax_t imaxabs(intmax_t a)
4	{
5	return a>0 ? a : -a;
6	}

lib/libc/wasi/libc-top-half/musl/src/stdlib/imaxdiv.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <inttypes.h>
2
3	imaxdiv_t imaxdiv(intmax_t num, intmax_t den)
4	{
5	return (imaxdiv_t){ num/den, num%den };
6	}

lib/libc/wasi/libc-top-half/musl/src/stdlib/labs.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <stdlib.h>
2
3	long labs(long a)
4	{
5	return a>0 ? a : -a;
6	}

lib/libc/wasi/libc-top-half/musl/src/stdlib/ldiv.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <stdlib.h>
2
3	ldiv_t ldiv(long num, long den)
4	{
5	return (ldiv_t){ num/den, num%den };
6	}

lib/libc/wasi/libc-top-half/musl/src/stdlib/llabs.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <stdlib.h>
2
3	long long llabs(long long a)
4	{
5	return a>0 ? a : -a;
6	}

lib/libc/wasi/libc-top-half/musl/src/stdlib/lldiv.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <stdlib.h>
2
3	lldiv_t lldiv(long long num, long long den)
4	{
5	return (lldiv_t){ num/den, num%den };
6	}

lib/libc/wasi/libc-top-half/musl/src/stdlib/qsort.c deleted-221

...	@@ -1,221 +0,0 @@
1	/* Copyright (C) 2011 by Valentin Ochs
2	*
3	* Permission is hereby granted, free of charge, to any person obtaining a copy
4	* of this software and associated documentation files (the "Software"), to
5	* deal in the Software without restriction, including without limitation the
6	* rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
7	* sell copies of the Software, and to permit persons to whom the Software is
8	* furnished to do so, subject to the following conditions:
9	*
10	* The above copyright notice and this permission notice shall be included in
11	* all copies or substantial portions of the Software.
12	*
13	* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
14	* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
15	* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
16	* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
17	* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
18	* FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
19	* IN THE SOFTWARE.
20	*/
21
22	/* Minor changes by Rich Felker for integration in musl, 2011-04-27. */
23
24	/* Smoothsort, an adaptive variant of Heapsort. Memory usage: O(1).
25	Run time: Worst case O(n log n), close to O(n) in the mostly-sorted case. */
26
27	#define _BSD_SOURCE
28	#include <stdint.h>
29	#include <stdlib.h>
30	#include <string.h>
31
32	#include "atomic.h"
33	#define ntz(x) a_ctz_l((x))
34
35	typedef int (cmpfun)(const void , const void , void );
36
37	static inline int pntz(size_t p[2]) {
38	int r = ntz(p[0] - 1);
39	if(r != 0 \|\| (r = 8sizeof(size_t) + ntz(p[1])) != 8sizeof(size_t)) {
40	return r;
41	}
42	return 0;
43	}
44
45	static void cycle(size_t width, unsigned char* ar[], int n)
46	{
47	unsigned char tmp[256];
48	size_t l;
49	int i;
50
51	if(n < 2) {
52	return;
53	}
54
55	ar[n] = tmp;
56	while(width) {
57	l = sizeof(tmp) < width ? sizeof(tmp) : width;
58	memcpy(ar[n], ar[0], l);
59	for(i = 0; i < n; i++) {
60	memcpy(ar[i], ar[i + 1], l);
61	ar[i] += l;
62	}
63	width -= l;
64	}
65	}
66
67	/* shl() and shr() need n > 0 */
68	static inline void shl(size_t p[2], int n)
69	{
70	if(n >= 8 * sizeof(size_t)) {
71	n -= 8 * sizeof(size_t);
72	p[1] = p[0];
73	p[0] = 0;
74	}
75	p[1] <<= n;
76	p[1] \|= p[0] >> (sizeof(size_t) * 8 - n);
77	p[0] <<= n;
78	}
79
80	static inline void shr(size_t p[2], int n)
81	{
82	if(n >= 8 * sizeof(size_t)) {
83	n -= 8 * sizeof(size_t);
84	p[0] = p[1];
85	p[1] = 0;
86	}
87	p[0] >>= n;
88	p[0] \|= p[1] << (sizeof(size_t) * 8 - n);
89	p[1] >>= n;
90	}
91
92	static void sift(unsigned char head, size_t width, cmpfun cmp, void arg, int pshift, size_t lp[])
93	{
94	unsigned char rt, lf;
95	unsigned char ar[14 sizeof(size_t) + 1];
96	int i = 1;
97
98	ar[0] = head;
99	while(pshift > 1) {
100	rt = head - width;
101	lf = head - width - lp[pshift - 2];
102
103	if(cmp(ar[0], lf, arg) >= 0 && cmp(ar[0], rt, arg) >= 0) {
104	break;
105	}
106	if(cmp(lf, rt, arg) >= 0) {
107	ar[i++] = lf;
108	head = lf;
109	pshift -= 1;
110	} else {
111	ar[i++] = rt;
112	head = rt;
113	pshift -= 2;
114	}
115	}
116	cycle(width, ar, i);
117	}
118
119	static void trinkle(unsigned char head, size_t width, cmpfun cmp, void arg, size_t pp[2], int pshift, int trusty, size_t lp[])
120	{
121	unsigned char *stepson,
122	rt, lf;
123	size_t p[2];
124	unsigned char ar[14 sizeof(size_t) + 1];
125	int i = 1;
126	int trail;
127
128	p[0] = pp[0];
129	p[1] = pp[1];
130
131	ar[0] = head;
132	while(p[0] != 1 \|\| p[1] != 0) {
133	stepson = head - lp[pshift];
134	if(cmp(stepson, ar[0], arg) <= 0) {
135	break;
136	}
137	if(!trusty && pshift > 1) {
138	rt = head - width;
139	lf = head - width - lp[pshift - 2];
140	if(cmp(rt, stepson, arg) >= 0 \|\| cmp(lf, stepson, arg) >= 0) {
141	break;
142	}
143	}
144
145	ar[i++] = stepson;
146	head = stepson;
147	trail = pntz(p);
148	shr(p, trail);
149	pshift += trail;
150	trusty = 0;
151	}
152	if(!trusty) {
153	cycle(width, ar, i);
154	sift(head, width, cmp, arg, pshift, lp);
155	}
156	}
157
158	void __qsort_r(void base, size_t nel, size_t width, cmpfun cmp, void arg)
159	{
160	size_t lp[12*sizeof(size_t)];
161	size_t i, size = width * nel;
162	unsigned char head, high;
163	size_t p[2] = {1, 0};
164	int pshift = 1;
165	int trail;
166
167	if (!size) return;
168
169	head = base;
170	high = head + size - width;
171
172	/* Precompute Leonardo numbers, scaled by element width */
173	for(lp[0]=lp[1]=width, i=2; (lp[i]=lp[i-2]+lp[i-1]+width) < size; i++);
174
175	while(head < high) {
176	if((p[0] & 3) == 3) {
177	sift(head, width, cmp, arg, pshift, lp);
178	shr(p, 2);
179	pshift += 2;
180	} else {
181	if(lp[pshift - 1] >= high - head) {
182	trinkle(head, width, cmp, arg, p, pshift, 0, lp);
183	} else {
184	sift(head, width, cmp, arg, pshift, lp);
185	}
186
187	if(pshift == 1) {
188	shl(p, 1);
189	pshift = 0;
190	} else {
191	shl(p, pshift - 1);
192	pshift = 1;
193	}
194	}
195
196	p[0] \|= 1;
197	head += width;
198	}
199
200	trinkle(head, width, cmp, arg, p, pshift, 0, lp);
201
202	while(pshift != 1 \|\| p[0] != 1 \|\| p[1] != 0) {
203	if(pshift <= 1) {
204	trail = pntz(p);
205	shr(p, trail);
206	pshift += trail;
207	} else {
208	shl(p, 2);
209	pshift -= 2;
210	p[0] ^= 7;
211	shr(p, 1);
212	trinkle(head - lp[pshift] - width, width, cmp, arg, p, pshift + 1, 1, lp);
213	shl(p, 1);
214	p[0] \|= 1;
215	trinkle(head - width, width, cmp, arg, p, pshift, 1, lp);
216	}
217	head -= width;
218	}
219	}
220
221	weak_alias(__qsort_r, qsort_r);

lib/libc/wasi/libc-top-half/musl/src/stdlib/qsort_nr.c deleted-14

...	@@ -1,14 +0,0 @@
1	#define _BSD_SOURCE
2	#include <stdlib.h>
3
4	typedef int (cmpfun)(const void , const void *);
5
6	static int wrapper_cmp(const void v1, const void v2, void *cmp)
7	{
8	return ((cmpfun)cmp)(v1, v2);
9	}
10
11	void qsort(void *base, size_t nel, size_t width, cmpfun cmp)
12	{
13	__qsort_r(base, nel, width, wrapper_cmp, cmp);
14	}

lib/libc/wasi/libc-top-half/musl/src/string/bcmp.c deleted-8

...	@@ -1,8 +0,0 @@
1	#define _BSD_SOURCE
2	#include <string.h>
3	#include <strings.h>
4
5	int bcmp(const void s1, const void s2, size_t n)
6	{
7	return memcmp(s1, s2, n);
8	}

lib/libc/wasi/libc-top-half/musl/src/string/bcopy.c deleted-8

...	@@ -1,8 +0,0 @@
1	#define _BSD_SOURCE
2	#include <string.h>
3	#include <strings.h>
4
5	void bcopy(const void s1, void s2, size_t n)
6	{
7	memmove(s2, s1, n);
8	}

lib/libc/wasi/libc-top-half/musl/src/string/bzero.c deleted-8

...	@@ -1,8 +0,0 @@
1	#define _BSD_SOURCE
2	#include <string.h>
3	#include <strings.h>
4
5	void bzero(void *s, size_t n)
6	{
7	memset(s, 0, n);
8	}

lib/libc/wasi/libc-top-half/musl/src/string/explicit_bzero.c deleted-8

...	@@ -1,8 +0,0 @@
1	#define _BSD_SOURCE
2	#include <string.h>
3
4	void explicit_bzero(void *d, size_t n)
5	{
6	d = memset(d, 0, n);
7	__asm__ __volatile__ ("" : : "r"(d) : "memory");
8	}

lib/libc/wasi/libc-top-half/musl/src/string/index.c deleted-8

...	@@ -1,8 +0,0 @@
1	#define _BSD_SOURCE
2	#include <string.h>
3	#include <strings.h>
4
5	char index(const char s, int c)
6	{
7	return strchr(s, c);
8	}

lib/libc/wasi/libc-top-half/musl/src/string/memccpy.c deleted-34

...	@@ -1,34 +0,0 @@
1	#include <string.h>
2	#include <stdint.h>
3	#include <limits.h>
4
5	#define ALIGN (sizeof(size_t)-1)
6	#define ONES ((size_t)-1/UCHAR_MAX)
7	#define HIGHS (ONES * (UCHAR_MAX/2+1))
8	#define HASZERO(x) ((x)-ONES & ~(x) & HIGHS)
9
10	void memccpy(void restrict dest, const void *restrict src, int c, size_t n)
11	{
12	unsigned char *d = dest;
13	const unsigned char *s = src;
14
15	c = (unsigned char)c;
16	#ifdef __GNUC__
17	typedef size_t __attribute__((__may_alias__)) word;
18	word *wd;
19	const word *ws;
20	if (((uintptr_t)s & ALIGN) == ((uintptr_t)d & ALIGN)) {
21	for (; ((uintptr_t)s & ALIGN) && n && (d=s)!=c; n--, s++, d++);
22	if ((uintptr_t)s & ALIGN) goto tail;
23	size_t k = ONES * c;
24	wd=(void )d; ws=(const void )s;
25	for (; n>=sizeof(size_t) && !HASZERO(*ws^k);
26	n-=sizeof(size_t), ws++, wd++) wd = ws;
27	d=(void )wd; s=(const void )ws;
28	}
29	#endif
30	for (; n && (d=s)!=c; n--, s++, d++);
31	tail:
32	if (n) return d+1;
33	return 0;
34	}

lib/libc/wasi/libc-top-half/musl/src/string/memchr.c deleted-27

...	@@ -1,27 +0,0 @@
1	#include <string.h>
2	#include <stdint.h>
3	#include <limits.h>
4
5	#define SS (sizeof(size_t))
6	#define ALIGN (sizeof(size_t)-1)
7	#define ONES ((size_t)-1/UCHAR_MAX)
8	#define HIGHS (ONES * (UCHAR_MAX/2+1))
9	#define HASZERO(x) ((x)-ONES & ~(x) & HIGHS)
10
11	void memchr(const void src, int c, size_t n)
12	{
13	const unsigned char *s = src;
14	c = (unsigned char)c;
15	#ifdef __GNUC__
16	for (; ((uintptr_t)s & ALIGN) && n && *s != c; s++, n--);
17	if (n && *s != c) {
18	typedef size_t __attribute__((__may_alias__)) word;
19	const word *w;
20	size_t k = ONES * c;
21	for (w = (const void )s; n>=SS && !HASZERO(w^k); w++, n-=SS);
22	s = (const void *)w;
23	}
24	#endif
25	for (; n && *s != c; s++, n--);
26	return n ? (void *)s : 0;
27	}

lib/libc/wasi/libc-top-half/musl/src/string/memcmp.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <string.h>
2
3	int memcmp(const void vl, const void vr, size_t n)
4	{
5	const unsigned char l=vl, r=vr;
6	for (; n && l == r; n--, l++, r++);
7	return n ? l-r : 0;
8	}

lib/libc/wasi/libc-top-half/musl/src/string/memmem.c deleted-149

...	@@ -1,149 +0,0 @@
1	#define _GNU_SOURCE
2	#include <string.h>
3	#include <stdint.h>
4
5	static char twobyte_memmem(const unsigned char h, size_t k, const unsigned char *n)
6	{
7	uint16_t nw = n[0]<<8 \| n[1], hw = h[0]<<8 \| h[1];
8	for (h+=2, k-=2; k; k--, hw = hw<<8 \| *h++)
9	if (hw == nw) return (char *)h-2;
10	return hw == nw ? (char *)h-2 : 0;
11	}
12
13	static char threebyte_memmem(const unsigned char h, size_t k, const unsigned char *n)
14	{
15	uint32_t nw = (uint32_t)n[0]<<24 \| n[1]<<16 \| n[2]<<8;
16	uint32_t hw = (uint32_t)h[0]<<24 \| h[1]<<16 \| h[2]<<8;
17	for (h+=3, k-=3; k; k--, hw = (hw\|*h++)<<8)
18	if (hw == nw) return (char *)h-3;
19	return hw == nw ? (char *)h-3 : 0;
20	}
21
22	static char fourbyte_memmem(const unsigned char h, size_t k, const unsigned char *n)
23	{
24	uint32_t nw = (uint32_t)n[0]<<24 \| n[1]<<16 \| n[2]<<8 \| n[3];
25	uint32_t hw = (uint32_t)h[0]<<24 \| h[1]<<16 \| h[2]<<8 \| h[3];
26	for (h+=4, k-=4; k; k--, hw = hw<<8 \| *h++)
27	if (hw == nw) return (char *)h-4;
28	return hw == nw ? (char *)h-4 : 0;
29	}
30
31	#define MAX(a,b) ((a)>(b)?(a):(b))
32	#define MIN(a,b) ((a)<(b)?(a):(b))
33
34	#define BITOP(a,b,op) \
35	((a)[(size_t)(b)/(8sizeof (a))] op (size_t)1<<((size_t)(b)%(8sizeof (a))))
36
37	static char twoway_memmem(const unsigned char h, const unsigned char z, const unsigned char n, size_t l)
38	{
39	size_t i, ip, jp, k, p, ms, p0, mem, mem0;
40	size_t byteset[32 / sizeof(size_t)] = { 0 };
41	size_t shift[256];
42
43	/* Computing length of needle and fill shift table */
44	for (i=0; i<l; i++)
45	BITOP(byteset, n[i], \|=), shift[n[i]] = i+1;
46
47	/* Compute maximal suffix */
48	ip = -1; jp = 0; k = p = 1;
49	while (jp+k<l) {
50	if (n[ip+k] == n[jp+k]) {
51	if (k == p) {
52	jp += p;
53	k = 1;
54	} else k++;
55	} else if (n[ip+k] > n[jp+k]) {
56	jp += k;
57	k = 1;
58	p = jp - ip;
59	} else {
60	ip = jp++;
61	k = p = 1;
62	}
63	}
64	ms = ip;
65	p0 = p;
66
67	/* And with the opposite comparison */
68	ip = -1; jp = 0; k = p = 1;
69	while (jp+k<l) {
70	if (n[ip+k] == n[jp+k]) {
71	if (k == p) {
72	jp += p;
73	k = 1;
74	} else k++;
75	} else if (n[ip+k] < n[jp+k]) {
76	jp += k;
77	k = 1;
78	p = jp - ip;
79	} else {
80	ip = jp++;
81	k = p = 1;
82	}
83	}
84	if (ip+1 > ms+1) ms = ip;
85	else p = p0;
86
87	/* Periodic needle? */
88	if (memcmp(n, n+p, ms+1)) {
89	mem0 = 0;
90	p = MAX(ms, l-ms-1) + 1;
91	} else mem0 = l-p;
92	mem = 0;
93
94	/* Search loop */
95	for (;;) {
96	/* If remainder of haystack is shorter than needle, done */
97	if (z-h < l) return 0;
98
99	/* Check last byte first; advance by shift on mismatch */
100	if (BITOP(byteset, h[l-1], &)) {
101	k = l-shift[h[l-1]];
102	if (k) {
103	if (k < mem) k = mem;
104	h += k;
105	mem = 0;
106	continue;
107	}
108	} else {
109	h += l;
110	mem = 0;
111	continue;
112	}
113
114	/* Compare right half */
115	for (k=MAX(ms+1,mem); k<l && n[k] == h[k]; k++);
116	if (k < l) {
117	h += k-ms;
118	mem = 0;
119	continue;
120	}
121	/* Compare left half */
122	for (k=ms+1; k>mem && n[k-1] == h[k-1]; k--);
123	if (k <= mem) return (char *)h;
124	h += p;
125	mem = mem0;
126	}
127	}
128
129	void memmem(const void h0, size_t k, const void *n0, size_t l)
130	{
131	const unsigned char h = h0, n = n0;
132
133	/* Return immediately on empty needle */
134	if (!l) return (void *)h;
135
136	/* Return immediately when needle is longer than haystack */
137	if (k<l) return 0;
138
139	/* Use faster algorithms for short needles */
140	h = memchr(h0, *n, k);
141	if (!h \|\| l==1) return (void *)h;
142	k -= h - (const unsigned char *)h0;
143	if (k<l) return 0;
144	if (l==2) return twobyte_memmem(h, k, n);
145	if (l==3) return threebyte_memmem(h, k, n);
146	if (l==4) return fourbyte_memmem(h, k, n);
147
148	return twoway_memmem(h, h+k, n, l);
149	}

lib/libc/wasi/libc-top-half/musl/src/string/mempcpy.c deleted-7

...	@@ -1,7 +0,0 @@
1	#define _GNU_SOURCE
2	#include <string.h>
3
4	void mempcpy(void dest, const void *src, size_t n)
5	{
6	return (char *)memcpy(dest, src, n) + n;
7	}

lib/libc/wasi/libc-top-half/musl/src/string/memrchr.c deleted-11

...	@@ -1,11 +0,0 @@
1	#include <string.h>
2
3	void __memrchr(const void m, int c, size_t n)
4	{
5	const unsigned char *s = m;
6	c = (unsigned char)c;
7	while (n--) if (s[n]==c) return (void *)(s+n);
8	return 0;
9	}
10
11	weak_alias(__memrchr, memrchr);

lib/libc/wasi/libc-top-half/musl/src/string/rindex.c deleted-8

...	@@ -1,8 +0,0 @@
1	#define _BSD_SOURCE
2	#include <string.h>
3	#include <strings.h>
4
5	char rindex(const char s, int c)
6	{
7	return strrchr(s, c);
8	}

lib/libc/wasi/libc-top-half/musl/src/string/stpcpy.c deleted-29

...	@@ -1,29 +0,0 @@
1	#include <string.h>
2	#include <stdint.h>
3	#include <limits.h>
4
5	#define ALIGN (sizeof(size_t))
6	#define ONES ((size_t)-1/UCHAR_MAX)
7	#define HIGHS (ONES * (UCHAR_MAX/2+1))
8	#define HASZERO(x) ((x)-ONES & ~(x) & HIGHS)
9
10	char __stpcpy(char restrict d, const char *restrict s)
11	{
12	#ifdef __GNUC__
13	typedef size_t __attribute__((__may_alias__)) word;
14	word *wd;
15	const word *ws;
16	if ((uintptr_t)s % ALIGN == (uintptr_t)d % ALIGN) {
17	for (; (uintptr_t)s % ALIGN; s++, d++)
18	if (!(d=s)) return d;
19	wd=(void )d; ws=(const void )s;
20	for (; !HASZERO(ws); wd++ = *ws++);
21	d=(void )wd; s=(const void )ws;
22	}
23	#endif
24	for (; (d=s); s++, d++);
25
26	return d;
27	}
28
29	weak_alias(__stpcpy, stpcpy);

lib/libc/wasi/libc-top-half/musl/src/string/stpncpy.c deleted-32

...	@@ -1,32 +0,0 @@
1	#include <string.h>
2	#include <stdint.h>
3	#include <limits.h>
4
5	#define ALIGN (sizeof(size_t)-1)
6	#define ONES ((size_t)-1/UCHAR_MAX)
7	#define HIGHS (ONES * (UCHAR_MAX/2+1))
8	#define HASZERO(x) ((x)-ONES & ~(x) & HIGHS)
9
10	char __stpncpy(char restrict d, const char *restrict s, size_t n)
11	{
12	#ifdef __GNUC__
13	typedef size_t __attribute__((__may_alias__)) word;
14	word *wd;
15	const word *ws;
16	if (((uintptr_t)s & ALIGN) == ((uintptr_t)d & ALIGN)) {
17	for (; ((uintptr_t)s & ALIGN) && n && (d=s); n--, s++, d++);
18	if (!n \|\| !*s) goto tail;
19	wd=(void )d; ws=(const void )s;
20	for (; n>=sizeof(size_t) && !HASZERO(*ws);
21	n-=sizeof(size_t), ws++, wd++) wd = ws;
22	d=(void )wd; s=(const void )ws;
23	}
24	#endif
25	for (; n && (d=s); n--, s++, d++);
26	tail:
27	memset(d, 0, n);
28	return d;
29	}
30
31	weak_alias(__stpncpy, stpncpy);
32

lib/libc/wasi/libc-top-half/musl/src/string/strcasecmp.c deleted-16

...	@@ -1,16 +0,0 @@
1	#include <strings.h>
2	#include <ctype.h>
3
4	int strcasecmp(const char _l, const char _r)
5	{
6	const unsigned char l=(void )_l, r=(void )_r;
7	for (; l && r && (l == r \|\| tolower(l) == tolower(r)); l++, r++);
8	return tolower(l) - tolower(r);
9	}
10
11	int __strcasecmp_l(const char l, const char r, locale_t loc)
12	{
13	return strcasecmp(l, r);
14	}
15
16	weak_alias(__strcasecmp_l, strcasecmp_l);

lib/libc/wasi/libc-top-half/musl/src/string/strcasestr.c deleted-9

...	@@ -1,9 +0,0 @@
1	#define _GNU_SOURCE
2	#include <string.h>
3
4	char strcasestr(const char h, const char *n)
5	{
6	size_t l = strlen(n);
7	for (; h; h++) if (!strncasecmp(h, n, l)) return (char )h;
8	return 0;
9	}

lib/libc/wasi/libc-top-half/musl/src/string/strcat.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <string.h>
2
3	char strcat(char restrict dest, const char *restrict src)
4	{
5	strcpy(dest + strlen(dest), src);
6	return dest;
7	}

lib/libc/wasi/libc-top-half/musl/src/string/strchr.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <string.h>
2
3	char strchr(const char s, int c)
4	{
5	char *r = __strchrnul(s, c);
6	return (unsigned char )r == (unsigned char)c ? r : 0;
7	}

lib/libc/wasi/libc-top-half/musl/src/string/strchrnul.c deleted-28

...	@@ -1,28 +0,0 @@
1	#include <string.h>
2	#include <stdint.h>
3	#include <limits.h>
4
5	#define ALIGN (sizeof(size_t))
6	#define ONES ((size_t)-1/UCHAR_MAX)
7	#define HIGHS (ONES * (UCHAR_MAX/2+1))
8	#define HASZERO(x) ((x)-ONES & ~(x) & HIGHS)
9
10	char __strchrnul(const char s, int c)
11	{
12	c = (unsigned char)c;
13	if (!c) return (char *)s + strlen(s);
14
15	#ifdef __GNUC__
16	typedef size_t __attribute__((__may_alias__)) word;
17	const word *w;
18	for (; (uintptr_t)s % ALIGN; s++)
19	if (!s \|\| (unsigned char )s == c) return (char )s;
20	size_t k = ONES * c;
21	for (w = (void )s; !HASZERO(w) && !HASZERO(*w^k); w++);
22	s = (void *)w;
23	#endif
24	for (; s && (unsigned char *)s != c; s++);
25	return (char *)s;
26	}
27
28	weak_alias(__strchrnul, strchrnul);

lib/libc/wasi/libc-top-half/musl/src/string/strcmp.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <string.h>
2
3	int strcmp(const char l, const char r)
4	{
5	for (; l==r && *l; l++, r++);
6	return (unsigned char )l - (unsigned char )r;
7	}

lib/libc/wasi/libc-top-half/musl/src/string/strcpy.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <string.h>
2
3	char strcpy(char restrict dest, const char *restrict src)
4	{
5	__stpcpy(dest, src);
6	return dest;
7	}

lib/libc/wasi/libc-top-half/musl/src/string/strcspn.c deleted-17

...	@@ -1,17 +0,0 @@
1	#include <string.h>
2
3	#define BITOP(a,b,op) \
4	((a)[(size_t)(b)/(8sizeof (a))] op (size_t)1<<((size_t)(b)%(8sizeof (a))))
5
6	size_t strcspn(const char s, const char c)
7	{
8	const char *a = s;
9	size_t byteset[32/sizeof(size_t)];
10
11	if (!c[0] \|\| !c[1]) return __strchrnul(s, *c)-a;
12
13	memset(byteset, 0, sizeof byteset);
14	for (; c && BITOP(byteset, (unsigned char *)c, \|=); c++);
15	for (; s && !BITOP(byteset, (unsigned char *)s, &); s++);
16	return s-a;
17	}

lib/libc/wasi/libc-top-half/musl/src/string/strdup.c deleted-10

...	@@ -1,10 +0,0 @@
1	#include <stdlib.h>
2	#include <string.h>
3
4	char strdup(const char s)
5	{
6	size_t l = strlen(s);
7	char *d = malloc(l+1);
8	if (!d) return NULL;
9	return memcpy(d, s, l+1);
10	}

lib/libc/wasi/libc-top-half/musl/src/string/strerror_r.c deleted-19

...	@@ -1,19 +0,0 @@
1	#include <string.h>
2	#include <errno.h>
3
4	int strerror_r(int err, char *buf, size_t buflen)
5	{
6	char *msg = strerror(err);
7	size_t l = strlen(msg);
8	if (l >= buflen) {
9	if (buflen) {
10	memcpy(buf, msg, buflen-1);
11	buf[buflen-1] = 0;
12	}
13	return ERANGE;
14	}
15	memcpy(buf, msg, l+1);
16	return 0;
17	}
18
19	weak_alias(strerror_r, __xpg_strerror_r);

lib/libc/wasi/libc-top-half/musl/src/string/strlcat.c deleted-9

...	@@ -1,9 +0,0 @@
1	#define _BSD_SOURCE
2	#include <string.h>
3
4	size_t strlcat(char d, const char s, size_t n)
5	{
6	size_t l = strnlen(d, n);
7	if (l == n) return l + strlen(s);
8	return l + strlcpy(d+l, s, n-l);
9	}

lib/libc/wasi/libc-top-half/musl/src/string/strlcpy.c deleted-34

...	@@ -1,34 +0,0 @@
1	#define _BSD_SOURCE
2	#include <string.h>
3	#include <stdint.h>
4	#include <limits.h>
5
6	#define ALIGN (sizeof(size_t)-1)
7	#define ONES ((size_t)-1/UCHAR_MAX)
8	#define HIGHS (ONES * (UCHAR_MAX/2+1))
9	#define HASZERO(x) ((x)-ONES & ~(x) & HIGHS)
10
11	size_t strlcpy(char d, const char s, size_t n)
12	{
13	char *d0 = d;
14	size_t *wd;
15
16	if (!n--) goto finish;
17	#ifdef __GNUC__
18	typedef size_t __attribute__((__may_alias__)) word;
19	const word *ws;
20	if (((uintptr_t)s & ALIGN) == ((uintptr_t)d & ALIGN)) {
21	for (; ((uintptr_t)s & ALIGN) && n && (d=s); n--, s++, d++);
22	if (n && *s) {
23	wd=(void )d; ws=(const void )s;
24	for (; n>=sizeof(size_t) && !HASZERO(*ws);
25	n-=sizeof(size_t), ws++, wd++) wd = ws;
26	d=(void )wd; s=(const void )ws;
27	}
28	}
29	#endif
30	for (; n && (d=s); n--, s++, d++);
31	*d = 0;
32	finish:
33	return d-d0 + strlen(s);
34	}

lib/libc/wasi/libc-top-half/musl/src/string/strlen.c deleted-22

...	@@ -1,22 +0,0 @@
1	#include <string.h>
2	#include <stdint.h>
3	#include <limits.h>
4
5	#define ALIGN (sizeof(size_t))
6	#define ONES ((size_t)-1/UCHAR_MAX)
7	#define HIGHS (ONES * (UCHAR_MAX/2+1))
8	#define HASZERO(x) ((x)-ONES & ~(x) & HIGHS)
9
10	size_t strlen(const char *s)
11	{
12	const char *a = s;
13	#ifdef __GNUC__
14	typedef size_t __attribute__((__may_alias__)) word;
15	const word *w;
16	for (; (uintptr_t)s % ALIGN; s++) if (!*s) return s-a;
17	for (w = (const void )s; !HASZERO(w); w++);
18	s = (const void *)w;
19	#endif
20	for (; *s; s++);
21	return s-a;
22	}

lib/libc/wasi/libc-top-half/musl/src/string/strncasecmp.c deleted-17

...	@@ -1,17 +0,0 @@
1	#include <strings.h>
2	#include <ctype.h>
3
4	int strncasecmp(const char _l, const char _r, size_t n)
5	{
6	const unsigned char l=(void )_l, r=(void )_r;
7	if (!n--) return 0;
8	for (; l && r && n && (l == r \|\| tolower(l) == tolower(r)); l++, r++, n--);
9	return tolower(l) - tolower(r);
10	}
11
12	int __strncasecmp_l(const char l, const char r, size_t n, locale_t loc)
13	{
14	return strncasecmp(l, r, n);
15	}
16
17	weak_alias(__strncasecmp_l, strncasecmp_l);

lib/libc/wasi/libc-top-half/musl/src/string/strncat.c deleted-10

...	@@ -1,10 +0,0 @@
1	#include <string.h>
2
3	char strncat(char restrict d, const char *restrict s, size_t n)
4	{
5	char *a = d;
6	d += strlen(d);
7	while (n && s) n--, d++ = *s++;
8	*d++ = 0;
9	return a;
10	}

lib/libc/wasi/libc-top-half/musl/src/string/strncmp.c deleted-9

...	@@ -1,9 +0,0 @@
1	#include <string.h>
2
3	int strncmp(const char _l, const char _r, size_t n)
4	{
5	const unsigned char l=(void )_l, r=(void )_r;
6	if (!n--) return 0;
7	for (; l && r && n && l == r ; l++, r++, n--);
8	return l - r;
9	}

lib/libc/wasi/libc-top-half/musl/src/string/strncpy.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <string.h>
2
3	char strncpy(char restrict d, const char *restrict s, size_t n)
4	{
5	__stpncpy(d, s, n);
6	return d;
7	}

lib/libc/wasi/libc-top-half/musl/src/string/strndup.c deleted-12

...	@@ -1,12 +0,0 @@
1	#include <stdlib.h>
2	#include <string.h>
3
4	char strndup(const char s, size_t n)
5	{
6	size_t l = strnlen(s, n);
7	char *d = malloc(l+1);
8	if (!d) return NULL;
9	memcpy(d, s, l);
10	d[l] = 0;
11	return d;
12	}

lib/libc/wasi/libc-top-half/musl/src/string/strnlen.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <string.h>
2
3	size_t strnlen(const char *s, size_t n)
4	{
5	const char *p = memchr(s, 0, n);
6	return p ? p-s : n;
7	}

lib/libc/wasi/libc-top-half/musl/src/string/strpbrk.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <string.h>
2
3	char strpbrk(const char s, const char *b)
4	{
5	s += strcspn(s, b);
6	return s ? (char )s : 0;
7	}

lib/libc/wasi/libc-top-half/musl/src/string/strrchr.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <string.h>
2
3	char strrchr(const char s, int c)
4	{
5	return __memrchr(s, c, strlen(s) + 1);
6	}

lib/libc/wasi/libc-top-half/musl/src/string/strsep.c deleted-13

...	@@ -1,13 +0,0 @@
1	#define _GNU_SOURCE
2	#include <string.h>
3
4	char strsep(char str, const char sep)
5	{
6	char s = str, *end;
7	if (!s) return NULL;
8	end = s + strcspn(s, sep);
9	if (end) end++ = 0;
10	else end = 0;
11	*str = end;
12	return s;
13	}

lib/libc/wasi/libc-top-half/musl/src/string/strsignal.c deleted-126

...	@@ -1,126 +0,0 @@
1	#include <signal.h>
2	#include <string.h>
3	#include "locale_impl.h"
4
5	#if (SIGHUP == 1) && (SIGINT == 2) && (SIGQUIT == 3) && (SIGILL == 4) \
6	&& (SIGTRAP == 5) && (SIGABRT == 6) && (SIGBUS == 7) && (SIGFPE == 8) \
7	&& (SIGKILL == 9) && (SIGUSR1 == 10) && (SIGSEGV == 11) && (SIGUSR2 == 12) \
8	&& (SIGPIPE == 13) && (SIGALRM == 14) && (SIGTERM == 15) && (SIGSTKFLT == 16) \
9	&& (SIGCHLD == 17) && (SIGCONT == 18) && (SIGSTOP == 19) && (SIGTSTP == 20) \
10	&& (SIGTTIN == 21) && (SIGTTOU == 22) && (SIGURG == 23) && (SIGXCPU == 24) \
11	&& (SIGXFSZ == 25) && (SIGVTALRM == 26) && (SIGPROF == 27) && (SIGWINCH == 28) \
12	&& (SIGPOLL == 29) && (SIGPWR == 30) && (SIGSYS == 31)
13
14	#define sigmap(x) x
15
16	#else
17
18	static const char map[] = {
19	[SIGHUP] = 1,
20	[SIGINT] = 2,
21	[SIGQUIT] = 3,
22	[SIGILL] = 4,
23	[SIGTRAP] = 5,
24	[SIGABRT] = 6,
25	[SIGBUS] = 7,
26	[SIGFPE] = 8,
27	[SIGKILL] = 9,
28	[SIGUSR1] = 10,
29	[SIGSEGV] = 11,
30	[SIGUSR2] = 12,
31	[SIGPIPE] = 13,
32	[SIGALRM] = 14,
33	[SIGTERM] = 15,
34	#if defined(SIGSTKFLT)
35	[SIGSTKFLT] = 16,
36	#elif defined(SIGEMT)
37	[SIGEMT] = 16,
38	#endif
39	[SIGCHLD] = 17,
40	[SIGCONT] = 18,
41	[SIGSTOP] = 19,
42	[SIGTSTP] = 20,
43	[SIGTTIN] = 21,
44	[SIGTTOU] = 22,
45	[SIGURG] = 23,
46	[SIGXCPU] = 24,
47	[SIGXFSZ] = 25,
48	[SIGVTALRM] = 26,
49	[SIGPROF] = 27,
50	[SIGWINCH] = 28,
51	[SIGPOLL] = 29,
52	[SIGPWR] = 30,
53	[SIGSYS] = 31
54	};
55
56	#define sigmap(x) ((x) >= sizeof map ? (x) : map[(x)])
57
58	#endif
59
60	static const char strings[] =
61	"Unknown signal\0"
62	"Hangup\0"
63	"Interrupt\0"
64	"Quit\0"
65	"Illegal instruction\0"
66	"Trace/breakpoint trap\0"
67	"Aborted\0"
68	"Bus error\0"
69	"Arithmetic exception\0"
70	"Killed\0"
71	"User defined signal 1\0"
72	"Segmentation fault\0"
73	"User defined signal 2\0"
74	"Broken pipe\0"
75	"Alarm clock\0"
76	"Terminated\0"
77	#if defined(SIGSTKFLT)
78	"Stack fault\0"
79	#elif defined(SIGEMT)
80	"Emulator trap\0"
81	#else
82	"Unknown signal\0"
83	#endif
84	"Child process status\0"
85	"Continued\0"
86	"Stopped (signal)\0"
87	"Stopped\0"
88	"Stopped (tty input)\0"
89	"Stopped (tty output)\0"
90	"Urgent I/O condition\0"
91	"CPU time limit exceeded\0"
92	"File size limit exceeded\0"
93	"Virtual timer expired\0"
94	"Profiling timer expired\0"
95	"Window changed\0"
96	"I/O possible\0"
97	"Power failure\0"
98	"Bad system call\0"
99	"RT32"
100	"\0RT33\0RT34\0RT35\0RT36\0RT37\0RT38\0RT39\0RT40"
101	"\0RT41\0RT42\0RT43\0RT44\0RT45\0RT46\0RT47\0RT48"
102	"\0RT49\0RT50\0RT51\0RT52\0RT53\0RT54\0RT55\0RT56"
103	"\0RT57\0RT58\0RT59\0RT60\0RT61\0RT62\0RT63\0RT64"
104	#if _NSIG > 65
105	"\0RT65\0RT66\0RT67\0RT68\0RT69\0RT70\0RT71\0RT72"
106	"\0RT73\0RT74\0RT75\0RT76\0RT77\0RT78\0RT79\0RT80"
107	"\0RT81\0RT82\0RT83\0RT84\0RT85\0RT86\0RT87\0RT88"
108	"\0RT89\0RT90\0RT91\0RT92\0RT93\0RT94\0RT95\0RT96"
109	"\0RT97\0RT98\0RT99\0RT100\0RT101\0RT102\0RT103\0RT104"
110	"\0RT105\0RT106\0RT107\0RT108\0RT109\0RT110\0RT111\0RT112"
111	"\0RT113\0RT114\0RT115\0RT116\0RT117\0RT118\0RT119\0RT120"
112	"\0RT121\0RT122\0RT123\0RT124\0RT125\0RT126\0RT127\0RT128"
113	#endif
114	"";
115
116	char *strsignal(int signum)
117	{
118	const char *s = strings;
119
120	signum = sigmap(signum);
121	if (signum - 1U >= _NSIG-1) signum = 0;
122
123	for (; signum--; s++) for (; *s; s++);
124
125	return (char *)LCTRANS_CUR(s);
126	}

lib/libc/wasi/libc-top-half/musl/src/string/strspn.c deleted-20

...	@@ -1,20 +0,0 @@
1	#include <string.h>
2
3	#define BITOP(a,b,op) \
4	((a)[(size_t)(b)/(8sizeof (a))] op (size_t)1<<((size_t)(b)%(8sizeof (a))))
5
6	size_t strspn(const char s, const char c)
7	{
8	const char *a = s;
9	size_t byteset[32/sizeof(size_t)] = { 0 };
10
11	if (!c[0]) return 0;
12	if (!c[1]) {
13	for (; s == c; s++);
14	return s-a;
15	}
16
17	for (; c && BITOP(byteset, (unsigned char *)c, \|=); c++);
18	for (; s && BITOP(byteset, (unsigned char *)s, &); s++);
19	return s-a;
20	}

lib/libc/wasi/libc-top-half/musl/src/string/strstr.c deleted-154

...	@@ -1,154 +0,0 @@
1	#include <string.h>
2	#include <stdint.h>
3
4	static char twobyte_strstr(const unsigned char h, const unsigned char *n)
5	{
6	uint16_t nw = n[0]<<8 \| n[1], hw = h[0]<<8 \| h[1];
7	for (h++; h && hw != nw; hw = hw<<8 \| ++h);
8	return h ? (char )h-1 : 0;
9	}
10
11	static char threebyte_strstr(const unsigned char h, const unsigned char *n)
12	{
13	uint32_t nw = (uint32_t)n[0]<<24 \| n[1]<<16 \| n[2]<<8;
14	uint32_t hw = (uint32_t)h[0]<<24 \| h[1]<<16 \| h[2]<<8;
15	for (h+=2; h && hw != nw; hw = (hw\|++h)<<8);
16	return h ? (char )h-2 : 0;
17	}
18
19	static char fourbyte_strstr(const unsigned char h, const unsigned char *n)
20	{
21	uint32_t nw = (uint32_t)n[0]<<24 \| n[1]<<16 \| n[2]<<8 \| n[3];
22	uint32_t hw = (uint32_t)h[0]<<24 \| h[1]<<16 \| h[2]<<8 \| h[3];
23	for (h+=3; h && hw != nw; hw = hw<<8 \| ++h);
24	return h ? (char )h-3 : 0;
25	}
26
27	#define MAX(a,b) ((a)>(b)?(a):(b))
28	#define MIN(a,b) ((a)<(b)?(a):(b))
29
30	#define BITOP(a,b,op) \
31	((a)[(size_t)(b)/(8sizeof (a))] op (size_t)1<<((size_t)(b)%(8sizeof (a))))
32
33	static char twoway_strstr(const unsigned char h, const unsigned char *n)
34	{
35	const unsigned char *z;
36	size_t l, ip, jp, k, p, ms, p0, mem, mem0;
37	size_t byteset[32 / sizeof(size_t)] = { 0 };
38	size_t shift[256];
39
40	/* Computing length of needle and fill shift table */
41	for (l=0; n[l] && h[l]; l++)
42	BITOP(byteset, n[l], \|=), shift[n[l]] = l+1;
43	if (n[l]) return 0; /* hit the end of h */
44
45	/* Compute maximal suffix */
46	ip = -1; jp = 0; k = p = 1;
47	while (jp+k<l) {
48	if (n[ip+k] == n[jp+k]) {
49	if (k == p) {
50	jp += p;
51	k = 1;
52	} else k++;
53	} else if (n[ip+k] > n[jp+k]) {
54	jp += k;
55	k = 1;
56	p = jp - ip;
57	} else {
58	ip = jp++;
59	k = p = 1;
60	}
61	}
62	ms = ip;
63	p0 = p;
64
65	/* And with the opposite comparison */
66	ip = -1; jp = 0; k = p = 1;
67	while (jp+k<l) {
68	if (n[ip+k] == n[jp+k]) {
69	if (k == p) {
70	jp += p;
71	k = 1;
72	} else k++;
73	} else if (n[ip+k] < n[jp+k]) {
74	jp += k;
75	k = 1;
76	p = jp - ip;
77	} else {
78	ip = jp++;
79	k = p = 1;
80	}
81	}
82	if (ip+1 > ms+1) ms = ip;
83	else p = p0;
84
85	/* Periodic needle? */
86	if (memcmp(n, n+p, ms+1)) {
87	mem0 = 0;
88	p = MAX(ms, l-ms-1) + 1;
89	} else mem0 = l-p;
90	mem = 0;
91
92	/* Initialize incremental end-of-haystack pointer */
93	z = h;
94
95	/* Search loop */
96	for (;;) {
97	/* Update incremental end-of-haystack pointer */
98	if (z-h < l) {
99	/* Fast estimate for MAX(l,63) */
100	size_t grow = l \| 63;
101	const unsigned char *z2 = memchr(z, 0, grow);
102	if (z2) {
103	z = z2;
104	if (z-h < l) return 0;
105	} else z += grow;
106	}
107
108	/* Check last byte first; advance by shift on mismatch */
109	if (BITOP(byteset, h[l-1], &)) {
110	k = l-shift[h[l-1]];
111	if (k) {
112	if (k < mem) k = mem;
113	h += k;
114	mem = 0;
115	continue;
116	}
117	} else {
118	h += l;
119	mem = 0;
120	continue;
121	}
122
123	/* Compare right half */
124	for (k=MAX(ms+1,mem); n[k] && n[k] == h[k]; k++);
125	if (n[k]) {
126	h += k-ms;
127	mem = 0;
128	continue;
129	}
130	/* Compare left half */
131	for (k=ms+1; k>mem && n[k-1] == h[k-1]; k--);
132	if (k <= mem) return (char *)h;
133	h += p;
134	mem = mem0;
135	}
136	}
137
138	char strstr(const char h, const char *n)
139	{
140	/* Return immediately on empty needle */
141	if (!n[0]) return (char *)h;
142
143	/* Use faster algorithms for short needles */
144	h = strchr(h, *n);
145	if (!h \|\| !n[1]) return (char *)h;
146	if (!h[1]) return 0;
147	if (!n[2]) return twobyte_strstr((void )h, (void )n);
148	if (!h[2]) return 0;
149	if (!n[3]) return threebyte_strstr((void )h, (void )n);
150	if (!h[3]) return 0;
151	if (!n[4]) return fourbyte_strstr((void )h, (void )n);
152
153	return twoway_strstr((void )h, (void )n);
154	}

lib/libc/wasi/libc-top-half/musl/src/string/strtok.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <string.h>
2
3	char strtok(char restrict s, const char *restrict sep)
4	{
5	static char *p;
6	if (!s && !(s = p)) return NULL;
7	s += strspn(s, sep);
8	if (!*s) return p = 0;
9	p = s + strcspn(s, sep);
10	if (p) p++ = 0;
11	else p = 0;
12	return s;
13	}

lib/libc/wasi/libc-top-half/musl/src/string/strtok_r.c deleted-12

...	@@ -1,12 +0,0 @@
1	#include <string.h>
2
3	char strtok_r(char restrict s, const char restrict sep, char *restrict p)
4	{
5	if (!s && !(s = *p)) return NULL;
6	s += strspn(s, sep);
7	if (!s) return p = 0;
8	*p = s + strcspn(s, sep);
9	if (*p) (*p)++ = 0;
10	else *p = 0;
11	return s;
12	}

lib/libc/wasi/libc-top-half/musl/src/string/strverscmp.c deleted-34

...	@@ -1,34 +0,0 @@
1	#define _GNU_SOURCE
2	#include <ctype.h>
3	#include <string.h>
4
5	int strverscmp(const char l0, const char r0)
6	{
7	const unsigned char l = (const void )l0;
8	const unsigned char r = (const void )r0;
9	size_t i, dp, j;
10	int z = 1;
11
12	/* Find maximal matching prefix and track its maximal digit
13	* suffix and whether those digits are all zeros. */
14	for (dp=i=0; l[i]==r[i]; i++) {
15	int c = l[i];
16	if (!c) return 0;
17	if (!isdigit(c)) dp=i+1, z=1;
18	else if (c!='0') z=0;
19	}
20
21	if (l[dp]!='0' && r[dp]!='0') {
22	/* If we're not looking at a digit sequence that began
23	* with a zero, longest digit string is greater. */
24	for (j=i; isdigit(l[j]); j++)
25	if (!isdigit(r[j])) return 1;
26	if (isdigit(r[j])) return -1;
27	} else if (z && dp<i && (isdigit(l[i]) \|\| isdigit(r[i]))) {
28	/* Otherwise, if common prefix of digit sequence is
29	* all zeros, digits order less than non-digits. */
30	return (unsigned char)(l[i]-'0') - (unsigned char)(r[i]-'0');
31	}
32
33	return l[i] - r[i];
34	}

lib/libc/wasi/libc-top-half/musl/src/string/swab.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <unistd.h>
2
3	void swab(const void restrict _src, void restrict _dest, ssize_t n)
4	{
5	const char *src = _src;
6	char *dest = _dest;
7	for (; n>1; n-=2) {
8	dest[0] = src[1];
9	dest[1] = src[0];
10	dest += 2;
11	src += 2;
12	}
13	}

lib/libc/wasi/libc-top-half/musl/src/string/wcpcpy.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <wchar.h>
2
3	wchar_t wcpcpy(wchar_t restrict d, const wchar_t *restrict s)
4	{
5	return wcscpy(d, s) + wcslen(s);
6	}

lib/libc/wasi/libc-top-half/musl/src/string/wcpncpy.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <wchar.h>
2
3	wchar_t wcpncpy(wchar_t restrict d, const wchar_t *restrict s, size_t n)
4	{
5	return wcsncpy(d, s, n) + wcsnlen(s, n);
6	}

lib/libc/wasi/libc-top-half/musl/src/string/wcscasecmp.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <wchar.h>
2	#include <wctype.h>
3
4	int wcscasecmp(const wchar_t l, const wchar_t r)
5	{
6	return wcsncasecmp(l, r, -1);
7	}

lib/libc/wasi/libc-top-half/musl/src/string/wcscasecmp_l.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <wchar.h>
2
3	int wcscasecmp_l(const wchar_t l, const wchar_t r, locale_t locale)
4	{
5	return wcscasecmp(l, r);
6	}

lib/libc/wasi/libc-top-half/musl/src/string/wcscat.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <wchar.h>
2
3	wchar_t wcscat(wchar_t restrict dest, const wchar_t *restrict src)
4	{
5	wcscpy(dest + wcslen(dest), src);
6	return dest;
7	}

lib/libc/wasi/libc-top-half/musl/src/string/wcschr.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <wchar.h>
2
3	wchar_t wcschr(const wchar_t s, wchar_t c)
4	{
5	if (!c) return (wchar_t *)s + wcslen(s);
6	for (; s && s != c; s++);
7	return s ? (wchar_t )s : 0;
8	}

lib/libc/wasi/libc-top-half/musl/src/string/wcscmp.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <wchar.h>
2
3	int wcscmp(const wchar_t l, const wchar_t r)
4	{
5	for (; l==r && l && r; l++, r++);
6	return l - r;
7	}

lib/libc/wasi/libc-top-half/musl/src/string/wcscpy.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <wchar.h>
2
3	wchar_t wcscpy(wchar_t restrict d, const wchar_t *restrict s)
4	{
5	wchar_t *a = d;
6	while ((d++ = s++));
7	return a;
8	}

lib/libc/wasi/libc-top-half/musl/src/string/wcscspn.c deleted-10

...	@@ -1,10 +0,0 @@
1	#include <wchar.h>
2
3	size_t wcscspn(const wchar_t s, const wchar_t c)
4	{
5	const wchar_t *a;
6	if (!c[0]) return wcslen(s);
7	if (!c[1]) return (s=wcschr(a=s, *c)) ? s-a : wcslen(a);
8	for (a=s; s && !wcschr(c, s); s++);
9	return s-a;
10	}

lib/libc/wasi/libc-top-half/musl/src/string/wcsdup.c deleted-10

...	@@ -1,10 +0,0 @@
1	#include <stdlib.h>
2	#include <wchar.h>
3
4	wchar_t wcsdup(const wchar_t s)
5	{
6	size_t l = wcslen(s);
7	wchar_t d = malloc((l+1)sizeof(wchar_t));
8	if (!d) return NULL;
9	return wmemcpy(d, s, l+1);
10	}

lib/libc/wasi/libc-top-half/musl/src/string/wcslen.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <wchar.h>
2
3	size_t wcslen(const wchar_t *s)
4	{
5	const wchar_t *a;
6	for (a=s; *s; s++);
7	return s-a;
8	}

lib/libc/wasi/libc-top-half/musl/src/string/wcsncasecmp.c deleted-9

...	@@ -1,9 +0,0 @@
1	#include <wchar.h>
2	#include <wctype.h>
3
4	int wcsncasecmp(const wchar_t l, const wchar_t r, size_t n)
5	{
6	if (!n--) return 0;
7	for (; l && r && n && (l == r \|\| towlower(l) == towlower(r)); l++, r++, n--);
8	return towlower(l) - towlower(r);
9	}

lib/libc/wasi/libc-top-half/musl/src/string/wcsncasecmp_l.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <wchar.h>
2
3	int wcsncasecmp_l(const wchar_t l, const wchar_t r, size_t n, locale_t locale)
4	{
5	return wcsncasecmp(l, r, n);
6	}

lib/libc/wasi/libc-top-half/musl/src/string/wcsncat.c deleted-10

...	@@ -1,10 +0,0 @@
1	#include <wchar.h>
2
3	wchar_t wcsncat(wchar_t restrict d, const wchar_t *restrict s, size_t n)
4	{
5	wchar_t *a = d;
6	d += wcslen(d);
7	while (n && s) n--, d++ = *s++;
8	*d++ = 0;
9	return a;
10	}

lib/libc/wasi/libc-top-half/musl/src/string/wcsncmp.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <wchar.h>
2
3	int wcsncmp(const wchar_t l, const wchar_t r, size_t n)
4	{
5	for (; n && l==r && l && r; n--, l++, r++);
6	return n ? l - r : 0;
7	}

lib/libc/wasi/libc-top-half/musl/src/string/wcsncpy.c deleted-9

...	@@ -1,9 +0,0 @@
1	#include <wchar.h>
2
3	wchar_t wcsncpy(wchar_t restrict d, const wchar_t *restrict s, size_t n)
4	{
5	wchar_t *a = d;
6	while (n && s) n--, d++ = *s++;
7	wmemset(d, 0, n);
8	return a;
9	}

lib/libc/wasi/libc-top-half/musl/src/string/wcsnlen.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <wchar.h>
2
3	size_t wcsnlen(const wchar_t *s, size_t n)
4	{
5	const wchar_t *z = wmemchr(s, 0, n);
6	if (z) n = z-s;
7	return n;
8	}

lib/libc/wasi/libc-top-half/musl/src/string/wcspbrk.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <wchar.h>
2
3	wchar_t wcspbrk(const wchar_t s, const wchar_t *b)
4	{
5	s += wcscspn(s, b);
6	return s ? (wchar_t )s : NULL;
7	}

lib/libc/wasi/libc-top-half/musl/src/string/wcsrchr.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <wchar.h>
2
3	wchar_t wcsrchr(const wchar_t s, wchar_t c)
4	{
5	const wchar_t *p;
6	for (p=s+wcslen(s); p>=s && *p!=c; p--);
7	return p>=s ? (wchar_t *)p : 0;
8	}

lib/libc/wasi/libc-top-half/musl/src/string/wcsspn.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <wchar.h>
2
3	size_t wcsspn(const wchar_t s, const wchar_t c)
4	{
5	const wchar_t *a;
6	for (a=s; s && wcschr(c, s); s++);
7	return s-a;
8	}

lib/libc/wasi/libc-top-half/musl/src/string/wcsstr.c deleted-105

...	@@ -1,105 +0,0 @@
1	#include <wchar.h>
2
3	#define MAX(a,b) ((a)>(b)?(a):(b))
4	#define MIN(a,b) ((a)<(b)?(a):(b))
5
6	static wchar_t twoway_wcsstr(const wchar_t h, const wchar_t *n)
7	{
8	const wchar_t *z;
9	size_t l, ip, jp, k, p, ms, p0, mem, mem0;
10
11	/* Computing length of needle */
12	for (l=0; n[l] && h[l]; l++);
13	if (n[l]) return 0; /* hit the end of h */
14
15	/* Compute maximal suffix */
16	ip = -1; jp = 0; k = p = 1;
17	while (jp+k<l) {
18	if (n[ip+k] == n[jp+k]) {
19	if (k == p) {
20	jp += p;
21	k = 1;
22	} else k++;
23	} else if (n[ip+k] > n[jp+k]) {
24	jp += k;
25	k = 1;
26	p = jp - ip;
27	} else {
28	ip = jp++;
29	k = p = 1;
30	}
31	}
32	ms = ip;
33	p0 = p;
34
35	/* And with the opposite comparison */
36	ip = -1; jp = 0; k = p = 1;
37	while (jp+k<l) {
38	if (n[ip+k] == n[jp+k]) {
39	if (k == p) {
40	jp += p;
41	k = 1;
42	} else k++;
43	} else if (n[ip+k] < n[jp+k]) {
44	jp += k;
45	k = 1;
46	p = jp - ip;
47	} else {
48	ip = jp++;
49	k = p = 1;
50	}
51	}
52	if (ip+1 > ms+1) ms = ip;
53	else p = p0;
54
55	/* Periodic needle? */
56	if (wmemcmp(n, n+p, ms+1)) {
57	mem0 = 0;
58	p = MAX(ms, l-ms-1) + 1;
59	} else mem0 = l-p;
60	mem = 0;
61
62	/* Initialize incremental end-of-haystack pointer */
63	z = h;
64
65	/* Search loop */
66	for (;;) {
67	/* Update incremental end-of-haystack pointer */
68	if (z-h < l) {
69	/* Fast estimate for MIN(l,63) */
70	size_t grow = l \| 63;
71	const wchar_t *z2 = wmemchr(z, 0, grow);
72	if (z2) {
73	z = z2;
74	if (z-h < l) return 0;
75	} else z += grow;
76	}
77
78	/* Compare right half */
79	for (k=MAX(ms+1,mem); n[k] && n[k] == h[k]; k++);
80	if (n[k]) {
81	h += k-ms;
82	mem = 0;
83	continue;
84	}
85	/* Compare left half */
86	for (k=ms+1; k>mem && n[k-1] == h[k-1]; k--);
87	if (k <= mem) return (wchar_t *)h;
88	h += p;
89	mem = mem0;
90	}
91	}
92
93	wchar_t wcsstr(const wchar_t restrict h, const wchar_t *restrict n)
94	{
95	/* Return immediately on empty needle or haystack */
96	if (!n[0]) return (wchar_t *)h;
97	if (!h[0]) return 0;
98
99	/* Use faster algorithms for short needles */
100	h = wcschr(h, *n);
101	if (!h \|\| !n[1]) return (wchar_t *)h;
102	if (!h[1]) return 0;
103
104	return twoway_wcsstr(h, n);
105	}

lib/libc/wasi/libc-top-half/musl/src/string/wcstok.c deleted-12

...	@@ -1,12 +0,0 @@
1	#include <wchar.h>
2
3	wchar_t wcstok(wchar_t restrict s, const wchar_t restrict sep, wchar_t *restrict p)
4	{
5	if (!s && !(s = *p)) return NULL;
6	s += wcsspn(s, sep);
7	if (!s) return p = 0;
8	*p = s + wcscspn(s, sep);
9	if (*p) (*p)++ = 0;
10	else *p = 0;
11	return s;
12	}

lib/libc/wasi/libc-top-half/musl/src/string/wcswcs.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <wchar.h>
2
3	wchar_t wcswcs(const wchar_t haystack, const wchar_t *needle)
4	{
5	return wcsstr(haystack, needle);
6	}

lib/libc/wasi/libc-top-half/musl/src/string/wmemchr.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <wchar.h>
2
3	wchar_t wmemchr(const wchar_t s, wchar_t c, size_t n)
4	{
5	for (; n && *s != c; n--, s++);
6	return n ? (wchar_t *)s : 0;
7	}

lib/libc/wasi/libc-top-half/musl/src/string/wmemcmp.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <wchar.h>
2
3	int wmemcmp(const wchar_t l, const wchar_t r, size_t n)
4	{
5	for (; n && l==r; n--, l++, r++);
6	return n ? l-r : 0;
7	}

lib/libc/wasi/libc-top-half/musl/src/string/wmemcpy.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <wchar.h>
2
3	wchar_t wmemcpy(wchar_t restrict d, const wchar_t *restrict s, size_t n)
4	{
5	wchar_t *a = d;
6	while (n--) d++ = s++;
7	return a;
8	}

lib/libc/wasi/libc-top-half/musl/src/string/wmemmove.c deleted-13

...	@@ -1,13 +0,0 @@
1	#include <wchar.h>
2	#include <stdint.h>
3
4	wchar_t wmemmove(wchar_t d, const wchar_t *s, size_t n)
5	{
6	wchar_t *d0 = d;
7	if (d == s) return d;
8	if ((uintptr_t)d-(uintptr_t)s < n * sizeof *d)
9	while (n--) d[n] = s[n];
10	else
11	while (n--) d++ = s++;
12	return d0;
13	}

lib/libc/wasi/libc-top-half/musl/src/string/wmemset.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <wchar.h>
2
3	wchar_t wmemset(wchar_t d, wchar_t c, size_t n)
4	{
5	wchar_t *ret = d;
6	while (n--) *d++ = c;
7	return ret;
8	}

lib/libc/wasi/libc-top-half/musl/src/thread/thrd_sleep.c deleted-14

...	@@ -1,14 +0,0 @@
1	#include <threads.h>
2	#include <time.h>
3	#include <errno.h>
4	#include "syscall.h"
5
6	int thrd_sleep(const struct timespec req, struct timespec rem)
7	{
8	int ret = -__clock_nanosleep(CLOCK_REALTIME, 0, req, rem);
9	switch (ret) {
10	case 0: return 0;
11	case -EINTR: return -1; /* value specified by C11 */
12	default: return -2;
13	}
14	}

lib/libc/wasi/libc-top-half/musl/src/time/__month_to_secs.c deleted-10

...	@@ -1,10 +0,0 @@
1	int __month_to_secs(int month, int is_leap)
2	{
3	static const int secs_through_month[] = {
4	0, 3186400, 5986400, 90*86400,
5	12086400, 15186400, 18186400, 21286400,
6	24386400, 27386400, 30486400, 33486400 };
7	int t = secs_through_month[month];
8	if (is_leap && month >= 2) t+=86400;
9	return t;
10	}

lib/libc/wasi/libc-top-half/musl/src/time/__year_to_secs.c deleted-47

...	@@ -1,47 +0,0 @@
1	long long __year_to_secs(long long year, int *is_leap)
2	{
3	if (year-2ULL <= 136) {
4	int y = year;
5	int leaps = (y-68)>>2;
6	if (!((y-68)&3)) {
7	leaps--;
8	if (is_leap) *is_leap = 1;
9	} else if (is_leap) *is_leap = 0;
10	return 31536000(y-70) + 86400leaps;
11	}
12
13	int cycles, centuries, leaps, rem;
14
15	if (!is_leap) is_leap = &(int){0};
16	cycles = (year-100) / 400;
17	rem = (year-100) % 400;
18	if (rem < 0) {
19	cycles--;
20	rem += 400;
21	}
22	if (!rem) {
23	*is_leap = 1;
24	centuries = 0;
25	leaps = 0;
26	} else {
27	if (rem >= 200) {
28	if (rem >= 300) centuries = 3, rem -= 300;
29	else centuries = 2, rem -= 200;
30	} else {
31	if (rem >= 100) centuries = 1, rem -= 100;
32	else centuries = 0;
33	}
34	if (!rem) {
35	*is_leap = 0;
36	leaps = 0;
37	} else {
38	leaps = rem / 4U;
39	rem %= 4U;
40	*is_leap = !rem;
41	}
42	}
43
44	leaps += 97cycles + 24centuries - *is_leap;
45
46	return (year-100) * 31536000LL + leaps * 86400LL + 946684800 + 86400;
47	}

lib/libc/wasi/libc-top-half/musl/src/time/asctime.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <time.h>
2
3	char asctime(const struct tm tm)
4	{
5	static char buf[26];
6	return __asctime_r(tm, buf);
7	}

lib/libc/wasi/libc-top-half/musl/src/time/asctime_r.c deleted-28

...	@@ -1,28 +0,0 @@
1	#include <time.h>
2	#include <stdio.h>
3	#include <langinfo.h>
4	#include "locale_impl.h"
5	#include "atomic.h"
6
7	char __asctime_r(const struct tm restrict tm, char *restrict buf)
8	{
9	if (snprintf(buf, 26, "%.3s %.3s%3d %.2d:%.2d:%.2d %d\n",
10	__nl_langinfo_l(ABDAY_1+tm->tm_wday, C_LOCALE),
11	__nl_langinfo_l(ABMON_1+tm->tm_mon, C_LOCALE),
12	tm->tm_mday, tm->tm_hour,
13	tm->tm_min, tm->tm_sec,
14	1900 + tm->tm_year) >= 26)
15	{
16	/* ISO C requires us to use the above format string,
17	* even if it will not fit in the buffer. Thus asctime_r
18	* is _supposed_ to crash if the fields in tm are too large.
19	* We follow this behavior and crash "gracefully" to warn
20	* application developers that they may not be so lucky
21	* on other implementations (e.g. stack smashing..).
22	*/
23	a_crash();
24	}
25	return buf;
26	}
27
28	weak_alias(__asctime_r, asctime_r);

lib/libc/wasi/libc-top-half/musl/src/time/ctime.c deleted-8

...	@@ -1,8 +0,0 @@
1	#include <time.h>
2
3	char ctime(const time_t t)
4	{
5	struct tm *tm = localtime(t);
6	if (!tm) return 0;
7	return asctime(tm);
8	}

lib/libc/wasi/libc-top-half/musl/src/time/ctime_r.c deleted-7

...	@@ -1,7 +0,0 @@
1	#include <time.h>
2
3	char ctime_r(const time_t t, char *buf)
4	{
5	struct tm tm, *tm_p = localtime_r(t, &tm);
6	return tm_p ? asctime_r(tm_p, buf) : 0;
7	}

lib/libc/wasi/libc-top-half/musl/src/time/difftime.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <time.h>
2
3	double difftime(time_t t1, time_t t0)
4	{
5	return t1-t0;
6	}

lib/libc/wasi/libc-top-half/musl/src/time/ftime.c deleted-12

...	@@ -1,12 +0,0 @@
1	#include <sys/timeb.h>
2	#include <time.h>
3
4	int ftime(struct timeb *tp)
5	{
6	struct timespec ts;
7	clock_gettime(CLOCK_REALTIME, &ts);
8	tp->time = ts.tv_sec;
9	tp->millitm = ts.tv_nsec / 1000000;
10	tp->timezone = tp->dstflag = 0;
11	return 0;
12	}

lib/libc/wasi/libc-top-half/musl/src/time/strptime.c deleted-206

...	@@ -1,206 +0,0 @@
1	#include <stdlib.h>
2	#include <langinfo.h>
3	#include <time.h>
4	#include <ctype.h>
5	#include <stddef.h>
6	#include <string.h>
7	#include <strings.h>
8
9	char strptime(const char restrict s, const char restrict f, struct tm restrict tm)
10	{
11	int i, w, neg, adj, min, range, *dest, dummy;
12	const char *ex;
13	size_t len;
14	int want_century = 0, century = 0, relyear = 0;
15	while (*f) {
16	if (*f != '%') {
17	if (isspace(f)) for (; s && isspace(*s); s++);
18	else if (s != f) return 0;
19	else s++;
20	f++;
21	continue;
22	}
23	f++;
24	if (*f == '+') f++;
25	if (isdigit(*f)) {
26	char *new_f;
27	w=strtoul(f, &new_f, 10);
28	f = new_f;
29	} else {
30	w=-1;
31	}
32	adj=0;
33	switch (*f++) {
34	case 'a': case 'A':
35	dest = &tm->tm_wday;
36	min = ABDAY_1;
37	range = 7;
38	goto symbolic_range;
39	case 'b': case 'B': case 'h':
40	dest = &tm->tm_mon;
41	min = ABMON_1;
42	range = 12;
43	goto symbolic_range;
44	case 'c':
45	s = strptime(s, nl_langinfo(D_T_FMT), tm);
46	if (!s) return 0;
47	break;
48	case 'C':
49	dest = &century;
50	if (w<0) w=2;
51	want_century \|= 2;
52	goto numeric_digits;
53	case 'd': case 'e':
54	dest = &tm->tm_mday;
55	min = 1;
56	range = 31;
57	goto numeric_range;
58	case 'D':
59	s = strptime(s, "%m/%d/%y", tm);
60	if (!s) return 0;
61	break;
62	case 'H':
63	dest = &tm->tm_hour;
64	min = 0;
65	range = 24;
66	goto numeric_range;
67	case 'I':
68	dest = &tm->tm_hour;
69	min = 1;
70	range = 12;
71	goto numeric_range;
72	case 'j':
73	dest = &tm->tm_yday;
74	min = 1;
75	range = 366;
76	adj = 1;
77	goto numeric_range;
78	case 'm':
79	dest = &tm->tm_mon;
80	min = 1;
81	range = 12;
82	adj = 1;
83	goto numeric_range;
84	case 'M':
85	dest = &tm->tm_min;
86	min = 0;
87	range = 60;
88	goto numeric_range;
89	case 'n': case 't':
90	for (; s && isspace(s); s++);
91	break;
92	case 'p':
93	ex = nl_langinfo(AM_STR);
94	len = strlen(ex);
95	if (!strncasecmp(s, ex, len)) {
96	tm->tm_hour %= 12;
97	s += len;
98	break;
99	}
100	ex = nl_langinfo(PM_STR);
101	len = strlen(ex);
102	if (!strncasecmp(s, ex, len)) {
103	tm->tm_hour %= 12;
104	tm->tm_hour += 12;
105	s += len;
106	break;
107	}
108	return 0;
109	case 'r':
110	s = strptime(s, nl_langinfo(T_FMT_AMPM), tm);
111	if (!s) return 0;
112	break;
113	case 'R':
114	s = strptime(s, "%H:%M", tm);
115	if (!s) return 0;
116	break;
117	case 'S':
118	dest = &tm->tm_sec;
119	min = 0;
120	range = 61;
121	goto numeric_range;
122	case 'T':
123	s = strptime(s, "%H:%M:%S", tm);
124	if (!s) return 0;
125	break;
126	case 'U':
127	case 'W':
128	/* Throw away result, for now. (FIXME?) */
129	dest = &dummy;
130	min = 0;
131	range = 54;
132	goto numeric_range;
133	case 'w':
134	dest = &tm->tm_wday;
135	min = 0;
136	range = 7;
137	goto numeric_range;
138	case 'x':
139	s = strptime(s, nl_langinfo(D_FMT), tm);
140	if (!s) return 0;
141	break;
142	case 'X':
143	s = strptime(s, nl_langinfo(T_FMT), tm);
144	if (!s) return 0;
145	break;
146	case 'y':
147	dest = &relyear;
148	w = 2;
149	want_century \|= 1;
150	goto numeric_digits;
151	case 'Y':
152	dest = &tm->tm_year;
153	if (w<0) w=4;
154	adj = 1900;
155	want_century = 0;
156	goto numeric_digits;
157	case '%':
158	if (*s++ != '%') return 0;
159	break;
160	default:
161	return 0;
162	numeric_range:
163	if (!isdigit(*s)) return 0;
164	*dest = 0;
165	for (i=1; i<=min+range && isdigit(s); i=10)
166	dest = dest * 10 + *s++ - '0';
167	if (*dest - min >= (unsigned)range) return 0;
168	*dest -= adj;
169	switch((char )dest - (char )tm) {
170	case offsetof(struct tm, tm_yday):
171	;
172	}
173	goto update;
174	numeric_digits:
175	neg = 0;
176	if (*s == '+') s++;
177	else if (*s == '-') neg=1, s++;
178	if (!isdigit(*s)) return 0;
179	for (dest=i=0; i<w && isdigit(s); i++)
180	dest = dest * 10 + *s++ - '0';
181	if (neg) dest = -dest;
182	*dest -= adj;
183	goto update;
184	symbolic_range:
185	for (i=2*range-1; i>=0; i--) {
186	ex = nl_langinfo(min+i);
187	len = strlen(ex);
188	if (strncasecmp(s, ex, len)) continue;
189	s += len;
190	*dest = i % range;
191	break;
192	}
193	if (i<0) return 0;
194	goto update;
195	update:
196	//FIXME
197	;
198	}
199	}
200	if (want_century) {
201	tm->tm_year = relyear;
202	if (want_century & 2) tm->tm_year += century * 100 - 1900;
203	else if (tm->tm_year <= 68) tm->tm_year += 100;
204	}
205	return (char *)s;
206	}

lib/libc/wasi/libc-top-half/musl/src/time/timespec_get.c deleted-10

...	@@ -1,10 +0,0 @@
1	#include <time.h>
2
3	/* There is no other implemented value than TIME_UTC; all other values
4	* are considered erroneous. */
5	int timespec_get(struct timespec * ts, int base)
6	{
7	if (base != TIME_UTC) return 0;
8	int ret = __clock_gettime(CLOCK_REALTIME, ts);
9	return ret < 0 ? 0 : base;
10	}

lib/libc/wasi/libc-top-half/musl/src/unistd/posix_close.c deleted-6

...	@@ -1,6 +0,0 @@
1	#include <unistd.h>
2
3	int posix_close(int fd, int flags)
4	{
5	return close(fd);
6	}

src/wasi_libc.zig+650-615

...	@@ -318,6 +318,9 @@ fn addCCArgs(	...	@@ -318,6 +318,9 @@ fn addCCArgs(
318	"-iwithsysroot",	318	"-iwithsysroot",
319	try comp.zig_lib_directory.join(arena, &[_][]const u8{ "libc", "include", triple }),	319	try comp.zig_lib_directory.join(arena, &[_][]const u8{ "libc", "include", triple }),
320		320
		321	"-iwithsysroot",
		322	try comp.zig_lib_directory.join(arena, &[_][]const u8{ "libc", "include", "generic-musl" }),
		323
321	"-DBULK_MEMORY_THRESHOLD=32",	324	"-DBULK_MEMORY_THRESHOLD=32",
322	});	325	});
323		326
...	@@ -370,6 +373,14 @@ fn addLibcBottomHalfIncludes(	...	@@ -370,6 +373,14 @@ fn addLibcBottomHalfIncludes(
370	"include",	373	"include",
371	}),	374	}),
372		375
		376	"-I",
		377	try comp.zig_lib_directory.join(arena, &[_][]const u8{
		378	"libc",
		379	"musl",
		380	"src",
		381	"include",
		382	}),
		383
373	"-I",	384	"-I",
374	try comp.zig_lib_directory.join(arena, &[_][]const u8{	385	try comp.zig_lib_directory.join(arena, &[_][]const u8{
375	"libc",	386	"libc",
...	@@ -379,6 +390,14 @@ fn addLibcBottomHalfIncludes(	...	@@ -379,6 +390,14 @@ fn addLibcBottomHalfIncludes(
379	"src",	390	"src",
380	"internal",	391	"internal",
381	}),	392	}),
		393
		394	"-I",
		395	try comp.zig_lib_directory.join(arena, &[_][]const u8{
		396	"libc",
		397	"musl",
		398	"src",
		399	"internal",
		400	}),
382	});	401	});
383	}	402	}
384		403
...	@@ -398,6 +417,14 @@ fn addLibcTopHalfIncludes(	...	@@ -398,6 +417,14 @@ fn addLibcTopHalfIncludes(
398	"include",	417	"include",
399	}),	418	}),
400		419
		420	"-I",
		421	try comp.zig_lib_directory.join(arena, &[_][]const u8{
		422	"libc",
		423	"musl",
		424	"src",
		425	"include",
		426	}),
		427
401	"-I",	428	"-I",
402	try comp.zig_lib_directory.join(arena, &[_][]const u8{	429	try comp.zig_lib_directory.join(arena, &[_][]const u8{
403	"libc",	430	"libc",
...	@@ -408,6 +435,14 @@ fn addLibcTopHalfIncludes(	...	@@ -408,6 +435,14 @@ fn addLibcTopHalfIncludes(
408	"internal",	435	"internal",
409	}),	436	}),
410		437
		438	"-I",
		439	try comp.zig_lib_directory.join(arena, &[_][]const u8{
		440	"libc",
		441	"musl",
		442	"src",
		443	"internal",
		444	}),
		445
411	"-I",	446	"-I",
412	try comp.zig_lib_directory.join(arena, &[_][]const u8{	447	try comp.zig_lib_directory.join(arena, &[_][]const u8{
413	"libc",	448	"libc",
...	@@ -421,8 +456,6 @@ fn addLibcTopHalfIncludes(	...	@@ -421,8 +456,6 @@ fn addLibcTopHalfIncludes(
421	"-I",	456	"-I",
422	try comp.zig_lib_directory.join(arena, &[_][]const u8{	457	try comp.zig_lib_directory.join(arena, &[_][]const u8{
423	"libc",	458	"libc",
424	"wasi",
425	"libc-top-half",
426	"musl",	459	"musl",
427	"arch",	460	"arch",
428	"generic",	461	"generic",
...	@@ -532,665 +565,667 @@ const libc_bottom_half_src_files = [_][]const u8{	...	@@ -532,665 +565,667 @@ const libc_bottom_half_src_files = [_][]const u8{
532	};	565	};
533		566
534	const libc_top_half_src_files = [_][]const u8{	567	const libc_top_half_src_files = [_][]const u8{
535	"wasi/libc-top-half/musl/src/misc/a64l.c",	568	"musl/src/complex/cabs.c",
536	"wasi/libc-top-half/musl/src/misc/basename.c",	569	"musl/src/complex/cabsf.c",
537	"wasi/libc-top-half/musl/src/misc/dirname.c",	570	"musl/src/complex/cabsl.c",
538	"wasi/libc-top-half/musl/src/misc/ffs.c",	571	"musl/src/complex/cacos.c",
539	"wasi/libc-top-half/musl/src/misc/ffsl.c",	572	"musl/src/complex/cacosf.c",
540	"wasi/libc-top-half/musl/src/misc/ffsll.c",	573	"musl/src/complex/cacosh.c",
541	"wasi/libc-top-half/musl/src/misc/fmtmsg.c",	574	"musl/src/complex/cacoshf.c",
542	"wasi/libc-top-half/musl/src/misc/getdomainname.c",	575	"musl/src/complex/cacoshl.c",
543	"wasi/libc-top-half/musl/src/misc/gethostid.c",	576	"musl/src/complex/cacosl.c",
544	"wasi/libc-top-half/musl/src/misc/getopt.c",	577	"musl/src/complex/carg.c",
545	"wasi/libc-top-half/musl/src/misc/getopt_long.c",	578	"musl/src/complex/cargf.c",
546	"wasi/libc-top-half/musl/src/misc/getsubopt.c",	579	"musl/src/complex/cargl.c",
547	"wasi/libc-top-half/musl/src/misc/realpath.c",	580	"musl/src/complex/casin.c",
548	"wasi/libc-top-half/musl/src/misc/uname.c",	581	"musl/src/complex/casinf.c",
549	"wasi/libc-top-half/musl/src/misc/nftw.c",	582	"musl/src/complex/casinh.c",
550	"wasi/libc-top-half/musl/src/errno/strerror.c",	583	"musl/src/complex/casinhf.c",
551	"wasi/libc-top-half/musl/src/network/htonl.c",	584	"musl/src/complex/casinhl.c",
552	"wasi/libc-top-half/musl/src/network/htons.c",	585	"musl/src/complex/casinl.c",
553	"wasi/libc-top-half/musl/src/network/ntohl.c",	586	"musl/src/complex/catan.c",
554	"wasi/libc-top-half/musl/src/network/ntohs.c",	587	"musl/src/complex/catanf.c",
555	"wasi/libc-top-half/musl/src/network/inet_ntop.c",	588	"musl/src/complex/catanh.c",
556	"wasi/libc-top-half/musl/src/network/inet_pton.c",	589	"musl/src/complex/catanhf.c",
557	"wasi/libc-top-half/musl/src/network/inet_aton.c",	590	"musl/src/complex/catanhl.c",
558	"wasi/libc-top-half/musl/src/network/in6addr_any.c",	591	"musl/src/complex/catanl.c",
559	"wasi/libc-top-half/musl/src/network/in6addr_loopback.c",	592	"musl/src/complex/ccos.c",
560	"wasi/libc-top-half/musl/src/fenv/fenv.c",	593	"musl/src/complex/ccosf.c",
561	"wasi/libc-top-half/musl/src/fenv/fesetround.c",	594	"musl/src/complex/ccosh.c",
562	"wasi/libc-top-half/musl/src/fenv/feupdateenv.c",	595	"musl/src/complex/ccoshf.c",
563	"wasi/libc-top-half/musl/src/fenv/fesetexceptflag.c",	596	"musl/src/complex/ccoshl.c",
564	"wasi/libc-top-half/musl/src/fenv/fegetexceptflag.c",	597	"musl/src/complex/ccosl.c",
565	"wasi/libc-top-half/musl/src/fenv/feholdexcept.c",	598	"musl/src/complex/__cexp.c",
566	"wasi/libc-top-half/musl/src/exit/exit.c",	599	"musl/src/complex/cexp.c",
567	"wasi/libc-top-half/musl/src/exit/atexit.c",	600	"musl/src/complex/__cexpf.c",
568	"wasi/libc-top-half/musl/src/exit/assert.c",	601	"musl/src/complex/cexpf.c",
569	"wasi/libc-top-half/musl/src/exit/quick_exit.c",	602	"musl/src/complex/cexpl.c",
570	"wasi/libc-top-half/musl/src/exit/at_quick_exit.c",	603	"musl/src/complex/clog.c",
571	"wasi/libc-top-half/musl/src/time/strftime.c",	604	"musl/src/complex/clogf.c",
572	"wasi/libc-top-half/musl/src/time/asctime.c",	605	"musl/src/complex/clogl.c",
573	"wasi/libc-top-half/musl/src/time/asctime_r.c",	606	"musl/src/complex/conj.c",
574	"wasi/libc-top-half/musl/src/time/ctime.c",	607	"musl/src/complex/conjf.c",
575	"wasi/libc-top-half/musl/src/time/ctime_r.c",	608	"musl/src/complex/conjl.c",
576	"wasi/libc-top-half/musl/src/time/wcsftime.c",	609	"musl/src/complex/cpow.c",
577	"wasi/libc-top-half/musl/src/time/strptime.c",	610	"musl/src/complex/cpowf.c",
578	"wasi/libc-top-half/musl/src/time/difftime.c",	611	"musl/src/complex/cpowl.c",
579	"wasi/libc-top-half/musl/src/time/timegm.c",	612	"musl/src/complex/cproj.c",
580	"wasi/libc-top-half/musl/src/time/ftime.c",	613	"musl/src/complex/cprojf.c",
581	"wasi/libc-top-half/musl/src/time/gmtime.c",	614	"musl/src/complex/cprojl.c",
582	"wasi/libc-top-half/musl/src/time/gmtime_r.c",	615	"musl/src/complex/csin.c",
583	"wasi/libc-top-half/musl/src/time/timespec_get.c",	616	"musl/src/complex/csinf.c",
584	"wasi/libc-top-half/musl/src/time/getdate.c",	617	"musl/src/complex/csinh.c",
585	"wasi/libc-top-half/musl/src/time/localtime.c",	618	"musl/src/complex/csinhf.c",
586	"wasi/libc-top-half/musl/src/time/localtime_r.c",	619	"musl/src/complex/csinhl.c",
587	"wasi/libc-top-half/musl/src/time/mktime.c",	620	"musl/src/complex/csinl.c",
588	"wasi/libc-top-half/musl/src/time/__tm_to_secs.c",	621	"musl/src/complex/csqrt.c",
589	"wasi/libc-top-half/musl/src/time/__month_to_secs.c",	622	"musl/src/complex/csqrtf.c",
590	"wasi/libc-top-half/musl/src/time/__secs_to_tm.c",	623	"musl/src/complex/csqrtl.c",
591	"wasi/libc-top-half/musl/src/time/__year_to_secs.c",	624	"musl/src/complex/ctan.c",
592	"wasi/libc-top-half/musl/src/time/__tz.c",	625	"musl/src/complex/ctanf.c",
593	"wasi/libc-top-half/musl/src/fcntl/creat.c",	626	"musl/src/complex/ctanh.c",
		627	"musl/src/complex/ctanhf.c",
		628	"musl/src/complex/ctanhl.c",
		629	"musl/src/complex/ctanl.c",
		630	"musl/src/conf/legacy.c",
		631	"musl/src/conf/pathconf.c",
		632	"musl/src/crypt/crypt_blowfish.c",
		633	"musl/src/crypt/crypt.c",
		634	"musl/src/crypt/crypt_des.c",
		635	"musl/src/crypt/crypt_md5.c",
		636	"musl/src/crypt/crypt_r.c",
		637	"musl/src/crypt/crypt_sha256.c",
		638	"musl/src/crypt/crypt_sha512.c",
		639	"musl/src/crypt/encrypt.c",
		640	"musl/src/ctype/__ctype_b_loc.c",
		641	"musl/src/ctype/__ctype_get_mb_cur_max.c",
		642	"musl/src/ctype/__ctype_tolower_loc.c",
		643	"musl/src/ctype/__ctype_toupper_loc.c",
		644	"musl/src/ctype/isalnum.c",
		645	"musl/src/ctype/isalpha.c",
		646	"musl/src/ctype/isascii.c",
		647	"musl/src/ctype/isblank.c",
		648	"musl/src/ctype/iscntrl.c",
		649	"musl/src/ctype/isdigit.c",
		650	"musl/src/ctype/isgraph.c",
		651	"musl/src/ctype/islower.c",
		652	"musl/src/ctype/isprint.c",
		653	"musl/src/ctype/ispunct.c",
		654	"musl/src/ctype/isspace.c",
		655	"musl/src/ctype/isupper.c",
		656	"musl/src/ctype/iswalnum.c",
		657	"musl/src/ctype/iswalpha.c",
		658	"musl/src/ctype/iswblank.c",
		659	"musl/src/ctype/iswcntrl.c",
		660	"musl/src/ctype/iswctype.c",
		661	"musl/src/ctype/iswdigit.c",
		662	"musl/src/ctype/iswgraph.c",
		663	"musl/src/ctype/iswlower.c",
		664	"musl/src/ctype/iswprint.c",
		665	"musl/src/ctype/iswpunct.c",
		666	"musl/src/ctype/iswspace.c",
		667	"musl/src/ctype/iswupper.c",
		668	"musl/src/ctype/iswxdigit.c",
		669	"musl/src/ctype/isxdigit.c",
		670	"musl/src/ctype/toascii.c",
		671	"musl/src/ctype/tolower.c",
		672	"musl/src/ctype/toupper.c",
		673	"musl/src/ctype/towctrans.c",
		674	"musl/src/ctype/wcswidth.c",
		675	"musl/src/ctype/wctrans.c",
		676	"musl/src/ctype/wcwidth.c",
		677	"musl/src/env/setenv.c",
		678	"musl/src/exit/assert.c",
		679	"musl/src/exit/quick_exit.c",
		680	"musl/src/fenv/fegetexceptflag.c",
		681	"musl/src/fenv/feholdexcept.c",
		682	"musl/src/fenv/fenv.c",
		683	"musl/src/fenv/fesetexceptflag.c",
		684	"musl/src/fenv/fesetround.c",
		685	"musl/src/fenv/feupdateenv.c",
		686	"musl/src/legacy/getpagesize.c",
		687	"musl/src/locale/c_locale.c",
		688	"musl/src/locale/duplocale.c",
		689	"musl/src/locale/freelocale.c",
		690	"musl/src/locale/iconv.c",
		691	"musl/src/locale/iconv_close.c",
		692	"musl/src/locale/langinfo.c",
		693	"musl/src/locale/__lctrans.c",
		694	"musl/src/locale/localeconv.c",
		695	"musl/src/locale/__mo_lookup.c",
		696	"musl/src/locale/pleval.c",
		697	"musl/src/locale/setlocale.c",
		698	"musl/src/locale/strcoll.c",
		699	"musl/src/locale/strfmon.c",
		700	"musl/src/locale/strtod_l.c",
		701	"musl/src/locale/strxfrm.c",
		702	"musl/src/locale/wcscoll.c",
		703	"musl/src/locale/wcsxfrm.c",
		704	"musl/src/math/acos.c",
		705	"musl/src/math/acosf.c",
		706	"musl/src/math/acosh.c",
		707	"musl/src/math/acoshf.c",
		708	"musl/src/math/acoshl.c",
		709	"musl/src/math/acosl.c",
		710	"musl/src/math/asin.c",
		711	"musl/src/math/asinf.c",
		712	"musl/src/math/asinh.c",
		713	"musl/src/math/asinhf.c",
		714	"musl/src/math/asinhl.c",
		715	"musl/src/math/asinl.c",
		716	"musl/src/math/atan2.c",
		717	"musl/src/math/atan2f.c",
		718	"musl/src/math/atan2l.c",
		719	"musl/src/math/atan.c",
		720	"musl/src/math/atanf.c",
		721	"musl/src/math/atanh.c",
		722	"musl/src/math/atanhf.c",
		723	"musl/src/math/atanhl.c",
		724	"musl/src/math/atanl.c",
		725	"musl/src/math/cbrt.c",
		726	"musl/src/math/cbrtf.c",
		727	"musl/src/math/cbrtl.c",
		728	"musl/src/math/ceill.c",
		729	"musl/src/math/copysignl.c",
		730	"musl/src/math/__cos.c",
		731	"musl/src/math/cos.c",
		732	"musl/src/math/__cosdf.c",
		733	"musl/src/math/cosf.c",
		734	"musl/src/math/coshl.c",
		735	"musl/src/math/__cosl.c",
		736	"musl/src/math/cosl.c",
		737	"musl/src/math/erf.c",
		738	"musl/src/math/erff.c",
		739	"musl/src/math/erfl.c",
		740	"musl/src/math/exp10.c",
		741	"musl/src/math/exp10f.c",
		742	"musl/src/math/exp10l.c",
		743	"musl/src/math/exp2.c",
		744	"musl/src/math/exp2f.c",
		745	"musl/src/math/exp2f_data.c",
		746	"musl/src/math/exp2l.c",
		747	"musl/src/math/exp.c",
		748	"musl/src/math/exp_data.c",
		749	"musl/src/math/expf.c",
		750	"musl/src/math/expl.c",
		751	"musl/src/math/expm1.c",
		752	"musl/src/math/expm1f.c",
		753	"musl/src/math/expm1l.c",
		754	"musl/src/math/fabsl.c",
		755	"musl/src/math/fdim.c",
		756	"musl/src/math/fdimf.c",
		757	"musl/src/math/fdiml.c",
		758	"musl/src/math/finite.c",
		759	"musl/src/math/finitef.c",
		760	"musl/src/math/floorl.c",
		761	"musl/src/math/fma.c",
		762	"musl/src/math/fmaf.c",
		763	"musl/src/math/fmaxl.c",
		764	"musl/src/math/fminl.c",
		765	"musl/src/math/fmod.c",
		766	"musl/src/math/fmodf.c",
		767	"musl/src/math/fmodl.c",
		768	"musl/src/math/frexp.c",
		769	"musl/src/math/frexpf.c",
		770	"musl/src/math/frexpl.c",
		771	"musl/src/math/hypot.c",
		772	"musl/src/math/hypotf.c",
		773	"musl/src/math/hypotl.c",
		774	"musl/src/math/ilogb.c",
		775	"musl/src/math/ilogbf.c",
		776	"musl/src/math/ilogbl.c",
		777	"musl/src/math/__invtrigl.c",
		778	"musl/src/math/j0.c",
		779	"musl/src/math/j0f.c",
		780	"musl/src/math/j1.c",
		781	"musl/src/math/j1f.c",
		782	"musl/src/math/jn.c",
		783	"musl/src/math/jnf.c",
		784	"musl/src/math/ldexp.c",
		785	"musl/src/math/ldexpf.c",
		786	"musl/src/math/ldexpl.c",
		787	"musl/src/math/lgamma.c",
		788	"musl/src/math/lgammaf.c",
		789	"musl/src/math/lgammaf_r.c",
		790	"musl/src/math/lgammal.c",
		791	"musl/src/math/lgamma_r.c",
		792	"musl/src/math/llrint.c",
		793	"musl/src/math/llrintf.c",
		794	"musl/src/math/llrintl.c",
		795	"musl/src/math/llround.c",
		796	"musl/src/math/llroundf.c",
		797	"musl/src/math/llroundl.c",
		798	"musl/src/math/log10.c",
		799	"musl/src/math/log10f.c",
		800	"musl/src/math/log10l.c",
		801	"musl/src/math/log1p.c",
		802	"musl/src/math/log1pf.c",
		803	"musl/src/math/log1pl.c",
		804	"musl/src/math/log2.c",
		805	"musl/src/math/log2_data.c",
		806	"musl/src/math/log2f.c",
		807	"musl/src/math/log2f_data.c",
		808	"musl/src/math/log2l.c",
		809	"musl/src/math/logb.c",
		810	"musl/src/math/logbf.c",
		811	"musl/src/math/logbl.c",
		812	"musl/src/math/log.c",
		813	"musl/src/math/log_data.c",
		814	"musl/src/math/logf.c",
		815	"musl/src/math/logf_data.c",
		816	"musl/src/math/logl.c",
		817	"musl/src/math/lrint.c",
		818	"musl/src/math/lrintf.c",
		819	"musl/src/math/lrintl.c",
		820	"musl/src/math/lround.c",
		821	"musl/src/math/lroundf.c",
		822	"musl/src/math/lroundl.c",
		823	"musl/src/math/__math_divzero.c",
		824	"musl/src/math/__math_divzerof.c",
		825	"musl/src/math/__math_invalid.c",
		826	"musl/src/math/__math_invalidf.c",
		827	"musl/src/math/__math_invalidl.c",
		828	"musl/src/math/__math_oflow.c",
		829	"musl/src/math/__math_oflowf.c",
		830	"musl/src/math/__math_uflow.c",
		831	"musl/src/math/__math_uflowf.c",
		832	"musl/src/math/__math_xflow.c",
		833	"musl/src/math/__math_xflowf.c",
		834	"musl/src/math/modf.c",
		835	"musl/src/math/modff.c",
		836	"musl/src/math/modfl.c",
		837	"musl/src/math/nan.c",
		838	"musl/src/math/nanf.c",
		839	"musl/src/math/nanl.c",
		840	"musl/src/math/nearbyintl.c",
		841	"musl/src/math/nextafter.c",
		842	"musl/src/math/nextafterf.c",
		843	"musl/src/math/nextafterl.c",
		844	"musl/src/math/nexttoward.c",
		845	"musl/src/math/nexttowardf.c",
		846	"musl/src/math/nexttowardl.c",
		847	"musl/src/math/__polevll.c",
		848	"musl/src/math/pow.c",
		849	"musl/src/math/pow_data.c",
		850	"musl/src/math/powf.c",
		851	"musl/src/math/powf_data.c",
		852	"musl/src/math/remainder.c",
		853	"musl/src/math/remainderf.c",
		854	"musl/src/math/remainderl.c",
		855	"musl/src/math/__rem_pio2_large.c",
		856	"musl/src/math/remquo.c",
		857	"musl/src/math/remquof.c",
		858	"musl/src/math/remquol.c",
		859	"musl/src/math/rintl.c",
		860	"musl/src/math/round.c",
		861	"musl/src/math/roundf.c",
		862	"musl/src/math/roundl.c",
		863	"musl/src/math/scalb.c",
		864	"musl/src/math/scalbf.c",
		865	"musl/src/math/scalbln.c",
		866	"musl/src/math/scalblnf.c",
		867	"musl/src/math/scalblnl.c",
		868	"musl/src/math/scalbn.c",
		869	"musl/src/math/scalbnf.c",
		870	"musl/src/math/scalbnl.c",
		871	"musl/src/math/signgam.c",
		872	"musl/src/math/significand.c",
		873	"musl/src/math/significandf.c",
		874	"musl/src/math/__sin.c",
		875	"musl/src/math/sin.c",
		876	"musl/src/math/sincos.c",
		877	"musl/src/math/sincosf.c",
		878	"musl/src/math/sincosl.c",
		879	"musl/src/math/__sindf.c",
		880	"musl/src/math/sinf.c",
		881	"musl/src/math/sinhl.c",
		882	"musl/src/math/__sinl.c",
		883	"musl/src/math/sinl.c",
		884	"musl/src/math/sqrt_data.c",
		885	"musl/src/math/sqrtl.c",
		886	"musl/src/math/__tan.c",
		887	"musl/src/math/tan.c",
		888	"musl/src/math/__tandf.c",
		889	"musl/src/math/tanf.c",
		890	"musl/src/math/tanh.c",
		891	"musl/src/math/tanhf.c",
		892	"musl/src/math/tanhl.c",
		893	"musl/src/math/__tanl.c",
		894	"musl/src/math/tanl.c",
		895	"musl/src/math/tgamma.c",
		896	"musl/src/math/tgammaf.c",
		897	"musl/src/math/tgammal.c",
		898	"musl/src/math/truncl.c",
		899	"musl/src/misc/a64l.c",
		900	"musl/src/misc/basename.c",
		901	"musl/src/misc/dirname.c",
		902	"musl/src/misc/ffs.c",
		903	"musl/src/misc/ffsl.c",
		904	"musl/src/misc/ffsll.c",
		905	"musl/src/misc/getdomainname.c",
		906	"musl/src/misc/gethostid.c",
		907	"musl/src/misc/getopt.c",
		908	"musl/src/misc/getopt_long.c",
		909	"musl/src/misc/getsubopt.c",
		910	"musl/src/misc/realpath.c",
		911	"musl/src/multibyte/btowc.c",
		912	"musl/src/multibyte/c16rtomb.c",
		913	"musl/src/multibyte/c32rtomb.c",
		914	"musl/src/multibyte/internal.c",
		915	"musl/src/multibyte/mblen.c",
		916	"musl/src/multibyte/mbrlen.c",
		917	"musl/src/multibyte/mbrtoc16.c",
		918	"musl/src/multibyte/mbrtoc32.c",
		919	"musl/src/multibyte/mbrtowc.c",
		920	"musl/src/multibyte/mbsinit.c",
		921	"musl/src/multibyte/mbsnrtowcs.c",
		922	"musl/src/multibyte/mbsrtowcs.c",
		923	"musl/src/multibyte/mbstowcs.c",
		924	"musl/src/multibyte/mbtowc.c",
		925	"musl/src/multibyte/wcrtomb.c",
		926	"musl/src/multibyte/wcsnrtombs.c",
		927	"musl/src/multibyte/wcsrtombs.c",
		928	"musl/src/multibyte/wcstombs.c",
		929	"musl/src/multibyte/wctob.c",
		930	"musl/src/multibyte/wctomb.c",
		931	"musl/src/network/htonl.c",
		932	"musl/src/network/htons.c",
		933	"musl/src/network/in6addr_any.c",
		934	"musl/src/network/in6addr_loopback.c",
		935	"musl/src/network/inet_aton.c",
		936	"musl/src/network/inet_ntop.c",
		937	"musl/src/network/inet_pton.c",
		938	"musl/src/network/ntohl.c",
		939	"musl/src/network/ntohs.c",
		940	"musl/src/prng/drand48.c",
		941	"musl/src/prng/lcong48.c",
		942	"musl/src/prng/lrand48.c",
		943	"musl/src/prng/mrand48.c",
		944	"musl/src/prng/__rand48_step.c",
		945	"musl/src/prng/rand.c",
		946	"musl/src/prng/rand_r.c",
		947	"musl/src/prng/__seed48.c",
		948	"musl/src/prng/seed48.c",
		949	"musl/src/prng/srand48.c",
		950	"musl/src/regex/fnmatch.c",
		951	"musl/src/regex/regerror.c",
		952	"musl/src/search/hsearch.c",
		953	"musl/src/search/insque.c",
		954	"musl/src/search/lsearch.c",
		955	"musl/src/search/tdelete.c",
		956	"musl/src/search/tdestroy.c",
		957	"musl/src/search/tfind.c",
		958	"musl/src/search/tsearch.c",
		959	"musl/src/search/twalk.c",
		960	"musl/src/stdio/asprintf.c",
		961	"musl/src/stdio/clearerr.c",
		962	"musl/src/stdio/dprintf.c",
		963	"musl/src/stdio/ext2.c",
		964	"musl/src/stdio/ext.c",
		965	"musl/src/stdio/fclose.c",
		966	"musl/src/stdio/__fclose_ca.c",
		967	"musl/src/stdio/feof.c",
		968	"musl/src/stdio/ferror.c",
		969	"musl/src/stdio/fflush.c",
		970	"musl/src/stdio/fgetln.c",
		971	"musl/src/stdio/fgets.c",
		972	"musl/src/stdio/fgetwc.c",
		973	"musl/src/stdio/fgetws.c",
		974	"musl/src/stdio/fileno.c",
		975	"musl/src/stdio/__fmodeflags.c",
		976	"musl/src/stdio/fopencookie.c",
		977	"musl/src/stdio/fprintf.c",
		978	"musl/src/stdio/fputs.c",
		979	"musl/src/stdio/fputwc.c",
		980	"musl/src/stdio/fputws.c",
		981	"musl/src/stdio/fread.c",
		982	"musl/src/stdio/fscanf.c",
		983	"musl/src/stdio/fwide.c",
		984	"musl/src/stdio/fwprintf.c",
		985	"musl/src/stdio/fwrite.c",
		986	"musl/src/stdio/fwscanf.c",
		987	"musl/src/stdio/getchar_unlocked.c",
		988	"musl/src/stdio/getc_unlocked.c",
		989	"musl/src/stdio/getdelim.c",
		990	"musl/src/stdio/getline.c",
		991	"musl/src/stdio/getw.c",
		992	"musl/src/stdio/getwc.c",
		993	"musl/src/stdio/getwchar.c",
		994	"musl/src/stdio/ofl_add.c",
		995	"musl/src/stdio/__overflow.c",
		996	"musl/src/stdio/perror.c",
		997	"musl/src/stdio/putchar_unlocked.c",
		998	"musl/src/stdio/putc_unlocked.c",
		999	"musl/src/stdio/puts.c",
		1000	"musl/src/stdio/putw.c",
		1001	"musl/src/stdio/putwc.c",
		1002	"musl/src/stdio/putwchar.c",
		1003	"musl/src/stdio/rewind.c",
		1004	"musl/src/stdio/scanf.c",
		1005	"musl/src/stdio/setbuf.c",
		1006	"musl/src/stdio/setbuffer.c",
		1007	"musl/src/stdio/setlinebuf.c",
		1008	"musl/src/stdio/setvbuf.c",
		1009	"musl/src/stdio/snprintf.c",
		1010	"musl/src/stdio/sprintf.c",
		1011	"musl/src/stdio/sscanf.c",
		1012	"musl/src/stdio/__stdio_exit.c",
		1013	"musl/src/stdio/swprintf.c",
		1014	"musl/src/stdio/swscanf.c",
		1015	"musl/src/stdio/__toread.c",
		1016	"musl/src/stdio/__towrite.c",
		1017	"musl/src/stdio/__uflow.c",
		1018	"musl/src/stdio/ungetwc.c",
		1019	"musl/src/stdio/vasprintf.c",
		1020	"musl/src/stdio/vprintf.c",
		1021	"musl/src/stdio/vscanf.c",
		1022	"musl/src/stdio/vsprintf.c",
		1023	"musl/src/stdio/vwprintf.c",
		1024	"musl/src/stdio/vwscanf.c",
		1025	"musl/src/stdio/wprintf.c",
		1026	"musl/src/stdio/wscanf.c",
		1027	"musl/src/stdlib/abs.c",
		1028	"musl/src/stdlib/atof.c",
		1029	"musl/src/stdlib/atoi.c",
		1030	"musl/src/stdlib/atol.c",
		1031	"musl/src/stdlib/atoll.c",
		1032	"musl/src/stdlib/bsearch.c",
		1033	"musl/src/stdlib/div.c",
		1034	"musl/src/stdlib/ecvt.c",
		1035	"musl/src/stdlib/fcvt.c",
		1036	"musl/src/stdlib/gcvt.c",
		1037	"musl/src/stdlib/imaxabs.c",
		1038	"musl/src/stdlib/imaxdiv.c",
		1039	"musl/src/stdlib/labs.c",
		1040	"musl/src/stdlib/ldiv.c",
		1041	"musl/src/stdlib/llabs.c",
		1042	"musl/src/stdlib/lldiv.c",
		1043	"musl/src/stdlib/qsort.c",
		1044	"musl/src/stdlib/qsort_nr.c",
		1045	"musl/src/string/bcmp.c",
		1046	"musl/src/string/bcopy.c",
		1047	"musl/src/string/bzero.c",
		1048	"musl/src/string/explicit_bzero.c",
		1049	"musl/src/string/index.c",
		1050	"musl/src/string/memccpy.c",
		1051	"musl/src/string/memchr.c",
		1052	"musl/src/string/memcmp.c",
		1053	"musl/src/string/memmem.c",
		1054	"musl/src/string/mempcpy.c",
		1055	"musl/src/string/memrchr.c",
		1056	"musl/src/string/rindex.c",
		1057	"musl/src/string/stpcpy.c",
		1058	"musl/src/string/stpncpy.c",
		1059	"musl/src/string/strcasecmp.c",
		1060	"musl/src/string/strcasestr.c",
		1061	"musl/src/string/strcat.c",
		1062	"musl/src/string/strchr.c",
		1063	"musl/src/string/strchrnul.c",
		1064	"musl/src/string/strcmp.c",
		1065	"musl/src/string/strcpy.c",
		1066	"musl/src/string/strcspn.c",
		1067	"musl/src/string/strdup.c",
		1068	"musl/src/string/strerror_r.c",
		1069	"musl/src/string/strlcat.c",
		1070	"musl/src/string/strlcpy.c",
		1071	"musl/src/string/strlen.c",
		1072	"musl/src/string/strncasecmp.c",
		1073	"musl/src/string/strncat.c",
		1074	"musl/src/string/strncmp.c",
		1075	"musl/src/string/strncpy.c",
		1076	"musl/src/string/strndup.c",
		1077	"musl/src/string/strnlen.c",
		1078	"musl/src/string/strpbrk.c",
		1079	"musl/src/string/strrchr.c",
		1080	"musl/src/string/strsep.c",
		1081	"musl/src/string/strspn.c",
		1082	"musl/src/string/strstr.c",
		1083	"musl/src/string/strtok.c",
		1084	"musl/src/string/strtok_r.c",
		1085	"musl/src/string/strverscmp.c",
		1086	"musl/src/string/swab.c",
		1087	"musl/src/string/wcpcpy.c",
		1088	"musl/src/string/wcpncpy.c",
		1089	"musl/src/string/wcscasecmp.c",
		1090	"musl/src/string/wcscasecmp_l.c",
		1091	"musl/src/string/wcscat.c",
		1092	"musl/src/string/wcschr.c",
		1093	"musl/src/string/wcscmp.c",
		1094	"musl/src/string/wcscpy.c",
		1095	"musl/src/string/wcscspn.c",
		1096	"musl/src/string/wcsdup.c",
		1097	"musl/src/string/wcslen.c",
		1098	"musl/src/string/wcsncasecmp.c",
		1099	"musl/src/string/wcsncasecmp_l.c",
		1100	"musl/src/string/wcsncat.c",
		1101	"musl/src/string/wcsncmp.c",
		1102	"musl/src/string/wcsncpy.c",
		1103	"musl/src/string/wcsnlen.c",
		1104	"musl/src/string/wcspbrk.c",
		1105	"musl/src/string/wcsrchr.c",
		1106	"musl/src/string/wcsspn.c",
		1107	"musl/src/string/wcsstr.c",
		1108	"musl/src/string/wcstok.c",
		1109	"musl/src/string/wcswcs.c",
		1110	"musl/src/string/wmemchr.c",
		1111	"musl/src/string/wmemcmp.c",
		1112	"musl/src/string/wmemcpy.c",
		1113	"musl/src/string/wmemmove.c",
		1114	"musl/src/string/wmemset.c",
		1115	"musl/src/thread/thrd_sleep.c",
		1116	"musl/src/time/asctime.c",
		1117	"musl/src/time/asctime_r.c",
		1118	"musl/src/time/ctime.c",
		1119	"musl/src/time/ctime_r.c",
		1120	"musl/src/time/difftime.c",
		1121	"musl/src/time/ftime.c",
		1122	"musl/src/time/__month_to_secs.c",
		1123	"musl/src/time/strptime.c",
		1124	"musl/src/time/timespec_get.c",
		1125	"musl/src/time/__year_to_secs.c",
		1126	"musl/src/unistd/posix_close.c",
		1127
		1128	"wasi/libc-top-half/musl/src/conf/confstr.c",
		1129	"wasi/libc-top-half/musl/src/conf/fpathconf.c",
		1130	"wasi/libc-top-half/musl/src/conf/sysconf.c",
594	"wasi/libc-top-half/musl/src/dirent/alphasort.c",	1131	"wasi/libc-top-half/musl/src/dirent/alphasort.c",
595	"wasi/libc-top-half/musl/src/dirent/versionsort.c",	1132	"wasi/libc-top-half/musl/src/dirent/versionsort.c",
596	"wasi/libc-top-half/musl/src/env/__stack_chk_fail.c",
597	"wasi/libc-top-half/musl/src/env/clearenv.c",	1133	"wasi/libc-top-half/musl/src/env/clearenv.c",
598	"wasi/libc-top-half/musl/src/env/getenv.c",	1134	"wasi/libc-top-half/musl/src/env/getenv.c",
599	"wasi/libc-top-half/musl/src/env/putenv.c",	1135	"wasi/libc-top-half/musl/src/env/putenv.c",
600	"wasi/libc-top-half/musl/src/env/setenv.c",	1136	"wasi/libc-top-half/musl/src/env/__stack_chk_fail.c",
601	"wasi/libc-top-half/musl/src/env/unsetenv.c",	1137	"wasi/libc-top-half/musl/src/env/unsetenv.c",
602	"wasi/libc-top-half/musl/src/unistd/posix_close.c",	1138	"wasi/libc-top-half/musl/src/errno/strerror.c",
603	"wasi/libc-top-half/musl/src/stat/futimesat.c",	1139	"wasi/libc-top-half/musl/src/exit/atexit.c",
604	"wasi/libc-top-half/musl/src/legacy/getpagesize.c",	1140	"wasi/libc-top-half/musl/src/exit/at_quick_exit.c",
605	"wasi/libc-top-half/musl/src/thread/thrd_sleep.c",	1141	"wasi/libc-top-half/musl/src/exit/exit.c",
		1142	"wasi/libc-top-half/musl/src/fcntl/creat.c",
606	"wasi/libc-top-half/musl/src/internal/defsysinfo.c",	1143	"wasi/libc-top-half/musl/src/internal/defsysinfo.c",
607	"wasi/libc-top-half/musl/src/internal/floatscan.c",	1144	"wasi/libc-top-half/musl/src/internal/floatscan.c",
608	"wasi/libc-top-half/musl/src/internal/intscan.c",	1145	"wasi/libc-top-half/musl/src/internal/intscan.c",
609	"wasi/libc-top-half/musl/src/internal/libc.c",	1146	"wasi/libc-top-half/musl/src/internal/libc.c",
610	"wasi/libc-top-half/musl/src/internal/shgetc.c",	1147	"wasi/libc-top-half/musl/src/internal/shgetc.c",
611	"wasi/libc-top-half/musl/src/stdio/__fclose_ca.c",	1148	"wasi/libc-top-half/musl/src/locale/catclose.c",
		1149	"wasi/libc-top-half/musl/src/locale/catgets.c",
		1150	"wasi/libc-top-half/musl/src/locale/catopen.c",
		1151	"wasi/libc-top-half/musl/src/locale/locale_map.c",
		1152	"wasi/libc-top-half/musl/src/locale/newlocale.c",
		1153	"wasi/libc-top-half/musl/src/locale/uselocale.c",
		1154	"wasi/libc-top-half/musl/src/math/cosh.c",
		1155	"wasi/libc-top-half/musl/src/math/coshf.c",
		1156	"wasi/libc-top-half/musl/src/math/__expo2.c",
		1157	"wasi/libc-top-half/musl/src/math/__expo2f.c",
		1158	"wasi/libc-top-half/musl/src/math/fmal.c",
		1159	"wasi/libc-top-half/musl/src/math/powl.c",
		1160	"wasi/libc-top-half/musl/src/math/__rem_pio2.c",
		1161	"wasi/libc-top-half/musl/src/math/__rem_pio2f.c",
		1162	"wasi/libc-top-half/musl/src/math/__rem_pio2l.c",
		1163	"wasi/libc-top-half/musl/src/math/sinh.c",
		1164	"wasi/libc-top-half/musl/src/math/sinhf.c",
		1165	"wasi/libc-top-half/musl/src/misc/fmtmsg.c",
		1166	"wasi/libc-top-half/musl/src/misc/nftw.c",
		1167	"wasi/libc-top-half/musl/src/misc/uname.c",
		1168	"wasi/libc-top-half/musl/src/prng/random.c",
		1169	"wasi/libc-top-half/musl/src/regex/regcomp.c",
		1170	"wasi/libc-top-half/musl/src/regex/regexec.c",
		1171	"wasi/libc-top-half/musl/src/regex/glob.c",
		1172	"wasi/libc-top-half/musl/src/regex/tre-mem.c",
		1173	"wasi/libc-top-half/musl/src/stat/futimesat.c",
612	"wasi/libc-top-half/musl/src/stdio/__fdopen.c",	1174	"wasi/libc-top-half/musl/src/stdio/__fdopen.c",
613	"wasi/libc-top-half/musl/src/stdio/__fmodeflags.c",
614	"wasi/libc-top-half/musl/src/stdio/__fopen_rb_ca.c",
615	"wasi/libc-top-half/musl/src/stdio/__overflow.c",
616	"wasi/libc-top-half/musl/src/stdio/__stdio_close.c",
617	"wasi/libc-top-half/musl/src/stdio/__stdio_exit.c",
618	"wasi/libc-top-half/musl/src/stdio/__stdio_read.c",
619	"wasi/libc-top-half/musl/src/stdio/__stdio_seek.c",
620	"wasi/libc-top-half/musl/src/stdio/__stdio_write.c",
621	"wasi/libc-top-half/musl/src/stdio/__stdout_write.c",
622	"wasi/libc-top-half/musl/src/stdio/__toread.c",
623	"wasi/libc-top-half/musl/src/stdio/__towrite.c",
624	"wasi/libc-top-half/musl/src/stdio/__uflow.c",
625	"wasi/libc-top-half/musl/src/stdio/asprintf.c",
626	"wasi/libc-top-half/musl/src/stdio/clearerr.c",
627	"wasi/libc-top-half/musl/src/stdio/dprintf.c",
628	"wasi/libc-top-half/musl/src/stdio/ext.c",
629	"wasi/libc-top-half/musl/src/stdio/ext2.c",
630	"wasi/libc-top-half/musl/src/stdio/fclose.c",
631	"wasi/libc-top-half/musl/src/stdio/feof.c",
632	"wasi/libc-top-half/musl/src/stdio/ferror.c",
633	"wasi/libc-top-half/musl/src/stdio/fflush.c",
634	"wasi/libc-top-half/musl/src/stdio/fgetc.c",	1175	"wasi/libc-top-half/musl/src/stdio/fgetc.c",
635	"wasi/libc-top-half/musl/src/stdio/fgetln.c",
636	"wasi/libc-top-half/musl/src/stdio/fgetpos.c",	1176	"wasi/libc-top-half/musl/src/stdio/fgetpos.c",
637	"wasi/libc-top-half/musl/src/stdio/fgets.c",
638	"wasi/libc-top-half/musl/src/stdio/fgetwc.c",
639	"wasi/libc-top-half/musl/src/stdio/fgetws.c",
640	"wasi/libc-top-half/musl/src/stdio/fileno.c",
641	"wasi/libc-top-half/musl/src/stdio/fmemopen.c",	1177	"wasi/libc-top-half/musl/src/stdio/fmemopen.c",
642	"wasi/libc-top-half/musl/src/stdio/fopen.c",	1178	"wasi/libc-top-half/musl/src/stdio/fopen.c",
643	"wasi/libc-top-half/musl/src/stdio/fopencookie.c",	1179	"wasi/libc-top-half/musl/src/stdio/__fopen_rb_ca.c",
644	"wasi/libc-top-half/musl/src/stdio/fprintf.c",
645	"wasi/libc-top-half/musl/src/stdio/fputc.c",	1180	"wasi/libc-top-half/musl/src/stdio/fputc.c",
646	"wasi/libc-top-half/musl/src/stdio/fputs.c",
647	"wasi/libc-top-half/musl/src/stdio/fputwc.c",
648	"wasi/libc-top-half/musl/src/stdio/fputws.c",
649	"wasi/libc-top-half/musl/src/stdio/fread.c",
650	"wasi/libc-top-half/musl/src/stdio/freopen.c",	1181	"wasi/libc-top-half/musl/src/stdio/freopen.c",
651	"wasi/libc-top-half/musl/src/stdio/fscanf.c",
652	"wasi/libc-top-half/musl/src/stdio/fseek.c",	1182	"wasi/libc-top-half/musl/src/stdio/fseek.c",
653	"wasi/libc-top-half/musl/src/stdio/fsetpos.c",	1183	"wasi/libc-top-half/musl/src/stdio/fsetpos.c",
654	"wasi/libc-top-half/musl/src/stdio/ftell.c",	1184	"wasi/libc-top-half/musl/src/stdio/ftell.c",
655	"wasi/libc-top-half/musl/src/stdio/fwide.c",
656	"wasi/libc-top-half/musl/src/stdio/fwprintf.c",
657	"wasi/libc-top-half/musl/src/stdio/fwrite.c",
658	"wasi/libc-top-half/musl/src/stdio/fwscanf.c",
659	"wasi/libc-top-half/musl/src/stdio/getc.c",	1185	"wasi/libc-top-half/musl/src/stdio/getc.c",
660	"wasi/libc-top-half/musl/src/stdio/getc_unlocked.c",
661	"wasi/libc-top-half/musl/src/stdio/getchar.c",	1186	"wasi/libc-top-half/musl/src/stdio/getchar.c",
662	"wasi/libc-top-half/musl/src/stdio/getchar_unlocked.c",
663	"wasi/libc-top-half/musl/src/stdio/getdelim.c",
664	"wasi/libc-top-half/musl/src/stdio/getline.c",
665	"wasi/libc-top-half/musl/src/stdio/getw.c",
666	"wasi/libc-top-half/musl/src/stdio/getwc.c",
667	"wasi/libc-top-half/musl/src/stdio/getwchar.c",
668	"wasi/libc-top-half/musl/src/stdio/ofl.c",	1187	"wasi/libc-top-half/musl/src/stdio/ofl.c",
669	"wasi/libc-top-half/musl/src/stdio/ofl_add.c",
670	"wasi/libc-top-half/musl/src/stdio/open_memstream.c",	1188	"wasi/libc-top-half/musl/src/stdio/open_memstream.c",
671	"wasi/libc-top-half/musl/src/stdio/open_wmemstream.c",	1189	"wasi/libc-top-half/musl/src/stdio/open_wmemstream.c",
672	"wasi/libc-top-half/musl/src/stdio/perror.c",
673	"wasi/libc-top-half/musl/src/stdio/printf.c",	1190	"wasi/libc-top-half/musl/src/stdio/printf.c",
674	"wasi/libc-top-half/musl/src/stdio/putc.c",	1191	"wasi/libc-top-half/musl/src/stdio/putc.c",
675	"wasi/libc-top-half/musl/src/stdio/putc_unlocked.c",
676	"wasi/libc-top-half/musl/src/stdio/putchar.c",	1192	"wasi/libc-top-half/musl/src/stdio/putchar.c",
677	"wasi/libc-top-half/musl/src/stdio/putchar_unlocked.c",
678	"wasi/libc-top-half/musl/src/stdio/puts.c",
679	"wasi/libc-top-half/musl/src/stdio/putw.c",
680	"wasi/libc-top-half/musl/src/stdio/putwc.c",
681	"wasi/libc-top-half/musl/src/stdio/putwchar.c",
682	"wasi/libc-top-half/musl/src/stdio/rewind.c",
683	"wasi/libc-top-half/musl/src/stdio/scanf.c",
684	"wasi/libc-top-half/musl/src/stdio/setbuf.c",
685	"wasi/libc-top-half/musl/src/stdio/setbuffer.c",
686	"wasi/libc-top-half/musl/src/stdio/setlinebuf.c",
687	"wasi/libc-top-half/musl/src/stdio/setvbuf.c",
688	"wasi/libc-top-half/musl/src/stdio/snprintf.c",
689	"wasi/libc-top-half/musl/src/stdio/sprintf.c",
690	"wasi/libc-top-half/musl/src/stdio/sscanf.c",
691	"wasi/libc-top-half/musl/src/stdio/stderr.c",	1193	"wasi/libc-top-half/musl/src/stdio/stderr.c",
692	"wasi/libc-top-half/musl/src/stdio/stdin.c",	1194	"wasi/libc-top-half/musl/src/stdio/stdin.c",
		1195	"wasi/libc-top-half/musl/src/stdio/__stdio_close.c",
		1196	"wasi/libc-top-half/musl/src/stdio/__stdio_read.c",
		1197	"wasi/libc-top-half/musl/src/stdio/__stdio_seek.c",
		1198	"wasi/libc-top-half/musl/src/stdio/__stdio_write.c",
693	"wasi/libc-top-half/musl/src/stdio/stdout.c",	1199	"wasi/libc-top-half/musl/src/stdio/stdout.c",
694	"wasi/libc-top-half/musl/src/stdio/swprintf.c",	1200	"wasi/libc-top-half/musl/src/stdio/__stdout_write.c",
695	"wasi/libc-top-half/musl/src/stdio/swscanf.c",
696	"wasi/libc-top-half/musl/src/stdio/ungetc.c",	1201	"wasi/libc-top-half/musl/src/stdio/ungetc.c",
697	"wasi/libc-top-half/musl/src/stdio/ungetwc.c",
698	"wasi/libc-top-half/musl/src/stdio/vasprintf.c",
699	"wasi/libc-top-half/musl/src/stdio/vdprintf.c",	1202	"wasi/libc-top-half/musl/src/stdio/vdprintf.c",
700	"wasi/libc-top-half/musl/src/stdio/vfprintf.c",	1203	"wasi/libc-top-half/musl/src/stdio/vfprintf.c",
701	"wasi/libc-top-half/musl/src/stdio/vfscanf.c",	1204	"wasi/libc-top-half/musl/src/stdio/vfscanf.c",
702	"wasi/libc-top-half/musl/src/stdio/vfwprintf.c",	1205	"wasi/libc-top-half/musl/src/stdio/vfwprintf.c",
703	"wasi/libc-top-half/musl/src/stdio/vfwscanf.c",	1206	"wasi/libc-top-half/musl/src/stdio/vfwscanf.c",
704	"wasi/libc-top-half/musl/src/stdio/vprintf.c",
705	"wasi/libc-top-half/musl/src/stdio/vscanf.c",
706	"wasi/libc-top-half/musl/src/stdio/vsnprintf.c",	1207	"wasi/libc-top-half/musl/src/stdio/vsnprintf.c",
707	"wasi/libc-top-half/musl/src/stdio/vsprintf.c",
708	"wasi/libc-top-half/musl/src/stdio/vsscanf.c",	1208	"wasi/libc-top-half/musl/src/stdio/vsscanf.c",
709	"wasi/libc-top-half/musl/src/stdio/vswprintf.c",	1209	"wasi/libc-top-half/musl/src/stdio/vswprintf.c",
710	"wasi/libc-top-half/musl/src/stdio/vswscanf.c",	1210	"wasi/libc-top-half/musl/src/stdio/vswscanf.c",
711	"wasi/libc-top-half/musl/src/stdio/vwprintf.c",
712	"wasi/libc-top-half/musl/src/stdio/vwscanf.c",
713	"wasi/libc-top-half/musl/src/stdio/wprintf.c",
714	"wasi/libc-top-half/musl/src/stdio/wscanf.c",
715	"wasi/libc-top-half/musl/src/string/bcmp.c",
716	"wasi/libc-top-half/musl/src/string/bcopy.c",
717	"wasi/libc-top-half/musl/src/string/bzero.c",
718	"wasi/libc-top-half/musl/src/string/explicit_bzero.c",
719	"wasi/libc-top-half/musl/src/string/index.c",
720	"wasi/libc-top-half/musl/src/string/memccpy.c",
721	"wasi/libc-top-half/musl/src/string/memchr.c",
722	"wasi/libc-top-half/musl/src/string/memcmp.c",
723	"wasi/libc-top-half/musl/src/string/memmem.c",
724	"wasi/libc-top-half/musl/src/string/mempcpy.c",
725	"wasi/libc-top-half/musl/src/string/memrchr.c",
726	"wasi/libc-top-half/musl/src/string/memset.c",
727	"wasi/libc-top-half/musl/src/string/rindex.c",
728	"wasi/libc-top-half/musl/src/string/stpcpy.c",
729	"wasi/libc-top-half/musl/src/string/stpncpy.c",
730	"wasi/libc-top-half/musl/src/string/strcasecmp.c",
731	"wasi/libc-top-half/musl/src/string/strcasestr.c",
732	"wasi/libc-top-half/musl/src/string/strcat.c",
733	"wasi/libc-top-half/musl/src/string/strchr.c",
734	"wasi/libc-top-half/musl/src/string/strchrnul.c",
735	"wasi/libc-top-half/musl/src/string/strcmp.c",
736	"wasi/libc-top-half/musl/src/string/strcpy.c",
737	"wasi/libc-top-half/musl/src/string/strcspn.c",
738	"wasi/libc-top-half/musl/src/string/strdup.c",
739	"wasi/libc-top-half/musl/src/string/strerror_r.c",
740	"wasi/libc-top-half/musl/src/string/strlcat.c",
741	"wasi/libc-top-half/musl/src/string/strlcpy.c",
742	"wasi/libc-top-half/musl/src/string/strlen.c",
743	"wasi/libc-top-half/musl/src/string/strncasecmp.c",
744	"wasi/libc-top-half/musl/src/string/strncat.c",
745	"wasi/libc-top-half/musl/src/string/strncmp.c",
746	"wasi/libc-top-half/musl/src/string/strncpy.c",
747	"wasi/libc-top-half/musl/src/string/strndup.c",
748	"wasi/libc-top-half/musl/src/string/strnlen.c",
749	"wasi/libc-top-half/musl/src/string/strpbrk.c",
750	"wasi/libc-top-half/musl/src/string/strrchr.c",
751	"wasi/libc-top-half/musl/src/string/strsep.c",
752	"wasi/libc-top-half/musl/src/string/strspn.c",
753	"wasi/libc-top-half/musl/src/string/strstr.c",
754	"wasi/libc-top-half/musl/src/string/strtok.c",
755	"wasi/libc-top-half/musl/src/string/strtok_r.c",
756	"wasi/libc-top-half/musl/src/string/strverscmp.c",
757	"wasi/libc-top-half/musl/src/string/swab.c",
758	"wasi/libc-top-half/musl/src/string/wcpcpy.c",
759	"wasi/libc-top-half/musl/src/string/wcpncpy.c",
760	"wasi/libc-top-half/musl/src/string/wcscasecmp.c",
761	"wasi/libc-top-half/musl/src/string/wcscasecmp_l.c",
762	"wasi/libc-top-half/musl/src/string/wcscat.c",
763	"wasi/libc-top-half/musl/src/string/wcschr.c",
764	"wasi/libc-top-half/musl/src/string/wcscmp.c",
765	"wasi/libc-top-half/musl/src/string/wcscpy.c",
766	"wasi/libc-top-half/musl/src/string/wcscspn.c",
767	"wasi/libc-top-half/musl/src/string/wcsdup.c",
768	"wasi/libc-top-half/musl/src/string/wcslen.c",
769	"wasi/libc-top-half/musl/src/string/wcsncasecmp.c",
770	"wasi/libc-top-half/musl/src/string/wcsncasecmp_l.c",
771	"wasi/libc-top-half/musl/src/string/wcsncat.c",
772	"wasi/libc-top-half/musl/src/string/wcsncmp.c",
773	"wasi/libc-top-half/musl/src/string/wcsncpy.c",
774	"wasi/libc-top-half/musl/src/string/wcsnlen.c",
775	"wasi/libc-top-half/musl/src/string/wcspbrk.c",
776	"wasi/libc-top-half/musl/src/string/wcsrchr.c",
777	"wasi/libc-top-half/musl/src/string/wcsspn.c",
778	"wasi/libc-top-half/musl/src/string/wcsstr.c",
779	"wasi/libc-top-half/musl/src/string/wcstok.c",
780	"wasi/libc-top-half/musl/src/string/wcswcs.c",
781	"wasi/libc-top-half/musl/src/string/wmemchr.c",
782	"wasi/libc-top-half/musl/src/string/wmemcmp.c",
783	"wasi/libc-top-half/musl/src/string/wmemcpy.c",
784	"wasi/libc-top-half/musl/src/string/wmemmove.c",
785	"wasi/libc-top-half/musl/src/string/wmemset.c",
786	"wasi/libc-top-half/musl/src/locale/__lctrans.c",
787	"wasi/libc-top-half/musl/src/locale/__mo_lookup.c",
788	"wasi/libc-top-half/musl/src/locale/c_locale.c",
789	"wasi/libc-top-half/musl/src/locale/catclose.c",
790	"wasi/libc-top-half/musl/src/locale/catgets.c",
791	"wasi/libc-top-half/musl/src/locale/catopen.c",
792	"wasi/libc-top-half/musl/src/locale/duplocale.c",
793	"wasi/libc-top-half/musl/src/locale/freelocale.c",
794	"wasi/libc-top-half/musl/src/locale/iconv.c",
795	"wasi/libc-top-half/musl/src/locale/iconv_close.c",
796	"wasi/libc-top-half/musl/src/locale/langinfo.c",
797	"wasi/libc-top-half/musl/src/locale/locale_map.c",
798	"wasi/libc-top-half/musl/src/locale/localeconv.c",
799	"wasi/libc-top-half/musl/src/locale/newlocale.c",
800	"wasi/libc-top-half/musl/src/locale/pleval.c",
801	"wasi/libc-top-half/musl/src/locale/setlocale.c",
802	"wasi/libc-top-half/musl/src/locale/strcoll.c",
803	"wasi/libc-top-half/musl/src/locale/strfmon.c",
804	"wasi/libc-top-half/musl/src/locale/strtod_l.c",
805	"wasi/libc-top-half/musl/src/locale/strxfrm.c",
806	"wasi/libc-top-half/musl/src/locale/uselocale.c",
807	"wasi/libc-top-half/musl/src/locale/wcscoll.c",
808	"wasi/libc-top-half/musl/src/locale/wcsxfrm.c",
809	"wasi/libc-top-half/musl/src/stdlib/abs.c",
810	"wasi/libc-top-half/musl/src/stdlib/atof.c",
811	"wasi/libc-top-half/musl/src/stdlib/atoi.c",
812	"wasi/libc-top-half/musl/src/stdlib/atol.c",
813	"wasi/libc-top-half/musl/src/stdlib/atoll.c",
814	"wasi/libc-top-half/musl/src/stdlib/bsearch.c",
815	"wasi/libc-top-half/musl/src/stdlib/div.c",
816	"wasi/libc-top-half/musl/src/stdlib/ecvt.c",
817	"wasi/libc-top-half/musl/src/stdlib/fcvt.c",
818	"wasi/libc-top-half/musl/src/stdlib/gcvt.c",
819	"wasi/libc-top-half/musl/src/stdlib/imaxabs.c",
820	"wasi/libc-top-half/musl/src/stdlib/imaxdiv.c",
821	"wasi/libc-top-half/musl/src/stdlib/labs.c",
822	"wasi/libc-top-half/musl/src/stdlib/ldiv.c",
823	"wasi/libc-top-half/musl/src/stdlib/llabs.c",
824	"wasi/libc-top-half/musl/src/stdlib/lldiv.c",
825	"wasi/libc-top-half/musl/src/stdlib/qsort.c",
826	"wasi/libc-top-half/musl/src/stdlib/qsort_nr.c",
827	"wasi/libc-top-half/musl/src/stdlib/strtod.c",	1211	"wasi/libc-top-half/musl/src/stdlib/strtod.c",
828	"wasi/libc-top-half/musl/src/stdlib/strtol.c",	1212	"wasi/libc-top-half/musl/src/stdlib/strtol.c",
829	"wasi/libc-top-half/musl/src/stdlib/wcstod.c",	1213	"wasi/libc-top-half/musl/src/stdlib/wcstod.c",
830	"wasi/libc-top-half/musl/src/stdlib/wcstol.c",	1214	"wasi/libc-top-half/musl/src/stdlib/wcstol.c",
831	"wasi/libc-top-half/musl/src/search/hsearch.c",	1215	"wasi/libc-top-half/musl/src/string/memset.c",
832	"wasi/libc-top-half/musl/src/search/insque.c",	1216	"wasi/libc-top-half/musl/src/time/getdate.c",
833	"wasi/libc-top-half/musl/src/search/lsearch.c",	1217	"wasi/libc-top-half/musl/src/time/gmtime.c",
834	"wasi/libc-top-half/musl/src/search/tdelete.c",	1218	"wasi/libc-top-half/musl/src/time/gmtime_r.c",
835	"wasi/libc-top-half/musl/src/search/tdestroy.c",	1219	"wasi/libc-top-half/musl/src/time/localtime.c",
836	"wasi/libc-top-half/musl/src/search/tfind.c",	1220	"wasi/libc-top-half/musl/src/time/localtime_r.c",
837	"wasi/libc-top-half/musl/src/search/tsearch.c",	1221	"wasi/libc-top-half/musl/src/time/mktime.c",
838	"wasi/libc-top-half/musl/src/search/twalk.c",	1222	"wasi/libc-top-half/musl/src/time/__secs_to_tm.c",
839	"wasi/libc-top-half/musl/src/multibyte/btowc.c",	1223	"wasi/libc-top-half/musl/src/time/strftime.c",
840	"wasi/libc-top-half/musl/src/multibyte/c16rtomb.c",	1224	"wasi/libc-top-half/musl/src/time/timegm.c",
841	"wasi/libc-top-half/musl/src/multibyte/c32rtomb.c",	1225	"wasi/libc-top-half/musl/src/time/__tm_to_secs.c",
842	"wasi/libc-top-half/musl/src/multibyte/internal.c",	1226	"wasi/libc-top-half/musl/src/time/__tz.c",
843	"wasi/libc-top-half/musl/src/multibyte/mblen.c",	1227	"wasi/libc-top-half/musl/src/time/wcsftime.c",
844	"wasi/libc-top-half/musl/src/multibyte/mbrlen.c",	1228
845	"wasi/libc-top-half/musl/src/multibyte/mbrtoc16.c",
846	"wasi/libc-top-half/musl/src/multibyte/mbrtoc32.c",
847	"wasi/libc-top-half/musl/src/multibyte/mbrtowc.c",
848	"wasi/libc-top-half/musl/src/multibyte/mbsinit.c",
849	"wasi/libc-top-half/musl/src/multibyte/mbsnrtowcs.c",
850	"wasi/libc-top-half/musl/src/multibyte/mbsrtowcs.c",
851	"wasi/libc-top-half/musl/src/multibyte/mbstowcs.c",
852	"wasi/libc-top-half/musl/src/multibyte/mbtowc.c",
853	"wasi/libc-top-half/musl/src/multibyte/wcrtomb.c",
854	"wasi/libc-top-half/musl/src/multibyte/wcsnrtombs.c",
855	"wasi/libc-top-half/musl/src/multibyte/wcsrtombs.c",
856	"wasi/libc-top-half/musl/src/multibyte/wcstombs.c",
857	"wasi/libc-top-half/musl/src/multibyte/wctob.c",
858	"wasi/libc-top-half/musl/src/multibyte/wctomb.c",
859	"wasi/libc-top-half/musl/src/regex/fnmatch.c",
860	"wasi/libc-top-half/musl/src/regex/glob.c",
861	"wasi/libc-top-half/musl/src/regex/regcomp.c",
862	"wasi/libc-top-half/musl/src/regex/regerror.c",
863	"wasi/libc-top-half/musl/src/regex/regexec.c",
864	"wasi/libc-top-half/musl/src/regex/tre-mem.c",
865	"wasi/libc-top-half/musl/src/prng/__rand48_step.c",
866	"wasi/libc-top-half/musl/src/prng/__seed48.c",
867	"wasi/libc-top-half/musl/src/prng/drand48.c",
868	"wasi/libc-top-half/musl/src/prng/lcong48.c",
869	"wasi/libc-top-half/musl/src/prng/lrand48.c",
870	"wasi/libc-top-half/musl/src/prng/mrand48.c",
871	"wasi/libc-top-half/musl/src/prng/rand.c",
872	"wasi/libc-top-half/musl/src/prng/rand_r.c",
873	"wasi/libc-top-half/musl/src/prng/random.c",
874	"wasi/libc-top-half/musl/src/prng/seed48.c",
875	"wasi/libc-top-half/musl/src/prng/srand48.c",
876	"wasi/libc-top-half/musl/src/conf/confstr.c",
877	"wasi/libc-top-half/musl/src/conf/fpathconf.c",
878	"wasi/libc-top-half/musl/src/conf/legacy.c",
879	"wasi/libc-top-half/musl/src/conf/pathconf.c",
880	"wasi/libc-top-half/musl/src/conf/sysconf.c",
881	"wasi/libc-top-half/musl/src/ctype/__ctype_b_loc.c",
882	"wasi/libc-top-half/musl/src/ctype/__ctype_get_mb_cur_max.c",
883	"wasi/libc-top-half/musl/src/ctype/__ctype_tolower_loc.c",
884	"wasi/libc-top-half/musl/src/ctype/__ctype_toupper_loc.c",
885	"wasi/libc-top-half/musl/src/ctype/isalnum.c",
886	"wasi/libc-top-half/musl/src/ctype/isalpha.c",
887	"wasi/libc-top-half/musl/src/ctype/isascii.c",
888	"wasi/libc-top-half/musl/src/ctype/isblank.c",
889	"wasi/libc-top-half/musl/src/ctype/iscntrl.c",
890	"wasi/libc-top-half/musl/src/ctype/isdigit.c",
891	"wasi/libc-top-half/musl/src/ctype/isgraph.c",
892	"wasi/libc-top-half/musl/src/ctype/islower.c",
893	"wasi/libc-top-half/musl/src/ctype/isprint.c",
894	"wasi/libc-top-half/musl/src/ctype/ispunct.c",
895	"wasi/libc-top-half/musl/src/ctype/isspace.c",
896	"wasi/libc-top-half/musl/src/ctype/isupper.c",
897	"wasi/libc-top-half/musl/src/ctype/iswalnum.c",
898	"wasi/libc-top-half/musl/src/ctype/iswalpha.c",
899	"wasi/libc-top-half/musl/src/ctype/iswblank.c",
900	"wasi/libc-top-half/musl/src/ctype/iswcntrl.c",
901	"wasi/libc-top-half/musl/src/ctype/iswctype.c",
902	"wasi/libc-top-half/musl/src/ctype/iswdigit.c",
903	"wasi/libc-top-half/musl/src/ctype/iswgraph.c",
904	"wasi/libc-top-half/musl/src/ctype/iswlower.c",
905	"wasi/libc-top-half/musl/src/ctype/iswprint.c",
906	"wasi/libc-top-half/musl/src/ctype/iswpunct.c",
907	"wasi/libc-top-half/musl/src/ctype/iswspace.c",
908	"wasi/libc-top-half/musl/src/ctype/iswupper.c",
909	"wasi/libc-top-half/musl/src/ctype/iswxdigit.c",
910	"wasi/libc-top-half/musl/src/ctype/isxdigit.c",
911	"wasi/libc-top-half/musl/src/ctype/toascii.c",
912	"wasi/libc-top-half/musl/src/ctype/tolower.c",
913	"wasi/libc-top-half/musl/src/ctype/toupper.c",
914	"wasi/libc-top-half/musl/src/ctype/towctrans.c",
915	"wasi/libc-top-half/musl/src/ctype/wcswidth.c",
916	"wasi/libc-top-half/musl/src/ctype/wctrans.c",
917	"wasi/libc-top-half/musl/src/ctype/wcwidth.c",
918	"wasi/libc-top-half/musl/src/math/__cos.c",
919	"wasi/libc-top-half/musl/src/math/__cosdf.c",
920	"wasi/libc-top-half/musl/src/math/__cosl.c",
921	"wasi/libc-top-half/musl/src/math/__expo2.c",
922	"wasi/libc-top-half/musl/src/math/__expo2f.c",
923	"wasi/libc-top-half/musl/src/math/__invtrigl.c",
924	"wasi/libc-top-half/musl/src/math/__math_divzero.c",
925	"wasi/libc-top-half/musl/src/math/__math_divzerof.c",
926	"wasi/libc-top-half/musl/src/math/__math_invalid.c",
927	"wasi/libc-top-half/musl/src/math/__math_invalidf.c",
928	"wasi/libc-top-half/musl/src/math/__math_invalidl.c",
929	"wasi/libc-top-half/musl/src/math/__math_oflow.c",
930	"wasi/libc-top-half/musl/src/math/__math_oflowf.c",
931	"wasi/libc-top-half/musl/src/math/__math_uflow.c",
932	"wasi/libc-top-half/musl/src/math/__math_uflowf.c",
933	"wasi/libc-top-half/musl/src/math/__math_xflow.c",
934	"wasi/libc-top-half/musl/src/math/__math_xflowf.c",
935	"wasi/libc-top-half/musl/src/math/__polevll.c",
936	"wasi/libc-top-half/musl/src/math/__rem_pio2.c",
937	"wasi/libc-top-half/musl/src/math/__rem_pio2_large.c",
938	"wasi/libc-top-half/musl/src/math/__rem_pio2f.c",
939	"wasi/libc-top-half/musl/src/math/__rem_pio2l.c",
940	"wasi/libc-top-half/musl/src/math/__sin.c",
941	"wasi/libc-top-half/musl/src/math/__sindf.c",
942	"wasi/libc-top-half/musl/src/math/__sinl.c",
943	"wasi/libc-top-half/musl/src/math/__tan.c",
944	"wasi/libc-top-half/musl/src/math/__tandf.c",
945	"wasi/libc-top-half/musl/src/math/__tanl.c",
946	"wasi/libc-top-half/musl/src/math/acos.c",
947	"wasi/libc-top-half/musl/src/math/acosf.c",
948	"wasi/libc-top-half/musl/src/math/acosh.c",
949	"wasi/libc-top-half/musl/src/math/acoshf.c",
950	"wasi/libc-top-half/musl/src/math/acoshl.c",
951	"wasi/libc-top-half/musl/src/math/acosl.c",
952	"wasi/libc-top-half/musl/src/math/asin.c",
953	"wasi/libc-top-half/musl/src/math/asinf.c",
954	"wasi/libc-top-half/musl/src/math/asinh.c",
955	"wasi/libc-top-half/musl/src/math/asinhf.c",
956	"wasi/libc-top-half/musl/src/math/asinhl.c",
957	"wasi/libc-top-half/musl/src/math/asinl.c",
958	"wasi/libc-top-half/musl/src/math/atan.c",
959	"wasi/libc-top-half/musl/src/math/atan2.c",
960	"wasi/libc-top-half/musl/src/math/atan2f.c",
961	"wasi/libc-top-half/musl/src/math/atan2l.c",
962	"wasi/libc-top-half/musl/src/math/atanf.c",
963	"wasi/libc-top-half/musl/src/math/atanh.c",
964	"wasi/libc-top-half/musl/src/math/atanhf.c",
965	"wasi/libc-top-half/musl/src/math/atanhl.c",
966	"wasi/libc-top-half/musl/src/math/atanl.c",
967	"wasi/libc-top-half/musl/src/math/cbrt.c",
968	"wasi/libc-top-half/musl/src/math/cbrtf.c",
969	"wasi/libc-top-half/musl/src/math/cbrtl.c",
970	"wasi/libc-top-half/musl/src/math/ceill.c",
971	"wasi/libc-top-half/musl/src/math/copysignl.c",
972	"wasi/libc-top-half/musl/src/math/cos.c",
973	"wasi/libc-top-half/musl/src/math/cosf.c",
974	"wasi/libc-top-half/musl/src/math/cosh.c",
975	"wasi/libc-top-half/musl/src/math/coshf.c",
976	"wasi/libc-top-half/musl/src/math/coshl.c",
977	"wasi/libc-top-half/musl/src/math/cosl.c",
978	"wasi/libc-top-half/musl/src/math/erf.c",
979	"wasi/libc-top-half/musl/src/math/erff.c",
980	"wasi/libc-top-half/musl/src/math/erfl.c",
981	"wasi/libc-top-half/musl/src/math/exp.c",
982	"wasi/libc-top-half/musl/src/math/exp10.c",
983	"wasi/libc-top-half/musl/src/math/exp10f.c",
984	"wasi/libc-top-half/musl/src/math/exp10l.c",
985	"wasi/libc-top-half/musl/src/math/exp2.c",
986	"wasi/libc-top-half/musl/src/math/exp2f.c",
987	"wasi/libc-top-half/musl/src/math/exp2f_data.c",
988	"wasi/libc-top-half/musl/src/math/exp2l.c",
989	"wasi/libc-top-half/musl/src/math/exp_data.c",
990	"wasi/libc-top-half/musl/src/math/expf.c",
991	"wasi/libc-top-half/musl/src/math/expl.c",
992	"wasi/libc-top-half/musl/src/math/expm1.c",
993	"wasi/libc-top-half/musl/src/math/expm1f.c",
994	"wasi/libc-top-half/musl/src/math/expm1l.c",
995	"wasi/libc-top-half/musl/src/math/fabsl.c",
996	"wasi/libc-top-half/musl/src/math/fdim.c",
997	"wasi/libc-top-half/musl/src/math/fdimf.c",
998	"wasi/libc-top-half/musl/src/math/fdiml.c",
999	"wasi/libc-top-half/musl/src/math/finite.c",
1000	"wasi/libc-top-half/musl/src/math/finitef.c",
1001	"wasi/libc-top-half/musl/src/math/floorl.c",
1002	"wasi/libc-top-half/musl/src/math/fma.c",
1003	"wasi/libc-top-half/musl/src/math/fmaf.c",
1004	"wasi/libc-top-half/musl/src/math/fmal.c",
1005	"wasi/libc-top-half/musl/src/math/fmaxl.c",
1006	"wasi/libc-top-half/musl/src/math/fminl.c",
1007	"wasi/libc-top-half/musl/src/math/fmod.c",
1008	"wasi/libc-top-half/musl/src/math/fmodf.c",
1009	"wasi/libc-top-half/musl/src/math/fmodl.c",
1010	"wasi/libc-top-half/musl/src/math/frexp.c",
1011	"wasi/libc-top-half/musl/src/math/frexpf.c",
1012	"wasi/libc-top-half/musl/src/math/frexpl.c",
1013	"wasi/libc-top-half/musl/src/math/hypot.c",
1014	"wasi/libc-top-half/musl/src/math/hypotf.c",
1015	"wasi/libc-top-half/musl/src/math/hypotl.c",
1016	"wasi/libc-top-half/musl/src/math/ilogb.c",
1017	"wasi/libc-top-half/musl/src/math/ilogbf.c",
1018	"wasi/libc-top-half/musl/src/math/ilogbl.c",
1019	"wasi/libc-top-half/musl/src/math/j0.c",
1020	"wasi/libc-top-half/musl/src/math/j0f.c",
1021	"wasi/libc-top-half/musl/src/math/j1.c",
1022	"wasi/libc-top-half/musl/src/math/j1f.c",
1023	"wasi/libc-top-half/musl/src/math/jn.c",
1024	"wasi/libc-top-half/musl/src/math/jnf.c",
1025	"wasi/libc-top-half/musl/src/math/ldexp.c",
1026	"wasi/libc-top-half/musl/src/math/ldexpf.c",
1027	"wasi/libc-top-half/musl/src/math/ldexpl.c",
1028	"wasi/libc-top-half/musl/src/math/lgamma.c",
1029	"wasi/libc-top-half/musl/src/math/lgamma_r.c",
1030	"wasi/libc-top-half/musl/src/math/lgammaf.c",
1031	"wasi/libc-top-half/musl/src/math/lgammaf_r.c",
1032	"wasi/libc-top-half/musl/src/math/lgammal.c",
1033	"wasi/libc-top-half/musl/src/math/llrint.c",
1034	"wasi/libc-top-half/musl/src/math/llrintf.c",
1035	"wasi/libc-top-half/musl/src/math/llrintl.c",
1036	"wasi/libc-top-half/musl/src/math/llround.c",
1037	"wasi/libc-top-half/musl/src/math/llroundf.c",
1038	"wasi/libc-top-half/musl/src/math/llroundl.c",
1039	"wasi/libc-top-half/musl/src/math/log.c",
1040	"wasi/libc-top-half/musl/src/math/log10.c",
1041	"wasi/libc-top-half/musl/src/math/log10f.c",
1042	"wasi/libc-top-half/musl/src/math/log10l.c",
1043	"wasi/libc-top-half/musl/src/math/log1p.c",
1044	"wasi/libc-top-half/musl/src/math/log1pf.c",
1045	"wasi/libc-top-half/musl/src/math/log1pl.c",
1046	"wasi/libc-top-half/musl/src/math/log2.c",
1047	"wasi/libc-top-half/musl/src/math/log2_data.c",
1048	"wasi/libc-top-half/musl/src/math/log2f.c",
1049	"wasi/libc-top-half/musl/src/math/log2f_data.c",
1050	"wasi/libc-top-half/musl/src/math/log2l.c",
1051	"wasi/libc-top-half/musl/src/math/log_data.c",
1052	"wasi/libc-top-half/musl/src/math/logb.c",
1053	"wasi/libc-top-half/musl/src/math/logbf.c",
1054	"wasi/libc-top-half/musl/src/math/logbl.c",
1055	"wasi/libc-top-half/musl/src/math/logf.c",
1056	"wasi/libc-top-half/musl/src/math/logf_data.c",
1057	"wasi/libc-top-half/musl/src/math/logl.c",
1058	"wasi/libc-top-half/musl/src/math/lrint.c",
1059	"wasi/libc-top-half/musl/src/math/lrintf.c",
1060	"wasi/libc-top-half/musl/src/math/lrintl.c",
1061	"wasi/libc-top-half/musl/src/math/lround.c",
1062	"wasi/libc-top-half/musl/src/math/lroundf.c",
1063	"wasi/libc-top-half/musl/src/math/lroundl.c",
1064	"wasi/libc-top-half/musl/src/math/modf.c",
1065	"wasi/libc-top-half/musl/src/math/modff.c",
1066	"wasi/libc-top-half/musl/src/math/modfl.c",
1067	"wasi/libc-top-half/musl/src/math/nan.c",
1068	"wasi/libc-top-half/musl/src/math/nanf.c",
1069	"wasi/libc-top-half/musl/src/math/nanl.c",
1070	"wasi/libc-top-half/musl/src/math/nearbyintl.c",
1071	"wasi/libc-top-half/musl/src/math/nextafter.c",
1072	"wasi/libc-top-half/musl/src/math/nextafterf.c",
1073	"wasi/libc-top-half/musl/src/math/nextafterl.c",
1074	"wasi/libc-top-half/musl/src/math/nexttoward.c",
1075	"wasi/libc-top-half/musl/src/math/nexttowardf.c",
1076	"wasi/libc-top-half/musl/src/math/nexttowardl.c",
1077	"wasi/libc-top-half/musl/src/math/pow.c",
1078	"wasi/libc-top-half/musl/src/math/pow_data.c",
1079	"wasi/libc-top-half/musl/src/math/powf.c",
1080	"wasi/libc-top-half/musl/src/math/powf_data.c",
1081	"wasi/libc-top-half/musl/src/math/powl.c",
1082	"wasi/libc-top-half/musl/src/math/remainder.c",
1083	"wasi/libc-top-half/musl/src/math/remainderf.c",
1084	"wasi/libc-top-half/musl/src/math/remainderl.c",
1085	"wasi/libc-top-half/musl/src/math/remquo.c",
1086	"wasi/libc-top-half/musl/src/math/remquof.c",
1087	"wasi/libc-top-half/musl/src/math/remquol.c",
1088	"wasi/libc-top-half/musl/src/math/rintl.c",
1089	"wasi/libc-top-half/musl/src/math/round.c",
1090	"wasi/libc-top-half/musl/src/math/roundf.c",
1091	"wasi/libc-top-half/musl/src/math/roundl.c",
1092	"wasi/libc-top-half/musl/src/math/scalb.c",
1093	"wasi/libc-top-half/musl/src/math/scalbf.c",
1094	"wasi/libc-top-half/musl/src/math/scalbln.c",
1095	"wasi/libc-top-half/musl/src/math/scalblnf.c",
1096	"wasi/libc-top-half/musl/src/math/scalblnl.c",
1097	"wasi/libc-top-half/musl/src/math/scalbn.c",
1098	"wasi/libc-top-half/musl/src/math/scalbnf.c",
1099	"wasi/libc-top-half/musl/src/math/scalbnl.c",
1100	"wasi/libc-top-half/musl/src/math/signgam.c",
1101	"wasi/libc-top-half/musl/src/math/significand.c",
1102	"wasi/libc-top-half/musl/src/math/significandf.c",
1103	"wasi/libc-top-half/musl/src/math/sin.c",
1104	"wasi/libc-top-half/musl/src/math/sincos.c",
1105	"wasi/libc-top-half/musl/src/math/sincosf.c",
1106	"wasi/libc-top-half/musl/src/math/sincosl.c",
1107	"wasi/libc-top-half/musl/src/math/sinf.c",
1108	"wasi/libc-top-half/musl/src/math/sinh.c",
1109	"wasi/libc-top-half/musl/src/math/sinhf.c",
1110	"wasi/libc-top-half/musl/src/math/sinhl.c",
1111	"wasi/libc-top-half/musl/src/math/sinl.c",
1112	"wasi/libc-top-half/musl/src/math/sqrt_data.c",
1113	"wasi/libc-top-half/musl/src/math/sqrtl.c",
1114	"wasi/libc-top-half/musl/src/math/tan.c",
1115	"wasi/libc-top-half/musl/src/math/tanf.c",
1116	"wasi/libc-top-half/musl/src/math/tanh.c",
1117	"wasi/libc-top-half/musl/src/math/tanhf.c",
1118	"wasi/libc-top-half/musl/src/math/tanhl.c",
1119	"wasi/libc-top-half/musl/src/math/tanl.c",
1120	"wasi/libc-top-half/musl/src/math/tgamma.c",
1121	"wasi/libc-top-half/musl/src/math/tgammaf.c",
1122	"wasi/libc-top-half/musl/src/math/tgammal.c",
1123	"wasi/libc-top-half/musl/src/math/truncl.c",
1124	"wasi/libc-top-half/musl/src/complex/__cexp.c",
1125	"wasi/libc-top-half/musl/src/complex/__cexpf.c",
1126	"wasi/libc-top-half/musl/src/complex/cabs.c",
1127	"wasi/libc-top-half/musl/src/complex/cabsf.c",
1128	"wasi/libc-top-half/musl/src/complex/cabsl.c",
1129	"wasi/libc-top-half/musl/src/complex/cacos.c",
1130	"wasi/libc-top-half/musl/src/complex/cacosf.c",
1131	"wasi/libc-top-half/musl/src/complex/cacosh.c",
1132	"wasi/libc-top-half/musl/src/complex/cacoshf.c",
1133	"wasi/libc-top-half/musl/src/complex/cacoshl.c",
1134	"wasi/libc-top-half/musl/src/complex/cacosl.c",
1135	"wasi/libc-top-half/musl/src/complex/carg.c",
1136	"wasi/libc-top-half/musl/src/complex/cargf.c",
1137	"wasi/libc-top-half/musl/src/complex/cargl.c",
1138	"wasi/libc-top-half/musl/src/complex/casin.c",
1139	"wasi/libc-top-half/musl/src/complex/casinf.c",
1140	"wasi/libc-top-half/musl/src/complex/casinh.c",
1141	"wasi/libc-top-half/musl/src/complex/casinhf.c",
1142	"wasi/libc-top-half/musl/src/complex/casinhl.c",
1143	"wasi/libc-top-half/musl/src/complex/casinl.c",
1144	"wasi/libc-top-half/musl/src/complex/catan.c",
1145	"wasi/libc-top-half/musl/src/complex/catanf.c",
1146	"wasi/libc-top-half/musl/src/complex/catanh.c",
1147	"wasi/libc-top-half/musl/src/complex/catanhf.c",
1148	"wasi/libc-top-half/musl/src/complex/catanhl.c",
1149	"wasi/libc-top-half/musl/src/complex/catanl.c",
1150	"wasi/libc-top-half/musl/src/complex/ccos.c",
1151	"wasi/libc-top-half/musl/src/complex/ccosf.c",
1152	"wasi/libc-top-half/musl/src/complex/ccosh.c",
1153	"wasi/libc-top-half/musl/src/complex/ccoshf.c",
1154	"wasi/libc-top-half/musl/src/complex/ccoshl.c",
1155	"wasi/libc-top-half/musl/src/complex/ccosl.c",
1156	"wasi/libc-top-half/musl/src/complex/cexp.c",
1157	"wasi/libc-top-half/musl/src/complex/cexpf.c",
1158	"wasi/libc-top-half/musl/src/complex/cexpl.c",
1159	"wasi/libc-top-half/musl/src/complex/clog.c",
1160	"wasi/libc-top-half/musl/src/complex/clogf.c",
1161	"wasi/libc-top-half/musl/src/complex/clogl.c",
1162	"wasi/libc-top-half/musl/src/complex/conj.c",
1163	"wasi/libc-top-half/musl/src/complex/conjf.c",
1164	"wasi/libc-top-half/musl/src/complex/conjl.c",
1165	"wasi/libc-top-half/musl/src/complex/cpow.c",
1166	"wasi/libc-top-half/musl/src/complex/cpowf.c",
1167	"wasi/libc-top-half/musl/src/complex/cpowl.c",
1168	"wasi/libc-top-half/musl/src/complex/cproj.c",
1169	"wasi/libc-top-half/musl/src/complex/cprojf.c",
1170	"wasi/libc-top-half/musl/src/complex/cprojl.c",
1171	"wasi/libc-top-half/musl/src/complex/csin.c",
1172	"wasi/libc-top-half/musl/src/complex/csinf.c",
1173	"wasi/libc-top-half/musl/src/complex/csinh.c",
1174	"wasi/libc-top-half/musl/src/complex/csinhf.c",
1175	"wasi/libc-top-half/musl/src/complex/csinhl.c",
1176	"wasi/libc-top-half/musl/src/complex/csinl.c",
1177	"wasi/libc-top-half/musl/src/complex/csqrt.c",
1178	"wasi/libc-top-half/musl/src/complex/csqrtf.c",
1179	"wasi/libc-top-half/musl/src/complex/csqrtl.c",
1180	"wasi/libc-top-half/musl/src/complex/ctan.c",
1181	"wasi/libc-top-half/musl/src/complex/ctanf.c",
1182	"wasi/libc-top-half/musl/src/complex/ctanh.c",
1183	"wasi/libc-top-half/musl/src/complex/ctanhf.c",
1184	"wasi/libc-top-half/musl/src/complex/ctanhl.c",
1185	"wasi/libc-top-half/musl/src/complex/ctanl.c",
1186	"wasi/libc-top-half/musl/src/crypt/crypt.c",
1187	"wasi/libc-top-half/musl/src/crypt/crypt_blowfish.c",
1188	"wasi/libc-top-half/musl/src/crypt/crypt_des.c",
1189	"wasi/libc-top-half/musl/src/crypt/crypt_md5.c",
1190	"wasi/libc-top-half/musl/src/crypt/crypt_r.c",
1191	"wasi/libc-top-half/musl/src/crypt/crypt_sha256.c",
1192	"wasi/libc-top-half/musl/src/crypt/crypt_sha512.c",
1193	"wasi/libc-top-half/musl/src/crypt/encrypt.c",
1194	"wasi/libc-top-half/sources/arc4random.c",	1229	"wasi/libc-top-half/sources/arc4random.c",
1195	};	1230	};
1196		1231