CGI-SpeedyCGI
view release on metacpan or search on metacpan
src/speedy_main.c view on Meta::CPAN
/* Initialize options */
DO_OPT_INIT(argv, (const char * const *)environ);
# ifdef IAMSUID
if (speedy_util_geteuid() == 0) {
int new_uid;
/* Set group-id */
if (speedy_script_getstat()->st_mode & S_ISGID) {
if (setegid(speedy_script_getstat()->st_gid) == -1)
speedy_util_die("setegid");
}
/* Must set euid to something - either the script owner
* or the real-uid
*/
if (speedy_script_getstat()->st_mode & S_ISUID) {
new_uid = speedy_script_getstat()->st_uid;
} else {
new_uid = speedy_util_getuid();
}
util/build_solpkg view on Meta::CPAN
#
# Build solaris packages
#
# Helpful urls:
# http://www.sunfreeware.com/pkgadd.html
# http://docs.sun.com/db?p=/doc/806-7008
#
# Package names must be nine or fewer characters.
pkgid=DMNCspdy
modid1=DMNCspdya
modid2=DMNCspdy2
eval "modid=\$modid$APACHE_VERSION"
plpkg=SUNWpl5u
arch=`uname -p`
spool=/var/spool/pkg
os=Solaris`uname -r | awk -F. '{print $2}'`
# Package prototype file
make_proto() {
util/build_solpkg view on Meta::CPAN
gzip -9 <$TMPDIR/$pkg >$out
add_desc $out $is_apache $os $arch "$@"
}
# Make a copyright file
cp COPYING $TMPDIR/copyright
# Make regular package
make_proto 1 0 $STD_FILES </dev/null &&
make_pkginfo $pkgid "$PKGNM_PRETTY" "`grab_summary`" &&
pl_depend 0 | make_depend &&
make_pkg 0 $pkgid $PKGNM "`pl_depend 1`" &&
if want_apache_package; then
# Make pre/postinstall scripts for apache
apache_install_script '$BASEDIR' 'FCS' >$TMPDIR/postinstall
apache_uninstall_script >$TMPDIR/postremove
# Make apache module package
make_proto 0 1 $APACHE_FILES &&
make_pkginfo $modid "$MODNM_PRETTY" "$APACHE_DESC" &&
(
echo "P SUNWapchu Apache Web Server (usr)"
echo "P SUNWapchr Apache Web Server (root)"
echo "P $pkgid $PKGNM_PRETTY"
) |
make_depend &&
make_pkg $APACHE_VERSION $modid ${PKGNM}-${MODNM} \
"Apache Web Server (SUNWapchu, SUNWapchr)"
fi
( run in 1.945 second using v1.01-cache-2.11-cpan-5735350b133 )