diff options
Diffstat (limited to 'showdependencytree.cgi')
-rwxr-xr-x | showdependencytree.cgi | 23 |
1 files changed, 17 insertions, 6 deletions
diff --git a/showdependencytree.cgi b/showdependencytree.cgi index 74e2778bc..bab36da61 100755 --- a/showdependencytree.cgi +++ b/showdependencytree.cgi @@ -29,6 +29,23 @@ require "CGI.pl"; use vars %::FORM; +ConnectToDatabase(); + +quietly_check_login(); + +$::usergroupset = $::usergroupset; # More warning suppression silliness. + +###################################################################### +# Begin Data/Security Validation +###################################################################### + +# Make sure the bug ID is a positive integer representing an existing +# bug that the user is authorized to access. +ValidateBugID($::FORM{'id'}); + +###################################################################### +# End Data/Security Validation +###################################################################### my $id = $::FORM{'id'}; my $linkedid = qq{<a href="show_bug.cgi?id=$id">$id</a>}; @@ -36,12 +53,6 @@ my $linkedid = qq{<a href="show_bug.cgi?id=$id">$id</a>}; print "Content-type: text/html\n\n"; PutHeader("Dependency tree", "Dependency tree", "Bug $linkedid"); -ConnectToDatabase(); - -quietly_check_login(); - -$::usergroupset = $::usergroupset; # More warning suppression silliness. - my %seen; sub DumpKids { |