mirrors/php-src
0
0
Fork 0
mirror of https://github.com/php/php-src.git synced 2025-01-25 05:04:20 +08:00
Code Issues Packages Projects Releases Wiki Activity

- Fix typos, add default case to switch and other small things.

Browse Source
This commit is contained in:
Jouni Ahto 2000-06-10 05:47:22 +00:00
parent b54f915280
commit f3c1222da3
2 changed files with 32 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
ext/ext_skel
View File

@ -32,19 +32,18 @@ else
ECHO_C='\c'
fi
ECHO_E="echo -e" # Any portability problems? If, how to test.
echo "Creating directory"
mkdir $extname || givup "Cannot create directory $extname"
if [ ! -z $functions ]; then
echo $functions
cat $functions | awk -v extname=$extname -f ./skeleton/create_stubs
fi
cd $extname
chmod 755 .
if [ ! -z $functions ]; then
cat $functions | awk -f ../skeleton/create_stubs
fi
$ECHO_N "Creating basic files:$ECHO_C"
$ECHO_N " config.m4$ECHO_C"
@ -129,6 +128,14 @@ if [ ! -z $functions ]; then
rm function_entries
rm function_declarations
rm function_stubs
if [ -f function_warning ]; then
rm function_warning
warning="
NOTE! Because some arguments to functions were resources, the code generated
cannot yet be compiled without editing. Please consider this to be step 4.5
in the instructions above.
"
fi
fi
chmod 644 *
@ -151,5 +158,5 @@ To use your new extension, you will have to execute the following steps:
Repeat steps 3-6 until you are satisfied with ext/$extname/config.m4 and
step 6 confirms that your module is compiled in PHP. Then, start writing
code and repeat the last two steps as often as necessary.
$warning
eof

33
ext/skeleton/create_stubs
View File

@ -66,7 +66,7 @@ END {
useswitch = maxargs[i] - minargs[i]
funcvals = resources = handleargs = ""
proto = "/* {{{ #proto " types[i] " " funcs[i] "("
proto = "/* {{{ proto " types[i] " " funcs[i] "("
if (maxargs[i]) {
zvals = "\tzval "
@ -98,9 +98,9 @@ END {
if (useswitch) {
if (j > minargs[i]-1) {
handleargs = "\t\tcase " j+1 ";\n\t\t\t" convert(argtypes[i,j], argnames[i,j]) "\t\t\t/* Fall-through. */\n" handleargs
handleargs = "\t\tcase " j+1 ":\n\t\t\t" convert(argtypes[i,j], argnames[i,j]) "\t\t\t/* Fall-through. */\n" handleargs
} else if (j >= minargs[i]-1) {
handleargs = "\t\tcase " j+1 ";\n\t\t\t" convert(argtypes[i,j], argnames[i,j]) handleargs
handleargs = "\t\tcase " j+1 ":\n\t\t\t" convert(argtypes[i,j], argnames[i,j]) handleargs
} else {
handleargs = "\t\t\t" convert(argtypes[i,j], argnames[i,j]) handleargs
}
@ -112,21 +112,24 @@ END {
proto = proto closeopts ")\n */\nPHP_FUNCTION(" funcs[i] ")\n{"
if (maxargs[i]) {
zvals = zvals ";"
fetchargs = fetchargs ") == FAILURE) {\n\t\tWRONG_PARAM_COUNT();\n\t}\n"
fetchargs = fetchargs ") == FAILURE) {\n\t\tWRONG_PARAM_COUNT;\n\t}\n"
}
if (resources ) funcvals = funcvals "\t???LS_FETCH();\n"
if (useswitch) handleargs = "\tswitch (argc) {\n" handleargs "\t\t\tbreak;\n\t}"
if (useswitch) handleargs = "\tswitch (argc) {\n" handleargs "\t\t\tbreak;\n\t\tdefault:\n\t\t\tWRONG_PARAM_COUNT;\n\t}"
print proto > "function_stubs"
if (zvals) print zvals > "function_stubs"
if (funcvals) print funcvals > "function_stubs"
if (fetchargs) print fetchargs > "function_stubs"
if (resources) print resources > "function_stubs"
if (handleargs) print handleargs > "function_stubs"
print "\n\tphp_error(E_WARNING, \"" funcs[i] ": not yet implemented\");" > "function_stubs"
print "}\n/* }}} */\n" > "function_stubs"
print "PHP_FUNCTION(" funcs[i] ");" > "function_declarations"
print "\tPHP_FE(" funcs[i] ",\tNULL)" > "function_entries"
print proto > extname "/function_stubs"
if (zvals) print zvals > extname "/function_stubs"
if (funcvals) print funcvals > extname "/function_stubs"
if (fetchargs) print fetchargs > extname "/function_stubs"
if (resources) {
print resources > extname "/function_stubs"
print "" > extname "/function_warning"
}
if (handleargs) print handleargs > extname "/function_stubs"
print "\n\tphp_error(E_WARNING, \"" funcs[i] ": not yet implemented\");" > extname "/function_stubs"
print "}\n/* }}} */\n" > extname "/function_stubs"
print "PHP_FUNCTION(" funcs[i] ");" > extname "/function_declarations"
print "\tPHP_FE(" funcs[i] ",\tNULL)" > extname "/function_entries"
}
}