foreign-c/Makefile

187 lines
7.2 KiB
Makefile

.PHONY: package test libtest.o tests/libtest.so libtest.a documentation README.html
.SILENT: build install test test-docker clean
SCHEME=chibi
DOCKERIMG=${SCHEME}:head
VERSION=0.10.9
PKG=foreign-c-${VERSION}.tgz
GAUCHE_PKG=foreign-c-gauche-primitives-${VERSION}.tgz
GAUCHE_TAR=foreign-c-gauche-primitives-${VERSION}.tar
CC=gcc
PKG=foreign-c-${VERSION}.tgz
ifeq "${SCHEME}" "chicken"
DOCKERIMG=${SCHEME}:5
endif
# Mit scheme specific
MITCMD=mit-scheme --batch-mode
MITDIR=${PWD}/foreign/c/primitives/mit-scheme
MITLIBDIR=$(shell echo "(display (->namestring (system-library-directory-pathname)))" | mit-scheme --batch-mode 2> /dev/null | tail -1)
build:
rm -rf *.tgz
echo "<pre>$$(cat README.md)</pre>" > README.html
snow-chibi package \
--version=${VERSION} \
--authors="Retropikzel" \
--doc=README.html \
--foreign-depends=ffi \
--description="Portable foreign function interface for R7RS Schemes" \
--test=test.scm \
foreign/c.sld \
foreign/c/chibi-primitives.sld \
foreign/c/chicken-primitives.sld \
foreign/c/guile-primitives.sld \
foreign/c/kawa-primitives.sld \
foreign/c/mosh-primitives.sld \
foreign/c/racket-primitives.sld \
foreign/c/stklos-primitives.sld \
foreign/c/ypsilon-primitives.sld
build-gauche:
snow-chibi package \
--version=${VERSION} \
--authors="Retropikzel" \
--foreign-depends="libgauche ffi" \
--description="Portable foreign function interface for R7RS Schemes - Gauche primitives" \
foreign/c/gauche-primitives.sld \
foreign/c/gauche-primitives.stub
install:
snow-chibi --impls=${SCHEME} --always-yes install ${PKG}
install-gauche:
if [ "${SCHEME}" = "gauche" ]; then \
snow-chibi --impls=${SCHEME} ${SNOW_CHIBI_ARGS} install ${GAUCHE_PKG}; \
fi
#make gauche; \
#sudo cp foreign/c/primitives/gauche.scm $(shell gauche-config --sitelibdir)/foreign/c/primitives/;\
#sudo mkdir -p $(shell gauche-config --sitearchdir)/foreign/c/lib/; \
#sudo cp -r foreign/c/lib/gauche.so $(shell gauche-config --sitearchdir)/foreign/c/lib/; \
#fi
uninstall:
snow-chibi --impls=${SCHEME} remove "(foreign c)"
test: libtest.o libtest.so libtest.a
rm -rf test
COMPILE_R7RS_CHICKEN="-L -ltest -I./tests/c-include -L." \
COMPILE_R7RS=${SCHEME} compile-r7rs -I . -o test test.scm
LD_LIBRARY_PATH=. ./test
test-docker:
docker build --build-arg IMAGE=${DOCKERIMG} --build-arg SCHEME=${SCHEME} --tag=retropikzel-foreign-c-test-${SCHEME} -f Dockerfile.test .
docker run -v "${PWD}:/workdir" -w /workdir -t retropikzel-foreign-c-test-${SCHEME} sh -c "make SCHEME=${SCHEME} SNOW_CHIBI_ARGS=--always-yes build install test"
libtest.o: tests/c-src/libtest.c
${CC} ${CFLAGS} -o libtest.o -fPIC -c tests/c-src/libtest.c -I./include ${LDFLAGS}
libtest.so: tests/c-src/libtest.c
${CC} ${CFLAGS} -o libtest.so -shared -fPIC tests/c-src/libtest.c -I./include ${LDFLAGS}
libtest.a: libtest.o tests/c-src/libtest.c
ar rcs libtest.a libtest.o ${LDFLAGS}
chibi: foreign/c/chibi-primitives.stub
chibi-ffi foreign/c/chibi-primitives.stub
#${CC} ${CFLAGS} -g3 -o foreign/c/primitives/chibi/foreign-c.so foreign/c/primitives/chibi/foreign-c.c -fPIC -lffi -shared
gauche:
gauche-package compile \
--srcdir=foreign/c \
--keep-c-files \
gauche-primitives \
gauche-primitives.gauche.scm
#gcc -shared -o foreign/c/gauche-primitives.so gauche-primitives.so
#--verbose \
#--keep-c-files \
#--srcdir=foreign/c/gauche \
#--cc=${CC} \
#--cflags="${CFLAGS} -I.foreign/c/gauche" \
#--libs=-lffi \
#foreign-c-gauche-primitives foreign-c-gauche-primitives.c gauchelib.scm
#mkdir -p foreign/c/lib
#mv foreign-c-gauche-primitives.so foreign/c/lib/gauche.so
#mv foreign-c-gauche-primitives.o foreign/c/lib/gauche.o
mit-scheme:
cd ${MITDIR} && echo "(load-option 'ffi) (c-generate \"mit-scheme-foreign-c\" \"#include <stdio.h>\n#include <ffi.h>\") " | ${MITCMD}
cd ${MITDIR} && ${CC} -shared -Wall -fPIC -lffi -o mit-scheme-foreign-c-shim.so mit-scheme-foreign-c-shim.c -I${MITLIBDIR}
cd ${MITDIR} && ${CC} -Wall -fPIC -lffi -o mit-scheme-foreign-c-const mit-scheme-foreign-c-const.c -I$(shell mit-scheme --batch-mode --eval "(display (->namestring (system-library-directory-pathname)))" --eval "(exit 0)" | tail -1)
cd ${MITDIR} && ./mit-scheme-foreign-c-const
cd ${MITDIR} && echo "(sf \"mit-scheme-foreign-c-const\")" | ${MITCMD}
cd ${MITDIR} && echo "(generate-shim \"mit-scheme-foreign-c\" \"#include <stdio.h>\n#include <ffi.h>\")" | ${MITCMD}
sudo cp foreign/c/primitives/mit-scheme/mit-scheme-foreign-c-types.bin ${MITLIBDIR}
sudo cp foreign/c/primitives/mit-scheme/mit-scheme-foreign-c-const.bin ${MITLIBDIR}
sudo cp foreign/c/primitives/mit-scheme/mit-scheme-foreign-c-shim.so ${MITLIBDIR}
cd foreign && echo '(compile-file "c-mit-scheme.sld")' | ${MITCMD}
sudo mkdir -p ${MITLIBDIR}/libraries/foreign
sudo cp foreign/c-mit-scheme.binld ${MITLIBDIR} #/libraries/foreign/
sudo cp foreign/c-mit-scheme.comld ${MITLIBDIR} #/libraries/foreign/
#sudo cp foreign/c-mit-scheme.sld ${MITLIBDIR} #/libraries/foreign/
test-mit-scheme:
LD_LIBRARY_PATH=${PWD}/foreign/c/primitives/mit-scheme \
echo "(exit 0)" | mit-scheme --batch-mode --load test.scm --eval "(exit 0)"
mit-scheme-old:
cd foreign/c/primitives/mit-scheme \
&& ${CC} \
-c -Wall -fPIC -lffi -o mit-scheme-foreign-c.o mit-scheme-foreign-c-shim.c \
-I$(shell mit-scheme --batch-mode --eval "(display (->namestring (system-library-directory-pathname)))" --eval "(exit 0)" | tail -1)
cd foreign/c/primitives/mit-scheme \
#&& ${CC} -shared -Wall -fPIC -o mit-scheme-foreign-c.so mit-scheme-foreign-c-shim.o
cd foreign/c/primitives/mit-scheme \
&& mit-scheme --batch-mode \
--eval "(generate-shim \"mit-scheme-foreign-c\" \"#include <stdio.h>\n#include <ffi.h>\")" \
--eval "(exit 0)"
cd foreign/c/primitives/mit-scheme \
&& ${CC} -c -o mit-scheme-foreign-c-const.o mit-scheme-foreign-c-const.c
cd foreign/c/primitives/mit-scheme \
&& ${CC} -o mit-scheme-foreign-c-const mit-scheme-foreign-c-const.o
cd foreign/c/primitives/mit-scheme \
&& ./mit-scheme-foreign-c-const
cd foreign/c/primitives/mit-scheme \
&& echo '(sf "mit-scheme-foreign-c-const")' | mit-scheme --batch-mode
cd foreign \
&& echo '(sf "c-mit-scheme.sld")' | mit-scheme --batch-mode
clean:
find . -name "*.meta" -delete
find . -name "*.link" -delete
find . -name "*.o" -delete
find . -name "*.bci" -delete
find . -name "*.com" -delete
find . -name "*.comld" -delete
find . -name "*.bin" -delete
find . -name "*.binld" -delete
find . -name "*.bcild" -delete
find . -name "*.o[1-9]" -delete
find . -name "*.so" -delete
find . -name "*.a" -delete
find . -name "*.class" -delete
find . -name "*.jar" -delete
find . -name "core.1" -delete
find . -name "*@gambit*" -delete
find . -name "*.import.scm" -delete
find . -name "*.cdecl" -delete
find . -name "*.log" -delete
find . -name "*.tgz" -delete
find . -name "*.rkt" -delete
find . -name "*.tar.gz" -delete
rm -rf MANIFEST.mf
rm -rf tmp
rm -rf foreign/c/primitives/chibi/foreign-c.c
rm -rf foreign/c/lib
rm -rf foreign/c/primitives/mit-scheme/mit-scheme-foreign-c-shim.c
rm -rf foreign/c/primitives/mit-scheme/mit-scheme-foreign-c-const.c
rm -rf foreign/c/primitives/mit-scheme/mit-scheme-foreign-c-const
rm -rf foreign/c/primitives/mit-scheme/mit-scheme-foreign-c-const.scm
rm -rf *.tgz
rm -rf README.html
rm -rf test
rm -rf testfile.test