Consistent overhead byte stuffing: Difference between revisions

Line 124:

(assert (= (COBS a) b)))

</syntaxhighlight>

=={{header|Phix}}==

with javascript_semantics

function cobs_encode(sequence data)

sequence buffer = {-1}

integer cdx = 1, code = 1, addlast = true

for b in data do

if b then

buffer &= b

code += 1

end if

addlast = true

if b=0 or code=0xFF then

addlast = code!=0xFF

buffer[cdx] = code

code = 1

buffer &= -1

cdx = length(buffer)

end if

end for

buffer[cdx] = iff(addlast?code:0)

if addlast then

buffer &= 0

end if

return buffer

end function

function cobs_decode(sequence buffer)

sequence data = {}

integer bdx = 1, l = length(buffer)

while bdx<l do

integer code = buffer[bdx]

bdx += 1

for i=1 to code-1 do

data &= buffer[bdx]

bdx += 1

end for

if code<0xFF and bdx<l then

data &= 0

end if

end while

return data

end function

constant tests = {{{0x00}, {0x01, 0x01, 0x00}},

{{0x00, 0x00}, {0x01, 0x01, 0x01, 0x00}},

{{0x00, 0x11, 0x00}, {0x01, 0x02, 0x11, 0x01, 0x00}},

{{0x11, 0x22, 0x00, 0x33}, {0x03, 0x11, 0x22, 0x02, 0x33, 0x00}},

{{0x11, 0x22, 0x33, 0x44}, {0x05, 0x11, 0x22, 0x33, 0x44, 0x00}},

{{0x11, 0x00, 0x00, 0x00}, {0x02, 0x11, 0x01, 0x01, 0x01, 0x00}},

{tagset(0xFE,0x01), flatten({0xFF, tagset(0xFE,0x01), 0x00})},

{tagset(0xFE,0x00), flatten({0x01, 0xFF, tagset(0xFE,0x01), 0x00})},

{tagset(0xFF,0x01), flatten({0xFF, tagset(0xFE,0x01), 0x02, 0xFF, 0x00})},

{tagset(0xFF,0x02) & {0x00}, flatten({0xFF, tagset(0xFF,0x02), 0x01, 0x01, 0x00})},

{tagset(0xFF,0x03) & {0x00, 0x01}, flatten({0xFE, tagset(0xFF,0x03), 0x02, 0x01, 0x00})}}

for t in tests do

sequence {orig,expected} = t,

actual = cobs_encode(orig),

decoded = cobs_decode(actual)

string ostr = iff(length(orig)<5?join(orig," ",fmt:="%02x")

:join(orig[1..3],fmt:="%02x")&" ... "&join(orig[253..$],fmt:="%02x")),

astr = iff(length(actual)<7?join(actual,fmt:="%02x")

:join(actual[1..4],fmt:="%02x")&" ... "&join(actual[254..$],fmt:="%02x")),

eOK = iff(actual==expected?"OK":"***???***"),

dOK = iff(decoded==orig?"OK":"***???***")

printf(1,"%-23s -> %-33s encode:%s, decode: %s\n",{ostr,astr,eOK,dOK})

end for

<pre>

00 -> 01 01 00 encode:OK, decode: OK

00 00 -> 01 01 01 00 encode:OK, decode: OK

00 11 00 -> 01 02 11 01 00 encode:OK, decode: OK

11 22 00 33 -> 03 11 22 02 33 00 encode:OK, decode: OK

11 22 33 44 -> 05 11 22 33 44 00 encode:OK, decode: OK

11 00 00 00 -> 02 11 01 01 01 00 encode:OK, decode: OK

01 02 03 ... FD FE -> FF 01 02 03 ... FD FE 00 encode:OK, decode: OK

00 01 02 ... FC FD FE -> 01 FF 01 02 ... FC FD FE 00 encode:OK, decode: OK

01 02 03 ... FD FE FF -> FF 01 02 03 ... FD FE 02 FF 00 encode:OK, decode: OK

02 03 04 ... FE FF 00 -> FF 02 03 04 ... FE FF 01 01 00 encode:OK, decode: OK

03 04 05 ... FF 00 01 -> FE 03 04 05 ... FF 02 01 00 encode:OK, decode: OK

</pre>

