Magellan Linux

Contents of /mcore-src/trunk/mcore-tools/daemon/client/include/mage.client.class

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1341 - (show annotations) (download)
Thu Feb 17 20:33:43 2011 UTC (13 years, 2 months ago) by niro
File size: 2155 byte(s)
added uppretend too
1 # $Id$
2
3 provide mage
4
5 help_mage_update()
6 {
7 mecho "get mage.update"
8 mecho " show possible updates missing on this system."
9 mecho "or"
10 mecho "set mage.update"
11 mecho " fetches updates of the package database."
12 }
13
14 set_mage_update()
15 {
16 mage update && mecho "done" || mecho "failed"
17 }
18
19 get_mage_update()
20 {
21 mage uppretend && mecho "done" || mecho "failed"
22 }
23
24 help_mage_upgrade()
25 {
26 mecho "set mage.upgrade"
27 mecho " upgrades the whole system."
28 }
29
30 set_mage_upgrade()
31 {
32 mage upgrade && mecho "done" || mecho "failed"
33 }
34
35 help_mage_package()
36 {
37 mecho "set mage.package [method] [package]"
38 mecho " package install operations on this system"
39 mecho " methods:"
40 mecho " install - installs given package"
41 mecho " uninstall - uninstalls given package"
42 mecho " update - updates the package database"
43 mecho " upgrade - upgrades the whole system"
44 mecho "or"
45 mecho "get mage.package [method] [package]"
46 mecho " package information operations"
47 mecho " methods:"
48 mecho " pretend - pretend dependencies of given package"
49 mecho " uppretend - pretend dependencies of a whole system upgrade"
50 mecho " search - searches the database for matching packages"
51 }
52
53 set_mage_package()
54 {
55 local method="$1"
56 local package="$2"
57 [[ -z ${method} ]] && help_mage_package && return 1
58
59 case ${method} in
60 install|uninstall)
61 [[ -z ${package} ]] && help_mage_package && return
62 mage "${method}" "${package}" && mecho "done" || mecho "failed"
63 ;;
64 update|upgrade)
65 mage "${method}" && mecho "done" || mecho "failed"
66 ;;
67 *) help_mage_package && return 1 ;;
68 esac
69 }
70
71 get_mage_package()
72 {
73 local method="$1"
74 local package="$2"
75 [[ -z ${method} ]] && help_mage_package && return 1
76
77 case ${method} in
78 pretend|search)
79 [[ -z ${package} ]] && help_mage_package && return 1
80 mage "${method}" "${package}" && mecho "done" || mecho "failed"
81 ;;
82 uppretend)
83 mage "${method}" && mecho "done" || mecho "failed"
84 ;;
85 *) help_mage_package && return 1 ;;
86 esac
87 }
88
89 help_mage_clean()
90 {
91 mecho "set mage.clean"
92 mecho " deletes all downloaded packages from the system"
93 }
94
95 set_mage_clean()
96 {
97 mage clean && mecho "done" || mecho "failed"
98 }