| 1 | # ipkg - the itsy package management system
|
|---|
| 2 | #
|
|---|
| 3 | # Copyright (C) 2001 Carl D. Worth
|
|---|
| 4 | #
|
|---|
| 5 | # This program is free software; you can redistribute it and/or modify
|
|---|
| 6 | # it under the terms of the GNU General Public License as published by
|
|---|
| 7 | # the Free Software Foundation; either version 2, or (at your option)
|
|---|
| 8 | # any later version.
|
|---|
| 9 | #
|
|---|
| 10 | # This program is distributed in the hope that it will be useful,
|
|---|
| 11 | # but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|---|
| 12 | # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|---|
| 13 | # GNU General Public License for more details.
|
|---|
| 14 |
|
|---|
| 15 | set -e
|
|---|
| 16 |
|
|---|
| 17 | # By default do not do globbing. Any command wanting globbing should
|
|---|
| 18 | # explicitly enable it first and disable it afterwards.
|
|---|
| 19 | set -o noglob
|
|---|
| 20 |
|
|---|
| 21 | ipkg_is_upgrade () {
|
|---|
| 22 | local A B a b
|
|---|
| 23 | A=$(echo $1 | sed -r "s/([0-9]+)[^[:alnum:]]*/ \1 /g").
|
|---|
| 24 | B=$(echo $2 | sed -r "s/([0-9]+)[^[:alnum:]]*/ \1 /g").
|
|---|
| 25 | while [ \! -z "$A" ] && [ \! -z "$B" ]; do {
|
|---|
| 26 | set $A; a=$1; shift; A=$*
|
|---|
| 27 | set $B; b=$1; shift; B=$*
|
|---|
| 28 | [ "$a" -lt "$b" ] 2>&- && return 1 ||:
|
|---|
| 29 | { [ "$a" -gt "$b" ] 2>&- || [ "$a" ">" "$b" ]; } && return ||:
|
|---|
| 30 | }; done
|
|---|
| 31 | return 1
|
|---|
| 32 | }
|
|---|
| 33 |
|
|---|
| 34 | ipkg_srcs() {
|
|---|
| 35 | local srcre="$1"
|
|---|
| 36 | sed -ne "s/^src[[:space:]]\+$srcre[[:space:]]\+//p" < $IPKG_CONF
|
|---|
| 37 | }
|
|---|
| 38 |
|
|---|
| 39 | ipkg_src_names() {
|
|---|
| 40 | sed -ne "s/^src[[:space:]]\+\([^[:space:]]\+\).*/\1/p" < $IPKG_CONF
|
|---|
| 41 | }
|
|---|
| 42 |
|
|---|
| 43 | ipkg_src_byname() {
|
|---|
| 44 | local src="$1"
|
|---|
| 45 | ipkg_srcs $src | head -n 1
|
|---|
| 46 | }
|
|---|
| 47 |
|
|---|
| 48 | ipkg_dests() {
|
|---|
| 49 | local destre="`echo $1 | ipkg_protect_slashes`"
|
|---|
| 50 | sed -ne "/^dest[[:space:]]\+$destre/{
|
|---|
| 51 | s/^dest[[:space:]]\+[^[:space:]]\+[[:space:]]\+//
|
|---|
| 52 | s/^/`echo $IPKG_OFFLINE_ROOT | ipkg_protect_slashes`/
|
|---|
| 53 | p
|
|---|
| 54 | }" < $IPKG_CONF
|
|---|
| 55 | }
|
|---|
| 56 |
|
|---|
| 57 | ipkg_dest_names() {
|
|---|
| 58 | sed -ne "s/^dest[[:space:]]\+\([^[:space:]]\+\).*/\1/p" < $IPKG_CONF
|
|---|
| 59 | }
|
|---|
| 60 |
|
|---|
| 61 | ipkg_dests_all() {
|
|---|
| 62 | ipkg_dests '.*'
|
|---|
| 63 | }
|
|---|
| 64 |
|
|---|
| 65 | ipkg_state_dirs() {
|
|---|
| 66 | ipkg_dests_all | sed "s|\$|/$IPKG_DIR_PREFIX|"
|
|---|
| 67 | }
|
|---|
| 68 |
|
|---|
| 69 | ipkg_dest_default() {
|
|---|
| 70 | ipkg_dests_all | head -n 1
|
|---|
| 71 | }
|
|---|
| 72 |
|
|---|
| 73 | ipkg_dest_default_name() {
|
|---|
| 74 | ipkg_dest_names | head -n 1
|
|---|
| 75 | }
|
|---|
| 76 |
|
|---|
| 77 | ipkg_dest_byname() {
|
|---|
| 78 | local dest="$1"
|
|---|
| 79 | ipkg_dests $dest | head -n 1
|
|---|
| 80 | }
|
|---|
| 81 |
|
|---|
| 82 | ipkg_option() {
|
|---|
| 83 | local option="$1"
|
|---|
| 84 | sed -ne "s/^option[[:space:]]\+$option[[:space:]]\+//p" < $IPKG_CONF
|
|---|
| 85 | }
|
|---|
| 86 |
|
|---|
| 87 | ipkg_load_configuration() {
|
|---|
| 88 | if [ -z "$IPKG_CONF_DIR" ]; then
|
|---|
| 89 | IPKG_CONF_DIR=/etc
|
|---|
| 90 | fi
|
|---|
| 91 |
|
|---|
| 92 | IPKG_CONF="$IPKG_CONF_DIR/ipkg.conf"
|
|---|
| 93 |
|
|---|
| 94 | if [ -z "$IPKG_OFFLINE_ROOT" ]; then
|
|---|
| 95 | IPKG_OFFLINE_ROOT="`ipkg_option offline_root`"
|
|---|
| 96 | fi
|
|---|
| 97 | # Export IPKG_OFFLINE_ROOT for use by update-alternatives
|
|---|
| 98 | export IPKG_OFFLINE_ROOT
|
|---|
| 99 | if [ -n "$DEST_NAME" ]; then
|
|---|
| 100 | IPKG_ROOT="`ipkg_dest_byname $DEST_NAME`"
|
|---|
| 101 | if [ -z "$IPKG_ROOT" ]; then
|
|---|
| 102 | if [ -d "$IPKG_OFFLINE_ROOT$DEST_NAME" ]; then
|
|---|
| 103 | IPKG_ROOT="$IPKG_OFFLINE_ROOT$DEST_NAME";
|
|---|
| 104 | else
|
|---|
| 105 | echo "ipkg: invalid destination specification: $DEST_NAME
|
|---|
| 106 | Valid destinations are directories or one of the dest names from $IPKG_CONF:" >&2
|
|---|
| 107 | ipkg_dest_names >&2
|
|---|
| 108 | return 1
|
|---|
| 109 | fi
|
|---|
| 110 | fi
|
|---|
| 111 | else
|
|---|
| 112 | IPKG_ROOT="`ipkg_dest_default`"
|
|---|
| 113 | fi
|
|---|
| 114 |
|
|---|
| 115 | # Global ipkg state directories
|
|---|
| 116 | IPKG_DIR_PREFIX=usr/lib/ipkg
|
|---|
| 117 | IPKG_LISTS_DIR=$IPKG_OFFLINE_ROOT/$IPKG_DIR_PREFIX/lists
|
|---|
| 118 | IPKG_PENDING_DIR=$IPKG_OFFLINE_ROOT/$IPKG_DIR_PREFIX/pending
|
|---|
| 119 | if [ -z "$IPKG_TMP" ]; then
|
|---|
| 120 | IPKG_TMP=$IPKG_ROOT/tmp/ipkg
|
|---|
| 121 | fi
|
|---|
| 122 |
|
|---|
| 123 | [ -e "$IPKG_TMP" ] || mkdir -p $IPKG_TMP
|
|---|
| 124 |
|
|---|
| 125 | # Destination specific ipkg meta-data directory
|
|---|
| 126 | IPKG_STATE_DIR=$IPKG_ROOT/$IPKG_DIR_PREFIX
|
|---|
| 127 |
|
|---|
| 128 | # Proxy Support
|
|---|
| 129 | IPKG_PROXY_USERNAME="`ipkg_option proxy_username`"
|
|---|
| 130 | IPKG_PROXY_PASSWORD="`ipkg_option proxy_password`"
|
|---|
| 131 | IPKG_HTTP_PROXY="`ipkg_option http_proxy`"
|
|---|
| 132 | IPKG_FTP_PROXY="`ipkg_option ftp_proxy`"
|
|---|
| 133 | IPKG_NO_PROXY="`ipkg_option no_proxy`"
|
|---|
| 134 | if [ -n "$IPKG_HTTP_PROXY" ]; then
|
|---|
| 135 | export http_proxy="$IPKG_HTTP_PROXY"
|
|---|
| 136 | fi
|
|---|
| 137 |
|
|---|
| 138 | if [ -n "$IPKG_FTP_PROXY" ]; then
|
|---|
| 139 | export ftp_proxy="$IPKG_FTP_PROXY"
|
|---|
| 140 | fi
|
|---|
| 141 |
|
|---|
| 142 | if [ -n "$IPKG_NO_PROXY" ]; then
|
|---|
| 143 | export no_proxy="$IPKG_NO_PROXY"
|
|---|
| 144 | fi
|
|---|
| 145 |
|
|---|
| 146 | IPKG_STATUS_FIELDS='\(Package\|Status\|Essential\|Version\|Conffiles\|Root\)'
|
|---|
| 147 | }
|
|---|
| 148 |
|
|---|
| 149 | ipkg_usage() {
|
|---|
| 150 | [ $# -gt 0 ] && echo "ipkg: $*" ||:
|
|---|
| 151 | echo "
|
|---|
| 152 | usage: ipkg [options...] sub-command [arguments...]
|
|---|
| 153 | where sub-command is one of:
|
|---|
| 154 |
|
|---|
| 155 | Package Manipulation:
|
|---|
| 156 | update Update list of available packages
|
|---|
| 157 | upgrade Upgrade all installed packages to latest version
|
|---|
| 158 | install <pkg> Download and install <pkg> (and dependencies)
|
|---|
| 159 | install <file.ipk> Install package <file.ipk>
|
|---|
| 160 | install <file.deb> Install package <file.deb>
|
|---|
| 161 | remove <pkg> Remove package <pkg>
|
|---|
| 162 |
|
|---|
| 163 | Informational Commands:
|
|---|
| 164 | list List available packages and descriptions
|
|---|
| 165 | files <pkg> List all files belonging to <pkg>
|
|---|
| 166 | search <file> Search for a packaging providing <file>
|
|---|
| 167 | info [pkg [<field>]] Display all/some info fields for <pkg> or all
|
|---|
| 168 | status [pkg [<field>]] Display all/some status fields for <pkg> or all
|
|---|
| 169 | depends <pkg> Print uninstalled package dependencies for <pkg>
|
|---|
| 170 |
|
|---|
| 171 | Options:
|
|---|
| 172 | -d <dest_name> Use <dest_name> as the the root directory for
|
|---|
| 173 | -dest <dest_name> package installation, removal, upgrading.
|
|---|
| 174 | <dest_name> should be a defined dest name from the
|
|---|
| 175 | configuration file, (but can also be a directory
|
|---|
| 176 | name in a pinch).
|
|---|
| 177 | -o <offline_root> Use <offline_root> as the root for offline installation.
|
|---|
| 178 | -offline <offline_root>
|
|---|
| 179 |
|
|---|
| 180 | Wget Options:
|
|---|
| 181 | -q Quiet option for wget
|
|---|
| 182 | -c Continue option for wget
|
|---|
| 183 |
|
|---|
| 184 | Force Options (use when ipkg is too smart for its own good):
|
|---|
| 185 | -force-depends Make dependency checks warnings instead of errors
|
|---|
| 186 | -force-defaults Use default options for questions asked by ipkg.
|
|---|
| 187 | (no prompts). Note that this will not prevent
|
|---|
| 188 | package installation scripts from prompting.
|
|---|
| 189 | " >&2
|
|---|
| 190 | exit 1
|
|---|
| 191 | }
|
|---|
| 192 |
|
|---|
| 193 | ipkg_dir_part() {
|
|---|
| 194 | local dir="`echo $1 | sed -ne 's/\(.*\/\).*/\1/p'`"
|
|---|
| 195 | if [ -z "$dir" ]; then
|
|---|
| 196 | dir="./"
|
|---|
| 197 | fi
|
|---|
| 198 | echo $dir
|
|---|
| 199 | }
|
|---|
| 200 |
|
|---|
| 201 | ipkg_file_part() {
|
|---|
| 202 | echo $1 | sed 's/.*\///'
|
|---|
| 203 | }
|
|---|
| 204 |
|
|---|
| 205 | ipkg_protect_slashes() {
|
|---|
| 206 | sed -e 's/\//\\\//g'
|
|---|
| 207 | }
|
|---|
| 208 |
|
|---|
| 209 | ipkg_download() {
|
|---|
| 210 | local src="$1"
|
|---|
| 211 | local dest="$2"
|
|---|
| 212 |
|
|---|
| 213 | local src_file="`ipkg_file_part $src`"
|
|---|
| 214 | local dest_dir="`ipkg_dir_part $dest`"
|
|---|
| 215 | if [ -z "$dest_dir" ]; then
|
|---|
| 216 | dest_dir="$IPKG_TMP"
|
|---|
| 217 | fi
|
|---|
| 218 |
|
|---|
| 219 | local dest_file="`ipkg_file_part $dest`"
|
|---|
| 220 | if [ -z "$dest_file" ]; then
|
|---|
| 221 | dest_file="$src_file"
|
|---|
| 222 | fi
|
|---|
| 223 |
|
|---|
| 224 | # Proxy support
|
|---|
| 225 | local proxyuser=""
|
|---|
| 226 | local proxypassword=""
|
|---|
| 227 | local proxyoption=""
|
|---|
| 228 |
|
|---|
| 229 | if [ -n "$IPKG_PROXY_USERNAME" ]; then
|
|---|
| 230 | proxyuser="--proxy-user=\"$IPKG_PROXY_USERNAME\""
|
|---|
| 231 | proxypassword="--proxy-passwd=\"$IPKG_PROXY_PASSWORD\""
|
|---|
| 232 | fi
|
|---|
| 233 |
|
|---|
| 234 | if [ -n "$IPKG_PROXY_HTTP" -o -n "$IPKG_PROXY_FTP" ]; then
|
|---|
| 235 | proxyoption="--proxy=on"
|
|---|
| 236 | fi
|
|---|
| 237 |
|
|---|
| 238 | echo "Downloading $src ..."
|
|---|
| 239 | rm -f $IPKG_TMP/$src_file
|
|---|
| 240 | case "$src" in
|
|---|
| 241 | http://* | ftp://*)
|
|---|
| 242 | if ! wget $additional_options --passive-ftp $proxyoption $proxyuser $proxypassword -P $IPKG_TMP $src; then
|
|---|
| 243 | echo "ipkg_download: ERROR: Failed to retrieve $src, returning $err"
|
|---|
| 244 | return 1
|
|---|
| 245 | fi
|
|---|
| 246 | mv $IPKG_TMP/$src_file $dest_dir/$dest_file 2>/dev/null
|
|---|
| 247 | ;;
|
|---|
| 248 | file:/* )
|
|---|
| 249 | ln -s `echo $src | sed 's/^file://'` $dest_dir/$dest_file 2>/dev/null
|
|---|
| 250 | ;;
|
|---|
| 251 | *)
|
|---|
| 252 | echo "DEBUG: $src"
|
|---|
| 253 | ;;
|
|---|
| 254 | esac
|
|---|
| 255 |
|
|---|
| 256 | echo "Done."
|
|---|
| 257 | return 0
|
|---|
| 258 | }
|
|---|
| 259 |
|
|---|
| 260 | ipkg_update() {
|
|---|
| 261 | if [ ! -e "$IPKG_LISTS_DIR" ]; then
|
|---|
| 262 | mkdir -p $IPKG_LISTS_DIR
|
|---|
| 263 | fi
|
|---|
| 264 |
|
|---|
| 265 | local err=
|
|---|
| 266 | for src_name in `ipkg_src_names`; do
|
|---|
| 267 | local src="`ipkg_src_byname $src_name`"
|
|---|
| 268 | if ! ipkg_download $src/Packages $IPKG_LISTS_DIR/$src_name; then
|
|---|
| 269 | echo "ipkg_update: Error downloading $src/Packages to $IPKG_LISTS_DIR/$src_name" >&2
|
|---|
| 270 | err=t
|
|---|
| 271 | else
|
|---|
| 272 | echo "Updated list of available packages in $IPKG_LISTS_DIR/$src_name"
|
|---|
| 273 | fi
|
|---|
| 274 | done
|
|---|
| 275 |
|
|---|
| 276 | [ -n "$err" ] && return 1 ||:
|
|---|
| 277 |
|
|---|
| 278 | return 0
|
|---|
| 279 | }
|
|---|
| 280 |
|
|---|
| 281 | ipkg_list() {
|
|---|
| 282 | for src in `ipkg_src_names`; do
|
|---|
| 283 | if ipkg_require_list $src; then
|
|---|
| 284 | # black magic...
|
|---|
| 285 | sed -ne "
|
|---|
| 286 | /^Package:/{
|
|---|
| 287 | s/^Package:[[:space:]]*\<\([a-z0-9.+-]*$1[a-z0-9.+-]*\).*/\1/
|
|---|
| 288 | h
|
|---|
| 289 | }
|
|---|
| 290 | /^Description:/{
|
|---|
| 291 | s/^Description:[[:space:]]*\(.*\)/\1/
|
|---|
| 292 | H
|
|---|
| 293 | g
|
|---|
| 294 | s/\\
|
|---|
| 295 | / - /
|
|---|
| 296 | p
|
|---|
| 297 | }
|
|---|
| 298 | " $IPKG_LISTS_DIR/$src
|
|---|
| 299 | fi
|
|---|
| 300 | done
|
|---|
| 301 | }
|
|---|
| 302 |
|
|---|
| 303 | ipkg_extract_paragraph() {
|
|---|
| 304 | local pkg="$1"
|
|---|
| 305 | sed -ne "/Package:[[:space:]]*$pkg[[:space:]]*\$/,/^\$/p"
|
|---|
| 306 | }
|
|---|
| 307 |
|
|---|
| 308 | ipkg_extract_field() {
|
|---|
| 309 | local field="$1"
|
|---|
| 310 | # blacker magic...
|
|---|
| 311 | sed -ne "
|
|---|
| 312 | : TOP
|
|---|
| 313 | /^$field:/{
|
|---|
| 314 | p
|
|---|
| 315 | n
|
|---|
| 316 | b FIELD
|
|---|
| 317 | }
|
|---|
| 318 | d
|
|---|
| 319 | : FIELD
|
|---|
| 320 | /^$/b TOP
|
|---|
| 321 | /^[^[:space:]]/b TOP
|
|---|
| 322 | p
|
|---|
| 323 | n
|
|---|
| 324 | b FIELD
|
|---|
| 325 | "
|
|---|
| 326 | }
|
|---|
| 327 |
|
|---|
| 328 | ipkg_extract_value() {
|
|---|
| 329 | sed -e "s/^[^:]*:[[:space:]]*//"
|
|---|
| 330 | }
|
|---|
| 331 |
|
|---|
| 332 | ipkg_require_list() {
|
|---|
| 333 | [ $# -lt 1 ] && return 1 ||:
|
|---|
| 334 | local src="$1"
|
|---|
| 335 | if [ ! -f "$IPKG_LISTS_DIR/$src" ]; then
|
|---|
| 336 | echo "ERROR: File not found: $IPKG_LISTS_DIR/$src" >&2
|
|---|
| 337 | echo " You probably want to run \`ipkg update'" >&2
|
|---|
| 338 | return 1
|
|---|
| 339 | fi
|
|---|
| 340 | return 0
|
|---|
| 341 | }
|
|---|
| 342 |
|
|---|
| 343 | ipkg_info() {
|
|---|
| 344 | for src in `ipkg_src_names`; do
|
|---|
| 345 | if ipkg_require_list $src; then
|
|---|
| 346 | case $# in
|
|---|
| 347 | 0)
|
|---|
| 348 | cat $IPKG_LISTS_DIR/$src
|
|---|
| 349 | ;;
|
|---|
| 350 | 1)
|
|---|
| 351 | ipkg_extract_paragraph $1 < $IPKG_LISTS_DIR/$src
|
|---|
| 352 | ;;
|
|---|
| 353 | *)
|
|---|
| 354 | ipkg_extract_paragraph $1 < $IPKG_LISTS_DIR/$src | ipkg_extract_field $2
|
|---|
| 355 | ;;
|
|---|
| 356 | esac
|
|---|
| 357 | fi
|
|---|
| 358 | done
|
|---|
| 359 | }
|
|---|
| 360 |
|
|---|
| 361 | ipkg_status_sd() {
|
|---|
| 362 | [ $# -lt 1 ] && return 0 ||:
|
|---|
| 363 | sd="$1"
|
|---|
| 364 | shift
|
|---|
| 365 | if [ -f $sd/status ]; then
|
|---|
| 366 | case $# in
|
|---|
| 367 | 0)
|
|---|
| 368 | cat $sd/status
|
|---|
| 369 | ;;
|
|---|
| 370 | 1)
|
|---|
| 371 | ipkg_extract_paragraph $1 < $sd/status
|
|---|
| 372 | ;;
|
|---|
| 373 | *)
|
|---|
| 374 | ipkg_extract_paragraph $1 < $sd/status | ipkg_extract_field $2
|
|---|
| 375 | ;;
|
|---|
| 376 | esac
|
|---|
| 377 | fi
|
|---|
| 378 | return 0
|
|---|
| 379 | }
|
|---|
| 380 |
|
|---|
| 381 | ipkg_status_all() {
|
|---|
| 382 | for sd in `ipkg_state_dirs`; do
|
|---|
| 383 | ipkg_status_sd $sd $*
|
|---|
| 384 | done
|
|---|
| 385 | }
|
|---|
| 386 |
|
|---|
| 387 | ipkg_status() {
|
|---|
| 388 | if [ -n "$DEST_NAME" ]; then
|
|---|
| 389 | ipkg_status_sd $IPKG_STATE_DIR $*
|
|---|
| 390 | else
|
|---|
| 391 | ipkg_status_all $*
|
|---|
| 392 | fi
|
|---|
| 393 | }
|
|---|
| 394 |
|
|---|
| 395 | ipkg_status_matching_sd() {
|
|---|
| 396 | local sd="$1"
|
|---|
| 397 | local re="$2"
|
|---|
| 398 | if [ -f $sd/status ]; then
|
|---|
| 399 | sed -ne "
|
|---|
| 400 | : TOP
|
|---|
| 401 | /^Package:/{
|
|---|
| 402 | s/^Package:[[:space:]]*//
|
|---|
| 403 | s/[[:space:]]*$//
|
|---|
| 404 | h
|
|---|
| 405 | }
|
|---|
| 406 | /$re/{
|
|---|
| 407 | g
|
|---|
| 408 | p
|
|---|
| 409 | b NEXT
|
|---|
| 410 | }
|
|---|
| 411 | d
|
|---|
| 412 | : NEXT
|
|---|
| 413 | /^$/b TOP
|
|---|
| 414 | n
|
|---|
| 415 | b NEXT
|
|---|
| 416 | " < $sd/status
|
|---|
| 417 | fi
|
|---|
| 418 | return 0
|
|---|
| 419 | }
|
|---|
| 420 |
|
|---|
| 421 | ipkg_status_matching_all() {
|
|---|
| 422 | for sd in `ipkg_state_dirs`; do
|
|---|
| 423 | ipkg_status_matching_sd $sd $*
|
|---|
| 424 | done
|
|---|
| 425 | }
|
|---|
| 426 |
|
|---|
| 427 | ipkg_status_matching() {
|
|---|
| 428 | if [ -n "$DEST_NAME" ]; then
|
|---|
| 429 | ipkg_status_matching_sd $IPKG_STATE_DIR $*
|
|---|
| 430 | else
|
|---|
| 431 | ipkg_status_matching_all $*
|
|---|
| 432 | fi
|
|---|
| 433 | }
|
|---|
| 434 |
|
|---|
| 435 | ipkg_status_installed_sd() {
|
|---|
| 436 | local sd="$1"
|
|---|
| 437 | local pkg="$2"
|
|---|
| 438 | ipkg_status_sd $sd $pkg Status | grep -q "Status: install ok installed"
|
|---|
| 439 | }
|
|---|
| 440 |
|
|---|
| 441 | ipkg_status_installed_all() {
|
|---|
| 442 | local ret=1
|
|---|
| 443 | for sd in `ipkg_state_dirs`; do
|
|---|
| 444 | if `ipkg_status_installed_sd $sd $*`; then
|
|---|
| 445 | ret=0
|
|---|
| 446 | fi
|
|---|
| 447 | done
|
|---|
| 448 | return $ret
|
|---|
| 449 | }
|
|---|
| 450 |
|
|---|
| 451 | ipkg_status_mentioned_sd() {
|
|---|
| 452 | local sd="$1"
|
|---|
| 453 | local pkg="$2"
|
|---|
| 454 | [ -n "`ipkg_status_sd $sd $pkg Status`" ]
|
|---|
| 455 | }
|
|---|
| 456 |
|
|---|
| 457 | ipkg_files() {
|
|---|
| 458 | local pkg="$1"
|
|---|
| 459 | if [ -n "$DEST_NAME" ]; then
|
|---|
| 460 | dests=$IPKG_ROOT
|
|---|
| 461 | else
|
|---|
| 462 | dests="`ipkg_dests_all`"
|
|---|
| 463 | fi
|
|---|
| 464 | for dest in $dests; do
|
|---|
| 465 | if [ -f $dest/$IPKG_DIR_PREFIX/info/$pkg.list ]; then
|
|---|
| 466 | dest_sed="`echo $dest | ipkg_protect_slashes`"
|
|---|
| 467 | sed -e "s/^/$dest_sed/" < $dest/$IPKG_DIR_PREFIX/info/$pkg.list
|
|---|
| 468 | fi
|
|---|
| 469 | done
|
|---|
| 470 | }
|
|---|
| 471 |
|
|---|
| 472 | ipkg_search() {
|
|---|
| 473 | local pattern="$1"
|
|---|
| 474 |
|
|---|
| 475 | for dest_name in `ipkg_dest_names`; do
|
|---|
| 476 | dest="`ipkg_dest_byname $dest_name`"
|
|---|
| 477 | dest_sed="`echo $dest | ipkg_protect_slashes`"
|
|---|
| 478 |
|
|---|
| 479 | set +o noglob
|
|---|
| 480 | local list_files="`ls -1 $dest/$IPKG_DIR_PREFIX/info/*.list 2>/dev/null`"
|
|---|
| 481 | set -o noglob
|
|---|
| 482 | for file in $list_files; do
|
|---|
| 483 | if sed "s/^/$dest_sed/" $file | grep -q $pattern; then
|
|---|
| 484 | local pkg="`echo $file | sed "s/^.*\/\(.*\)\.list/\1/"`"
|
|---|
| 485 | [ "$dest_name" != `ipkg_dest_default_name` ] && pkg="$pkg ($dest_name)" ||:
|
|---|
| 486 | sed "s/^/$dest_sed/" $file | grep $pattern | sed "s/^/$pkg: /"
|
|---|
| 487 | fi
|
|---|
| 488 | done
|
|---|
| 489 | done
|
|---|
| 490 | }
|
|---|
| 491 |
|
|---|
| 492 | ipkg_status_remove_sd() {
|
|---|
| 493 | local sd="$1"
|
|---|
| 494 | local pkg="$2"
|
|---|
| 495 |
|
|---|
| 496 | if [ ! -f $sd/status ]; then
|
|---|
| 497 | mkdir -p $sd
|
|---|
| 498 | touch $sd/status
|
|---|
| 499 | fi
|
|---|
| 500 | sed -ne "/Package:[[:space:]]*$pkg[[:space:]]*\$/,/^\$/!p" < $sd/status > $sd/status.new
|
|---|
| 501 | mv $sd/status.new $sd/status
|
|---|
| 502 | }
|
|---|
| 503 |
|
|---|
| 504 | ipkg_status_remove_all() {
|
|---|
| 505 | for sd in `ipkg_state_dirs`; do
|
|---|
| 506 | ipkg_status_remove_sd $sd $*
|
|---|
| 507 | done
|
|---|
| 508 | }
|
|---|
| 509 |
|
|---|
| 510 | ipkg_status_remove() {
|
|---|
| 511 | if [ -n "$DEST_NAME" ]; then
|
|---|
| 512 | ipkg_status_remove_sd $IPKG_STATE_DIR $*
|
|---|
| 513 | else
|
|---|
| 514 | ipkg_status_remove_all $*
|
|---|
| 515 | fi
|
|---|
| 516 | }
|
|---|
| 517 |
|
|---|
| 518 | ipkg_status_update_sd() {
|
|---|
| 519 | local sd="$1"
|
|---|
| 520 | local pkg="$2"
|
|---|
| 521 |
|
|---|
| 522 | ipkg_status_remove_sd $sd $pkg
|
|---|
| 523 | ipkg_extract_field "$IPKG_STATUS_FIELDS" >> $sd/status
|
|---|
| 524 | echo "" >> $sd/status
|
|---|
| 525 | }
|
|---|
| 526 |
|
|---|
| 527 | ipkg_status_update() {
|
|---|
| 528 | ipkg_status_update_sd $IPKG_STATE_DIR $*
|
|---|
| 529 | }
|
|---|
| 530 |
|
|---|
| 531 | ipkg_unsatisfied_dependences() {
|
|---|
| 532 | local pkg=$1
|
|---|
| 533 | local deps="`ipkg_get_depends $pkg`"
|
|---|
| 534 | local remaining_deps=
|
|---|
| 535 | for dep in $deps; do
|
|---|
| 536 | local installed="`ipkg_get_installed $dep`"
|
|---|
| 537 | if [ "$installed" != "installed" ] ; then
|
|---|
| 538 | remaining_deps="$remaining_deps $dep"
|
|---|
| 539 | fi
|
|---|
| 540 | done
|
|---|
| 541 | ## echo "ipkg_unsatisfied_dependences pkg=$pkg $remaining_deps" > /dev/console
|
|---|
| 542 | echo $remaining_deps
|
|---|
| 543 | }
|
|---|
| 544 |
|
|---|
| 545 | ipkg_safe_pkg_name() {
|
|---|
| 546 | local pkg=$1
|
|---|
| 547 | local spkg="`echo pkg_$pkg | sed -e y/-+./___/`"
|
|---|
| 548 | echo $spkg
|
|---|
| 549 | }
|
|---|
| 550 |
|
|---|
| 551 | ipkg_set_depends() {
|
|---|
| 552 | local pkg=$1; shift
|
|---|
| 553 | local new_deps="$*"
|
|---|
| 554 | pkg="`ipkg_safe_pkg_name $pkg`"
|
|---|
| 555 | ## setvar ${pkg}_depends "$new_deps"
|
|---|
| 556 | echo $new_deps > $IPKG_TMP/${pkg}.depends
|
|---|
| 557 | }
|
|---|
| 558 |
|
|---|
| 559 | ipkg_get_depends() {
|
|---|
| 560 | local pkg=$1
|
|---|
| 561 | pkg="`ipkg_safe_pkg_name $pkg`"
|
|---|
| 562 | cat $IPKG_TMP/${pkg}.depends
|
|---|
| 563 | ## eval "echo \$${pkg}_depends"
|
|---|
| 564 | }
|
|---|
| 565 |
|
|---|
| 566 | ipkg_set_installed() {
|
|---|
| 567 | local pkg=$1
|
|---|
| 568 | pkg="`ipkg_safe_pkg_name $pkg`"
|
|---|
| 569 | echo installed > $IPKG_TMP/${pkg}.installed
|
|---|
| 570 | ## setvar ${pkg}_installed "installed"
|
|---|
| 571 | }
|
|---|
| 572 |
|
|---|
| 573 | ipkg_set_uninstalled() {
|
|---|
| 574 | local pkg=$1
|
|---|
| 575 | pkg="`ipkg_safe_pkg_name $pkg`"
|
|---|
| 576 | ### echo ipkg_set_uninstalled $pkg > /dev/console
|
|---|
| 577 | echo uninstalled > $IPKG_TMP/${pkg}.installed
|
|---|
| 578 | ## setvar ${pkg}_installed "uninstalled"
|
|---|
| 579 | }
|
|---|
| 580 |
|
|---|
| 581 | ipkg_get_installed() {
|
|---|
| 582 | local pkg=$1
|
|---|
| 583 | pkg="`ipkg_safe_pkg_name $pkg`"
|
|---|
| 584 | if [ -f $IPKG_TMP/${pkg}.installed ]; then
|
|---|
| 585 | cat $IPKG_TMP/${pkg}.installed
|
|---|
| 586 | fi
|
|---|
| 587 | ## eval "echo \$${pkg}_installed"
|
|---|
| 588 | }
|
|---|
| 589 |
|
|---|
| 590 | ipkg_depends() {
|
|---|
| 591 | local new_pkgs="$*"
|
|---|
| 592 | local all_deps=
|
|---|
| 593 | local installed_pkgs="`ipkg_status_matching_all 'Status:.*[[:space:]]installed'`"
|
|---|
| 594 | for pkg in $installed_pkgs; do
|
|---|
| 595 | ipkg_set_installed $pkg
|
|---|
| 596 | done
|
|---|
| 597 | while [ -n "$new_pkgs" ]; do
|
|---|
| 598 | all_deps="$all_deps $new_pkgs"
|
|---|
| 599 | local new_deps=
|
|---|
| 600 | for pkg in $new_pkgs; do
|
|---|
| 601 | if echo $pkg | grep -q '[^a-z0-9.+-]'; then
|
|---|
| 602 | echo "ipkg_depends: ERROR: Package name $pkg contains illegal characters (should be [a-z0-9.+-])" >&2
|
|---|
| 603 | return 1
|
|---|
| 604 | fi
|
|---|
| 605 | # TODO: Fix this. For now I am ignoring versions and alternations in dependencies.
|
|---|
| 606 | new_deps="$new_deps "`ipkg_info $pkg '\(Pre-\)\?Depends' | ipkg_extract_value | sed -e 's/([^)]*)//g
|
|---|
| 607 | s/\(|[[:space:]]*[a-z0-9.+-]\+[[:space:]]*\)\+//g
|
|---|
| 608 | s/,/ /g
|
|---|
| 609 | s/ \+/ /g'`
|
|---|
| 610 | ipkg_set_depends $pkg $new_deps
|
|---|
| 611 | done
|
|---|
| 612 |
|
|---|
| 613 | new_deps=`echo $new_deps | sed -e 's/[[:space:]]\+/\n/g' | sort | uniq`
|
|---|
| 614 |
|
|---|
| 615 | local maybe_new_pkgs=
|
|---|
| 616 | for pkg in $new_deps; do
|
|---|
| 617 | if ! echo $installed_pkgs | grep -q "\<$pkg\>"; then
|
|---|
| 618 | maybe_new_pkgs="$maybe_new_pkgs $pkg"
|
|---|
| 619 | fi
|
|---|
| 620 | done
|
|---|
| 621 |
|
|---|
| 622 | new_pkgs=
|
|---|
| 623 | for pkg in $maybe_new_pkgs; do
|
|---|
| 624 | if ! echo $all_deps | grep -q "\<$pkg\>"; then
|
|---|
| 625 | if [ -z "`ipkg_info $pkg`" ]; then
|
|---|
| 626 | echo "ipkg_depends: Warning: $pkg mentioned in dependency but no package found in $IPKG_LISTS_DIR" >&2
|
|---|
| 627 | ipkg_set_installed $pkg
|
|---|
| 628 | else
|
|---|
| 629 | new_pkgs="$new_pkgs $pkg"
|
|---|
| 630 | ipkg_set_uninstalled $pkg
|
|---|
| 631 | fi
|
|---|
| 632 | else
|
|---|
| 633 | ipkg_set_uninstalled $pkg
|
|---|
| 634 | fi
|
|---|
| 635 | done
|
|---|
| 636 | done
|
|---|
| 637 |
|
|---|
| 638 | echo $all_deps
|
|---|
| 639 | }
|
|---|
| 640 |
|
|---|
| 641 | ipkg_get_install_dest() {
|
|---|
| 642 | local dest="$1"
|
|---|
| 643 | shift
|
|---|
| 644 | local sd=$dest/$IPKG_DIR_PREFIX
|
|---|
| 645 | local info_dir=$sd/info
|
|---|
| 646 |
|
|---|
| 647 | local requested_pkgs="$*"
|
|---|
| 648 | local pkgs="`ipkg_depends $*`"
|
|---|
| 649 |
|
|---|
| 650 | mkdir -p $info_dir
|
|---|
| 651 | for pkg in $pkgs; do
|
|---|
| 652 | if ! ipkg_status_mentioned_sd $sd $pkg; then
|
|---|
| 653 | echo "Package: $pkg
|
|---|
| 654 | Status: install ok not-installed" | ipkg_status_update_sd $sd $pkg
|
|---|
| 655 | fi
|
|---|
| 656 | done
|
|---|
| 657 | ## mark the packages that we were directly requested to install as uninstalled
|
|---|
| 658 | for pkg in $requested_pkgs; do ipkg_set_uninstalled $pkg; done
|
|---|
| 659 |
|
|---|
| 660 | local new_pkgs=
|
|---|
| 661 | local pkgs_installed=0
|
|---|
| 662 | while [ -n "pkgs" ]; do
|
|---|
| 663 | curcheck=0
|
|---|
| 664 | ## echo "pkgs to install: {$pkgs}" > /dev/console
|
|---|
| 665 | for pkg in $pkgs; do
|
|---|
| 666 | curcheck="`expr $curcheck + 1`"
|
|---|
| 667 | local is_installed="`ipkg_get_installed $pkg`"
|
|---|
| 668 | if [ "$is_installed" = "installed" ]; then
|
|---|
| 669 | echo "$pkg is installed" > /dev/console
|
|---|
| 670 | continue
|
|---|
| 671 | fi
|
|---|
| 672 |
|
|---|
| 673 | local remaining_deps="`ipkg_unsatisfied_dependences $pkg`"
|
|---|
| 674 | if [ -n "$remaining_deps" ]; then
|
|---|
| 675 | new_pkgs="$new_pkgs $pkg"
|
|---|
| 676 | ### echo "Dependences not satisfied for $pkg: $remaining_deps"
|
|---|
| 677 | if [ $curcheck -ne `echo $pkgs|wc -w` ]; then
|
|---|
| 678 | continue
|
|---|
| 679 | fi
|
|---|
| 680 | fi
|
|---|
| 681 |
|
|---|
| 682 | local filename=
|
|---|
| 683 | for src in `ipkg_src_names`; do
|
|---|
| 684 | if ipkg_require_list $src; then
|
|---|
| 685 | filename="`ipkg_extract_paragraph $pkg < $IPKG_LISTS_DIR/$src | ipkg_extract_field Filename | ipkg_extract_value`"
|
|---|
| 686 | [ -n "$filename" ] && break ||:
|
|---|
| 687 | fi
|
|---|
| 688 | done
|
|---|
| 689 |
|
|---|
| 690 | if [ -z "$filename" ]; then
|
|---|
| 691 | echo "ipkg_get_install: ERROR: Cannot find package $pkg in $IPKG_LISTS_DIR"
|
|---|
| 692 | echo "ipkg_get_install: Check the spelling and maybe run \`ipkg update'."
|
|---|
| 693 | ipkg_status_remove_sd $sd $pkg
|
|---|
| 694 | return 1;
|
|---|
| 695 | fi
|
|---|
| 696 |
|
|---|
| 697 | echo ""
|
|---|
| 698 | local tmp_pkg_file="$IPKG_TMP/"`ipkg_file_part $filename`
|
|---|
| 699 | if ! ipkg_download `ipkg_src_byname $src`/$filename $tmp_pkg_file; then
|
|---|
| 700 | echo "ipkg_get_install: Perhaps you need to run \`ipkg update'?"
|
|---|
| 701 | return 1
|
|---|
| 702 | fi
|
|---|
| 703 |
|
|---|
| 704 | if ! ipkg_install_file_dest $dest $tmp_pkg_file; then
|
|---|
| 705 | echo "ipkg_get_install: ERROR: Failed to install $tmp_pkg_file"
|
|---|
| 706 | echo "ipkg_get_install: I'll leave it there for you to try a manual installation"
|
|---|
| 707 | return 1
|
|---|
| 708 | fi
|
|---|
| 709 |
|
|---|
| 710 | ipkg_set_installed $pkg
|
|---|
| 711 | pkgs_installed="`expr $pkgs_installed + 1`"
|
|---|
| 712 | rm $tmp_pkg_file
|
|---|
| 713 | done
|
|---|
| 714 | ### echo "Installed $pkgs_installed package(s) this round"
|
|---|
| 715 | if [ $pkgs_installed -eq 0 ]; then
|
|---|
| 716 | if [ -z "$new_pkgs" ]; then
|
|---|
| 717 | break
|
|---|
| 718 | fi
|
|---|
| 719 | fi
|
|---|
| 720 | pkgs_installed=0
|
|---|
| 721 | pkgs="$new_pkgs"
|
|---|
| 722 | new_pkgs=
|
|---|
| 723 | curcheck=0
|
|---|
| 724 | done
|
|---|
| 725 | }
|
|---|
| 726 |
|
|---|
| 727 | ipkg_get_install() {
|
|---|
| 728 | ipkg_get_install_dest $IPKG_ROOT $*
|
|---|
| 729 | }
|
|---|
| 730 |
|
|---|
| 731 | ipkg_install_file_dest() {
|
|---|
| 732 | local dest="$1"
|
|---|
| 733 | local filename="$2"
|
|---|
| 734 | local sd=$dest/$IPKG_DIR_PREFIX
|
|---|
| 735 | local info_dir=$sd/info
|
|---|
| 736 |
|
|---|
| 737 | if [ ! -f "$filename" ]; then
|
|---|
| 738 | echo "ipkg_install_file: ERROR: File $filename not found"
|
|---|
| 739 | return 1
|
|---|
| 740 | fi
|
|---|
| 741 |
|
|---|
| 742 | local pkg="`ipkg_file_part $filename | sed 's/\([a-z0-9.+-]\+\)_.*/\1/'`"
|
|---|
| 743 | local ext="`echo $filename | sed 's/.*\.//'`"
|
|---|
| 744 | local pkg_extract_stdout
|
|---|
| 745 | if [ "$ext" = "ipk" ]; then
|
|---|
| 746 | pkg_extract_stdout="tar -xzOf"
|
|---|
| 747 | elif [ "$ext" = "deb" ]; then
|
|---|
| 748 | pkg_extract_stdout="ar p"
|
|---|
| 749 | else
|
|---|
| 750 | echo "ipkg_install_file: ERROR: File $filename has unknown extension $ext (not .ipk or .deb)"
|
|---|
| 751 | return 1
|
|---|
| 752 | fi
|
|---|
| 753 |
|
|---|
| 754 | # Check dependencies
|
|---|
| 755 | local depends="`ipkg_depends $pkg | sed -e "s/\<$pkg\>//"`"
|
|---|
| 756 |
|
|---|
| 757 | # Don't worry about deps that are scheduled for installation
|
|---|
| 758 | local missing_deps=
|
|---|
| 759 | for dep in $depends; do
|
|---|
| 760 | if ! ipkg_status_all $dep | grep -q 'Status:[[:space:]]install'; then
|
|---|
| 761 | missing_deps="$missing_deps $dep"
|
|---|
| 762 | fi
|
|---|
| 763 | done
|
|---|
| 764 |
|
|---|
| 765 | if [ ! -z "$missing_deps" ]; then
|
|---|
| 766 | if [ -n "$FORCE_DEPENDS" ]; then
|
|---|
| 767 | echo "ipkg_install_file: Warning: $pkg depends on the following uninstalled programs: $missing_deps"
|
|---|
| 768 | else
|
|---|
| 769 | echo "ipkg_install_file: ERROR: $pkg depends on the following uninstalled programs:
|
|---|
| 770 | $missing_deps"
|
|---|
| 771 | echo "ipkg_install_file: You may want to use \`ipkg install' to install these."
|
|---|
| 772 | return 1
|
|---|
| 773 | fi
|
|---|
| 774 | fi
|
|---|
| 775 |
|
|---|
| 776 | mkdir -p $IPKG_TMP/$pkg/control
|
|---|
| 777 | mkdir -p $IPKG_TMP/$pkg/data
|
|---|
| 778 | mkdir -p $info_dir
|
|---|
| 779 |
|
|---|
| 780 | if ! $pkg_extract_stdout $filename ./control.tar.gz | (cd $IPKG_TMP/$pkg/control; tar -xzf - ) ; then
|
|---|
| 781 | echo "ipkg_install_file: ERROR unpacking control.tar.gz from $filename"
|
|---|
| 782 | return 1
|
|---|
| 783 | fi
|
|---|
| 784 |
|
|---|
| 785 | if [ -n "$IPKG_OFFLINE_ROOT" ]; then
|
|---|
| 786 | if grep -q '^InstallsOffline:[[:space:]]*no' $IPKG_TMP/$pkg/control/control; then
|
|---|
| 787 | echo "*** Warning: Package $pkg may not be installed in offline mode"
|
|---|
| 788 | echo "*** Warning: Scheduling $filename for pending installation (installing into $IPKG_PENDING_DIR)"
|
|---|
| 789 | echo "Package: $pkg
|
|---|
| 790 | Status: install ok pending" | ipkg_status_update_sd $sd $pkg
|
|---|
| 791 | mkdir -p $IPKG_PENDING_DIR
|
|---|
| 792 | cp -f $filename $IPKG_PENDING_DIR
|
|---|
| 793 | rm -r $IPKG_TMP/$pkg/control
|
|---|
| 794 | rm -r $IPKG_TMP/$pkg/data
|
|---|
| 795 | rmdir $IPKG_TMP/$pkg
|
|---|
| 796 | return 0
|
|---|
| 797 | fi
|
|---|
| 798 | fi
|
|---|
| 799 |
|
|---|
| 800 |
|
|---|
| 801 | echo -n "Unpacking $pkg..."
|
|---|
| 802 | set +o noglob
|
|---|
| 803 | for file in $IPKG_TMP/$pkg/control/*; do
|
|---|
| 804 | local base_file="`ipkg_file_part $file`"
|
|---|
| 805 | mv $file $info_dir/$pkg.$base_file
|
|---|
| 806 | done
|
|---|
| 807 | set -o noglob
|
|---|
| 808 | rm -r $IPKG_TMP/$pkg/control
|
|---|
| 809 |
|
|---|
| 810 | if ! $pkg_extract_stdout $filename ./data.tar.gz | (cd $IPKG_TMP/$pkg/data; tar -xzf - ) ; then
|
|---|
| 811 | echo "ipkg_install_file: ERROR unpacking data.tar.gz from $filename"
|
|---|
| 812 | return 1
|
|---|
| 813 | fi
|
|---|
| 814 | echo "Done."
|
|---|
| 815 |
|
|---|
| 816 | echo -n "Configuring $pkg..."
|
|---|
| 817 | export PKG_ROOT=$dest
|
|---|
| 818 | if [ -x "$info_dir/$pkg.preinst" ]; then
|
|---|
| 819 | if ! $info_dir/$pkg.preinst install; then
|
|---|
| 820 | echo "$info_dir/$pkg.preinst failed. Aborting installation of $pkg"
|
|---|
| 821 | rm -rf $IPKG_TMP/$pkg/data
|
|---|
| 822 | rmdir $IPKG_TMP/$pkg
|
|---|
| 823 | return 1
|
|---|
| 824 | fi
|
|---|
| 825 | fi
|
|---|
| 826 |
|
|---|
| 827 | local old_conffiles="`ipkg_status_sd $sd $pkg Conffiles | ipkg_extract_value`"
|
|---|
| 828 | local new_conffiles=
|
|---|
| 829 | if [ -f "$info_dir/$pkg.conffiles" ]; then
|
|---|
| 830 | for conffile in `cat $info_dir/$pkg.conffiles`; do
|
|---|
| 831 | if [ -f "$dest/$conffile" ] && ! echo " $old_conffiles " | grep -q " $conffile "`md5sum $dest/$conffile | sed 's/ .*//'`; then
|
|---|
| 832 | local use_maintainers_conffile=
|
|---|
| 833 | if [ -z "$FORCE_DEFAULTS" ]; then
|
|---|
| 834 | while true; do
|
|---|
| 835 | echo -n "Configuration file \`$conffile'
|
|---|
| 836 | ==> File on system created by you or by a script.
|
|---|
| 837 | ==> File also in package provided by package maintainer.
|
|---|
| 838 | What would you like to do about it ? Your options are:
|
|---|
| 839 | Y or I : install the package maintainer's version
|
|---|
| 840 | N or O : keep your currently-installed version
|
|---|
| 841 | D : show the differences between the versions (if diff is installed)
|
|---|
| 842 | The default action is to keep your current version.
|
|---|
| 843 | *** `ipkg_file_part $conffile` (Y/I/N/O/D) [default=N] ? "
|
|---|
| 844 | read response
|
|---|
| 845 | case "$response" in
|
|---|
| 846 | [YyIi] | [Yy][Ee][Ss])
|
|---|
| 847 | use_maintainers_conffile=t
|
|---|
| 848 | break
|
|---|
| 849 | ;;
|
|---|
| 850 | [Dd])
|
|---|
| 851 | echo "
|
|---|
| 852 | diff -u $dest/$conffile $IPKG_TMP/$pkg/data/$conffile"
|
|---|
| 853 | diff -u $dest/$conffile $IPKG_TMP/$pkg/data/$conffile || true
|
|---|
| 854 | echo "[Press ENTER to continue]"
|
|---|
| 855 | read junk
|
|---|
| 856 | ;;
|
|---|
| 857 | *)
|
|---|
| 858 | break
|
|---|
| 859 | ;;
|
|---|
| 860 | esac
|
|---|
| 861 | done
|
|---|
| 862 | fi
|
|---|
| 863 | if [ -n "$use_maintainers_conffile" ]; then
|
|---|
| 864 | local md5sum="`md5sum $IPKG_TMP/$pkg/data/$conffile | sed 's/ .*//'`"
|
|---|
| 865 | new_conffiles="$new_conffiles $conffile $md5sum"
|
|---|
| 866 | else
|
|---|
| 867 | new_conffiles="$new_conffiles $conffile <custom>"
|
|---|
| 868 | rm $IPKG_TMP/$pkg/data/$conffile
|
|---|
| 869 | fi
|
|---|
| 870 | else
|
|---|
| 871 | md5sum="`md5sum $IPKG_TMP/$pkg/data/$conffile | sed 's/ .*//'`"
|
|---|
| 872 | new_conffiles="$new_conffiles $conffile $md5sum"
|
|---|
| 873 | fi
|
|---|
| 874 | done
|
|---|
| 875 | fi
|
|---|
| 876 |
|
|---|
| 877 | local owd="`pwd`"
|
|---|
| 878 | (cd $IPKG_TMP/$pkg/data/; tar cf - . | (cd $owd; cd $dest; tar xf -))
|
|---|
| 879 | rm -rf $IPKG_TMP/$pkg/data
|
|---|
| 880 | rmdir $IPKG_TMP/$pkg
|
|---|
| 881 | rm -f $info_dir/$pkg.list
|
|---|
| 882 | $pkg_extract_stdout $filename ./data.tar.gz | tar tzf - | sed -e 's/^\.//' > $info_dir/$pkg.list
|
|---|
| 883 |
|
|---|
| 884 | if [ -x "$info_dir/$pkg.postinst" ]; then
|
|---|
| 885 | IPKG_INSTROOT="$IPKG_INSTROOT" $info_dir/$pkg.postinst configure
|
|---|
| 886 | fi
|
|---|
| 887 |
|
|---|
| 888 | if [ -n "$new_conffiles" ]; then
|
|---|
| 889 | new_conffiles='Conffiles: '`echo $new_conffiles | ipkg_protect_slashes`
|
|---|
| 890 | fi
|
|---|
| 891 | local sed_safe_offline_root="`echo ${IPKG_OFFLINE_ROOT} | ipkg_protect_slashes`"
|
|---|
| 892 | local sed_safe_root="`echo $dest | sed -e "s/^${sed_safe_offline_root}//" | ipkg_protect_slashes`"
|
|---|
| 893 | sed -e "s/\(Package:.*\)/\1\\
|
|---|
| 894 | Status: install ok installed\\
|
|---|
| 895 | Root: ${sed_safe_root}\\
|
|---|
| 896 | ${new_conffiles}/" $info_dir/$pkg.control | ipkg_status_update_sd $sd $pkg
|
|---|
| 897 |
|
|---|
| 898 | rm -f $info_dir/$pkg.control
|
|---|
| 899 | rm -f $info_dir/$pkg.conffiles
|
|---|
| 900 | rm -f $info_dir/$pkg.preinst
|
|---|
| 901 | rm -f $info_dir/$pkg.postinst
|
|---|
| 902 |
|
|---|
| 903 | echo "Done."
|
|---|
| 904 | }
|
|---|
| 905 |
|
|---|
| 906 | ipkg_install_file() {
|
|---|
| 907 | ipkg_install_file_dest $IPKG_ROOT $*
|
|---|
| 908 | }
|
|---|
| 909 |
|
|---|
| 910 | ipkg_install() {
|
|---|
| 911 |
|
|---|
| 912 | while [ $# -gt 0 ]; do
|
|---|
| 913 | local pkg="$1"
|
|---|
| 914 | shift
|
|---|
| 915 |
|
|---|
| 916 | case "$pkg" in
|
|---|
| 917 | http://* | ftp://*)
|
|---|
| 918 | local tmp_pkg_file="$IPKG_TMP/"`ipkg_file_part $pkg`
|
|---|
| 919 | if ipkg_download $pkg $tmp_pkg_file; then
|
|---|
| 920 | ipkg_install_file $tmp_pkg_file
|
|---|
| 921 | rm $tmp_pkg_file
|
|---|
| 922 | fi
|
|---|
| 923 | ;;
|
|---|
| 924 | file:/*.ipk | file://*.deb)
|
|---|
| 925 | local ipkg_filename="`echo $pkg|sed 's/^file://'`"
|
|---|
| 926 | ipkg_install_file $ipkg_filename
|
|---|
| 927 | ;;
|
|---|
| 928 | *.ipk | *.deb)
|
|---|
| 929 | if [ -f "$pkg" ]; then
|
|---|
| 930 | ipkg_install_file $pkg
|
|---|
| 931 | else
|
|---|
| 932 | echo "File not found $pkg" >&2
|
|---|
| 933 | fi
|
|---|
| 934 | ;;
|
|---|
| 935 | *)
|
|---|
| 936 | ipkg_get_install $pkg || true
|
|---|
| 937 | ;;
|
|---|
| 938 | esac
|
|---|
| 939 | done
|
|---|
| 940 | }
|
|---|
| 941 |
|
|---|
| 942 | ipkg_install_pending() {
|
|---|
| 943 | [ -n "$IPKG_OFFLINE_ROOT" ] && return 0 ||:
|
|---|
| 944 |
|
|---|
| 945 | if [ -d "$IPKG_PENDING_DIR" ]; then
|
|---|
| 946 | set +o noglob
|
|---|
| 947 | local pending="`ls -1d $IPKG_PENDING_DIR/*.ipk 2> /dev/null`" || true
|
|---|
| 948 | set -o noglob
|
|---|
| 949 | if [ -n "$pending" ]; then
|
|---|
| 950 | echo "The following packages in $IPKG_PENDING_DIR will now be installed:"
|
|---|
| 951 | echo $pending
|
|---|
| 952 | for filename in $pending; do
|
|---|
| 953 | if ipkg_install_file $filename; then
|
|---|
| 954 | rm $filename
|
|---|
| 955 | fi
|
|---|
| 956 | done
|
|---|
| 957 | fi
|
|---|
| 958 | fi
|
|---|
| 959 | return 0
|
|---|
| 960 | }
|
|---|
| 961 |
|
|---|
| 962 | ipkg_install_wanted() {
|
|---|
| 963 | local wanted="`ipkg_status_matching 'Status:[[:space:]]*install.*not-installed'`"
|
|---|
| 964 |
|
|---|
| 965 | if [ -n "$wanted" ]; then
|
|---|
| 966 | echo "The following package were previously requested but have not been installed:"
|
|---|
| 967 | echo $wanted
|
|---|
| 968 |
|
|---|
| 969 | if [ -n "$FORCE_DEFAULTS" ]; then
|
|---|
| 970 | echo "Installing them now."
|
|---|
| 971 | else
|
|---|
| 972 | echo -n "Install them now [Y/n] ? "
|
|---|
| 973 | read response
|
|---|
| 974 | case "$response" in
|
|---|
| 975 | [Nn] | [Nn][Oo])
|
|---|
| 976 | return 0
|
|---|
| 977 | ;;
|
|---|
| 978 | esac
|
|---|
| 979 | fi
|
|---|
| 980 |
|
|---|
| 981 | ipkg_install $wanted
|
|---|
| 982 | fi
|
|---|
| 983 |
|
|---|
| 984 | return 0
|
|---|
| 985 | }
|
|---|
| 986 |
|
|---|
| 987 | ipkg_upgrade_pkg() {
|
|---|
| 988 | local pkg="$1"
|
|---|
| 989 | local avail_ver="`ipkg_info $pkg Version | ipkg_extract_value | head -n 1`"
|
|---|
| 990 |
|
|---|
| 991 | is_installed=
|
|---|
| 992 | for dest_name in `ipkg_dest_names`; do
|
|---|
| 993 | local dest="`ipkg_dest_byname $dest_name`"
|
|---|
| 994 | local sd=$dest/$IPKG_DIR_PREFIX
|
|---|
| 995 | local inst_ver="`ipkg_status_sd $sd $pkg Version | ipkg_extract_value`"
|
|---|
| 996 | if [ -n "$inst_ver" ]; then
|
|---|
| 997 | is_installed=t
|
|---|
| 998 |
|
|---|
| 999 | if [ -z "$avail_ver" ]; then
|
|---|
| 1000 | echo "Assuming locally installed package $pkg ($inst_ver) is up to date"
|
|---|
| 1001 | return 0
|
|---|
| 1002 | fi
|
|---|
| 1003 |
|
|---|
| 1004 | if [ "$avail_ver" = "$inst_ver" ]; then
|
|---|
| 1005 | echo "Package $pkg ($inst_ver) installed in $dest_name is up to date"
|
|---|
| 1006 | elif ipkg_is_upgrade "$avail_ver" "$inst_ver"; then
|
|---|
| 1007 | echo "Upgrading $pkg ($dest_name) from $inst_ver to $avail_ver"
|
|---|
| 1008 | ipkg_get_install_dest $dest $pkg
|
|---|
| 1009 | else
|
|---|
| 1010 | echo "Not downgrading package $pkg from $inst_ver to $avail_ver"
|
|---|
| 1011 | fi
|
|---|
| 1012 | fi
|
|---|
| 1013 | done
|
|---|
| 1014 |
|
|---|
| 1015 | if [ -z "$is_installed" ]; then
|
|---|
| 1016 | echo "Package $pkg does not appear to be installed"
|
|---|
| 1017 | return 0
|
|---|
| 1018 | fi
|
|---|
| 1019 |
|
|---|
| 1020 | }
|
|---|
| 1021 |
|
|---|
| 1022 | ipkg_upgrade() {
|
|---|
| 1023 | if [ $# -lt 1 ]; then
|
|---|
| 1024 | local pkgs="`ipkg_status_matching 'Status:.*[[:space:]]installed'`"
|
|---|
| 1025 | else
|
|---|
| 1026 | pkgs="$*"
|
|---|
| 1027 | fi
|
|---|
| 1028 |
|
|---|
| 1029 | for pkg in $pkgs; do
|
|---|
| 1030 | ipkg_upgrade_pkg $pkg
|
|---|
| 1031 | done
|
|---|
| 1032 | }
|
|---|
| 1033 |
|
|---|
| 1034 | ipkg_remove_pkg_dest() {
|
|---|
| 1035 | local dest="$1"
|
|---|
| 1036 | local pkg="$2"
|
|---|
| 1037 | local sd=$dest/$IPKG_DIR_PREFIX
|
|---|
| 1038 | local info_dir=$sd/info
|
|---|
| 1039 |
|
|---|
| 1040 | if ! ipkg_status_installed_sd $sd $pkg; then
|
|---|
| 1041 | echo "ipkg_remove: Package $pkg does not appear to be installed in $dest"
|
|---|
| 1042 | if ipkg_status_mentioned_sd $sd $pkg; then
|
|---|
| 1043 | echo "Purging mention of $pkg from the ipkg database"
|
|---|
| 1044 | ipkg_status_remove_sd $sd $pkg
|
|---|
| 1045 | fi
|
|---|
| 1046 | return 1
|
|---|
| 1047 | fi
|
|---|
| 1048 |
|
|---|
| 1049 | echo "ipkg_remove: Removing $pkg... "
|
|---|
| 1050 |
|
|---|
| 1051 | local files="`cat $info_dir/$pkg.list`"
|
|---|
| 1052 |
|
|---|
| 1053 | export PKG_ROOT=$dest
|
|---|
| 1054 | if [ -x "$info_dir/$pkg.prerm" ]; then
|
|---|
| 1055 | $info_dir/$pkg.prerm remove
|
|---|
| 1056 | fi
|
|---|
| 1057 |
|
|---|
| 1058 | local conffiles="`ipkg_status_sd $sd $pkg Conffiles | ipkg_extract_value`"
|
|---|
| 1059 |
|
|---|
| 1060 | local dirs_to_remove=
|
|---|
| 1061 | for file in $files; do
|
|---|
| 1062 | if [ -d "$dest/$file" ]; then
|
|---|
| 1063 | dirs_to_remove="$dirs_to_remove $dest/$file"
|
|---|
| 1064 | else
|
|---|
| 1065 | if echo " $conffiles " | grep -q " $file "; then
|
|---|
| 1066 | if echo " $conffiles " | grep -q " $file "`md5sum $dest/$file | sed 's/ .*//'`; then
|
|---|
| 1067 | rm -f $dest/$file
|
|---|
| 1068 | fi
|
|---|
| 1069 | else
|
|---|
| 1070 | rm -f $dest/$file
|
|---|
| 1071 | fi
|
|---|
| 1072 | fi
|
|---|
| 1073 | done
|
|---|
| 1074 |
|
|---|
| 1075 | local removed_a_dir=t
|
|---|
| 1076 | while [ -n "$removed_a_dir" ]; do
|
|---|
| 1077 | removed_a_dir=
|
|---|
| 1078 | local new_dirs_to_remove=
|
|---|
| 1079 | for dir in $dirs_to_remove; do
|
|---|
| 1080 | if rmdir $dir >/dev/null 2>&1; then
|
|---|
| 1081 | removed_a_dir=t
|
|---|
| 1082 | else
|
|---|
| 1083 | new_dirs_to_remove="$new_dirs_to_remove $dir"
|
|---|
| 1084 | fi
|
|---|
| 1085 | done
|
|---|
| 1086 | dirs_to_remove="$new_dirs_to_remove"
|
|---|
| 1087 | done
|
|---|
| 1088 |
|
|---|
| 1089 | if [ -n "$dirs_to_remove" ]; then
|
|---|
| 1090 | echo "ipkg_remove: Warning: Not removing the following directories since they are not empty:" >&2
|
|---|
| 1091 | echo "$dirs_to_remove" | sed -e 's/\/[/]\+/\//g' >&2
|
|---|
| 1092 | fi
|
|---|
| 1093 |
|
|---|
| 1094 | if [ -x "$info_dir/$pkg.postrm" ]; then
|
|---|
| 1095 | $info_dir/$pkg.postrm remove
|
|---|
| 1096 | fi
|
|---|
| 1097 |
|
|---|
| 1098 | ipkg_status_remove_sd $sd $pkg
|
|---|
| 1099 | set +o noglob
|
|---|
| 1100 | rm -f $info_dir/$pkg.*
|
|---|
| 1101 | set -o noglob
|
|---|
| 1102 |
|
|---|
| 1103 | echo "Done."
|
|---|
| 1104 | }
|
|---|
| 1105 |
|
|---|
| 1106 | ipkg_remove_pkg() {
|
|---|
| 1107 | local pkg="$1"
|
|---|
| 1108 | for dest in `ipkg_dests_all`; do
|
|---|
| 1109 | local sd=$dest/$IPKG_DIR_PREFIX
|
|---|
| 1110 | if ipkg_status_mentioned_sd $sd $pkg; then
|
|---|
| 1111 | ipkg_remove_pkg_dest $dest $pkg
|
|---|
| 1112 | fi
|
|---|
| 1113 | done
|
|---|
| 1114 | }
|
|---|
| 1115 |
|
|---|
| 1116 | ipkg_remove() {
|
|---|
| 1117 | while [ $# -gt 0 ]; do
|
|---|
| 1118 | local pkg="$1"
|
|---|
| 1119 | shift
|
|---|
| 1120 | if [ -n "$DEST_NAME" ]; then
|
|---|
| 1121 | ipkg_remove_pkg_dest $IPKG_ROOT $pkg
|
|---|
| 1122 | else
|
|---|
| 1123 | ipkg_remove_pkg $pkg
|
|---|
| 1124 | fi
|
|---|
| 1125 | done
|
|---|
| 1126 | }
|
|---|
| 1127 |
|
|---|
| 1128 | ###########
|
|---|
| 1129 | # ipkg main
|
|---|
| 1130 | ###########
|
|---|
| 1131 |
|
|---|
| 1132 | # Parse options
|
|---|
| 1133 | while [ $# -gt 0 ]; do
|
|---|
| 1134 | arg="$1"
|
|---|
| 1135 | case $arg in
|
|---|
| 1136 | -d | -dest)
|
|---|
| 1137 | [ $# -gt 1 ] || ipkg_usage "option $arg requires an argument"
|
|---|
| 1138 | DEST_NAME="$2"
|
|---|
| 1139 | shift
|
|---|
| 1140 | ;;
|
|---|
| 1141 | -o | -offline)
|
|---|
| 1142 | [ $# -gt 1 ] || ipkg_usage "option $arg requires an argument"
|
|---|
| 1143 | IPKG_OFFLINE_ROOT="$2"
|
|---|
| 1144 | shift
|
|---|
| 1145 | ;;
|
|---|
| 1146 | -force-depends)
|
|---|
| 1147 | FORCE_DEPENDS=t
|
|---|
| 1148 | ;;
|
|---|
| 1149 | -force-defaults)
|
|---|
| 1150 | FORCE_DEFAULTS=t
|
|---|
| 1151 | ;;
|
|---|
| 1152 | -c)
|
|---|
| 1153 | additional_options="$additional_options -c "
|
|---|
| 1154 | ;;
|
|---|
| 1155 | -q)
|
|---|
| 1156 | additional_options="$additional_options -q "
|
|---|
| 1157 | ;;
|
|---|
| 1158 | -*)
|
|---|
| 1159 | ipkg_usage "unknown option $arg"
|
|---|
| 1160 | ;;
|
|---|
| 1161 | *)
|
|---|
| 1162 | break
|
|---|
| 1163 | ;;
|
|---|
| 1164 | esac
|
|---|
| 1165 | shift
|
|---|
| 1166 | done
|
|---|
| 1167 |
|
|---|
| 1168 | [ $# -ge 1 ] || ipkg_usage "ipkg must have one sub-command argument"
|
|---|
| 1169 | cmd="$1"
|
|---|
| 1170 | shift
|
|---|
| 1171 |
|
|---|
| 1172 | ipkg_load_configuration
|
|---|
| 1173 | mkdir -p /tmp/ipkg
|
|---|
| 1174 |
|
|---|
| 1175 | case "$cmd" in
|
|---|
| 1176 | update|upgrade|list|info|status|install_pending)
|
|---|
| 1177 | ;;
|
|---|
| 1178 | install|depends|remove|files|search)
|
|---|
| 1179 | [ $# -ge 1 ] || ipkg_usage "ERROR: the \`\`$cmd'' command requires an argument"
|
|---|
| 1180 | ;;
|
|---|
| 1181 | *)
|
|---|
| 1182 | echo "ERROR: unknown sub-command \`$cmd'"
|
|---|
| 1183 | ipkg_usage
|
|---|
| 1184 | ;;
|
|---|
| 1185 | esac
|
|---|
| 1186 |
|
|---|
| 1187 | # Only install pending if we have an interactive sub-command
|
|---|
| 1188 | case "$cmd" in
|
|---|
| 1189 | upgrade|install)
|
|---|
| 1190 | ipkg_install_pending
|
|---|
| 1191 | ipkg_install_wanted
|
|---|
| 1192 | ;;
|
|---|
| 1193 | esac
|
|---|
| 1194 |
|
|---|
| 1195 | ipkg_$cmd $*
|
|---|
| 1196 | for a in `ls $IPKG_TMP`; do
|
|---|
| 1197 | rm -rf $IPKG_TMP/$a
|
|---|
| 1198 | done
|
|---|
