source: freewrt/scripts/ipkg@ e840b97

Last change on this file since e840b97 was 370242e, checked in by Thorsten Glaser <tg@…>, 19 years ago

more from the “coolz” departement:

  • get rid of dependency on external ipkg and python stuff
  • one distfile less too ;)
  • while here, remove executable bits on more shell scripts

tested with a defaultconfig full bootstrap (cleandir+v)

git-svn-id: svn://www.freewrt.org/trunk/freewrt@2295 afb5a338-a214-0410-bd46-81f09a774fd1

  • Property mode set to 100644
File size: 27.9 KB
Line 
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
15set -e
16
17# By default do not do globbing. Any command wanting globbing should
18# explicitly enable it first and disable it afterwards.
19set -o noglob
20
21ipkg_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
34ipkg_srcs() {
35 local srcre="$1"
36 sed -ne "s/^src[[:space:]]\+$srcre[[:space:]]\+//p" < $IPKG_CONF
37}
38
39ipkg_src_names() {
40 sed -ne "s/^src[[:space:]]\+\([^[:space:]]\+\).*/\1/p" < $IPKG_CONF
41}
42
43ipkg_src_byname() {
44 local src="$1"
45 ipkg_srcs $src | head -n 1
46}
47
48ipkg_dests() {
49 local destre="`echo $1 | ipkg_protect_slashes`"
50 sed -ne "/^dest[[:space:]]\+$destre/{
51s/^dest[[:space:]]\+[^[:space:]]\+[[:space:]]\+//
52s/^/`echo $IPKG_OFFLINE_ROOT | ipkg_protect_slashes`/
53p
54}" < $IPKG_CONF
55}
56
57ipkg_dest_names() {
58 sed -ne "s/^dest[[:space:]]\+\([^[:space:]]\+\).*/\1/p" < $IPKG_CONF
59}
60
61ipkg_dests_all() {
62 ipkg_dests '.*'
63}
64
65ipkg_state_dirs() {
66 ipkg_dests_all | sed "s|\$|/$IPKG_DIR_PREFIX|"
67}
68
69ipkg_dest_default() {
70 ipkg_dests_all | head -n 1
71}
72
73ipkg_dest_default_name() {
74 ipkg_dest_names | head -n 1
75}
76
77ipkg_dest_byname() {
78 local dest="$1"
79 ipkg_dests $dest | head -n 1
80}
81
82ipkg_option() {
83 local option="$1"
84 sed -ne "s/^option[[:space:]]\+$option[[:space:]]\+//p" < $IPKG_CONF
85}
86
87ipkg_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
106Valid 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
149ipkg_usage() {
150 [ $# -gt 0 ] && echo "ipkg: $*"
151 echo "
152usage: ipkg [options...] sub-command [arguments...]
153where sub-command is one of:
154
155Package 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
163Informational 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
171Options:
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
180Wget Options:
181 -q Quiet option for wget
182 -c Continue option for wget
183
184Force 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
193ipkg_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
201ipkg_file_part() {
202 echo $1 | sed 's/.*\///'
203}
204
205ipkg_protect_slashes() {
206 sed -e 's/\//\\\//g'
207}
208
209ipkg_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
260ipkg_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
281ipkg_list() {
282 for src in `ipkg_src_names`; do
283 if ipkg_require_list $src; then
284# black magic...
285sed -ne "
286/^Package:/{
287s/^Package:[[:space:]]*\<\([a-z0-9.+-]*$1[a-z0-9.+-]*\).*/\1/
288h
289}
290/^Description:/{
291s/^Description:[[:space:]]*\(.*\)/\1/
292H
293g
294s/\\
295/ - /
296p
297}
298" $IPKG_LISTS_DIR/$src
299 fi
300 done
301}
302
303ipkg_extract_paragraph() {
304 local pkg="$1"
305 sed -ne "/Package:[[:space:]]*$pkg[[:space:]]*\$/,/^\$/p"
306}
307
308ipkg_extract_field() {
309 local field="$1"
310# blacker magic...
311 sed -ne "
312: TOP
313/^$field:/{
314p
315n
316b FIELD
317}
318d
319: FIELD
320/^$/b TOP
321/^[^[:space:]]/b TOP
322p
323n
324b FIELD
325"
326}
327
328ipkg_extract_value() {
329 sed -e "s/^[^:]*:[[:space:]]*//"
330}
331
332ipkg_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
343ipkg_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
361ipkg_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
381ipkg_status_all() {
382 for sd in `ipkg_state_dirs`; do
383 ipkg_status_sd $sd $*
384 done
385}
386
387ipkg_status() {
388 if [ -n "$DEST_NAME" ]; then
389 ipkg_status_sd $IPKG_STATE_DIR $*
390 else
391 ipkg_status_all $*
392 fi
393}
394
395ipkg_status_matching_sd() {
396 local sd="$1"
397 local re="$2"
398 if [ -f $sd/status ]; then
399 sed -ne "
400: TOP
401/^Package:/{
402s/^Package:[[:space:]]*//
403s/[[:space:]]*$//
404h
405}
406/$re/{
407g
408p
409b NEXT
410}
411d
412: NEXT
413/^$/b TOP
414n
415b NEXT
416" < $sd/status
417 fi
418 return 0
419}
420
421ipkg_status_matching_all() {
422 for sd in `ipkg_state_dirs`; do
423 ipkg_status_matching_sd $sd $*
424 done
425}
426
427ipkg_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
435ipkg_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
441ipkg_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
451ipkg_status_mentioned_sd() {
452 local sd="$1"
453 local pkg="$2"
454 [ -n "`ipkg_status_sd $sd $pkg Status`" ]
455}
456
457ipkg_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
472ipkg_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
492ipkg_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
504ipkg_status_remove_all() {
505 for sd in `ipkg_state_dirs`; do
506 ipkg_status_remove_sd $sd $*
507 done
508}
509
510ipkg_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
518ipkg_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
527ipkg_status_update() {
528 ipkg_status_update_sd $IPKG_STATE_DIR $*
529}
530
531ipkg_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
545ipkg_safe_pkg_name() {
546 local pkg=$1
547 local spkg="`echo pkg_$pkg | sed -e y/-+./___/`"
548 echo $spkg
549}
550
551ipkg_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
559ipkg_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
566ipkg_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
573ipkg_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
581ipkg_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
590ipkg_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
607s/\(|[[:space:]]*[a-z0-9.+-]\+[[:space:]]*\)\+//g
608s/,/ /g
609s/ \+/ /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
641ipkg_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
654Status: 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
727ipkg_get_install() {
728 ipkg_get_install_dest $IPKG_ROOT $*
729}
730
731ipkg_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
790Status: 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 "
852diff -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\\
894Status: install ok installed\\
895Root: ${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
906ipkg_install_file() {
907 ipkg_install_file_dest $IPKG_ROOT $*
908}
909
910ipkg_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
942ipkg_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
962ipkg_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
987ipkg_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
1022ipkg_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
1034ipkg_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
1106ipkg_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
1116ipkg_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
1133while [ $# -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
1166done
1167
1168[ $# -lt 1 ] && ipkg_usage "ipkg must have one sub-command argument"
1169cmd="$1"
1170shift
1171
1172ipkg_load_configuration
1173mkdir -p /tmp/ipkg
1174
1175case "$cmd" in
1176update|upgrade|list|info|status|install_pending)
1177 ;;
1178install|depends|remove|files|search)
1179 [ $# -lt 1 ] && ipkg_usage "ERROR: the \`\`$cmd'' command requires an argument"
1180 ;;
1181*)
1182 echo "ERROR: unknown sub-command \`$cmd'"
1183 ipkg_usage
1184 ;;
1185esac
1186
1187# Only install pending if we have an interactive sub-command
1188case "$cmd" in
1189upgrade|install)
1190 ipkg_install_pending
1191 ipkg_install_wanted
1192 ;;
1193esac
1194
1195ipkg_$cmd $*
1196for a in `ls $IPKG_TMP`; do
1197 rm -rf $IPKG_TMP/$a
1198done
Note: See TracBrowser for help on using the repository browser.