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	318	"-iwithsysroot",
319	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	324	"-DBULK_MEMORY_THRESHOLD=32",
322	325	});
323	326
...	...	@@ -370,6 +373,14 @@ fn addLibcBottomHalfIncludes(
370	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	384	"-I",
374	385	try comp.zig_lib_directory.join(arena, &[_][]const u8{
375	386	"libc",
...	...	@@ -379,6 +390,14 @@ fn addLibcBottomHalfIncludes(
379	390	"src",
380	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	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	428	"-I",
402	429	try comp.zig_lib_directory.join(arena, &[_][]const u8{
403	430	"libc",
...	...	@@ -408,6 +435,14 @@ fn addLibcTopHalfIncludes(
408	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	446	"-I",
412	447	try comp.zig_lib_directory.join(arena, &[_][]const u8{
413	448	"libc",
...	...	@@ -421,8 +456,6 @@ fn addLibcTopHalfIncludes(
421	456	"-I",
422	457	try comp.zig_lib_directory.join(arena, &[_][]const u8{
423	458	"libc",
424		"wasi",
425		"libc-top-half",
426	459	"musl",
427	460	"arch",
428	461	"generic",
...	...	@@ -532,665 +565,667 @@ const libc_bottom_half_src_files = [_][]const u8{
532	565	};
533	566
534	567	const libc_top_half_src_files = [_][]const u8{
535		"wasi/libc-top-half/musl/src/misc/a64l.c",
536		"wasi/libc-top-half/musl/src/misc/basename.c",
537		"wasi/libc-top-half/musl/src/misc/dirname.c",
538		"wasi/libc-top-half/musl/src/misc/ffs.c",
539		"wasi/libc-top-half/musl/src/misc/ffsl.c",
540		"wasi/libc-top-half/musl/src/misc/ffsll.c",
541		"wasi/libc-top-half/musl/src/misc/fmtmsg.c",
542		"wasi/libc-top-half/musl/src/misc/getdomainname.c",
543		"wasi/libc-top-half/musl/src/misc/gethostid.c",
544		"wasi/libc-top-half/musl/src/misc/getopt.c",
545		"wasi/libc-top-half/musl/src/misc/getopt_long.c",
546		"wasi/libc-top-half/musl/src/misc/getsubopt.c",
547		"wasi/libc-top-half/musl/src/misc/realpath.c",
548		"wasi/libc-top-half/musl/src/misc/uname.c",
549		"wasi/libc-top-half/musl/src/misc/nftw.c",
550		"wasi/libc-top-half/musl/src/errno/strerror.c",
551		"wasi/libc-top-half/musl/src/network/htonl.c",
552		"wasi/libc-top-half/musl/src/network/htons.c",
553		"wasi/libc-top-half/musl/src/network/ntohl.c",
554		"wasi/libc-top-half/musl/src/network/ntohs.c",
555		"wasi/libc-top-half/musl/src/network/inet_ntop.c",
556		"wasi/libc-top-half/musl/src/network/inet_pton.c",
557		"wasi/libc-top-half/musl/src/network/inet_aton.c",
558		"wasi/libc-top-half/musl/src/network/in6addr_any.c",
559		"wasi/libc-top-half/musl/src/network/in6addr_loopback.c",
560		"wasi/libc-top-half/musl/src/fenv/fenv.c",
561		"wasi/libc-top-half/musl/src/fenv/fesetround.c",
562		"wasi/libc-top-half/musl/src/fenv/feupdateenv.c",
563		"wasi/libc-top-half/musl/src/fenv/fesetexceptflag.c",
564		"wasi/libc-top-half/musl/src/fenv/fegetexceptflag.c",
565		"wasi/libc-top-half/musl/src/fenv/feholdexcept.c",
566		"wasi/libc-top-half/musl/src/exit/exit.c",
567		"wasi/libc-top-half/musl/src/exit/atexit.c",
568		"wasi/libc-top-half/musl/src/exit/assert.c",
569		"wasi/libc-top-half/musl/src/exit/quick_exit.c",
570		"wasi/libc-top-half/musl/src/exit/at_quick_exit.c",
571		"wasi/libc-top-half/musl/src/time/strftime.c",
572		"wasi/libc-top-half/musl/src/time/asctime.c",
573		"wasi/libc-top-half/musl/src/time/asctime_r.c",
574		"wasi/libc-top-half/musl/src/time/ctime.c",
575		"wasi/libc-top-half/musl/src/time/ctime_r.c",
576		"wasi/libc-top-half/musl/src/time/wcsftime.c",
577		"wasi/libc-top-half/musl/src/time/strptime.c",
578		"wasi/libc-top-half/musl/src/time/difftime.c",
579		"wasi/libc-top-half/musl/src/time/timegm.c",
580		"wasi/libc-top-half/musl/src/time/ftime.c",
581		"wasi/libc-top-half/musl/src/time/gmtime.c",
582		"wasi/libc-top-half/musl/src/time/gmtime_r.c",
583		"wasi/libc-top-half/musl/src/time/timespec_get.c",
584		"wasi/libc-top-half/musl/src/time/getdate.c",
585		"wasi/libc-top-half/musl/src/time/localtime.c",
586		"wasi/libc-top-half/musl/src/time/localtime_r.c",
587		"wasi/libc-top-half/musl/src/time/mktime.c",
588		"wasi/libc-top-half/musl/src/time/__tm_to_secs.c",
589		"wasi/libc-top-half/musl/src/time/__month_to_secs.c",
590		"wasi/libc-top-half/musl/src/time/__secs_to_tm.c",
591		"wasi/libc-top-half/musl/src/time/__year_to_secs.c",
592		"wasi/libc-top-half/musl/src/time/__tz.c",
593		"wasi/libc-top-half/musl/src/fcntl/creat.c",
	568	"musl/src/complex/cabs.c",
	569	"musl/src/complex/cabsf.c",
	570	"musl/src/complex/cabsl.c",
	571	"musl/src/complex/cacos.c",
	572	"musl/src/complex/cacosf.c",
	573	"musl/src/complex/cacosh.c",
	574	"musl/src/complex/cacoshf.c",
	575	"musl/src/complex/cacoshl.c",
	576	"musl/src/complex/cacosl.c",
	577	"musl/src/complex/carg.c",
	578	"musl/src/complex/cargf.c",
	579	"musl/src/complex/cargl.c",
	580	"musl/src/complex/casin.c",
	581	"musl/src/complex/casinf.c",
	582	"musl/src/complex/casinh.c",
	583	"musl/src/complex/casinhf.c",
	584	"musl/src/complex/casinhl.c",
	585	"musl/src/complex/casinl.c",
	586	"musl/src/complex/catan.c",
	587	"musl/src/complex/catanf.c",
	588	"musl/src/complex/catanh.c",
	589	"musl/src/complex/catanhf.c",
	590	"musl/src/complex/catanhl.c",
	591	"musl/src/complex/catanl.c",
	592	"musl/src/complex/ccos.c",
	593	"musl/src/complex/ccosf.c",
	594	"musl/src/complex/ccosh.c",
	595	"musl/src/complex/ccoshf.c",
	596	"musl/src/complex/ccoshl.c",
	597	"musl/src/complex/ccosl.c",
	598	"musl/src/complex/__cexp.c",
	599	"musl/src/complex/cexp.c",
	600	"musl/src/complex/__cexpf.c",
	601	"musl/src/complex/cexpf.c",
	602	"musl/src/complex/cexpl.c",
	603	"musl/src/complex/clog.c",
	604	"musl/src/complex/clogf.c",
	605	"musl/src/complex/clogl.c",
	606	"musl/src/complex/conj.c",
	607	"musl/src/complex/conjf.c",
	608	"musl/src/complex/conjl.c",
	609	"musl/src/complex/cpow.c",
	610	"musl/src/complex/cpowf.c",
	611	"musl/src/complex/cpowl.c",
	612	"musl/src/complex/cproj.c",
	613	"musl/src/complex/cprojf.c",
	614	"musl/src/complex/cprojl.c",
	615	"musl/src/complex/csin.c",
	616	"musl/src/complex/csinf.c",
	617	"musl/src/complex/csinh.c",
	618	"musl/src/complex/csinhf.c",
	619	"musl/src/complex/csinhl.c",
	620	"musl/src/complex/csinl.c",
	621	"musl/src/complex/csqrt.c",
	622	"musl/src/complex/csqrtf.c",
	623	"musl/src/complex/csqrtl.c",
	624	"musl/src/complex/ctan.c",
	625	"musl/src/complex/ctanf.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	1131	"wasi/libc-top-half/musl/src/dirent/alphasort.c",
595	1132	"wasi/libc-top-half/musl/src/dirent/versionsort.c",
596		"wasi/libc-top-half/musl/src/env/__stack_chk_fail.c",
597	1133	"wasi/libc-top-half/musl/src/env/clearenv.c",
598	1134	"wasi/libc-top-half/musl/src/env/getenv.c",
599	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	1137	"wasi/libc-top-half/musl/src/env/unsetenv.c",
602		"wasi/libc-top-half/musl/src/unistd/posix_close.c",
603		"wasi/libc-top-half/musl/src/stat/futimesat.c",
604		"wasi/libc-top-half/musl/src/legacy/getpagesize.c",
605		"wasi/libc-top-half/musl/src/thread/thrd_sleep.c",
	1138	"wasi/libc-top-half/musl/src/errno/strerror.c",
	1139	"wasi/libc-top-half/musl/src/exit/atexit.c",
	1140	"wasi/libc-top-half/musl/src/exit/at_quick_exit.c",
	1141	"wasi/libc-top-half/musl/src/exit/exit.c",
	1142	"wasi/libc-top-half/musl/src/fcntl/creat.c",
606	1143	"wasi/libc-top-half/musl/src/internal/defsysinfo.c",
607	1144	"wasi/libc-top-half/musl/src/internal/floatscan.c",
608	1145	"wasi/libc-top-half/musl/src/internal/intscan.c",
609	1146	"wasi/libc-top-half/musl/src/internal/libc.c",
610	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	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	1175	"wasi/libc-top-half/musl/src/stdio/fgetc.c",
635		"wasi/libc-top-half/musl/src/stdio/fgetln.c",
636	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	1177	"wasi/libc-top-half/musl/src/stdio/fmemopen.c",
642	1178	"wasi/libc-top-half/musl/src/stdio/fopen.c",
643		"wasi/libc-top-half/musl/src/stdio/fopencookie.c",
644		"wasi/libc-top-half/musl/src/stdio/fprintf.c",
	1179	"wasi/libc-top-half/musl/src/stdio/__fopen_rb_ca.c",
645	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	1181	"wasi/libc-top-half/musl/src/stdio/freopen.c",
651		"wasi/libc-top-half/musl/src/stdio/fscanf.c",
652	1182	"wasi/libc-top-half/musl/src/stdio/fseek.c",
653	1183	"wasi/libc-top-half/musl/src/stdio/fsetpos.c",
654	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	1185	"wasi/libc-top-half/musl/src/stdio/getc.c",
660		"wasi/libc-top-half/musl/src/stdio/getc_unlocked.c",
661	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	1187	"wasi/libc-top-half/musl/src/stdio/ofl.c",
669		"wasi/libc-top-half/musl/src/stdio/ofl_add.c",
670	1188	"wasi/libc-top-half/musl/src/stdio/open_memstream.c",
671	1189	"wasi/libc-top-half/musl/src/stdio/open_wmemstream.c",
672		"wasi/libc-top-half/musl/src/stdio/perror.c",
673	1190	"wasi/libc-top-half/musl/src/stdio/printf.c",
674	1191	"wasi/libc-top-half/musl/src/stdio/putc.c",
675		"wasi/libc-top-half/musl/src/stdio/putc_unlocked.c",
676	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	1193	"wasi/libc-top-half/musl/src/stdio/stderr.c",
692	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	1199	"wasi/libc-top-half/musl/src/stdio/stdout.c",
694		"wasi/libc-top-half/musl/src/stdio/swprintf.c",
695		"wasi/libc-top-half/musl/src/stdio/swscanf.c",
	1200	"wasi/libc-top-half/musl/src/stdio/__stdout_write.c",
696	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	1202	"wasi/libc-top-half/musl/src/stdio/vdprintf.c",
700	1203	"wasi/libc-top-half/musl/src/stdio/vfprintf.c",
701	1204	"wasi/libc-top-half/musl/src/stdio/vfscanf.c",
702	1205	"wasi/libc-top-half/musl/src/stdio/vfwprintf.c",
703	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	1207	"wasi/libc-top-half/musl/src/stdio/vsnprintf.c",
707		"wasi/libc-top-half/musl/src/stdio/vsprintf.c",
708	1208	"wasi/libc-top-half/musl/src/stdio/vsscanf.c",
709	1209	"wasi/libc-top-half/musl/src/stdio/vswprintf.c",
710	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	1211	"wasi/libc-top-half/musl/src/stdlib/strtod.c",
828	1212	"wasi/libc-top-half/musl/src/stdlib/strtol.c",
829	1213	"wasi/libc-top-half/musl/src/stdlib/wcstod.c",
830	1214	"wasi/libc-top-half/musl/src/stdlib/wcstol.c",
831		"wasi/libc-top-half/musl/src/search/hsearch.c",
832		"wasi/libc-top-half/musl/src/search/insque.c",
833		"wasi/libc-top-half/musl/src/search/lsearch.c",
834		"wasi/libc-top-half/musl/src/search/tdelete.c",
835		"wasi/libc-top-half/musl/src/search/tdestroy.c",
836		"wasi/libc-top-half/musl/src/search/tfind.c",
837		"wasi/libc-top-half/musl/src/search/tsearch.c",
838		"wasi/libc-top-half/musl/src/search/twalk.c",
839		"wasi/libc-top-half/musl/src/multibyte/btowc.c",
840		"wasi/libc-top-half/musl/src/multibyte/c16rtomb.c",
841		"wasi/libc-top-half/musl/src/multibyte/c32rtomb.c",
842		"wasi/libc-top-half/musl/src/multibyte/internal.c",
843		"wasi/libc-top-half/musl/src/multibyte/mblen.c",
844		"wasi/libc-top-half/musl/src/multibyte/mbrlen.c",
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",
	1215	"wasi/libc-top-half/musl/src/string/memset.c",
	1216	"wasi/libc-top-half/musl/src/time/getdate.c",
	1217	"wasi/libc-top-half/musl/src/time/gmtime.c",
	1218	"wasi/libc-top-half/musl/src/time/gmtime_r.c",
	1219	"wasi/libc-top-half/musl/src/time/localtime.c",
	1220	"wasi/libc-top-half/musl/src/time/localtime_r.c",
	1221	"wasi/libc-top-half/musl/src/time/mktime.c",
	1222	"wasi/libc-top-half/musl/src/time/__secs_to_tm.c",
	1223	"wasi/libc-top-half/musl/src/time/strftime.c",
	1224	"wasi/libc-top-half/musl/src/time/timegm.c",
	1225	"wasi/libc-top-half/musl/src/time/__tm_to_secs.c",
	1226	"wasi/libc-top-half/musl/src/time/__tz.c",
	1227	"wasi/libc-top-half/musl/src/time/wcsftime.c",
	1228
1194	1229	"wasi/libc-top-half/sources/arc4random.c",
1195	1230	};
1196	1231