~/jendhub

def B64.encode

bend-kube-runtime@0.2.0.0 · src/base64.bend:112

import bend-kube-runtime@0.2.0.0/src/base64.bend as Base64
import Base

112# Encodes bytes, three at a time, with '=' padding.
113def B64.encode(bs: List<&2, U32>) -> String:
114  match bs:
115    case Nil{}:
116      ""
117    case Con{+a, Nil{}}:
118      SCon{B64.chr((a >> 2n : U32)), SCon{B64.chr(((a .&. 3) << 4n : U32)), "=="}}
119    case Con{+a, Con{+b, Nil{}}}:
120      SCon{B64.chr((a >> 2n : U32)), SCon{B64.chr((((a .&. 3) << 4n) .|. (b >> 4n) : U32)),
121        SCon{B64.chr(((b .&. 15) << 2n : U32)), "="}}}
122    case Con{+a, Con{+b, Con{+c, t}}}:
123      SCon{B64.chr((a >> 2n : U32)), SCon{B64.chr((((a .&. 3) << 4n) .|. (b >> 4n) : U32)),
124        SCon{B64.chr((((b .&. 15) << 2n) .|. (c >> 6n) : U32)), SCon{B64.chr((c .&. 63 : U32)),
125          B64.encode(t)}}}}

Uses (8)

Used by (2)