aboutsummaryrefslogtreecommitdiff
path: root/coreutils-5.3.0-bin/share/awk/bits2str.awk
diff options
context:
space:
mode:
Diffstat (limited to 'coreutils-5.3.0-bin/share/awk/bits2str.awk')
-rw-r--r--coreutils-5.3.0-bin/share/awk/bits2str.awk16
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
+}