function createpot {
# create new .po templates (.pot)
local POT=$1
touch ./locale/${locale}.UTF-8/LC_MESSAGES/${POT}.pot

xgettext --default-domain=${DOMAIN} \
--output-dir="./locale/${locale}.UTF-8/LC_MESSAGES/" --language PHP \
--force-po --indent --strict --no-wrap \
--copyright-holder='inGen cvba' \
--msgid-bugs-address='bart@inGen.be' --output=${POT}.pot \
--add-location ${phpfile}

chmod -f g+rw ./locale/${locale}.UTF-8/LC_MESSAGES/${POT}.pot
}

function updatepo {
# update the original with the new potfile
local PO=$1
touch ./locale/${locale}.UTF-8/LC_MESSAGES/${PO}.po
touch ./locale/${locale}.UTF-8/LC_MESSAGES/${PO}.pot

msgmerge --update --backup=simple --force-po --indent --strict \
--no-wrap --quiet --add-location \
./locale/${locale}.UTF-8/LC_MESSAGES/${PO}.po \
./locale/${locale}.UTF-8/LC_MESSAGES/${PO}.pot

chmod -f g+rw ./locale/${locale}.UTF-8/LC_MESSAGES/${PO}.po
}

function mergepot {
# merge the original po with the new pot
local PO=$1
local POT=$2
touch ./locale/${locale}.UTF-8/LC_MESSAGES/${PO}.po
touch ./locale/${locale}.UTF-8/LC_MESSAGES/${POT}.pot

msgcat --output-file=./locale/${locale}.UTF-8/LC_MESSAGES/${POT}.pot \
--to-code=UTF-8 --use-first --force-po --indent --add-location \
--strict --sort-output \
./locale/${locale}.UTF-8/LC_MESSAGES/${PO}.po \
./locale/${locale}.UTF-8/LC_MESSAGES/${POT}.pot

rm -f ./locale/${locale}.UTF-8/LC_MESSAGES/${PO}.po
chmod -f g+rw ./locale/${locale}.UTF-8/LC_MESSAGES/${POT}.pot
}

function backuppo {
# do a real backup of the existing pofiles
cp ./locale/${locale}.UTF-8/LC_MESSAGES/${DOMAIN}.po \
./locale/${locale}.UTF-8/LC_MESSAGES/pobackup/
}

for locale in nl_BE fr_BE en_GB
do
# generate .po messages
for phpfile in index.php
do
# the domain is the basename of the file
DOMAIN=`basename $phpfile .php`

#include
#include
#include
#include
#include
#include
#include
#include
#include

// parameters: string (interface name)
// output: string (ip address of interface in decimal notation)
PyObject * ipaddr(PyObject *self, PyObject *args) {

char ip[ 200 ];
char *itf;

if (! PyArg_ParseTuple(args, "s", &itf)) {
PyErr_SetString(PyExc_Exception, "no interface given!");
return NULL;
}

struct ifaddrs *ifa = NULL, *ifp = NULL;

if (getifaddrs (&ifp) < 0) {
perror ("getifaddrs");
return NULL;
}

for (ifa = ifp; ifa; ifa = ifa->ifa_next) {
socklen_t salen;

if (ifa->ifa_addr->sa_family == AF_INET)
salen = sizeof (struct sockaddr_in);
else if (ifa->ifa_addr->sa_family == AF_INET6)
salen = sizeof (struct sockaddr_in6);
else
continue;

if (strncmp(ifa->ifa_name, itf, sizeof(itf))) {
continue;
}

if (getnameinfo (ifa->ifa_addr, salen, ip, sizeof (ip), NULL, 0, NI_NUMERICHOST) < 0) {
perror ("getnameinfo");
continue;
}
break;
}

freeifaddrs (ifp);

return Py_BuildValue("s", ip);
}

static PyMethodDef pyfconfig_methods[] = {
{"ipaddr", (PyCFunction)ipaddr, METH_VARARGS, "ipaddr(string)\n"},
{NULL, NULL, 0, NULL}
};

# scans an A4 image and saves it as a pdf file with given filename
# supports multiple page documents

colourmode="Gray"
depth=8
resolution=300

while getopts cd:r: option
do
case $option in
c) colourmode="Color";;
d) depth=${OPTARG};;
r) resolution=${OPTARG};;
?) printf "Usage: %s [-c] [-d depth] [-r resolution] filename.pdf [number of pages]\n" $0
exit 2;;
esac
done

shift $(($OPTIND - 1))

filename=$1

numpages=$2
if [ -z ${numpages} ]
then
numpages=1
fi

getpdf() {
/usr/bin/scanimage --mode=${colourmode} --depth=${depth} \
--resolution ${resolution} -x 215 -y 297 \
| /usr/bin/pnmtops -noshowpage -equalpixels -dpi=${resolution} \
| /usr/bin/ps2pdf -sPAPERSIZE=a4 - "$*"
}

