lib/common.sh

   1 # read_yn <prompt>
   2 read_yn() {
   3     local prompt="$1"
   4     while true; do
   5     read -e -n 1 -p "$prompt" reply
   6     case "$reply" in
   7         "" | "y" | "Y")
   8         return 0
   9         ;;
  10         "N" | "n")
  11         return 1
  12         ;;
  13     esac
  14     done
  15 }
  16
  17
  18 # diskusage <path>: prints size in MB
  19 diskusage() {
  20     local path="$1"
  21     read size dummy < <( du -sm "$path" )
  22     echo "$size"
  23 }
  24
  25
  26 # diskfree <minimum size in MB>
  27 diskfree() {
  28     local size="$1"
  29     echo -n "Checking free diskspace:"
  30     (( free = `stat -f -c '%a / 2048 * ( %s / 512 )' $tmp ` ))
  31
  32     if [ "$free" -ge "$size" ]; then
  33     echo " done."
  34     else
  35     cat >&2 << EOF
  36
  37
  38 WARNING: Possibly not enough free disk space in "$tmp".
  39
  40 You need at least $size MB, but only $free MB seems free. Note: You
  41 can specify an alternate directory by setting the environment variable
  42
  43 Press Ctrl+C to interrupt, or return to try to continue anyway.
  44
  45 TMPDIR.
  46
  47 EOF
  48     read
  49     fi
  50 }
  51
  52
  53 # extract_bin <file> <expected_min_size> <dest>
  54 extract_bin() {
  55     local file="$1"
  56     local expected_min_size="$2"
  57     local dest="$3"
  58     cat << EOF
  59
  60 In the next step, the binary file will be extracted. Probably a
  61 license agreement will be displayed. Please read this agreement
  62 carefully. If you do not agree to the displayed license terms, the
  63 package will not be built.
  64
  65 EOF
  66     read -e -p "Press [Return] to continue: " dummy
  67     echo
  68     local extract_dir="$tmp/extract"
  69     mkdir "$extract_dir"
  70     cd "$extract_dir"
  71     echo
  72
  73     local extract_cmd
  74     case "$archive_path" in
  75     *.tar)
  76         extract_cmd="tar xf";;
  77     *.tar.bz2)
  78         extract_cmd="tar --bzip2 -xf";;
  79     *.tgz|*.tar.gz)
  80         extract_cmd="tar xfz";;
  81     *.zip)
  82         extract_cmd="unzip -q";;
  83     *)
  84         extract_cmd=sh
  85     esac
  86
  87     if ! $extract_cmd "$archive_path"; then
  88     cat << EOF
  89
  90 WARNING: The package installation script exited with an error
  91 value. Usually, this means, that the installation failed for some
  92 reason. But in some cases there is no problem and you can continue
  93 creating the Debian package.
  94
  95 Please check if there are any error messages. Press [Return] to
  96 continue or Ctrl-C to abort.
  97
  98 EOF
  99     read
 100     fi
 101     echo
 102     echo -n "Testing extracted archive..."
 103     local size="$( diskusage "$extract_dir" )"
 104     if [ "$size" -lt "$expected_min_size" ]; then
 105     cat << EOF
 106
 107 Invalid size ($size MB) of extracted archive. Probably you have not
 108 enough free disc space in the temporary directory. Note: You can
 109 specify an alternate directory by setting the environment variable
 110 TMPDIR.
 111
 112 EOF
 113     error_exit
 114     else
 115     cd "$extract_dir"
 116     files=(*)
 117     if [ "${#files[*]}" -ne 1 ]; then
 118         cat << EOF
 119
 120 Expected one file, but found the following ${#files[*]} files:
 121     ${files[*]}
 122
 123 EOF
 124         error_exit
 125     fi
 126     mv "$files" "$dest"
 127     echo -e " okay.\n"
 128     fi
 129 }
 130
 131
 132 read_maintainer_info() {
 133     if [ -z "$maintainer_name" ]; then
 134     if [ -n "$DEBFULLNAME" ]; then
 135         maintainer_name="$DEBFULLNAME"
 136     elif [ -n "$DEBNAME" ]; then
 137         maintainer_name="$DEBNAME"
 138     else
 139         default_name="$(getent passwd $(id -run) | cut -d: -f5| cut -d, -f1)"
 140
 141     cat << EOF
 142
 143 Please enter your full name. This value will be used in the maintainer
 144 field of the created package.
 145
 146 EOF
 147
 148     # gecos can be null
 149     while [ -z "$maintainer_name" ]; do
 150         read -e -p "Full name [$default_name]:" maintainer_name
 151         if [ -z "$maintainer_name" ] && [ -n "$default_name" ]; then
 152             maintainer_name="$default_name"
 153         fi
 154     done
 155     fi
 156     fi
 157
 158     if [ -z "$maintainer_email" ]; then
 159     local default_email=
 160     if [ -n "$DEBEMAIL" ]; then
 161         maintainer_email="$DEBEMAIL"
 162     else
 163     if [ -r "/etc/mailname" ]; then
 164         default_email="$( id -run )@$( cat /etc/mailname )"
 165     else
 166         default_email="$( id -run )@$( hostname --fqdn )"
 167     fi
 168     cat << EOF
 169
 170 Please enter a valid email address or press return to accept the
 171 default value. This address will be used in the maintainer field of
 172 the created package.
 173
 174 EOF
 175     read -e -p "Email [$default_email]: " maintainer_email
 176     if [ -z "$maintainer_email" ]; then
 177         maintainer_email="$default_email"
 178     fi
 179     fi
 180     fi
 181 }
 182
 183 # provide the architecture for evaluation by plugins
 184 get_architecture() {
 185     echo
 186
 187     export DEB_BUILD_ARCH=$(dpkg-architecture -qDEB_BUILD_ARCH)
 188
 189     export DEB_BUILD_GNU_TYPE=$(dpkg-architecture -qDEB_BUILD_GNU_TYPE)
 190
 191     echo "Detected Debian build architecture: ${DEB_BUILD_ARCH:-N/A}"
 192
 193     echo "Detected Debian GNU type: ${DEB_BUILD_GNU_TYPE:-N/A}"
 194 }
 195
 196 # get browser plugin directories
 197 get_browser_plugin_dirs() {
 198     if [ $(lsb_release --id --short) = Ubuntu ]; then
 199         export browser_plugin_dirs="xulrunner-addons firefox iceape iceweasel mozilla midbrowser xulrunner"
 200     else
 201         export browser_plugin_dirs=mozilla
 202     fi
 203 }
 204