Gecko [ www.foryou-vip.com ]

Name	Size	Permission	Date
.libs	[ DIR ]	drwxr-xr-x	2024-03-12 14:32
html_tables	[ DIR ]	drwxrwxr-x	2022-10-31 11:36
tests	[ DIR ]	drwxrwxr-x	2022-10-31 11:36
Makefile.frag	518 B	-rw-rw-r--	2022-10-31 11:36
Makefile.frag.w32	484 B	-rw-rw-r--	2022-10-31 11:36
array.c	180.31 KB	-rw-rw-r--	2022-10-31 11:36
array.lo	319 B	-rw-r--r--	2024-03-12 14:30
array.o	899.66 KB	-rw-r--r--	2024-03-12 14:30
assert.c	11.06 KB	-rw-rw-r--	2022-10-31 11:36
assert.lo	322 B	-rw-r--r--	2024-03-12 14:31
assert.o	160.11 KB	-rw-r--r--	2024-03-12 14:31
base64.c	30.69 KB	-rw-rw-r--	2022-10-31 11:36
base64.h	3.8 KB	-rw-rw-r--	2022-10-31 11:36
base64.lo	322 B	-rw-r--r--	2024-03-12 14:30
base64.o	87.38 KB	-rw-r--r--	2024-03-12 14:30
basic_functions.c	169.92 KB	-rw-rw-r--	2022-10-31 11:36
basic_functions.h	7.71 KB	-rw-rw-r--	2022-10-31 11:36
basic_functions.lo	349 B	-rw-r--r--	2024-03-12 14:30
basic_functions.o	928.72 KB	-rw-r--r--	2024-03-12 14:30
browscap.c	20.87 KB	-rw-rw-r--	2022-10-31 11:36
browscap.lo	328 B	-rw-r--r--	2024-03-12 14:30
browscap.o	144.24 KB	-rw-r--r--	2024-03-12 14:30
config.m4	12.06 KB	-rw-rw-r--	2022-10-31 11:36
config.w32	1.79 KB	-rw-rw-r--	2022-10-31 11:36
crc32.c	2.78 KB	-rw-rw-r--	2022-10-31 11:36
crc32.h	4.64 KB	-rw-rw-r--	2022-10-31 11:36
crc32.lo	319 B	-rw-r--r--	2024-03-12 14:30
crc32.o	78.52 KB	-rw-r--r--	2024-03-12 14:30
credits.c	5.86 KB	-rw-rw-r--	2022-10-31 11:36
credits.h	1.67 KB	-rw-rw-r--	2022-10-31 11:36
credits.lo	325 B	-rw-r--r--	2024-03-12 14:31
credits.o	112.09 KB	-rw-r--r--	2024-03-12 14:31
credits_ext.h	5.25 KB	-rw-rw-r--	2022-10-31 11:36
credits_sapi.h	835 B	-rw-rw-r--	2022-10-31 11:36
crypt.c	8.2 KB	-rw-rw-r--	2022-10-31 11:36
crypt.lo	319 B	-rw-r--r--	2024-03-12 14:30
crypt.o	94.56 KB	-rw-r--r--	2024-03-12 14:30
crypt_blowfish.c	31.67 KB	-rw-rw-r--	2022-10-31 11:36
crypt_blowfish.h	1.01 KB	-rw-rw-r--	2022-10-31 11:36
crypt_blowfish.lo	346 B	-rw-r--r--	2024-03-12 14:30
crypt_blowfish.o	70.52 KB	-rw-r--r--	2024-03-12 14:30
crypt_freesec.c	21.67 KB	-rw-rw-r--	2022-10-31 11:36
crypt_freesec.h	662 B	-rw-rw-r--	2022-10-31 11:36
crypt_freesec.lo	343 B	-rw-r--r--	2024-03-12 14:30
crypt_freesec.o	30.79 KB	-rw-r--r--	2024-03-12 14:30
crypt_sha256.c	21.56 KB	-rw-rw-r--	2022-10-31 11:36
crypt_sha256.lo	340 B	-rw-r--r--	2024-03-12 14:30
crypt_sha256.o	105.59 KB	-rw-r--r--	2024-03-12 14:30
crypt_sha512.c	26.21 KB	-rw-rw-r--	2022-10-31 11:36
crypt_sha512.lo	340 B	-rw-r--r--	2024-03-12 14:30
crypt_sha512.o	109.91 KB	-rw-r--r--	2024-03-12 14:30
css.c	2.39 KB	-rw-rw-r--	2022-10-31 11:36
css.h	1.19 KB	-rw-rw-r--	2022-10-31 11:36
css.lo	313 B	-rw-r--r--	2024-03-12 14:31
css.o	74.53 KB	-rw-r--r--	2024-03-12 14:31
cyr_convert.c	11.42 KB	-rw-rw-r--	2022-10-31 11:36
cyr_convert.h	1.22 KB	-rw-rw-r--	2022-10-31 11:36
cyr_convert.lo	337 B	-rw-r--r--	2024-03-12 14:30
cyr_convert.o	85.68 KB	-rw-r--r--	2024-03-12 14:30
datetime.c	3.48 KB	-rw-rw-r--	2022-10-31 11:36
datetime.h	1.34 KB	-rw-rw-r--	2022-10-31 11:36
datetime.lo	328 B	-rw-r--r--	2024-03-12 14:30
datetime.o	81.48 KB	-rw-r--r--	2024-03-12 14:30
dir.c	14.9 KB	-rw-rw-r--	2022-10-31 11:36
dir.lo	313 B	-rw-r--r--	2024-03-12 14:30
dir.o	147.7 KB	-rw-r--r--	2024-03-12 14:30
dl.c	8.11 KB	-rw-rw-r--	2022-10-31 11:36
dl.h	1.59 KB	-rw-rw-r--	2022-10-31 11:36
dl.lo	310 B	-rw-r--r--	2024-03-12 14:30
dl.o	106.3 KB	-rw-r--r--	2024-03-12 14:30
dns.c	28.95 KB	-rw-rw-r--	2022-10-31 11:36
dns.lo	313 B	-rw-r--r--	2024-03-12 14:30
dns.o	186.35 KB	-rw-r--r--	2024-03-12 14:30
dns_win32.c	15.22 KB	-rw-rw-r--	2022-10-31 11:36
exec.c	13.49 KB	-rw-rw-r--	2022-10-31 11:36
exec.h	1.68 KB	-rw-rw-r--	2022-10-31 11:36
exec.lo	316 B	-rw-r--r--	2024-03-12 14:30
exec.o	147.67 KB	-rw-r--r--	2024-03-12 14:30
file.c	68.02 KB	-rw-rw-r--	2022-10-31 11:36
file.h	4.63 KB	-rw-rw-r--	2022-10-31 11:36
file.lo	316 B	-rw-r--r--	2024-03-12 14:30
file.o	448.2 KB	-rw-r--r--	2024-03-12 14:30
filestat.c	30.34 KB	-rw-rw-r--	2022-10-31 11:36
filestat.lo	328 B	-rw-r--r--	2024-03-12 14:30
filestat.o	263.89 KB	-rw-r--r--	2024-03-12 14:30
filters.c	53.65 KB	-rw-rw-r--	2022-10-31 11:36
filters.lo	325 B	-rw-r--r--	2024-03-12 14:31
filters.o	190.89 KB	-rw-r--r--	2024-03-12 14:31
flock_compat.c	6.73 KB	-rw-rw-r--	2022-10-31 11:36
flock_compat.h	2.06 KB	-rw-rw-r--	2022-10-31 11:36
flock_compat.lo	340 B	-rw-r--r--	2024-03-12 14:30
flock_compat.o	69.09 KB	-rw-r--r--	2024-03-12 14:30
formatted_print.c	20.84 KB	-rw-rw-r--	2022-10-31 11:36
formatted_print.lo	349 B	-rw-r--r--	2024-03-12 14:30
formatted_print.o	180.03 KB	-rw-r--r--	2024-03-12 14:30
fsock.c	3.95 KB	-rw-rw-r--	2022-10-31 11:36
fsock.h	1.42 KB	-rw-rw-r--	2022-10-31 11:36
fsock.lo	319 B	-rw-r--r--	2024-03-12 14:30
fsock.o	89.59 KB	-rw-r--r--	2024-03-12 14:30
ftok.c	2.05 KB	-rw-rw-r--	2022-10-31 11:36
ftok.lo	316 B	-rw-r--r--	2024-03-12 14:31
ftok.o	78.41 KB	-rw-r--r--	2024-03-12 14:31
ftp_fopen_wrapper.c	31.75 KB	-rw-rw-r--	2022-10-31 11:36
ftp_fopen_wrapper.lo	355 B	-rw-r--r--	2024-03-12 14:31
ftp_fopen_wrapper.o	157.71 KB	-rw-r--r--	2024-03-12 14:31
head.c	12.54 KB	-rw-rw-r--	2022-10-31 11:36
head.h	1.85 KB	-rw-rw-r--	2022-10-31 11:36
head.lo	316 B	-rw-r--r--	2024-03-12 14:30
head.o	186.44 KB	-rw-r--r--	2024-03-12 14:30
hrtime.c	5.06 KB	-rw-rw-r--	2022-10-31 11:36
hrtime.h	2.48 KB	-rw-rw-r--	2022-10-31 11:36
hrtime.lo	322 B	-rw-r--r--	2024-03-12 14:32
hrtime.o	86.02 KB	-rw-r--r--	2024-03-12 14:32
html.c	47 KB	-rw-rw-r--	2022-10-31 11:36
html.h	2.62 KB	-rw-rw-r--	2022-10-31 11:36
html.lo	316 B	-rw-r--r--	2024-03-12 14:31
html.o	1.03 MB	-rw-r--r--	2024-03-12 14:31
html_tables.h	472.41 KB	-rw-rw-r--	2022-10-31 11:36
http.c	7.46 KB	-rw-rw-r--	2022-10-31 11:36
http.lo	316 B	-rw-r--r--	2024-03-12 14:32
http.o	118.94 KB	-rw-r--r--	2024-03-12 14:32
http_fopen_wrapper.c	32.52 KB	-rw-rw-r--	2022-10-31 11:36
http_fopen_wrapper.lo	358 B	-rw-r--r--	2024-03-12 14:31
http_fopen_wrapper.o	248.67 KB	-rw-r--r--	2024-03-12 14:31
image.c	42.17 KB	-rw-rw-r--	2022-10-31 11:36
image.lo	319 B	-rw-r--r--	2024-03-12 14:31
image.o	166.95 KB	-rw-r--r--	2024-03-12 14:31
incomplete_class.c	5.04 KB	-rw-rw-r--	2022-10-31 11:36
incomplete_class.lo	352 B	-rw-r--r--	2024-03-12 14:31
incomplete_class.o	85.84 KB	-rw-r--r--	2024-03-12 14:31
info.c	40.22 KB	-rw-rw-r--	2022-10-31 11:36
info.h	22.6 KB	-rw-rw-r--	2022-10-31 11:36
info.lo	316 B	-rw-r--r--	2024-03-12 14:31
info.o	249.2 KB	-rw-r--r--	2024-03-12 14:31
iptc.c	9.57 KB	-rw-rw-r--	2022-10-31 11:36
iptc.lo	316 B	-rw-r--r--	2024-03-12 14:31
iptc.o	106.11 KB	-rw-r--r--	2024-03-12 14:31
lcg.c	3 KB	-rw-rw-r--	2022-10-31 11:36
lcg.lo	313 B	-rw-r--r--	2024-03-12 14:31
lcg.o	75.09 KB	-rw-r--r--	2024-03-12 14:31
levenshtein.c	3.92 KB	-rw-rw-r--	2022-10-31 11:36
levenshtein.lo	337 B	-rw-r--r--	2024-03-12 14:31
levenshtein.o	76.74 KB	-rw-r--r--	2024-03-12 14:31
link.c	5.84 KB	-rw-rw-r--	2022-10-31 11:36
link.lo	316 B	-rw-r--r--	2024-03-12 14:31
link.o	101.48 KB	-rw-r--r--	2024-03-12 14:31
mail.c	17.34 KB	-rw-rw-r--	2022-10-31 11:36
mail.lo	316 B	-rw-r--r--	2024-03-12 14:31
mail.o	170.32 KB	-rw-r--r--	2024-03-12 14:31
math.c	30.06 KB	-rw-rw-r--	2022-10-31 11:36
math.lo	316 B	-rw-r--r--	2024-03-12 14:31
math.o	263.9 KB	-rw-r--r--	2024-03-12 14:31
md5.c	10.91 KB	-rw-rw-r--	2022-10-31 11:36
md5.h	2.1 KB	-rw-rw-r--	2022-10-31 11:36
md5.lo	313 B	-rw-r--r--	2024-03-12 14:31
md5.o	104.06 KB	-rw-r--r--	2024-03-12 14:31
metaphone.c	11.96 KB	-rw-rw-r--	2022-10-31 11:36
metaphone.lo	331 B	-rw-r--r--	2024-03-12 14:31
metaphone.o	170.27 KB	-rw-r--r--	2024-03-12 14:31
microtime.c	4.29 KB	-rw-rw-r--	2022-10-31 11:36
microtime.h	1.32 KB	-rw-rw-r--	2022-10-31 11:36
microtime.lo	331 B	-rw-r--r--	2024-03-12 14:31
microtime.o	87.61 KB	-rw-r--r--	2024-03-12 14:31
mt_rand.c	10.84 KB	-rw-rw-r--	2022-10-31 11:36
mt_rand.lo	325 B	-rw-r--r--	2024-03-12 14:31
mt_rand.o	94.95 KB	-rw-r--r--	2024-03-12 14:31
net.c	8.97 KB	-rw-rw-r--	2022-10-31 11:36
net.lo	313 B	-rw-r--r--	2024-03-12 14:32
net.o	85.18 KB	-rw-r--r--	2024-03-12 14:32
pack.c	31.5 KB	-rw-rw-r--	2022-10-31 11:36
pack.h	1.24 KB	-rw-rw-r--	2022-10-31 11:36
pack.lo	316 B	-rw-r--r--	2024-03-12 14:31
pack.o	149.25 KB	-rw-r--r--	2024-03-12 14:31
pageinfo.c	3.72 KB	-rw-rw-r--	2022-10-31 11:36
pageinfo.h	1.42 KB	-rw-rw-r--	2022-10-31 11:36
pageinfo.lo	328 B	-rw-r--r--	2024-03-12 14:31
pageinfo.o	84.04 KB	-rw-r--r--	2024-03-12 14:31
password.c	21.94 KB	-rw-rw-r--	2022-10-31 11:36
password.lo	328 B	-rw-r--r--	2024-03-12 14:32
password.o	142.6 KB	-rw-r--r--	2024-03-12 14:32
php_array.h	4.41 KB	-rw-rw-r--	2022-10-31 11:36
php_assert.h	1.38 KB	-rw-rw-r--	2022-10-31 11:36
php_browscap.h	1.28 KB	-rw-rw-r--	2022-10-31 11:36
php_crypt.h	1.54 KB	-rw-rw-r--	2022-10-31 11:36
php_crypt_r.c	10.76 KB	-rw-rw-r--	2022-10-31 11:36
php_crypt_r.h	1.99 KB	-rw-rw-r--	2022-10-31 11:36
php_crypt_r.lo	337 B	-rw-r--r--	2024-03-12 14:30
php_crypt_r.o	80.88 KB	-rw-r--r--	2024-03-12 14:30
php_dir.h	1.66 KB	-rw-rw-r--	2022-10-31 11:36
php_dns.h	2.96 KB	-rw-rw-r--	2022-10-31 11:36
php_ext_syslog.h	1.46 KB	-rw-rw-r--	2022-10-31 11:36
php_filestat.h	3.1 KB	-rw-rw-r--	2022-10-31 11:36
php_fopen_wrapper.c	11.6 KB	-rw-rw-r--	2022-10-31 11:36
php_fopen_wrapper.lo	355 B	-rw-r--r--	2024-03-12 14:31
php_fopen_wrapper.o	114.31 KB	-rw-r--r--	2024-03-12 14:31
php_fopen_wrappers.h	1.94 KB	-rw-rw-r--	2022-10-31 11:36
php_ftok.h	1.22 KB	-rw-rw-r--	2022-10-31 11:36
php_http.h	1.62 KB	-rw-rw-r--	2022-10-31 11:36
php_image.h	2.37 KB	-rw-rw-r--	2022-10-31 11:36
php_incomplete_class.h	2.24 KB	-rw-rw-r--	2022-10-31 11:36
php_iptc.h	1.23 KB	-rw-rw-r--	2022-10-31 11:36
php_lcg.h	1.48 KB	-rw-rw-r--	2022-10-31 11:36
php_link.h	1.33 KB	-rw-rw-r--	2022-10-31 11:36
php_mail.h	2.37 KB	-rw-rw-r--	2022-10-31 11:36
php_math.h	4.65 KB	-rw-rw-r--	2022-10-31 11:36
php_metaphone.h	1.2 KB	-rw-rw-r--	2022-10-31 11:36
php_mt_rand.h	1.96 KB	-rw-rw-r--	2022-10-31 11:36
php_net.h	1.32 KB	-rw-rw-r--	2022-10-31 11:36
php_password.h	3.07 KB	-rw-rw-r--	2022-10-31 11:36
php_rand.h	3.14 KB	-rw-rw-r--	2022-10-31 11:36
php_random.h	2.07 KB	-rw-rw-r--	2022-10-31 11:36
php_smart_string.h	1.28 KB	-rw-rw-r--	2022-10-31 11:36
php_smart_string_public.h	1.29 KB	-rw-rw-r--	2022-10-31 11:36
php_standard.h	2.24 KB	-rw-rw-r--	2022-10-31 11:36
php_string.h	5.94 KB	-rw-rw-r--	2022-10-31 11:36
php_type.h	1.62 KB	-rw-rw-r--	2022-10-31 11:36
php_uuencode.h	1.38 KB	-rw-rw-r--	2022-10-31 11:36
php_var.h	3.61 KB	-rw-rw-r--	2022-10-31 11:36
php_versioning.h	1.36 KB	-rw-rw-r--	2022-10-31 11:36
proc_open.c	31.34 KB	-rw-rw-r--	2022-10-31 11:36
proc_open.h	1.74 KB	-rw-rw-r--	2022-10-31 11:36
proc_open.lo	331 B	-rw-r--r--	2024-03-12 14:32
proc_open.o	159.39 KB	-rw-r--r--	2024-03-12 14:32
quot_print.c	7.29 KB	-rw-rw-r--	2022-10-31 11:36
quot_print.h	1.45 KB	-rw-rw-r--	2022-10-31 11:36
quot_print.lo	334 B	-rw-r--r--	2024-03-12 14:31
quot_print.o	90.55 KB	-rw-r--r--	2024-03-12 14:31
rand.c	2.41 KB	-rw-rw-r--	2022-10-31 11:36
rand.lo	316 B	-rw-r--r--	2024-03-12 14:31
rand.o	79.04 KB	-rw-r--r--	2024-03-12 14:31
random.c	7.49 KB	-rw-rw-r--	2022-10-31 11:36
random.lo	322 B	-rw-r--r--	2024-03-12 14:32
random.o	88.59 KB	-rw-r--r--	2024-03-12 14:32
scanf.c	28.81 KB	-rw-rw-r--	2022-10-31 11:36
scanf.h	2.24 KB	-rw-rw-r--	2022-10-31 11:36
scanf.lo	319 B	-rw-r--r--	2024-03-12 14:31
scanf.o	122.94 KB	-rw-r--r--	2024-03-12 14:31
sha1.c	11.44 KB	-rw-rw-r--	2022-10-31 11:36
sha1.h	1.69 KB	-rw-rw-r--	2022-10-31 11:36
sha1.lo	316 B	-rw-r--r--	2024-03-12 14:31
sha1.o	118.13 KB	-rw-r--r--	2024-03-12 14:31
soundex.c	3.16 KB	-rw-rw-r--	2022-10-31 11:36
soundex.lo	325 B	-rw-r--r--	2024-03-12 14:31
soundex.o	77.52 KB	-rw-r--r--	2024-03-12 14:31
streamsfuncs.c	46.41 KB	-rw-rw-r--	2022-10-31 11:36
streamsfuncs.h	2.73 KB	-rw-rw-r--	2022-10-31 11:36
streamsfuncs.lo	340 B	-rw-r--r--	2024-03-12 14:32
streamsfuncs.o	341.69 KB	-rw-r--r--	2024-03-12 14:32
string.c	154.56 KB	-rw-rw-r--	2022-10-31 11:36
string.lo	322 B	-rw-r--r--	2024-03-12 14:31
string.o	871.95 KB	-rw-r--r--	2024-03-12 14:31
strnatcmp.c	4.34 KB	-rw-rw-r--	2022-10-31 11:36
strnatcmp.lo	331 B	-rw-r--r--	2024-03-12 14:31
strnatcmp.o	71.72 KB	-rw-r--r--	2024-03-12 14:31
syslog.c	6.37 KB	-rw-rw-r--	2022-10-31 11:36
syslog.lo	322 B	-rw-r--r--	2024-03-12 14:31
syslog.o	96.32 KB	-rw-r--r--	2024-03-12 14:31
type.c	10.17 KB	-rw-rw-r--	2022-10-31 11:36
type.lo	316 B	-rw-r--r--	2024-03-12 14:31
type.o	130.52 KB	-rw-r--r--	2024-03-12 14:31
uniqid.c	2.65 KB	-rw-rw-r--	2022-10-31 11:36
uniqid.h	1.23 KB	-rw-rw-r--	2022-10-31 11:36
uniqid.lo	322 B	-rw-r--r--	2024-03-12 14:31
uniqid.o	81.45 KB	-rw-r--r--	2024-03-12 14:31
url.c	17.75 KB	-rw-rw-r--	2022-10-31 11:36
url.h	2.39 KB	-rw-rw-r--	2022-10-31 11:36
url.lo	313 B	-rw-r--r--	2024-03-12 14:31
url.o	157.62 KB	-rw-r--r--	2024-03-12 14:31
url_scanner_ex.c	39.41 KB	-rw-r--r--	2022-10-31 11:36
url_scanner_ex.h	2.44 KB	-rw-rw-r--	2022-10-31 11:36
url_scanner_ex.lo	346 B	-rw-r--r--	2024-03-12 14:31
url_scanner_ex.o	322.59 KB	-rw-r--r--	2024-03-12 14:31
url_scanner_ex.re	27.65 KB	-rw-rw-r--	2022-10-31 11:36
user_filters.c	17.55 KB	-rw-rw-r--	2022-10-31 11:36
user_filters.lo	340 B	-rw-r--r--	2024-03-12 14:31
user_filters.o	142.52 KB	-rw-r--r--	2024-03-12 14:31
uuencode.c	6.62 KB	-rw-rw-r--	2022-10-31 11:36
uuencode.lo	328 B	-rw-r--r--	2024-03-12 14:31
uuencode.o	85.96 KB	-rw-r--r--	2024-03-12 14:31
var.c	37.8 KB	-rw-rw-r--	2022-10-31 11:36
var.lo	313 B	-rw-r--r--	2024-03-12 14:31
var.o	399.8 KB	-rw-r--r--	2024-03-12 14:31
var_unserializer.c	38.52 KB	-rw-r--r--	2022-10-31 11:36
var_unserializer.lo	352 B	-rw-r--r--	2024-03-12 14:31
var_unserializer.o	244.13 KB	-rw-r--r--	2024-03-12 14:31
var_unserializer.re	30.81 KB	-rw-rw-r--	2022-10-31 11:36
versioning.c	5.76 KB	-rw-rw-r--	2022-10-31 11:36
versioning.lo	334 B	-rw-r--r--	2024-03-12 14:31
versioning.o	95.11 KB	-rw-r--r--	2024-03-12 14:31
winver.h	6.23 KB	-rw-rw-r--	2022-10-31 11:36

