sjekkrand

   1 #!/usr/bin/env bash
   2
   3 #=======================================================================
   4 # sjekkrand
   5 # File ID: e1ba85be-f743-11dd-85c0-000475e441b9
   6 #
   7 # Visualise binary data to see if it looks random.
   8 #
   9 # Author: Øyvind A. Holm <sunny@sunbase.org>
  10 # License: GNU General Public License version 2 or later.
  11 #=======================================================================
  12
  13 progname=sjekkrand
  14 VERSION=0.1.0
  15
  16 ARGS="$(getopt -o "\
  17 h\
  18 q\
  19 v\
  20 " -l "\
  21 help,\
  22 quiet,\
  23 verbose,\
  24 version,\
  25 " -n "$progname" -- "$@")"
  26 test "$?" = "0" || exit 1
  27 eval set -- "$ARGS"
  28
  29 opt_help=0
  30 opt_quiet=0
  31 opt_verbose=0
  32 while :; do
  33     case "$1" in
  34         -h|--help) opt_help=1; shift ;;
  35         -q|--quiet) opt_quiet=$(($opt_quiet + 1)); shift ;;
  36         -v|--verbose) opt_verbose=$(($opt_verbose + 1)); shift ;;
  37         --version) echo $progname $VERSION; exit 0 ;;
  38         --) shift; break ;;
  39         *) echo $progname: Internal error >&2; exit 1 ;;
  40     esac
  41 done
  42 opt_verbose=$(($opt_verbose - $opt_quiet))
  43
  44 if test "$opt_help" = "1"; then
  45     test $opt_verbose -gt 0 && { echo; echo $progname $VERSION; }
  46     cat <<END
  47
  48 Visualise binary data to see if it looks random.
  49
  50 Usage: $progname [options] [FILE [FILES [...]]]
  51
  52 Options:
  53
  54   -h, --help
  55     Show this help.
  56   -q, --quiet
  57     Be more quiet. Can be repeated to increase silence.
  58   -v, --verbose
  59     Increase level of verbosity. Can be repeated.
  60   --version
  61     Print version information.
  62
  63 END
  64     exit 0
  65 fi
  66
  67 cat "$@" | od -tu1 -An -v | lag3d >/tmp/sjekkrand.tmp