diff options
Diffstat (limited to 'contrib/scripts/org2hpda')
| -rwxr-xr-x | contrib/scripts/org2hpda | 106 |
1 files changed, 106 insertions, 0 deletions
diff --git a/contrib/scripts/org2hpda b/contrib/scripts/org2hpda new file mode 100755 index 0000000..de0b573 --- /dev/null +++ b/contrib/scripts/org2hpda @@ -0,0 +1,106 @@ +# org2hpda - a small utility to generate hipster pda style printouts from org mode +# Copyright (C) 2007-2012 Christian Egli +# +# Version: 0.6 +# +# This program is free software: you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation, either version 3 of the License, or +# (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program. If not, see <http://www.gnu.org/licenses/>. +# +# Commentary: +# =========== +# +# set cal-tex-diary to true so that diary entries show up in the calendar +# +# Usage: +# ====== +# +# run this makefile with +# +# make -f org2hpda +# +# The makfile will take the entries from your diary file and generate +# two PDFs containing nicely printed weekly and monthly calendars. One +# is done in the style of a pocketMod (http://www.pocketmod.com/) and +# the other is done in the style of the Hipster PDA +# (http://en.wikipedia.org/wiki/Hipster_PDA). +# +# Requirements: +# ============= +# +# the pdf* commands are part of the pdfjam package which can be found +# at http://www.warwick.ac.uk/go/pdfjam + +EMACS = emacs -batch -l ~/.emacs +LATEX = latex +DIARY = $($(EMACS) -eval "diary-file") + +# Number of weeks to be printed. Should be a multiple of 4, because 4 +# of them are merged on one page. Can be set when invoking the script +# as follows: make NUMBER_OF_WEEKS=8 -f org2hpda +NUMBER_OF_WEEKS = 4 + +hipsterFiles = weekCalendar.pdf yearCalendar.pdf monthCalendar3.pdf monthCalendar2.pdf monthCalendar1.pdf +pocketModFiles = weekCalendar.pdf yearCalendar-rotated.pdf \ + monthCalendar3-rotated.pdf monthCalendar2-rotated.pdf monthCalendar1-rotated.pdf + +all: pocketMod.pdf hipsterPDA.pdf + +%.dvi: %.tex + # Quick hack to massage the LaTeX produced by cal-tex + # quote '@', then increase font size of week calendars, + # increase font of diary entries in moth calendar and + # finally reduce links to their destination, i.e. + # change '[[http://foo][bar]]' to 'bar' + sed -e 's/\\verb|@|/\@/g' \ + -e 's/documentclass\[11pt\]/documentclass[12pt]/g' \ + -e 's/{\\tiny \\raggedright #3}/{\\small \\raggedright #3}/g' \ + -e 's/\[\[[^]]\+\]\[\([^]]\+\)\]\]/\1/g' \ + < $< > /tmp/temp-org-file.$$$$; mv /tmp/temp-org-file.$$$$ $< + $(LATEX) $^ + +%.pdf: %.dvi + dvipdf $^ + +%-rotated.pdf: %.pdf + cp $^ $@ + for n in 1 2 3; do \ + pdf90 --quiet --outfile tmp.pdf $@; mv tmp.pdf $@; \ + done + +weekCalendar.tex: $(DIARY) + $(EMACS) -eval "(progn (calendar) (cal-tex-cursor-week-iso $(NUMBER_OF_WEEKS)) (with-current-buffer cal-tex-buffer (write-file \"$@\")))" + +monthCalendar1.tex: $(DIARY) + $(EMACS) -eval "(progn (calendar) (cal-tex-cursor-month-landscape 1) (with-current-buffer cal-tex-buffer (write-file \"$@\")))" + +monthCalendar2.tex: $(DIARY) + $(EMACS) -eval "(progn (calendar) (calendar-forward-month 1) (cal-tex-cursor-month-landscape 1) (with-current-buffer cal-tex-buffer (write-file \"$@\")))" + +monthCalendar3.tex: $(DIARY) + $(EMACS) -eval "(progn (calendar) (calendar-forward-month 2) (cal-tex-cursor-month-landscape 1) (with-current-buffer cal-tex-buffer (write-file \"$@\")))" + +yearCalendar.tex: $(DIARY) + $(EMACS) -eval "(progn (calendar) (calendar-forward-month 2) (cal-tex-cursor-year-landscape 1) (with-current-buffer cal-tex-buffer (write-file \"$@\")))" + +pocketMod.pdf: $(pocketModFiles) + pdfjoin --quiet --outfile tmp.pdf $^ + pdfnup tmp.pdf --quiet --outfile $@ --nup 4x2 --frame true + +hipsterPDA.pdf: $(hipsterFiles) + pdfnup weekCalendar.pdf --quiet --outfile page1.pdf --batch --nup 2x2 --frame true --no-landscape + pdfjoin --quiet --outfile tmp.pdf monthCalendar[1-3]-rotated.pdf yearCalendar-rotated.pdf + pdfnup tmp.pdf --quiet --outfile page2.pdf --batch --nup 2x2 --frame true --no-landscape + pdfjoin --quiet --outfile $@ page1.pdf page2.pdf + +clean: + rm -rf *.aux *.dvi *.tex *.log *.pdf |