=={{header|Wren}}==

@@ Line 124: / Line 124: @@
   (assert (= (COBS a) b)))
 </syntaxhighlight>
+=={{header|Phix}}==
+<!--<syntaxhighlight lang="phix">(phixonline)-->
+ <span style="color: #008080;">with</span> <span style="color: #008080;">javascript_semantics</span>
+ <span style="color: #008080;">function</span> <span style="color: #000000;">cobs_encode</span><span style="color: #0000FF;">(</span><span style="color: #004080;">sequence</span> <span style="color: #000000;">data</span><span style="color: #0000FF;">)</span>
+     <span style="color: #004080;">sequence</span> <span style="color: #000000;">buffer</span> <span style="color: #0000FF;">=</span> <span style="color: #0000FF;">{-</span><span style="color: #000000;">1</span><span style="color: #0000FF;">}</span>
+     <span style="color: #004080;">integer</span> <span style="color: #000000;">cdx</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">1</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">code</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">1</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">addlast</span> <span style="color: #0000FF;">=</span> <span style="color: #004600;">true</span>
+     <span style="color: #008080;">for</span> <span style="color: #000000;">b</span> <span style="color: #008080;">in</span> <span style="color: #000000;">data</span> <span style="color: #008080;">do</span>
+         <span style="color: #008080;">if</span> <span style="color: #000000;">b</span> <span style="color: #008080;">then</span>
+             <span style="color: #000000;">buffer</span> <span style="color: #0000FF;">&=</span> <span style="color: #000000;">b</span>
+             <span style="color: #000000;">code</span> <span style="color: #0000FF;">+=</span> <span style="color: #000000;">1</span>
+         <span style="color: #008080;">end</span> <span style="color: #008080;">if</span>
+         <span style="color: #000000;">addlast</span> <span style="color: #0000FF;">=</span> <span style="color: #004600;">true</span>
+         <span style="color: #008080;">if</span> <span style="color: #000000;">b</span><span style="color: #0000FF;">=</span><span style="color: #000000;">0</span> <span style="color: #008080;">or</span> <span style="color: #000000;">code</span><span style="color: #0000FF;">=</span><span style="color: #000000;">0xFF</span> <span style="color: #008080;">then</span>
+             <span style="color: #000000;">addlast</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">code</span><span style="color: #0000FF;">!=</span><span style="color: #000000;">0xFF</span>
+             <span style="color: #000000;">buffer</span><span style="color: #0000FF;">[</span><span style="color: #000000;">cdx</span><span style="color: #0000FF;">]</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">code</span>
+             <span style="color: #000000;">code</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">1</span>
+             <span style="color: #000000;">buffer</span> <span style="color: #0000FF;">&=</span> <span style="color: #0000FF;">-</span><span style="color: #000000;">1</span>
+             <span style="color: #000000;">cdx</span> <span style="color: #0000FF;">=</span> <span style="color: #7060A8;">length</span><span style="color: #0000FF;">(</span><span style="color: #000000;">buffer</span><span style="color: #0000FF;">)</span>
+         <span style="color: #008080;">end</span> <span style="color: #008080;">if</span>
+     <span style="color: #008080;">end</span> <span style="color: #008080;">for</span>
+     <span style="color: #000000;">buffer</span><span style="color: #0000FF;">[</span><span style="color: #000000;">cdx</span><span style="color: #0000FF;">]</span> <span style="color: #0000FF;">=</span> <span style="color: #7060A8;">iff</span><span style="color: #0000FF;">(</span><span style="color: #000000;">addlast</span><span style="color: #0000FF;">?</span><span style="color: #000000;">code</span><span style="color: #0000FF;">:</span><span style="color: #000000;">0</span><span style="color: #0000FF;">)</span>
+     <span style="color: #008080;">if</span> <span style="color: #000000;">addlast</span> <span style="color: #008080;">then</span>
+         <span style="color: #000000;">buffer</span> <span style="color: #0000FF;">&=</span> <span style="color: #000000;">0</span>
+     <span style="color: #008080;">end</span> <span style="color: #008080;">if</span>
+     <span style="color: #008080;">return</span> <span style="color: #000000;">buffer</span>
+ <span style="color: #008080;">end</span> <span style="color: #008080;">function</span>
+ <span style="color: #008080;">function</span> <span style="color: #000000;">cobs_decode</span><span style="color: #0000FF;">(</span><span style="color: #004080;">sequence</span> <span style="color: #000000;">buffer</span><span style="color: #0000FF;">)</span>
+     <span style="color: #004080;">sequence</span> <span style="color: #000000;">data</span> <span style="color: #0000FF;">=</span> <span style="color: #0000FF;">{}</span>
+     <span style="color: #004080;">integer</span> <span style="color: #000000;">bdx</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">1</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">l</span> <span style="color: #0000FF;">=</span> <span style="color: #7060A8;">length</span><span style="color: #0000FF;">(</span><span style="color: #000000;">buffer</span><span style="color: #0000FF;">)</span>
+     <span style="color: #008080;">while</span> <span style="color: #000000;">bdx</span><span style="color: #0000FF;"><</span><span style="color: #000000;">l</span> <span style="color: #008080;">do</span>
+         <span style="color: #004080;">integer</span> <span style="color: #000000;">code</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">buffer</span><span style="color: #0000FF;">[</span><span style="color: #000000;">bdx</span><span style="color: #0000FF;">]</span>
+         <span style="color: #000000;">bdx</span> <span style="color: #0000FF;">+=</span> <span style="color: #000000;">1</span>
+         <span style="color: #008080;">for</span> <span style="color: #000000;">i</span><span style="color: #0000FF;">=</span><span style="color: #000000;">1</span> <span style="color: #008080;">to</span> <span style="color: #000000;">code</span><span style="color: #0000FF;">-</span><span style="color: #000000;">1</span> <span style="color: #008080;">do</span>
+             <span style="color: #000000;">data</span> <span style="color: #0000FF;">&=</span> <span style="color: #000000;">buffer</span><span style="color: #0000FF;">[</span><span style="color: #000000;">bdx</span><span style="color: #0000FF;">]</span>
+             <span style="color: #000000;">bdx</span> <span style="color: #0000FF;">+=</span> <span style="color: #000000;">1</span>
+         <span style="color: #008080;">end</span> <span style="color: #008080;">for</span>
+         <span style="color: #008080;">if</span> <span style="color: #000000;">code</span><span style="color: #0000FF;"><</span><span style="color: #000000;">0xFF</span> <span style="color: #008080;">and</span> <span style="color: #000000;">bdx</span><span style="color: #0000FF;"><</span><span style="color: #000000;">l</span> <span style="color: #008080;">then</span>
+             <span style="color: #000000;">data</span> <span style="color: #0000FF;">&=</span> <span style="color: #000000;">0</span>
+         <span style="color: #008080;">end</span> <span style="color: #008080;">if</span>
+     <span style="color: #008080;">end</span> <span style="color: #008080;">while</span>
+     <span style="color: #008080;">return</span> <span style="color: #000000;">data</span>
+ <span style="color: #008080;">end</span> <span style="color: #008080;">function</span>
+ <span style="color: #008080;">constant</span> <span style="color: #000000;">tests</span> <span style="color: #0000FF;">=</span> <span style="color: #0000FF;">{{{</span><span style="color: #000000;">0x00</span><span style="color: #0000FF;">},</span> <span style="color: #0000FF;">{</span><span style="color: #000000;">0x01</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x01</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x00</span><span style="color: #0000FF;">}},</span>
+                   <span style="color: #0000FF;">{{</span><span style="color: #000000;">0x00</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x00</span><span style="color: #0000FF;">},</span> <span style="color: #0000FF;">{</span><span style="color: #000000;">0x01</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x01</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x01</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x00</span><span style="color: #0000FF;">}},</span>
+                   <span style="color: #0000FF;">{{</span><span style="color: #000000;">0x00</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x11</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x00</span><span style="color: #0000FF;">},</span> <span style="color: #0000FF;">{</span><span style="color: #000000;">0x01</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x02</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x11</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x01</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x00</span><span style="color: #0000FF;">}},</span>
+                   <span style="color: #0000FF;">{{</span><span style="color: #000000;">0x11</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x22</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x00</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x33</span><span style="color: #0000FF;">},</span> <span style="color: #0000FF;">{</span><span style="color: #000000;">0x03</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x11</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x22</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x02</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x33</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x00</span><span style="color: #0000FF;">}},</span>
+                   <span style="color: #0000FF;">{{</span><span style="color: #000000;">0x11</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x22</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x33</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x44</span><span style="color: #0000FF;">},</span> <span style="color: #0000FF;">{</span><span style="color: #000000;">0x05</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x11</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x22</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x33</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x44</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x00</span><span style="color: #0000FF;">}},</span>
+                   <span style="color: #0000FF;">{{</span><span style="color: #000000;">0x11</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x00</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x00</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x00</span><span style="color: #0000FF;">},</span> <span style="color: #0000FF;">{</span><span style="color: #000000;">0x02</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x11</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x01</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x01</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x01</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x00</span><span style="color: #0000FF;">}},</span>
+                   <span style="color: #0000FF;">{</span><span style="color: #7060A8;">tagset</span><span style="color: #0000FF;">(</span><span style="color: #000000;">0xFE</span><span style="color: #0000FF;">,</span><span style="color: #000000;">0x01</span><span style="color: #0000FF;">),</span> <span style="color: #7060A8;">flatten</span><span style="color: #0000FF;">({</span><span style="color: #000000;">0xFF</span><span style="color: #0000FF;">,</span> <span style="color: #7060A8;">tagset</span><span style="color: #0000FF;">(</span><span style="color: #000000;">0xFE</span><span style="color: #0000FF;">,</span><span style="color: #000000;">0x01</span><span style="color: #0000FF;">),</span> <span style="color: #000000;">0x00</span><span style="color: #0000FF;">})},</span>
+                   <span style="color: #0000FF;">{</span><span style="color: #7060A8;">tagset</span><span style="color: #0000FF;">(</span><span style="color: #000000;">0xFE</span><span style="color: #0000FF;">,</span><span style="color: #000000;">0x00</span><span style="color: #0000FF;">),</span> <span style="color: #7060A8;">flatten</span><span style="color: #0000FF;">({</span><span style="color: #000000;">0x01</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0xFF</span><span style="color: #0000FF;">,</span> <span style="color: #7060A8;">tagset</span><span style="color: #0000FF;">(</span><span style="color: #000000;">0xFE</span><span style="color: #0000FF;">,</span><span style="color: #000000;">0x01</span><span style="color: #0000FF;">),</span> <span style="color: #000000;">0x00</span><span style="color: #0000FF;">})},</span>
+                   <span style="color: #0000FF;">{</span><span style="color: #7060A8;">tagset</span><span style="color: #0000FF;">(</span><span style="color: #000000;">0xFF</span><span style="color: #0000FF;">,</span><span style="color: #000000;">0x01</span><span style="color: #0000FF;">),</span> <span style="color: #7060A8;">flatten</span><span style="color: #0000FF;">({</span><span style="color: #000000;">0xFF</span><span style="color: #0000FF;">,</span> <span style="color: #7060A8;">tagset</span><span style="color: #0000FF;">(</span><span style="color: #000000;">0xFE</span><span style="color: #0000FF;">,</span><span style="color: #000000;">0x01</span><span style="color: #0000FF;">),</span> <span style="color: #000000;">0x02</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0xFF</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x00</span><span style="color: #0000FF;">})},</span>
+                   <span style="color: #0000FF;">{</span><span style="color: #7060A8;">tagset</span><span style="color: #0000FF;">(</span><span style="color: #000000;">0xFF</span><span style="color: #0000FF;">,</span><span style="color: #000000;">0x02</span><span style="color: #0000FF;">)</span> <span style="color: #0000FF;">&</span> <span style="color: #0000FF;">{</span><span style="color: #000000;">0x00</span><span style="color: #0000FF;">},</span> <span style="color: #7060A8;">flatten</span><span style="color: #0000FF;">({</span><span style="color: #000000;">0xFF</span><span style="color: #0000FF;">,</span> <span style="color: #7060A8;">tagset</span><span style="color: #0000FF;">(</span><span style="color: #000000;">0xFF</span><span style="color: #0000FF;">,</span><span style="color: #000000;">0x02</span><span style="color: #0000FF;">),</span> <span style="color: #000000;">0x01</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x01</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x00</span><span style="color: #0000FF;">})},</span>
+                   <span style="color: #0000FF;">{</span><span style="color: #7060A8;">tagset</span><span style="color: #0000FF;">(</span><span style="color: #000000;">0xFF</span><span style="color: #0000FF;">,</span><span style="color: #000000;">0x03</span><span style="color: #0000FF;">)</span> <span style="color: #0000FF;">&</span> <span style="color: #0000FF;">{</span><span style="color: #000000;">0x00</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x01</span><span style="color: #0000FF;">},</span> <span style="color: #7060A8;">flatten</span><span style="color: #0000FF;">({</span><span style="color: #000000;">0xFE</span><span style="color: #0000FF;">,</span> <span style="color: #7060A8;">tagset</span><span style="color: #0000FF;">(</span><span style="color: #000000;">0xFF</span><span style="color: #0000FF;">,</span><span style="color: #000000;">0x03</span><span style="color: #0000FF;">),</span> <span style="color: #000000;">0x02</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x01</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">0x00</span><span style="color: #0000FF;">})}}</span>
+ <span style="color: #008080;">for</span> <span style="color: #000000;">t</span> <span style="color: #008080;">in</span> <span style="color: #000000;">tests</span> <span style="color: #008080;">do</span>
+     <span style="color: #004080;">sequence</span> <span style="color: #0000FF;">{</span><span style="color: #000000;">orig</span><span style="color: #0000FF;">,</span><span style="color: #000000;">expected</span><span style="color: #0000FF;">}</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">t</span><span style="color: #0000FF;">,</span>
+              <span style="color: #000000;">actual</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">cobs_encode</span><span style="color: #0000FF;">(</span><span style="color: #000000;">orig</span><span style="color: #0000FF;">),</span>
+              <span style="color: #000000;">decoded</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">cobs_decode</span><span style="color: #0000FF;">(</span><span style="color: #000000;">actual</span><span style="color: #0000FF;">)</span>
+     <span style="color: #004080;">string</span> <span style="color: #000000;">ostr</span> <span style="color: #0000FF;">=</span> <span style="color: #7060A8;">iff</span><span style="color: #0000FF;">(</span><span style="color: #7060A8;">length</span><span style="color: #0000FF;">(</span><span style="color: #000000;">orig</span><span style="color: #0000FF;">)<</span><span style="color: #000000;">5</span><span style="color: #0000FF;">?</span><span style="color: #7060A8;">join</span><span style="color: #0000FF;">(</span><span style="color: #000000;">orig</span><span style="color: #0000FF;">,</span><span style="color: #008000;">" "</span><span style="color: #0000FF;">,</span><span style="color: #000000;">fmt</span><span style="color: #0000FF;">:=</span><span style="color: #008000;">"%02x"</span><span style="color: #0000FF;">)</span>
+                   <span style="color: #0000FF;">:</span><span style="color: #7060A8;">join</span><span style="color: #0000FF;">(</span><span style="color: #000000;">orig</span><span style="color: #0000FF;">[</span><span style="color: #000000;">1</span><span style="color: #0000FF;">..</span><span style="color: #000000;">3</span><span style="color: #0000FF;">],</span><span style="color: #000000;">fmt</span><span style="color: #0000FF;">:=</span><span style="color: #008000;">"%02x"</span><span style="color: #0000FF;">)&</span><span style="color: #008000;">" ... "</span><span style="color: #0000FF;">&</span><span style="color: #7060A8;">join</span><span style="color: #0000FF;">(</span><span style="color: #000000;">orig</span><span style="color: #0000FF;">[</span><span style="color: #000000;">253</span><span style="color: #0000FF;">..$],</span><span style="color: #000000;">fmt</span><span style="color: #0000FF;">:=</span><span style="color: #008000;">"%02x"</span><span style="color: #0000FF;">)),</span>
+            <span style="color: #000000;">astr</span> <span style="color: #0000FF;">=</span> <span style="color: #7060A8;">iff</span><span style="color: #0000FF;">(</span><span style="color: #7060A8;">length</span><span style="color: #0000FF;">(</span><span style="color: #000000;">actual</span><span style="color: #0000FF;">)<</span><span style="color: #000000;">7</span><span style="color: #0000FF;">?</span><span style="color: #7060A8;">join</span><span style="color: #0000FF;">(</span><span style="color: #000000;">actual</span><span style="color: #0000FF;">,</span><span style="color: #000000;">fmt</span><span style="color: #0000FF;">:=</span><span style="color: #008000;">"%02x"</span><span style="color: #0000FF;">)</span>
+                   <span style="color: #0000FF;">:</span><span style="color: #7060A8;">join</span><span style="color: #0000FF;">(</span><span style="color: #000000;">actual</span><span style="color: #0000FF;">[</span><span style="color: #000000;">1</span><span style="color: #0000FF;">..</span><span style="color: #000000;">4</span><span style="color: #0000FF;">],</span><span style="color: #000000;">fmt</span><span style="color: #0000FF;">:=</span><span style="color: #008000;">"%02x"</span><span style="color: #0000FF;">)&</span><span style="color: #008000;">" ... "</span><span style="color: #0000FF;">&</span><span style="color: #7060A8;">join</span><span style="color: #0000FF;">(</span><span style="color: #000000;">actual</span><span style="color: #0000FF;">[</span><span style="color: #000000;">254</span><span style="color: #0000FF;">..$],</span><span style="color: #000000;">fmt</span><span style="color: #0000FF;">:=</span><span style="color: #008000;">"%02x"</span><span style="color: #0000FF;">)),</span>
+            <span style="color: #000000;">eOK</span> <span style="color: #0000FF;">=</span> <span style="color: #7060A8;">iff</span><span style="color: #0000FF;">(</span><span style="color: #000000;">actual</span><span style="color: #0000FF;">==</span><span style="color: #000000;">expected</span><span style="color: #0000FF;">?</span><span style="color: #008000;">"OK"</span><span style="color: #0000FF;">:</span><span style="color: #008000;">"***???***"</span><span style="color: #0000FF;">),</span>
+            <span style="color: #000000;">dOK</span> <span style="color: #0000FF;">=</span> <span style="color: #7060A8;">iff</span><span style="color: #0000FF;">(</span><span style="color: #000000;">decoded</span><span style="color: #0000FF;">==</span><span style="color: #000000;">orig</span><span style="color: #0000FF;">?</span><span style="color: #008000;">"OK"</span><span style="color: #0000FF;">:</span><span style="color: #008000;">"***???***"</span><span style="color: #0000FF;">)</span>
+     <span style="color: #7060A8;">printf</span><span style="color: #0000FF;">(</span><span style="color: #000000;">1</span><span style="color: #0000FF;">,</span><span style="color: #008000;">"%-23s -&gt; %-33s encode:%s, decode: %s\n"</span><span style="color: #0000FF;">,{</span><span style="color: #000000;">ostr</span><span style="color: #0000FF;">,</span><span style="color: #000000;">astr</span><span style="color: #0000FF;">,</span><span style="color: #000000;">eOK</span><span style="color: #0000FF;">,</span><span style="color: #000000;">dOK</span><span style="color: #0000FF;">})</span>
+ <span style="color: #008080;">end</span> <span style="color: #008080;">for</span>
+<!--</syntaxhighlight>-->
+{{out}}
+<pre>
+-> 01 01 00                          encode:OK, decode: OK
+00                   -> 01 01 01 00                       encode:OK, decode: OK
+11 00                -> 01 02 11 01 00                    encode:OK, decode: OK
+22 00 33             -> 03 11 22 02 33 00                 encode:OK, decode: OK
+22 33 44             -> 05 11 22 33 44 00                 encode:OK, decode: OK
+00 00 00             -> 02 11 01 01 01 00                 encode:OK, decode: OK
+02 03 ... FD FE      -> FF 01 02 03 ... FD FE 00          encode:OK, decode: OK
+01 02 ... FC FD FE   -> 01 FF 01 02 ... FC FD FE 00       encode:OK, decode: OK
+02 03 ... FD FE FF   -> FF 01 02 03 ... FD FE 02 FF 00    encode:OK, decode: OK
+03 04 ... FE FF 00   -> FF 02 03 04 ... FE FF 01 01 00    encode:OK, decode: OK
+04 05 ... FF 00 01   -> FE 03 04 05 ... FF 02 01 00       encode:OK, decode: OK
+</pre>
 =={{header|Wren}}==