Rename

/*
   +----------------------------------------------------------------------+
   | PHP Version 7                                                        |
   +----------------------------------------------------------------------+
   | Copyright (c) The PHP Group                                          |
   +----------------------------------------------------------------------+
   | This source file is subject to version 3.01 of the PHP license,      |
   | that is bundled with this package in the file LICENSE, and is        |
   | available through the world-wide-web at the following url:           |
   | http://www.php.net/license/3_01.txt                                  |
   | If you did not receive a copy of the PHP license and are unable to   |
   | obtain it through the world-wide-web, please send a note to          |
   | license@php.net so we can mail you a copy immediately.               |
   +----------------------------------------------------------------------+
   | Author: Stig S�ther Bakken <ssb@php.net>                             |
   +----------------------------------------------------------------------+
 */

#include <math.h>				/* modf() */
#include "php.h"
#include "ext/standard/head.h"
#include "php_string.h"
#include "zend_execute.h"
#include <stdio.h>

#include <locale.h>
#ifdef ZTS
#include "ext/standard/php_string.h"
#define LCONV_DECIMAL_POINT (*lconv.decimal_point)
#else
#define LCONV_DECIMAL_POINT (*lconv->decimal_point)
#endif

#define ALIGN_LEFT 0
#define ALIGN_RIGHT 1
#define ADJ_WIDTH 1
#define ADJ_PRECISION 2
#define NUM_BUF_SIZE 500
#define FLOAT_PRECISION 6
#define MAX_FLOAT_PRECISION 53

