|
|
@ -0,0 +1,74 @@ |
|
|
|
#!/usr/bin/gawk -f |
|
|
|
# |
|
|
|
# --- ROCK-COPYRIGHT-NOTE-BEGIN --- |
|
|
|
# |
|
|
|
# This copyright note is auto-generated by ./scripts/Create-CopyPatch. |
|
|
|
# Please add additional copyright information _after_ the line containing |
|
|
|
# the ROCK-COPYRIGHT-NOTE-END tag. Otherwise it might get removed by |
|
|
|
# the ./scripts/Create-CopyPatch script. Do not edit this copyright text! |
|
|
|
# |
|
|
|
# ROCK Linux: rock-src/scripts/Check-Deps-3 |
|
|
|
# ROCK Linux is Copyright (C) 1998 - 2003 Clifford Wolf |
|
|
|
# |
|
|
|
# This program is free software; you can redistribute it and/or modify |
|
|
|
# it under the terms of the GNU General Public License as published by |
|
|
|
# the Free Software Foundation; either version 2 of the License, or |
|
|
|
# (at your option) any later version. A copy of the GNU General Public |
|
|
|
# License can be found at Documentation/COPYING. |
|
|
|
# |
|
|
|
# Many people helped and are helping developing ROCK Linux. Please |
|
|
|
# have a look at http://www.rocklinux.org/ and the Documentation/TEAM |
|
|
|
# file for details. |
|
|
|
# |
|
|
|
# --- ROCK-COPYRIGHT-NOTE-END --- |
|
|
|
|
|
|
|
function check_package() { |
|
|
|
split(pkgline, a); |
|
|
|
package = a[5]; |
|
|
|
|
|
|
|
if ( package == ARGV[2] ) running = 1; |
|
|
|
|
|
|
|
if ( ! running ) return; |
|
|
|
if ( ! index(a[2], stagelevel) ) return; |
|
|
|
|
|
|
|
split(depdb[package], a); |
|
|
|
for (c=1; a[c] != ""; c++) { |
|
|
|
if ( a[c] == package ) continue; |
|
|
|
if ( broken[a[c]] ) { |
|
|
|
print "[" stagelevel "] package " \ |
|
|
|
package " depends on " a[c]; |
|
|
|
broken[package]=1; |
|
|
|
} |
|
|
|
} |
|
|
|
} |
|
|
|
|
|
|
|
BEGIN { |
|
|
|
if ( ! ARGV[3] ) { |
|
|
|
print "Usage: ./scripts/Check-Dep-3 " \ |
|
|
|
"<stagelevel> <package-name> <pkg-list-file>"; |
|
|
|
exit 1; |
|
|
|
} |
|
|
|
|
|
|
|
running = 0; |
|
|
|
broken[ARGV[2]] = 1; |
|
|
|
|
|
|
|
while ( (getline depline < "scripts/dep_db.txt") > 0 ) { |
|
|
|
p=depline; sub(":.*", "", p); |
|
|
|
d=depline; sub("^[^ ] [^ ] [^ ] ", "", d); |
|
|
|
depdb[p] = d; |
|
|
|
} |
|
|
|
|
|
|
|
for (stagelevel=ARGV[1]; stagelevel<=9; stagelevel++) { |
|
|
|
while ( (getline pkgline < ARGV[3]) > 0 ) { |
|
|
|
check_package(); |
|
|
|
} |
|
|
|
close(ARGV[3]); |
|
|
|
} |
|
|
|
|
|
|
|
if ( ! running ) { |
|
|
|
print "Package " ARGV[2] " not found!"; |
|
|
|
exit 1; |
|
|
|
} |
|
|
|
exit 0; |
|
|
|
} |
|
|
|
|