diff options
Diffstat (limited to 'coreutils-5.3.0-bin/share/awk/bits2str.awk')
-rw-r--r-- | coreutils-5.3.0-bin/share/awk/bits2str.awk | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/coreutils-5.3.0-bin/share/awk/bits2str.awk b/coreutils-5.3.0-bin/share/awk/bits2str.awk new file mode 100644 index 0000000..9725ee8 --- /dev/null +++ b/coreutils-5.3.0-bin/share/awk/bits2str.awk @@ -0,0 +1,16 @@ +# bits2str --- turn a byte into readable 1's and 0's + +function bits2str(bits, data, mask) +{ + if (bits == 0) + return "0" + + mask = 1 + for (; bits != 0; bits = rshift(bits, 1)) + data = (and(bits, mask) ? "1" : "0") data + + while ((length(data) % 8) != 0) + data = "0" data + + return data +} |