#if 0
/* trick to control varargs functions through cpp */
# define PRINTF_DEBUG(arg) php_printf arg
#else
# define PRINTF_DEBUG(arg)
#endif

static const char hexchars[] = "0123456789abcdef";
static const char HEXCHARS[] = "0123456789ABCDEF";

/* php_spintf_appendchar() {{{ */
inline static void
php_sprintf_appendchar(zend_string **buffer, size_t *pos, char add)
{
	if ((*pos + 1) >= ZSTR_LEN(*buffer)) {
		PRINTF_DEBUG(("%s(): ereallocing buffer to %d bytes\n", get_active_function_name(), ZSTR_LEN(*buffer)));
		*buffer = zend_string_extend(*buffer, ZSTR_LEN(*buffer) << 1, 0);
	}
	PRINTF_DEBUG(("sprintf: appending '%c', pos=\n", add, *pos));
	ZSTR_VAL(*buffer)[(*pos)++] = add;
}
/* }}} */

/* php_spintf_appendchar() {{{ */
inline static void
php_sprintf_appendchars(zend_string **buffer, size_t *pos, char *add, size_t len)
{
	if ((*pos + len) >= ZSTR_LEN(*buffer)) {
		size_t nlen = ZSTR_LEN(*buffer);

PRINTF_DEBUG(("%s(): ereallocing buffer to %d bytes\n", get_active_function_name(), ZSTR_LEN(*buffer)));
		do {
			nlen = nlen << 1;
		} while ((*pos + len) >= nlen);
		*buffer = zend_string_extend(*buffer, nlen, 0);
	}
	PRINTF_DEBUG(("sprintf: appending \"%s\", pos=\n", add, *pos));
	memcpy(ZSTR_VAL(*buffer) + (*pos), add, len);
	*pos += len;
}
/* }}} */

