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 fi
 250
 251 if [ -z "$merge" ] && [ -z "$to_remove" ]; then
 252         echo nothing to do
 253         exit 0
 254 fi
 255
 256 echo "merge: $merge"
 257
 258 # finally, merge everything
 259 for mergepkg in $merge; do
 260         pkgid=${mergepkg%:*}
 261         pkgfile=${mergepkg#*:}
 262
 263         # we could have found the package already in the localdb
 264         # in which case, we don't need to merge it
 265         # TODO check for symlinks?
 266         if [ $pkgfile != $ZPMDB ]; then
 267                 echo merging $pkgfile $pkgid
 268                 zpm merge -Fuv -f "$pkgfile" $pkgid
 269         fi
 270         to_install="$to_install $pkgid"
 271 done
 272
 273 to_install=${to_install#' '}
 274
 275 echo "installing: $to_install"
 276
 277 # absorb anything we're updating or removing, if absorb flag set
 278
 279 if [ -n "$to_install" ]; then
 280         for pkgid in $to_install; do
 281                 current=$(current_version $pkgid)
 282                 maybe_run pre-install $pkgid $runscripts $current || die
 283         done
 284 fi
 285
 286 if [ -n "$to_remove" ]; then
 287         for pkgid in $to_remove; do
 288                 maybe_run pre-remove $pkgid $runscripts || die
 289         done
 290 fi
 291
 292 if [ -n "$to_install" ]; then
 293         for pkgid in $to_install; do
 294                 zpm pkg $pkgid status=installing
 295         done
 296         zpm shell "$ZPMDB" "update packages set status='updating' where status='installed' and package in (select package from packages where status = 'installing')"
 297 fi
 298
 299 if [ -n "$to_remove" ]; then
 300         for pkgid in $to_remove; do
 301                 zpm pkg $pkgid status=removing
 302         done
 303 fi
 304
 305 if [ -n "$rootdir" ]; then
 306         ZPM_ROOT_DIR=$rootdir
 307         export ZPM_ROOT_DIR
 308         : rootdir=${rootdir%%/}
 309 fi
 310
 311 if [ $dryrun -gt 0 ]; then
 312         runscripts=0 # we don't want to run post scripts on a dry-run
 313         syncopts="$syncopts -n"
 314 fi
 315
 316 if [ $verbose -gt 0 ]; then
 317         syncopts="${syncopts} -v"
 318 else
 319         # force -v during development
 320         syncopts="${syncopts} -v"
 321 fi
 322
 323 if [ $dryrun -eq 0 ] && [ $backup -eq 1 ]; then
 324         true
 325         #zpm absorb -s updating
 326         #zpm absorb -s removing
 327 fi
 328
 329 zpm syncfs $syncopts || die 'zpm-syncfs failed';
 330
 331 if [ -n "$to_remove" ]; then
 332         for pkgid in $to_remove; do
 333                 maybe_run post-remove $pkgid $runscripts
 334         done
 335 fi
 336
 337 changeall removing removed
 338 changeall updating updated
 339
 340 echo running ldconfig
 341 run_ldconfig $rootdir
 342
 343 if [ -n "$to_install" ]; then
 344         for pkgid in $to_install; do
 345                 package=$(zpm parse -n $pkgid)
 346                 current=$(zpm list -s installed "$package")
 347
 348                 maybe_run post-install $pkgid $runscripts $current
 349
 350                 if [ -n "$current" ]; then
 351                         zpm pkg $pkgid status=installed :$current status=updated
 352                 else
 353                         zpm pkg $pkgid status=installed
 354                 fi
 355
 356                 maybe_run configure $pkgid $runconfigure
 357         done
 358 fi
 359 echo install complete