]> git.plutz.net Git - vhs_kurs/blob - clickslide/cgilite/session.sh
Squashed 'clickslide/' changes from b771768..08ca3fa
[vhs_kurs] / 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%%-*}"