/* php_spintf_appendstring() {{{ */
inline static void
php_sprintf_appendstring(zend_string **buffer, size_t *pos, char *add,
						   size_t min_width, size_t max_width, char padding,
						   size_t alignment, size_t len, int neg, int expprec, int always_sign)
{
	register size_t npad;
	size_t req_size;
	size_t copy_len;
	size_t m_width;

copy_len = (expprec ? MIN(max_width, len) : len);
	npad = (min_width < copy_len) ? 0 : min_width - copy_len;

PRINTF_DEBUG(("sprintf: appendstring(%x, %d, %d, \"%s\", %d, '%c', %d)\n",
				  *buffer, *pos, ZSTR_LEN(*buffer), add, min_width, padding, alignment));
	m_width = MAX(min_width, copy_len);

if(m_width > INT_MAX - *pos - 1) {
		zend_error_noreturn(E_ERROR, "Field width %zd is too long", m_width);
	}

req_size = *pos + m_width + 1;

if (req_size > ZSTR_LEN(*buffer)) {
		size_t size = ZSTR_LEN(*buffer);
		while (req_size > size) {
			if (size > ZEND_SIZE_MAX/2) {
				zend_error_noreturn(E_ERROR, "Field width %zd is too long", req_size);
			}
			size <<= 1;
		}
		PRINTF_DEBUG(("sprintf ereallocing buffer to %d bytes\n", size));
		*buffer = zend_string_extend(*buffer, size, 0);
	}
	if (alignment == ALIGN_RIGHT) {
		if ((neg || always_sign) && padding=='0') {
			ZSTR_VAL(*buffer)[(*pos)++] = (neg) ? '-' : '+';
			add++;
			len--;
			copy_len--;
		}
		while (npad-- > 0) {
			ZSTR_VAL(*buffer)[(*pos)++] = padding;
		}
	}
	PRINTF_DEBUG(("sprintf: appending \"%s\"\n", add));
	memcpy(&ZSTR_VAL(*buffer)[*pos], add, copy_len + 1);
	*pos += copy_len;
	if (alignment == ALIGN_LEFT) {
		while (npad--) {
			ZSTR_VAL(*buffer)[(*pos)++] = padding;
		}
	}
}
/* }}} */

