9 # list [-v ] [ name ... ]
12 # packages [ name ... ] -- like zpm list
13 # contents [ name ... ] -- like zpm contents
14 # search [ name ] -- packages
15 # push name ckagefile ...
16 # pull name package ...
17 # extract -- extract metadata from repo
18 # json - extract metadata as json
19 # setpkgurl packageid url
20 # update - pull info from remote
21 # gc [name] - run zpm gc on repo file
26 while getopts :R:d: opt; do
28 R) pkgroot="$OPTARG" ;;
35 for cf in /etc/zpmrc ~/.zpmrc ./.zpmrc; do
41 : ${ZPMDB:=$pkgroot/var/lib/zpm/local.db}
43 repodir=/var/lib/zpm/repo
49 printf '%s:' "$0" 1>&2
66 name=$(zpm quote "$1")
68 if [ -n "$name" ]; then
69 where="where name = '$name'"
71 zpm shell -separator ' ' $ZPMDB "select $cols from repository $where order by priority,name"
75 name=$(zpm quote "$1")
78 if [ -n "$name" ]; then
79 where="where name = '$name'"
81 zpm shell $ZPMDB "update repository set $col = '$val' $where"
85 zpm shell $ZPMDB "update repository set refreshed = strftime('%s', 'now') where name = '$1'"
93 url=$(select "$repo" url)
94 rf="$repodir/$repo.repo"
96 # TODO merge in so packages aren't deleted
97 curl -f '-#' -z "$rf" -o "$rf.tmp" "$url"
100 curl -f '-#' -o "$rf" "$url" && refresh "$repo"
103 if [ $rv -eq 0 ]; then
104 test -f "$rv.tmp" && mv "$rf.tmp" "$rf"
110 # response=$(curl --write-out %{http_code} --silent --output /dev/null servername)
113 head_response_code() {
114 curl --write-out '%{http_code}' --silent --output /dev/null -z $2 $1
120 url=$(select "$repo" url)
122 for package in "$@"; do
123 pkgid=$(zpm findpkg -f $repodir/$repo.repo $package)
124 if [ -z "$pkgid" ]; then
125 warn "no package found for $package"
127 mkdir -p "$repodir/$repo"
128 dest="$repodir/$repo/$pkgid.zpm"
129 fetch="$base/packages/$pkgid.zpm"
131 if [ -f "$dest" ]; then
132 rc=$(head_response_code $fetch $dest)
133 if [ $rc = 304 ]; then
137 echo downloading $pkgid
138 curl -f '-#' -z "$dest" -o "$dest.tmp" $fetch
139 mv "$dest.tmp" "$dest"
141 echo downloading $pkgid
142 curl -f '-#' -o "$dest.tmp" $fetch
143 mv "$dest.tmp" "$dest"
151 select '' priority,name,url,refreshed ;;
153 name=$(zpm quote "$1")
154 url=$(zpm quote "$2")
155 zpm shell $ZPMDB "insert into repository (name,url) values ('$name', '$url')"
158 name=$(zpm quote "$1")
159 zpm shell $ZPMDB "delete from repository where name = '$name'"
160 rm -f $repodir/$1.repo
172 update "$1" priority "$2"
186 zpm list -f $repodir/$repo.repo "$@"