|
@@ -6,10 +6,6 @@
|
|
# try -h for help)
|
|
# try -h for help)
|
|
# E.g.: dump_rpcs.pl --file cfg_core.c --defs="-DUSE_SCTP ..."
|
|
# E.g.: dump_rpcs.pl --file cfg_core.c --defs="-DUSE_SCTP ..."
|
|
#
|
|
#
|
|
-# History:
|
|
|
|
-# =======
|
|
|
|
-# 2009-10-18 initial version (Andrei Pelinescu-Onciul <[email protected]>)
|
|
|
|
-#
|
|
|
|
|
|
|
|
# Note: uses GCC::TranslationUnit (see cpan) with the following patch:
|
|
# Note: uses GCC::TranslationUnit (see cpan) with the following patch:
|
|
#@@ -251,6 +251,8 @@
|
|
#@@ -251,6 +251,8 @@
|
|
@@ -39,7 +35,6 @@ use warnings;
|
|
use Getopt::Long;
|
|
use Getopt::Long;
|
|
use File::Temp qw(:mktemp);
|
|
use File::Temp qw(:mktemp);
|
|
use File::Basename;
|
|
use File::Basename;
|
|
-use lib "/home/andrei/perl/modules/share/perl/5.10.1";
|
|
|
|
use GCC::TranslationUnit;
|
|
use GCC::TranslationUnit;
|
|
|
|
|
|
# text printed if we discover that GCC::TranslationUnit is unpatched
|
|
# text printed if we discover that GCC::TranslationUnit is unpatched
|
|
@@ -48,7 +43,7 @@ my $patch_required="$0 requires a patched GCC:TranslationUnit, see the " .
|
|
# gcc name
|
|
# gcc name
|
|
my $gcc="gcc";
|
|
my $gcc="gcc";
|
|
# default defines
|
|
# default defines
|
|
-my $c_defs="-D__CPU_i386 -D__OS_linux -DSER_VER=2099099 -DPKG_MALLOC -DSHM_MEM -DSHM_MMAP -DDNS_IP_HACK -DUSE_IPV6 -DUSE_MCAST -DUSE_TCP -DUSE_DNS_CACHE -DUSE_DNS_FAILOVER -DUSE_DST_BLACKLIST -DUSE_NAPTR -DUSE_TLS -DTLS_HOOKS -DFAST_LOCK -DCC_GCC_LIKE_ASM -DHAVE_GETHOSTBYNAME2 -DHAVE_UNION_SEMUN -DHAVE_SCHED_YIELD -DHAVE_MSG_NOSIGNAL -DHAVE_MSGHDR_MSG_CONTROL -DHAVE_ALLOCA_H -DHAVE_SCHED_SETSCHEDULER -DHAVE_EPOLL -DUSE_SCTP -DNAME='\"ser\"' -DVERSION='\"2.99.99-pre3\"' -DARCH='\"i386\"' -DOS_QUOTED='\"linux\"' -DSER_MOD_INTERFACE";
|
|
|
|
|
|
+my $c_defs="DNAME='\"kamailio\"' -DVERSION='\"5.1.0-dev3\"' -DARCH='\"x86_64\"' -DOS='linux_' -DOS_QUOTED='\"linux\"' -DCOMPILER='\"gcc 4.9.2\"' -D__CPU_x86_64 -D__OS_linux -DSER_VER=5001000 -DCFG_DIR='\"/usr/local/etc/kamailio/\"' -DRUN_DIR='\"/var/run/kamailio/\"' -DPKG_MALLOC -DSHM_MEM -DSHM_MMAP -DDNS_IP_HACK -DUSE_MCAST -DUSE_TCP -DDISABLE_NAGLE -DHAVE_RESOLV_RES -DUSE_DNS_CACHE -DUSE_DNS_FAILOVER -DUSE_DST_BLACKLIST -DUSE_NAPTR -DWITH_XAVP -DMEM_JOIN_FREE -DF_MALLOC -DQ_MALLOC -DTLSF_MALLOC -DDBG_SR_MEMORY -DUSE_TLS -DTLS_HOOKS -DUSE_CORE_STATS -DSTATISTICS -DMALLOC_STATS -DWITH_AS_SUPPORT -DUSE_SCTP -DFAST_LOCK -DADAPTIVE_WAIT -DADAPTIVE_WAIT_LOOPS=1024 -DCC_GCC_LIKE_ASM -DHAVE_GETHOSTBYNAME2 -DHAVE_UNION_SEMUN -DHAVE_SCHED_YIELD -DHAVE_MSG_NOSIGNAL -DHAVE_MSGHDR_MSG_CONTROL -DHAVE_ALLOCA_H -DHAVE_TIMEGM -DHAVE_SCHED_SETSCHEDULER -DHAVE_IP_MREQN -DHAVE_EPOLL -DHAVE_SIGIO_RT -DSIGINFO64_WORKARROUND -DUSE_FUTEX -DHAVE_SELECT";
|
|
|
|
|
|
# file with gcc syntax tree
|
|
# file with gcc syntax tree
|
|
my $file;
|
|
my $file;
|