scripts.org

Scripts

Here are defined personal scripts.

Orgcal

Import given org files to google calendar:

CALENDAR="$1"

yes | gcalcli --refresh --calendar "$CALENDAR" delete '*'

shift

FILES=$(find "$*" -name "*.org")

emacs -Q --batch --eval "
    (dolist (file command-line-args-left)
        (with-current-buffer
          (find-file-noselect file)
          (org-icalendar-export-to-ics)
        )
    )" "$FILES"

for file in ${FILES//'.org'/.ics}; do
    gcalcli import "$file" --calendar "$CALENDAR"
done

Music player

Open music player in tmux session:

if ! tmux has -t='<<music_player>>'; then
    echo "creating <<music_player>> session"
    tmux new-session -d -s <<music_player>> <<music_player>>
fi

<<terminal>> tmux attach-session -t <<music_player>>

Blackify PDF

Convert a color PDF to greyscale PDF. Very useful for black-and-white book readers.

for FILE in "$@"; do
    gs \
      -sOutputFile="$FILE".temp \
      -sDEVICE=pdfwrite \
      -sColorConversionStrategy=Gray \
      -dProcessColorModel=/DeviceGray \
      -dCompatibilityLevel=1.4 \
      -dNOPAUSE \
      -dBATCH \
      "$FILE"

    rm "$FILE"

    mv "$FILE".temp "$FILE"
done