Making The Road Blog

wget http://prdownloads.sourceforge.net/swig/swig-1.3.33.tar.gz
tar xzvf swig-1.3.33.tar.gz
cd swig-1.3.33
./configure --prefix=$HOME/usr
make
make install

#include <time .h>
double My_variable = 3.0;
 
int fact(int n) {
  if (n < = 1) return 1;
  else return n*fact(n-1);
}
 
int my_mod(int x, int y) {
  return (x%y);
}
 
char *get_time()
{
  time_t ltime;
  time(&ltime);
  return ctime(&ltime);
}

 /* example.i */
 %module example
 %{
 /* Put header files here or function declarations like below */
 extern double My_variable;
 extern int fact(int n);
 extern int my_mod(int x, int y);
 extern char *get_time();
 %}
 
 extern double My_variable;
 extern int fact(int n);
 extern int my_mod(int x, int y);
 extern char *get_time();

swig -php5 example.i
gcc -c example.c example_wrap.c `php-config --includes` -fPIC
gcc -shared example_wrap.o example.o -o example.so
mv example.so `php-config --extension-dir`
php -r 'dl("example.so"); var_dump(My_variable_get(), fact(5), my_mod(7, 3), get_time());'

float(3)
int(120)
int(1)
string(25) "Sat Jan  5 02:14:31 2008
"