summaryrefslogtreecommitdiff
path: root/contrib/awk/awklib/eg/lib/bits2str.awk
diff options
context:
space:
mode:
authorDavid E. O'Brien <obrien@FreeBSD.org>2001-11-02 21:06:08 +0000
committerDavid E. O'Brien <obrien@FreeBSD.org>2001-11-02 21:06:08 +0000
commitce83bef85e2e23eb8d5b30b9f4987d323094c3f4 (patch)
treecd2c7fd87952f47d303b90e49b90c14bccf7e292 /contrib/awk/awklib/eg/lib/bits2str.awk
parent4192247c04a09b9f83953a0d00f7992e8afaf976 (diff)
Notes
Diffstat (limited to 'contrib/awk/awklib/eg/lib/bits2str.awk')
-rw-r--r--contrib/awk/awklib/eg/lib/bits2str.awk16
1 files changed, 16 insertions, 0 deletions
diff --git a/contrib/awk/awklib/eg/lib/bits2str.awk b/contrib/awk/awklib/eg/lib/bits2str.awk
new file mode 100644
index 000000000000..9725ee8fa7d0
--- /dev/null
+++ b/contrib/awk/awklib/eg/lib/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
+}