git.plutz.net Git - vhs_kurs/blob - clickslide/cgilite/session.sh

   1 #!/bin/sh
   2
   3 [ -n "$include_session" ] && return 0
   4 include_session="$0"
   5
   6 server_key(){
   7   IDFILE="${IDFILE:-${_DATA:-.}/serverkey}"
   8   if [ "$(stat -c %s "$IDFILE")" -ne 512 ] || ! cat "$IDFILE"; then
   9     dd count=1 bs=512 if=/dev/urandom \
  10     | tee "$IDFILE"
  11   fi 2>&-
  12 }
  13
  14 slopecode(){
  15   # 6-Bit Code that retains sort order of input data, while beeing safe to use
  16   # in ascii transmissions, unix file names, HTTP URLs, and HTML attributes
  17
  18   uuencode -m - | sed '
  19     1d;$d;
  20     y;ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/;0123456789:=ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz;
  21   '
  22 }
  23
  24 randomid(){
  25   dd bs=12 count=1 if=/dev/urandom 2>&- \
  26   | slopecode
  27 }
  28
  29 timeid(){
  30   d=$(($(date +%s) % 4294967296))
  31   { printf "$(
  32       printf \\%o \
  33         $((d / 16777216 % 256)) \
  34         $((d / 65536 % 256)) \
  35         $((d / 256 % 256)) \
  36         $((d % 256))
  37     )"
  38     dd bs=8 count=1 if=/dev/urandom 2>&-
  39   } | slopecode
  40 }
  41
  42 checkid(){ grep -m 1 -xE '[0-9a-zA-Z:=]{16}'; }
  43
  44 transid(){
  45   # transaction ID to modify a given file
  46   local file="$1"
  47   { stat -c %F%i%n%N%s%Y "$file" 2>&-
  48     printf %s "$SESSION_ID"
  49     server_key
  50   } | sha256sum | cut -d\  -f1
  51 }
  52
  53 update_session(){
  54   local session sid time sig serverkey checksig
  55
  56   IFS=- read -r sid time sig <<-END
  57         $(COOKIE session)
  58         END
  59   serverkey="$(server_key)"
  60
  61   checksig="$(printf %s "$sid" "$time" "$serverkey" | sha256sum)"
  62   checksig="${checksig%% *}"
  63   d=$(date +%s)
  64
  65   if ! [ "$checksig" = "$sig" \
  66     -a "$time" -ge "$d" \
  67     -a "$(printf %s "$sid" |checkid)" ] 2>&-
  68   then
  69     debug Setting up new session
  70     sid="$(randomid)"
  71   fi
  72
  73   time=$(( $(date +%s) + 7200 ))
  74   sig="$(printf %s "$sid" "$time" "$serverkey" |sha256sum)"
  75   sig="${sig%% *}"
  76   printf %s\\n "${sid}-${time}-${sig}"
  77 }
  78
  79 SESSION_ID="$(update_session)"
  80 SET_COOKIE 0 session="$SESSION_ID" Path=/ SameSite=Strict HttpOnly
  81 SESSION_ID="${SESSION_ID%%-*}"