TMPDIR=$(/usr/bin/mktemp -d)

currentpage=0
while [ ${currentpage} -lt ${numpages} ]
do
currentpage=$((currentpage+1))
echo "Please insert page ${currentpage}/${numpages}."
read -p "Press enter to continue..."
echo "Scanning..."
getpdf ${TMPDIR}/page${currentpage}.pdf
echo "Ready!"
done

/usr/bin/pdftk ${TMPDIR}/*pdf cat output ${filename}

echo 'Content-Type: text/html; charset=iso-8859-1'
echo 'Cache-Control: no-cache'
echo 'Cache-Control: no-store'
echo 'Pragma: no-cache'
echo 'Expires: Thu, 01 Dec 1994 16:00:00 GMT'
echo

echo '< !DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/1999/REC-html401-19991224/loose.dtd">'
awk 'BEGIN {print "

Virtual Hosts configured on mars

"} /^[ \t]*Server(Name|Alias)/ { $1=""; split($0, domains); for (i=0; i%s

\n", domains[i+1], domains[i+1])}} END { print "

# script to calculate some statistics from a cups page_log
#
# takes two (optional) arguments: a cups page_log and a username
#
# page_log is expected to be in the following format:
#
# samsung sven 279 [23/Nov/2007:18:44:01 +0100] 1 1 - localhost
# samsung sven 280 [23/Nov/2007:20:09:55 +0100] 1 1 - localhost
# HP loes 281 [25/Nov/2007:16:21:18 +0100] 1 1 - localhost
# HP loes 281 [25/Nov/2007:16:21:25 +0100] 2 1 - localhost
# HP loes 281 [25/Nov/2007:16:21:30 +0100] 3 1 - localhost
# HP loes 281 [25/Nov/2007:16:21:34 +0100] 4 1 - localhost
# HP loes 281 [25/Nov/2007:16:21:41 +0100] 5 1 - localhost
# HP loes 281 [25/Nov/2007:16:21:46 +0100] 6 1 - localhost
# HP loes 281 [25/Nov/2007:16:21:49 +0100] 7 1 - localhost
# samsung loes 282 [25/Nov/2007:23:43:22 +0100] 1 1 - localhost
# samsung sven 283 [28/Nov/2007:18:15:30 +0100] 1 1 - localhost
# samsung sven 283 [28/Nov/2007:18:15:32 +0100] 2 1 - localhost
# samsung sven 284 [28/Nov/2007:18:17:42 +0100] 1 1 - localhost
# samsung sven 284 [28/Nov/2007:18:17:46 +0100] 2 1 - localhost
# samsung loes 285 [30/Nov/2007:09:02:14 +0100] 1 1 - localhost
# samsung sven 286 [30/Nov/2007:14:29:33 +0100] 1 1 - localhost
# samsung sven 286 [30/Nov/2007:14:29:36 +0100] 2 1 - localhost
# samsung loes 287 [30/Nov/2007:18:24:37 +0100] 1 1 - localhost

if [ $# -eq 0 ]
then
USERNAME=${USER}
PAGELOG=/var/log/cups/page_log
elif [ $# -eq 1 ]
then
if [ -f $1 ]
then
USERNAME=${USER}
PAGELOG=$1
else
USERNAME=$1
PAGELOG=/var/log/cups/page_log
fi
elif [ $# -eq 2 ]
then
if [ -f $1 ]
then
PAGELOG=$1
USERNAME=$2
else
PAGELOG=$2
USERNAME=$1
fi
else
echo "Usage:"
echo "$0 [] [ ]"
exit 1
fi

/usr/bin/awk -v username=${USERNAME} '
BEGIN {
pagecount = 0
pagenum = 0
if (!username) {
username = ENVIRON["USER"]
}
}

$2 ~ username {
if ( $6 !~ "total" ) { # HACK :-(
if ( $6 == 1 ) {
pagecount += pagenum
}
pagenum = $6
}
}

# scans an A4 image and saves it as a pdf file with given filename

colourmode="Gray"
depth=8
resolution=300

while getopts cd:r: option
do
case $option in
c) colourmode="Color";;
d) depth=${OPTARG};;
r) resolution=${OPTARG};;
?) printf "Usage: %s [-c] [-d depth] [-r resolution] filename.pdf\n" $0
exit 2;;
esac
done

shift $(($OPTIND - 1))

colourmode="Gray"
depth=8
resolution=300
printername="samsung"
copies=1

while getopts cd:r:P:n: option
do
case $option in
c) colourmode="Color";;
d) depth=$OPTARG;;
r) resolution=$OPTARG;;
P) printername="$OPTARG";;
n) copies="$OPTARG";;
?) printf "Usage: %s [-c] [-d depth] [-r resolution] [-P printername] [-n copies]\n" $0
exit 2;;
esac
done