Puppy Linux Discussion Forum

Code: Select all

#!/bin/bash
cd "$(dirname "$(readlink -f "$0")")" # feiertage.sh ist hier

[ "$1" = "--goto" ] && {
	GOTO="$(Xdialog --stdout --title "PIM Übersicht" --no-cancel --inputbox $'Gehe zu Monat [optional: Datum]\nFormat: [dd] mm [yyyy]' x "$(date "+%-m %Y")")"
	[ "$GOTO" ] && exec $0 $GOTO
}

# bestimmtes Datum testen:
[ $# -eq 3 ] && {
	read TODAY0 MONTH YEAR <<< "$@"
	shift
} || {
	read TODAY0 MONTH YEAR <<< "$(date "+%d %m %Y")"
}
TODAY="${TODAY0/#0/ }" # read schluckt führendes Leerzeichen von date +%_d

# Monat (und Jahr) als Parameter, sonst aktuelles Datum
ARG="$@"
[ "$2" ] || ARG="$1 $YEAR" # nur Monat als Parameter
[ "$1" ] || ARG="$MONTH $YEAR" # ohne Parameter gestartet
[ "$(echo "$ARG" | tr -d "[:digit:]")" != " " ] && exit 1
[ "$ARG" != "$MONTH $YEAR" ] && TODAY=99
[ ${#ARG} -eq 6 ] && ARG="0$ARG" # wenn Monat einstellig

TITLE="Übersicht $(date --date="${ARG##* }-${ARG% *}-01" +%B)" # voller Monatsname
RET=/tmp/pim_query.$$ # Rückgabe aus urxvt

# DAYS in der Form " 5|16"
#-------------------^ Leerzeichen wenn einstellig!

WIDTH=26 # minimale Breite
HEIGHT=11 # minimale Höhe: 8 cal + 1 Leer + 1 Unterstrich + 1 Navi

HOLIDAY="$(./feiertage.sh ${ARG##* } | grep "\.${ARG%% *}\.")"
BIRTHDAY="$(grep "\.${ARG%% *}\." /mnt/sda3/Dateien/Kontakte/geburtstage.txt | grep -v '#')"
APPOINT="$(grep ^${ARG: -2}${ARG%% *}.. /mnt/sda3/Dateien/Termine/termine.txt | sed 's/\(..\)\(..\)\(..\)/\3\.\2\.20\1/;s/ -c[0-9]\+$//;s/00:00 //;s/# *//')" # yymmdd -> dd.mm.20yy; cronjob, 00:00 und # entfernen

ITEMS="$(echo -e "$HOLIDAY\n$APPOINT\n$BIRTHDAY" | grep . | sort -t \. -k 1,1 -n)"

if [ "$ITEMS" ];then
		ITEMS="$(sed "s/^/ /;s/$/ /" <<< "$ITEMS")"
		read LINES WIDTH <<< "$(wc -l -L <<< "$ITEMS")"
		HEIGHT=$((HEIGHT+LINES))
		[ $WIDTH -lt 26 ] && WIDTH=26
fi

ITEMS="${ITEMS:+$ITEMS
}$(printf "%${WIDTH}s" | tr \  \-)" # Trennlinie

[ $TODAY -ne 99 ] && {
	MOON="$(./mondphase)"
	SUN="$(< /tmp/sonnenlauf_$(date +%j))"
	SA="$(date --date="@${SUN%:*}" +%H:%M)"
	SU="$(date --date="@${SUN##*:}" +%H:%M)"
	ITEMS="$ITEMS
 SA $SA SU $SU ${MOON: -1}"
	((HEIGHT++))
}

# unterschiedliche Farben
# sed einmal aufgedröselt
ADAYS="$(sed '
{			# Loop starten
s/^\(..\).*/\1|/	# erste zwei Zeichen ausschneiden und | anhängen
s/^0/ /			# führende 0 mit Leerzeichen ersetzen
H			# an holdspace anhängen
$!d			# patternspace nicht löschen, wenn Ende erreicht ist
}			# Loop beenden, wenn patternspace gelöscht wird
x			# holdspace und patternspace tauschen
s/\n//g			# newlines entfernen
s/|$//			# letztes | entfernen
' <<< "$APPOINT")"
BDAYS="$(sed '{s/^\(..\).*/\1|/;s/^0/ /;H;$!d};x;s/\n//g;s/|$//' <<< "$BIRTHDAY")"
HDAYS="$(sed '{s/^\(..\).*/\1|/;s/^0/ /;H;$!d};x;s/\n//g;s/|$//' <<< "$HOLIDAY")"

# Ereignis+heute=weiss/rot sonst heute invertiert (weiss/dgrau)
[ "$(echo "${ADAYS}|${BDAYS}|${HDAYS}" | grep -o "$TODAY")" ] && COLOR="\x1b\[1;47;31m" || COLOR="\x1b[7m"

ITEMS="$(sed -r 's/('$TODAY0.$MONTH.'.*)($)/'"$COLOR"'\1\x1b\[0m\2/g' <<< "$ITEMS")"

# cal util-linux 2.37.4
# KW einfügen und mit zusätzlichem Leerzeichen splitten
SPLITCAL="$(cal -m -w --iso ${ARG/#0} | sed '2 s/^../KW/;s/.\{3\}/ &XX\n/')"

# sed mit -r (extended regular expression)
TINTCAL="$(sed -r '
6,$ {/XX/!s/('"$TODAY"')( |$)/'"$COLOR"'\1\x1b\[0m\2/;}	# heute
6,$ {/XX/!s/('"${BDAYS:-99}"')( |$)/\x1b[42;30m\1\x1b\[0m\2/g;}	# Geburtstage
6,$ {/XX/!s/('"${HDAYS:-99}"')( |$)/\x1b[41;37m\1\x1b\[0m\2/g;}	# Feiertage
6,$ {/XX/!s/('"${ADAYS:-99}"')( |$)/\x1b[43;30m\1\x1b\[0m\2/g;}	# Termine
' <<< "$SPLITCAL")"

# Splitten rückgängig, Leerzeichen einfügen und Spalte KW kursiv
CAL="$(sed '$!N;s/XX\n/ /;3,$ s/^../\x1b\[3;37m&\x1b\[0m/' <<< "$TINTCAL")"

urxvt -title "$TITLE" -icon /mnt/sda3/temp/icons/working.svg -geometry ${WIDTH}x${HEIGHT}-20+68 -tr -sh 50 +sb +bc -e sh -c "echo \"$CAL\"
	echo
	echo \"$ITEMS\"
	read -e -n 1 -p \"\$(printf '%$(((WIDTH/2)-8))s< - [d]atum + >')\" OP
	case \$OP in +|-) echo \$(date --date=\"${ARG##* }-${ARG% *}-01 \$OP 1 month\" \"+%m %Y\") > $RET;; d) echo \"--goto\" > $RET;; esac"

[ -f $RET ] && { NEWARG="$(< $RET)"; rm $RET; exec "$0" $NEWARG; }