Squash me.

loop.asd

@@ -1,7 +0,0 @@
-;;; -*- Mode: LISP; Syntax: COMMON-LISP; -*-
-(asdf:defsystem :loop
-  :version "0.1"
-  :description "An NNTP server for a circle of friends."
-  :depends-on (:lisp-unit :str :uiop :cl-ppcre :local-time :clsql-sqlite3 :clingon
-               :filesystem-utils :ironclad/digest/sha256)
-  :components ((:file "loop")))

mine/.gitattributes

@@ -0,0 +1,3 @@
+*.tex -linguist-detectable
+*.pdf -linguist-detectable
+*.nw -linguist-detectable

mine/.gitignore

@@ -0,0 +1,13 @@
+THANKS
+peat
+*~
+*.aux
+*.exe
+*.fdb_latexmk
+*.fls
+*.log
+*.out
+*.pdf
+*.tex
+*.db
+tmp/

mine/Makefile

@@ -0,0 +1,92 @@
+# -*- mode: makefile -*-
+include Makefile
+
+REMOTE=dbastos@antartida.xyz
+LOOP=loop
+
+default: all
+
+live: all remote-copy # remote-build-exe
+
+all: loop.exe loop.lisp loop.asd scripts/build-exe.lisp \
+scripts/build-index-from-fs.lisp \
+scripts/cron-remove-inactive-users.lisp \
+scripts/migrate-add-creation-date.lisp
+
+loop.exe: loop.lisp
+	sbcl --script scripts/build-exe.lisp
+	(test -f loop.exe && cmp loop loop.exe) || mv loop loop.exe
+
+loop.lisp: loop.nw
+	(any tangle -Rloop.lisp < loop.nw | dos2unix > loop.tmp || \
+		(rm loop.tmp && exit 1)) && \
+		mv loop.tmp loop.lisp
+
+loop.asd: loop.nw
+	(any tangle -Rloop.asd < loop.nw | dos2unix > loop-asd.tmp || \
+		(rm loop-asd.tmp && exit 1)) && \
+		mv loop-asd.tmp loop.asd
+
+scripts/build-exe.lisp: loop.nw
+	(any tangle -Rbuild-exe.lisp < loop.nw | dos2unix > build-exe.tmp || \
+		(rm build-exe.tmp && exit 1)) && \
+	    mv build-exe.tmp scripts/build-exe.lisp
+
+scripts/build-index-from-fs.lisp: loop.nw
+	(any tangle -Rbuild-index-from-fs.lisp < loop.nw | dos2unix > \
+		build-index-from-fs.tmp || \
+		(rm build-index-from-fs.tmp && exit 1)) && \
+	    	mv build-index-from-fs.tmp scripts/build-index-from-fs.lisp
+
+scripts/cron-remove-inactive-users.lisp: loop.nw
+	(any tangle -Rcron-remove-inactive-users.lisp < loop.nw | dos2unix > \
+		cron-remove-inactive-users.tmp || \
+		(rm cron-remove-inactive-users.tmp && exit 1)) && \
+		mv cron-remove-inactive-users.tmp \
+			scripts/cron-remove-inactive-users.lisp
+
+scripts/migrate-add-creation-date.lisp: loop.nw
+	(any tangle -Rmigrate-add-creation-date.lisp < loop.nw | dos2unix > \
+		migrate-add-creation-date.tmp || \
+		(rm migrate-add-creation-date.tmp && exit 1)) && \
+		mv migrate-add-creation-date.tmp \
+			scripts/migrate-add-creation-date.lisp
+
+run: loop.nw
+	(any tangle -Rrun < loop.nw | dos2unix > run.tmp || (rm run.tmp && exit 1)) && \
+		mv run.tmp run && \
+		chmod 0755 run
+
+loop.tex: loop.nw
+	any weave -delay -index loop.nw | dos2unix > loop.tex
+
+loop.pdf: loop.tex
+	latexmk -pdf loop
+
+livedoc:
+	echo loop.nw | python peat -C 'make loop.pdf'
+
+remote-copy:
+	scp loop.asd loop.lisp $(REMOTE):$(LOOP)
+	scp -r scripts $(REMOTE):$(LOOP)
+
+sync-users:
+	scp $(REMOTE):$(LOOP)/accounts.lisp .
+
+remote-build-exe:
+	plink -ssh $(REMOTE) cd $(LOOP)/ && \
+	   sbcl --script build-exe.lisp
+
+remote-migrate-account-creation:
+	plink -ssh $(REMOTE) cd $(LOOP)/ && \
+	   sbcl --script migrate-add-creation-date.lisp
+
+remote-cron-remove-inactive-users:
+	plink -ssh $(REMOTE) cd $(LOOP)/ && \
+	   sbcl --script cron-remove-inactive-users.lisp
+
+service: run
+	sudo ln -s $(pwd) /service/$(LOOP)
+
+clean: 
+	rm -f loop loop.asd loop.lisp .*~ *~ *.pdf *.out *.aux *.log *.fls *.fdb_latexmk loop loop.tex

mine/Makefile.mine

@@ -88,4 +88,4 @@ service: run
 	sudo ln -s $(pwd) /service/$(LOOP)
 
 clean: 
-	rm -f *.pdf *.out *.aux *.log *.fls *.fdb_latexmk loop loop.tex
+	rm -f *~ *.pdf *.out *.aux *.log *.fls *.fdb_latexmk loop loop.tex