about summary refs log tree commit diff
path: root/web/panettone/src/util.lisp
diff options
context:
space:
mode:
authorGriffin Smith <grfn@gws.fyi>2022-05-28T17·53-0400
committerclbot <clbot@tvl.fyi>2022-05-28T18·00+0000
commitb39ca017c0453c7420da64d062a2aa00e27d1fd3 (patch)
treed186a32d5a3d3516006128a21fbd46fa0c4d37f4 /web/panettone/src/util.lisp
parentc1bddf191f0f4ca9d14d254a29dfaaa0c49149b5 (diff)
fix(web/panettone): Properly handle un-padded base64 in jwts r/4181
The JWT spec apparently specifies that base64 strings in jwts aren't to
be padded - but the common lisp base64 library doesn't know how to
decode unpadded base64 (it signals a condition in that case). This adds
the extra padding characters (a number of `=` characters such that the
length of the string is a multiple of 4) using some FORMAT wizardry (?).

Change-Id: Ic6b66f05db2699bf1f93f870f5dd614c37eccc2d
Reviewed-on: https://cl.tvl.fyi/c/depot/+/5781
Tested-by: BuildkiteCI
Reviewed-by: tazjin <tazjin@tvl.su>
Autosubmit: grfn <grfn@gws.fyi>
Diffstat (limited to 'web/panettone/src/util.lisp')
0 files changed, 0 insertions, 0 deletions