/* php_spintf_appendint() {{{ */
inline static void
php_sprintf_appendint(zend_string **buffer, size_t *pos, zend_long number,
						size_t width, char padding, size_t alignment,
						int always_sign)
{
	char numbuf[NUM_BUF_SIZE];
	register zend_ulong magn, nmagn;
	register unsigned int i = NUM_BUF_SIZE - 1, neg = 0;

PRINTF_DEBUG(("sprintf: appendint(%x, %x, %x, %d, %d, '%c', %d)\n",
				  *buffer, pos, &ZSTR_LEN(*buffer), number, width, padding, alignment));
	if (number < 0) {
		neg = 1;
		magn = ((zend_ulong) -(number + 1)) + 1;
	} else {
		magn = (zend_ulong) number;
	}

/* Can't right-pad 0's on integers */
	if(alignment==0 && padding=='0') padding=' ';

numbuf[i] = '\0';

do {
		nmagn = magn / 10;

numbuf[--i] = (unsigned char)(magn - (nmagn * 10)) + '0';
		magn = nmagn;
	}
	while (magn > 0 && i > 1);
	if (neg) {
		numbuf[--i] = '-';
	} else if (always_sign) {
		numbuf[--i] = '+';
	}
	PRINTF_DEBUG(("sprintf: appending %d as \"%s\", i=%d\n",
				  number, &numbuf[i], i));
	php_sprintf_appendstring(buffer, pos, &numbuf[i], width, 0,
							 padding, alignment, (NUM_BUF_SIZE - 1) - i,
							 neg, 0, always_sign);
}
/* }}} */

