]>
git.ipfire.org Git - ipfire-2.x.git/blob - src/pakfire/pakfire
75d7fd6ad27e51a877a698484e89879a3119bd27
3 require "/opt/pakfire/lib/functions.pl";
7 &Pakfire
::message
("### Welcome to IPFire Pakfire $Conf::version!");
9 ### Check if we are running as root
11 my $user = qx(whoami
);
13 unless ( "$user" eq "root" ) {
14 &Pakfire
::message
("You must run pakfire as user root!");
19 &Pakfire
::message
("Usage: pakfire <install|remove> <pak(s)>");
20 &Pakfire
::message
(" <update>");
21 &Pakfire
::message
(" <upgrade>");
25 if ("$ARGV[0]" eq "install") {
30 @deps = &Pakfire
::resolvedeps
("$_");
41 &Pakfire
::message
("\n\n### Packages to install:");
43 my $size = &Pakfire
::getsize
("$_");
44 $size = &Pakfire
::beautifysize
($size);
45 &Pakfire
::message
("# $_ \t\t - $size");
48 &Pakfire
::message
("\n### Packages to install for dependencies:");
50 my $size = &Pakfire
::getsize
("$_");
51 $size = &Pakfire
::beautifysize
($size);
52 &Pakfire
::message
("# $_ \t\t - $size");
55 my $totalsize = &Pakfire
::addsizes
(@all);
56 $totalsize = &Pakfire
::beautifysize
($totalsize);
57 &Pakfire
::message
("\n### Download size: \t ~ $totalsize");
60 &Pakfire
::message
("Is this okay? [y/N]");
63 &Pakfire
::logger
("Answer: $ret");
65 &Pakfire
::message
("Installation aborted.");
70 &Pakfire
::message
("### Installing all packages:");
73 &Pakfire
::setuppak
("$_");
77 } elsif ("$ARGV[0]" eq "remove") {
80 } elsif ("$ARGV[0]" eq "update") {
81 &Pakfire
::getmirrors
();
82 &Pakfire
::dbgetlist
();