Fix sarge sources.list to use archive.debian.org.
[carnet-upgrade.git] / 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   fi
350
351   # delete temporary
352   rm -f $fixed_sources
353 }
354
355 # try to check if we are using the latest version of carnet-upgrade script
356 check_my_version () {
357   local packages latest_version
358
359   packages=$(mktemp /var/lib/carnet-upgrade/Packages.XXXXXX)
360   if wget -q -O$packages $packages_uri; then
361     latest_version=$(sed -ne \
362         '/Package: carnet-upgrade/,/Description:/{ /Version: /s///p }' \
363         $packages)
364     rm -f $packages
365
366     if [ "$latest_version" ]; then
367       log "Running carnet-upgrade version is $version"
368       log "Latest carnet-upgrade version is $latest_version"
369       if dpkg --compare-versions "$version" lt "$latest_version"; then
370         check_upgrade " carnet-upgrade"
371       else log "Already using the latest carnet-upgrade version."; fi
372     else log "Failed to get latest version, skipping check."; fi
373   else log "Failed to download Packages file, skipping check."; fi
374
375   rm -f $packages
376 }
377
378 # if apache is installed make sure it's version 2
379 check_apache_version () {
380
381   if pkg apache-cn && ! pkg apache2-cn; then
382     notice "
383 Prije prelaska na Debian Etch potrebno je napraviti nadogradnju sa Apache 1.3 na Apache 2.0.
384
385 Pokrenite:
386   # apt-get update
387   # apt-get install apache2-cn
388   
389 Nakon toga ponovno pozovite ovu skriptu."
390     log "carnet-upgrade aborted, upgrade to apache2-cn needed."
391     exit 1
392   fi
393 }
394
395 # if grsec is installed make sure it is fresh
396 check_grsec_kernel () {
397   local ver=`uname -r`
398
399   log "Kernel version: $ver"
400   if [ "$ver" = "${ver%-grsec}" ]; then
401     # not grsec variant
402     return 0
403   fi
404
405   if [ "$ver" = "${ver#2.6.2[4-9]}" ]; then
406     # kernel too old
407     notice "
408 Prije prelaska na Debian Etch potrebno je napraviti nadogradnju na najnoviji grsec kernel.
409
410 Pokrenite:
411   # apt-get update
412   # apt-get install kernel-2.6-cn
413   # reboot
414   
415 Nakon toga ponovno pozovite ovu skriptu."
416     log "carnet-upgrade aborted, kernel upgrade needed."
417     exit 1
418   fi
419 }
420
421 upgrade () {
422   local i to_install packages
423   case "$1" in
424     first)
425       packages="$packages_first"
426     ;;
427     second)
428       packages="$packages_second"
429     ;;
430     *)
431     return 1
432   esac
433
434   for i in $(echo $packages)
435   do
436     pkg $i && to_install="$to_install $i"
437   done
438
439   if [ -n "$to_install" ];then
440     eval pkgadd $to_install
441   else
442     return 0
443   fi
444 }
445
446 # funkcija utrpa ispravan sources.list
447 create_sources_list () {
448     local sl sl_new
449     sl=/etc/apt/sources.list
450     sl_new=/usr/share/carnet-upgrade/files/etc/apt/sources.list
451
452     # check if already installed
453     if ! cmp $sl $sl_new >/dev/null; then
454
455         # backup old version
456         if [ -f $sl -a ! -f $sl.$backup_ext ]; then
457             cp -av $sl $sl.$backup_ext
458         fi
459
460         # install new version
461         cp -av $sl_new $sl
462         notice "Novi sadrzaj datoteke /etc/apt/sources.list:
463
464 `cat /etc/apt/sources.list`"
465     fi
466 }
467
468
469 # funkcija koja brise grupu proc
470 remove_group_proc () {
471   if getent group proc > /dev/null; then
472     groupdel proc || true
473     log "groupdel proc (temporarily)"
474     post_upgrade add_group_proc
475   fi
476 }
477
478 add_group_proc () {
479   if ! getent group proc > /dev/null; then
480     # grsec uses gid 99 for /proc files
481     groupadd -g 99 proc 
482     log "groupadd -g 99 proc"
483
484     # update oidentd so it uses the proc group
485     if [ -x /etc/init.d/oidentd ]; then
486         if gpasswd -a oident proc; then
487             /etc/init.d/oidentd restart
488         fi
489     fi
490   fi
491 }
492
493 # backup ldap database
494 backup_slapd_db () {
495   local ldap_backup=/var/backups/slapcat.$backup_ext.gz
496   local old_umask result
497
498   if [ ! -f $ldap_backup ]; then
499     [ -x /etc/init.d/freeradius ] && /etc/init.d/freeradius stop || true
500
501     if [ -x /etc/init.d/slapd -a -d /var/lib/ldap ]; then
502       /etc/init.d/slapd stop || true
503       old_umask=`umask`
504       umask 0077 # protect the backup file
505       slapcat | gzip --best > $ldap_backup
506       result=$?
507       umask $old_umask
508       /etc/init.d/slapd start || true
509
510       if [ "$result" -eq 0 ]; then
511         log "$ldap_backup created"
512         notice "Napravljen backup slapd baze u $ldap_backup."
513       else
514         log "$ldap_backup was not created"
515         notice "Backup slapd baze u $ldap_backup nije uspio."
516         exit 1
517       fi
518     fi
519
520     [ -x /etc/init.d/freeradius ] && /etc/init.d/freeradius start || true
521   else
522     log "slapd backup already at $ldap_backup, skipping."
523     notice "Backup slapd baze u $ldap_backup vec postoji!"
524   fi
525 }
526
527 # backup etc direktorija
528 backup_etc_dir () {
529   local etc_backup=/var/backups/etc.$backup_ext.tar.gz
530   local old_umask
531
532   if [ ! -f $etc_backup ]; then
533     old_umask=`umask`
534     umask 0077 # protect the backup file
535
536     if tar cfz $etc_backup /etc 2> /dev/null; then
537       log "$etc_backup created"
538       notice "Napravljen backup /etc direktorija u $etc_backup."
539     else
540       log "$etc_backup was not created"
541       notice "Backup /etc direktorija u $etc_backup nije uspio."
542       exit 1
543     fi
544     umask $old_umask
545   else
546     log "/etc backup already present in $etc_backup, skipping."
547     notice "Backup /etc direktorija u $etc_backup vec postoji!"
548   fi
549 }
550
551 # fixaj /etc/default/raid2
552 fix_etc_default_raid2 () {
553   if [ -f /etc/default/raid2 ]; then
554     sed "s/^AUTOSTART.*/AUTOSTART=true/g" /etc/default/raid2 > /etc/default/raid2.$backup_ext.$$
555     chown --reference=/etc/default/raid2 /etc/default/raid2.$backup_ext.$$
556     chmod --reference=/etc/default/raid2 /etc/default/raid2.$backup_ext.$$
557
558     if ! cmp -s /etc/default/raid2.$backup_ext.$$ /etc/default/raid2; then
559       log "Fixed /etc/default/raid2 AUTOSTART option."
560       mv -v /etc/default/raid2.$backup_ext.$$ /etc/default/raid2
561     else
562       rm -v /etc/default/raid2.$backup_ext.$$
563     fi
564   fi
565 }
566
567 # restore original config file (if the new package version is not
568 # installed already)
569 restore_config () {
570   local file file_backup file_orig
571   local old_umask
572
573   # create new files safely
574   old_umask=`umask`
575   umask 0077
576
577   # restore package files
578   for file in $*; do
579     file_orig=/usr/share/carnet-upgrade/files/$file
580     file_backup=$file.$backup_ext
581
582     # is config there
583     if [ ! -e $file ]; then
584         continue
585     fi 
586
587     # is restore needed
588     if cmp $file_orig $file >/dev/null; then
589         continue
590     fi
591
592     # backup and restore
593     if [ ! -e $file_backup ]; then
594       log "Restoring config file $file"
595
596       # backup local changes
597       mv -v $file $file_backup
598
599       # restore original
600       cp -av $file_orig $file
601       chown --reference $file_backup $file
602       chmod --reference $file_backup $file
603     fi
604   done
605
606   umask $old_umask
607 }
608
609 # restore modified config to their package defaults
610 # so the upgrade doesn't complain so much
611 restore_configs () {
612   local config_backup
613
614   pkg base-files lt 4 && restore_config /etc/issue /etc/issue.net
615   pkg libpam-modules lt 0.79 && restore_config /etc/security/limits.conf
616   pkg login lt 1:4.0.18.1 && restore_config /etc/pam.d/login
617   pkg mysql-server lt 5.0.3 && restore_config /etc/init.d/mysql \
618                                     /etc/logrotate.d/mysql-server \
619                                     /etc/mysql/my.cnf
620   pkg ntp lt 1:4.2.2 && restore_config /etc/ntp.conf
621   pkg ntpdate lt 1:4.2.2 && restore_config /etc/default/ntpdate
622   pkg oidentd lt 2.0.8 && restore_config /etc/default/oidentd
623   pkg postgrey lt 1.27 && restore_config /etc/default/postgrey \
624                                /etc/postgrey/whitelist_clients
625   pkg procps lt 1:3.2.7 && restore_config /etc/sysctl.conf
626   pkg sasl2-bin lt 2.1.22 && restore_config /etc/default/saslauthd
627   pkg slapd lt 2.3.30 && restore_config /etc/default/slapd /etc/init.d/slapd
628   pkg squirrelmail lt 2:1.4.9a && restore_config /etc/squirrelmail/apache.conf
629   pkg vsftpd lt 2.0.5 && restore_config /etc/vsftpd.conf
630   pkg xinetd lt 1:2.3.14 && restore_config /etc/xinetd.conf
631
632   # orphaned config file - no owner
633   if pkg logcheck-database lt 1.2.54; then
634       rm -vf /etc/logcheck/ignore.d.server/imap
635   fi
636
637   # aide switched to ucf, move old configs aside
638   if pkg aide lt 0.13.1; then
639       for file in /etc/aide/aide.conf \
640                   /etc/cron.daily/aide \
641                   /etc/default/aide;
642       do
643           if [ ! -e "$file.$backup_ext" ]; then
644               mv -v "$file" "$file.$backup_ext"
645           fi
646
647           rm -vf "$file"
648       done
649   fi
650
651   # register cn changes in ucf managed files
652   for config in /etc/apache/modules.conf \
653                 /etc/clamav/clamd.conf \
654                 /etc/clamav/freshclam.conf
655   do 
656       config_backup=$config.$backup_ext
657       if [ -e $config -a ! -e $config_backup ]; then
658           log "Saving config file $config"
659           cp -av $config $config_backup
660           ucf $config_backup $config
661       fi
662   done
663 }
664
665 # temporary disable listchanges packages to reduce clutter during upgrade
666 apt_listchanges () {
667   local file command=$1
668
669   for file in /etc/apt/apt.conf.d/20listchanges \
670               /etc/apt/apt.conf.d/20listchanges-cn
671   do
672       case $command in
673            disable)
674                if [ -f $file ]; then
675                    dpkg-divert --local --rename --divert $file.$backup_ext \
676                                --add $file || true
677                fi
678                ;;
679
680            enable)
681                if [ -f $file.$backup_ext ]; then
682                    dpkg-divert --remove $file || true
683                fi
684                ;;
685      esac
686   done
687 }
688
689 # make a silent installation of carnet and srce keyrings
690 install_keyrings () {
691   pkgadd carnet-keyring srce-keyring
692   pkgadd dpkg apt debconf python-apt
693
694   dpkg-reconfigure carnet-keyring srce-keyring
695   apt_update
696 }
697
698 # remove skey (not supported anymore)
699 remove_skey () {
700   pkgrm skey-cn libpam-skey
701
702   if getent group skey > /dev/null; then
703     groupdel skey || true
704     log "groupdel skey"
705   fi
706 }
707
708 # monit it causing problems for postinst scripts
709 # restarting daemons so try to disable it
710 disable_monit () {
711   if pkg monit-cn; then
712     pkgrm monit-cn # disables monit in prerm
713   fi
714
715   # if configured manually
716   if pkg monit; then
717     # remove the binary but leave the config
718     apt-get remove --yes monit
719     # stop the binary
720     pkill -9 monit || true
721   fi
722 }
723
724 # make a silent upgrade to new libc6
725 upgrade_libc () {
726   DEBIAN_FRONTEND=noninteractive pkgadd libc6
727 }
728
729 # upgrade apache2 to etch
730 upgrade_apache2 () {
731   local package packages
732
733   for package in \
734       libapache2-mod-php4 \
735       php4-cli \
736       php4-cgi \
737       php4-cn \
738       apache2-cn \
739       php4-odbc \
740       php4-suhosin \
741       php-suhosin-cn
742   do
743       if pkg $package; then
744           packages="$packages $package"
745       fi
746   done
747
748   # enable suhosin downgrade to etch version
749   if pkg php4-suhosin; then
750       pkgrm php4-suhosin php-suhosin-cn
751   fi
752
753   eval pkgadd $packages
754 }
755
756 upgrade_amavis () {
757   local conf
758
759   # remove init script diversion before upgrade
760   if pkg amavisd-cn lt 3:2.4.2-4; then 
761     if [ -L /etc/init.d/amavis -a -f /etc/init.d/amavis.amavisd-new ]; then
762       rm -vf /etc/init.d/amavis
763       dpkg-divert --remove /etc/init.d/amavis
764     fi
765   fi
766
767   # move old config aside
768   for conf in /etc/amavisd.conf /etc/amavis/amavisd.conf; do
769     if [ -e $conf -a ! -e $conf.$backup_ext ]; then
770       mv -v $conf $conf.$backup_ext
771     fi
772   done
773
774   # install new packages
775   pkgadd amavisd-cn amavisd-new
776
777   # fix new packages
778   check_and_sed '^clamd.*5.clamav.log$' \
779                 's/^\(clamd.*\)5.clamav.log$/\14\tsocket/g' \
780                 /etc/init.d/amavisd-cn || true
781
782   # check if link got lost
783   if pkg amavisd-cn && [ ! -L /etc/init.d/amavis ]; then
784     apt-get install --reinstall --yes amavisd-cn
785   fi
786
787   # start new packages
788   /etc/init.d/amavis restart
789 }
790
791 # fix openldap-aai postinst user handling
792 upgrade_openldap () {
793   pkg openldap-aai lt 2.3 || return 0
794
795   # openldap-aai expects org.ldif to exists
796   local ldif=/var/lib/ldap/org.ldif
797   local ldif_backup=/var/lib/carnet-upgrade/org.ldif
798   if [ -f $ldif ]; then
799     cp -v $ldif $ldif_backup
800   fi
801
802   # slapd postinst fails if move_old_database is false
803   echo 'slapd slapd/move_old_database boolean true' | debconf-set-selections 
804   pkgadd slapd
805
806   # slapd removes org.ldif during switch from ldap -> openldap user
807   if [ -f $ldif_backup -a ! -f $ldif ]; then
808     cp -v $ldif_backup $ldif
809   fi
810
811   # openldap-aai postinst fails here because of database permissions
812   apt-get -y install openldap-aai || true
813   chown -R openldap:openldap /var/lib/ldap
814   /etc/init.d/slapd restart
815   dpkg --configure -a
816
817   # remove ldap user if openldap works
818   if getent passwd ldap      > /dev/null && \
819      getent passwd openldap  > /dev/null && \
820      pgrep -U openldap slapd > /dev/null
821   then
822      log "userdel ldap (replaced by openldap)"
823      userdel ldap || true
824   fi
825 }
826
827 # fix postgresql deinstallation during upgrade
828 upgrade_postgresql () {
829   if check_services show 2>&1 | grep -qw postgresql; then
830      apt-get install -y postgresql || apt-get -yf install
831   fi
832 }
833
834 # upgrade the MTA
835 upgrade_postfix () {
836   pkgadd postfix-cn
837
838   if pkg postgrey; then
839      pkgrm postgrey # not used by postfix-cn anymore
840   fi
841 }
842
843 get_variable () {
844   local name=$1 file=$2 val
845
846   if [ -f "$file" ]; then
847      val=$(sed -n "/^[[:space:]]*$name[[:space:]]*=/s/[[:space:]]*//gp" $file)
848      val=${val#*=}
849   fi
850
851   echo $val
852 }
853
854 # preserve mail location on upgrade
855 upgrade_dovecot () {
856   local default_mail_env mail_location
857
858   # check if already upgraded
859   if ! pkg dovecot-common lt 1.0; then
860       return
861   fi
862
863   # save old mail location
864   default_mail_env=$(get_variable default_mail_env /etc/dovecot/dovecot.conf)
865
866   # silently upgrade package
867   restore_config /etc/dovecot/dovecot.conf
868   pkgadd dovecot-cn
869
870   # insert old mail location
871   mail_location=$(get_variable mail_location /etc/dovecot/dovecot.conf)
872   if [ "$default_mail_env" -a ! "$mail_location" ]; then
873       check_and_sed '^#mail_location[[:space:]]*=' \
874                    "s|#mail_location[[:space:]]*=.*|mail_location = $default_mail_env|" /etc/dovecot/dovecot.conf || return 0
875
876       if [ -x /etc/init.d/dovecot ]; then
877           if [ -x /usr/sbin/invoke-rc.d ]; then
878               /usr/sbin/invoke-rc.d dovecot restart
879           else
880               /etc/init.d/dovecot restart
881           fi
882       fi
883   fi
884 }
885
886 # fix /etc/dpkg/dpkg.cfg
887 comment_force_overwrite () {
888   if [ -f /etc/dpkg/dpkg.cfg ]; then
889     if check_and_sed '^force-overwrite' \
890                   's,\(^force-overwrite\),#\1,' \
891                   /etc/dpkg/dpkg.cfg; then
892       notice "$msg_comment_force_overwrite"
893     fi
894   fi
895 }
896
897 fix_issue () {
898   cat > /etc/issue <<EOF
899 Debian GNU/Linux 4.0 (CARNet Debian 4.0) \\n \\l
900 EOF
901
902   cat > /etc/issue.net <<EOF
903 Debian GNU/Linux 4.0 (CARNet Debian 4.0) %h
904 EOF
905 }
906
907 check_archives_space() {
908   local available_disk_space archives_size
909   available_disk_space=$(free_space /var/cache/apt/archives/)
910   archives_size=$(download_size dist-upgrade)
911
912   if [ $? -ne 0 ]; then
913     log "Failed to get download size, skipping check."
914     return 0
915   fi
916
917   log "Archives space: ${available_disk_space}MB"
918   log "Download size: ${archives_size}MB"
919
920   if [ $available_disk_space -lt $archives_size ]; then
921     log "carnet-upgrade aborted: not enough space in /var/cache/apt/archives/ (have ${available_disk_space}MB, need ${archives_size}MB)"
922     notice "Premalo slobodnog mjesta u /var/cache/apt/archives/ za skidanje paketa (potrebno je barem ${archives_size}MB). Procitajte poglavlje 'Izvanredne situacije' u dokumentaciji."
923     exit 1
924   fi
925 }
926
927 check_kernel_space() {
928   local available_disk_space kernel_size
929   available_disk_space=$(free_space /)
930   kernel_size=$(installed_size kernel-2.6-cn)
931
932   if [ $? -ne 0 ]; then
933     log "Failed to get installed size, skipping check."
934     return 0
935   fi
936
937   log "Free space in /: ${available_disk_space}MB"
938   log "Kernel size: ${kernel_size}MB"
939
940   if LC_ALL=C apt-get --yes --print-uris install kernel-2.6-cn \
941      | grep -q '^kernel-2.6-cn is already the newest version.$'
942   then
943      log "Not checking free space in /: kernel-2.6-cn already installed"
944      return
945   fi
946
947   if [ $available_disk_space -lt $kernel_size ]; then
948     log "carnet-upgrade aborted: not enough space in / (have ${available_disk_space}MB, need ${kernel_size}MB)"
949     notice "Premalo mjesta u / za instalaciju kernela (potrebno je barem ${kernel_size}MB). Procitajte poglavlje 'Izvanredne situacije' u dokumentaciji."
950     exit 1
951   fi
952 }
953
954 free_space() {
955   df --portability --block-size=1M "$1" | tail -1 | awk '{print $4}'
956 }
957
958 download_size() {
959   local size
960   size=$(LC_ALL=C apt-get --yes --print-uris "$@" | grep '^Need to get ')
961
962   if [ $? -ne 0 ]; then
963     log "Failed to get download size for 'apt-get $@'."
964     return 1
965   fi
966
967   size=${size#Need to get }
968   size=${size%%B*}
969
970   size_to_mb "${size}B"
971 }
972
973 installed_size() {
974   local package size
975   package=$1
976   size=$(apt-cache show $package | grep '^Installed-Size:')
977
978   if [ $? -ne 0 ]; then
979     log "Failed to get installed size for '$package'."
980     return 1
981   fi
982
983   size=${size#*: }
984
985   size_to_mb "${size}kB"
986 }
987
988 size_to_mb() {
989   local size
990   size=$1
991   if [ -z "$size" ]; then
992     size=0;
993   fi
994
995   if [ "${size%kB}" != "$size" ]; then
996     size=$(round ${size%kB})
997     size=$(($size/1024+1))
998   elif [ "${size%MB}" != "$size" ]; then
999     size=$(round ${size%MB})
1000   elif [ "${size%GB}" != "$size" ]; then
1001     size=$(round ${size%GB})
1002     size=$(($size*1024))
1003   elif [ "${size%[0-9]B}" != "$size" ]; then
1004     size=$(round ${size%B})
1005     size=$(($size/1024/1024+1))
1006   else
1007     log "unrecognized size unit: $size"
1008     return 1
1009   fi
1010
1011   echo $size
1012 }
1013
1014 round() {
1015   local num
1016   num=$1
1017
1018   if [ "${num%.*}" != "$num" ]; then
1019     num=${num%.*}
1020     num=$(($num+1))
1021   fi
1022
1023   echo $num
1024 }