/* php_spintf_appenduint() {{{ */
inline static void
php_sprintf_appenduint(zend_string **buffer, size_t *pos,
					   zend_ulong number,
					   size_t width, char padding, size_t alignment)
{
	char numbuf[NUM_BUF_SIZE];
	register zend_ulong magn, nmagn;
	register unsigned int i = NUM_BUF_SIZE - 1;

PRINTF_DEBUG(("sprintf: appenduint(%x, %x, %x, %d, %d, '%c', %d)\n",
				  *buffer, pos, &ZSTR_LEN(*buffer), number, width, padding, alignment));
	magn = (zend_ulong) number;

/* Can't right-pad 0's on integers */
	if (alignment == 0 && padding == '0') padding = ' ';

numbuf[i] = '\0';

do {
		nmagn = magn / 10;

numbuf[--i] = (unsigned char)(magn - (nmagn * 10)) + '0';
		magn = nmagn;
	} while (magn > 0 && i > 0);

PRINTF_DEBUG(("sprintf: appending %d as \"%s\", i=%d\n", number, &numbuf[i], i));
	php_sprintf_appendstring(buffer, pos, &numbuf[i], width, 0,
							 padding, alignment, (NUM_BUF_SIZE - 1) - i, 0, 0, 0);
}
/* }}} */

/* php_spintf_appenddouble() {{{ */
inline static void
php_sprintf_appenddouble(zend_string **buffer, size_t *pos,
						 double number,
						 size_t width, char padding,
						 size_t alignment, int precision,
						 int adjust, char fmt,
						 int always_sign
						)
{
	char num_buf[NUM_BUF_SIZE];
	char *s = NULL;
	size_t s_len = 0;
	int is_negative = 0;
#ifdef ZTS
	struct lconv lconv;
#else
	struct lconv *lconv;
#endif

PRINTF_DEBUG(("sprintf: appenddouble(%x, %x, %x, %f, %d, '%c', %d, %c)\n",
				  *buffer, pos, &ZSTR_LEN(*buffer), number, width, padding, alignment, fmt));
	if ((adjust & ADJ_PRECISION) == 0) {
		precision = FLOAT_PRECISION;
	} else if (precision > MAX_FLOAT_PRECISION) {
		php_error_docref(NULL, E_NOTICE, "Requested precision of %d digits was truncated to PHP maximum of %d digits", precision, MAX_FLOAT_PRECISION);
		precision = MAX_FLOAT_PRECISION;
	}

if (zend_isnan(number)) {
		is_negative = (number<0);
		php_sprintf_appendstring(buffer, pos, "NaN", 3, 0, padding,
								 alignment, 3, is_negative, 0, always_sign);
		return;
	}

if (zend_isinf(number)) {
		is_negative = (number<0);
		php_sprintf_appendstring(buffer, pos, "INF", 3, 0, padding,
								 alignment, 3, is_negative, 0, always_sign);
		return;
	}

switch (fmt) {
		case 'e':
		case 'E':
		case 'f':
		case 'F':
#ifdef ZTS
			localeconv_r(&lconv);
#else
			lconv = localeconv();
#endif
			s = php_conv_fp((fmt == 'f')?'F':fmt, number, 0, precision,
						(fmt == 'f')?LCONV_DECIMAL_POINT:'.',
						&is_negative, &num_buf[1], &s_len);
			if (is_negative) {
				num_buf[0] = '-';
				s = num_buf;
				s_len++;
			} else if (always_sign) {
				num_buf[0] = '+';
				s = num_buf;
				s_len++;
			}
			break;

case 'g':
		case 'G':
			if (precision == 0)
				precision = 1;
			/*
			 * * We use &num_buf[ 1 ], so that we have room for the sign
			 */
#ifdef ZTS
			localeconv_r(&lconv);
#else
			lconv = localeconv();
#endif
			s = php_gcvt(number, precision, LCONV_DECIMAL_POINT, (fmt == 'G')?'E':'e', &num_buf[1]);
			is_negative = 0;
			if (*s == '-') {
				is_negative = 1;
				s = &num_buf[1];
			} else if (always_sign) {
				num_buf[0] = '+';
				s = num_buf;
			}

s_len = strlen(s);
			break;
	}

php_sprintf_appendstring(buffer, pos, s, width, 0, padding,
							 alignment, s_len, is_negative, 0, always_sign);
}
/* }}} */

/* php_spintf_appendd2n() {{{ */
inline static void
php_sprintf_append2n(zend_string **buffer, size_t *pos, zend_long number,
					 size_t width, char padding, size_t alignment, int n,
					 const char *chartable, int expprec)
{
	char numbuf[NUM_BUF_SIZE];
	register zend_ulong num;
	register zend_ulong  i = NUM_BUF_SIZE - 1;
	register int andbits = (1 << n) - 1;

PRINTF_DEBUG(("sprintf: append2n(%x, %x, %x, %d, %d, '%c', %d, %d, %x)\n",
				  *buffer, pos, &ZSTR_LEN(*buffer), number, width, padding, alignment, n,
				  chartable));
	PRINTF_DEBUG(("sprintf: append2n 2^%d andbits=%x\n", n, andbits));

num = (zend_ulong) number;
	numbuf[i] = '\0';

do {
		numbuf[--i] = chartable[(num & andbits)];
		num >>= n;
	}
	while (num > 0);

php_sprintf_appendstring(buffer, pos, &numbuf[i], width, 0,
							 padding, alignment, (NUM_BUF_SIZE - 1) - i,
							 0, expprec, 0);
}
/* }}} */

/* php_spintf_getnumber() {{{ */
inline static int
php_sprintf_getnumber(char **buffer, size_t *len)
{
	char *endptr;
	register zend_long num = ZEND_STRTOL(*buffer, &endptr, 10);
	register size_t i;

if (endptr != NULL) {
		i = (endptr - *buffer);
		*len -= i;
		*buffer = endptr;
	}
	PRINTF_DEBUG(("sprintf_getnumber: number was %d bytes long\n", i));

if (num >= INT_MAX || num < 0) {
		return -1;
	} else {
		return (int) num;
	}
}
/* }}} */

/* php_formatted_print() {{{
 * New sprintf implementation for PHP.
 *
 * Modifiers:
 *
 *  " "   pad integers with spaces
 *  "-"   left adjusted field
 *   n    field size
 *  "."n  precision (floats only)
 *  "+"   Always place a sign (+ or -) in front of a number
 *
 * Type specifiers:
 *
 *  "%"   literal "%", modifiers are ignored.
 *  "b"   integer argument is printed as binary
 *  "c"   integer argument is printed as a single character
 *  "d"   argument is an integer
 *  "f"   the argument is a float
 *  "o"   integer argument is printed as octal
 *  "s"   argument is a string
 *  "x"   integer argument is printed as lowercase hexadecimal
 *  "X"   integer argument is printed as uppercase hexadecimal
 *
 */
