src/functions.sh

   1 # Ivan 'ico' Rako <irako@srce.hr>
   2 # Zoran 'jelly' Dzelajlija <jelly@srce.hr>
   3
   4 notice () {
   5   LC_MESSAGES=hr_HR dialog --backtitle "$title" --msgbox "$*" 18 75
   6 }
   7
   8 first_warning () {
   9   LC_MESSAGES=hr_HR dialog --backtitle "$title" --yesno "$msg_first_warning" 18 75
  10   if [ $? -ne 0 ]; then
  11     log "Upgrade canceled."
  12     exit 0
  13   fi
  14 }
  15
  16 pkg() {
  17   local version
  18   dpkg -l "$1" 2> /dev/null | egrep -q "^.i" || return 1
  19   [ -z "$2" ] && return 0
  20   version=$(dpkg -s "$1" | awk '/^Version:/ {print $2}')
  21   dpkg --compare-versions "$version" "$2" "$3" 2>&1 > /dev/null
  22 }
  23
  24 log() {
  25   logfile=${logfile:=/var/log/carnet-upgrade.log}
  26   touch $logfile
  27   echo "$(date +'%Y-%m-%d %H:%M:%S') $*" >> $logfile
  28   echo "CN: $*"
  29 }
  30
  31 # find first free uid/gid in range
  32 # find_id passwd 100 999
  33 find_id() {
  34   local i db first last ids
  35   db=$1
  36   first=$2
  37   last=$3
  38   ids=$(getent $db | awk -F: "\$3 >= $first && \$3 <= $last {print \$3}")
  39   for i in $(seq $first $last)
  40   do
  41     if ! echo $ids | grep -q $i; then
  42       echo $i
  43       return 0
  44     fi
  45   done
  46   return 1
  47 }
  48
  49 # safe in-place s///
  50 check_and_sed() {
  51   [ "$DEBIAN_SCRIPT_DEBUG" ] && set -vx
  52   local s sedcmd ret i
  53   s="$1"
  54   shift
  55   sedcmd="$1"
  56   shift
  57   ret=2
  58   for i in $*
  59   do
  60     [ -e "$i" ]        || continue
  61     egrep -q "$s" "$i" || continue
  62     [ -h "$i" ]        && i=$(readlink -f "$i")
  63     sed "$sedcmd" "$i" > "$i.dpkg-tmp"
  64     chown --reference "$i" "$i.dpkg-tmp"
  65     chmod --reference "$i" "$i.dpkg-tmp"
  66     mv "$i.dpkg-tmp" "$i"
  67     ret=0
  68   done
  69   if [ "$ret" -eq 0 ]; then
  70     log "Done \"$sedcmd\" to $*"
  71   fi
  72   return $ret
  73 }
  74
  75 #
  76 # Update uid for user from reserved system range (0-99) to dynamic system
  77 # range (100-999).  Optionally update ownerships of given directories.
  78 # $0 user [directory ...]
  79 #
  80 check_and_update_ugid() {
  81   local user newgid newuid
  82   user=$1
  83   if [ "$(getent passwd $user | awk -F: '$3 >= 100 {print "ok"; exit 0}')" ]; then
  84     return 0
  85   fi
  86   shift
  87   newgid=$(find_id group 100 999)
  88   newuid=$(find_id passwd 100 999)
  89   # other directories/files
  90   chown -R $newuid:$newgid $*
  91   groupmod -g $newgid $user
  92   usermod -u $newuid -g $newgid $user
  93   log "Fixed $user user uid/gid."
  94 }
  95
  96 pkgadd () {
  97   [ -n "$*" ] || return 0
  98   log "Installing $* ..."
  99   apt-get -y$s install $* || {
 100     dpkg --configure -a
 101     apt-get -yf install
 102     apt-get -y$s install $*
 103   }
 104 }
 105
 106 pkgrm () {
 107   [ -n "$*" ] || return 0
 108   log "Removing $* ..."
 109   apt-get -y$s --purge remove $* || {
 110     dpkg --configure -a
 111     apt-get -yf install
 112     apt-get -y$s --purge remove $*
 113   }
 114 }
 115
 116 apt_update() {
 117   log "Running apt-get update ..."
 118   apt-get -y$s update || {
 119     apt-get -yf install
 120     apt-get -y$s update
 121   }
 122   apt-get autoclean
 123 }
 124
 125 apt_download() {
 126   log "Running apt-get download ..."
 127   apt-get -dy$s dist-upgrade
 128 }
 129
 130 dist_upgrade () {
 131   log "Running dist-upgrade ..."
 132   apt-get -y$s dist-upgrade || {
 133     dpkg --configure -a
 134     apt-get -y$s dist-upgrade
 135   }
 136 }
 137
 138 remove_x() {
 139   LC_MESSAGES=hr_HR dialog --backtitle "$title" --yesno "$msg_remove_x" 18 75
 140   if [ $? -eq 0 ]; then
 141     log "Removing X Window System"
 142     pkgrm xlibs
 143   else
 144     log "Skipping X Window System removal"
 145   fi
 146 }
 147
 148 remove_bloat() {
 149   local to_remove add_this i j n text to_show cmd tmpfile installed
 150   local update_selections pkgs_to_deselect pkgs_to_remove oldifs pkglist
 151   text="$msg_remove_bloat"
 152
 153   [ "$DEBUG" ] && set -x
 154   n=0
 155   pkglist=$(mktemp /var/lib/carnet-upgrade/pkglist.XXXXXX)
 156   COLUMNS=200 dpkg -l | awk '$1 ~ /^.i/ { print $2 }' > $pkglist
 157   for i in $(echo "$bloats" | sed 's/           */      /g'| awk -F'    ' '{print $2}')
 158   do
 159     if grep -q "^$i$" $pkglist; then
 160       installed="$installed $i"
 161       add_this="$(echo "$bloats" | egrep "      .*\b${i}\b" | sed 's/           */      /g'| awk -F'    ' '{print $1}')"
 162       if ! echo "$to_show" | grep -q "$add_this"; then
 163         to_show="$to_show \"$add_this\" \"\" on"
 164         n=$(($n+1))
 165       fi
 166     fi
 167   done
 168   [ "$DEBUG" ] || rm -f $pkglist
 169   [ -z "$to_show" ] && return 0
 170   test $n -gt 8 && n=8
 171   tmpfile=$(mktemp /var/lib/carnet-upgrade/dialog-tmp.XXXXXX)
 172   cmd="LC_MESSAGES=hr_HR dialog --nocancel --backtitle \""$title"\" --checklist \""$text"\" 20 75 $n $to_show"
 173   [ "$DEBUG" ] && set +x
 174     eval $cmd 2> $tmpfile
 175   [ "$DEBUG" ] && set -x
 176   to_remove="$(cat $tmpfile | sed 's/\"\ \"/    /g; s/\"\ *//g; s/\\//g')"
 177   [ "$DEBUG" ] || rm -f $tmpfile
 178   [ "$DEBUG" ] && echo "DEBUG: to_remove=$to_remove" 1>&2
 179   oldifs="$IFS"
 180   IFS=" " # tab
 181   for i in $(echo "$to_remove")
 182   do
 183     IFS="$oldifs"
 184     for j in $(echo "$bloats" | grep "^$i" | sed 's/            */      /g'| awk -F'    ' '{print $2}')
 185     do
 186       # hopefully this will tell apt not to reinstall them at upgrade time
 187       update_selections="${update_selections}
 188         $j      deinstall"
 189       pkgs_to_deselect="$pkgs_to_deselect $j"
 190       # only remove those that really are installed
 191       if echo "$installed" | grep -q "$j"; then
 192         pkgs_to_remove="$pkgs_to_remove $j"
 193       fi
 194     done
 195   done
 196   [ "$DEBUG" ] && echo "DEBUG: pkgs_to_remove=$pkgs_to_remove" 1>&2
 197   # Finally, remove those
 198   if [ -n "$update_selections" ]; then
 199     echo "$update_selections" | dpkg --set-selections
 200     log "Deselected:${pkgs_to_deselect}"
 201   fi
 202   eval pkgrm $pkgs_to_remove
 203 }
 204
 205 post_upgrade() {
 206   touch "$post_upgrade_queuetab"
 207   if ! grep -q "true    $*" "$post_upgrade_queuetab"; then
 208     echo "true  $*" >> "$post_upgrade_queuetab"
 209   fi
 210 }
 211
 212 run_post_upgrade() {
 213   if [ -f "$post_upgrade_queuetab" ]; then
 214     run_actions post_upgrade "$post_upgrade_queuetab"
 215     mv "$post_upgrade_queuetab" "${post_upgrade_queuetab}.done.$(date '+%Y-%m-%d.%H:%M:%S')"
 216   fi
 217 }
 218
 219 ###
 220
 221 run_actions() {
 222   local line lineno lineno2 f n name action checkmsg check
 223   [ "$DEBUG" ] && set -vx
 224   name="$1"
 225   f="$2"
 226   [ -f "$f" ] ||   return 2 # no such file
 227   n=$(wc -l "$f" | awk '{print $1}')
 228   [ "$n" -lt 1 ] && return 1 # no lines to process
 229   log "run_actions ($name) started, processing $n lines from \"$f\"."
 230   log "-----"
 231   lineno=0
 232   lineno2=0
 233   while [ "$lineno" -lt "$n" ]
 234   do
 235     lineno=$(($lineno+1))
 236     lineno2=$lineno
 237     line=$(head -$lineno "$f" | tail -1)
 238     if echo $line | grep -q '^#'; then  # comment
 239       continue
 240     fi
 241     while echo "$line" | egrep -q '\\$' # continuation
 242     do
 243       lineno2=$(($lineno2+1))
 244       line=$(echo -n "$line"| sed 's/\\$//'; head -$lineno2 "$f" | tail -1)
 245     done
 246     check=$(echo "$line" | sed 's/              */      /g'| awk -F'    ' '{print $1}')
 247     action=$(echo "$line" | sed 's/             */      /g'| awk -F'    ' '{print $2}')
 248     checkmsg=""
 249     [ "$check" != "true" ] && checkmsg="if '$check'"
 250     if eval $check; then
 251       log "$(printf 'action %02d' $lineno) starting: '${action}' $checkmsg "
 252       if ! eval $action; then
 253         log "$(printf 'action %02d' $lineno) failed: '${action}' $checkmsg "
 254         display_action_failure "$action"
 255         exit 1
 256       else
 257         log "$(printf 'action %02d' $lineno) finished: '${action}' $checkmsg"
 258       fi
 259     else
 260       log "$(printf 'action %02d' $lineno) skipping: '${action}' $checkmsg"
 261     fi
 262     [ "$lineno2" -gt "$lineno" ] && lineno=$lineno2
 263   done
 264   log "run_actions ($1) finished"
 265   log "-----"
 266 }
 267
 268 # report action failure
 269 display_action_failure () {
 270   local action=$1
 271
 272   notice "
 273 Doslo je do greske prilikom izvrsavanja akcije '$action'. Detalje problema moguce je vidjeti u log datotekama:
 274
 275   /var/log/carnet-upgrade.log
 276   /var/log/carnet-upgrade.typescript
 277
 278 Da bi dovrsili zapocete operacije nad paketima pokrenite:
 279
 280   # dpkg --configure -a
 281   # apt-get -f install
 282
 283 Nakon toga ponovno pozovite carnet-upgrade skriptu."
 284 }
 285
 286 # funkcija vraca popis paketa koje treba upgradeati
 287 what_upgrade () {
 288   local IFSOLD name version package
 289
 290   for package in `echo "$needed_versions" | awk '{print $1}'| grep -v ^$`; do
 291     IFSOLD="$IFS"
 292     IFS="       " # tab
 293     read name version <<-EOPTS
 294         $(echo "$needed_versions" | sed 's/             */      /g' | grep ^$package)
 295         EOPTS
 296     IFS="$IFSOLD"
 297     if pkg "$name" lt "$version"; then
 298         echo -n " $name"
 299     fi
 300   done
 301 }
 302
 303 # funkcija za ispis paketa koje treba upgradeati
 304 check_upgrade () {
 305   local upgrade
 306   upgrade=${1:-"`what_upgrade`"}
 307
 308   if [ "$upgrade" ]; then
 309     notice "
 310 Prije prelaska na Debian Etch potrebno je napraviti nadogradnju ovih paketa:
 311   $upgrade
 312
 313 Pokrenite:
 314   # apt-get update
 315   # apt-get dist-upgrade
 316 ili:
 317   # apt-get update
 318   # apt-get install${upgrade}
 319
 320 Nakon toga ponovno pozovite ovu skriptu."
 321     log "carnet-upgrade aborted, upgrade of$upgrade needed."
 322     exit 1
 323   fi
 324 }
 325
 326 # update sarge urls in sources list
 327 fix_sarge_sources () {
 328   local apt_sources='/etc/apt/sources.list'
 329   local fixed_sources=$(mktemp /var/lib/carnet-upgrade/sources.list.XXXXXX)
 330
 331   # sarge (oldstable) was archived recently -> sources.list needs update
 332   awk -v archive='http://archive.debian.org/debian' \
 333       -v security='http://archive.debian.org/debian-security' \
 334       '$3 == "sarge" && $2 ~ /[/]debian$/ { $2 = archive }
 335        $3 == "sarge/updates" && $2 ~ /security\.debian\.org$/ { $2 = security }
 336        { print }' $apt_sources > $fixed_sources
 337
 338   # did anything get updated
 339   if ! cmp $apt_sources $fixed_sources >/dev/null; then
 340       log "sources.list fixed to use archive.debian.org"
 341
 342       # backup current version
 343       if [ ! -f "$apt_sources.$backup_ext.sarge" ]; then
 344           cp -av $apt_sources "$apt_sources.$backup_ext.sarge"
 345       fi
 346
 347       # install fixed version
 348       cp -av $fixed_sources $apt_sources
 349
 350       # update the database
 351       apt_update
 352   fi
 353
 354   # delete temporary
 355   rm -f $fixed_sources
 356 }
 357
 358 # try to check if we are using the latest version of carnet-upgrade script
 359 check_my_version () {
 360   local packages latest_version
 361
 362   packages=$(mktemp /var/lib/carnet-upgrade/Packages.XXXXXX)
 363   if wget -q -O$packages $packages_uri; then
 364     latest_version=$(sed -ne \
 365         '/Package: carnet-upgrade/,/Description:/{ /Version: /s///p }' \
 366         $packages)
 367     rm -f $packages
 368
 369     if [ "$latest_version" ]; then
 370       log "Running carnet-upgrade version is $version"
 371       log "Latest carnet-upgrade version is $latest_version"
 372       if dpkg --compare-versions "$version" lt "$latest_version"; then
 373         check_upgrade " carnet-upgrade"
 374       else log "Already using the latest carnet-upgrade version."; fi
 375     else log "Failed to get latest version, skipping check."; fi
 376   else log "Failed to download Packages file, skipping check."; fi
 377
 378   rm -f $packages
 379 }
 380
 381 # if apache is installed make sure it's version 2
 382 check_apache_version () {
 383
 384   if pkg apache-cn && ! pkg apache2-cn; then
 385     notice "
 386 Prije prelaska na Debian Etch potrebno je napraviti nadogradnju sa Apache 1.3 na Apache 2.0.
 387
 388 Pokrenite:
 389   # apt-get update
 390   # apt-get install apache2-cn
 391
 392 Nakon toga ponovno pozovite ovu skriptu."
 393     log "carnet-upgrade aborted, upgrade to apache2-cn needed."
 394     exit 1
 395   fi
 396 }
 397
 398 # if grsec is installed make sure it is fresh
 399 check_grsec_kernel () {
 400   local ver=`uname -r`
 401
 402   log "Kernel version: $ver"
 403   if [ "$ver" = "${ver%-grsec}" ]; then
 404     # not grsec variant
 405     return 0
 406   fi
 407
 408   if [ "$ver" = "${ver#2.6.2[4-9]}" ] || reboot_required; then
 409     # kernel too old
 410     notice "
 411 Prije prelaska na Debian Etch potrebno je napraviti nadogradnju na najnoviji grsec kernel.
 412
 413 Pokrenite:
 414   # apt-get update
 415   # apt-get install kernel-2.6-cn
 416   # reboot
 417
 418 Nakon toga ponovno pozovite ovu skriptu."
 419     log "carnet-upgrade aborted, kernel upgrade needed."
 420     exit 1
 421   fi
 422 }
 423
 424 # check if the latest kernel is booted
 425 reboot_required () {
 426   local default_kernel kernel_package running_release running_version
 427
 428   default_kernel=$( lilo -t -v 2>/dev/null \
 429                     | grep -B3 '[*]$' \
 430                     | sed -n -e '/^Boot image: / { s///p; q; }' )
 431
 432   if [ -z "$default_kernel" ]; then
 433       log "Could not find default kernel"
 434       return 1
 435   fi
 436
 437   log "Default kernel image: $default_kernel"
 438
 439   if [ ! -e "$default_kernel" ]; then
 440       log "Default kernel image doesn't exist!?"
 441       return 1
 442   fi
 443
 444   kernel_package=$( dpkg -S $default_kernel | cut -d: -f 1 )
 445
 446   if [ -z "$kernel_package" ]; then
 447       log "Default kernel not installed from a package"
 448       return 1
 449   fi
 450
 451   log "Default kernel package: $kernel_package"
 452
 453   if [ "$kernel_package" != "kernel-2.6-cn" ]; then
 454       log "Default kernel package is not kernel-2.6-cn"
 455       return 1
 456   fi
 457
 458   running_release=$( uname -r )
 459   running_version=$( uname -v )
 460   log "Running kernel: $running_release $running_version"
 461
 462   if grep -q "$running_release .* $running_version" $default_kernel; then
 463       log "Latest kernel version is running."
 464       return 1
 465   else
 466       log "Reboot to latest version required."
 467       return 0
 468   fi
 469 }
 470
 471 upgrade () {
 472   local i to_install packages
 473   case "$1" in
 474     first)
 475       packages="$packages_first"
 476     ;;
 477     second)
 478       packages="$packages_second"
 479     ;;
 480     *)
 481     return 1
 482   esac
 483
 484   for i in $(echo $packages)
 485   do
 486     pkg $i && to_install="$to_install $i"
 487   done
 488
 489   if [ -n "$to_install" ];then
 490     eval pkgadd $to_install
 491   else
 492     return 0
 493   fi
 494 }
 495
 496 # funkcija utrpa ispravan sources.list
 497 create_sources_list () {
 498     local sl sl_new
 499     sl=/etc/apt/sources.list
 500     sl_new=/usr/share/carnet-upgrade/files/etc/apt/sources.list
 501
 502     # check if already installed
 503     if ! cmp $sl $sl_new >/dev/null; then
 504
 505         # backup old version
 506         if [ -f $sl -a ! -f $sl.$backup_ext ]; then
 507             cp -av $sl $sl.$backup_ext
 508         fi
 509
 510         # install new version
 511         cp -av $sl_new $sl
 512         notice "Novi sadrzaj datoteke /etc/apt/sources.list:
 513
 514 `cat /etc/apt/sources.list`"
 515     fi
 516 }
 517
 518
 519 # funkcija koja brise grupu proc
 520 remove_group_proc () {
 521   if getent group proc > /dev/null; then
 522     groupdel proc || true
 523     log "groupdel proc (temporarily)"
 524     post_upgrade add_group_proc
 525   fi
 526 }
 527
 528 add_group_proc () {
 529   if ! getent group proc > /dev/null; then
 530     # grsec uses gid 99 for /proc files
 531     groupadd -g 99 proc
 532     log "groupadd -g 99 proc"
 533
 534     # update oidentd so it uses the proc group
 535     if [ -x /etc/init.d/oidentd ]; then
 536         if gpasswd -a oident proc; then
 537             /etc/init.d/oidentd restart
 538         fi
 539     fi
 540   fi
 541 }
 542
 543 # backup ldap database
 544 backup_slapd_db () {
 545   local ldap_backup=/var/backups/slapcat.$backup_ext.gz
 546   local old_umask result
 547
 548   if [ ! -f $ldap_backup ]; then
 549     [ -x /etc/init.d/freeradius ] && /etc/init.d/freeradius stop || true
 550
 551     if [ -x /etc/init.d/slapd -a -d /var/lib/ldap ]; then
 552       /etc/init.d/slapd stop || true
 553       old_umask=`umask`
 554       umask 0077 # protect the backup file
 555       slapcat | gzip --best > $ldap_backup
 556       result=$?
 557       umask $old_umask
 558       /etc/init.d/slapd start || true
 559
 560       if [ "$result" -eq 0 ]; then
 561         log "$ldap_backup created"
 562         notice "Napravljen backup slapd baze u $ldap_backup."
 563       else
 564         log "$ldap_backup was not created"
 565         notice "Backup slapd baze u $ldap_backup nije uspio."
 566         exit 1
 567       fi
 568     fi
 569
 570     [ -x /etc/init.d/freeradius ] && /etc/init.d/freeradius start || true
 571   else
 572     log "slapd backup already at $ldap_backup, skipping."
 573     notice "Backup slapd baze u $ldap_backup vec postoji!"
 574   fi
 575 }
 576
 577 # backup etc direktorija
 578 backup_etc_dir () {
 579   local etc_backup=/var/backups/etc.$backup_ext.tar.gz
 580   local old_umask
 581
 582   if [ ! -f $etc_backup ]; then
 583     old_umask=`umask`
 584     umask 0077 # protect the backup file
 585
 586     if tar cfz $etc_backup /etc 2> /dev/null; then
 587       log "$etc_backup created"
 588       notice "Napravljen backup /etc direktorija u $etc_backup."
 589     else
 590       log "$etc_backup was not created"
 591       notice "Backup /etc direktorija u $etc_backup nije uspio."
 592       exit 1
 593     fi
 594     umask $old_umask
 595   else
 596     log "/etc backup already present in $etc_backup, skipping."
 597     notice "Backup /etc direktorija u $etc_backup vec postoji!"
 598   fi
 599 }
 600
 601 # fixaj /etc/default/raid2
 602 fix_etc_default_raid2 () {
 603   if [ -f /etc/default/raid2 ]; then
 604     sed "s/^AUTOSTART.*/AUTOSTART=true/g" /etc/default/raid2 > /etc/default/raid2.$backup_ext.$$
 605     chown --reference=/etc/default/raid2 /etc/default/raid2.$backup_ext.$$
 606     chmod --reference=/etc/default/raid2 /etc/default/raid2.$backup_ext.$$
 607
 608     if ! cmp -s /etc/default/raid2.$backup_ext.$$ /etc/default/raid2; then
 609       log "Fixed /etc/default/raid2 AUTOSTART option."
 610       mv -v /etc/default/raid2.$backup_ext.$$ /etc/default/raid2
 611     else
 612       rm -v /etc/default/raid2.$backup_ext.$$
 613     fi
 614   fi
 615 }
 616
 617 # restore original config file (if the new package version is not
 618 # installed already)
 619 restore_config () {
 620   local file file_backup file_orig
 621   local old_umask
 622
 623   # create new files safely
 624   old_umask=`umask`
 625   umask 0077
 626
 627   # restore package files
 628   for file in $*; do
 629     file_orig=/usr/share/carnet-upgrade/files/$file
 630     file_backup=$file.$backup_ext
 631
 632     # is config there
 633     if [ ! -e $file ]; then
 634         continue
 635     fi
 636
 637     # is restore needed
 638     if cmp $file_orig $file >/dev/null; then
 639         continue
 640     fi
 641
 642     # backup and restore
 643     if [ ! -e $file_backup ]; then
 644       log "Restoring config file $file"
 645
 646       # backup local changes
 647       mv -v $file $file_backup
 648
 649       # restore original
 650       cp -av $file_orig $file
 651       chown --reference $file_backup $file
 652       chmod --reference $file_backup $file
 653     fi
 654   done
 655
 656   umask $old_umask
 657 }
 658
 659 # restore modified config to their package defaults
 660 # so the upgrade doesn't complain so much
 661 restore_configs () {
 662   local config_backup
 663
 664   pkg base-files lt 4 && restore_config /etc/issue /etc/issue.net
 665   pkg libpam-modules lt 0.79 && restore_config /etc/security/limits.conf
 666   pkg login lt 1:4.0.18.1 && restore_config /etc/pam.d/login
 667   pkg mysql-server lt 5.0.3 && restore_config /etc/init.d/mysql \
 668                                     /etc/logrotate.d/mysql-server \
 669                                     /etc/mysql/my.cnf
 670   pkg ntp lt 1:4.2.2 && restore_config /etc/ntp.conf
 671   pkg ntpdate lt 1:4.2.2 && restore_config /etc/default/ntpdate
 672   pkg oidentd lt 2.0.8 && restore_config /etc/default/oidentd
 673   pkg postgrey lt 1.27 && restore_config /etc/default/postgrey \
 674                                /etc/postgrey/whitelist_clients
 675   pkg procps lt 1:3.2.7 && restore_config /etc/sysctl.conf
 676   pkg sasl2-bin lt 2.1.22 && restore_config /etc/default/saslauthd
 677   pkg slapd lt 2.3.30 && restore_config /etc/default/slapd /etc/init.d/slapd
 678   pkg squirrelmail lt 2:1.4.9a && restore_config /etc/squirrelmail/apache.conf
 679   pkg vsftpd lt 2.0.5 && restore_config /etc/vsftpd.conf
 680   pkg xinetd lt 1:2.3.14 && restore_config /etc/xinetd.conf
 681
 682   # orphaned config file - no owner
 683   if pkg logcheck-database lt 1.2.54; then
 684       rm -vf /etc/logcheck/ignore.d.server/imap
 685   fi
 686
 687   # aide switched to ucf, move old configs aside
 688   if pkg aide lt 0.13.1; then
 689       for file in /etc/aide/aide.conf \
 690                   /etc/cron.daily/aide \
 691                   /etc/default/aide;
 692       do
 693           if [ ! -e "$file.$backup_ext" ]; then
 694               mv -v "$file" "$file.$backup_ext"
 695           fi
 696
 697           rm -vf "$file"
 698       done
 699   fi
 700
 701   # register cn changes in ucf managed files
 702   for config in /etc/apache/modules.conf \
 703                 /etc/clamav/clamd.conf \
 704                 /etc/clamav/freshclam.conf
 705   do
 706       config_backup=$config.$backup_ext
 707       if [ -e $config -a ! -e $config_backup ]; then
 708           log "Saving config file $config"
 709           cp -av $config $config_backup
 710           ucf $config_backup $config
 711       fi
 712   done
 713 }
 714
 715 # temporary disable listchanges packages to reduce clutter during upgrade
 716 apt_listchanges () {
 717   local file command=$1
 718
 719   for file in /etc/apt/apt.conf.d/20listchanges \
 720               /etc/apt/apt.conf.d/20listchanges-cn
 721   do
 722       case $command in
 723            disable)
 724                if [ -f $file ]; then
 725                    dpkg-divert --local --rename --divert $file.$backup_ext \
 726                                --add $file || true
 727                fi
 728                ;;
 729
 730            enable)
 731                if [ -f $file.$backup_ext ]; then
 732                    dpkg-divert --remove $file || true
 733                fi
 734                ;;
 735      esac
 736   done
 737 }
 738
 739 # make a silent installation of carnet and srce keyrings
 740 install_keyrings () {
 741   pkgadd carnet-keyring srce-keyring
 742   pkgadd dpkg apt debconf python-apt
 743
 744   dpkg-reconfigure carnet-keyring srce-keyring
 745   apt_update
 746 }
 747
 748 # remove skey (not supported anymore)
 749 remove_skey () {
 750   pkgrm skey-cn libpam-skey
 751
 752   if getent group skey > /dev/null; then
 753     groupdel skey || true
 754     log "groupdel skey"
 755   fi
 756 }
 757
 758 # monit it causing problems for postinst scripts
 759 # restarting daemons so try to disable it
 760 disable_monit () {
 761   if pkg monit-cn; then
 762     pkgrm monit-cn # disables monit in prerm
 763   fi
 764
 765   # if configured manually
 766   if pkg monit; then
 767     # remove the binary but leave the config
 768     apt-get remove --yes monit
 769     # stop the binary
 770     pkill -9 monit || true
 771   fi
 772 }
 773
 774 # make a silent upgrade to new libc6
 775 upgrade_libc () {
 776   DEBIAN_FRONTEND=noninteractive pkgadd libc6
 777 }
 778
 779 # upgrade apache2 to etch
 780 upgrade_apache2 () {
 781   local package packages
 782
 783   for package in \
 784       libapache2-mod-php4 \
 785       php4-cli \
 786       php4-cgi \
 787       php4-cn \
 788       apache2-cn \
 789       php4-odbc \
 790       php4-suhosin \
 791       php-suhosin-cn
 792   do
 793       if pkg $package; then
 794           packages="$packages $package"
 795       fi
 796   done
 797
 798   # enable suhosin downgrade to etch version
 799   if pkg php4-suhosin; then
 800       pkgrm php4-suhosin php-suhosin-cn
 801   fi
 802
 803   eval pkgadd $packages
 804 }
 805
 806 upgrade_amavis () {
 807   local conf
 808
 809   # remove init script diversion before upgrade
 810   if pkg amavisd-cn lt 3:2.4.2-4; then
 811     if [ -L /etc/init.d/amavis -a -f /etc/init.d/amavis.amavisd-new ]; then
 812       rm -vf /etc/init.d/amavis
 813       dpkg-divert --remove /etc/init.d/amavis
 814     fi
 815   fi
 816
 817   # move old config aside
 818   for conf in /etc/amavisd.conf /etc/amavis/amavisd.conf; do
 819     if [ -e $conf -a ! -e $conf.$backup_ext ]; then
 820       mv -v $conf $conf.$backup_ext
 821     fi
 822   done
 823
 824   # install new packages
 825   pkgadd amavisd-cn amavisd-new
 826
 827   # fix new packages
 828   check_and_sed '^clamd.*5.clamav.log$' \
 829                 's/^\(clamd.*\)5.clamav.log$/\14\tsocket/g' \
 830                 /etc/init.d/amavisd-cn || true
 831
 832   # check if link got lost
 833   if pkg amavisd-cn && [ ! -L /etc/init.d/amavis ]; then
 834     apt-get install --reinstall --yes amavisd-cn
 835   fi
 836
 837   # start new packages
 838   /etc/init.d/amavis restart
 839 }
 840
 841 # fix openldap-aai postinst user handling
 842 upgrade_openldap () {
 843   pkg openldap-aai lt 2.3 || return 0
 844
 845   # openldap-aai expects org.ldif to exists
 846   local ldif=/var/lib/ldap/org.ldif
 847   local ldif_backup=/var/lib/carnet-upgrade/org.ldif
 848   if [ -f $ldif ]; then
 849     cp -v $ldif $ldif_backup
 850   fi
 851
 852   # slapd postinst fails if move_old_database is false
 853   echo 'slapd slapd/move_old_database boolean true' | debconf-set-selections
 854   pkgadd slapd
 855
 856   # slapd removes org.ldif during switch from ldap -> openldap user
 857   if [ -f $ldif_backup -a ! -f $ldif ]; then
 858     cp -v $ldif_backup $ldif
 859   fi
 860
 861   # openldap-aai postinst fails here because of database permissions
 862   apt-get -y install openldap-aai || true
 863   chown -R openldap:openldap /var/lib/ldap
 864   /etc/init.d/slapd restart
 865   dpkg --configure -a
 866
 867   # remove ldap user if openldap works
 868   if getent passwd ldap      > /dev/null && \
 869      getent passwd openldap  > /dev/null && \
 870      pgrep -U openldap slapd > /dev/null
 871   then
 872      log "userdel ldap (replaced by openldap)"
 873      userdel ldap || true
 874   fi
 875 }
 876
 877 # fix postgresql deinstallation during upgrade
 878 upgrade_postgresql () {
 879   if check_services show 2>&1 | grep -qw postgresql; then
 880      apt-get install -y postgresql || apt-get -yf install
 881   fi
 882 }
 883
 884 # upgrade the MTA
 885 upgrade_postfix () {
 886   pkgadd postfix-cn
 887
 888   if pkg postgrey; then
 889      pkgrm postgrey # not used by postfix-cn anymore
 890   fi
 891 }
 892
 893 get_variable () {
 894   local name=$1 file=$2 val
 895
 896   if [ -f "$file" ]; then
 897      val=$(sed -n "/^[[:space:]]*$name[[:space:]]*=/s/[[:space:]]*//gp" $file)
 898      val=${val#*=}
 899   fi
 900
 901   echo $val
 902 }
 903
 904 # preserve mail location on upgrade
 905 upgrade_dovecot () {
 906   local default_mail_env mail_location
 907
 908   # check if already upgraded
 909   if ! pkg dovecot-common lt 1.0; then
 910       return
 911   fi
 912
 913   # save old mail location
 914   default_mail_env=$(get_variable default_mail_env /etc/dovecot/dovecot.conf)
 915
 916   # silently upgrade package
 917   restore_config /etc/dovecot/dovecot.conf
 918   pkgadd dovecot-cn
 919
 920   # insert old mail location
 921   mail_location=$(get_variable mail_location /etc/dovecot/dovecot.conf)
 922   if [ "$default_mail_env" -a ! "$mail_location" ]; then
 923       check_and_sed '^#mail_location[[:space:]]*=' \
 924                    "s|#mail_location[[:space:]]*=.*|mail_location = $default_mail_env|" /etc/dovecot/dovecot.conf || return 0
 925
 926       if [ -x /etc/init.d/dovecot ]; then
 927           if [ -x /usr/sbin/invoke-rc.d ]; then
 928               /usr/sbin/invoke-rc.d dovecot restart
 929           else
 930               /etc/init.d/dovecot restart
 931           fi
 932       fi
 933   fi
 934 }
 935
 936 # fix /etc/dpkg/dpkg.cfg
 937 comment_force_overwrite () {
 938   if [ -f /etc/dpkg/dpkg.cfg ]; then
 939     if check_and_sed '^force-overwrite' \
 940                   's,\(^force-overwrite\),#\1,' \
 941                   /etc/dpkg/dpkg.cfg; then
 942       notice "$msg_comment_force_overwrite"
 943     fi
 944   fi
 945 }
 946
 947 fix_issue () {
 948   cat > /etc/issue <<EOF
 949 Debian GNU/Linux 4.0 (CARNet Debian 4.0) \\n \\l
 950 EOF
 951
 952   cat > /etc/issue.net <<EOF
 953 Debian GNU/Linux 4.0 (CARNet Debian 4.0) %h
 954 EOF
 955 }
 956
 957 check_archives_space() {
 958   local available_disk_space archives_size
 959   available_disk_space=$(free_space /var/cache/apt/archives/)
 960   archives_size=$(download_size dist-upgrade)
 961
 962   if [ $? -ne 0 ]; then
 963     log "Failed to get download size, skipping check."
 964     return 0
 965   fi
 966
 967   log "Archives space: ${available_disk_space}MB"
 968   log "Download size: ${archives_size}MB"
 969
 970   if [ $available_disk_space -lt $archives_size ]; then
 971     log "carnet-upgrade aborted: not enough space in /var/cache/apt/archives/ (have ${available_disk_space}MB, need ${archives_size}MB)"
 972     notice "Premalo slobodnog mjesta u /var/cache/apt/archives/ za skidanje paketa (potrebno je barem ${archives_size}MB). Procitajte poglavlje 'Izvanredne situacije' u dokumentaciji."
 973     exit 1
 974   fi
 975 }
 976
 977 check_kernel_space() {
 978   local available_disk_space kernel_size
 979   available_disk_space=$(free_space /)
 980   kernel_size=$(installed_size kernel-2.6-cn)
 981
 982   if [ $? -ne 0 ]; then
 983     log "Failed to get installed size, skipping check."
 984     return 0
 985   fi
 986
 987   log "Free space in /: ${available_disk_space}MB"
 988   log "Kernel size: ${kernel_size}MB"
 989
 990   if LC_ALL=C apt-get --yes --print-uris install kernel-2.6-cn \
 991      | grep -q '^kernel-2.6-cn is already the newest version.$'
 992   then
 993      log "Not checking free space in /: kernel-2.6-cn already installed"
 994      return
 995   fi
 996
 997   if [ $available_disk_space -lt $kernel_size ]; then
 998     log "carnet-upgrade aborted: not enough space in / (have ${available_disk_space}MB, need ${kernel_size}MB)"
 999     notice "Premalo mjesta u / za instalaciju kernela (potrebno je barem ${kernel_size}MB). Procitajte poglavlje 'Izvanredne situacije' u dokumentaciji."
1000     exit 1
1001   fi
1002 }
1003
1004 free_space() {
1005   df --portability --block-size=1M "$1" | tail -1 | awk '{print $4}'
1006 }
1007
1008 download_size() {
1009   local size
1010   size=$(LC_ALL=C apt-get --yes --print-uris "$@" | grep '^Need to get ')
1011
1012   if [ $? -ne 0 ]; then
1013     log "Failed to get download size for 'apt-get $@'."
1014     return 1
1015   fi
1016
1017   size=${size#Need to get }
1018   size=${size%%B*}
1019
1020   size_to_mb "${size}B"
1021 }
1022
1023 installed_size() {
1024   local package size
1025   package=$1
1026   size=$(apt-cache show $package | grep '^Installed-Size:')
1027
1028   if [ $? -ne 0 ]; then
1029     log "Failed to get installed size for '$package'."
1030     return 1
1031   fi
1032
1033   size=${size#*: }
1034
1035   size_to_mb "${size}kB"
1036 }
1037
1038 size_to_mb() {
1039   local size
1040   size=$1
1041   if [ -z "$size" ]; then
1042     size=0;
1043   fi
1044
1045   if [ "${size%kB}" != "$size" ]; then
1046     size=$(round ${size%kB})
1047     size=$(($size/1024+1))
1048   elif [ "${size%MB}" != "$size" ]; then
1049     size=$(round ${size%MB})
1050   elif [ "${size%GB}" != "$size" ]; then
1051     size=$(round ${size%GB})
1052     size=$(($size*1024))
1053   elif [ "${size%[0-9]B}" != "$size" ]; then
1054     size=$(round ${size%B})
1055     size=$(($size/1024/1024+1))
1056   else
1057     log "unrecognized size unit: $size"
1058     return 1
1059   fi
1060
1061   echo $size
1062 }
1063
1064 round() {
1065   local num
1066   num=$1
1067
1068   if [ "${num%.*}" != "$num" ]; then
1069     num=${num%.*}
1070     num=$(($num+1))
1071   fi
1072
1073   echo $num
1074 }