|
#!/usr/bin/env perl
|
|
|
|
## $Id$
|
|
|
|
## parse the db #defines to php.
|
|
|
|
## syntax: ./db_def_to_php < ../db/boinc_db.h > boinc_db.inc
|
|
|
|
print "# Generated by db_def_to_py on ";
|
|
system('date');
|
|
|
|
while (<>) {
|
|
if (/^\s*#define\s+([^\s]+)\s+([0-9]+)\s*$/) {
|
|
print qq/$1 = $2\n/;
|
|
}
|
|
}
|