static zend_string *
php_formatted_print(zval *z_format, zval *args, int argc)
{
	size_t size = 240, outpos = 0;
	int alignment, currarg, adjusting, argnum, width, precision;
	char *format, *temppos, padding;
	zend_string *result;
	int always_sign;
	size_t format_len;

if (!try_convert_to_string(z_format)) {
		return NULL;
	}

format = Z_STRVAL_P(z_format);
	format_len = Z_STRLEN_P(z_format);
	result = zend_string_alloc(size, 0);

currarg = 0;

while (format_len) {
		int expprec;
		zval *tmp;

temppos = memchr(format, '%', format_len);
		if (!temppos) {
			php_sprintf_appendchars(&result, &outpos, format, format_len);
			break;
		} else if (temppos != format) {
			php_sprintf_appendchars(&result, &outpos, format, temppos - format);
			format_len -= temppos - format;
			format = temppos;
		}
		format++;			/* skip the '%' */
		format_len--;

if (*format == '%') {
			php_sprintf_appendchar(&result, &outpos, '%');
			format++;
			format_len--;
		} else {
			/* starting a new format specifier, reset variables */
			alignment = ALIGN_RIGHT;
			adjusting = 0;
			padding = ' ';
			always_sign = 0;
			expprec = 0;

PRINTF_DEBUG(("sprintf: first looking at '%c', inpos=%d\n",
						  *format, format - Z_STRVAL_P(z_format)));
			if (isalpha((int)*format)) {
				width = precision = 0;
				argnum = currarg++;
			} else {
				/* first look for argnum */
				temppos = format;
				while (isdigit((int)*temppos)) temppos++;
				if (*temppos == '$') {
					argnum = php_sprintf_getnumber(&format, &format_len);

if (argnum <= 0) {
						zend_string_efree(result);
						php_error_docref(NULL, E_WARNING, "Argument number must be greater than zero");
						return NULL;
					}
					argnum--;
					format++;  /* skip the '$' */
					format_len--;
				} else {
					argnum = currarg++;
				}

/* after argnum comes modifiers */
				PRINTF_DEBUG(("sprintf: looking for modifiers\n"
							  "sprintf: now looking at '%c', inpos=%d\n",
							  *format, format - Z_STRVAL_P(z_format)));
				for (;; format++, format_len--) {
					if (*format == ' ' || *format == '0') {
						padding = *format;
					} else if (*format == '-') {
						alignment = ALIGN_LEFT;
						/* space padding, the default */
					} else if (*format == '+') {
						always_sign = 1;
					} else if (*format == '\'' && format_len > 1) {
						format++;
						format_len--;
						padding = *format;
					} else {
						PRINTF_DEBUG(("sprintf: end of modifiers\n"));
						break;
					}
				}
				PRINTF_DEBUG(("sprintf: padding='%c'\n", padding));
				PRINTF_DEBUG(("sprintf: alignment=%s\n",
							  (alignment == ALIGN_LEFT) ? "left" : "right"));

/* after modifiers comes width */
				if (isdigit((int)*format)) {
					PRINTF_DEBUG(("sprintf: getting width\n"));
					if ((width = php_sprintf_getnumber(&format, &format_len)) < 0) {
						efree(result);
						php_error_docref(NULL, E_WARNING, "Width must be greater than zero and less than %d", INT_MAX);
						return NULL;
					}
					adjusting |= ADJ_WIDTH;
				} else {
					width = 0;
				}
				PRINTF_DEBUG(("sprintf: width=%d\n", width));

/* after width and argnum comes precision */
				if (*format == '.') {
					format++;
					format_len--;
					PRINTF_DEBUG(("sprintf: getting precision\n"));
					if (isdigit((int)*format)) {
						if ((precision = php_sprintf_getnumber(&format, &format_len)) < 0) {
							efree(result);
							php_error_docref(NULL, E_WARNING, "Precision must be greater than zero and less than %d", INT_MAX);
							return NULL;
						}
						adjusting |= ADJ_PRECISION;
						expprec = 1;
					} else {
						precision = 0;
					}
				} else {
					precision = 0;
				}
				PRINTF_DEBUG(("sprintf: precision=%d\n", precision));
			}

if (argnum >= argc) {
				efree(result);
				php_error_docref(NULL, E_WARNING, "Too few arguments");
				return NULL;
			}

if (*format == 'l') {
				format++;
				format_len--;
			}
			PRINTF_DEBUG(("sprintf: format character='%c'\n", *format));
			/* now we expect to find a type specifier */
			tmp = &args[argnum];
			switch (*format) {
				case 's': {
					zend_string *t;
					zend_string *str = zval_get_tmp_string(tmp, &t);
					php_sprintf_appendstring(&result, &outpos,
											 ZSTR_VAL(str),
											 width, precision, padding,
											 alignment,
											 ZSTR_LEN(str),
											 0, expprec, 0);
					zend_tmp_string_release(t);
					break;
				}

case 'd':
					php_sprintf_appendint(&result, &outpos,
										  zval_get_long(tmp),
										  width, padding, alignment,
										  always_sign);
					break;

case 'u':
					php_sprintf_appenduint(&result, &outpos,
										  zval_get_long(tmp),
										  width, padding, alignment);
					break;

case 'g':
				case 'G':
				case 'e':
				case 'E':
				case 'f':
				case 'F':
					php_sprintf_appenddouble(&result, &outpos,
											 zval_get_double(tmp),
											 width, padding, alignment,
											 precision, adjusting,
											 *format, always_sign
											);
					break;

case 'c':
					php_sprintf_appendchar(&result, &outpos,
										(char) zval_get_long(tmp));
					break;

case 'o':
					php_sprintf_append2n(&result, &outpos,
										 zval_get_long(tmp),
										 width, padding, alignment, 3,
										 hexchars, expprec);
					break;

case 'x':
					php_sprintf_append2n(&result, &outpos,
										 zval_get_long(tmp),
										 width, padding, alignment, 4,
										 hexchars, expprec);
					break;

case 'X':
					php_sprintf_append2n(&result, &outpos,
										 zval_get_long(tmp),
										 width, padding, alignment, 4,
										 HEXCHARS, expprec);
					break;

case 'b':
					php_sprintf_append2n(&result, &outpos,
										 zval_get_long(tmp),
										 width, padding, alignment, 1,
										 hexchars, expprec);
					break;

case '%':
					php_sprintf_appendchar(&result, &outpos, '%');

break;

case '\0':
					if (!format_len) {
						goto exit;
					}
					break;

default:
					break;
			}
			format++;
			format_len--;
		}
	}

exit:
	/* possibly, we have to make sure we have room for the terminating null? */
	ZSTR_VAL(result)[outpos]=0;
	ZSTR_LEN(result) = outpos;
	return result;
}
/* }}} */

