Compare commits
2 commits
764258ca58
...
5b481b842e
Author | SHA1 | Date | |
---|---|---|---|
5b481b842e | |||
15d69d863a |
5 changed files with 125 additions and 1 deletions
3
.gitattributes
vendored
Normal file
3
.gitattributes
vendored
Normal file
|
@ -0,0 +1,3 @@
|
|||
*.tex -linguist-detectable
|
||||
*.pdf -linguist-detectable
|
||||
*.nw -linguist-detectable
|
13
.gitignore
vendored
Normal file
13
.gitignore
vendored
Normal file
|
@ -0,0 +1,13 @@
|
|||
*~
|
||||
*.aux
|
||||
*.exe
|
||||
*.fdb_latexmk
|
||||
*.fls
|
||||
*.log
|
||||
*.out
|
||||
*.pdf
|
||||
*.tex
|
||||
*.db
|
||||
tmp/
|
||||
peat
|
||||
noweb.sty
|
91
Makefile.mine
Normal file
91
Makefile.mine
Normal file
|
@ -0,0 +1,91 @@
|
|||
# -*- mode: makefile -*-
|
||||
include Makefile
|
||||
|
||||
REMOTE=dbastos@antartida.xyz
|
||||
LOOP=loop
|
||||
|
||||
default: all
|
||||
|
||||
live: all remote-copy # remote-build-exe
|
||||
|
||||
all: loop rename-loop 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
|
||||
|
||||
rename-loop: 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 *.pdf *.out *.aux *.log *.fls *.fdb_latexmk loop loop.tex
|
17
THANKS
Normal file
17
THANKS
Normal file
|
@ -0,0 +1,17 @@
|
|||
(*) Special thanks
|
||||
|
||||
Stefan Monnier. General advice and discussions. Gave us the solution
|
||||
to atomically write articles without resorting to renameat2().
|
||||
|
||||
(*) Discord Lisp
|
||||
|
||||
Bike. How to get rid of sb-ext:file-exists,
|
||||
sb-ext:file-does-not-exist.
|
||||
|
||||
Shinmera (Yukari Hafner). How to get rid of cl-fad. Suggested
|
||||
filesystem-utils.
|
||||
|
||||
(*) UFRJ
|
||||
|
||||
João Pedro Mendes Alves Bianco. Gave us OpenSuse and POP OS to test
|
||||
LOOP's installation. General discussions and friendship.
|
2
loop.nw
2
loop.nw
|
@ -91,7 +91,7 @@ UNIX V7, which was UUCP-ready. The name UUCP stands for [U]NIX to
|
|||
copying files between UNIX systems. People begun exchanging messages
|
||||
by copying files between machines. The idea eventually evolved into a
|
||||
protocol called NNTP---Network News Transfer Protocol---, which is the
|
||||
protocol used by \lp. (The protocol used to be called NetNews
|
||||
protocol used by \lp. (The protocol used to be called Netnews
|
||||
Transfer Protocol.) Since e-mail was already daily practice of
|
||||
members of the Internet back then, many things from e-mail were taken
|
||||
by the NNTP designers. So, an NNTP message looks a lot like an e-mail
|
||||
|
|
Loading…
Reference in a new issue