update readme
[baseconv.git] / todec
1 #!/bin/sh
2
3 conv() {
4 while [ $# -gt 0 ]; do
5 if printf "%s" "$1" | grep -qE '^0b[0-1]+$'; then
6 if [ "$m" -eq 0 ]; then
7 printf "Binary %s → Decimal: " "$1"
8 fi
9 t=$(printf "%s" "$1" | sed 's/^0b//')
10 printf "ibase=2; %s / %s" "$t" "$k" | bc | tr -d '\n' && printf "%s\n" "$p"
11
12 elif printf "%s" "$1" | grep -qE '^([0-9A-Fa-f]+|0x[0-9A-Fa-f]+)$'; then
13 if [ "$m" -eq 0 ]; then
14 printf "Hex %s → Decimal: " "$1"
15 fi
16 t=$(printf "%s" "$1" | sed 's/^0x//')
17 printf "ibase=16; %s / %X" "$(printf "%s" "$t" | sed 'y/abcdef/ABCDEF/')" "0b$k" | bc | tr -d '\n' && printf "%s\n" "$p"
18
19 else
20 printf "Error: '%s' is not a valid decimal or hexadecimal number\n" "$1" >&2
21 stat=1
22
23 fi
24 shift
25 done
26 return "$stat"
27 }
28
29
30 main() {
31 USAGE="usage: ${0} [-mnKMG] ..."
32 if ! [ "$1" = "x" ] && ! [ -t 0 ]; then
33 cat | tr '\n' ' ' | xargs todec "x" "$@"
34 return "$?"
35
36 elif [ "$1" = "x" ]; then
37 shift
38
39 fi
40
41 if [ $# -eq 0 ]; then
42 printf "Error: No arguments provided\n%s\n" "$USAGE" >&2
43 return 2
44
45 fi
46
47 stat=0
48 k=1; m=0; n=0; p='';
49 while getopts "mnKMG" flag; do
50 case "$flag" in
51 m) m=1; ;;
52 n) n=1; ;;
53 # 1024
54 K) k=10000000000; p='K'; ;;
55 # 1 048 576
56 M) k=100000000000000000000; p='M'; ;;
57 # 1 073 741 824
58 G) k=1000000000000000000000000000000; p='G'; ;;
59 *) printf "%s\n" "$USAGE" >&2 ; return 2 ;;
60 esac
61 done
62
63 shift $(( OPTIND - 1 ))
64
65 t=$(conv "$@")
66 stat=$?
67
68 if [ "$n" -eq 1 ] && [ "$m" -eq 1 ]; then
69 t=$(printf "%s" "$t" | tr '\n' ' ')
70
71 elif [ "$n" -eq 1 ] && [ "$m" -eq 0 ]; then
72 t=$(printf "%s" "$t" | tr '\n' ';')
73
74 else
75 t=$(printf "%s" "$t")
76
77 fi
78
79 printf "%s\n" "$t"
80 return "$stat"
81 }
82
83 main "$@"