'
}
+session_mac(){
+ local info
+ [ $# -eq 0 ] && info="$(cat)" || info="$*"
+
+ if which openssl >/dev/null; then
+ printf %s "$info" |openssl dgst -sha1 -hmac "$(server_key)" -binary |slopecode
+ else
+ { printf %s "$info"; server_key; } |sha256sum |cut -d\ -f1
+ fi
+}
+
randomid(){
dd bs=12 count=1 if=/dev/urandom 2>&- \
| slopecode
transid(){
# transaction ID to modify a given file
local file="$1"
- { stat -c %F%i%n%N%s%Y "$file" 2>&-
- printf %s "$SESSION_ID"
- server_key
- } | sha256sum | cut -d\ -f1
+ session_mac "$(stat -c %F%i%n%N%s%Y "$file" 2>&-)" "$SESSION_ID"
}
update_session(){
- local session sid time sig serverkey checksig
+ local session sid time sig checksig
- IFS=- read -r sid time sig <<-END
- $(COOKIE session)
+ read -r sid time sig <<-END
+ $(POST session_key || COOKIE session)
END
- serverkey="$(server_key)"
- checksig="$(printf %s "$sid" "$time" "$serverkey" | sha256sum)"
- checksig="${checksig%% *}"
+ checksig="$(session_mac "$sid" "$time")"
if ! [ "$checksig" = "$sig" \
-a "$time" -ge "$_DATE" \
-a "$(printf %s "$sid" |checkid)" ] 2>&-
then
- debug Setting up new session
+ debug "Setting up new session"
sid="$(randomid)"
fi
time=$(( $_DATE + $SESSION_TIMEOUT ))
- sig="$(printf %s "$sid" "$time" "$serverkey" |sha256sum)"
- sig="${sig%% *}"
- printf %s\\n "${sid}-${time}-${sig}"
+ sig="$(session_mac "$sid" "$time")"
+ printf %s\\n "${sid} ${time} ${sig}"
}
-SESSION_ID="$(update_session)"
-SET_COOKIE 0 session="$SESSION_ID" Path=/ SameSite=Strict HttpOnly
-SESSION_ID="${SESSION_ID%%-*}"
+SESSION_KEY="$(update_session)"
+SET_COOKIE 0 session="$SESSION_KEY" Path=/ SameSite=Strict HttpOnly
+SESSION_ID="${SESSION_KEY%% *}"
+
+SESSION_BIND() {
+ local key="$1" value="$2"
+ SET_COOKIE session "$key"="${value} $(session_mac "$value" "$SESSION_ID")"
+}
+
+SESSION_VAR() {
+ local key="$1"
+ local value sig
+ value="$(COOKIE "$key")"
+ sig="${value##* }" value="${value% *}"
+ if [ "$sig" = "$(session_mac "$value" "$SESSION_ID")" ]; then
+ printf %s\\n "$value"
+ else
+ return 1
+ fi
+}