webadmin/bpfire
1
0
Fork 0
mirror of https://github.com/vincentmli/bpfire.git synced 2026-05-08 14:06:10 +02:00
Code Issues Packages Projects Releases Wiki Activity

Am Pakfire weitergearbeitet.

Browse Source 
CGI erweitert und mit neuen Funktionen versehen.
Paketformat grundlegend geaendert.
UpdateBooster gefixt.
Avira+Avast als Updatequelle eingefuegt.
VPN-Watch ins log.dat.
DHCP-Server startet nach der Installation.
Einen String im Installer verschoenert :D


git-svn-id: http://svn.ipfire.org/svn/ipfire/trunk@639 ea5c0bd1-69bd-2848-81d8-4f18e57aeed8
This commit is contained in:
ms
2007-06-19 18:40:52 +00:00
parent afabe9f7d1
commit 5b2a12ff8a
21 changed files with 469 additions and 332 deletions
Download Patch File Download Diff File Expand all files Collapse all files

32
src/pakfire/lib/functions.pl
View File

@@ -21,6 +21,14 @@ sub logger {
system("logger -t pakfire \"$log\"");
}
sub usage {
&Pakfire::message("Usage: pakfire <install|remove> <pak(s)>");
&Pakfire::message(" <update> - Contacts the servers for new lists of paks.");
&Pakfire::message(" <upgrade> - Installs the latest version of a pak.");
&Pakfire::message(" <list> - Outputs a short list with all available paks.");
exit 1;
}
sub pinghost {
my $host = shift;
@@ -163,7 +171,7 @@ sub dbgetlist {
}
if (("$age" gt 86400) || ("$force" eq "force")) {
cleanup();
#cleanup();
fetchfile("lists/packages_list.db", "");
move("$Conf::cachedir/packages_list.db", "$Conf::dbdir/lists/packages_list.db");
}
@@ -188,7 +196,11 @@ sub dblist {
my @templine;
foreach $line (sort @db) {
@templine = split(/\;/,$line);
### filter here...
if ("$filter" eq "notinstalled") {
next if ( -e "$Conf::dbdir/installed/meta-$templine[0]" );
} elsif ("$filter" eq "installed") {
next unless ( -e "$Conf::dbdir/installed/meta-$templine[0]" );
}
if ("$forweb" eq "forweb") {
print "<option value=\"$templine[0]\">$templine[0]-$templine[1]-$templine[2]</option>\n";
} else {
@@ -471,4 +483,20 @@ sub senduuid {
system("rm -f $Conf::cachedir/counter* 2>/dev/null");
}
sub lock {
my $status = shift;
if ("$status" eq "on") {
system("touch /opt/pakfire/pakfire.lock");
system("chmod 777 /opt/pakfire/pakfire.lock");
logger("Created lock");
} else {
if (system("rm -f /opt/pakfire/pakfire.lock >/dev/null 2>&1")) {
logger("Successfully removed lock.");
} else {
logger("Couldn't remove lock.");
}
}
return 0;
}
1;