/* php_formatted_print_get_array() {{{ */
static zval*
php_formatted_print_get_array(zval *array, int *argc)
{
	zval *args, *zv;
	int n;

if (Z_TYPE_P(array) != IS_ARRAY) {
		convert_to_array(array);
	}

n = zend_hash_num_elements(Z_ARRVAL_P(array));
	args = (zval *)safe_emalloc(n, sizeof(zval), 0);
	n = 0;
	ZEND_HASH_FOREACH_VAL(Z_ARRVAL_P(array), zv) {
		ZVAL_COPY_VALUE(&args[n], zv);
		n++;
	} ZEND_HASH_FOREACH_END();

*argc = n;
	return args;
}
/* }}} */

/* {{{ proto string sprintf(string format [, mixed arg1 [, mixed ...]])
   Return a formatted string */
PHP_FUNCTION(user_sprintf)
{
	zend_string *result;
	zval *format, *args;
	int argc;

ZEND_PARSE_PARAMETERS_START(1, -1)
		Z_PARAM_ZVAL(format)
		Z_PARAM_VARIADIC('*', args, argc)
	ZEND_PARSE_PARAMETERS_END_EX(RETURN_FALSE);

result = php_formatted_print(format, args, argc);
	if (result == NULL) {
		RETURN_FALSE;
	}
	RETVAL_STR(result);
}
/* }}} */

/* {{{ proto string vsprintf(string format, array args)
   Return a formatted string */
PHP_FUNCTION(vsprintf)
{
	zend_string *result;
	zval *format, *array, *args;
	int argc;

ZEND_PARSE_PARAMETERS_START(2, 2)
		Z_PARAM_ZVAL(format)
		Z_PARAM_ZVAL(array)
	ZEND_PARSE_PARAMETERS_END_EX(RETURN_FALSE);

args = php_formatted_print_get_array(array, &argc);

result = php_formatted_print(format, args, argc);
	efree(args);
	if (result == NULL) {
		RETURN_FALSE;
	}
	RETVAL_STR(result);
}
/* }}} */

/* {{{ proto int printf(string format [, mixed arg1 [, mixed ...]])
   Output a formatted string */
PHP_FUNCTION(user_printf)
{
	zend_string *result;
	size_t rlen;
	zval *format, *args;
	int argc;

ZEND_PARSE_PARAMETERS_START(1, -1)
		Z_PARAM_ZVAL(format)
		Z_PARAM_VARIADIC('*', args, argc)
	ZEND_PARSE_PARAMETERS_END_EX(RETURN_FALSE);

result = php_formatted_print(format, args, argc);
	if (result == NULL) {
		RETURN_FALSE;
	}
	rlen = PHPWRITE(ZSTR_VAL(result), ZSTR_LEN(result));
	zend_string_efree(result);
	RETURN_LONG(rlen);
}
/* }}} */

/* {{{ proto int vprintf(string format, array args)
   Output a formatted string */
PHP_FUNCTION(vprintf)
{
	zend_string *result;
	size_t rlen;
	zval *format, *array, *args;
	int argc;

ZEND_PARSE_PARAMETERS_START(2, 2)
		Z_PARAM_ZVAL(format)
		Z_PARAM_ZVAL(array)
	ZEND_PARSE_PARAMETERS_END_EX(RETURN_FALSE);

args = php_formatted_print_get_array(array, &argc);

result = php_formatted_print(format, args, argc);
	efree(args);
	if (result == NULL) {
		RETURN_FALSE;
	}
	rlen = PHPWRITE(ZSTR_VAL(result), ZSTR_LEN(result));
	zend_string_efree(result);
	RETURN_LONG(rlen);
}
/* }}} */

/* {{{ proto int fprintf(resource stream, string format [, mixed arg1 [, mixed ...]])
   Output a formatted string into a stream */
PHP_FUNCTION(fprintf)
{
	php_stream *stream;
	zval *arg1, *format, *args;
	int argc;
	zend_string *result;

if (ZEND_NUM_ARGS() < 2) {
		WRONG_PARAM_COUNT;
	}

ZEND_PARSE_PARAMETERS_START(2, -1)
		Z_PARAM_RESOURCE(arg1)
		Z_PARAM_ZVAL(format)
		Z_PARAM_VARIADIC('*', args, argc)
	ZEND_PARSE_PARAMETERS_END_EX(RETURN_FALSE);

php_stream_from_zval(stream, arg1);

result = php_formatted_print(format, args, argc);
	if (result == NULL) {
		RETURN_FALSE;
	}

php_stream_write(stream, ZSTR_VAL(result), ZSTR_LEN(result));

RETVAL_LONG(ZSTR_LEN(result));
	zend_string_efree(result);
}
/* }}} */

/* {{{ proto int vfprintf(resource stream, string format, array args)
   Output a formatted string into a stream */
PHP_FUNCTION(vfprintf)
{
	php_stream *stream;
	zval *arg1, *format, *array, *args;
	int argc;
	zend_string *result;

if (ZEND_NUM_ARGS() != 3) {
		WRONG_PARAM_COUNT;
	}

ZEND_PARSE_PARAMETERS_START(3, 3)
		Z_PARAM_RESOURCE(arg1)
		Z_PARAM_ZVAL(format)
		Z_PARAM_ZVAL(array)
	ZEND_PARSE_PARAMETERS_END_EX(RETURN_FALSE);

php_stream_from_zval(stream, arg1);

args = php_formatted_print_get_array(array, &argc);

result = php_formatted_print(format, args, argc);
	efree(args);
	if (result == NULL) {
		RETURN_FALSE;
	}

php_stream_write(stream, ZSTR_VAL(result), ZSTR_LEN(result));

RETVAL_LONG(ZSTR_LEN(result));
	zend_string_efree(result);
}
/* }}} */