Initial files, copied, partially adjusted already
authorJoey Schulze <joey@infodrom.org>
Thu, 30 Aug 2001 14:03:17 +0000 (14:03 +0000)
committerJoey Schulze <joey@infodrom.org>
Thu, 30 Aug 2001 14:03:17 +0000 (14:03 +0000)
Makefile [new file with mode: 0644]
Styles/luonnotar.style [new file with mode: 0644]
src/Makefile [new file with mode: 0644]
src/submenu.inc [new file with mode: 0644]

diff --git a/Makefile b/Makefile
new file mode 100644 (file)
index 0000000..60295cf
--- /dev/null
+++ b/Makefile
@@ -0,0 +1,48 @@
+hostname=$(shell hostname)
+
+ifeq ($(hostname),finlandia)
+DEST = $(HOME)/public_html/luonnotar
+else
+ifeq ($(hostname),luonnotar)
+DEST = /var/www/luonnotar.infodrom.org
+endif
+endif
+
+
+TEST = $(HOME)/public_html/luonnotar
+#TEST = /var/lib/webspace/www.infodrom.ffis.de/new
+
+FILES = --exclude "CVS/" --exclude "*imgdot-1x1-transp-ffffff.gif" --exclude "*imgdot-1x1-transp.gif" --include "*/"
+FILES+= --include "*.jpg" --include "*.html" --include "*.shtml" --include "*.php3" --include "*.gif"
+FILES+= --include "*.png"
+FILES+= --exclude "*"
+
+build:
+       cd src && make all
+
+test:
+       false
+       test -d $(TEST) || mkdir $(TEST)
+       rsync -lptr $(FILES) src/ $(TEST)/
+#      cd src && for f in *.html; do cp $$f $(TEST)/$$f; done
+
+fix:
+#       for f in src/index.*.php3; do \
+#         sed '1,/width="40"/ s/width="40"/width="250"/' < $$f > tmp; \
+#         mv -f tmp $$f; \
+#         sed '1,/width="40"/ s/width="40"/width="400"/' < $$f > tmp; \
+#         mv -f tmp $$f; \
+#       done
+
+install: fix
+       test -d $(DEST) || mkdir $(DEST)
+       rsync -lptr $(FILES) src/ $(DEST)/
+#      cd src && for f in *.html; do cp $$f $(DEST)/$$f; done
+
+clean:
+       -rm -f `find -name '*~'` `find -name '.?*.swp'`
+       -cd src && make clean
+       -cd Styles && make clean
+
+depend:
+       cd src && make rdepend
diff --git a/Styles/luonnotar.style b/Styles/luonnotar.style
new file mode 100644 (file)
index 0000000..dd37688
--- /dev/null
@@ -0,0 +1,96 @@
+# ========== Abstand berechnen ==========
+# in ePerl: $root_prefix
+# in WML: <get-var root_prefix>
+<:
+  $root_prefix = "<get-var WML_SRC_DIRNAME>";
+  $root_prefix =~ s/^.*src\/?(.*)$/$1/;
+  @foo = split (/\//, $root_prefix);
+  $root_prefix = "../"x($#foo+1);
+:>
+<if <not <get-var root_prefix>>
+  <define-tag root_prefix><: print "$root_prefix"; :></define-tag>
+  "<: $root_var = \"<get-var root_prefix>\"; :>"
+>
+
+
+<define-tag fontblue>0000ff</define-tag>
+<define-tag page endtag=required>
+<preserve title submenubgcolor menucolor>
+<set-var menucolor="000000">
+<set-var submenubgcolor="d6e8ff">
+
+<set-var %attributes>
+
+# Default: no title
+#
+# Reminder to self: "Joey's Infopool" is in the menu bar already
+#
+# <if <not <get-var title>>
+#    <set-var title="Joey's Infopool">>
+
+<html>
+<head>
+<title><get-var title></title>
+<meta name="author" content="joey@infodrom.north.de (Martin Schulze)">
+<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+</head>
+<body bgcolor="#e8f1fe" text="#000000" vlink="#000090">
+
+# Prelimnary Menu, somebody will have to beautify it later
+#
+<table width=100% bgcolor=#<get-var submenubgcolor>>
+<tr><td align=left><font face="Helvetica,Arial" color="#<get-var menucolor>">
+<font color=#<fontblue>><strong>[</strong></font>
+#<a href="<root_prefix>Internet">Internet</a>
+#<a href="<root_prefix>Muell">Müll</a>
+#<a href="<root_prefix>LUGO">LUGO</a>
+#<a href="<root_prefix>Linux">Linux</a>
+<a href="<root_prefix>Debian">Debian</a>
+<font color=#<fontblue>><strong>|</strong></font>
+<a href="<root_prefix>Vortraege">Vorträge</a>
+<font color=#<fontblue>><strong>]</strong></font>
+</font></td>
+
+<td align=right><a href="<root_prefix>index.html"><font face="Helvetica,Arial" color="#<fontblue>" size=+1><strong>Joey's Infopool</strong></font></a></td>
+
+</tr>
+</table>
+
+<P>[<em>DEL:
+Sorry, still unfinished rebuild of <a href="http://www.infodrom.north.de/~joey/">/~joey/</a>.
+:DEL</em>]
+
+<table border=0 cellpadding=0 cellspacing=0 width=100%>
+<tr>
+  <td align=left valign=top width=10% bgcolor=#<get-var submenubgcolor>><font face="Helvetica,Arial" size=-1 color="#<get-var menucolor>">
+
+#include "submenu.inc"
+
+  </font></td>
+  <td valign=top><img src=<root_prefix>gifs/imgdot-1x1-transp.gif width=3 height=0 alt=""></td>
+  <td valign=top align=left width=90%><font face="Helvetica,Arial">
+
+<if <get-var title>
+<h3><get-var title></h3>
+>
+
+%body
+
+  </font></td>
+</tr>
+</table>
+
+# &copy; = &#169;
+<p><hr><address><small>&copy; <a href="<root_prefix>finger.html">Joey</a>, <:
+@months =
+    ("Dummy", "Januar","Februar","März","April","Mai","Juni","Juli","August","September","Oktober","November","Dezember");
+
+"<get-var WML_SRC_ISOTIME>" =~ /^(\d+)-(\d+)-(\d+)\s/;
+
+printf "Last modified: %d. %s %d", $3, $months[$2], $1;
+:></small></address>
+
+</body>
+</html>
+<restore title submenubgcolor menucolor>
+</define-tag>
diff --git a/src/Makefile b/src/Makefile
new file mode 100644 (file)
index 0000000..62d505b
--- /dev/null
@@ -0,0 +1,41 @@
+WML_FILES = $(wildcard *.wml)
+FILES = $(WML_FILES:%.wml=%.html)
+SFILES = $(WML_FILES:%.wml=%.shtml)
+PFILES = $(WML_FILES:%.wml=%.php3)
+
+DIRS = $(shell find . -maxdepth 1 -type d -not -name . -not -name CVS)
+
+ROOT_PREFIX = $(shell perl -MCwd -e '$$_ = cwd;s/^.*src\/?//;@f=split /\//;$$n=$$\#f+1;print "../"x $$n;' )
+
+IFLAGS = -I. -I$(ROOT_PREFIX)../Styles
+
+.SUFFIXES: .wml .html
+
+.wml.html:
+       /usr/bin/wml -n $(IFLAGS) $*.wml| sed 's:"\([a-zA-Z0-9_\.-]*\.\)\?imgdot-1x1-transp\(-ffffff\)\?\.gif":"$(ROOT_PREFIX)gifs/imgdot-1x1-transp.gif":' > $*.html
+       $(ROOT_PREFIX)../bin/fixsuffix $*.html
+
+all: $(FILES)
+       test -z "$(DIRS)" || for d in "" $(DIRS); do if [ -n "$$d" ]; then (cp Makefile $$d && cd $$d && make all); fi; done
+
+dir: $(FILES)
+
+clean:
+       rm -f $(FILES) $(SFILES) $(PFILES) .depend *.imgdot-1x1-transp.gif imgdot-1x1-transp.gif
+       test -z "$(DIRS)" || for d in "" $(DIRS); do if [ -n "$$d" ]; then (cp Makefile $$d && cd $$d && make clean); fi; done
+       test -z "$(ROOT_PREFIX)" || rm -f Makefile
+
+install:
+       cd $(ROOT_PREFIX).. && make install
+
+test:
+       cd $(ROOT_PREFIX).. && make test
+
+depend .depend:
+       $(ROOT_PREFIX)../bin/wmldepend.sh $(IFLAGS) $(WML_FILES) > .depend
+
+rdepend:
+       make depend
+       test -z "$(DIRS)" || for d in "" $(DIRS); do if [ -n "$$d" ]; then (cp Makefile $$d && cd $$d && make rdepend); fi; done
+
+include .depend
diff --git a/src/submenu.inc b/src/submenu.inc
new file mode 100644 (file)
index 0000000..e69de29