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 pullrepos=1
 106
 107 # treat un-adorned packages as uninstalls
 108 uninstall=0
 109
 110 # TODO option to attempt to resume an ongoing install
 111 # zpm-install [-SCn] [ -d localdb ] [ -f pkgfile ] [ -R installroot ] pkgstr ...
 112 while getopts f:d:R:nSCvAObBLUz opt; do
 113         case $opt in
 114                 f) pkgfile="$OPTARG" ;;
 115                 d) localdb="$OPTARG" ;;
 116                 P) packagepath="$OPTARG" ;;
 117                 D) packagepath="$OPTARG:$packagepath" ;;
 118                 R) rootdir="$OPTARG" ;;
 119                 S) runscripts=0 ;;
 120                 C) runconfigure=0 ;;
 121                 A) absorb=1; syncopts="${syncopts} -A" ;;
 122                 O) overwrite=1; syncopts="${syncopts} -O" ;;
 123                 n) dryrun=1 ;;
 124                 v) verbose=1 ;;
 125                 b) backup=1 ;;
 126                 B) backup=0 ;;
 127                 L) ignorelibdeps=1 ;;
 128                 l) justlist=1 ;;
 129                 U) uninstall=1 ;;
 130                 z) pullrepos=0 ;;
 131                 *) die "usage ..." ;;
 132         esac
 133 done
 134 shift $(( OPTIND - 1))
 135
 136 ZPMDB=${localdb:-${ZPMDB:-/var/lib/zpm/local.db}}
 137 export ZPMDB
 138 # create the localdb if needed
 139 zpm init $ZPMDB
 140
 141 zpm test -v "$ZPMDB" || die "$ZPMDB is not a zpm database"
 142
 143 validity_check
 144
 145 for op in "$@"; do
 146         case "$op" in
 147                 -*) pkgid=$(zpm findpkg -I "${op#-}")
 148                         if [ -n "$pkgid" ]; then
 149                                 to_remove="$to_remove $pkgid"
 150                         else
 151                                 die "$op not installed"
 152                         fi
 153                         ;;
 154                 +*) pkg=${op#+}
 155                         search="$search $pkg"
 156                         ;;
 157                 *:*) pkg=${op%:*}
 158                         file=${op#*:}
 159                         pkgid=$(zpm findpkg -f $file $pkg)
 160                         if [ -n $pkgid ]; then
 161                                 merge="$merge $pkgid:$file"
 162                         else
 163                                 die "can't find $pkg in $file"
 164                         fi
 165                         ;;
 166                 *)
 167                         if [ $uninstall -eq 0 ]; then
 168                                 search="$search $op"
 169                         else
 170                                 pkgid=$(zpm findpkg -I "${op}")
 171                                 if [ -n "$pkgid" ]; then
 172                                         to_remove="$to_remove $pkgid"
 173                                 else
 174                                         die "$op not installed"
 175                                 fi
 176                         fi
 177                         ;;
 178         esac
 179 done
 180
 181 search=$(echo $search)
 182
 183 ebail=0
 184
 185 if [ $pullrepos -eq 1 ]; then
 186         echo pulling repos
 187         zpm repo pull
 188 fi
 189
 190 if [ $ignorelibdeps -eq 1 ]; then
 191         merge=$(zpm search -iIO $search)
 192 else
 193         merge=$(zpm search -iIO -l $search)
 194 fi
 195
 196 if [ $? -ne 0 ]; then
 197         warn "unmet packages or dependencies, or errors"
 198         exit 1
 199 fi
 200
 201 installset=
 202 for mergepkg in $merge; do
 203         pkgid=${mergepkg%%:*}
 204         installset="$installset $pkgid"
 205 done
 206 installset=$(printf "%s\n" $installset | sort -u)
 207
 208 # TODO check for downgrade
 209
 210 # fixup package
 211 nlist=
 212 nfound=
 213 baddl=
 214 for mergepkg in $merge; do
 215         pkgid=${mergepkg%:*}
 216         repofile=${mergepkg#*:}
 217         if [ ${repofile##*.} = 'repo' ]; then
 218                 status=$(zpm pkg -f $repofile $pkgid status)
 219                 reponame=$(basename $repofile .repo)
 220                 if [ "$status" != 'merged' ]; then
 221                         repodir=$(dirname $repofile)
 222                         zpmfile=$repodir/$reponame/$pkgid.zpm
 223                         if [ -f "$zpmfile" ]; then
 224                                 nlist="$nlist $pkgid:$zpmfile"
 225                                 continue
 226                         else
 227                                 echo downloading $zpmfile
 228                                 zpm repo fetch $reponame $pkgid
 229                                 if [ -f "$zpmfile" ]; then
 230                                         nlist="$nlist $pkgid:$zpmfile"
 231                                 else
 232                                         baddl="$baddl $reponame:$pkgid"
 233                                 fi
 234                         fi
 235                 fi
 236         else
 237                 nlist="$nlist $mergepkg"
 238         fi
 239 done
 240 merge=${nlist#' '}
 241 baddl=${baddl#' '}
 242
 243 if [ -n "$baddl" ]; then
 244         printf 'unable to download: %s\n' $baddl
 245         die
 246 fi
 247
 248 for package in $merge; do
 249         pkgid=${package%:*}
 250         installlist="$installlist $pkgid"
 251 done
 252 installlist=${installlist#' '}
 253
 254 if [ $justlist -eq 1 ]; then
 255         for package in $merge; do
 256                 pkgid=${package%:*}
 257                 printf 'install %s\n' $pkgid
 258         done
 259         for pkgid in $to_remove; do
 260                 printf 'remove %s\n' $pkgid
 261         done
 262         exit 0
 263 fi
 264
 265 if [ -z "$merge" ] && [ -z "$to_remove" ]; then
 266         echo nothing to do
 267         exit 0
 268 fi
 269
 270 test -n "$merge" && echo "install: $installlist"
 271 test -n "$to_remove" && echo "remove: $to_remove"
 272
 273 # finally, merge everything
 274 for mergepkg in $merge; do
 275         pkgid=${mergepkg%:*}
 276         pkgfile=${mergepkg#*:}
 277
 278         # we could have found the package already in the localdb
 279         # in which case, we don't need to merge it
 280         # TODO check for symlinks?
 281         if [ $pkgfile != $ZPMDB ]; then
 282                 echo merging $pkgfile $pkgid
 283                 zpm merge -Fuv -f "$pkgfile" $pkgid
 284                 if [ $? -ne 0 ]; then
 285                         die "unable to merge $pkgfile"
 286                 fi
 287         fi
 288         to_install="$to_install $pkgid"
 289 done
 290
 291 to_install=${to_install#' '}
 292
 293 echo "installing: $to_install"
 294
 295 # absorb anything we're updating or removing, if absorb flag set
 296
 297 if [ -n "$to_install" ]; then
 298         for pkgid in $to_install; do
 299                 current=$(current_version $pkgid)
 300                 maybe_run pre-install $pkgid $runscripts $current || die
 301         done
 302 fi
 303
 304 if [ -n "$to_remove" ]; then
 305         for pkgid in $to_remove; do
 306                 maybe_run pre-remove $pkgid $runscripts || die
 307         done
 308 fi
 309
 310 if [ -n "$to_install" ]; then
 311         for pkgid in $to_install; do
 312                 zpm pkg $pkgid status=installing
 313         done
 314         zpm shell "$ZPMDB" "update packages set status='updating' where status='installed' and package in (select package from packages where status = 'installing')"
 315 fi
 316
 317 if [ -n "$to_remove" ]; then
 318         for pkgid in $to_remove; do
 319                 zpm pkg $pkgid status=removing
 320         done
 321 fi
 322
 323 if [ -n "$rootdir" ]; then
 324         ZPM_ROOT_DIR=$rootdir
 325         export ZPM_ROOT_DIR
 326         : rootdir=${rootdir%%/}
 327 fi
 328
 329 if [ $dryrun -gt 0 ]; then
 330         runscripts=0 # we don't want to run post scripts on a dry-run
 331         syncopts="$syncopts -n"
 332 fi
 333
 334 if [ $verbose -gt 0 ]; then
 335         syncopts="${syncopts} -v"
 336 else
 337         # force -v during development
 338         syncopts="${syncopts} -v"
 339 fi
 340
 341 if [ $dryrun -eq 0 ] && [ $backup -eq 1 ]; then
 342         true
 343         #zpm absorb -s updating
 344         #zpm absorb -s removing
 345 fi
 346
 347 zpm syncfs $syncopts || die 'zpm-syncfs failed';
 348
 349 if [ -n "$to_remove" ]; then
 350         for pkgid in $to_remove; do
 351                 maybe_run post-remove $pkgid $runscripts
 352         done
 353 fi
 354
 355 changeall removing removed
 356 changeall updating updated
 357
 358 echo running ldconfig
 359 run_ldconfig $rootdir
 360
 361 if [ -n "$to_install" ]; then
 362         for pkgid in $to_install; do
 363                 package=$(zpm parse -n $pkgid)
 364                 current=$(zpm list -s installed "$package")
 365
 366                 maybe_run post-install $pkgid $runscripts $current
 367
 368                 if [ -n "$current" ]; then
 369                         zpm pkg $pkgid status=installed :$current status=updated
 370                 else
 371                         zpm pkg $pkgid status=installed
 372                 fi
 373
 374                 maybe_run configure $pkgid $runconfigure
 375         done
 376 fi
 377 echo install complete