Skip to content

Commit

Permalink
Regenerate examples
Browse files Browse the repository at this point in the history
  • Loading branch information
@laurenthuberdeau
laurenthuberdeau committed Feb 16, 2025
1 parent 505dee2 commit ac41180
Show file tree
Hide file tree
Showing 2 changed files with 98 additions and 98 deletions.
16 changes: 8 additions & 8 deletions examples/compiled/base64.sh
View file
Original file line number Diff line number Diff line change
Expand Up @@ -81,20 +81,20 @@ _encode() {
_getchar b2
printf \\$(((_$((_codes + (b1 >> 2))))/64))$(((_$((_codes + (b1 >> 2))))/8%8))$(((_$((_codes + (b1 >> 2))))%8))
if [ $b2 -lt 0 ] ; then
printf \\$(((_$((_codes + (63 & (b1 << 4)))))/64))$(((_$((_codes + (63 & (b1 << 4)))))/8%8))$(((_$((_codes + (63 & (b1 << 4)))))%8))
printf \\$(((_$((_codes + (0x3f & (b1 << 4)))))/64))$(((_$((_codes + (0x3f & (b1 << 4)))))/8%8))$(((_$((_codes + (0x3f & (b1 << 4)))))%8))
printf "="
printf "="
break
else
printf \\$(((_$((_codes + (63 & ((b1 << 4) | (b2 >> 4))))))/64))$(((_$((_codes + (63 & ((b1 << 4) | (b2 >> 4))))))/8%8))$(((_$((_codes + (63 & ((b1 << 4) | (b2 >> 4))))))%8))
printf \\$(((_$((_codes + (0x3f & ((b1 << 4) | (b2 >> 4))))))/64))$(((_$((_codes + (0x3f & ((b1 << 4) | (b2 >> 4))))))/8%8))$(((_$((_codes + (0x3f & ((b1 << 4) | (b2 >> 4))))))%8))
_getchar b3
if [ $b3 -lt 0 ] ; then
printf \\$(((_$((_codes + (63 & (b2 << 2)))))/64))$(((_$((_codes + (63 & (b2 << 2)))))/8%8))$(((_$((_codes + (63 & (b2 << 2)))))%8))
printf \\$(((_$((_codes + (0x3f & (b2 << 2)))))/64))$(((_$((_codes + (0x3f & (b2 << 2)))))/8%8))$(((_$((_codes + (0x3f & (b2 << 2)))))%8))
printf "="
break
else
printf \\$(((_$((_codes + (63 & ((b2 << 2) | (b3 >> 6))))))/64))$(((_$((_codes + (63 & ((b2 << 2) | (b3 >> 6))))))/8%8))$(((_$((_codes + (63 & ((b2 << 2) | (b3 >> 6))))))%8))
printf \\$(((_$((_codes + (63 & b3))))/64))$(((_$((_codes + (63 & b3))))/8%8))$(((_$((_codes + (63 & b3))))%8))
printf \\$(((_$((_codes + (0x3f & ((b2 << 2) | (b3 >> 6))))))/64))$(((_$((_codes + (0x3f & ((b2 << 2) | (b3 >> 6))))))/8%8))$(((_$((_codes + (0x3f & ((b2 << 2) | (b3 >> 6))))))%8))
printf \\$(((_$((_codes + (0x3f & b3))))/64))$(((_$((_codes + (0x3f & b3))))/8%8))$(((_$((_codes + (0x3f & b3))))%8))
fi
fi
done
Expand Down Expand Up @@ -125,7 +125,7 @@ _decode() {
done
i=0
while [ $i -lt 64 ]; do
: $((_$((_lut + 255 & _$((_codes + i)))) = i))
: $((_$((_lut + 0xff & _$((_codes + i)))) = i))
: $((i += 1))
done
while _get c1; [ $c1 -ge 0 ]; do
Expand All @@ -136,11 +136,11 @@ _decode() {
if _get c3; [ $c3 -lt 0 ] ; then
break
fi
printf \\$(((255 & ((c2 << 4) | (c3 >> 2)))/64))$(((255 & ((c2 << 4) | (c3 >> 2)))/8%8))$(((255 & ((c2 << 4) | (c3 >> 2)))%8))
printf \\$(((0xff & ((c2 << 4) | (c3 >> 2)))/64))$(((0xff & ((c2 << 4) | (c3 >> 2)))/8%8))$(((0xff & ((c2 << 4) | (c3 >> 2)))%8))
if _get c4; [ $c4 -lt 0 ] ; then
break
fi
printf \\$(((255 & ((c3 << 6) | c4))/64))$(((255 & ((c3 << 6) | c4))/8%8))$(((255 & ((c3 << 6) | c4))%8))
printf \\$(((0xff & ((c3 << 6) | c4))/64))$(((0xff & ((c3 << 6) | c4))/8%8))$(((0xff & ((c3 << 6) | c4))%8))
done
endlet $1 c4 c3 c2 c1 i
}
Expand Down
180 changes: 90 additions & 90 deletions examples/compiled/sha256sum.sh
View file
Original file line number Diff line number Diff line change
Expand Up @@ -14,70 +14,70 @@ defarr() { _malloc $1 $2; }

defarr _k 64
_sha256_setup() {
: $((_$((_k + 0)) = 1116352408))
: $((_$((_k + 1)) = 1899447441))
: $((_$((_k + 2)) = -1245643825))
: $((_$((_k + 3)) = -373957723))
: $((_$((_k + 4)) = 961987163))
: $((_$((_k + 5)) = 1508970993))
: $((_$((_k + 6)) = -1841331548))
: $((_$((_k + 7)) = -1424204075))
: $((_$((_k + 8)) = -670586216))
: $((_$((_k + 9)) = 310598401))
: $((_$((_k + 10)) = 607225278))
: $((_$((_k + 11)) = 1426881987))
: $((_$((_k + 12)) = 1925078388))
: $((_$((_k + 13)) = -2132889090))
: $((_$((_k + 14)) = -1680079193))
: $((_$((_k + 15)) = -1046744716))
: $((_$((_k + 16)) = -459576895))
: $((_$((_k + 17)) = -272742522))
: $((_$((_k + 18)) = 264347078))
: $((_$((_k + 19)) = 604807628))
: $((_$((_k + 20)) = 770255983))
: $((_$((_k + 21)) = 1249150122))
: $((_$((_k + 22)) = 1555081692))
: $((_$((_k + 23)) = 1996064986))
: $((_$((_k + 24)) = -1740746414))
: $((_$((_k + 25)) = -1473132947))
: $((_$((_k + 26)) = -1341970488))
: $((_$((_k + 27)) = -1084653625))
: $((_$((_k + 28)) = -958395405))
: $((_$((_k + 29)) = -710438585))
: $((_$((_k + 30)) = 113926993))
: $((_$((_k + 31)) = 338241895))
: $((_$((_k + 32)) = 666307205))
: $((_$((_k + 33)) = 773529912))
: $((_$((_k + 34)) = 1294757372))
: $((_$((_k + 35)) = 1396182291))
: $((_$((_k + 36)) = 1695183700))
: $((_$((_k + 37)) = 1986661051))
: $((_$((_k + 38)) = -2117940946))
: $((_$((_k + 39)) = -1838011259))
: $((_$((_k + 40)) = -1564481375))
: $((_$((_k + 41)) = -1474664885))
: $((_$((_k + 42)) = -1035236496))
: $((_$((_k + 43)) = -949202525))
: $((_$((_k + 44)) = -778901479))
: $((_$((_k + 45)) = -694614492))
: $((_$((_k + 46)) = -200395387))
: $((_$((_k + 47)) = 275423344))
: $((_$((_k + 48)) = 430227734))
: $((_$((_k + 49)) = 506948616))
: $((_$((_k + 50)) = 659060556))
: $((_$((_k + 51)) = 883997877))
: $((_$((_k + 52)) = 958139571))
: $((_$((_k + 53)) = 1322822218))
: $((_$((_k + 54)) = 1537002063))
: $((_$((_k + 55)) = 1747873779))
: $((_$((_k + 56)) = 1955562222))
: $((_$((_k + 57)) = 2024104815))
: $((_$((_k + 58)) = -2067236844))
: $((_$((_k + 59)) = -1933114872))
: $((_$((_k + 60)) = -1866530822))
: $((_$((_k + 61)) = -1538233109))
: $((_$((_k + 62)) = -1090935817))
: $((_$((_k + 63)) = -965641998))
: $((_$((_k + 0)) = 0x428a2f98))
: $((_$((_k + 1)) = 0x71374491))
: $((_$((_k + 2)) = 0xb5c0fbcf))
: $((_$((_k + 3)) = 0xe9b5dba5))
: $((_$((_k + 4)) = 0x3956c25b))
: $((_$((_k + 5)) = 0x59f111f1))
: $((_$((_k + 6)) = 0x923f82a4))
: $((_$((_k + 7)) = 0xab1c5ed5))
: $((_$((_k + 8)) = 0xd807aa98))
: $((_$((_k + 9)) = 0x12835b01))
: $((_$((_k + 10)) = 0x243185be))
: $((_$((_k + 11)) = 0x550c7dc3))
: $((_$((_k + 12)) = 0x72be5d74))
: $((_$((_k + 13)) = 0x80deb1fe))
: $((_$((_k + 14)) = 0x9bdc06a7))
: $((_$((_k + 15)) = 0xc19bf174))
: $((_$((_k + 16)) = 0xe49b69c1))
: $((_$((_k + 17)) = 0xefbe4786))
: $((_$((_k + 18)) = 0xfc19dc6))
: $((_$((_k + 19)) = 0x240ca1cc))
: $((_$((_k + 20)) = 0x2de92c6f))
: $((_$((_k + 21)) = 0x4a7484aa))
: $((_$((_k + 22)) = 0x5cb0a9dc))
: $((_$((_k + 23)) = 0x76f988da))
: $((_$((_k + 24)) = 0x983e5152))
: $((_$((_k + 25)) = 0xa831c66d))
: $((_$((_k + 26)) = 0xb00327c8))
: $((_$((_k + 27)) = 0xbf597fc7))
: $((_$((_k + 28)) = 0xc6e00bf3))
: $((_$((_k + 29)) = 0xd5a79147))
: $((_$((_k + 30)) = 0x6ca6351))
: $((_$((_k + 31)) = 0x14292967))
: $((_$((_k + 32)) = 0x27b70a85))
: $((_$((_k + 33)) = 0x2e1b2138))
: $((_$((_k + 34)) = 0x4d2c6dfc))
: $((_$((_k + 35)) = 0x53380d13))
: $((_$((_k + 36)) = 0x650a7354))
: $((_$((_k + 37)) = 0x766a0abb))
: $((_$((_k + 38)) = 0x81c2c92e))
: $((_$((_k + 39)) = 0x92722c85))
: $((_$((_k + 40)) = 0xa2bfe8a1))
: $((_$((_k + 41)) = 0xa81a664b))
: $((_$((_k + 42)) = 0xc24b8b70))
: $((_$((_k + 43)) = 0xc76c51a3))
: $((_$((_k + 44)) = 0xd192e819))
: $((_$((_k + 45)) = 0xd6990624))
: $((_$((_k + 46)) = 0xf40e3585))
: $((_$((_k + 47)) = 0x106aa070))
: $((_$((_k + 48)) = 0x19a4c116))
: $((_$((_k + 49)) = 0x1e376c08))
: $((_$((_k + 50)) = 0x2748774c))
: $((_$((_k + 51)) = 0x34b0bcb5))
: $((_$((_k + 52)) = 0x391c0cb3))
: $((_$((_k + 53)) = 0x4ed8aa4a))
: $((_$((_k + 54)) = 0x5b9cca4f))
: $((_$((_k + 55)) = 0x682e6ff3))
: $((_$((_k + 56)) = 0x748f82ee))
: $((_$((_k + 57)) = 0x78a5636f))
: $((_$((_k + 58)) = 0x84c87814))
: $((_$((_k + 59)) = 0x8cc70208))
: $((_$((_k + 60)) = 0x90befffa))
: $((_$((_k + 61)) = 0xa4506ceb))
: $((_$((_k + 62)) = 0xbef9a3f7))
: $((_$((_k + 63)) = 0xc67178f2))
}

defarr _w 64
Expand All @@ -86,33 +86,33 @@ defarr _hash 8
defarr _temp 8
_sha256_init() {
_nbits=0
: $((_$((_hash + 0)) = 1779033703))
: $((_$((_hash + 1)) = -1150833019))
: $((_$((_hash + 2)) = 1013904242))
: $((_$((_hash + 3)) = -1521486534))
: $((_$((_hash + 4)) = 1359893119))
: $((_$((_hash + 5)) = -1694144372))
: $((_$((_hash + 6)) = 528734635))
: $((_$((_hash + 7)) = 1541459225))
: $((_$((_hash + 0)) = 0x6a09e667))
: $((_$((_hash + 1)) = 0xbb67ae85))
: $((_$((_hash + 2)) = 0x3c6ef372))
: $((_$((_hash + 3)) = 0xa54ff53a))
: $((_$((_hash + 4)) = 0x510e527f))
: $((_$((_hash + 5)) = 0x9b05688c))
: $((_$((_hash + 6)) = 0x1f83d9ab))
: $((_$((_hash + 7)) = 0x5be0cd19))
}

: $((t2 = ma = t1 = ch = i = s1 = s0 = b3 = b2 = b1 = b0 = bytes = 0))
_sha256_add_block() { let bytes $2
let b0; let b1; let b2; let b3; let s0; let s1; let i; let ch; let t1; let ma; let t2
i=0
while [ $i -lt 16 ]; do
b0=$((255 & _$((bytes + (i * 4)))))
b1=$((255 & _$((bytes + (i * 4) + 1))))
b2=$((255 & _$((bytes + (i * 4) + 2))))
b3=$((255 & _$((bytes + (i * 4) + 3))))
b0=$((0xff & _$((bytes + (i * 4)))))
b1=$((0xff & _$((bytes + (i * 4) + 1))))
b2=$((0xff & _$((bytes + (i * 4) + 2))))
b3=$((0xff & _$((bytes + (i * 4) + 3))))
: $((_$((_w + i)) = (b0 << 24) | (b1 << 16) | (b2 << 8) | b3))
: $((i += 1))
done
i=16
while [ $i -lt 64 ]; do
s0=$(((((_$((_w + (i - 15))) >> 7) & (2147483647 >> (7 - 1))) | ((_$((_w + (i - 15))) << (32 - 7)) & -1)) ^ (((_$((_w + (i - 15))) >> 18) & (2147483647 >> (18 - 1))) | ((_$((_w + (i - 15))) << (32 - 18)) & -1)) ^ ((_$((_w + (i - 15))) >> 3) & 536870911)))
s1=$(((((_$((_w + (i - 2))) >> 17) & (2147483647 >> (17 - 1))) | ((_$((_w + (i - 2))) << (32 - 17)) & -1)) ^ (((_$((_w + (i - 2))) >> 19) & (2147483647 >> (19 - 1))) | ((_$((_w + (i - 2))) << (32 - 19)) & -1)) ^ ((_$((_w + (i - 2))) >> 10) & 4194303)))
: $((_$((_w + i)) = (_$((_w + (i - 16))) + s0 + _$((_w + (i - 7))) + s1) & -1))
s0=$(((((_$((_w + (i - 15))) >> 7) & (0x7fffffff >> (7 - 1))) | ((_$((_w + (i - 15))) << (32 - 7)) & 0xffffffff)) ^ (((_$((_w + (i - 15))) >> 18) & (0x7fffffff >> (18 - 1))) | ((_$((_w + (i - 15))) << (32 - 18)) & 0xffffffff)) ^ ((_$((_w + (i - 15))) >> 3) & 0x1fffffff)))
s1=$(((((_$((_w + (i - 2))) >> 17) & (0x7fffffff >> (17 - 1))) | ((_$((_w + (i - 2))) << (32 - 17)) & 0xffffffff)) ^ (((_$((_w + (i - 2))) >> 19) & (0x7fffffff >> (19 - 1))) | ((_$((_w + (i - 2))) << (32 - 19)) & 0xffffffff)) ^ ((_$((_w + (i - 2))) >> 10) & 0x3fffff)))
: $((_$((_w + i)) = (_$((_w + (i - 16))) + s0 + _$((_w + (i - 7))) + s1) & 0xffffffff))
: $((i += 1))
done
i=0
Expand All @@ -122,25 +122,25 @@ _sha256_add_block() { let bytes $2
done
i=0
while [ $i -lt 64 ]; do
s1=$(((((_$((_temp + 4)) >> 6) & (2147483647 >> (6 - 1))) | ((_$((_temp + 4)) << (32 - 6)) & -1)) ^ (((_$((_temp + 4)) >> 11) & (2147483647 >> (11 - 1))) | ((_$((_temp + 4)) << (32 - 11)) & -1)) ^ (((_$((_temp + 4)) >> 25) & (2147483647 >> (25 - 1))) | ((_$((_temp + 4)) << (32 - 25)) & -1))))
s1=$(((((_$((_temp + 4)) >> 6) & (0x7fffffff >> (6 - 1))) | ((_$((_temp + 4)) << (32 - 6)) & 0xffffffff)) ^ (((_$((_temp + 4)) >> 11) & (0x7fffffff >> (11 - 1))) | ((_$((_temp + 4)) << (32 - 11)) & 0xffffffff)) ^ (((_$((_temp + 4)) >> 25) & (0x7fffffff >> (25 - 1))) | ((_$((_temp + 4)) << (32 - 25)) & 0xffffffff))))
ch=$(((_$((_temp + 4)) & _$((_temp + 5))) ^ (~(_$((_temp + 4))) & _$((_temp + 6)))))
t1=$(((_$((_temp + 7)) + s1 + ch + _$((_k + i)) + _$((_w + i))) & -1))
s0=$(((((_$((_temp + 0)) >> 2) & (2147483647 >> (2 - 1))) | ((_$((_temp + 0)) << (32 - 2)) & -1)) ^ (((_$((_temp + 0)) >> 13) & (2147483647 >> (13 - 1))) | ((_$((_temp + 0)) << (32 - 13)) & -1)) ^ (((_$((_temp + 0)) >> 22) & (2147483647 >> (22 - 1))) | ((_$((_temp + 0)) << (32 - 22)) & -1))))
t1=$(((_$((_temp + 7)) + s1 + ch + _$((_k + i)) + _$((_w + i))) & 0xffffffff))
s0=$(((((_$((_temp + 0)) >> 2) & (0x7fffffff >> (2 - 1))) | ((_$((_temp + 0)) << (32 - 2)) & 0xffffffff)) ^ (((_$((_temp + 0)) >> 13) & (0x7fffffff >> (13 - 1))) | ((_$((_temp + 0)) << (32 - 13)) & 0xffffffff)) ^ (((_$((_temp + 0)) >> 22) & (0x7fffffff >> (22 - 1))) | ((_$((_temp + 0)) << (32 - 22)) & 0xffffffff))))
ma=$(((_$((_temp + 0)) & _$((_temp + 1))) ^ (_$((_temp + 0)) & _$((_temp + 2))) ^ (_$((_temp + 1)) & _$((_temp + 2)))))
t2=$(((s0 + ma) & -1))
t2=$(((s0 + ma) & 0xffffffff))
: $((_$((_temp + 7)) = _$((_temp + 6))))
: $((_$((_temp + 6)) = _$((_temp + 5))))
: $((_$((_temp + 5)) = _$((_temp + 4))))
: $((_$((_temp + 4)) = (_$((_temp + 3)) + t1) & -1))
: $((_$((_temp + 4)) = (_$((_temp + 3)) + t1) & 0xffffffff))
: $((_$((_temp + 3)) = _$((_temp + 2))))
: $((_$((_temp + 2)) = _$((_temp + 1))))
: $((_$((_temp + 1)) = _$((_temp + 0))))
: $((_$((_temp + 0)) = (t1 + t2) & -1))
: $((_$((_temp + 0)) = (t1 + t2) & 0xffffffff))
: $((i += 1))
done
i=0
while [ $i -lt 8 ]; do
: $((_$((_hash + i)) = (_$((_hash + i)) + _$((_temp + i))) & -1))
: $((_$((_hash + i)) = (_$((_hash + i)) + _$((_temp + i))) & 0xffffffff))
: $((i += 1))
done
endlet $1 t2 ma t1 ch i s1 s0 b3 b2 b1 b0 bytes
Expand All @@ -152,8 +152,8 @@ _hex() { let byte $2
let digits
defstr __str_0 "0123456789abcdef"
digits=$__str_0
printf \\$(((_$((digits + (15 & (byte >> 4)))))/64))$(((_$((digits + (15 & (byte >> 4)))))/8%8))$(((_$((digits + (15 & (byte >> 4)))))%8))
printf \\$(((_$((digits + (15 & byte))))/64))$(((_$((digits + (15 & byte))))/8%8))$(((_$((digits + (15 & byte))))%8))
printf \\$(((_$((digits + (0xf & (byte >> 4)))))/64))$(((_$((digits + (0xf & (byte >> 4)))))/8%8))$(((_$((digits + (0xf & (byte >> 4)))))%8))
printf \\$(((_$((digits + (0xf & byte))))/64))$(((_$((digits + (0xf & byte))))/8%8))$(((_$((digits + (0xf & byte))))%8))
endlet $1 digits byte
}
Expand All @@ -173,7 +173,7 @@ _process_file() { let filename $2
fi
: $((_nbits += (8 * n)))
if [ $n -lt 64 ] ; then
: $((_$((_buf + n)) = 128))
: $((_$((_buf + n)) = 0x80))
i=$((n + 1))
while [ $i -lt 64 ]; do
: $((_$((_buf + i)) = 0))
Expand All @@ -189,7 +189,7 @@ _process_file() { let filename $2
fi
i=1
while [ $i -le 8 ]; do
: $((_$((_buf + 64 - i)) = 255 & _nbits))
: $((_$((_buf + 64 - i)) = 0xff & _nbits))
: $((_nbits >>= 8))
: $((i += 1))
done
Expand Down

0 comments on commit ac41180

Please sign in to comment.