pd.if.org Git - zpackage/blob - zpm-update

   1 #!/bin/sh
   2
   3 warn() {
   4         echo $* 1>&2
   5 }
   6
   7 run_ldconfig() {
   8         if [ $(id -u) -eq 0 ]; then
   9                 if [ ! -d $1/etc ]; then
  10                         warn "no etc directory in $1, skipping ldconfig"
  11                 elif [ -f $1/sbin/ldconfig ]; then
  12                         $1/sbin/ldconfig -r ${1:-/}
  13                 elif [ -f /sbin/ldconfig ]; then
  14                         /sbin/ldconfig -r ${1:-/}
  15                 else
  16                         true
  17                 fi
  18         fi
  19 }
  20
  21 changeall() {
  22         for pkgid in $(zpm list -s $1); do
  23                 zpm pkg $pkgid status=$2
  24         done
  25 }
  26
  27 die() {
  28         if [ $# -gt 0 ]; then
  29                 echo $* 1>&2
  30         fi
  31         zpm log -i -a 'aborted install' -t "$pkgid" "$*"
  32         changeall installing
  33         changeall removing installed
  34         changeall updating installed
  35         exit 1
  36 }
  37
  38 current_version() (
  39         zpm list -s installed $(zpm parse -n $1)
  40 )
  41
  42 maybe_run() (
  43         phase=$1
  44         pkgid=$2
  45         run=${3:-0}
  46         current=$4
  47
  48         if [ $run -gt 0 ]; then
  49                 zpm script -p $phase $pkgid $current
  50                 rv=$?
  51                 if [ $rv -ne 0 ]; then
  52                         warn "$phase script for $pkgid failed"
  53                         exit $rv
  54                 fi
  55         else
  56                 if zpm script -Fql -p $phase $pkgid; then
  57                         zpm note -e -p $pkgid -m "$phase script not run"
  58                 fi
  59         fi
  60 )
  61
  62 validity_check() {
  63         rv=0
  64         # check if we're installing something already
  65         var=$(zpm list -s installing | wc -l)
  66         if [ $var -gt 0 ]; then
  67                 zpm list -v -f $localdb -s installing
  68                 warn "already ($localdb) installing $var package(s)"
  69                 rv=1
  70         fi
  71         var=$(zpm list -s removing | wc -l)
  72         if [ $var -gt 0 ]; then
  73                 zpm list -v -f $localdb -s removing
  74                 warn "already ($localdb) removing $var package(s)"
  75                 rv=1
  76         fi
  77         var=$(zpm list -s updating | wc -l)
  78         if [ $var -gt 0 ]; then
  79                 zpm list -v -f $localdb -s updating
  80                 warn "already ($localdb) updating $var package(s)"
  81                 rv=1
  82         fi
  83         if [ $rv -ne 0 ]; then
  84                 die "aborting update"
  85         fi
  86 }
  87
  88 dryrun=0
  89 verbose=0
  90 runscripts=1
  91 runconfigure=1
  92 absorb=0
  93 overwrite=0
  94 syncopts=''
  95
  96 packagepath="/var/lib/zpm/packages"
  97 to_install=
  98 to_remove=
  99 to_update=
 100 install_for_libs=''
 101
 102 backup=0
 103 ignorelibdeps=0
 104 justlist=0
 105
 106 # treat un-adorned packages as uninstalls
 107 uninstall=0
 108
 109 # TODO option to attempt to resume an ongoing install
 110 # zpm-install [-SCn] [ -d localdb ] [ -f pkgfile ] [ -R installroot ] pkgstr ...
 111 while getopts f:d:R:nSCvAObBLU opt; do
 112         case $opt in
 113                 f) pkgfile="$OPTARG" ;;
 114                 d) localdb="$OPTARG" ;;
 115                 P) packagepath="$OPTARG" ;;
 116                 D) packagepath="$OPTARG:$packagepath" ;;
 117                 R) rootdir="$OPTARG" ;;
 118                 S) runscripts=0 ;;
 119                 C) runconfigure=0 ;;
 120                 A) absorb=1; syncopts="${syncopts} -A" ;;
 121                 O) overwrite=1; syncopts="${syncopts} -O" ;;
 122                 n) dryrun=1 ;;
 123                 v) verbose=1 ;;
 124                 b) backup=1 ;;
 125                 B) backup=0 ;;
 126                 L) ignorelibdeps=1 ;;
 127                 l) justlist=1 ;;
 128                 U) uninstall=1 ;;
 129                 *) die "usage ..." ;;
 130         esac
 131 done
 132 shift $(( OPTIND - 1))
 133
 134 ZPMDB=${localdb:-${ZPMDB:-/var/lib/zpm/local.db}}
 135 export ZPMDB
 136 # create the localdb if needed
 137 zpm init $ZPMDB
 138
 139 zpm test -v "$ZPMDB" || die "$ZPMDB is not a zpm database"
 140
 141 validity_check
 142
 143 for op in "$@"; do
 144         case "$op" in
 145                 -*) pkgid=$(zpm findpkg -I "${op#-}")
 146                         if [ -n "$pkgid" ]; then
 147                                 to_remove="$to_remove $pkgid"
 148                         else
 149                                 die "$op not installed"
 150                         fi
 151                         ;;
 152                 +*) pkg=${op#+}
 153                         search="$search $pkg"
 154                         ;;
 155                 *:*) pkg=${op%:*}
 156                         file=${op#*:}
 157                         pkgid=$(zpm findpkg -f $file $pkg)
 158                         if [ -n $pkgid ]; then
 159                                 merge="$merge $pkgid:$file"
 160                         else
 161                                 die "can't find $pkg in $file"
 162                         fi
 163                         ;;
 164                 *)
 165                         if [ $uninstall -eq 0 ]; then
 166                                 search="$search $op"
 167                         else
 168                                 pkgid=$(zpm findpkg -I "${op}")
 169                                 if [ -n "$pkgid" ]; then
 170                                         to_remove="$to_remove $pkgid"
 171                                 else
 172                                         die "$op not installed"
 173                                 fi
 174                         fi
 175                         ;;
 176         esac
 177 done
 178
 179 search=$(echo $search)
 180
 181 ebail=0
 182
 183 if [ $ignorelibdeps -eq 1 ]; then
 184         merge=$(zpm search -iIO $search)
 185 else
 186         merge=$(zpm search -iIO -l $search)
 187 fi
 188
 189 if [ $? -ne 0 ]; then
 190         warn "unmet packages or dependencies, or errors"
 191         exit 1
 192 fi
 193
 194 installset=
 195 for mergepkg in $merge; do
 196         pkgid=${mergepkg%%:*}
 197         installset="$installset $pkgid"
 198 done
 199 installset=$(printf "%s\n" $installset | sort -u)
 200
 201 # TODO check for downgrade
 202
 203 # fixup package
 204 nlist=
 205 nfound=
 206 baddl=
 207 for mergepkg in $merge; do
 208         pkgid=${mergepkg%:*}
 209         repofile=${mergepkg#*:}
 210         if [ ${repofile##*.} = 'repo' ]; then
 211                 status=$(zpm pkg -f $repofile $pkgid status)
 212                 reponame=$(basename $repofile .repo)
 213                 if [ "$status" != 'merged' ]; then
 214                         repodir=$(dirname $repofile)
 215                         zpmfile=$repodir/$reponame/$pkgid.zpm
 216                         if [ -f "$zpmfile" ]; then
 217                                 nlist="$nlist $pkgid:$zpmfile"
 218                                 continue
 219                         else
 220                                 echo downloading $zpmfile
 221                                 zpm repo fetch $reponame $pkgid
 222                                 if [ -f "$zpmfile" ]; then
 223                                         nlist="$nlist $pkgid:$zpmfile"
 224                                 else
 225                                         baddl="$baddl $reponame:$pkgid"
 226                                 fi
 227                         fi
 228                 fi
 229         else
 230                 nlist="$nlist $mergepkg"
 231         fi
 232 done
 233 merge=${nlist#' '}
 234 baddl=${baddl#' '}
 235
 236 if [ -n "$baddl" ]; then
 237         printf 'unable to download: %s\n' $baddl
 238         die
 239 fi
 240
 241 if [ $justlist -eq 1 ]; then
 242         for package in $merge; do
 243                 pkgid=${package%:*}
 244                 printf 'install %s\n' $pkgid
 245         done
 246         for pkgid in $to_remove; do
 247                 printf 'remove %s\n' $pkgid
 248         done
 249         exit 0
 250 fi
 251
 252 if [ -z "$merge" ] && [ -z "$to_remove" ]; then
 253         echo nothing to do
 254         exit 0
 255 fi
 256
 257 test -n "$merge" && echo "install: $merge"
 258 test -n "$to_remove" && echo "remove: $to_remove"
 259
 260 # finally, merge everything
 261 for mergepkg in $merge; do
 262         pkgid=${mergepkg%:*}
 263         pkgfile=${mergepkg#*:}
 264
 265         # we could have found the package already in the localdb
 266         # in which case, we don't need to merge it
 267         # TODO check for symlinks?
 268         if [ $pkgfile != $ZPMDB ]; then
 269                 echo merging $pkgfile $pkgid
 270                 zpm merge -Fuv -f "$pkgfile" $pkgid
 271                 if [ $? -ne 0 ]; then
 272                         die "unable to merge $pkgfile"
 273                 fi
 274         fi
 275         to_install="$to_install $pkgid"
 276 done
 277
 278 to_install=${to_install#' '}
 279
 280 echo "installing: $to_install"
 281
 282 # absorb anything we're updating or removing, if absorb flag set
 283
 284 if [ -n "$to_install" ]; then
 285         for pkgid in $to_install; do
 286                 current=$(current_version $pkgid)
 287                 maybe_run pre-install $pkgid $runscripts $current || die
 288         done
 289 fi
 290
 291 if [ -n "$to_remove" ]; then
 292         for pkgid in $to_remove; do
 293                 maybe_run pre-remove $pkgid $runscripts || die
 294         done
 295 fi
 296
 297 if [ -n "$to_install" ]; then
 298         for pkgid in $to_install; do
 299                 zpm pkg $pkgid status=installing
 300         done
 301         zpm shell "$ZPMDB" "update packages set status='updating' where status='installed' and package in (select package from packages where status = 'installing')"
 302 fi
 303
 304 if [ -n "$to_remove" ]; then
 305         for pkgid in $to_remove; do
 306                 zpm pkg $pkgid status=removing
 307         done
 308 fi
 309
 310 if [ -n "$rootdir" ]; then
 311         ZPM_ROOT_DIR=$rootdir
 312         export ZPM_ROOT_DIR
 313         : rootdir=${rootdir%%/}
 314 fi
 315
 316 if [ $dryrun -gt 0 ]; then
 317         runscripts=0 # we don't want to run post scripts on a dry-run
 318         syncopts="$syncopts -n"
 319 fi
 320
 321 if [ $verbose -gt 0 ]; then
 322         syncopts="${syncopts} -v"
 323 else
 324         # force -v during development
 325         syncopts="${syncopts} -v"
 326 fi
 327
 328 if [ $dryrun -eq 0 ] && [ $backup -eq 1 ]; then
 329         true
 330         #zpm absorb -s updating
 331         #zpm absorb -s removing
 332 fi
 333
 334 zpm syncfs $syncopts || die 'zpm-syncfs failed';
 335
 336 if [ -n "$to_remove" ]; then
 337         for pkgid in $to_remove; do
 338                 maybe_run post-remove $pkgid $runscripts
 339         done
 340 fi
 341
 342 changeall removing removed
 343 changeall updating updated
 344
 345 echo running ldconfig
 346 run_ldconfig $rootdir
 347
 348 if [ -n "$to_install" ]; then
 349         for pkgid in $to_install; do
 350                 package=$(zpm parse -n $pkgid)
 351                 current=$(zpm list -s installed "$package")
 352
 353                 maybe_run post-install $pkgid $runscripts $current
 354
 355                 if [ -n "$current" ]; then
 356                         zpm pkg $pkgid status=installed :$current status=updated
 357                 else
 358                         zpm pkg $pkgid status=installed
 359                 fi
 360
 361                 maybe_run configure $pkgid $runconfigure
 362         done
 363 fi
 364 echo install complete