Sagi Dayan
d5d1eecb89
Some checks failed
Codespell / Check for spelling errors (push) Failing after 1m26s
Signed-off-by: Sagi Dayan <sagidayan@gmail.com>
4321 lines
125 KiB
Go
4321 lines
125 KiB
Go
// Code generated by 'ccgo -export-externs X -export-fields F -hide __syscall0,__syscall1,__syscall2,__syscall3,__syscall4,__syscall5,__syscall6,getnameinfo,gethostbyaddr_r, -nostdinc -nostdlib -o ../musl_openbsd_386.go -pkgname libc -static-locals-prefix _s -Iarch/i386 -Iarch/generic -Iobj/src/internal -Isrc/include -Isrc/internal -Iobj/include -Iinclude copyright.c ../openbsd/ctype_.c src/ctype/isalnum.c src/ctype/isalpha.c src/ctype/isdigit.c src/ctype/islower.c src/ctype/isprint.c src/ctype/isspace.c src/ctype/isupper.c src/ctype/isxdigit.c src/internal/floatscan.c src/internal/intscan.c src/internal/shgetc.c src/math/copysignl.c src/math/fabsl.c src/math/fmodl.c src/math/rint.c src/math/scalbn.c src/math/scalbnl.c src/network/freeaddrinfo.c src/network/getaddrinfo.c src/network/gethostbyaddr.c src/network/gethostbyaddr_r.c src/network/gethostbyname.c src/network/gethostbyname2.c src/network/gethostbyname2_r.c src/network/getnameinfo.c src/network/h_errno.c src/network/inet_aton.c src/network/inet_ntop.c src/network/inet_pton.c src/network/lookup_ipliteral.c src/network/lookup_name.c src/network/lookup_serv.c src/stdio/__toread.c src/stdio/__uflow.c src/stdlib/bsearch.c src/stdlib/strtod.c src/stdlib/strtol.c src/string/strdup.c src/string/strnlen.c src/string/strspn.c', DO NOT EDIT.
|
|
|
|
package libc
|
|
|
|
import (
|
|
"math"
|
|
"reflect"
|
|
"sync/atomic"
|
|
"unsafe"
|
|
)
|
|
|
|
var _ = math.Pi
|
|
var _ reflect.Kind
|
|
var _ atomic.Value
|
|
var _ unsafe.Pointer
|
|
|
|
// musl as a whole is licensed under the following standard MIT license:
|
|
//
|
|
// ----------------------------------------------------------------------
|
|
// Copyright © 2005-2020 Rich Felker, et al.
|
|
//
|
|
// Permission is hereby granted, free of charge, to any person obtaining
|
|
// a copy of this software and associated documentation files (the
|
|
// "Software"), to deal in the Software without restriction, including
|
|
// without limitation the rights to use, copy, modify, merge, publish,
|
|
// distribute, sublicense, and/or sell copies of the Software, and to
|
|
// permit persons to whom the Software is furnished to do so, subject to
|
|
// the following conditions:
|
|
//
|
|
// The above copyright notice and this permission notice shall be
|
|
// included in all copies or substantial portions of the Software.
|
|
//
|
|
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
|
|
// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
|
|
// MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
|
|
// IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
|
|
// CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
|
|
// TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
|
|
// SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
|
// ----------------------------------------------------------------------
|
|
//
|
|
// Authors/contributors include:
|
|
//
|
|
// A. Wilcox
|
|
// Ada Worcester
|
|
// Alex Dowad
|
|
// Alex Suykov
|
|
// Alexander Monakov
|
|
// Andre McCurdy
|
|
// Andrew Kelley
|
|
// Anthony G. Basile
|
|
// Aric Belsito
|
|
// Arvid Picciani
|
|
// Bartosz Brachaczek
|
|
// Benjamin Peterson
|
|
// Bobby Bingham
|
|
// Boris Brezillon
|
|
// Brent Cook
|
|
// Chris Spiegel
|
|
// Clément Vasseur
|
|
// Daniel Micay
|
|
// Daniel Sabogal
|
|
// Daurnimator
|
|
// David Carlier
|
|
// David Edelsohn
|
|
// Denys Vlasenko
|
|
// Dmitry Ivanov
|
|
// Dmitry V. Levin
|
|
// Drew DeVault
|
|
// Emil Renner Berthing
|
|
// Fangrui Song
|
|
// Felix Fietkau
|
|
// Felix Janda
|
|
// Gianluca Anzolin
|
|
// Hauke Mehrtens
|
|
// He X
|
|
// Hiltjo Posthuma
|
|
// Isaac Dunham
|
|
// Jaydeep Patil
|
|
// Jens Gustedt
|
|
// Jeremy Huntwork
|
|
// Jo-Philipp Wich
|
|
// Joakim Sindholt
|
|
// John Spencer
|
|
// Julien Ramseier
|
|
// Justin Cormack
|
|
// Kaarle Ritvanen
|
|
// Khem Raj
|
|
// Kylie McClain
|
|
// Leah Neukirchen
|
|
// Luca Barbato
|
|
// Luka Perkov
|
|
// M Farkas-Dyck (Strake)
|
|
// Mahesh Bodapati
|
|
// Markus Wichmann
|
|
// Masanori Ogino
|
|
// Michael Clark
|
|
// Michael Forney
|
|
// Mikhail Kremnyov
|
|
// Natanael Copa
|
|
// Nicholas J. Kain
|
|
// orc
|
|
// Pascal Cuoq
|
|
// Patrick Oppenlander
|
|
// Petr Hosek
|
|
// Petr Skocik
|
|
// Pierre Carrier
|
|
// Reini Urban
|
|
// Rich Felker
|
|
// Richard Pennington
|
|
// Ryan Fairfax
|
|
// Samuel Holland
|
|
// Segev Finer
|
|
// Shiz
|
|
// sin
|
|
// Solar Designer
|
|
// Stefan Kristiansson
|
|
// Stefan O'Rear
|
|
// Szabolcs Nagy
|
|
// Timo Teräs
|
|
// Trutz Behn
|
|
// Valentin Ochs
|
|
// Will Dietz
|
|
// William Haddon
|
|
// William Pitcock
|
|
//
|
|
// Portions of this software are derived from third-party works licensed
|
|
// under terms compatible with the above MIT license:
|
|
//
|
|
// The TRE regular expression implementation (src/regex/reg* and
|
|
// src/regex/tre*) is Copyright © 2001-2008 Ville Laurikari and licensed
|
|
// under a 2-clause BSD license (license text in the source files). The
|
|
// included version has been heavily modified by Rich Felker in 2012, in
|
|
// the interests of size, simplicity, and namespace cleanliness.
|
|
//
|
|
// Much of the math library code (src/math/* and src/complex/*) is
|
|
// Copyright © 1993,2004 Sun Microsystems or
|
|
// Copyright © 2003-2011 David Schultz or
|
|
// Copyright © 2003-2009 Steven G. Kargl or
|
|
// Copyright © 2003-2009 Bruce D. Evans or
|
|
// Copyright © 2008 Stephen L. Moshier or
|
|
// Copyright © 2017-2018 Arm Limited
|
|
// and labelled as such in comments in the individual source files. All
|
|
// have been licensed under extremely permissive terms.
|
|
//
|
|
// The ARM memcpy code (src/string/arm/memcpy.S) is Copyright © 2008
|
|
// The Android Open Source Project and is licensed under a two-clause BSD
|
|
// license. It was taken from Bionic libc, used on Android.
|
|
//
|
|
// The AArch64 memcpy and memset code (src/string/aarch64/*) are
|
|
// Copyright © 1999-2019, Arm Limited.
|
|
//
|
|
// The implementation of DES for crypt (src/crypt/crypt_des.c) is
|
|
// Copyright © 1994 David Burren. It is licensed under a BSD license.
|
|
//
|
|
// The implementation of blowfish crypt (src/crypt/crypt_blowfish.c) was
|
|
// originally written by Solar Designer and placed into the public
|
|
// domain. The code also comes with a fallback permissive license for use
|
|
// in jurisdictions that may not recognize the public domain.
|
|
//
|
|
// The smoothsort implementation (src/stdlib/qsort.c) is Copyright © 2011
|
|
// Valentin Ochs and is licensed under an MIT-style license.
|
|
//
|
|
// The x86_64 port was written by Nicholas J. Kain and is licensed under
|
|
// the standard MIT terms.
|
|
//
|
|
// The mips and microblaze ports were originally written by Richard
|
|
// Pennington for use in the ellcc project. The original code was adapted
|
|
// by Rich Felker for build system and code conventions during upstream
|
|
// integration. It is licensed under the standard MIT terms.
|
|
//
|
|
// The mips64 port was contributed by Imagination Technologies and is
|
|
// licensed under the standard MIT terms.
|
|
//
|
|
// The powerpc port was also originally written by Richard Pennington,
|
|
// and later supplemented and integrated by John Spencer. It is licensed
|
|
// under the standard MIT terms.
|
|
//
|
|
// All other files which have no copyright comments are original works
|
|
// produced specifically for use as part of this library, written either
|
|
// by Rich Felker, the main author of the library, or by one or more
|
|
// contibutors listed above. Details on authorship of individual files
|
|
// can be found in the git version control history of the project. The
|
|
// omission of copyright and license comments in each file is in the
|
|
// interest of source tree size.
|
|
//
|
|
// In addition, permission is hereby granted for all public header files
|
|
// (include/* and arch/*/bits/*) and crt files intended to be linked into
|
|
// applications (crt/*, ldso/dlstart.c, and arch/*/crt_arch.h) to omit
|
|
// the copyright notice and permission notice otherwise required by the
|
|
// license, and to use these files without any requirement of
|
|
// attribution. These files include substantial contributions from:
|
|
//
|
|
// Bobby Bingham
|
|
// John Spencer
|
|
// Nicholas J. Kain
|
|
// Rich Felker
|
|
// Richard Pennington
|
|
// Stefan Kristiansson
|
|
// Szabolcs Nagy
|
|
//
|
|
// all of whom have explicitly granted such permission.
|
|
//
|
|
// This file previously contained text expressing a belief that most of
|
|
// the files covered by the above exception were sufficiently trivial not
|
|
// to be subject to copyright, resulting in confusion over whether it
|
|
// negated the permissions granted in the license. In the spirit of
|
|
// permissive licensing, and of not having licensing issues being an
|
|
// obstacle to adoption, that text has been removed.
|
|
const ( /* copyright.c:194:1: */
|
|
__musl__copyright__ = 0
|
|
)
|
|
|
|
const ( /* nameser.h:117:1: */
|
|
ns_uop_delete = 0
|
|
ns_uop_add = 1
|
|
ns_uop_max = 2
|
|
)
|
|
|
|
const ( /* nameser.h:147:1: */
|
|
ns_t_invalid = 0
|
|
ns_t_a = 1
|
|
ns_t_ns = 2
|
|
ns_t_md = 3
|
|
ns_t_mf = 4
|
|
ns_t_cname = 5
|
|
ns_t_soa = 6
|
|
ns_t_mb = 7
|
|
ns_t_mg = 8
|
|
ns_t_mr = 9
|
|
ns_t_null = 10
|
|
ns_t_wks = 11
|
|
ns_t_ptr = 12
|
|
ns_t_hinfo = 13
|
|
ns_t_minfo = 14
|
|
ns_t_mx = 15
|
|
ns_t_txt = 16
|
|
ns_t_rp = 17
|
|
ns_t_afsdb = 18
|
|
ns_t_x25 = 19
|
|
ns_t_isdn = 20
|
|
ns_t_rt = 21
|
|
ns_t_nsap = 22
|
|
ns_t_nsap_ptr = 23
|
|
ns_t_sig = 24
|
|
ns_t_key = 25
|
|
ns_t_px = 26
|
|
ns_t_gpos = 27
|
|
ns_t_aaaa = 28
|
|
ns_t_loc = 29
|
|
ns_t_nxt = 30
|
|
ns_t_eid = 31
|
|
ns_t_nimloc = 32
|
|
ns_t_srv = 33
|
|
ns_t_atma = 34
|
|
ns_t_naptr = 35
|
|
ns_t_kx = 36
|
|
ns_t_cert = 37
|
|
ns_t_a6 = 38
|
|
ns_t_dname = 39
|
|
ns_t_sink = 40
|
|
ns_t_opt = 41
|
|
ns_t_apl = 42
|
|
ns_t_tkey = 249
|
|
ns_t_tsig = 250
|
|
ns_t_ixfr = 251
|
|
ns_t_axfr = 252
|
|
ns_t_mailb = 253
|
|
ns_t_maila = 254
|
|
ns_t_any = 255
|
|
ns_t_zxfr = 256
|
|
ns_t_max = 65536
|
|
)
|
|
|
|
const ( /* nameser.h:210:1: */
|
|
ns_c_invalid = 0
|
|
ns_c_in = 1
|
|
ns_c_2 = 2
|
|
ns_c_chaos = 3
|
|
ns_c_hs = 4
|
|
ns_c_none = 254
|
|
ns_c_any = 255
|
|
ns_c_max = 65536
|
|
)
|
|
|
|
const ( /* nameser.h:221:1: */
|
|
ns_kt_rsa = 1
|
|
ns_kt_dh = 2
|
|
ns_kt_dsa = 3
|
|
ns_kt_private = 254
|
|
)
|
|
|
|
const ( /* nameser.h:228:1: */
|
|
cert_t_pkix = 1
|
|
cert_t_spki = 2
|
|
cert_t_pgp = 3
|
|
cert_t_url = 253
|
|
cert_t_oid = 254
|
|
)
|
|
|
|
const ( /* nameser.h:28:1: */
|
|
ns_s_qd = 0
|
|
ns_s_zn = 0
|
|
ns_s_an = 1
|
|
ns_s_pr = 1
|
|
ns_s_ns = 2
|
|
ns_s_ud = 2
|
|
ns_s_ar = 3
|
|
ns_s_max = 4
|
|
)
|
|
|
|
const ( /* nameser.h:75:1: */
|
|
ns_f_qr = 0
|
|
ns_f_opcode = 1
|
|
ns_f_aa = 2
|
|
ns_f_tc = 3
|
|
ns_f_rd = 4
|
|
ns_f_ra = 5
|
|
ns_f_z = 6
|
|
ns_f_ad = 7
|
|
ns_f_cd = 8
|
|
ns_f_rcode = 9
|
|
ns_f_max = 10
|
|
)
|
|
|
|
const ( /* nameser.h:89:1: */
|
|
ns_o_query = 0
|
|
ns_o_iquery = 1
|
|
ns_o_status = 2
|
|
ns_o_notify = 4
|
|
ns_o_update = 5
|
|
ns_o_max = 6
|
|
)
|
|
|
|
const ( /* nameser.h:98:1: */
|
|
ns_r_noerror = 0
|
|
ns_r_formerr = 1
|
|
ns_r_servfail = 2
|
|
ns_r_nxdomain = 3
|
|
ns_r_notimpl = 4
|
|
ns_r_refused = 5
|
|
ns_r_yxdomain = 6
|
|
ns_r_yxrrset = 7
|
|
ns_r_nxrrset = 8
|
|
ns_r_notauth = 9
|
|
ns_r_notzone = 10
|
|
ns_r_max = 11
|
|
ns_r_badvers = 16
|
|
ns_r_badsig = 16
|
|
ns_r_badkey = 17
|
|
ns_r_badtime = 18
|
|
)
|
|
|
|
type ptrdiff_t = int32 /* <builtin>:3:26 */
|
|
|
|
type size_t = uint32 /* <builtin>:9:23 */
|
|
|
|
type wchar_t = int32 /* <builtin>:15:24 */
|
|
|
|
// # 1 "lib/libc/gen/ctype_.c"
|
|
// # 1 "<built-in>"
|
|
// # 1 "<command-line>"
|
|
// # 1 "lib/libc/gen/ctype_.c"
|
|
// # 36 "lib/libc/gen/ctype_.c"
|
|
// # 1 "./include/ctype.h" 1
|
|
// # 43 "./include/ctype.h"
|
|
// # 1 "./sys/sys/cdefs.h" 1
|
|
// # 41 "./sys/sys/cdefs.h"
|
|
// # 1 "./machine/cdefs.h" 1
|
|
// # 42 "./sys/sys/cdefs.h" 2
|
|
// # 44 "./include/ctype.h" 2
|
|
// # 57 "./include/ctype.h"
|
|
// typedef void *locale_t;
|
|
//
|
|
//
|
|
//
|
|
//
|
|
//
|
|
// extern const char *_ctype_;
|
|
// extern const short *_tolower_tab_;
|
|
// extern const short *_toupper_tab_;
|
|
//
|
|
//
|
|
// int isalnum(int);
|
|
// int isalpha(int);
|
|
// int iscntrl(int);
|
|
// int isdigit(int);
|
|
// int isgraph(int);
|
|
// int islower(int);
|
|
// int isprint(int);
|
|
// int ispunct(int);
|
|
// int isspace(int);
|
|
// int isupper(int);
|
|
// int isxdigit(int);
|
|
// int tolower(int);
|
|
// int toupper(int);
|
|
//
|
|
//
|
|
//
|
|
// int isblank(int);
|
|
//
|
|
//
|
|
//
|
|
// int isascii(int);
|
|
// int toascii(int);
|
|
// int _tolower(int);
|
|
// int _toupper(int);
|
|
//
|
|
//
|
|
//
|
|
// int isalnum_l(int, locale_t);
|
|
// int isalpha_l(int, locale_t);
|
|
// int isblank_l(int, locale_t);
|
|
// int iscntrl_l(int, locale_t);
|
|
// int isdigit_l(int, locale_t);
|
|
// int isgraph_l(int, locale_t);
|
|
// int islower_l(int, locale_t);
|
|
// int isprint_l(int, locale_t);
|
|
// int ispunct_l(int, locale_t);
|
|
// int isspace_l(int, locale_t);
|
|
// int isupper_l(int, locale_t);
|
|
// int isxdigit_l(int, locale_t);
|
|
// int tolower_l(int, locale_t);
|
|
// int toupper_l(int, locale_t);
|
|
//
|
|
//
|
|
//
|
|
//
|
|
//
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int isalnum(int _c)
|
|
// {
|
|
// return (_c == -1 ? 0 : ((_ctype_ + 1)[(unsigned char)_c] & (0x01|0x02|0x04)));
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int isalpha(int _c)
|
|
// {
|
|
// return (_c == -1 ? 0 : ((_ctype_ + 1)[(unsigned char)_c] & (0x01|0x02)));
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int iscntrl(int _c)
|
|
// {
|
|
// return (_c == -1 ? 0 : ((_ctype_ + 1)[(unsigned char)_c] & 0x20));
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int isdigit(int _c)
|
|
// {
|
|
// return (_c == -1 ? 0 : ((_ctype_ + 1)[(unsigned char)_c] & 0x04));
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int isgraph(int _c)
|
|
// {
|
|
// return (_c == -1 ? 0 : ((_ctype_ + 1)[(unsigned char)_c] & (0x10|0x01|0x02|0x04)));
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int islower(int _c)
|
|
// {
|
|
// return (_c == -1 ? 0 : ((_ctype_ + 1)[(unsigned char)_c] & 0x02));
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int isprint(int _c)
|
|
// {
|
|
// return (_c == -1 ? 0 : ((_ctype_ + 1)[(unsigned char)_c] & (0x10|0x01|0x02|0x04|0x80)));
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int ispunct(int _c)
|
|
// {
|
|
// return (_c == -1 ? 0 : ((_ctype_ + 1)[(unsigned char)_c] & 0x10));
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int isspace(int _c)
|
|
// {
|
|
// return (_c == -1 ? 0 : ((_ctype_ + 1)[(unsigned char)_c] & 0x08));
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int isupper(int _c)
|
|
// {
|
|
// return (_c == -1 ? 0 : ((_ctype_ + 1)[(unsigned char)_c] & 0x01));
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int isxdigit(int _c)
|
|
// {
|
|
// return (_c == -1 ? 0 : ((_ctype_ + 1)[(unsigned char)_c] & (0x04|0x40)));
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int tolower(int _c)
|
|
// {
|
|
// if ((unsigned int)_c > 255)
|
|
// return (_c);
|
|
// return ((_tolower_tab_ + 1)[_c]);
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int toupper(int _c)
|
|
// {
|
|
// if ((unsigned int)_c > 255)
|
|
// return (_c);
|
|
// return ((_toupper_tab_ + 1)[_c]);
|
|
// }
|
|
//
|
|
//
|
|
|
|
// extern __inline __attribute__((__gnu_inline__))
|
|
func Xisblank(tls *TLS, _c int32) int32 { /* ctype_.c:144:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v _c=%v, (%v:)", tls, _c, origin(2))
|
|
}
|
|
return Bool32(_c == ' ' || _c == '\t')
|
|
}
|
|
|
|
// extern __inline __attribute__((__gnu_inline__)) int isascii(int _c)
|
|
// {
|
|
// return ((unsigned int)_c <= 0177);
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int toascii(int _c)
|
|
// {
|
|
// return (_c & 0177);
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int _tolower(int _c)
|
|
// {
|
|
// return (_c - 'A' + 'a');
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int _toupper(int _c)
|
|
// {
|
|
// return (_c - 'a' + 'A');
|
|
// }
|
|
//
|
|
//
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int
|
|
// isalnum_l(int _c, locale_t _l __attribute__((__unused__)))
|
|
// {
|
|
// return isalnum(_c);
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int
|
|
// isalpha_l(int _c, locale_t _l __attribute__((__unused__)))
|
|
// {
|
|
// return isalpha(_c);
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int
|
|
// isblank_l(int _c, locale_t _l __attribute__((__unused__)))
|
|
// {
|
|
// return isblank(_c);
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int
|
|
// iscntrl_l(int _c, locale_t _l __attribute__((__unused__)))
|
|
// {
|
|
// return iscntrl(_c);
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int
|
|
// isdigit_l(int _c, locale_t _l __attribute__((__unused__)))
|
|
// {
|
|
// return isdigit(_c);
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int
|
|
// isgraph_l(int _c, locale_t _l __attribute__((__unused__)))
|
|
// {
|
|
// return isgraph(_c);
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int
|
|
// islower_l(int _c, locale_t _l __attribute__((__unused__)))
|
|
// {
|
|
// return islower(_c);
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int
|
|
// isprint_l(int _c, locale_t _l __attribute__((__unused__)))
|
|
// {
|
|
// return isprint(_c);
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int
|
|
// ispunct_l(int _c, locale_t _l __attribute__((__unused__)))
|
|
// {
|
|
// return ispunct(_c);
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int
|
|
// isspace_l(int _c, locale_t _l __attribute__((__unused__)))
|
|
// {
|
|
// return isspace(_c);
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int
|
|
// isupper_l(int _c, locale_t _l __attribute__((__unused__)))
|
|
// {
|
|
// return isupper(_c);
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int
|
|
// isxdigit_l(int _c, locale_t _l __attribute__((__unused__)))
|
|
// {
|
|
// return isxdigit(_c);
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int
|
|
// tolower_l(int _c, locale_t _l __attribute__((__unused__)))
|
|
// {
|
|
// return tolower(_c);
|
|
// }
|
|
//
|
|
// extern __inline __attribute__((__gnu_inline__)) int
|
|
// toupper_l(int _c, locale_t _l __attribute__((__unused__)))
|
|
// {
|
|
// return toupper(_c);
|
|
// }
|
|
//
|
|
//
|
|
//
|
|
//
|
|
//
|
|
// # 37 "lib/libc/gen/ctype_.c" 2
|
|
// # 1 "./lib/libc/include/ctype_private.h" 1
|
|
//
|
|
//
|
|
//
|
|
//
|
|
//
|
|
// # 5 "./lib/libc/include/ctype_private.h"
|
|
// #pragma GCC visibility push(hidden)
|
|
// # 5 "./lib/libc/include/ctype_private.h"
|
|
//
|
|
// extern const char _C_ctype_[];
|
|
// extern const short _C_toupper_[];
|
|
// extern const short _C_tolower_[];
|
|
//
|
|
// # 9 "./lib/libc/include/ctype_private.h"
|
|
// #pragma GCC visibility pop
|
|
// # 9 "./lib/libc/include/ctype_private.h"
|
|
//
|
|
// # 38 "lib/libc/gen/ctype_.c" 2
|
|
|
|
var X_C_ctype_ = [257]int8{
|
|
int8(0),
|
|
int8(0x20), int8(0x20), int8(0x20), int8(0x20), int8(0x20), int8(0x20), int8(0x20), int8(0x20),
|
|
int8(0x20), int8(0x20 | 0x08), int8(0x20 | 0x08), int8(0x20 | 0x08), int8(0x20 | 0x08), int8(0x20 | 0x08), int8(0x20), int8(0x20),
|
|
int8(0x20), int8(0x20), int8(0x20), int8(0x20), int8(0x20), int8(0x20), int8(0x20), int8(0x20),
|
|
int8(0x20), int8(0x20), int8(0x20), int8(0x20), int8(0x20), int8(0x20), int8(0x20), int8(0x20),
|
|
int8(0x08 | int32(Int8FromInt32(0x80))), int8(0x10), int8(0x10), int8(0x10), int8(0x10), int8(0x10), int8(0x10), int8(0x10),
|
|
int8(0x10), int8(0x10), int8(0x10), int8(0x10), int8(0x10), int8(0x10), int8(0x10), int8(0x10),
|
|
int8(0x04), int8(0x04), int8(0x04), int8(0x04), int8(0x04), int8(0x04), int8(0x04), int8(0x04),
|
|
int8(0x04), int8(0x04), int8(0x10), int8(0x10), int8(0x10), int8(0x10), int8(0x10), int8(0x10),
|
|
int8(0x10), int8(0x01 | 0x40), int8(0x01 | 0x40), int8(0x01 | 0x40), int8(0x01 | 0x40), int8(0x01 | 0x40), int8(0x01 | 0x40), int8(0x01),
|
|
int8(0x01), int8(0x01), int8(0x01), int8(0x01), int8(0x01), int8(0x01), int8(0x01), int8(0x01),
|
|
int8(0x01), int8(0x01), int8(0x01), int8(0x01), int8(0x01), int8(0x01), int8(0x01), int8(0x01),
|
|
int8(0x01), int8(0x01), int8(0x01), int8(0x10), int8(0x10), int8(0x10), int8(0x10), int8(0x10),
|
|
int8(0x10), int8(0x02 | 0x40), int8(0x02 | 0x40), int8(0x02 | 0x40), int8(0x02 | 0x40), int8(0x02 | 0x40), int8(0x02 | 0x40), int8(0x02),
|
|
int8(0x02), int8(0x02), int8(0x02), int8(0x02), int8(0x02), int8(0x02), int8(0x02), int8(0x02),
|
|
int8(0x02), int8(0x02), int8(0x02), int8(0x02), int8(0x02), int8(0x02), int8(0x02), int8(0x02),
|
|
int8(0x02), int8(0x02), int8(0x02), int8(0x10), int8(0x10), int8(0x10), int8(0x10), int8(0x20),
|
|
|
|
int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0),
|
|
int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0),
|
|
int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0),
|
|
int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0),
|
|
int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0),
|
|
int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0),
|
|
int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0),
|
|
int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0),
|
|
int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0),
|
|
int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0),
|
|
int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0),
|
|
int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0),
|
|
int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0),
|
|
int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0),
|
|
int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0),
|
|
int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0), int8(0),
|
|
} /* ctype_.c:282:12 */
|
|
|
|
var X_ctype_ uintptr = 0 /* ctype_.c:319:12 */
|
|
|
|
func __isspace(tls *TLS, _c int32) int32 { /* ctype.h:26:21: */
|
|
return Bool32(_c == ' ' || uint32(_c)-uint32('\t') < uint32(5))
|
|
}
|
|
|
|
type locale_t = uintptr /* alltypes.h:366:32 */
|
|
|
|
func Xisalnum(tls *TLS, c int32) int32 { /* isalnum.c:3:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v c=%v, (%v:)", tls, c, origin(2))
|
|
}
|
|
return Bool32(func() int32 {
|
|
if 0 != 0 {
|
|
return Xisalpha(tls, c)
|
|
}
|
|
return Bool32(uint32(c)|uint32(32)-uint32('a') < uint32(26))
|
|
}() != 0 || func() int32 {
|
|
if 0 != 0 {
|
|
return Xisdigit(tls, c)
|
|
}
|
|
return Bool32(uint32(c)-uint32('0') < uint32(10))
|
|
}() != 0)
|
|
}
|
|
|
|
func X__isalnum_l(tls *TLS, c int32, l locale_t) int32 { /* isalnum.c:8:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v c=%v l=%v, (%v:)", tls, c, l, origin(2))
|
|
}
|
|
return Xisalnum(tls, c)
|
|
}
|
|
|
|
func Xisalpha(tls *TLS, c int32) int32 { /* isalpha.c:4:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v c=%v, (%v:)", tls, c, origin(2))
|
|
}
|
|
return Bool32(uint32(c)|uint32(32)-uint32('a') < uint32(26))
|
|
}
|
|
|
|
func X__isalpha_l(tls *TLS, c int32, l locale_t) int32 { /* isalpha.c:9:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v c=%v l=%v, (%v:)", tls, c, l, origin(2))
|
|
}
|
|
return Xisalpha(tls, c)
|
|
}
|
|
|
|
func Xisdigit(tls *TLS, c int32) int32 { /* isdigit.c:4:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v c=%v, (%v:)", tls, c, origin(2))
|
|
}
|
|
return Bool32(uint32(c)-uint32('0') < uint32(10))
|
|
}
|
|
|
|
func X__isdigit_l(tls *TLS, c int32, l locale_t) int32 { /* isdigit.c:9:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v c=%v l=%v, (%v:)", tls, c, l, origin(2))
|
|
}
|
|
return Xisdigit(tls, c)
|
|
}
|
|
|
|
func Xislower(tls *TLS, c int32) int32 { /* islower.c:4:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v c=%v, (%v:)", tls, c, origin(2))
|
|
}
|
|
return Bool32(uint32(c)-uint32('a') < uint32(26))
|
|
}
|
|
|
|
func X__islower_l(tls *TLS, c int32, l locale_t) int32 { /* islower.c:9:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v c=%v l=%v, (%v:)", tls, c, l, origin(2))
|
|
}
|
|
return Xislower(tls, c)
|
|
}
|
|
|
|
func Xisprint(tls *TLS, c int32) int32 { /* isprint.c:4:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v c=%v, (%v:)", tls, c, origin(2))
|
|
}
|
|
return Bool32(uint32(c)-uint32(0x20) < uint32(0x5f))
|
|
}
|
|
|
|
func X__isprint_l(tls *TLS, c int32, l locale_t) int32 { /* isprint.c:9:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v c=%v l=%v, (%v:)", tls, c, l, origin(2))
|
|
}
|
|
return Xisprint(tls, c)
|
|
}
|
|
|
|
func Xisspace(tls *TLS, c int32) int32 { /* isspace.c:4:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v c=%v, (%v:)", tls, c, origin(2))
|
|
}
|
|
return Bool32(c == ' ' || uint32(c)-uint32('\t') < uint32(5))
|
|
}
|
|
|
|
func X__isspace_l(tls *TLS, c int32, l locale_t) int32 { /* isspace.c:9:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v c=%v l=%v, (%v:)", tls, c, l, origin(2))
|
|
}
|
|
return Xisspace(tls, c)
|
|
}
|
|
|
|
func Xisupper(tls *TLS, c int32) int32 { /* isupper.c:4:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v c=%v, (%v:)", tls, c, origin(2))
|
|
}
|
|
return Bool32(uint32(c)-uint32('A') < uint32(26))
|
|
}
|
|
|
|
func X__isupper_l(tls *TLS, c int32, l locale_t) int32 { /* isupper.c:9:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v c=%v l=%v, (%v:)", tls, c, l, origin(2))
|
|
}
|
|
return Xisupper(tls, c)
|
|
}
|
|
|
|
func Xisxdigit(tls *TLS, c int32) int32 { /* isxdigit.c:3:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v c=%v, (%v:)", tls, c, origin(2))
|
|
}
|
|
return Bool32(func() int32 {
|
|
if 0 != 0 {
|
|
return Xisdigit(tls, c)
|
|
}
|
|
return Bool32(uint32(c)-uint32('0') < uint32(10))
|
|
}() != 0 || uint32(c)|uint32(32)-uint32('a') < uint32(6))
|
|
}
|
|
|
|
func X__isxdigit_l(tls *TLS, c int32, l locale_t) int32 { /* isxdigit.c:8:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v c=%v l=%v, (%v:)", tls, c, l, origin(2))
|
|
}
|
|
return Xisxdigit(tls, c)
|
|
}
|
|
|
|
type uintptr_t = uint32 /* alltypes.h:78:24 */
|
|
|
|
type intptr_t = int32 /* alltypes.h:93:15 */
|
|
|
|
type int8_t = int8 /* alltypes.h:119:25 */
|
|
|
|
type int16_t = int16 /* alltypes.h:124:25 */
|
|
|
|
type int32_t = int32 /* alltypes.h:129:25 */
|
|
|
|
type int64_t = int64 /* alltypes.h:134:25 */
|
|
|
|
type intmax_t = int64 /* alltypes.h:139:25 */
|
|
|
|
type uint8_t = uint8 /* alltypes.h:144:25 */
|
|
|
|
type uint16_t = uint16 /* alltypes.h:149:25 */
|
|
|
|
type uint32_t = uint32 /* alltypes.h:154:25 */
|
|
|
|
type uint64_t = uint64 /* alltypes.h:159:25 */
|
|
|
|
type uintmax_t = uint64 /* alltypes.h:169:25 */
|
|
|
|
type int_fast8_t = int8_t /* stdint.h:22:16 */
|
|
type int_fast64_t = int64_t /* stdint.h:23:17 */
|
|
|
|
type int_least8_t = int8_t /* stdint.h:25:17 */
|
|
type int_least16_t = int16_t /* stdint.h:26:17 */
|
|
type int_least32_t = int32_t /* stdint.h:27:17 */
|
|
type int_least64_t = int64_t /* stdint.h:28:17 */
|
|
|
|
type uint_fast8_t = uint8_t /* stdint.h:30:17 */
|
|
type uint_fast64_t = uint64_t /* stdint.h:31:18 */
|
|
|
|
type uint_least8_t = uint8_t /* stdint.h:33:18 */
|
|
type uint_least16_t = uint16_t /* stdint.h:34:18 */
|
|
type uint_least32_t = uint32_t /* stdint.h:35:18 */
|
|
type uint_least64_t = uint64_t /* stdint.h:36:18 */
|
|
|
|
type int_fast16_t = int32_t /* stdint.h:1:17 */
|
|
type int_fast32_t = int32_t /* stdint.h:2:17 */
|
|
type uint_fast16_t = uint32_t /* stdint.h:3:18 */
|
|
type uint_fast32_t = uint32_t /* stdint.h:4:18 */
|
|
|
|
type ssize_t = int32 /* alltypes.h:88:15 */
|
|
|
|
type off_t = int64 /* alltypes.h:185:16 */
|
|
|
|
type _IO_FILE = struct {
|
|
Fflags uint32
|
|
Frpos uintptr
|
|
Frend uintptr
|
|
Fclose uintptr
|
|
Fwend uintptr
|
|
Fwpos uintptr
|
|
Fmustbezero_1 uintptr
|
|
Fwbase uintptr
|
|
Fread uintptr
|
|
Fwrite uintptr
|
|
Fseek uintptr
|
|
Fbuf uintptr
|
|
Fbuf_size size_t
|
|
Fprev uintptr
|
|
Fnext uintptr
|
|
Ffd int32
|
|
Fpipe_pid int32
|
|
Flockcount int32
|
|
Fmode int32
|
|
Flock int32
|
|
Flbf int32
|
|
Fcookie uintptr
|
|
Foff off_t
|
|
Fgetln_buf uintptr
|
|
Fmustbezero_2 uintptr
|
|
Fshend uintptr
|
|
Fshlim off_t
|
|
Fshcnt off_t
|
|
Fprev_locked uintptr
|
|
Fnext_locked uintptr
|
|
Flocale uintptr
|
|
} /* alltypes.h:343:9 */
|
|
|
|
type FILE = _IO_FILE /* alltypes.h:343:25 */
|
|
|
|
type va_list = uintptr /* alltypes.h:349:27 */
|
|
|
|
type _G_fpos64_t = struct {
|
|
F__ccgo_pad1 [0]uint32
|
|
F__opaque [16]int8
|
|
} /* stdio.h:54:9 */
|
|
|
|
type fpos_t = _G_fpos64_t /* stdio.h:58:3 */
|
|
|
|
type float_t = float64 /* alltypes.h:38:21 */
|
|
|
|
type double_t = float64 /* alltypes.h:43:21 */
|
|
|
|
func __FLOAT_BITS(tls *TLS, __f float32) uint32 { /* math.h:55:26: */
|
|
bp := tls.Alloc(4)
|
|
defer tls.Free(4)
|
|
|
|
// var __u struct {F__f float32;} at bp, 4
|
|
|
|
*(*float32)(unsafe.Pointer(bp)) = __f
|
|
return *(*uint32)(unsafe.Pointer(bp))
|
|
}
|
|
|
|
func __DOUBLE_BITS(tls *TLS, __f float64) uint64 { /* math.h:61:36: */
|
|
bp := tls.Alloc(8)
|
|
defer tls.Free(8)
|
|
|
|
// var __u struct {F__f float64;} at bp, 8
|
|
|
|
*(*float64)(unsafe.Pointer(bp)) = __f
|
|
return *(*uint64)(unsafe.Pointer(bp))
|
|
}
|
|
|
|
type syscall_arg_t = int32 /* syscall.h:22:14 */
|
|
|
|
func scanexp(tls *TLS, f uintptr, pok int32) int64 { /* floatscan.c:37:18: */
|
|
var c int32
|
|
var x int32
|
|
var y int64
|
|
var neg int32 = 0
|
|
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
if c == '+' || c == '-' {
|
|
neg = Bool32(c == '-')
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
if uint32(c-'0') >= 10 && pok != 0 {
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
}
|
|
}
|
|
if uint32(c-'0') >= 10 {
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
return -0x7fffffffffffffff - int64(1)
|
|
}
|
|
for x = 0; uint32(c-'0') < 10 && x < 0x7fffffff/10; c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}() {
|
|
x = 10*x + c - '0'
|
|
}
|
|
for y = int64(x); uint32(c-'0') < 10 && y < 0x7fffffffffffffff/int64(100); c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}() {
|
|
y = int64(10)*y + int64(c) - int64('0')
|
|
}
|
|
for ; uint32(c-'0') < 10; c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}() {
|
|
}
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
if neg != 0 {
|
|
return -y
|
|
}
|
|
return y
|
|
}
|
|
|
|
func decfloat(tls *TLS, f uintptr, c int32, bits int32, emin int32, sign int32, pok int32) float64 { /* floatscan.c:64:20: */
|
|
bp := tls.Alloc(512)
|
|
defer tls.Free(512)
|
|
|
|
// var x [128]uint32_t at bp, 512
|
|
|
|
var i int32
|
|
var j int32
|
|
var k int32
|
|
var a int32
|
|
var z int32
|
|
var lrp int64 = int64(0)
|
|
var dc int64 = int64(0)
|
|
var e10 int64 = int64(0)
|
|
var lnz int32 = 0
|
|
var gotdig int32 = 0
|
|
var gotrad int32 = 0
|
|
var rp int32
|
|
var e2 int32
|
|
var emax int32 = -emin - bits + 3
|
|
var denormal int32 = 0
|
|
var y float64
|
|
var frac float64 = float64(0)
|
|
var bias float64 = float64(0)
|
|
|
|
j = 0
|
|
k = 0
|
|
|
|
// Don't let leading zeros consume buffer space
|
|
for ; c == '0'; c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}() {
|
|
gotdig = 1
|
|
}
|
|
if c == '.' {
|
|
gotrad = 1
|
|
for c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}(); c == '0'; c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}() {
|
|
gotdig = 1
|
|
lrp--
|
|
}
|
|
}
|
|
|
|
*(*uint32_t)(unsafe.Pointer(bp)) = uint32_t(0)
|
|
for ; uint32(c-'0') < 10 || c == '.'; c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}() {
|
|
if c == '.' {
|
|
if gotrad != 0 {
|
|
break
|
|
}
|
|
gotrad = 1
|
|
lrp = dc
|
|
} else if k < 128-3 {
|
|
dc++
|
|
if c != '0' {
|
|
lnz = int32(dc)
|
|
}
|
|
if j != 0 {
|
|
*(*uint32_t)(unsafe.Pointer(bp + uintptr(k)*4)) = *(*uint32_t)(unsafe.Pointer(bp + uintptr(k)*4))*uint32_t(10) + uint32_t(c) - uint32_t('0')
|
|
} else {
|
|
*(*uint32_t)(unsafe.Pointer(bp + uintptr(k)*4)) = uint32_t(c - '0')
|
|
}
|
|
if PreIncInt32(&j, 1) == 9 {
|
|
k++
|
|
j = 0
|
|
}
|
|
gotdig = 1
|
|
} else {
|
|
dc++
|
|
if c != '0' {
|
|
lnz = (128 - 4) * 9
|
|
*(*uint32_t)(unsafe.Pointer(bp + 124*4)) |= uint32_t(1)
|
|
}
|
|
}
|
|
}
|
|
if !(gotrad != 0) {
|
|
lrp = dc
|
|
}
|
|
|
|
if gotdig != 0 && c|32 == 'e' {
|
|
e10 = scanexp(tls, f, pok)
|
|
if e10 == -0x7fffffffffffffff-int64(1) {
|
|
if pok != 0 {
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
} else {
|
|
X__shlim(tls, f, int64(0))
|
|
return float64(0)
|
|
}
|
|
e10 = int64(0)
|
|
}
|
|
lrp = lrp + e10
|
|
} else if c >= 0 {
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
}
|
|
if !(gotdig != 0) {
|
|
*(*int32)(unsafe.Pointer(X___errno_location(tls))) = 22
|
|
X__shlim(tls, f, int64(0))
|
|
return float64(0)
|
|
}
|
|
|
|
// Handle zero specially to avoid nasty special cases later
|
|
if !(int32(*(*uint32_t)(unsafe.Pointer(bp))) != 0) {
|
|
return float64(sign) * 0.0
|
|
}
|
|
|
|
// Optimize small integers (w/no exponent) and over/under-flow
|
|
if lrp == dc && dc < int64(10) && (bits > 30 || *(*uint32_t)(unsafe.Pointer(bp))>>bits == uint32_t(0)) {
|
|
return float64(sign) * float64(*(*uint32_t)(unsafe.Pointer(bp)))
|
|
}
|
|
if lrp > int64(-emin/2) {
|
|
*(*int32)(unsafe.Pointer(X___errno_location(tls))) = 34
|
|
return float64(sign) * 1.79769313486231570815e+308 * 1.79769313486231570815e+308
|
|
}
|
|
if lrp < int64(emin-2*53) {
|
|
*(*int32)(unsafe.Pointer(X___errno_location(tls))) = 34
|
|
return float64(sign) * 2.22507385850720138309e-308 * 2.22507385850720138309e-308
|
|
}
|
|
|
|
// Align incomplete final B1B digit
|
|
if j != 0 {
|
|
for ; j < 9; j++ {
|
|
*(*uint32_t)(unsafe.Pointer(bp + uintptr(k)*4)) *= uint32_t(10)
|
|
}
|
|
k++
|
|
j = 0
|
|
}
|
|
|
|
a = 0
|
|
z = k
|
|
e2 = 0
|
|
rp = int32(lrp)
|
|
|
|
// Optimize small to mid-size integers (even in exp. notation)
|
|
if lnz < 9 && lnz <= rp && rp < 18 {
|
|
if rp == 9 {
|
|
return float64(sign) * float64(*(*uint32_t)(unsafe.Pointer(bp)))
|
|
}
|
|
if rp < 9 {
|
|
return float64(sign) * float64(*(*uint32_t)(unsafe.Pointer(bp))) / float64(_sp10s[8-rp])
|
|
}
|
|
var bitlim int32 = bits - 3*(rp-9)
|
|
if bitlim > 30 || *(*uint32_t)(unsafe.Pointer(bp))>>bitlim == uint32_t(0) {
|
|
return float64(sign) * float64(*(*uint32_t)(unsafe.Pointer(bp))) * float64(_sp10s[rp-10])
|
|
}
|
|
}
|
|
|
|
// Drop trailing zeros
|
|
for ; !(int32(*(*uint32_t)(unsafe.Pointer(bp + uintptr(z-1)*4))) != 0); z-- {
|
|
}
|
|
|
|
// Align radix point to B1B digit boundary
|
|
if rp%9 != 0 {
|
|
var rpm9 int32
|
|
if rp >= 0 {
|
|
rpm9 = rp % 9
|
|
} else {
|
|
rpm9 = rp%9 + 9
|
|
}
|
|
var p10 int32 = _sp10s[8-rpm9]
|
|
var carry uint32_t = uint32_t(0)
|
|
for k = a; k != z; k++ {
|
|
var tmp uint32_t = *(*uint32_t)(unsafe.Pointer(bp + uintptr(k)*4)) % uint32_t(p10)
|
|
*(*uint32_t)(unsafe.Pointer(bp + uintptr(k)*4)) = *(*uint32_t)(unsafe.Pointer(bp + uintptr(k)*4))/uint32_t(p10) + carry
|
|
carry = uint32_t(1000000000/p10) * tmp
|
|
if k == a && !(int32(*(*uint32_t)(unsafe.Pointer(bp + uintptr(k)*4))) != 0) {
|
|
a = (a + 1) & (128 - 1)
|
|
rp = rp - 9
|
|
}
|
|
}
|
|
if carry != 0 {
|
|
*(*uint32_t)(unsafe.Pointer(bp + uintptr(PostIncInt32(&z, 1))*4)) = carry
|
|
}
|
|
rp = rp + (9 - rpm9)
|
|
}
|
|
|
|
// Upscale until desired number of bits are left of radix point
|
|
for rp < 9*2 || rp == 9*2 && *(*uint32_t)(unsafe.Pointer(bp + uintptr(a)*4)) < _sth[0] {
|
|
var carry uint32_t = uint32_t(0)
|
|
e2 = e2 - 29
|
|
for k = (z - 1) & (128 - 1); ; k = (k - 1) & (128 - 1) {
|
|
var tmp uint64_t = uint64_t(*(*uint32_t)(unsafe.Pointer(bp + uintptr(k)*4)))<<29 + uint64_t(carry)
|
|
if tmp > uint64(1000000000) {
|
|
carry = uint32_t(tmp / uint64(1000000000))
|
|
*(*uint32_t)(unsafe.Pointer(bp + uintptr(k)*4)) = uint32_t(tmp % uint64(1000000000))
|
|
} else {
|
|
carry = uint32_t(0)
|
|
*(*uint32_t)(unsafe.Pointer(bp + uintptr(k)*4)) = uint32_t(tmp)
|
|
}
|
|
if k == (z-1)&(128-1) && k != a && !(int32(*(*uint32_t)(unsafe.Pointer(bp + uintptr(k)*4))) != 0) {
|
|
z = k
|
|
}
|
|
if k == a {
|
|
break
|
|
}
|
|
}
|
|
if carry != 0 {
|
|
rp = rp + 9
|
|
a = (a - 1) & (128 - 1)
|
|
if a == z {
|
|
z = (z - 1) & (128 - 1)
|
|
*(*uint32_t)(unsafe.Pointer(bp + uintptr((z-1)&(128-1))*4)) |= *(*uint32_t)(unsafe.Pointer(bp + uintptr(z)*4))
|
|
}
|
|
*(*uint32_t)(unsafe.Pointer(bp + uintptr(a)*4)) = carry
|
|
}
|
|
}
|
|
|
|
// Downscale until exactly number of bits are left of radix point
|
|
for {
|
|
var carry uint32_t = uint32_t(0)
|
|
var sh int32 = 1
|
|
for i = 0; i < 2; i++ {
|
|
k = (a + i) & (128 - 1)
|
|
if k == z || *(*uint32_t)(unsafe.Pointer(bp + uintptr(k)*4)) < _sth[i] {
|
|
i = 2
|
|
break
|
|
}
|
|
if *(*uint32_t)(unsafe.Pointer(bp + uintptr((a+i)&(128-1))*4)) > _sth[i] {
|
|
break
|
|
}
|
|
}
|
|
if i == 2 && rp == 9*2 {
|
|
break
|
|
}
|
|
// FIXME: find a way to compute optimal sh
|
|
if rp > 9+9*2 {
|
|
sh = 9
|
|
}
|
|
e2 = e2 + sh
|
|
for k = a; k != z; k = (k + 1) & (128 - 1) {
|
|
var tmp uint32_t = *(*uint32_t)(unsafe.Pointer(bp + uintptr(k)*4)) & uint32_t(int32(1)<<sh-1)
|
|
*(*uint32_t)(unsafe.Pointer(bp + uintptr(k)*4)) = *(*uint32_t)(unsafe.Pointer(bp + uintptr(k)*4))>>sh + carry
|
|
carry = uint32_t(int32(1000000000)>>sh) * tmp
|
|
if k == a && !(int32(*(*uint32_t)(unsafe.Pointer(bp + uintptr(k)*4))) != 0) {
|
|
a = (a + 1) & (128 - 1)
|
|
i--
|
|
rp = rp - 9
|
|
}
|
|
}
|
|
if carry != 0 {
|
|
if (z+1)&(128-1) != a {
|
|
*(*uint32_t)(unsafe.Pointer(bp + uintptr(z)*4)) = carry
|
|
z = (z + 1) & (128 - 1)
|
|
} else {
|
|
*(*uint32_t)(unsafe.Pointer(bp + uintptr((z-1)&(128-1))*4)) |= uint32_t(1)
|
|
}
|
|
}
|
|
}
|
|
|
|
// Assemble desired bits into floating point variable
|
|
for y = float64(AssignInt32(&i, 0)); i < 2; i++ {
|
|
if (a+i)&(128-1) == z {
|
|
*(*uint32_t)(unsafe.Pointer(bp + uintptr(AssignInt32(&z, (z+1)&(128-1))-1)*4)) = uint32_t(0)
|
|
}
|
|
y = 1000000000.0*y + float64(*(*uint32_t)(unsafe.Pointer(bp + uintptr((a+i)&(128-1))*4)))
|
|
}
|
|
|
|
y = y * float64(sign)
|
|
|
|
// Limit precision for denormal results
|
|
if bits > 53+e2-emin {
|
|
bits = 53 + e2 - emin
|
|
if bits < 0 {
|
|
bits = 0
|
|
}
|
|
denormal = 1
|
|
}
|
|
|
|
// Calculate bias term to force rounding, move out lower bits
|
|
if bits < 53 {
|
|
bias = Xcopysignl(tls, Xscalbn(tls, float64(1), 2*53-bits-1), y)
|
|
frac = Xfmodl(tls, y, Xscalbn(tls, float64(1), 53-bits))
|
|
y = y - frac
|
|
y = y + bias
|
|
}
|
|
|
|
// Process tail of decimal input so it can affect rounding
|
|
if (a+i)&(128-1) != z {
|
|
var t uint32_t = *(*uint32_t)(unsafe.Pointer(bp + uintptr((a+i)&(128-1))*4))
|
|
if t < uint32_t(500000000) && (t != 0 || (a+i+1)&(128-1) != z) {
|
|
frac = frac + 0.25*float64(sign)
|
|
} else if t > uint32_t(500000000) {
|
|
frac = frac + 0.75*float64(sign)
|
|
} else if t == uint32_t(500000000) {
|
|
if (a+i+1)&(128-1) == z {
|
|
frac = frac + 0.5*float64(sign)
|
|
} else {
|
|
frac = frac + 0.75*float64(sign)
|
|
}
|
|
}
|
|
if 53-bits >= 2 && !(Xfmodl(tls, frac, float64(1)) != 0) {
|
|
frac += 1
|
|
}
|
|
}
|
|
|
|
y = y + frac
|
|
y = y - bias
|
|
|
|
if (e2+53)&0x7fffffff > emax-5 {
|
|
if Xfabsl(tls, y) >= float64(float64(2))/2.22044604925031308085e-16 {
|
|
if denormal != 0 && bits == 53+e2-emin {
|
|
denormal = 0
|
|
}
|
|
y = y * 0.5
|
|
e2++
|
|
}
|
|
if e2+53 > emax || denormal != 0 && frac != 0 {
|
|
*(*int32)(unsafe.Pointer(X___errno_location(tls))) = 34
|
|
}
|
|
}
|
|
|
|
return Xscalbnl(tls, y, e2)
|
|
}
|
|
|
|
var _sth = [2]uint32_t{uint32_t(9007199), uint32_t(254740991)} /* floatscan.c:67:24 */
|
|
var _sp10s = [8]int32{10, 100, 1000, 10000,
|
|
100000, 1000000, 10000000, 100000000} /* floatscan.c:80:19 */
|
|
|
|
func hexfloat(tls *TLS, f uintptr, bits int32, emin int32, sign int32, pok int32) float64 { /* floatscan.c:315:20: */
|
|
var x uint32_t = uint32_t(0)
|
|
var y float64 = float64(0)
|
|
var scale float64 = float64(1)
|
|
var bias float64 = float64(0)
|
|
var gottail int32 = 0
|
|
var gotrad int32 = 0
|
|
var gotdig int32 = 0
|
|
var rp int64 = int64(0)
|
|
var dc int64 = int64(0)
|
|
var e2 int64 = int64(0)
|
|
var d int32
|
|
var c int32
|
|
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
|
|
// Skip leading zeros
|
|
for ; c == '0'; c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}() {
|
|
gotdig = 1
|
|
}
|
|
|
|
if c == '.' {
|
|
gotrad = 1
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
// Count zeros after the radix point before significand
|
|
rp = int64(0)
|
|
__1:
|
|
if !(c == '0') {
|
|
goto __3
|
|
}
|
|
gotdig = 1
|
|
goto __2
|
|
__2:
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
rp--
|
|
goto __1
|
|
goto __3
|
|
__3:
|
|
}
|
|
|
|
for ; uint32(c-'0') < 10 || uint32(c|32-'a') < 6 || c == '.'; c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}() {
|
|
if c == '.' {
|
|
if gotrad != 0 {
|
|
break
|
|
}
|
|
rp = dc
|
|
gotrad = 1
|
|
} else {
|
|
gotdig = 1
|
|
if c > '9' {
|
|
d = c | 32 + 10 - 'a'
|
|
} else {
|
|
d = c - '0'
|
|
}
|
|
if dc < int64(8) {
|
|
x = x*uint32_t(16) + uint32_t(d)
|
|
} else if dc < int64(53/4+1) {
|
|
y = y + float64(d)*AssignDivFloat64(&scale, float64(16))
|
|
} else if d != 0 && !(gottail != 0) {
|
|
y = y + 0.5*scale
|
|
gottail = 1
|
|
}
|
|
dc++
|
|
}
|
|
}
|
|
if !(gotdig != 0) {
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
if pok != 0 {
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
if gotrad != 0 {
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
}
|
|
} else {
|
|
X__shlim(tls, f, int64(0))
|
|
}
|
|
return float64(sign) * 0.0
|
|
}
|
|
if !(gotrad != 0) {
|
|
rp = dc
|
|
}
|
|
for dc < int64(8) {
|
|
x = x * uint32_t(16)
|
|
dc++
|
|
}
|
|
if c|32 == 'p' {
|
|
e2 = scanexp(tls, f, pok)
|
|
if e2 == -0x7fffffffffffffff-int64(1) {
|
|
if pok != 0 {
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
} else {
|
|
X__shlim(tls, f, int64(0))
|
|
return float64(0)
|
|
}
|
|
e2 = int64(0)
|
|
}
|
|
} else {
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
}
|
|
e2 = e2 + (int64(4)*rp - int64(32))
|
|
|
|
if !(x != 0) {
|
|
return float64(sign) * 0.0
|
|
}
|
|
if e2 > int64(-emin) {
|
|
*(*int32)(unsafe.Pointer(X___errno_location(tls))) = 34
|
|
return float64(sign) * 1.79769313486231570815e+308 * 1.79769313486231570815e+308
|
|
}
|
|
if e2 < int64(emin-2*53) {
|
|
*(*int32)(unsafe.Pointer(X___errno_location(tls))) = 34
|
|
return float64(sign) * 2.22507385850720138309e-308 * 2.22507385850720138309e-308
|
|
}
|
|
|
|
for x < 0x80000000 {
|
|
if y >= 0.5 {
|
|
x = x + (x + uint32_t(1))
|
|
y = y + (y - float64(1))
|
|
} else {
|
|
x = x + x
|
|
y = y + y
|
|
}
|
|
e2--
|
|
}
|
|
|
|
if int64(bits) > int64(32)+e2-int64(emin) {
|
|
bits = int32(int64(32) + e2 - int64(emin))
|
|
if bits < 0 {
|
|
bits = 0
|
|
}
|
|
}
|
|
|
|
if bits < 53 {
|
|
bias = Xcopysignl(tls, Xscalbn(tls, float64(1), 32+53-bits-1), float64(sign))
|
|
}
|
|
|
|
if bits < 32 && y != 0 && !(x&uint32_t(1) != 0) {
|
|
x++
|
|
y = float64(0)
|
|
}
|
|
|
|
y = bias + float64(sign)*float64(x) + float64(sign)*y
|
|
y = y - bias
|
|
|
|
if !(y != 0) {
|
|
*(*int32)(unsafe.Pointer(X___errno_location(tls))) = 34
|
|
}
|
|
|
|
return Xscalbnl(tls, y, int32(e2))
|
|
}
|
|
|
|
func X__floatscan(tls *TLS, f uintptr, prec int32, pok int32) float64 { /* floatscan.c:427:13: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v f=%v prec=%v pok=%v, (%v:)", tls, f, prec, pok, origin(2))
|
|
}
|
|
var sign int32 = 1
|
|
var i size_t
|
|
var bits int32
|
|
var emin int32
|
|
var c int32
|
|
|
|
switch prec {
|
|
case 0:
|
|
bits = 24
|
|
emin = -125 - bits
|
|
break
|
|
case 1:
|
|
bits = 53
|
|
emin = -1021 - bits
|
|
break
|
|
case 2:
|
|
bits = 53
|
|
emin = -1021 - bits
|
|
break
|
|
default:
|
|
return float64(0)
|
|
}
|
|
|
|
for __isspace(tls, AssignInt32(&c, func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}())) != 0 {
|
|
}
|
|
|
|
if c == '+' || c == '-' {
|
|
sign = sign - 2*Bool32(c == '-')
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
}
|
|
|
|
for i = size_t(0); i < size_t(8) && c|32 == int32(*(*int8)(unsafe.Pointer(ts /* "infinity" */ + uintptr(i)))); i++ {
|
|
if i < size_t(7) {
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
}
|
|
}
|
|
if i == size_t(3) || i == size_t(8) || i > size_t(3) && pok != 0 {
|
|
if i != size_t(8) {
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
if pok != 0 {
|
|
for ; i > size_t(3); i-- {
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return float64(float32(sign) * X__builtin_inff(tls))
|
|
}
|
|
if !(i != 0) {
|
|
for i = size_t(0); i < size_t(3) && c|32 == int32(*(*int8)(unsafe.Pointer(ts + 9 /* "nan" */ + uintptr(i)))); i++ {
|
|
if i < size_t(2) {
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
}
|
|
}
|
|
}
|
|
if i == size_t(3) {
|
|
if func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}() != '(' {
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
return float64(X__builtin_nanf(tls, ts+13))
|
|
}
|
|
for i = size_t(1); ; i++ {
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
if uint32(c-'0') < 10 || uint32(c-'A') < 26 || uint32(c-'a') < 26 || c == '_' {
|
|
continue
|
|
}
|
|
if c == ')' {
|
|
return float64(X__builtin_nanf(tls, ts+13))
|
|
}
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
if !(pok != 0) {
|
|
*(*int32)(unsafe.Pointer(X___errno_location(tls))) = 22
|
|
X__shlim(tls, f, int64(0))
|
|
return float64(0)
|
|
}
|
|
for PostDecUint32(&i, 1) != 0 {
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
}
|
|
return float64(X__builtin_nanf(tls, ts+13))
|
|
}
|
|
return float64(X__builtin_nanf(tls, ts+13))
|
|
}
|
|
|
|
if i != 0 {
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
*(*int32)(unsafe.Pointer(X___errno_location(tls))) = 22
|
|
X__shlim(tls, f, int64(0))
|
|
return float64(0)
|
|
}
|
|
|
|
if c == '0' {
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
if c|32 == 'x' {
|
|
return hexfloat(tls, f, bits, emin, sign, pok)
|
|
}
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
c = '0'
|
|
}
|
|
|
|
return decfloat(tls, f, c, bits, emin, sign, pok)
|
|
}
|
|
|
|
// Lookup table for digit values. -1==255>=36 -> invalid
|
|
var table = [257]uint8{Uint8FromInt32(-1),
|
|
Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1),
|
|
Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1),
|
|
Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1),
|
|
uint8(0), uint8(1), uint8(2), uint8(3), uint8(4), uint8(5), uint8(6), uint8(7), uint8(8), uint8(9), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1),
|
|
Uint8FromInt32(-1), uint8(10), uint8(11), uint8(12), uint8(13), uint8(14), uint8(15), uint8(16), uint8(17), uint8(18), uint8(19), uint8(20), uint8(21), uint8(22), uint8(23), uint8(24),
|
|
uint8(25), uint8(26), uint8(27), uint8(28), uint8(29), uint8(30), uint8(31), uint8(32), uint8(33), uint8(34), uint8(35), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1),
|
|
Uint8FromInt32(-1), uint8(10), uint8(11), uint8(12), uint8(13), uint8(14), uint8(15), uint8(16), uint8(17), uint8(18), uint8(19), uint8(20), uint8(21), uint8(22), uint8(23), uint8(24),
|
|
uint8(25), uint8(26), uint8(27), uint8(28), uint8(29), uint8(30), uint8(31), uint8(32), uint8(33), uint8(34), uint8(35), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1),
|
|
Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1),
|
|
Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1),
|
|
Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1),
|
|
Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1),
|
|
Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1),
|
|
Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1),
|
|
Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1),
|
|
Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1), Uint8FromInt32(-1),
|
|
} /* intscan.c:7:28 */
|
|
|
|
func X__intscan(tls *TLS, f uintptr, base uint32, pok int32, lim uint64) uint64 { /* intscan.c:26:20: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v f=%v base=%v pok=%v lim=%v, (%v:)", tls, f, base, pok, lim, origin(2))
|
|
}
|
|
var val uintptr
|
|
var c int32
|
|
var neg int32
|
|
var x uint32
|
|
var y uint64
|
|
var bs int32
|
|
val = uintptr(unsafe.Pointer(&table)) + uintptr(1)
|
|
neg = 0
|
|
if !(base > uint32(36) || base == uint32(1)) {
|
|
goto __1
|
|
}
|
|
*(*int32)(unsafe.Pointer(X___errno_location(tls))) = 22
|
|
return uint64(0)
|
|
__1:
|
|
;
|
|
__2:
|
|
if !(__isspace(tls, AssignInt32(&c, func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}())) != 0) {
|
|
goto __3
|
|
}
|
|
goto __2
|
|
__3:
|
|
;
|
|
if !(c == '+' || c == '-') {
|
|
goto __4
|
|
}
|
|
neg = -Bool32(c == '-')
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
__4:
|
|
;
|
|
if !((base == uint32(0) || base == uint32(16)) && c == '0') {
|
|
goto __5
|
|
}
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
if !(c|32 == 'x') {
|
|
goto __7
|
|
}
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
if !(int32(*(*uint8)(unsafe.Pointer(val + uintptr(c)))) >= 16) {
|
|
goto __9
|
|
}
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
if !(pok != 0) {
|
|
goto __10
|
|
}
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
goto __11
|
|
__10:
|
|
X__shlim(tls, f, int64(0))
|
|
__11:
|
|
;
|
|
return uint64(0)
|
|
__9:
|
|
;
|
|
base = uint32(16)
|
|
goto __8
|
|
__7:
|
|
if !(base == uint32(0)) {
|
|
goto __12
|
|
}
|
|
base = uint32(8)
|
|
__12:
|
|
;
|
|
__8:
|
|
;
|
|
goto __6
|
|
__5:
|
|
if !(base == uint32(0)) {
|
|
goto __13
|
|
}
|
|
base = uint32(10)
|
|
__13:
|
|
;
|
|
if !(uint32(*(*uint8)(unsafe.Pointer(val + uintptr(c)))) >= base) {
|
|
goto __14
|
|
}
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
X__shlim(tls, f, int64(0))
|
|
*(*int32)(unsafe.Pointer(X___errno_location(tls))) = 22
|
|
return uint64(0)
|
|
__14:
|
|
;
|
|
__6:
|
|
;
|
|
if !(base == uint32(10)) {
|
|
goto __15
|
|
}
|
|
x = uint32(0)
|
|
__17:
|
|
if !(uint32(c-'0') < 10 && x <= 0xffffffff/uint32(10)-uint32(1)) {
|
|
goto __19
|
|
}
|
|
x = x*uint32(10) + uint32(c-'0')
|
|
goto __18
|
|
__18:
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
goto __17
|
|
goto __19
|
|
__19:
|
|
;
|
|
y = uint64(x)
|
|
__20:
|
|
if !(uint32(c-'0') < 10 && y <= (2*uint64(0x7fffffffffffffff)+uint64(1))/uint64(10) && uint64(10)*y <= 2*uint64(0x7fffffffffffffff)+uint64(1)-uint64(c-'0')) {
|
|
goto __22
|
|
}
|
|
y = y*uint64(10) + uint64(c-'0')
|
|
goto __21
|
|
__21:
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
goto __20
|
|
goto __22
|
|
__22:
|
|
;
|
|
if !(uint32(c-'0') >= 10) {
|
|
goto __23
|
|
}
|
|
goto done
|
|
__23:
|
|
;
|
|
goto __16
|
|
__15:
|
|
if !!(base&(base-uint32(1)) != 0) {
|
|
goto __24
|
|
}
|
|
bs = int32(*(*int8)(unsafe.Pointer(ts + 14 + uintptr(uint32(0x17)*base>>5&uint32(7)))))
|
|
x = uint32(0)
|
|
__26:
|
|
if !(uint32(*(*uint8)(unsafe.Pointer(val + uintptr(c)))) < base && x <= 0xffffffff/uint32(32)) {
|
|
goto __28
|
|
}
|
|
x = x<<bs | uint32(*(*uint8)(unsafe.Pointer(val + uintptr(c))))
|
|
goto __27
|
|
__27:
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
goto __26
|
|
goto __28
|
|
__28:
|
|
;
|
|
y = uint64(x)
|
|
__29:
|
|
if !(uint32(*(*uint8)(unsafe.Pointer(val + uintptr(c)))) < base && y <= uint64(2*uint64(0x7fffffffffffffff)+uint64(1))>>bs) {
|
|
goto __31
|
|
}
|
|
y = y<<bs | uint64(*(*uint8)(unsafe.Pointer(val + uintptr(c))))
|
|
goto __30
|
|
__30:
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
goto __29
|
|
goto __31
|
|
__31:
|
|
;
|
|
goto __25
|
|
__24:
|
|
x = uint32(0)
|
|
__32:
|
|
if !(uint32(*(*uint8)(unsafe.Pointer(val + uintptr(c)))) < base && x <= 0xffffffff/uint32(36)-uint32(1)) {
|
|
goto __34
|
|
}
|
|
x = x*base + uint32(*(*uint8)(unsafe.Pointer(val + uintptr(c))))
|
|
goto __33
|
|
__33:
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
goto __32
|
|
goto __34
|
|
__34:
|
|
;
|
|
y = uint64(x)
|
|
__35:
|
|
if !(uint32(*(*uint8)(unsafe.Pointer(val + uintptr(c)))) < base && y <= (2*uint64(0x7fffffffffffffff)+uint64(1))/uint64(base) && uint64(base)*y <= 2*uint64(0x7fffffffffffffff)+uint64(1)-uint64(*(*uint8)(unsafe.Pointer(val + uintptr(c))))) {
|
|
goto __37
|
|
}
|
|
y = y*uint64(base) + uint64(*(*uint8)(unsafe.Pointer(val + uintptr(c))))
|
|
goto __36
|
|
__36:
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
goto __35
|
|
goto __37
|
|
__37:
|
|
;
|
|
__25:
|
|
;
|
|
__16:
|
|
;
|
|
if !(uint32(*(*uint8)(unsafe.Pointer(val + uintptr(c)))) < base) {
|
|
goto __38
|
|
}
|
|
__39:
|
|
if !(uint32(*(*uint8)(unsafe.Pointer(val + uintptr(c)))) < base) {
|
|
goto __41
|
|
}
|
|
goto __40
|
|
__40:
|
|
c = func() int32 {
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos != (*FILE)(unsafe.Pointer(f)).Fshend {
|
|
return int32(*(*uint8)(unsafe.Pointer(PostIncUintptr(&(*FILE)(unsafe.Pointer(f)).Frpos, 1))))
|
|
}
|
|
return X__shgetc(tls, f)
|
|
}()
|
|
goto __39
|
|
goto __41
|
|
__41:
|
|
;
|
|
*(*int32)(unsafe.Pointer(X___errno_location(tls))) = 34
|
|
y = lim
|
|
if !(lim&uint64(1) != 0) {
|
|
goto __42
|
|
}
|
|
neg = 0
|
|
__42:
|
|
;
|
|
__38:
|
|
;
|
|
done:
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim >= int64(0) {
|
|
(*FILE)(unsafe.Pointer(f)).Frpos--
|
|
} else {
|
|
}
|
|
if !(y >= lim) {
|
|
goto __43
|
|
}
|
|
if !(!(lim&uint64(1) != 0) && !(neg != 0)) {
|
|
goto __44
|
|
}
|
|
*(*int32)(unsafe.Pointer(X___errno_location(tls))) = 34
|
|
return lim - uint64(1)
|
|
goto __45
|
|
__44:
|
|
if !(y > lim) {
|
|
goto __46
|
|
}
|
|
*(*int32)(unsafe.Pointer(X___errno_location(tls))) = 34
|
|
return lim
|
|
__46:
|
|
;
|
|
__45:
|
|
;
|
|
__43:
|
|
;
|
|
return y ^ uint64(neg) - uint64(neg)
|
|
}
|
|
|
|
// The shcnt field stores the number of bytes read so far, offset by
|
|
// the value of buf-rpos at the last function call (__shlim or __shgetc),
|
|
// so that between calls the inline shcnt macro can add rpos-buf to get
|
|
// the actual count.
|
|
|
|
func X__shlim(tls *TLS, f uintptr, lim off_t) { /* shgetc.c:8:6: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v f=%v lim=%v, (%v:)", tls, f, lim, origin(2))
|
|
}
|
|
(*FILE)(unsafe.Pointer(f)).Fshlim = lim
|
|
(*FILE)(unsafe.Pointer(f)).Fshcnt = off_t((int32((*FILE)(unsafe.Pointer(f)).Fbuf) - int32((*FILE)(unsafe.Pointer(f)).Frpos)) / 1)
|
|
// If lim is nonzero, rend must be a valid pointer.
|
|
if lim != 0 && off_t((int32((*FILE)(unsafe.Pointer(f)).Frend)-int32((*FILE)(unsafe.Pointer(f)).Frpos))/1) > lim {
|
|
(*FILE)(unsafe.Pointer(f)).Fshend = (*FILE)(unsafe.Pointer(f)).Frpos + uintptr(lim)
|
|
} else {
|
|
(*FILE)(unsafe.Pointer(f)).Fshend = (*FILE)(unsafe.Pointer(f)).Frend
|
|
}
|
|
}
|
|
|
|
func X__shgetc(tls *TLS, f uintptr) int32 { /* shgetc.c:19:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v f=%v, (%v:)", tls, f, origin(2))
|
|
}
|
|
var c int32
|
|
var cnt off_t = (*FILE)(unsafe.Pointer(f)).Fshcnt + off_t((int32((*FILE)(unsafe.Pointer(f)).Frpos)-int32((*FILE)(unsafe.Pointer(f)).Fbuf))/1)
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim != 0 && cnt >= (*FILE)(unsafe.Pointer(f)).Fshlim || AssignInt32(&c, X__uflow(tls, f)) < 0 {
|
|
(*FILE)(unsafe.Pointer(f)).Fshcnt = off_t((int32((*FILE)(unsafe.Pointer(f)).Fbuf)-int32((*FILE)(unsafe.Pointer(f)).Frpos))/1) + cnt
|
|
(*FILE)(unsafe.Pointer(f)).Fshend = (*FILE)(unsafe.Pointer(f)).Frpos
|
|
(*FILE)(unsafe.Pointer(f)).Fshlim = int64(-1)
|
|
return -1
|
|
}
|
|
cnt++
|
|
if (*FILE)(unsafe.Pointer(f)).Fshlim != 0 && off_t((int32((*FILE)(unsafe.Pointer(f)).Frend)-int32((*FILE)(unsafe.Pointer(f)).Frpos))/1) > (*FILE)(unsafe.Pointer(f)).Fshlim-cnt {
|
|
(*FILE)(unsafe.Pointer(f)).Fshend = (*FILE)(unsafe.Pointer(f)).Frpos + uintptr((*FILE)(unsafe.Pointer(f)).Fshlim-cnt)
|
|
} else {
|
|
(*FILE)(unsafe.Pointer(f)).Fshend = (*FILE)(unsafe.Pointer(f)).Frend
|
|
}
|
|
(*FILE)(unsafe.Pointer(f)).Fshcnt = off_t((int32((*FILE)(unsafe.Pointer(f)).Fbuf)-int32((*FILE)(unsafe.Pointer(f)).Frpos))/1) + cnt
|
|
if (*FILE)(unsafe.Pointer(f)).Frpos <= (*FILE)(unsafe.Pointer(f)).Fbuf {
|
|
*(*uint8)(unsafe.Pointer((*FILE)(unsafe.Pointer(f)).Frpos + UintptrFromInt32(-1))) = uint8(c)
|
|
}
|
|
return c
|
|
}
|
|
|
|
func __bswap32(tls *TLS, __x uint32_t) uint32_t { /* endian.h:24:26: */
|
|
return __x>>24 | __x>>8&uint32_t(0xff00) | __x<<8&uint32_t(0xff0000) | __x<<24
|
|
}
|
|
|
|
func Xcopysignl(tls *TLS, x float64, y float64) float64 { /* copysignl.c:4:13: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v x=%v y=%v, (%v:)", tls, x, y, origin(2))
|
|
}
|
|
return Xcopysign(tls, x, y)
|
|
}
|
|
|
|
func Xfabsl(tls *TLS, x float64) float64 { /* fabsl.c:3:13: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v x=%v, (%v:)", tls, x, origin(2))
|
|
}
|
|
return Xfabs(tls, x)
|
|
}
|
|
|
|
func Xfmodl(tls *TLS, x float64, y float64) float64 { /* fmodl.c:4:13: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v x=%v y=%v, (%v:)", tls, x, y, origin(2))
|
|
}
|
|
return Xfmod(tls, x, y)
|
|
}
|
|
|
|
var toint double_t = float64(float64(1)) / 2.22044604925031308085e-16 /* rint.c:10:23 */
|
|
|
|
func Xrint(tls *TLS, x float64) float64 { /* rint.c:12:8: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v x=%v, (%v:)", tls, x, origin(2))
|
|
}
|
|
bp := tls.Alloc(8)
|
|
defer tls.Free(8)
|
|
|
|
*(*struct{ Ff float64 })(unsafe.Pointer(bp)) = func() (r struct{ Ff float64 }) {
|
|
*(*float64)(unsafe.Pointer(uintptr(unsafe.Pointer(&r)) + 0)) = x
|
|
return r
|
|
}()
|
|
var e int32 = int32(*(*uint64_t)(unsafe.Pointer(bp)) >> 52 & uint64(0x7ff))
|
|
var s int32 = int32(*(*uint64_t)(unsafe.Pointer(bp)) >> 63)
|
|
var y double_t
|
|
|
|
if e >= 0x3ff+52 {
|
|
return x
|
|
}
|
|
if s != 0 {
|
|
y = x - toint + toint
|
|
} else {
|
|
y = x + toint - toint
|
|
}
|
|
if y == float64(0) {
|
|
if s != 0 {
|
|
return -Float64FromFloat64(0.0)
|
|
}
|
|
return float64(0)
|
|
}
|
|
return y
|
|
}
|
|
|
|
func Xscalbn(tls *TLS, x float64, n int32) float64 { /* scalbn.c:4:8: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v x=%v n=%v, (%v:)", tls, x, n, origin(2))
|
|
}
|
|
bp := tls.Alloc(8)
|
|
defer tls.Free(8)
|
|
|
|
// var u struct {Ff float64;} at bp, 8
|
|
|
|
var y double_t = x
|
|
|
|
if n > 1023 {
|
|
y = y * 0x1p1023
|
|
n = n - 1023
|
|
if n > 1023 {
|
|
y = y * 0x1p1023
|
|
n = n - 1023
|
|
if n > 1023 {
|
|
n = 1023
|
|
}
|
|
}
|
|
} else if n < -1022 {
|
|
// make sure final n < -53 to avoid double
|
|
// rounding in the subnormal range
|
|
y = y * (float64(0x1p-1022) * 0x1p53)
|
|
n = n + (1022 - 53)
|
|
if n < -1022 {
|
|
y = y * (float64(0x1p-1022) * 0x1p53)
|
|
n = n + (1022 - 53)
|
|
if n < -1022 {
|
|
n = -1022
|
|
}
|
|
}
|
|
}
|
|
*(*uint64_t)(unsafe.Pointer(bp)) = uint64_t(0x3ff+n) << 52
|
|
x = y * *(*float64)(unsafe.Pointer(bp))
|
|
return x
|
|
}
|
|
|
|
func Xscalbnl(tls *TLS, x float64, n int32) float64 { /* scalbnl.c:4:13: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v x=%v n=%v, (%v:)", tls, x, n, origin(2))
|
|
}
|
|
return Xscalbn(tls, x, n)
|
|
}
|
|
|
|
type div_t = struct {
|
|
Fquot int32
|
|
Frem int32
|
|
} /* stdlib.h:62:35 */
|
|
type ldiv_t = struct {
|
|
Fquot int32
|
|
Frem int32
|
|
} /* stdlib.h:63:36 */
|
|
type lldiv_t = struct {
|
|
Fquot int64
|
|
Frem int64
|
|
} /* stdlib.h:64:41 */
|
|
|
|
type max_align_t = struct {
|
|
F__ll int64
|
|
F__ld float64
|
|
} /* alltypes.h:51:66 */
|
|
|
|
type imaxdiv_t = struct {
|
|
Fquot intmax_t
|
|
Frem intmax_t
|
|
} /* inttypes.h:14:40 */
|
|
|
|
type pid_t = int32 /* alltypes.h:258:13 */
|
|
|
|
type uid_t = uint32 /* alltypes.h:268:18 */
|
|
|
|
type gid_t = uint32 /* alltypes.h:273:18 */
|
|
|
|
type iovec = struct {
|
|
Fiov_base uintptr
|
|
Fiov_len size_t
|
|
} /* alltypes.h:378:1 */
|
|
|
|
type socklen_t = uint32 /* alltypes.h:384:18 */
|
|
|
|
type sa_family_t = uint16 /* alltypes.h:389:24 */
|
|
|
|
type msghdr = struct {
|
|
Fmsg_name uintptr
|
|
Fmsg_namelen socklen_t
|
|
Fmsg_iov uintptr
|
|
Fmsg_iovlen int32
|
|
Fmsg_control uintptr
|
|
Fmsg_controllen socklen_t
|
|
Fmsg_flags int32
|
|
} /* socket.h:22:1 */
|
|
|
|
type cmsghdr = struct {
|
|
Fcmsg_len socklen_t
|
|
Fcmsg_level int32
|
|
Fcmsg_type int32
|
|
} /* socket.h:44:1 */
|
|
|
|
type linger = struct {
|
|
Fl_onoff int32
|
|
Fl_linger int32
|
|
} /* socket.h:74:1 */
|
|
|
|
type sockaddr = struct {
|
|
Fsa_family sa_family_t
|
|
Fsa_data [14]int8
|
|
} /* socket.h:367:1 */
|
|
|
|
type sockaddr_storage = struct {
|
|
Fss_family sa_family_t
|
|
F__ss_padding [122]int8
|
|
F__ss_align uint32
|
|
} /* socket.h:372:1 */
|
|
|
|
type in_port_t = uint16_t /* in.h:12:18 */
|
|
type in_addr_t = uint32_t /* in.h:13:18 */
|
|
type in_addr = struct{ Fs_addr in_addr_t } /* in.h:14:1 */
|
|
|
|
type sockaddr_in = struct {
|
|
Fsin_family sa_family_t
|
|
Fsin_port in_port_t
|
|
Fsin_addr struct{ Fs_addr in_addr_t }
|
|
Fsin_zero [8]uint8_t
|
|
} /* in.h:16:1 */
|
|
|
|
type in6_addr = struct {
|
|
F__in6_union struct {
|
|
F__ccgo_pad1 [0]uint32
|
|
F__s6_addr [16]uint8_t
|
|
}
|
|
} /* in.h:23:1 */
|
|
|
|
type sockaddr_in6 = struct {
|
|
Fsin6_family sa_family_t
|
|
Fsin6_port in_port_t
|
|
Fsin6_flowinfo uint32_t
|
|
Fsin6_addr struct {
|
|
F__in6_union struct {
|
|
F__ccgo_pad1 [0]uint32
|
|
F__s6_addr [16]uint8_t
|
|
}
|
|
}
|
|
Fsin6_scope_id uint32_t
|
|
} /* in.h:34:1 */
|
|
|
|
type ipv6_mreq = struct {
|
|
Fipv6mr_multiaddr struct {
|
|
F__in6_union struct {
|
|
F__ccgo_pad1 [0]uint32
|
|
F__s6_addr [16]uint8_t
|
|
}
|
|
}
|
|
Fipv6mr_interface uint32
|
|
} /* in.h:42:1 */
|
|
|
|
type ip_opts = struct {
|
|
Fip_dst struct{ Fs_addr in_addr_t }
|
|
Fip_opts [40]int8
|
|
} /* in.h:229:1 */
|
|
|
|
type ip_mreq = struct {
|
|
Fimr_multiaddr struct{ Fs_addr in_addr_t }
|
|
Fimr_interface struct{ Fs_addr in_addr_t }
|
|
} /* in.h:247:1 */
|
|
|
|
type ip_mreqn = struct {
|
|
Fimr_multiaddr struct{ Fs_addr in_addr_t }
|
|
Fimr_address struct{ Fs_addr in_addr_t }
|
|
Fimr_ifindex int32
|
|
} /* in.h:252:1 */
|
|
|
|
type ip_mreq_source = struct {
|
|
Fimr_multiaddr struct{ Fs_addr in_addr_t }
|
|
Fimr_interface struct{ Fs_addr in_addr_t }
|
|
Fimr_sourceaddr struct{ Fs_addr in_addr_t }
|
|
} /* in.h:258:1 */
|
|
|
|
type ip_msfilter = struct {
|
|
Fimsf_multiaddr struct{ Fs_addr in_addr_t }
|
|
Fimsf_interface struct{ Fs_addr in_addr_t }
|
|
Fimsf_fmode uint32_t
|
|
Fimsf_numsrc uint32_t
|
|
Fimsf_slist [1]struct{ Fs_addr in_addr_t }
|
|
} /* in.h:264:1 */
|
|
|
|
type group_req = struct {
|
|
Fgr_interface uint32_t
|
|
Fgr_group struct {
|
|
Fss_family sa_family_t
|
|
F__ss_padding [122]int8
|
|
F__ss_align uint32
|
|
}
|
|
} /* in.h:275:1 */
|
|
|
|
type group_source_req = struct {
|
|
Fgsr_interface uint32_t
|
|
Fgsr_group struct {
|
|
Fss_family sa_family_t
|
|
F__ss_padding [122]int8
|
|
F__ss_align uint32
|
|
}
|
|
Fgsr_source struct {
|
|
Fss_family sa_family_t
|
|
F__ss_padding [122]int8
|
|
F__ss_align uint32
|
|
}
|
|
} /* in.h:280:1 */
|
|
|
|
type group_filter = struct {
|
|
Fgf_interface uint32_t
|
|
Fgf_group struct {
|
|
Fss_family sa_family_t
|
|
F__ss_padding [122]int8
|
|
F__ss_align uint32
|
|
}
|
|
Fgf_fmode uint32_t
|
|
Fgf_numsrc uint32_t
|
|
Fgf_slist [1]struct {
|
|
Fss_family sa_family_t
|
|
F__ss_padding [122]int8
|
|
F__ss_align uint32
|
|
}
|
|
} /* in.h:286:1 */
|
|
|
|
type in_pktinfo = struct {
|
|
Fipi_ifindex int32
|
|
Fipi_spec_dst struct{ Fs_addr in_addr_t }
|
|
Fipi_addr struct{ Fs_addr in_addr_t }
|
|
} /* in.h:297:1 */
|
|
|
|
type in6_pktinfo = struct {
|
|
Fipi6_addr struct {
|
|
F__in6_union struct {
|
|
F__ccgo_pad1 [0]uint32
|
|
F__s6_addr [16]uint8_t
|
|
}
|
|
}
|
|
Fipi6_ifindex uint32
|
|
} /* in.h:303:1 */
|
|
|
|
type ip6_mtuinfo = struct {
|
|
Fip6m_addr struct {
|
|
Fsin6_family sa_family_t
|
|
Fsin6_port in_port_t
|
|
Fsin6_flowinfo uint32_t
|
|
Fsin6_addr struct {
|
|
F__in6_union struct {
|
|
F__ccgo_pad1 [0]uint32
|
|
F__s6_addr [16]uint8_t
|
|
}
|
|
}
|
|
Fsin6_scope_id uint32_t
|
|
}
|
|
Fip6m_mtu uint32_t
|
|
} /* in.h:308:1 */
|
|
|
|
type addrinfo = struct {
|
|
Fai_flags int32
|
|
Fai_family int32
|
|
Fai_socktype int32
|
|
Fai_protocol int32
|
|
Fai_addrlen socklen_t
|
|
Fai_addr uintptr
|
|
Fai_canonname uintptr
|
|
Fai_next uintptr
|
|
} /* netdb.h:16:1 */
|
|
|
|
// Legacy functions follow (marked OBsolete in SUS)
|
|
|
|
type netent = struct {
|
|
Fn_name uintptr
|
|
Fn_aliases uintptr
|
|
Fn_addrtype int32
|
|
Fn_net uint32_t
|
|
} /* netdb.h:62:1 */
|
|
|
|
type hostent = struct {
|
|
Fh_name uintptr
|
|
Fh_aliases uintptr
|
|
Fh_addrtype int32
|
|
Fh_length int32
|
|
Fh_addr_list uintptr
|
|
} /* netdb.h:69:1 */
|
|
|
|
type servent = struct {
|
|
Fs_name uintptr
|
|
Fs_aliases uintptr
|
|
Fs_port int32
|
|
Fs_proto uintptr
|
|
} /* netdb.h:78:1 */
|
|
|
|
type protoent = struct {
|
|
Fp_name uintptr
|
|
Fp_aliases uintptr
|
|
Fp_proto int32
|
|
} /* netdb.h:85:1 */
|
|
|
|
type aibuf = struct {
|
|
Fai struct {
|
|
Fai_flags int32
|
|
Fai_family int32
|
|
Fai_socktype int32
|
|
Fai_protocol int32
|
|
Fai_addrlen socklen_t
|
|
Fai_addr uintptr
|
|
Fai_canonname uintptr
|
|
Fai_next uintptr
|
|
}
|
|
Fsa struct {
|
|
Fsin struct {
|
|
Fsin_family sa_family_t
|
|
Fsin_port in_port_t
|
|
Fsin_addr struct{ Fs_addr in_addr_t }
|
|
Fsin_zero [8]uint8_t
|
|
}
|
|
F__ccgo_pad1 [12]byte
|
|
}
|
|
Flock [1]int32
|
|
Fslot int16
|
|
Fref int16
|
|
} /* lookup.h:10:1 */
|
|
|
|
type sa = struct {
|
|
Fsin struct {
|
|
Fsin_family sa_family_t
|
|
Fsin_port in_port_t
|
|
Fsin_addr struct{ Fs_addr in_addr_t }
|
|
Fsin_zero [8]uint8_t
|
|
}
|
|
F__ccgo_pad1 [12]byte
|
|
} /* lookup.h:10:1 */
|
|
|
|
type address = struct {
|
|
Ffamily int32
|
|
Fscopeid uint32
|
|
Faddr [16]uint8_t
|
|
Fsortkey int32
|
|
} /* lookup.h:20:1 */
|
|
|
|
type service = struct {
|
|
Fport uint16_t
|
|
Fproto uint8
|
|
Fsocktype uint8
|
|
} /* lookup.h:27:1 */
|
|
|
|
type resolvconf = struct {
|
|
Fns [3]struct {
|
|
Ffamily int32
|
|
Fscopeid uint32
|
|
Faddr [16]uint8_t
|
|
Fsortkey int32
|
|
}
|
|
Fnns uint32
|
|
Fattempts uint32
|
|
Fndots uint32
|
|
Ftimeout uint32
|
|
} /* lookup.h:34:1 */
|
|
|
|
func Xfreeaddrinfo(tls *TLS, p uintptr) { /* freeaddrinfo.c:7:6: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v p=%v, (%v:)", tls, p, origin(2))
|
|
}
|
|
var cnt size_t
|
|
cnt = size_t(1)
|
|
__1:
|
|
if !((*addrinfo)(unsafe.Pointer(p)).Fai_next != 0) {
|
|
goto __3
|
|
}
|
|
goto __2
|
|
__2:
|
|
cnt++
|
|
p = (*addrinfo)(unsafe.Pointer(p)).Fai_next
|
|
goto __1
|
|
goto __3
|
|
__3:
|
|
;
|
|
var b uintptr = p - uintptr(uint32(uintptr(0)))
|
|
b -= 68 * uintptr((*aibuf)(unsafe.Pointer(b)).Fslot)
|
|
//TODO LOCK(b->lock);
|
|
if !(int32(AssignSubPtrInt16(b+66, int16(cnt))) != 0) {
|
|
Xfree(tls, b)
|
|
}
|
|
//TODO else UNLOCK(b->lock);
|
|
}
|
|
|
|
type time_t = int64 /* alltypes.h:108:16 */
|
|
|
|
type clockid_t = int32 /* alltypes.h:237:13 */
|
|
|
|
type timespec = struct {
|
|
Ftv_sec time_t
|
|
Ftv_nsec int32
|
|
__12 uint32 /* int : 32 */
|
|
} /* alltypes.h:252:1 */
|
|
|
|
type pthread_t = uintptr /* alltypes.h:296:26 */
|
|
|
|
type pthread_once_t = int32 /* alltypes.h:302:13 */
|
|
|
|
type pthread_key_t = uint32 /* alltypes.h:307:18 */
|
|
|
|
type pthread_spinlock_t = int32 /* alltypes.h:312:13 */
|
|
|
|
type pthread_mutexattr_t = struct{ F__attr uint32 } /* alltypes.h:317:37 */
|
|
|
|
type pthread_condattr_t = struct{ F__attr uint32 } /* alltypes.h:322:37 */
|
|
|
|
type pthread_barrierattr_t = struct{ F__attr uint32 } /* alltypes.h:327:37 */
|
|
|
|
type pthread_rwlockattr_t = struct{ F__attr [2]uint32 } /* alltypes.h:332:40 */
|
|
|
|
type __sigset_t = struct{ F__bits [32]uint32 } /* alltypes.h:372:9 */
|
|
|
|
type sigset_t = __sigset_t /* alltypes.h:372:71 */
|
|
|
|
type pthread_attr_t = struct{ F__u struct{ F__i [9]int32 } } /* alltypes.h:395:147 */
|
|
|
|
type pthread_mutex_t = struct{ F__u struct{ F__i [6]int32 } } /* alltypes.h:400:157 */
|
|
|
|
type pthread_cond_t = struct{ F__u struct{ F__i [12]int32 } } /* alltypes.h:410:112 */
|
|
|
|
type pthread_rwlock_t = struct{ F__u struct{ F__i [8]int32 } } /* alltypes.h:420:139 */
|
|
|
|
type pthread_barrier_t = struct{ F__u struct{ F__i [5]int32 } } /* alltypes.h:425:137 */
|
|
|
|
type sched_param = struct {
|
|
Fsched_priority int32
|
|
F__reserved1 int32
|
|
F__reserved2 [4]int32
|
|
F__reserved3 int32
|
|
} /* sched.h:19:1 */
|
|
|
|
type timer_t = uintptr /* alltypes.h:232:14 */
|
|
|
|
type clock_t = int32 /* alltypes.h:242:14 */
|
|
|
|
type tm = struct {
|
|
Ftm_sec int32
|
|
Ftm_min int32
|
|
Ftm_hour int32
|
|
Ftm_mday int32
|
|
Ftm_mon int32
|
|
Ftm_year int32
|
|
Ftm_wday int32
|
|
Ftm_yday int32
|
|
Ftm_isdst int32
|
|
Ftm_gmtoff int32
|
|
Ftm_zone uintptr
|
|
} /* time.h:38:1 */
|
|
|
|
type itimerspec = struct {
|
|
Fit_interval struct {
|
|
Ftv_sec time_t
|
|
Ftv_nsec int32
|
|
__12 uint32 /* int : 32 */
|
|
}
|
|
Fit_value struct {
|
|
Ftv_sec time_t
|
|
Ftv_nsec int32
|
|
__12 uint32 /* int : 32 */
|
|
}
|
|
} /* time.h:80:1 */
|
|
|
|
type __ptcb = struct {
|
|
F__f uintptr
|
|
F__x uintptr
|
|
F__next uintptr
|
|
} /* pthread.h:206:1 */
|
|
|
|
type useconds_t = uint32 /* alltypes.h:283:18 */
|
|
|
|
func Xgetaddrinfo(tls *TLS, host uintptr, serv uintptr, hint uintptr, res uintptr) int32 { /* getaddrinfo.c:12:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v host=%v serv=%v hint=%v res=%v, (%v:)", tls, host, serv, hint, res, origin(2))
|
|
}
|
|
bp := tls.Alloc(1608)
|
|
defer tls.Free(1608)
|
|
|
|
// var ports [2]service at bp, 8
|
|
|
|
// var addrs [48]address at bp+8, 1344
|
|
|
|
// var canon [256]int8 at bp+1352, 256
|
|
|
|
var outcanon uintptr
|
|
var nservs int32
|
|
var naddrs int32
|
|
var nais int32
|
|
var canon_len int32
|
|
var i int32
|
|
var j int32
|
|
var k int32
|
|
var family int32 = 0
|
|
var flags int32 = 0
|
|
var proto int32 = 0
|
|
var socktype int32 = 0
|
|
var out uintptr
|
|
|
|
if !(host != 0) && !(serv != 0) {
|
|
return -2
|
|
}
|
|
|
|
if hint != 0 {
|
|
family = (*addrinfo)(unsafe.Pointer(hint)).Fai_family
|
|
flags = (*addrinfo)(unsafe.Pointer(hint)).Fai_flags
|
|
proto = (*addrinfo)(unsafe.Pointer(hint)).Fai_protocol
|
|
socktype = (*addrinfo)(unsafe.Pointer(hint)).Fai_socktype
|
|
|
|
var mask int32 = 0x01 | 0x02 | 0x04 | 0x08 | 0x10 | 0x20 | 0x400
|
|
if flags&mask != flags {
|
|
return -1
|
|
}
|
|
|
|
switch family {
|
|
case 2:
|
|
fallthrough
|
|
case 10:
|
|
fallthrough
|
|
case 0:
|
|
break
|
|
fallthrough
|
|
default:
|
|
return -6
|
|
}
|
|
}
|
|
|
|
if flags&0x20 != 0 {
|
|
Xabort(tls) //TODO-
|
|
// /* Define the "an address is configured" condition for address
|
|
// * families via ability to create a socket for the family plus
|
|
// * routability of the loopback address for the family. */
|
|
// static const struct sockaddr_in lo4 = {
|
|
// .sin_family = AF_INET, .sin_port = 65535,
|
|
// .sin_addr.s_addr = __BYTE_ORDER == __BIG_ENDIAN
|
|
// ? 0x7f000001 : 0x0100007f
|
|
// };
|
|
// static const struct sockaddr_in6 lo6 = {
|
|
// .sin6_family = AF_INET6, .sin6_port = 65535,
|
|
// .sin6_addr = IN6ADDR_LOOPBACK_INIT
|
|
// };
|
|
// int tf[2] = { AF_INET, AF_INET6 };
|
|
// const void *ta[2] = { &lo4, &lo6 };
|
|
// socklen_t tl[2] = { sizeof lo4, sizeof lo6 };
|
|
// for (i=0; i<2; i++) {
|
|
// if (family==tf[1-i]) continue;
|
|
// int s = socket(tf[i], SOCK_CLOEXEC|SOCK_DGRAM,
|
|
// IPPROTO_UDP);
|
|
// if (s>=0) {
|
|
// int cs;
|
|
// pthread_setcancelstate(
|
|
// PTHREAD_CANCEL_DISABLE, &cs);
|
|
// int r = connect(s, ta[i], tl[i]);
|
|
// pthread_setcancelstate(cs, 0);
|
|
// close(s);
|
|
// if (!r) continue;
|
|
// }
|
|
// switch (errno) {
|
|
// case EADDRNOTAVAIL:
|
|
// case EAFNOSUPPORT:
|
|
// case EHOSTUNREACH:
|
|
// case ENETDOWN:
|
|
// case ENETUNREACH:
|
|
// break;
|
|
// default:
|
|
// return EAI_SYSTEM;
|
|
// }
|
|
// if (family == tf[i]) return EAI_NONAME;
|
|
// family = tf[1-i];
|
|
// }
|
|
}
|
|
|
|
nservs = X__lookup_serv(tls, bp, serv, proto, socktype, flags)
|
|
if nservs < 0 {
|
|
return nservs
|
|
}
|
|
|
|
naddrs = X__lookup_name(tls, bp+8, bp+1352, host, family, flags)
|
|
if naddrs < 0 {
|
|
return naddrs
|
|
}
|
|
|
|
nais = nservs * naddrs
|
|
canon_len = int32(Xstrlen(tls, bp+1352))
|
|
out = Xcalloc(tls, uint32(1), uint32(nais)*uint32(unsafe.Sizeof(aibuf{}))+uint32(canon_len)+uint32(1))
|
|
if !(out != 0) {
|
|
return -10
|
|
}
|
|
|
|
if canon_len != 0 {
|
|
outcanon = out + uintptr(nais)*68
|
|
Xmemcpy(tls, outcanon, bp+1352, uint32(canon_len+1))
|
|
} else {
|
|
outcanon = uintptr(0)
|
|
}
|
|
|
|
for k = AssignInt32(&i, 0); i < naddrs; i++ {
|
|
j = 0
|
|
__1:
|
|
if !(j < nservs) {
|
|
goto __3
|
|
}
|
|
{
|
|
(*aibuf)(unsafe.Pointer(out + uintptr(k)*68)).Fslot = int16(k)
|
|
//TODO out[k].ai = (struct addrinfo){
|
|
//TODO .ai_family = addrs[i].family,
|
|
//TODO .ai_socktype = ports[j].socktype,
|
|
//TODO .ai_protocol = ports[j].proto,
|
|
//TODO .ai_addrlen = addrs[i].family == AF_INET
|
|
//TODO ? sizeof(struct sockaddr_in)
|
|
//TODO : sizeof(struct sockaddr_in6),
|
|
//TODO .ai_addr = (void *)&out[k].sa,
|
|
//TODO .ai_canonname = outcanon };
|
|
(*aibuf)(unsafe.Pointer(out + uintptr(k)*68)).Fai.Fai_family = (*address)(unsafe.Pointer(bp + 8 + uintptr(i)*28)).Ffamily
|
|
(*aibuf)(unsafe.Pointer(out + uintptr(k)*68)).Fai.Fai_socktype = int32((*service)(unsafe.Pointer(bp + uintptr(j)*4)).Fsocktype)
|
|
(*aibuf)(unsafe.Pointer(out + uintptr(k)*68)).Fai.Fai_protocol = int32((*service)(unsafe.Pointer(bp + uintptr(j)*4)).Fproto)
|
|
(*aibuf)(unsafe.Pointer(out + uintptr(k)*68)).Fai.Fai_addrlen = func() uint32 {
|
|
if (*address)(unsafe.Pointer(bp+8+uintptr(i)*28)).Ffamily == 2 {
|
|
return uint32(unsafe.Sizeof(sockaddr_in{}))
|
|
}
|
|
return uint32(unsafe.Sizeof(sockaddr_in6{}))
|
|
}()
|
|
(*aibuf)(unsafe.Pointer(out + uintptr(k)*68)).Fai.Fai_addr = out + uintptr(k)*68 + 32
|
|
(*aibuf)(unsafe.Pointer(out + uintptr(k)*68)).Fai.Fai_canonname = outcanon
|
|
if k != 0 {
|
|
(*aibuf)(unsafe.Pointer(out + uintptr(k-1)*68)).Fai.Fai_next = out + uintptr(k)*68
|
|
}
|
|
switch (*address)(unsafe.Pointer(bp + 8 + uintptr(i)*28)).Ffamily {
|
|
case 2:
|
|
(*sockaddr_in)(unsafe.Pointer(out + uintptr(k)*68 + 32)).Fsin_family = sa_family_t(2)
|
|
(*sockaddr_in)(unsafe.Pointer(out + uintptr(k)*68 + 32)).Fsin_port = Xhtons(tls, (*service)(unsafe.Pointer(bp+uintptr(j)*4)).Fport)
|
|
Xmemcpy(tls, out+uintptr(k)*68+32+4, bp+8+uintptr(i)*28+8, uint32(4))
|
|
break
|
|
case 10:
|
|
(*sockaddr_in6)(unsafe.Pointer(out + uintptr(k)*68 + 32)).Fsin6_family = sa_family_t(10)
|
|
(*sockaddr_in6)(unsafe.Pointer(out + uintptr(k)*68 + 32)).Fsin6_port = Xhtons(tls, (*service)(unsafe.Pointer(bp+uintptr(j)*4)).Fport)
|
|
(*sockaddr_in6)(unsafe.Pointer(out + uintptr(k)*68 + 32)).Fsin6_scope_id = (*address)(unsafe.Pointer(bp + 8 + uintptr(i)*28)).Fscopeid
|
|
Xmemcpy(tls, out+uintptr(k)*68+32+8, bp+8+uintptr(i)*28+8, uint32(16))
|
|
break
|
|
}
|
|
|
|
}
|
|
goto __2
|
|
__2:
|
|
j++
|
|
k++
|
|
goto __1
|
|
goto __3
|
|
__3:
|
|
}
|
|
(*aibuf)(unsafe.Pointer(out)).Fref = int16(nais)
|
|
*(*uintptr)(unsafe.Pointer(res)) = out
|
|
return 0
|
|
}
|
|
|
|
type ucred = struct {
|
|
Fpid pid_t
|
|
Fuid uid_t
|
|
Fgid gid_t
|
|
} /* socket.h:57:1 */
|
|
|
|
type mmsghdr = struct {
|
|
Fmsg_hdr struct {
|
|
Fmsg_name uintptr
|
|
Fmsg_namelen socklen_t
|
|
Fmsg_iov uintptr
|
|
Fmsg_iovlen int32
|
|
Fmsg_control uintptr
|
|
Fmsg_controllen socklen_t
|
|
Fmsg_flags int32
|
|
}
|
|
Fmsg_len uint32
|
|
} /* socket.h:63:1 */
|
|
|
|
func Xgethostbyaddr(tls *TLS, a uintptr, l socklen_t, af int32) uintptr { /* gethostbyaddr.c:7:16: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v a=%v l=%v af=%v, (%v:)", tls, a, l, af, origin(2))
|
|
}
|
|
bp := tls.Alloc(4)
|
|
defer tls.Free(4)
|
|
|
|
var size size_t = size_t(63)
|
|
// var res uintptr at bp, 4
|
|
|
|
var err int32
|
|
for __ccgo := true; __ccgo; __ccgo = err == 34 {
|
|
Xfree(tls, _sh)
|
|
_sh = Xmalloc(tls, AssignAddUint32(&size, size+size_t(1)))
|
|
if !(_sh != 0) {
|
|
*(*int32)(unsafe.Pointer(X__h_errno_location(tls))) = 3
|
|
return uintptr(0)
|
|
}
|
|
err = Xgethostbyaddr_r(tls, a, l, af, _sh,
|
|
_sh+uintptr(1)*20, size-size_t(unsafe.Sizeof(hostent{})), bp, X__h_errno_location(tls))
|
|
}
|
|
if err != 0 {
|
|
return uintptr(0)
|
|
}
|
|
return _sh
|
|
}
|
|
|
|
var _sh uintptr /* gethostbyaddr.c:9:24: */
|
|
|
|
func Xgethostbyname(tls *TLS, name uintptr) uintptr { /* gethostbyname.c:8:16: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v name=%v, (%v:)", tls, name, origin(2))
|
|
}
|
|
return Xgethostbyname2(tls, name, 2)
|
|
}
|
|
|
|
func Xgethostbyname2(tls *TLS, name uintptr, af int32) uintptr { /* gethostbyname2.c:8:16: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v name=%v af=%v, (%v:)", tls, name, af, origin(2))
|
|
}
|
|
bp := tls.Alloc(4)
|
|
defer tls.Free(4)
|
|
|
|
var size size_t = size_t(63)
|
|
// var res uintptr at bp, 4
|
|
|
|
var err int32
|
|
for __ccgo := true; __ccgo; __ccgo = err == 34 {
|
|
Xfree(tls, _sh1)
|
|
_sh1 = Xmalloc(tls, AssignAddUint32(&size, size+size_t(1)))
|
|
if !(_sh1 != 0) {
|
|
*(*int32)(unsafe.Pointer(X__h_errno_location(tls))) = 3
|
|
return uintptr(0)
|
|
}
|
|
err = Xgethostbyname2_r(tls, name, af, _sh1,
|
|
_sh1+uintptr(1)*20, size-size_t(unsafe.Sizeof(hostent{})), bp, X__h_errno_location(tls))
|
|
}
|
|
if err != 0 {
|
|
return uintptr(0)
|
|
}
|
|
return _sh1
|
|
}
|
|
|
|
var _sh1 uintptr /* gethostbyname2.c:10:24: */
|
|
|
|
func Xgethostbyname2_r(tls *TLS, name uintptr, af int32, h uintptr, buf uintptr, buflen size_t, res uintptr, err uintptr) int32 { /* gethostbyname2_r.c:11:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v name=%v af=%v h=%v buf=%v buflen=%v res=%v err=%v, (%v:)", tls, name, af, h, buf, buflen, res, err, origin(2))
|
|
}
|
|
bp := tls.Alloc(1600)
|
|
defer tls.Free(1600)
|
|
|
|
// var addrs [48]address at bp, 1344
|
|
|
|
// var canon [256]int8 at bp+1344, 256
|
|
|
|
var i int32
|
|
var cnt int32
|
|
var align size_t
|
|
var need size_t
|
|
|
|
*(*uintptr)(unsafe.Pointer(res)) = uintptr(0)
|
|
cnt = X__lookup_name(tls, bp, bp+1344, name, af, 0x02)
|
|
if cnt < 0 {
|
|
switch cnt {
|
|
case -2:
|
|
*(*int32)(unsafe.Pointer(err)) = 1
|
|
return 2
|
|
fallthrough
|
|
case -3:
|
|
*(*int32)(unsafe.Pointer(err)) = 2
|
|
return 11
|
|
fallthrough
|
|
default:
|
|
fallthrough
|
|
case -4:
|
|
*(*int32)(unsafe.Pointer(err)) = 3
|
|
return 74
|
|
fallthrough
|
|
case -10:
|
|
fallthrough
|
|
case -11:
|
|
*(*int32)(unsafe.Pointer(err)) = 3
|
|
return *(*int32)(unsafe.Pointer(X___errno_location(tls)))
|
|
}
|
|
}
|
|
|
|
(*hostent)(unsafe.Pointer(h)).Fh_addrtype = af
|
|
(*hostent)(unsafe.Pointer(h)).Fh_length = func() int32 {
|
|
if af == 10 {
|
|
return 16
|
|
}
|
|
return 4
|
|
}()
|
|
|
|
// Align buffer
|
|
align = uint32(-uintptr_t(buf)) & (uint32(unsafe.Sizeof(uintptr(0))) - uint32(1))
|
|
|
|
need = uint32(4) * uint32(unsafe.Sizeof(uintptr(0)))
|
|
need = need + uint32(cnt+1)*(uint32(unsafe.Sizeof(uintptr(0)))+uint32((*hostent)(unsafe.Pointer(h)).Fh_length))
|
|
need = need + (Xstrlen(tls, name) + size_t(1))
|
|
need = need + (Xstrlen(tls, bp+1344) + size_t(1))
|
|
need = need + align
|
|
|
|
if need > buflen {
|
|
return 34
|
|
}
|
|
|
|
buf += uintptr(align)
|
|
(*hostent)(unsafe.Pointer(h)).Fh_aliases = buf
|
|
buf += uintptr(uint32(3) * uint32(unsafe.Sizeof(uintptr(0))))
|
|
(*hostent)(unsafe.Pointer(h)).Fh_addr_list = buf
|
|
buf += uintptr(uint32(cnt+1) * uint32(unsafe.Sizeof(uintptr(0))))
|
|
|
|
for i = 0; i < cnt; i++ {
|
|
*(*uintptr)(unsafe.Pointer((*hostent)(unsafe.Pointer(h)).Fh_addr_list + uintptr(i)*4)) = buf
|
|
buf += uintptr((*hostent)(unsafe.Pointer(h)).Fh_length)
|
|
Xmemcpy(tls, *(*uintptr)(unsafe.Pointer((*hostent)(unsafe.Pointer(h)).Fh_addr_list + uintptr(i)*4)), bp+uintptr(i)*28+8, uint32((*hostent)(unsafe.Pointer(h)).Fh_length))
|
|
}
|
|
*(*uintptr)(unsafe.Pointer((*hostent)(unsafe.Pointer(h)).Fh_addr_list + uintptr(i)*4)) = uintptr(0)
|
|
|
|
(*hostent)(unsafe.Pointer(h)).Fh_name = AssignPtrUintptr((*hostent)(unsafe.Pointer(h)).Fh_aliases, buf)
|
|
Xstrcpy(tls, (*hostent)(unsafe.Pointer(h)).Fh_name, bp+1344)
|
|
buf += uintptr(Xstrlen(tls, (*hostent)(unsafe.Pointer(h)).Fh_name) + size_t(1))
|
|
|
|
if Xstrcmp(tls, (*hostent)(unsafe.Pointer(h)).Fh_name, name) != 0 {
|
|
*(*uintptr)(unsafe.Pointer((*hostent)(unsafe.Pointer(h)).Fh_aliases + 1*4)) = buf
|
|
Xstrcpy(tls, *(*uintptr)(unsafe.Pointer((*hostent)(unsafe.Pointer(h)).Fh_aliases + 1*4)), name)
|
|
buf += uintptr(Xstrlen(tls, *(*uintptr)(unsafe.Pointer((*hostent)(unsafe.Pointer(h)).Fh_aliases + 1*4))) + size_t(1))
|
|
} else {
|
|
*(*uintptr)(unsafe.Pointer((*hostent)(unsafe.Pointer(h)).Fh_aliases + 1*4)) = uintptr(0)
|
|
}
|
|
|
|
*(*uintptr)(unsafe.Pointer((*hostent)(unsafe.Pointer(h)).Fh_aliases + 2*4)) = uintptr(0)
|
|
|
|
*(*uintptr)(unsafe.Pointer(res)) = h
|
|
return 0
|
|
}
|
|
|
|
type if_nameindex = struct {
|
|
Fif_index uint32
|
|
Fif_name uintptr
|
|
} /* if.h:12:1 */
|
|
|
|
type ifaddr = struct {
|
|
Fifa_addr struct {
|
|
Fsa_family sa_family_t
|
|
Fsa_data [14]int8
|
|
}
|
|
Fifa_ifu struct {
|
|
Fifu_broadaddr struct {
|
|
Fsa_family sa_family_t
|
|
Fsa_data [14]int8
|
|
}
|
|
}
|
|
Fifa_ifp uintptr
|
|
Fifa_next uintptr
|
|
} /* if.h:51:1 */
|
|
|
|
type ifmap = struct {
|
|
Fmem_start uint32
|
|
Fmem_end uint32
|
|
Fbase_addr uint16
|
|
Firq uint8
|
|
Fdma uint8
|
|
Fport uint8
|
|
F__ccgo_pad1 [3]byte
|
|
} /* if.h:64:1 */
|
|
|
|
type ifreq = struct {
|
|
Fifr_ifrn struct{ Fifrn_name [16]int8 }
|
|
Fifr_ifru struct {
|
|
F__ccgo_pad1 [0]uint32
|
|
Fifru_addr struct {
|
|
Fsa_family sa_family_t
|
|
Fsa_data [14]int8
|
|
}
|
|
}
|
|
} /* if.h:76:1 */
|
|
|
|
type ifconf = struct {
|
|
Fifc_len int32
|
|
Fifc_ifcu struct{ Fifcu_buf uintptr }
|
|
} /* if.h:116:1 */
|
|
|
|
type ns_sect = uint32 /* nameser.h:37:3 */
|
|
|
|
type __ns_msg = struct {
|
|
F_msg uintptr
|
|
F_eom uintptr
|
|
F_id uint16_t
|
|
F_flags uint16_t
|
|
F_counts [4]uint16_t
|
|
F_sections [4]uintptr
|
|
F_sect ns_sect
|
|
F_rrnum int32
|
|
F_msg_ptr uintptr
|
|
} /* nameser.h:39:9 */
|
|
|
|
type ns_msg = __ns_msg /* nameser.h:46:3 */
|
|
|
|
type _ns_flagdata = struct {
|
|
Fmask int32
|
|
Fshift int32
|
|
} /* nameser.h:48:1 */
|
|
|
|
type __ns_rr = struct {
|
|
Fname [1025]int8
|
|
F__ccgo_pad1 [1]byte
|
|
Ftype uint16_t
|
|
Frr_class uint16_t
|
|
F__ccgo_pad2 [2]byte
|
|
Fttl uint32_t
|
|
Frdlength uint16_t
|
|
F__ccgo_pad3 [2]byte
|
|
Frdata uintptr
|
|
} /* nameser.h:59:9 */
|
|
|
|
type ns_rr = __ns_rr /* nameser.h:66:3 */
|
|
|
|
type ns_flag = uint32 /* nameser.h:87:3 */
|
|
|
|
type ns_opcode = uint32 /* nameser.h:96:3 */
|
|
|
|
type ns_rcode = uint32 /* nameser.h:115:3 */
|
|
|
|
type ns_update_operation = uint32 /* nameser.h:121:3 */
|
|
|
|
type ns_tsig_key1 = struct {
|
|
Fname [1025]int8
|
|
Falg [1025]int8
|
|
F__ccgo_pad1 [2]byte
|
|
Fdata uintptr
|
|
Flen int32
|
|
} /* nameser.h:123:1 */
|
|
|
|
type ns_tsig_key = ns_tsig_key1 /* nameser.h:128:28 */
|
|
|
|
type ns_tcp_tsig_state1 = struct {
|
|
Fcounter int32
|
|
Fkey uintptr
|
|
Fctx uintptr
|
|
Fsig [512]uint8
|
|
Fsiglen int32
|
|
} /* nameser.h:130:1 */
|
|
|
|
type ns_tcp_tsig_state = ns_tcp_tsig_state1 /* nameser.h:137:34 */
|
|
|
|
type ns_type = uint32 /* nameser.h:200:3 */
|
|
|
|
type ns_class = uint32 /* nameser.h:219:3 */
|
|
|
|
type ns_key_types = uint32 /* nameser.h:226:3 */
|
|
|
|
type ns_cert_types = uint32 /* nameser.h:234:3 */
|
|
|
|
type HEADER = struct {
|
|
F__ccgo_pad1 [0]uint32
|
|
Fid uint32 /* unsigned id: 16, unsigned rd: 1, unsigned tc: 1, unsigned aa: 1, unsigned opcode: 4, unsigned qr: 1, unsigned rcode: 4, unsigned cd: 1, unsigned ad: 1, unsigned unused: 1, unsigned ra: 1 */
|
|
Fqdcount uint32 /* unsigned qdcount: 16, unsigned ancount: 16 */
|
|
Fnscount uint32 /* unsigned nscount: 16, unsigned arcount: 16 */
|
|
} /* nameser.h:353:3 */
|
|
|
|
// unused; purely for broken apps
|
|
type __res_state = struct {
|
|
Fretrans int32
|
|
Fretry int32
|
|
Foptions uint32
|
|
Fnscount int32
|
|
Fnsaddr_list [3]struct {
|
|
Fsin_family sa_family_t
|
|
Fsin_port in_port_t
|
|
Fsin_addr struct{ Fs_addr in_addr_t }
|
|
Fsin_zero [8]uint8_t
|
|
}
|
|
Fid uint16
|
|
F__ccgo_pad1 [2]byte
|
|
Fdnsrch [7]uintptr
|
|
Fdefdname [256]int8
|
|
Fpfcode uint32
|
|
Fndots uint32 /* unsigned ndots: 4, unsigned nsort: 4, unsigned ipv6_unavail: 1, unsigned unused: 23 */
|
|
F__ccgo_pad2 [4]byte
|
|
Fsort_list [10]struct {
|
|
Faddr struct{ Fs_addr in_addr_t }
|
|
Fmask uint32_t
|
|
}
|
|
Fqhook uintptr
|
|
Frhook uintptr
|
|
Fres_h_errno int32
|
|
F_vcsock int32
|
|
F_flags uint32
|
|
F_u struct {
|
|
F__ccgo_pad1 [0]uint32
|
|
Fpad [52]int8
|
|
}
|
|
} /* resolv.h:26:9 */
|
|
|
|
// unused; purely for broken apps
|
|
type res_state = uintptr /* resolv.h:62:3 */
|
|
|
|
type res_sym = struct {
|
|
Fnumber int32
|
|
Fname uintptr
|
|
Fhumanname uintptr
|
|
} /* resolv.h:70:1 */
|
|
|
|
func itoa(tls *TLS, p uintptr, x uint32) uintptr { /* getnameinfo.c:18:13: */
|
|
p += uintptr(uint32(3) * uint32(unsafe.Sizeof(int32(0))))
|
|
*(*int8)(unsafe.Pointer(PreDecUintptr(&p, 1))) = int8(0)
|
|
for __ccgo := true; __ccgo; __ccgo = x != 0 {
|
|
*(*int8)(unsafe.Pointer(PreDecUintptr(&p, 1))) = int8(uint32('0') + x%uint32(10))
|
|
x = x / uint32(10)
|
|
}
|
|
return p
|
|
}
|
|
|
|
func mkptr4(tls *TLS, s uintptr, ip uintptr) { /* getnameinfo.c:28:13: */
|
|
bp := tls.Alloc(32)
|
|
defer tls.Free(32)
|
|
|
|
Xsprintf(tls, s, ts+23,
|
|
VaList(bp, int32(*(*uint8)(unsafe.Pointer(ip + 3))), int32(*(*uint8)(unsafe.Pointer(ip + 2))), int32(*(*uint8)(unsafe.Pointer(ip + 1))), int32(*(*uint8)(unsafe.Pointer(ip)))))
|
|
}
|
|
|
|
func mkptr6(tls *TLS, s uintptr, ip uintptr) { /* getnameinfo.c:34:13: */
|
|
var i int32
|
|
for i = 15; i >= 0; i-- {
|
|
*(*int8)(unsafe.Pointer(PostIncUintptr(&s, 1))) = _sxdigits[int32(*(*uint8)(unsafe.Pointer(ip + uintptr(i))))&15]
|
|
*(*int8)(unsafe.Pointer(PostIncUintptr(&s, 1))) = int8('.')
|
|
*(*int8)(unsafe.Pointer(PostIncUintptr(&s, 1))) = _sxdigits[int32(*(*uint8)(unsafe.Pointer(ip + uintptr(i))))>>4]
|
|
*(*int8)(unsafe.Pointer(PostIncUintptr(&s, 1))) = int8('.')
|
|
}
|
|
Xstrcpy(tls, s, ts+48)
|
|
}
|
|
|
|
var _sxdigits = *(*[17]int8)(unsafe.Pointer(ts + 57)) /* getnameinfo.c:36:20 */
|
|
|
|
func reverse_hosts(tls *TLS, buf uintptr, a uintptr, scopeid uint32, family int32) { /* getnameinfo.c:45:13: */
|
|
bp := tls.Alloc(556)
|
|
defer tls.Free(556)
|
|
|
|
// var line [512]int8 at bp+16, 512
|
|
|
|
var p uintptr
|
|
var z uintptr
|
|
var _buf [1032]uint8
|
|
_ = _buf
|
|
// var atmp [16]uint8 at bp, 16
|
|
|
|
// var iplit address at bp+528, 28
|
|
|
|
//TODO FILE _f, *f = __fopen_rb_ca("/etc/hosts", &_f, _buf, sizeof _buf);
|
|
var f uintptr = Xfopen(tls, ts+74, ts+85)
|
|
if !(f != 0) {
|
|
return
|
|
}
|
|
if family == 2 {
|
|
Xmemcpy(tls, bp+uintptr(12), a, uint32(4))
|
|
Xmemcpy(tls, bp, ts+88, uint32(12))
|
|
a = bp /* &atmp[0] */
|
|
}
|
|
for Xfgets(tls, bp+16, int32(unsafe.Sizeof([512]int8{})), f) != 0 {
|
|
if AssignUintptr(&p, Xstrchr(tls, bp+16, '#')) != 0 {
|
|
*(*int8)(unsafe.Pointer(PostIncUintptr(&p, 1))) = int8('\n')
|
|
*(*int8)(unsafe.Pointer(p)) = int8(0)
|
|
}
|
|
|
|
for p = bp + 16; /* &line[0] */ *(*int8)(unsafe.Pointer(p)) != 0 && !(__isspace(tls, int32(*(*int8)(unsafe.Pointer(p)))) != 0); p++ {
|
|
}
|
|
*(*int8)(unsafe.Pointer(PostIncUintptr(&p, 1))) = int8(0)
|
|
if X__lookup_ipliteral(tls, bp+528, bp+16, 0) <= 0 {
|
|
continue
|
|
}
|
|
|
|
if (*address)(unsafe.Pointer(bp+528)).Ffamily == 2 {
|
|
Xmemcpy(tls, bp+528+8+uintptr(12), bp+528+8, uint32(4))
|
|
Xmemcpy(tls, bp+528+8, ts+88, uint32(12))
|
|
(*address)(unsafe.Pointer(bp + 528 /* &iplit */)).Fscopeid = uint32(0)
|
|
}
|
|
|
|
if Xmemcmp(tls, a, bp+528+8, uint32(16)) != 0 || (*address)(unsafe.Pointer(bp+528)).Fscopeid != scopeid {
|
|
continue
|
|
}
|
|
|
|
for ; *(*int8)(unsafe.Pointer(p)) != 0 && __isspace(tls, int32(*(*int8)(unsafe.Pointer(p)))) != 0; p++ {
|
|
}
|
|
for z = p; *(*int8)(unsafe.Pointer(z)) != 0 && !(__isspace(tls, int32(*(*int8)(unsafe.Pointer(z)))) != 0); z++ {
|
|
}
|
|
*(*int8)(unsafe.Pointer(z)) = int8(0)
|
|
if (int32(z)-int32(p))/1 < 256 {
|
|
Xmemcpy(tls, buf, p, uint32((int32(z)-int32(p))/1+1))
|
|
break
|
|
}
|
|
}
|
|
//TODO __fclose_ca(f);
|
|
Xfclose(tls, f)
|
|
}
|
|
|
|
func reverse_services(tls *TLS, buf uintptr, port int32, dgram int32) { /* getnameinfo.c:87:13: */
|
|
Xabort(tls) //TODO-
|
|
// unsigned long svport;
|
|
// char line[128], *p, *z;
|
|
// unsigned char _buf[1032];
|
|
// FILE _f, *f = __fopen_rb_ca("/etc/services", &_f, _buf, sizeof _buf);
|
|
// if (!f) return;
|
|
// while (fgets(line, sizeof line, f)) {
|
|
// if ((p=strchr(line, '#'))) *p++='\n', *p=0;
|
|
|
|
// for (p=line; *p && !isspace(*p); p++);
|
|
// if (!*p) continue;
|
|
// *p++ = 0;
|
|
// svport = strtoul(p, &z, 10);
|
|
|
|
// if (svport != port || z==p) continue;
|
|
// if (dgram && strncmp(z, "/udp", 4)) continue;
|
|
// if (!dgram && strncmp(z, "/tcp", 4)) continue;
|
|
// if (p-line > 32) continue;
|
|
|
|
// memcpy(buf, line, p-line);
|
|
// break;
|
|
// }
|
|
// __fclose_ca(f);
|
|
}
|
|
|
|
var Xh_errno int32 /* h_errno.c:4:5: */
|
|
|
|
func X__h_errno_location(tls *TLS) uintptr { /* h_errno.c:6:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v, (%v:)", tls, origin(2))
|
|
}
|
|
return uintptr(unsafe.Pointer(&Xh_errno))
|
|
}
|
|
|
|
func X__inet_aton(tls *TLS, s0 uintptr, dest uintptr) int32 { /* inet_aton.c:7:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v s0=%v dest=%v, (%v:)", tls, s0, dest, origin(2))
|
|
}
|
|
bp := tls.Alloc(20)
|
|
defer tls.Free(20)
|
|
|
|
var s uintptr = s0
|
|
var d uintptr = dest
|
|
*(*[4]uint32)(unsafe.Pointer(bp /* a */)) = [4]uint32{0: uint32(0)}
|
|
// var z uintptr at bp+16, 4
|
|
|
|
var i int32
|
|
|
|
for i = 0; i < 4; i++ {
|
|
*(*uint32)(unsafe.Pointer(bp + uintptr(i)*4)) = Xstrtoul(tls, s, bp+16, 0)
|
|
if *(*uintptr)(unsafe.Pointer(bp + 16)) == s || *(*int8)(unsafe.Pointer(*(*uintptr)(unsafe.Pointer(bp + 16)))) != 0 && int32(*(*int8)(unsafe.Pointer(*(*uintptr)(unsafe.Pointer(bp + 16))))) != '.' || !(func() int32 {
|
|
if 0 != 0 {
|
|
return Xisdigit(tls, int32(*(*int8)(unsafe.Pointer(s))))
|
|
}
|
|
return Bool32(uint32(*(*int8)(unsafe.Pointer(s)))-uint32('0') < uint32(10))
|
|
}() != 0) {
|
|
return 0
|
|
}
|
|
if !(int32(*(*int8)(unsafe.Pointer(*(*uintptr)(unsafe.Pointer(bp + 16))))) != 0) {
|
|
break
|
|
}
|
|
s = *(*uintptr)(unsafe.Pointer(bp + 16)) + uintptr(1)
|
|
}
|
|
if i == 4 {
|
|
return 0
|
|
}
|
|
switch i {
|
|
case 0:
|
|
*(*uint32)(unsafe.Pointer(bp + 1*4)) = *(*uint32)(unsafe.Pointer(bp)) & uint32(0xffffff)
|
|
AssignShrPtrUint32(bp, int(24))
|
|
fallthrough
|
|
case 1:
|
|
*(*uint32)(unsafe.Pointer(bp + 2*4)) = *(*uint32)(unsafe.Pointer(bp + 1*4)) & uint32(0xffff)
|
|
AssignShrPtrUint32(bp+1*4, int(16))
|
|
fallthrough
|
|
case 2:
|
|
*(*uint32)(unsafe.Pointer(bp + 3*4)) = *(*uint32)(unsafe.Pointer(bp + 2*4)) & uint32(0xff)
|
|
AssignShrPtrUint32(bp+2*4, int(8))
|
|
}
|
|
for i = 0; i < 4; i++ {
|
|
if *(*uint32)(unsafe.Pointer(bp + uintptr(i)*4)) > uint32(255) {
|
|
return 0
|
|
}
|
|
*(*uint8)(unsafe.Pointer(d + uintptr(i))) = uint8(*(*uint32)(unsafe.Pointer(bp + uintptr(i)*4)))
|
|
}
|
|
return 1
|
|
}
|
|
|
|
func Xinet_ntop(tls *TLS, af int32, a0 uintptr, s uintptr, l socklen_t) uintptr { /* inet_ntop.c:7:12: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v af=%v a0=%v s=%v l=%v, (%v:)", tls, af, a0, s, l, origin(2))
|
|
}
|
|
bp := tls.Alloc(276)
|
|
defer tls.Free(276)
|
|
|
|
var a uintptr = a0
|
|
var i int32
|
|
var j int32
|
|
var max int32
|
|
var best int32
|
|
// var buf [100]int8 at bp+176, 100
|
|
|
|
switch af {
|
|
case 2:
|
|
if socklen_t(Xsnprintf(tls, s, uint32(l), ts+101, VaList(bp, int32(*(*uint8)(unsafe.Pointer(a))), int32(*(*uint8)(unsafe.Pointer(a + 1))), int32(*(*uint8)(unsafe.Pointer(a + 2))), int32(*(*uint8)(unsafe.Pointer(a + 3)))))) < l {
|
|
return s
|
|
}
|
|
break
|
|
case 10:
|
|
if Xmemcmp(tls, a, ts+88, uint32(12)) != 0 {
|
|
Xsnprintf(tls, bp+176, uint32(unsafe.Sizeof([100]int8{})),
|
|
ts+113,
|
|
VaList(bp+32, 256*int32(*(*uint8)(unsafe.Pointer(a)))+int32(*(*uint8)(unsafe.Pointer(a + 1))), 256*int32(*(*uint8)(unsafe.Pointer(a + 2)))+int32(*(*uint8)(unsafe.Pointer(a + 3))),
|
|
256*int32(*(*uint8)(unsafe.Pointer(a + 4)))+int32(*(*uint8)(unsafe.Pointer(a + 5))), 256*int32(*(*uint8)(unsafe.Pointer(a + 6)))+int32(*(*uint8)(unsafe.Pointer(a + 7))),
|
|
256*int32(*(*uint8)(unsafe.Pointer(a + 8)))+int32(*(*uint8)(unsafe.Pointer(a + 9))), 256*int32(*(*uint8)(unsafe.Pointer(a + 10)))+int32(*(*uint8)(unsafe.Pointer(a + 11))),
|
|
256*int32(*(*uint8)(unsafe.Pointer(a + 12)))+int32(*(*uint8)(unsafe.Pointer(a + 13))), 256*int32(*(*uint8)(unsafe.Pointer(a + 14)))+int32(*(*uint8)(unsafe.Pointer(a + 15)))))
|
|
} else {
|
|
Xsnprintf(tls, bp+176, uint32(unsafe.Sizeof([100]int8{})),
|
|
ts+137,
|
|
VaList(bp+96, 256*int32(*(*uint8)(unsafe.Pointer(a)))+int32(*(*uint8)(unsafe.Pointer(a + 1))), 256*int32(*(*uint8)(unsafe.Pointer(a + 2)))+int32(*(*uint8)(unsafe.Pointer(a + 3))),
|
|
256*int32(*(*uint8)(unsafe.Pointer(a + 4)))+int32(*(*uint8)(unsafe.Pointer(a + 5))), 256*int32(*(*uint8)(unsafe.Pointer(a + 6)))+int32(*(*uint8)(unsafe.Pointer(a + 7))),
|
|
256*int32(*(*uint8)(unsafe.Pointer(a + 8)))+int32(*(*uint8)(unsafe.Pointer(a + 9))), 256*int32(*(*uint8)(unsafe.Pointer(a + 10)))+int32(*(*uint8)(unsafe.Pointer(a + 11))),
|
|
int32(*(*uint8)(unsafe.Pointer(a + 12))), int32(*(*uint8)(unsafe.Pointer(a + 13))), int32(*(*uint8)(unsafe.Pointer(a + 14))), int32(*(*uint8)(unsafe.Pointer(a + 15)))))
|
|
}
|
|
// Replace longest /(^0|:)[:0]{2,}/ with "::"
|
|
i = AssignInt32(&best, 0)
|
|
max = 2
|
|
for ; *(*int8)(unsafe.Pointer(bp + 176 + uintptr(i))) != 0; i++ {
|
|
if i != 0 && int32(*(*int8)(unsafe.Pointer(bp + 176 + uintptr(i)))) != ':' {
|
|
continue
|
|
}
|
|
j = int32(Xstrspn(tls, bp+176+uintptr(i), ts+167))
|
|
if j > max {
|
|
best = i
|
|
max = j
|
|
}
|
|
}
|
|
if max > 3 {
|
|
*(*int8)(unsafe.Pointer(bp + 176 + uintptr(best))) = AssignPtrInt8(bp+176+uintptr(best+1), int8(':'))
|
|
Xmemmove(tls, bp+176+uintptr(best)+uintptr(2), bp+176+uintptr(best)+uintptr(max), uint32(i-best-max+1))
|
|
}
|
|
if Xstrlen(tls, bp+176) < size_t(l) {
|
|
Xstrcpy(tls, s, bp+176)
|
|
return s
|
|
}
|
|
break
|
|
default:
|
|
*(*int32)(unsafe.Pointer(X___errno_location(tls))) = 97
|
|
return uintptr(0)
|
|
}
|
|
*(*int32)(unsafe.Pointer(X___errno_location(tls))) = 28
|
|
return uintptr(0)
|
|
}
|
|
|
|
func hexval(tls *TLS, c uint32) int32 { /* inet_pton.c:7:12: */
|
|
if c-uint32('0') < uint32(10) {
|
|
return int32(c - uint32('0'))
|
|
}
|
|
c = c | uint32(32)
|
|
if c-uint32('a') < uint32(6) {
|
|
return int32(c - uint32('a') + uint32(10))
|
|
}
|
|
return -1
|
|
}
|
|
|
|
func Xinet_pton(tls *TLS, af int32, s uintptr, a0 uintptr) int32 { /* inet_pton.c:15:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v af=%v s=%v a0=%v, (%v:)", tls, af, s, a0, origin(2))
|
|
}
|
|
bp := tls.Alloc(16)
|
|
defer tls.Free(16)
|
|
|
|
// var ip [8]uint16_t at bp, 16
|
|
|
|
var a uintptr = a0
|
|
var i int32
|
|
var j int32
|
|
var v int32
|
|
var d int32
|
|
var brk int32 = -1
|
|
var need_v4 int32 = 0
|
|
|
|
if af == 2 {
|
|
for i = 0; i < 4; i++ {
|
|
for v = AssignInt32(&j, 0); j < 3 && func() int32 {
|
|
if 0 != 0 {
|
|
return Xisdigit(tls, int32(*(*int8)(unsafe.Pointer(s + uintptr(j)))))
|
|
}
|
|
return Bool32(uint32(*(*int8)(unsafe.Pointer(s + uintptr(j))))-uint32('0') < uint32(10))
|
|
}() != 0; j++ {
|
|
v = 10*v + int32(*(*int8)(unsafe.Pointer(s + uintptr(j)))) - '0'
|
|
}
|
|
if j == 0 || j > 1 && int32(*(*int8)(unsafe.Pointer(s))) == '0' || v > 255 {
|
|
return 0
|
|
}
|
|
*(*uint8)(unsafe.Pointer(a + uintptr(i))) = uint8(v)
|
|
if int32(*(*int8)(unsafe.Pointer(s + uintptr(j)))) == 0 && i == 3 {
|
|
return 1
|
|
}
|
|
if int32(*(*int8)(unsafe.Pointer(s + uintptr(j)))) != '.' {
|
|
return 0
|
|
}
|
|
s += uintptr(j + 1)
|
|
}
|
|
return 0
|
|
} else if af != 10 {
|
|
*(*int32)(unsafe.Pointer(X___errno_location(tls))) = 97
|
|
return -1
|
|
}
|
|
|
|
if int32(*(*int8)(unsafe.Pointer(s))) == ':' && int32(*(*int8)(unsafe.Pointer(PreIncUintptr(&s, 1)))) != ':' {
|
|
return 0
|
|
}
|
|
|
|
for i = 0; ; i++ {
|
|
if int32(*(*int8)(unsafe.Pointer(s))) == ':' && brk < 0 {
|
|
brk = i
|
|
*(*uint16_t)(unsafe.Pointer(bp + uintptr(i&7)*2)) = uint16_t(0)
|
|
if !(int32(*(*int8)(unsafe.Pointer(PreIncUintptr(&s, 1)))) != 0) {
|
|
break
|
|
}
|
|
if i == 7 {
|
|
return 0
|
|
}
|
|
continue
|
|
}
|
|
for v = AssignInt32(&j, 0); j < 4 && AssignInt32(&d, hexval(tls, uint32(*(*int8)(unsafe.Pointer(s + uintptr(j)))))) >= 0; j++ {
|
|
v = 16*v + d
|
|
}
|
|
if j == 0 {
|
|
return 0
|
|
}
|
|
*(*uint16_t)(unsafe.Pointer(bp + uintptr(i&7)*2)) = uint16_t(v)
|
|
if !(int32(*(*int8)(unsafe.Pointer(s + uintptr(j)))) != 0) && (brk >= 0 || i == 7) {
|
|
break
|
|
}
|
|
if i == 7 {
|
|
return 0
|
|
}
|
|
if int32(*(*int8)(unsafe.Pointer(s + uintptr(j)))) != ':' {
|
|
if int32(*(*int8)(unsafe.Pointer(s + uintptr(j)))) != '.' || i < 6 && brk < 0 {
|
|
return 0
|
|
}
|
|
need_v4 = 1
|
|
i++
|
|
break
|
|
}
|
|
s += uintptr(j + 1)
|
|
}
|
|
if brk >= 0 {
|
|
Xmemmove(tls, bp+uintptr(brk)*2+uintptr(7)*2-uintptr(i)*2, bp+uintptr(brk)*2, uint32(2*(i+1-brk)))
|
|
for j = 0; j < 7-i; j++ {
|
|
*(*uint16_t)(unsafe.Pointer(bp + uintptr(brk+j)*2)) = uint16_t(0)
|
|
}
|
|
}
|
|
for j = 0; j < 8; j++ {
|
|
*(*uint8)(unsafe.Pointer(PostIncUintptr(&a, 1))) = uint8(int32(*(*uint16_t)(unsafe.Pointer(bp + uintptr(j)*2))) >> 8)
|
|
*(*uint8)(unsafe.Pointer(PostIncUintptr(&a, 1))) = uint8(*(*uint16_t)(unsafe.Pointer(bp + uintptr(j)*2)))
|
|
}
|
|
if need_v4 != 0 && Xinet_pton(tls, 2, s, a-uintptr(4)) <= 0 {
|
|
return 0
|
|
}
|
|
return 1
|
|
}
|
|
|
|
func X__lookup_ipliteral(tls *TLS, buf uintptr, name uintptr, family int32) int32 { /* lookup_ipliteral.c:12:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v buf=%v name=%v family=%v, (%v:)", tls, buf, name, family, origin(2))
|
|
}
|
|
bp := tls.Alloc(88)
|
|
defer tls.Free(88)
|
|
|
|
// var a4 in_addr at bp, 4
|
|
|
|
// var a6 in6_addr at bp+68, 16
|
|
|
|
if X__inet_aton(tls, name, bp) > 0 {
|
|
if family == 10 { // wrong family
|
|
return -2
|
|
}
|
|
Xmemcpy(tls, buf+8, bp, uint32(unsafe.Sizeof(in_addr{})))
|
|
(*address)(unsafe.Pointer(buf)).Ffamily = 2
|
|
(*address)(unsafe.Pointer(buf)).Fscopeid = uint32(0)
|
|
return 1
|
|
}
|
|
// var tmp [64]int8 at bp+4, 64
|
|
|
|
var p uintptr = Xstrchr(tls, name, '%')
|
|
// var z uintptr at bp+84, 4
|
|
|
|
var scopeid uint64 = uint64(0)
|
|
if p != 0 && (int32(p)-int32(name))/1 < 64 {
|
|
Xmemcpy(tls, bp+4, name, uint32((int32(p)-int32(name))/1))
|
|
*(*int8)(unsafe.Pointer(bp + 4 + uintptr((int32(p)-int32(name))/1))) = int8(0)
|
|
name = bp + 4 /* &tmp[0] */
|
|
}
|
|
|
|
if Xinet_pton(tls, 10, name, bp+68) <= 0 {
|
|
return 0
|
|
}
|
|
if family == 2 { // wrong family
|
|
return -2
|
|
}
|
|
|
|
Xmemcpy(tls, buf+8, bp+68, uint32(unsafe.Sizeof(in6_addr{})))
|
|
(*address)(unsafe.Pointer(buf)).Ffamily = 10
|
|
if p != 0 {
|
|
if func() int32 {
|
|
if 0 != 0 {
|
|
return Xisdigit(tls, int32(*(*int8)(unsafe.Pointer(PreIncUintptr(&p, 1)))))
|
|
}
|
|
return Bool32(uint32(*(*int8)(unsafe.Pointer(PreIncUintptr(&p, 1))))-uint32('0') < uint32(10))
|
|
}() != 0 {
|
|
scopeid = Xstrtoull(tls, p, bp+84, 10)
|
|
} else {
|
|
*(*uintptr)(unsafe.Pointer(bp + 84 /* z */)) = p - uintptr(1)
|
|
}
|
|
if *(*int8)(unsafe.Pointer(*(*uintptr)(unsafe.Pointer(bp + 84)))) != 0 {
|
|
Xabort(tls) //TODO-
|
|
// if (!IN6_IS_ADDR_LINKLOCAL(&a6) &&
|
|
// !IN6_IS_ADDR_MC_LINKLOCAL(&a6))
|
|
// return EAI_NONAME;
|
|
// scopeid = if_nametoindex(p);
|
|
// if (!scopeid) return EAI_NONAME;
|
|
}
|
|
if scopeid > uint64(0xffffffff) {
|
|
return -2
|
|
}
|
|
}
|
|
(*address)(unsafe.Pointer(buf)).Fscopeid = uint32(scopeid)
|
|
return 1
|
|
}
|
|
|
|
type mode_t = uint32 /* alltypes.h:175:18 */
|
|
|
|
type flock = struct {
|
|
Fl_type int16
|
|
Fl_whence int16
|
|
Fl_start off_t
|
|
Fl_len off_t
|
|
Fl_pid pid_t
|
|
} /* fcntl.h:24:1 */
|
|
|
|
func is_valid_hostname(tls *TLS, host uintptr) int32 { /* lookup_name.c:18:12: */
|
|
var s uintptr
|
|
//TODO if (strnlen(host, 255)-1 >= 254 || mbstowcs(0, host, 0) == -1) return 0;
|
|
if Xstrnlen(tls, host, uint32(255))-size_t(1) >= size_t(254) {
|
|
return 0
|
|
}
|
|
for s = host; int32(*(*uint8)(unsafe.Pointer(s))) >= 0x80 || int32(*(*uint8)(unsafe.Pointer(s))) == '.' || int32(*(*uint8)(unsafe.Pointer(s))) == '-' || Xisalnum(tls, int32(*(*uint8)(unsafe.Pointer(s)))) != 0; s++ {
|
|
}
|
|
return BoolInt32(!(*(*uint8)(unsafe.Pointer(s)) != 0))
|
|
}
|
|
|
|
var Xzero_struct_address address /* lookup_name.c:27:16: */
|
|
|
|
func name_from_null(tls *TLS, buf uintptr, name uintptr, family int32, flags int32) int32 { /* lookup_name.c:29:12: */
|
|
var cnt int32 = 0
|
|
if name != 0 {
|
|
return 0
|
|
}
|
|
if flags&0x01 != 0 {
|
|
//TODO if (family != AF_INET6)
|
|
//TODO buf[cnt++] = (struct address){ .family = AF_INET };
|
|
if family != 10 {
|
|
var x = Xzero_struct_address
|
|
x.Ffamily = 2
|
|
*(*address)(unsafe.Pointer(buf + uintptr(PostIncInt32(&cnt, 1))*28)) = x
|
|
}
|
|
//TODO if (family != AF_INET)
|
|
//TODO buf[cnt++] = (struct address){ .family = AF_INET6 };
|
|
if family != 2 {
|
|
var x = Xzero_struct_address
|
|
x.Ffamily = 10
|
|
*(*address)(unsafe.Pointer(buf + uintptr(PostIncInt32(&cnt, 1))*28)) = x
|
|
}
|
|
} else {
|
|
Xabort(tls) //TODO-
|
|
// if (family != AF_INET6)
|
|
// buf[cnt++] = (struct address){ .family = AF_INET, .addr = { 127,0,0,1 } };
|
|
// if (family != AF_INET)
|
|
// buf[cnt++] = (struct address){ .family = AF_INET6, .addr = { [15] = 1 } };
|
|
}
|
|
return cnt
|
|
}
|
|
|
|
func name_from_numeric(tls *TLS, buf uintptr, name uintptr, family int32) int32 { /* lookup_name.c:58:12: */
|
|
return X__lookup_ipliteral(tls, buf, name, family)
|
|
}
|
|
|
|
func name_from_hosts(tls *TLS, buf uintptr, canon uintptr, name uintptr, family int32) int32 { /* lookup_name.c:63:12: */
|
|
bp := tls.Alloc(512)
|
|
defer tls.Free(512)
|
|
|
|
// var line [512]int8 at bp, 512
|
|
|
|
var l size_t = Xstrlen(tls, name)
|
|
var cnt int32 = 0
|
|
var badfam int32 = 0
|
|
var _buf [1032]uint8
|
|
_ = _buf
|
|
//TODO FILE _f, *f = __fopen_rb_ca("/etc/hosts", &_f, _buf, sizeof _buf);
|
|
var _f FILE
|
|
_ = _f
|
|
var f uintptr = Xfopen(tls, ts+74, ts+85)
|
|
if !(f != 0) {
|
|
switch *(*int32)(unsafe.Pointer(X___errno_location(tls))) {
|
|
case 2:
|
|
fallthrough
|
|
case 20:
|
|
fallthrough
|
|
case 13:
|
|
return 0
|
|
fallthrough
|
|
default:
|
|
return -11
|
|
}
|
|
}
|
|
for Xfgets(tls, bp, int32(unsafe.Sizeof([512]int8{})), f) != 0 && cnt < 48 {
|
|
var p uintptr
|
|
var z uintptr
|
|
|
|
if AssignUintptr(&p, Xstrchr(tls, bp, '#')) != 0 {
|
|
*(*int8)(unsafe.Pointer(PostIncUintptr(&p, 1))) = int8('\n')
|
|
*(*int8)(unsafe.Pointer(p)) = int8(0)
|
|
}
|
|
for p = bp + uintptr(1); AssignUintptr(&p, Xstrstr(tls, p, name)) != 0 && (!(__isspace(tls, int32(*(*int8)(unsafe.Pointer(p + UintptrFromInt32(-1))))) != 0) || !(__isspace(tls, int32(*(*int8)(unsafe.Pointer(p + uintptr(l))))) != 0)); p++ {
|
|
}
|
|
if !(p != 0) {
|
|
continue
|
|
}
|
|
|
|
// Isolate IP address to parse
|
|
for p = bp; /* &line[0] */ *(*int8)(unsafe.Pointer(p)) != 0 && !(__isspace(tls, int32(*(*int8)(unsafe.Pointer(p)))) != 0); p++ {
|
|
}
|
|
*(*int8)(unsafe.Pointer(PostIncUintptr(&p, 1))) = int8(0)
|
|
switch name_from_numeric(tls, buf+uintptr(cnt)*28, bp, family) {
|
|
case 1:
|
|
cnt++
|
|
break
|
|
case 0:
|
|
continue
|
|
default:
|
|
badfam = -2
|
|
continue
|
|
}
|
|
|
|
// Extract first name as canonical name
|
|
for ; *(*int8)(unsafe.Pointer(p)) != 0 && __isspace(tls, int32(*(*int8)(unsafe.Pointer(p)))) != 0; p++ {
|
|
}
|
|
for z = p; *(*int8)(unsafe.Pointer(z)) != 0 && !(__isspace(tls, int32(*(*int8)(unsafe.Pointer(z)))) != 0); z++ {
|
|
}
|
|
*(*int8)(unsafe.Pointer(z)) = int8(0)
|
|
if is_valid_hostname(tls, p) != 0 {
|
|
Xmemcpy(tls, canon, p, uint32((int32(z)-int32(p))/1+1))
|
|
}
|
|
}
|
|
//TODO __fclose_ca(f);
|
|
Xfclose(tls, f)
|
|
if cnt != 0 {
|
|
return cnt
|
|
}
|
|
return badfam
|
|
}
|
|
|
|
type dpc_ctx = struct {
|
|
Faddrs uintptr
|
|
Fcanon uintptr
|
|
Fcnt int32
|
|
} /* lookup_name.c:112:1 */
|
|
|
|
func name_from_dns_search(tls *TLS, buf uintptr, canon uintptr, name uintptr, family int32) int32 { /* lookup_name.c:191:12: */
|
|
return -1 //TODO-
|
|
Xabort(tls)
|
|
return int32(0) //TODO-
|
|
// char search[256];
|
|
// struct resolvconf conf;
|
|
// size_t l, dots;
|
|
// char *p, *z;
|
|
|
|
// if (__get_resolv_conf(&conf, search, sizeof search) < 0) return -1;
|
|
|
|
// /* Count dots, suppress search when >=ndots or name ends in
|
|
// * a dot, which is an explicit request for global scope. */
|
|
// for (dots=l=0; name[l]; l++) if (name[l]=='.') dots++;
|
|
// if (dots >= conf.ndots || name[l-1]=='.') *search = 0;
|
|
|
|
// /* Strip final dot for canon, fail if multiple trailing dots. */
|
|
// if (name[l-1]=='.') l--;
|
|
// if (!l || name[l-1]=='.') return EAI_NONAME;
|
|
|
|
// /* This can never happen; the caller already checked length. */
|
|
// if (l >= 256) return EAI_NONAME;
|
|
|
|
// /* Name with search domain appended is setup in canon[]. This both
|
|
// * provides the desired default canonical name (if the requested
|
|
// * name is not a CNAME record) and serves as a buffer for passing
|
|
// * the full requested name to name_from_dns. */
|
|
// memcpy(canon, name, l);
|
|
// canon[l] = '.';
|
|
|
|
// for (p=search; *p; p=z) {
|
|
// for (; isspace(*p); p++);
|
|
// for (z=p; *z && !isspace(*z); z++);
|
|
// if (z==p) break;
|
|
// if (z-p < 256 - l - 1) {
|
|
// memcpy(canon+l+1, p, z-p);
|
|
// canon[z-p+1+l] = 0;
|
|
// int cnt = name_from_dns(buf, canon, canon, family, &conf);
|
|
// if (cnt) return cnt;
|
|
// }
|
|
// }
|
|
|
|
// canon[l] = 0;
|
|
// return name_from_dns(buf, canon, name, family, &conf);
|
|
}
|
|
|
|
type policy = struct {
|
|
Faddr [16]uint8
|
|
Flen uint8
|
|
Fmask uint8
|
|
Fprec uint8
|
|
Flabel uint8
|
|
} /* lookup_name.c:237:14 */
|
|
|
|
var defpolicy = [6]policy{
|
|
{Faddr: *(*[16]uint8)(unsafe.Pointer(ts + 170)), Flen: uint8(15), Fmask: uint8(0xff), Fprec: uint8(50)},
|
|
{Faddr: *(*[16]uint8)(unsafe.Pointer(ts + 187)), Flen: uint8(11), Fmask: uint8(0xff), Fprec: uint8(35), Flabel: uint8(4)},
|
|
{Faddr: *(*[16]uint8)(unsafe.Pointer(ts + 203)), Flen: uint8(1), Fmask: uint8(0xff), Fprec: uint8(30), Flabel: uint8(2)},
|
|
{Faddr: *(*[16]uint8)(unsafe.Pointer(ts + 219)), Flen: uint8(3), Fmask: uint8(0xff), Fprec: uint8(5), Flabel: uint8(5)},
|
|
{Faddr: *(*[16]uint8)(unsafe.Pointer(ts + 235)), Fmask: uint8(0xfe), Fprec: uint8(3), Flabel: uint8(13)},
|
|
// Last rule must match all addresses to stop loop.
|
|
{Faddr: *(*[16]uint8)(unsafe.Pointer(ts + 251)), Fprec: uint8(40), Flabel: uint8(1)},
|
|
} /* lookup_name.c:241:3 */
|
|
|
|
func policyof(tls *TLS, a uintptr) uintptr { /* lookup_name.c:259:28: */
|
|
var i int32
|
|
for i = 0; ; i++ {
|
|
if Xmemcmp(tls, a, uintptr(unsafe.Pointer(&defpolicy))+uintptr(i)*20, uint32(defpolicy[i].Flen)) != 0 {
|
|
continue
|
|
}
|
|
if int32(*(*uint8_t)(unsafe.Pointer(a + uintptr(defpolicy[i].Flen))))&int32(defpolicy[i].Fmask) !=
|
|
int32(*(*uint8)(unsafe.Pointer(uintptr(unsafe.Pointer(&defpolicy)) + uintptr(i)*20 + uintptr(defpolicy[i].Flen)))) {
|
|
continue
|
|
}
|
|
return uintptr(unsafe.Pointer(&defpolicy)) + uintptr(i)*20
|
|
}
|
|
return uintptr(0)
|
|
}
|
|
|
|
func labelof(tls *TLS, a uintptr) int32 { /* lookup_name.c:272:12: */
|
|
return int32((*policy)(unsafe.Pointer(policyof(tls, a))).Flabel)
|
|
}
|
|
|
|
func scopeof(tls *TLS, a uintptr) int32 { /* lookup_name.c:277:12: */
|
|
if int32(*(*uint8_t)(unsafe.Pointer(a))) == 0xff {
|
|
return int32(*(*uint8_t)(unsafe.Pointer(a + 1))) & 15
|
|
}
|
|
if int32(*(*uint8_t)(unsafe.Pointer(a))) == 0xfe && int32(*(*uint8_t)(unsafe.Pointer(a + 1)))&0xc0 == 0x80 {
|
|
return 2
|
|
}
|
|
if *(*uint32_t)(unsafe.Pointer(a)) == uint32_t(0) && *(*uint32_t)(unsafe.Pointer(a + 1*4)) == uint32_t(0) && *(*uint32_t)(unsafe.Pointer(a + 2*4)) == uint32_t(0) && int32(*(*uint8_t)(unsafe.Pointer(a + 12))) == 0 && int32(*(*uint8_t)(unsafe.Pointer(a + 13))) == 0 && int32(*(*uint8_t)(unsafe.Pointer(a + 14))) == 0 && int32(*(*uint8_t)(unsafe.Pointer(a + 15))) == 1 {
|
|
return 2
|
|
}
|
|
if int32(*(*uint8_t)(unsafe.Pointer(a))) == 0xfe && int32(*(*uint8_t)(unsafe.Pointer(a + 1)))&0xc0 == 0xc0 {
|
|
return 5
|
|
}
|
|
return 14
|
|
}
|
|
|
|
func prefixmatch(tls *TLS, s uintptr, d uintptr) int32 { /* lookup_name.c:286:12: */
|
|
// FIXME: The common prefix length should be limited to no greater
|
|
// than the nominal length of the prefix portion of the source
|
|
// address. However the definition of the source prefix length is
|
|
// not clear and thus this limiting is not yet implemented.
|
|
var i uint32
|
|
for i = uint32(0); i < uint32(128) && !((int32(*(*uint8_t)(unsafe.Pointer(s /* &.__in6_union */ /* &.__s6_addr */ + uintptr(i/uint32(8)))))^int32(*(*uint8_t)(unsafe.Pointer(d /* &.__in6_union */ /* &.__s6_addr */ + uintptr(i/uint32(8))))))&(int32(128)>>(i%uint32(8))) != 0); i++ {
|
|
}
|
|
return int32(i)
|
|
}
|
|
|
|
func addrcmp(tls *TLS, _a uintptr, _b uintptr) int32 { /* lookup_name.c:305:12: */
|
|
var a uintptr = _a
|
|
var b uintptr = _b
|
|
return (*address)(unsafe.Pointer(b)).Fsortkey - (*address)(unsafe.Pointer(a)).Fsortkey
|
|
}
|
|
|
|
func X__lookup_name(tls *TLS, buf uintptr, canon uintptr, name uintptr, family int32, flags int32) int32 { /* lookup_name.c:311:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v buf=%v canon=%v name=%v family=%v flags=%v, (%v:)", tls, buf, canon, name, family, flags, origin(2))
|
|
}
|
|
bp := tls.Alloc(92)
|
|
defer tls.Free(92)
|
|
|
|
var cnt int32 = 0
|
|
var i int32
|
|
var j int32
|
|
_ = j
|
|
|
|
*(*int8)(unsafe.Pointer(canon)) = int8(0)
|
|
if name != 0 {
|
|
// reject empty name and check len so it fits into temp bufs
|
|
var l size_t = Xstrnlen(tls, name, uint32(255))
|
|
if l-size_t(1) >= size_t(254) {
|
|
return -2
|
|
}
|
|
Xmemcpy(tls, canon, name, l+size_t(1))
|
|
}
|
|
|
|
// Procedurally, a request for v6 addresses with the v4-mapped
|
|
// flag set is like a request for unspecified family, followed
|
|
// by filtering of the results.
|
|
if flags&0x08 != 0 {
|
|
if family == 10 {
|
|
family = 0
|
|
} else {
|
|
flags = flags - 0x08
|
|
}
|
|
}
|
|
|
|
// Try each backend until there's at least one result.
|
|
cnt = name_from_null(tls, buf, name, family, flags)
|
|
if !(cnt != 0) {
|
|
cnt = name_from_numeric(tls, buf, name, family)
|
|
}
|
|
if !(cnt != 0) && !(flags&0x04 != 0) {
|
|
cnt = name_from_hosts(tls, buf, canon, name, family)
|
|
if !(cnt != 0) {
|
|
cnt = name_from_dns_search(tls, buf, canon, name, family)
|
|
}
|
|
}
|
|
if cnt <= 0 {
|
|
if cnt != 0 {
|
|
return cnt
|
|
}
|
|
return -2
|
|
}
|
|
|
|
// Filter/transform results for v4-mapped lookup, if requested.
|
|
if flags&0x08 != 0 {
|
|
Xabort(tls) //TODO-
|
|
// if (!(flags & AI_ALL)) {
|
|
// /* If any v6 results exist, remove v4 results. */
|
|
// for (i=0; i<cnt && buf[i].family != AF_INET6; i++);
|
|
// if (i<cnt) {
|
|
// for (j=0; i<cnt; i++) {
|
|
// if (buf[i].family == AF_INET6)
|
|
// buf[j++] = buf[i];
|
|
// }
|
|
// cnt = i = j;
|
|
// }
|
|
// }
|
|
// /* Translate any remaining v4 results to v6 */
|
|
// for (i=0; i<cnt; i++) {
|
|
// if (buf[i].family != AF_INET) continue;
|
|
// memcpy(buf[i].addr+12, buf[i].addr, 4);
|
|
// memcpy(buf[i].addr, "\0\0\0\0\0\0\0\0\0\0\xff\xff", 12);
|
|
// buf[i].family = AF_INET6;
|
|
// }
|
|
}
|
|
|
|
// No further processing is needed if there are fewer than 2
|
|
// results or if there are only IPv4 results.
|
|
if cnt < 2 || family == 2 {
|
|
return cnt
|
|
}
|
|
for i = 0; i < cnt; i++ {
|
|
if (*address)(unsafe.Pointer(buf+uintptr(i)*28)).Ffamily != 2 {
|
|
break
|
|
}
|
|
}
|
|
if i == cnt {
|
|
return cnt
|
|
}
|
|
var cs int32
|
|
_ = cs
|
|
//TODO pthread_setcancelstate(PTHREAD_CANCEL_DISABLE, &cs);
|
|
|
|
// The following implements a subset of RFC 3484/6724 destination
|
|
// address selection by generating a single 31-bit sort key for
|
|
// each address. Rules 3, 4, and 7 are omitted for having
|
|
// excessive runtime and code size cost and dubious benefit.
|
|
// So far the label/precedence table cannot be customized.
|
|
for i = 0; i < cnt; i++ {
|
|
var family int32 = (*address)(unsafe.Pointer(buf + uintptr(i)*28)).Ffamily
|
|
var key int32 = 0
|
|
*(*sockaddr_in6)(unsafe.Pointer(bp + 28 /* sa6 */)) = sockaddr_in6{}
|
|
*(*sockaddr_in6)(unsafe.Pointer(bp /* da6 */)) = sockaddr_in6{Fsin6_family: sa_family_t(10), Fsin6_port: in_port_t(65535), Fsin6_scope_id: (*address)(unsafe.Pointer(buf + uintptr(i)*28)).Fscopeid}
|
|
*(*sockaddr_in)(unsafe.Pointer(bp + 72 /* sa4 */)) = sockaddr_in{}
|
|
*(*sockaddr_in)(unsafe.Pointer(bp + 56 /* da4 */)) = sockaddr_in{Fsin_family: sa_family_t(2), Fsin_port: in_port_t(65535)}
|
|
var sa1 uintptr
|
|
var da uintptr
|
|
// var salen socklen_t at bp+88, 4
|
|
|
|
var dalen socklen_t
|
|
if family == 10 {
|
|
Xmemcpy(tls, bp+8, buf+uintptr(i)*28+8, uint32(16))
|
|
da = bp /* &da6 */
|
|
dalen = socklen_t(unsafe.Sizeof(sockaddr_in6{}))
|
|
sa1 = bp + 28 /* &sa6 */
|
|
*(*socklen_t)(unsafe.Pointer(bp + 88 /* salen */)) = socklen_t(unsafe.Sizeof(sockaddr_in6{}))
|
|
} else {
|
|
Xmemcpy(tls, bp+28+8,
|
|
ts+88, uint32(12))
|
|
Xmemcpy(tls, bp+8+uintptr(12), buf+uintptr(i)*28+8, uint32(4))
|
|
Xmemcpy(tls, bp+8,
|
|
ts+88, uint32(12))
|
|
Xmemcpy(tls, bp+8+uintptr(12), buf+uintptr(i)*28+8, uint32(4))
|
|
Xmemcpy(tls, bp+56+4, buf+uintptr(i)*28+8, uint32(4))
|
|
da = bp + 56 /* &da4 */
|
|
dalen = socklen_t(unsafe.Sizeof(sockaddr_in{}))
|
|
sa1 = bp + 72 /* &sa4 */
|
|
*(*socklen_t)(unsafe.Pointer(bp + 88 /* salen */)) = socklen_t(unsafe.Sizeof(sockaddr_in{}))
|
|
}
|
|
var dpolicy uintptr = policyof(tls, bp+8)
|
|
var dscope int32 = scopeof(tls, bp+8)
|
|
var dlabel int32 = int32((*policy)(unsafe.Pointer(dpolicy)).Flabel)
|
|
var dprec int32 = int32((*policy)(unsafe.Pointer(dpolicy)).Fprec)
|
|
var prefixlen int32 = 0
|
|
var fd int32 = Xsocket(tls, family, 2|02000000, 17)
|
|
if fd >= 0 {
|
|
if !(Xconnect(tls, fd, da, dalen) != 0) {
|
|
key = key | 0x40000000
|
|
if !(Xgetsockname(tls, fd, sa1, bp+88) != 0) {
|
|
if family == 2 {
|
|
Xmemcpy(tls,
|
|
bp+28+8+uintptr(12),
|
|
bp+72+4, uint32(4))
|
|
}
|
|
if dscope == scopeof(tls, bp+28+8) {
|
|
key = key | 0x20000000
|
|
}
|
|
if dlabel == labelof(tls, bp+28+8) {
|
|
key = key | 0x10000000
|
|
}
|
|
prefixlen = prefixmatch(tls, bp+28+8,
|
|
bp+8)
|
|
}
|
|
}
|
|
Xclose(tls, fd)
|
|
}
|
|
key = key | dprec<<20
|
|
key = key | (15-dscope)<<16
|
|
key = key | prefixlen<<8
|
|
key = key | (48-i)<<0
|
|
(*address)(unsafe.Pointer(buf + uintptr(i)*28)).Fsortkey = key
|
|
}
|
|
Xqsort(tls, buf, uint32(cnt), uint32(unsafe.Sizeof(address{})), *(*uintptr)(unsafe.Pointer(&struct {
|
|
f func(*TLS, uintptr, uintptr) int32
|
|
}{addrcmp})))
|
|
|
|
//TODO pthread_setcancelstate(cs, 0);
|
|
|
|
return cnt
|
|
}
|
|
|
|
func X__lookup_serv(tls *TLS, buf uintptr, name uintptr, proto int32, socktype int32, flags int32) int32 { /* lookup_serv.c:12:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v buf=%v name=%v proto=%v socktype=%v flags=%v, (%v:)", tls, buf, name, proto, socktype, flags, origin(2))
|
|
}
|
|
bp := tls.Alloc(4)
|
|
defer tls.Free(4)
|
|
|
|
var line [128]int8
|
|
_ = line
|
|
var cnt int32 = 0
|
|
var p uintptr
|
|
_ = p
|
|
*(*uintptr)(unsafe.Pointer(bp /* z */)) = ts + 13 /* "" */
|
|
var port uint32 = uint32(0)
|
|
|
|
switch socktype {
|
|
case 1:
|
|
switch proto {
|
|
case 0:
|
|
proto = 6
|
|
fallthrough
|
|
case 6:
|
|
break
|
|
default:
|
|
return -8
|
|
}
|
|
break
|
|
case 2:
|
|
switch proto {
|
|
case 0:
|
|
proto = 17
|
|
fallthrough
|
|
case 17:
|
|
break
|
|
default:
|
|
return -8
|
|
}
|
|
fallthrough
|
|
case 0:
|
|
break
|
|
default:
|
|
if name != 0 {
|
|
return -8
|
|
}
|
|
(*service)(unsafe.Pointer(buf)).Fport = uint16_t(0)
|
|
(*service)(unsafe.Pointer(buf)).Fproto = uint8(proto)
|
|
(*service)(unsafe.Pointer(buf)).Fsocktype = uint8(socktype)
|
|
return 1
|
|
}
|
|
|
|
if name != 0 {
|
|
if !(int32(*(*int8)(unsafe.Pointer(name))) != 0) {
|
|
return -8
|
|
}
|
|
port = Xstrtoul(tls, name, bp, 10)
|
|
}
|
|
if !(int32(*(*int8)(unsafe.Pointer(*(*uintptr)(unsafe.Pointer(bp))))) != 0) {
|
|
if port > uint32(65535) {
|
|
return -8
|
|
}
|
|
if proto != 17 {
|
|
(*service)(unsafe.Pointer(buf + uintptr(cnt)*4)).Fport = uint16_t(port)
|
|
(*service)(unsafe.Pointer(buf + uintptr(cnt)*4)).Fsocktype = uint8(1)
|
|
(*service)(unsafe.Pointer(buf + uintptr(PostIncInt32(&cnt, 1))*4)).Fproto = uint8(6)
|
|
}
|
|
if proto != 6 {
|
|
(*service)(unsafe.Pointer(buf + uintptr(cnt)*4)).Fport = uint16_t(port)
|
|
(*service)(unsafe.Pointer(buf + uintptr(cnt)*4)).Fsocktype = uint8(2)
|
|
(*service)(unsafe.Pointer(buf + uintptr(PostIncInt32(&cnt, 1))*4)).Fproto = uint8(17)
|
|
}
|
|
return cnt
|
|
}
|
|
|
|
if flags&0x400 != 0 {
|
|
return -2
|
|
}
|
|
|
|
var l size_t = Xstrlen(tls, name)
|
|
_ = l
|
|
|
|
Xabort(tls) //TODO-
|
|
// unsigned char _buf[1032];
|
|
// FILE _f, *f = __fopen_rb_ca("/etc/services", &_f, _buf, sizeof _buf);
|
|
// if (!f) switch (errno) {
|
|
// case ENOENT:
|
|
// case ENOTDIR:
|
|
// case EACCES:
|
|
// return EAI_SERVICE;
|
|
// default:
|
|
// return EAI_SYSTEM;
|
|
// }
|
|
|
|
Xabort(tls) //TODO-
|
|
// while (fgets(line, sizeof line, f) && cnt < MAXSERVS) {
|
|
// if ((p=strchr(line, '#'))) *p++='\n', *p=0;
|
|
|
|
// /* Find service name */
|
|
// for(p=line; (p=strstr(p, name)); p++) {
|
|
// if (p>line && !isspace(p[-1])) continue;
|
|
// if (p[l] && !isspace(p[l])) continue;
|
|
// break;
|
|
// }
|
|
// if (!p) continue;
|
|
|
|
// /* Skip past canonical name at beginning of line */
|
|
// for (p=line; *p && !isspace(*p); p++);
|
|
|
|
// port = strtoul(p, &z, 10);
|
|
// if (port > 65535 || z==p) continue;
|
|
// if (!strncmp(z, "/udp", 4)) {
|
|
// if (proto == IPPROTO_TCP) continue;
|
|
// buf[cnt].port = port;
|
|
// buf[cnt].socktype = SOCK_DGRAM;
|
|
// buf[cnt++].proto = IPPROTO_UDP;
|
|
// }
|
|
// if (!strncmp(z, "/tcp", 4)) {
|
|
// if (proto == IPPROTO_UDP) continue;
|
|
// buf[cnt].port = port;
|
|
// buf[cnt].socktype = SOCK_STREAM;
|
|
// buf[cnt++].proto = IPPROTO_TCP;
|
|
// }
|
|
// }
|
|
// __fclose_ca(f);
|
|
// return cnt > 0 ? cnt : EAI_SERVICE;
|
|
Xabort(tls)
|
|
return int32(0) //TODO-
|
|
}
|
|
|
|
func X__toread(tls *TLS, f uintptr) int32 { /* __toread.c:3:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v f=%v, (%v:)", tls, f, origin(2))
|
|
}
|
|
*(*int32)(unsafe.Pointer(f + 72)) |= (*FILE)(unsafe.Pointer(f)).Fmode - 1
|
|
if (*FILE)(unsafe.Pointer(f)).Fwpos != (*FILE)(unsafe.Pointer(f)).Fwbase {
|
|
(*struct {
|
|
f func(*TLS, uintptr, uintptr, size_t) size_t
|
|
})(unsafe.Pointer(&struct{ uintptr }{(*FILE)(unsafe.Pointer(f)).Fwrite})).f(tls, f, uintptr(0), uint32(0))
|
|
}
|
|
(*FILE)(unsafe.Pointer(f)).Fwpos = AssignPtrUintptr(f+28, AssignPtrUintptr(f+16, uintptr(0)))
|
|
if (*FILE)(unsafe.Pointer(f)).Fflags&uint32(4) != 0 {
|
|
*(*uint32)(unsafe.Pointer(f)) |= uint32(32)
|
|
return -1
|
|
}
|
|
(*FILE)(unsafe.Pointer(f)).Frpos = AssignPtrUintptr(f+8, (*FILE)(unsafe.Pointer(f)).Fbuf+uintptr((*FILE)(unsafe.Pointer(f)).Fbuf_size))
|
|
if (*FILE)(unsafe.Pointer(f)).Fflags&uint32(16) != 0 {
|
|
return -1
|
|
}
|
|
return 0
|
|
}
|
|
|
|
func X__toread_needs_stdio_exit(tls *TLS) { /* __toread.c:16:13: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v, (%v:)", tls, origin(2))
|
|
}
|
|
X__builtin_abort(tls) //TODO-
|
|
// __stdio_exit_needed();
|
|
}
|
|
|
|
// This function assumes it will never be called if there is already
|
|
// data buffered for reading.
|
|
|
|
func X__uflow(tls *TLS, f uintptr) int32 { /* __uflow.c:6:5: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v f=%v, (%v:)", tls, f, origin(2))
|
|
}
|
|
bp := tls.Alloc(1)
|
|
defer tls.Free(1)
|
|
|
|
// var c uint8 at bp, 1
|
|
|
|
if !(X__toread(tls, f) != 0) && (*struct {
|
|
f func(*TLS, uintptr, uintptr, size_t) size_t
|
|
})(unsafe.Pointer(&struct{ uintptr }{(*FILE)(unsafe.Pointer(f)).Fread})).f(tls, f, bp, uint32(1)) == size_t(1) {
|
|
return int32(*(*uint8)(unsafe.Pointer(bp)))
|
|
}
|
|
return -1
|
|
}
|
|
|
|
func Xbsearch(tls *TLS, key uintptr, base uintptr, nel size_t, width size_t, cmp uintptr) uintptr { /* bsearch.c:3:6: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v key=%v base=%v nel=%v width=%v cmp=%v, (%v:)", tls, key, base, nel, width, cmp, origin(2))
|
|
}
|
|
var try uintptr
|
|
var sign int32
|
|
for nel > size_t(0) {
|
|
try = base + uintptr(width*(nel/size_t(2)))
|
|
sign = (*struct {
|
|
f func(*TLS, uintptr, uintptr) int32
|
|
})(unsafe.Pointer(&struct{ uintptr }{cmp})).f(tls, key, try)
|
|
if sign < 0 {
|
|
nel = nel / size_t(2)
|
|
} else if sign > 0 {
|
|
base = try + uintptr(width)
|
|
nel = nel - (nel/size_t(2) + size_t(1))
|
|
} else {
|
|
return try
|
|
}
|
|
}
|
|
return uintptr(0)
|
|
}
|
|
|
|
func strtox(tls *TLS, s uintptr, p uintptr, prec int32) float64 { /* strtod.c:6:20: */
|
|
bp := tls.Alloc(136)
|
|
defer tls.Free(136)
|
|
|
|
// var f FILE at bp, 136
|
|
|
|
(*FILE)(unsafe.Pointer(bp)).Fbuf = AssignPtrUintptr(bp+4, s)
|
|
(*FILE)(unsafe.Pointer(bp)).Frend = UintptrFromInt32(-1)
|
|
X__shlim(tls, bp, int64(0))
|
|
var y float64 = X__floatscan(tls, bp, prec, 1)
|
|
var cnt off_t = (*FILE)(unsafe.Pointer(bp)).Fshcnt + off_t((int32((*FILE)(unsafe.Pointer(bp)).Frpos)-int32((*FILE)(unsafe.Pointer(bp)).Fbuf))/1)
|
|
if p != 0 {
|
|
*(*uintptr)(unsafe.Pointer(p)) = func() uintptr {
|
|
if cnt != 0 {
|
|
return s + uintptr(cnt)
|
|
}
|
|
return s
|
|
}()
|
|
}
|
|
return y
|
|
}
|
|
|
|
func Xstrtof(tls *TLS, s uintptr, p uintptr) float32 { /* strtod.c:17:7: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v s=%v p=%v, (%v:)", tls, s, p, origin(2))
|
|
}
|
|
return float32(strtox(tls, s, p, 0))
|
|
}
|
|
|
|
func Xstrtod(tls *TLS, s uintptr, p uintptr) float64 { /* strtod.c:22:8: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v s=%v p=%v, (%v:)", tls, s, p, origin(2))
|
|
}
|
|
return strtox(tls, s, p, 1)
|
|
}
|
|
|
|
func Xstrtold(tls *TLS, s uintptr, p uintptr) float64 { /* strtod.c:27:13: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v s=%v p=%v, (%v:)", tls, s, p, origin(2))
|
|
}
|
|
return strtox(tls, s, p, 2)
|
|
}
|
|
|
|
func strtox1(tls *TLS, s uintptr, p uintptr, base int32, lim uint64) uint64 { /* strtol.c:8:27: */
|
|
bp := tls.Alloc(136)
|
|
defer tls.Free(136)
|
|
|
|
// var f FILE at bp, 136
|
|
|
|
(*FILE)(unsafe.Pointer(bp)).Fbuf = AssignPtrUintptr(bp+4, s)
|
|
(*FILE)(unsafe.Pointer(bp)).Frend = UintptrFromInt32(-1)
|
|
X__shlim(tls, bp, int64(0))
|
|
var y uint64 = X__intscan(tls, bp, uint32(base), 1, lim)
|
|
if p != 0 {
|
|
var cnt size_t = size_t((*FILE)(unsafe.Pointer(bp)).Fshcnt + off_t((int32((*FILE)(unsafe.Pointer(bp)).Frpos)-int32((*FILE)(unsafe.Pointer(bp)).Fbuf))/1))
|
|
*(*uintptr)(unsafe.Pointer(p)) = s + uintptr(cnt)
|
|
}
|
|
return y
|
|
}
|
|
|
|
func Xstrtoull(tls *TLS, s uintptr, p uintptr, base int32) uint64 { /* strtol.c:21:20: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v s=%v p=%v base=%v, (%v:)", tls, s, p, base, origin(2))
|
|
}
|
|
return strtox1(tls, s, p, base, 2*uint64(0x7fffffffffffffff)+uint64(1))
|
|
}
|
|
|
|
func Xstrtoll(tls *TLS, s uintptr, p uintptr, base int32) int64 { /* strtol.c:26:11: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v s=%v p=%v base=%v, (%v:)", tls, s, p, base, origin(2))
|
|
}
|
|
return int64(strtox1(tls, s, p, base, Uint64FromInt64(-0x7fffffffffffffff-int64(1))))
|
|
}
|
|
|
|
func Xstrtoul(tls *TLS, s uintptr, p uintptr, base int32) uint32 { /* strtol.c:31:15: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v s=%v p=%v base=%v, (%v:)", tls, s, p, base, origin(2))
|
|
}
|
|
return uint32(strtox1(tls, s, p, base, uint64(2*uint32(0x7fffffff)+uint32(1))))
|
|
}
|
|
|
|
func Xstrtol(tls *TLS, s uintptr, p uintptr, base int32) int32 { /* strtol.c:36:6: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v s=%v p=%v base=%v, (%v:)", tls, s, p, base, origin(2))
|
|
}
|
|
return int32(strtox1(tls, s, p, base, uint64(0+Uint32FromInt32(Int32(-Int32(0x7fffffff))-Int32FromInt32(1)))))
|
|
}
|
|
|
|
func Xstrtoimax(tls *TLS, s uintptr, p uintptr, base int32) intmax_t { /* strtol.c:41:10: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v s=%v p=%v base=%v, (%v:)", tls, s, p, base, origin(2))
|
|
}
|
|
return Xstrtoll(tls, s, p, base)
|
|
}
|
|
|
|
func Xstrtoumax(tls *TLS, s uintptr, p uintptr, base int32) uintmax_t { /* strtol.c:46:11: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v s=%v p=%v base=%v, (%v:)", tls, s, p, base, origin(2))
|
|
}
|
|
return Xstrtoull(tls, s, p, base)
|
|
}
|
|
|
|
func Xstrdup(tls *TLS, s uintptr) uintptr { /* strdup.c:4:6: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v s=%v, (%v:)", tls, s, origin(2))
|
|
}
|
|
var l size_t = Xstrlen(tls, s)
|
|
var d uintptr = Xmalloc(tls, l+size_t(1))
|
|
if !(d != 0) {
|
|
return uintptr(0)
|
|
}
|
|
return Xmemcpy(tls, d, s, l+size_t(1))
|
|
}
|
|
|
|
func Xstrnlen(tls *TLS, s uintptr, n size_t) size_t { /* strnlen.c:3:8: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v s=%v n=%v, (%v:)", tls, s, n, origin(2))
|
|
}
|
|
var p uintptr = Xmemchr(tls, s, 0, n)
|
|
if p != 0 {
|
|
return uint32((int32(p) - int32(s)) / 1)
|
|
}
|
|
return n
|
|
}
|
|
|
|
func Xstrspn(tls *TLS, s uintptr, c uintptr) size_t { /* strspn.c:6:8: */
|
|
if __ccgo_strace {
|
|
trc("tls=%v s=%v c=%v, (%v:)", tls, s, c, origin(2))
|
|
}
|
|
bp := tls.Alloc(32)
|
|
defer tls.Free(32)
|
|
|
|
var a uintptr = s
|
|
*(*[8]size_t)(unsafe.Pointer(bp /* byteset */)) = [8]size_t{0: size_t(0)}
|
|
|
|
if !(int32(*(*int8)(unsafe.Pointer(c))) != 0) {
|
|
return size_t(0)
|
|
}
|
|
if !(int32(*(*int8)(unsafe.Pointer(c + 1))) != 0) {
|
|
for ; int32(*(*int8)(unsafe.Pointer(s))) == int32(*(*int8)(unsafe.Pointer(c))); s++ {
|
|
}
|
|
return size_t((int32(s) - int32(a)) / 1)
|
|
}
|
|
|
|
for ; *(*int8)(unsafe.Pointer(c)) != 0 && AssignOrPtrUint32(bp+uintptr(size_t(*(*uint8)(unsafe.Pointer(c)))/(uint32(8)*uint32(unsafe.Sizeof(size_t(0)))))*4, size_t(size_t(1))<<(size_t(*(*uint8)(unsafe.Pointer(c)))%(uint32(8)*uint32(unsafe.Sizeof(size_t(0)))))) != 0; c++ {
|
|
}
|
|
for ; *(*int8)(unsafe.Pointer(s)) != 0 && *(*size_t)(unsafe.Pointer(bp + uintptr(size_t(*(*uint8)(unsafe.Pointer(s)))/(uint32(8)*uint32(unsafe.Sizeof(size_t(0)))))*4))&(size_t(size_t(1))<<(size_t(*(*uint8)(unsafe.Pointer(s)))%(uint32(8)*uint32(unsafe.Sizeof(size_t(0)))))) != 0; s++ {
|
|
}
|
|
return size_t((int32(s) - int32(a)) / 1)
|
|
}
|
|
|
|
func init() {
|
|
*(*uintptr)(unsafe.Pointer(uintptr(unsafe.Pointer(&X_ctype_)) + 0)) = uintptr(unsafe.Pointer(&X_C_ctype_)) // ctype_.c:319:23:
|
|
}
|
|
|
|
var ts1 = "infinity\x00nan\x00\x00\x00\x01\x02\x04\a\x03\x06\x05\x00%d.%d.%d.%d.in-addr.arpa\x00ip6.arpa\x000123456789abcdef\x00/etc/hosts\x00rb\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xff\xff\x00%d.%d.%d.%d\x00%x:%x:%x:%x:%x:%x:%x:%x\x00%x:%x:%x:%x:%x:%x:%d.%d.%d.%d\x00:0\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xff\xff\x00\x00\x00\x00 \x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00 \x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfc\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00"
|
|
var ts = (*reflect.StringHeader)(unsafe.Pointer(&ts1)).Data
|