From 9aaeb4623d3ff5746e665bc17914eefd292b7dcd Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?David=20K=C3=BChling?= <dvdkhlng@gmx.de>
Date: Sun, 2 Jan 2011 15:19:00 +0100
Subject: New OpenWrt package for GNU Octave.  Experimental/probably still
 broken. Work in progress.  Committing it as compilation seems to take
 forever. Not sure whether I can finish this within a few days.

---
 gforth/files/gforth-update-image.in | 60 +++++++++++++++++++++++++++++++++++++
 1 file changed, 60 insertions(+)
 create mode 100644 gforth/files/gforth-update-image.in

(limited to 'gforth/files/gforth-update-image.in')

diff --git a/gforth/files/gforth-update-image.in b/gforth/files/gforth-update-image.in
new file mode 100644
index 0000000..5d51434
--- /dev/null
+++ b/gforth/files/gforth-update-image.in
@@ -0,0 +1,60 @@
+#! /bin/sh
+#
+# Part of gforth package for OpenWrt: update Gforth pre-compiled interpreter
+# image from installed sources
+#
+# Copyright (C) 2010 David Kuehling <dvdkhlng TA gmx TOD de> 
+#
+# License: GPLv3+, NO WARRANTY
+#
+
+# Rationale for choice of stack sizes, see Gforth Manual chapter 13.6
+FORTHSIZES="--dictionary-size=1M \
+	--data-stack-size=16k \
+	--fp-stack-size=15872 \
+	--return-stack-size=15360 \
+	--locals-stack-size=14848"
+
+STARTUP="exboot.fs startup.fs @asm_fs@ @disasm_fs@"
+
+FORTHKFLAGS="--die-on-signal -i @kernel_fi@"
+
+GFORTH_SHARE_DIR=/usr/share/gforth/@PACKAGE_VERSION@
+GFORTH_LIB_DIR=/usr/lib/gforth/@PACKAGE_VERSION@
+GFORTH_BIN_DIR=/usr/bin
+
+GFORTH_FI=${GFORTH_LIB_DIR}/gforth.fi
+
+echo "Creating Gforth interpreter image..."
+
+mkdir -p $GFORTH_LIB_DIR
+
+check_writable(){
+    if [ -f $GFORTH_FI ] && ! [ -w $GFORTH_FI ]; then
+	return 1
+    elif ! [ -w $GFORTH_LIB_DIR ]; then
+	return 1
+    fi
+
+    return 0
+}
+
+if ! check_writable; then
+    cat <<EOF
+  You do not have permissions to  create/modify the
+  image file:
+    $GFORTH_FI
+
+  Are you not root?
+EOF
+    exec false
+fi
+
+export libccdir=${GFORTH_LIB_DIR}/libcc-named
+export GFORTH="/usr/bin/gforth.real ${FORTHSIZES} ${FORTHKFLAGS} ${STARTUP}"
+gforthmi ${GFORTH_FI}.new ${FORTHSIZES} ${FORTHKFLAGS} ${STARTUP} &&
+mv -f ${GFORTH_FI}.new ${GFORTH_FI}
+exit $?
+
+
+
-- 
cgit v1.2.3