Shell Programming and Scripting

$ bc <<EOF
> ibase=16
> obase=2
> FFFF
> EOF
1111111111111111

$ cat hex2bin.awk

BEGIN {
FS=""
a["f"]="1111"
a["e"]="1110"
a["d"]="1101"
a["c"]="1100"
a["b"]="1011"
a["a"]="1010"
a["9"]="1001"
a["8"]="1000"
a["7"]="0111"
a["6"]="0110"
a["5"]="0101"
a["4"]="0100"
a["3"]="0011"
a["2"]="0010"
a["1"]="0001"
a["0"]="0000"
}
{
for (i=1;i<=NF;i++) printf a[tolower($i)]" "
print ""
}

$ set -- $(echo 40e3 |awk -f hex2bin.awk)

$ echo $1
0100

$ echo $2
0000

$ echo $3
1110

$ echo $4
0011

$ cat bits.awk
#!/bin/bash
echo $((16#$1)) | gawk ' {
for(i=lshift(1,31);i;i=rshift(i,1))
printf "%d%s", (and($1,i) > 0), ++c%4==0?" ":"";
printf"\n"; }'
 
$ ./bits.awk AFC92317
1010 1111 1100 1001 0010 0011 0001 0111
 
$ set -- $(./bits.awk AFC92317)
 
$ echo $4
1001

#!/bin/ksh93

integer -i2 mask=16#F0000000
integer -i2 v0 v1 v2 v3 v4 v5 v6 v7

read hn?"Enter a 32-bit hex decimal number: "
integer -i2 in=16#$hn

for ((i=0; i < 8; i++))
do
   nameref var=v${i}
   var=$(( ((in << (i*4)) & mask) >> 28 ))
done

printf "%032.0.2d\n" $in
printf "%04.0.2d %04.0.2d %04.0.2d %04.0.2d %04.0.2d %04.0.2d %04.0.2d %04.0.2d\n" \
   $v0 $v1 $v2 $v3 $v4 $v5 $v6 $v7

Enter a 32-bit hex decimal number: AFC92317
10101111110010010010001100010111
1010 1111 1100 1001 0010 0011 0001 0111

$ cat bits.awk
#!/bin/ksh
echo $1 | gawk --non-decimal-data ' {
for(i=lshift(1,31);i;i=rshift(i,1))
printf "%d%s", (and(("0x"$1)+0,i) > 0), ++c%4==0?" ":"";
printf"\n"; }'
 
$ ./bits.awk BADBEEF
0000 1011 1010 1101 1011 1110 1110 1111
 
$ set -- $(./bits.awk BADBEEF)
 
$ echo $4
1101

echo "ibase=16 ; obase=2 ; $1" | bc | awk '{
          A=substr("00000000000000000000000000000000",1,32-length($0))$0;
          for(i=1;i<=32;i++)
               printf "%s%s", substr(A,i,1), i%4?"":" ";
           printf "\n"}'

echo "ibase=16 ; obase=2 ; $1" | bc | awk '{
     print substr("00000000000000000000000000000000",1,32-length($0))$0; }' | sed 's/..../& /g'