Skip to content
Projects
Groups
Snippets
Help
This project
Loading...
Sign in / Register
Toggle navigation
bugzilla
Project
Project
Details
Activity
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
etersoft
bugzilla
Commits
f47c0339
Commit
f47c0339
authored
May 27, 1999
by
terry%mozilla.org
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Patched minor security hole; don't show summary of bugs that the user
doesn't have permission to see.
parent
9b1a4477
Show whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
12 additions
and
2 deletions
+12
-2
showdependencygraph.cgi
showdependencygraph.cgi
+5
-1
showdependencytree.cgi
showdependencytree.cgi
+7
-1
No files found.
showdependencygraph.cgi
View file @
f47c0339
...
...
@@ -47,6 +47,8 @@ PutHeader("Dependency graph", "Dependency graph", $id);
if
(
defined
$id
)
{
ConnectToDatabase
();
quietly_check_login
();
$::usergroupset
=
$::usergroupset
;
# More warning suppression silliness.
mkdir
(
"data/webdot"
,
0777
);
...
...
@@ -99,8 +101,10 @@ node [URL="${urlbase}show_bug.cgi?id=\\N", style=filled, color=lightgrey]
my
$summary
=
""
;
my
$stat
;
if
(
$::FORM
{
'showsummary'
})
{
SendSQL
(
"select bug_status, short_desc from bugs where bug_id = $k"
);
SendSQL
(
"select bug_status, short_desc from bugs where bug_id = $k
and bugs.groupset & $::usergroupset = bugs.groupset
"
);
(
$stat
,
$summary
)
=
(
FetchSQLData
());
$stat
=
"NEW"
if
!
defined
$stat
;
$summary
=
""
if
!
defined
$summary
;
}
else
{
SendSQL
(
"select bug_status from bugs where bug_id = $k"
);
$stat
=
FetchOneColumn
();
...
...
showdependencytree.cgi
View file @
f47c0339
...
...
@@ -37,6 +37,10 @@ PutHeader("Dependency tree", "Dependency tree", "Bug $linkedid");
ConnectToDatabase
();
quietly_check_login
();
$::usergroupset
=
$::usergroupset
;
# More warning suppression silliness.
my
%
seen
;
sub
DumpKids
{
...
...
@@ -53,8 +57,10 @@ sub DumpKids {
if
(
@list
)
{
print
"<ul>\n"
;
foreach
my
$kid
(
@list
)
{
SendSQL
(
"select bug_status, short_desc from bugs where bug_id = $kid"
);
SendSQL
(
"select bug_status, short_desc from bugs where bug_id = $kid
and bugs.groupset & $::usergroupset = bugs.groupset
"
);
my
(
$stat
,
$short_desc
)
=
(
FetchSQLData
());
$stat
=
"NEW"
if
!
defined
$stat
;
$short_desc
=
""
if
!
defined
$short_desc
;
my
$opened
=
(
$stat
eq
"NEW"
||
$stat
eq
"ASSIGNED"
||
$stat
eq
"REOPENED"
);
print
"<li>"
;
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment