/[qa]/trunk/wml/developer.wml
ViewVC logotype

Contents of /trunk/wml/developer.wml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 368 - (hide annotations) (download)
Mon Sep 2 23:10:25 2002 UTC (10 years, 8 months ago) by joy
File size: 22119 byte(s)
footer HTML and language issues
1 igenibel 358 #use wml::templ::template title="Debian Developer's Packages Overview" author="Igor Genibel"
2    
3 joy 365 # +-------------------------------------------------------------------------+
4     # | Copyright (C) 2002 Igor Genibel |
5     # | |
6     # | This program is free software; you can redistribute it and/or |
7     # | modify it under the terms of the GNU General Public License |
8     # | as published by the Free Software Foundation; either version 2 |
9     # | of the License, or (at your option) any later version. |
10     # | |
11     # | This program is distributed in the hope that it will be useful, |
12     # | but WITHOUT ANY WARRANTY; without even the implied warranty of |
13     # | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
14     # | GNU General Public License for more details. |
15     # +-------------------------------------------------------------------------+
16     # | This code is currently maintained and debugged by Igor Genibel, any |
17     # | questions or comments regarding this code should be directed to: |
18     # | - igor@genibel.org |
19     # +-------------------------------------------------------------------------+
20     # | - Igor Genibel - http://genibel.org/ |
21     # | $Id$
22     # +-------------------------------------------------------------------------+
23    
24 igenibel 358 <?
25    
26     $branch = array ("main",
27     "contrib",
28     "non-free",
29     "non-US/main",
30     "non-US/contrib",
31     "non-US/non-free" );
32    
33     setlocale(LC_ALL, 'fr_FR');
34    
35     $prefix="/org/qa.debian.org/data/ddpo/results";
36     #$prefix="/home/igenibel/qa.debian.org/data/ddpo/results";
37    
38     function printBackLink() {
39     ?>
40     <p><a href="developer.php">Back to main page</a></p>
41     <?
42     }
43    
44     function print_header_entries_top($keys, $name)
45     {
46     ?>
47 joy 366 <h1 align="center">Packages overview for <?print $name?></h1>
48 igenibel 358
49 joy 366 <p><strong>General information:</strong></p>
50 igenibel 358 <?
51     if ($keys == "NOID") {
52     ?>
53 joy 366 <p><font size="+1" color="red">GPG key id not found!</font>
54     <font size="-2">(key id was not found neither in the Debian keyring
55     nor on a public keyserver)</font></p>
56 igenibel 358 <?
57     }else{
58     foreach (explode(",", $keys) as $key) {
59     ?>
60 joy 366 <font size="-1">GPG key id: <a href="developer.php?gpg_key=<?print $key?>"><?print $key?></a></font><br>
61 igenibel 358 <?
62     }
63     }
64     }
65    
66     function print_header_entries_body($login, $key, $name)
67     {
68     $lintian = preg_replace("/[\s-\"í']/", "_", $name);
69     $buildd=urlencode("$name <$login> ");
70     ?>
71     <font size="-1">
72     <a href="http://bugs.debian.org/cgi-bin/pkgreport.cgi?which=maint&data=<? print $login ?>&archive=no&raw=yes&bug-rev=yes&pend-exc=fixed&pend-exc=done">Non-fixed bugs, most recent first</a><br>
73     <a href="http://bugs.debian.org/cgi-bin/pkgreport.cgi?maint=<?print $login?>">All bugs related to &lt;<?print $login?>&gt;</a><br>
74     <a href="http://bugs.debian.org/cgi-bin/pkgreport.cgi?which=maint&data=<?print rawurlencode($login)?>&archive=no&pend-exc=done&sev-inc=critical&sev-inc=grave&sev-inc=serious">RC Bugs related to &lt;<?print $login?>&gt;</a><br>
75     <a href="http://bugs.debian.org/cgi-bin/pkgreport.cgi?submitter=<?print $login?>">All bugs submitted by &lt;<?print $login?>&gt;</a><br>
76     <a href="http://lintian.debian.org/reports/m<?print $lintian?>.html">Lintian report</a><br>
77     <a href="http://buildd.debian.org/bymaint.php?maint=<?print "$buildd"?>">Buildd report</a>
78     </font>
79    
80     <hr>
81     <font size="-1">
82     <b>Packages in <font color="blue">blue</font> are packages that are uploaded by developer (reference to Uploaders: field)</b><br>
83 joy 367 <b>Packages version in <font color="red">red</font> are NMUed</b><br>
84 joy 366 <b>Packages where testing version in <font color="magenta">magenta</font> are those where the unstable version differs from the version in testing</b>
85 igenibel 358 </font>
86     <?
87     }
88    
89     #
90     # print info for not found developer
91     #
92    
93     function print_notfound($login)
94     {
95     print "<h2>No information available for $login</h2>";
96     }
97    
98    
99     #
100     # print the form because no login provided
101     #
102    
103     function print_form()
104     {
105     ?>
106 joy 366
107     <h1>Debian Developer's Packages Overview</h1>
108    
109     <p>Use the following search forms to determine the Debian developer whose
110     packages overview you wish to see:</p>
111    
112     <p>Search based on the <tt>Maintainer</tt> field in packages:
113 igenibel 358 <form method="GET" action="developer.php">
114     <input size="30" maxsize="40" type="text" limit="16" name="login" value="">
115 joy 366 <input type="submit" value="Find">
116     </form>
117     <small>
118     (if a single username is provided, @debian.org is automatically appended)
119     </small>
120    
121     <p>Search based on a GPG key ID:
122 igenibel 358 <form method="GET" action="developer.php">
123     <input size="8" maxsize="8" type="text" limit="8" name="gpg_key" value="">
124 joy 366 <input type="submit" value="Find">
125     </form>
126    
127     <p>Search based on a source package name:
128 igenibel 358 <form method="GET" action="developer.php">
129     <input size="20" maxsize="30" type="text" limit="20" name="package" value="">
130     <input type="submit" value="Go">
131     </form>
132 joy 366
133 igenibel 358 <?
134     }
135    
136    
137     function print_query_all()
138     {
139     ?>
140 joy 366
141     <p>Do you want to see the complete, sorted list of developers?
142     <strong>(>200kb!)</strong>
143 igenibel 358 <form method="POST" action="developer.php">
144     <input type="hidden" name="all" value="1">
145 joy 366 <input type="submit" value="Show the list">
146 igenibel 358 </form>
147    
148     <?
149     }
150    
151     function print_all()
152     {
153     global $prefix;
154     $fp = fopen("$prefix/extract", "r");
155     ?>
156    
157     <hr><h2>Sorted developer list</h2>
158     <table width="100%" border="1">
159     <tr align="center">
160     <td width="60%">
161     <b>Name and email</b>
162     </td>
163     <td>
164     <b>main</b>
165     </td>
166     <td>
167     <b>non-US</b>
168     </td>
169     <td>
170     <b>Other <font size="-3" color="blue"><br>all contrib &<br>non-free<br>packages</font></b>
171     </td>
172     <td>
173     <b>Total</b>
174     </td>
175     </tr>
176    
177     <?
178     while(!feof($fp)) {
179     $line = fgets($fp, "10240");
180     if($line != "") {
181     $count = 0;
182     $line = preg_replace("/, /", ",", $line);
183     preg_match("/;(.+?);(.+?);(.*?);(.*?);(.*?);(.*?);(.*?);(.*?);(.*)$/", $line, $info_array);
184     print '<tr align="center">';
185     print '<td width="15%">';
186     print "<b><a href=\"$index_page?login=$info_array[1]\">$info_array[3] &lt;$info_array[1]&gt;</a></b>";
187     print '</td>';
188     $main = 0;
189     $nonUS = 0;
190     $other = 0;
191     if($info_array[4] != "") {
192     $main += count(explode(" ", $info_array[4]));
193     $count += count(explode(" ", $info_array[4]));
194     }
195     if($info_array[5] != "") {
196     $other += count(explode(" ", $info_array[5]));
197     $count += count(explode(" ", $info_array[5]));
198     }
199     if($info_array[6] != "") {
200     $nonUS += count(explode(" ", $info_array[6]));
201     $count += count(explode(" ", $info_array[6]));
202     }
203     if($info_array[7] != "") {
204     $other += count(explode(" ", $info_array[7]));
205     $count += count(explode(" ", $info_array[7]));
206     }
207     if($info_array[8] != "") {
208     $other += count(explode(" ", $info_array[8]));
209     $count += count(explode(" ", $info_array[8]));
210     }
211     if($info_array[9] != "") {
212     $other += count(explode(" ", $info_array[9]));
213     $count += count(explode(" ", $info_array[9]));
214     }
215    
216     ?>
217     <td><? print $main?></td>
218     <td><? print $nonUS?></td>
219     <td><? print $other?></td>
220     <td><b><? print $count?></b></td>
221     </tr>
222     <?
223     }
224     }
225     print '</table>';
226     }
227    
228     function get_rep($package_name)
229     {
230     if(preg_match("/^lib/", $package_name)) {
231     return substr($package_name, 0, 4);
232     }else{
233     return substr($package_name, 0, 1);
234     }
235     }
236    
237 weasel 362 # Check whether there is a debcheck entry for that package
238     function debcheckavailable($branch, $package_name) {
239     $package = ereg_replace ("\.", "_", $package_name);
240     if (ereg ("[^a-zA-Z0-9+_-]", $package) ||
241     ($branch != "oldstable" && $branch != "stable" && $branch != "testing" && $branch != "unstable")) {
242     return 0;
243     }
244     $BASEDIR='/org/qa.debian.org/data/debcheck/result/';
245     return file_exists($BASEDIR.'/'.$branch.'/packages/'.$package);
246     }
247    
248 igenibel 358 #
249     # This function print a package table information for specific branch
250     # given in argument
251     #
252     function print_package_entries($branch, $packages)
253     {
254    
255     $packages = preg_replace ("/, /", ",", $packages);
256     $pack_array = split(" ", $packages);
257    
258     ?>
259     <h3>Packages for <?print $branch?></h3>
260     <font size="-1">
261     <table width="100%" border="1">
262     <tr align="center">
263     <th rowspan="2"><font size="-1" color="green">Source&nbsp;Name</font></th>
264     <th rowspan="1" colspan="5"><font size="-1" color="green">Bugs</font></th>
265     <th rowspan="1" colspan="4"><font size="-1" color="green">Version</font></th>
266     <th rowspan="1" colspan="2"><font size="-1" color="green">Security</font></th>
267     <th rowspan="2"><font size="-1" color="green">Binary<br> Package Page</font></th>
268     <th rowspan="2"><font size="-1" color="green">Buildd</font></th>
269     <th rowspan="2"><font size="-1" color="green">Excuses</font></th>
270     <th rowspan="1" colspan="3"><font size="-1" color="green">Broken dependencies</font></th>
271     <th rowspan="2"><font size="-1" color="green">Section</font></th>
272     <th rowspan="2"><font size="-1" color="green">Priority</font></th>
273     <th rowspan="2"><font size="-1" color="green">Pool</font></th>
274     <th rowspan="1" colspan="3"><font size="-1" color="green">Uninstallable</font></th>
275     </tr>
276     <tr align="center">
277     <th><font size="-1" color="green"><a name="foo" title="All opened bugs">All</a></font></th>
278     <th><font size="-1" color="green"><a name="foo" title="Release Critical bugs">RC</a></font></th>
279     <th><font size="-1" color="green"><a name="foo" title="Important & Normal bugs">I&amp;N</a></font></th>
280     <th><font size="-1" color="green"><a name="foo" title="Minor & Wishlist bugs">M&amp;W</a></font></th>
281     <th><font size="-1" color="green"><a name="foo" title="Fixed & Pending bugs">F&amp;P</a></font></th>
282     <th><font size="-1" color="green">Stable</font></th>
283     <th><font size="-1" color="green">Testing</font></th>
284     <th><font size="-1" color="green">Unstable</font></th>
285     <th><font size="-1" color="green">Exp.</font></th>
286     <th><font size="-1" color="green">Stable</font></th>
287     <th><font size="-1" color="green">Testing</font></th>
288     <th><font size="-1" color="green">Stable</font></th>
289     <th><font size="-1" color="green">Testing</font></th>
290     <th><font size="-1" color="green">Unstable</font></th>
291     <th><font size="-1" color="green">Stable</font></th>
292     <th><font size="-1" color="green">Testing</font></th>
293     <th><font size="-1" color="green">Unstable</font></th>
294     </tr>
295     <?
296     foreach ($pack_array as $package)
297     {
298     global $prefix;
299     # print "<<< $package >>>";
300     # $upstream = $package[1];
301     preg_match("/(.+)\((.+)\)/", $package, $result);
302     $list = split (",", $result[2]);
303     $package_name = $result[1];
304     if(preg_match("/#/", $package)) {
305     $uploader = 1;
306     $package = preg_replace("/#/", "", $package);
307     }
308     if(preg_match("/%/", $package)) {
309     $all = 1;
310     $package = preg_replace("/%/", "", $package);
311     }
312     preg_match("/(.+?)\[(.+)\]\{(.+)\}\{(.+)\}\{(.+)\}\|(.+)\|:(.+):/", $package, $results);
313     $package = $package_name;
314     $version = $results[2];
315     $versions = explode (",", $version);
316     $version_stable = $versions[0];
317     $version_testing = $versions[1];
318     $version_unstable = $versions[2];
319     $version_experimental = $versions[3];
320     $security_stable = $versions[4];
321     $security_testing = $versions[5];
322     $uninstalable_stable = preg_replace("/,/", "&nbsp;", $results[3]);
323     $uninstalable_testing = preg_replace("/,/", "&nbsp;", $results[4]);
324     $uninstalable_unstable = preg_replace("/,/", "&nbsp;", $results[5]);
325     $priority = $results[6];
326     $section = $results[7];
327    
328     $fp = fopen("$prefix/bugs.txt", "r");
329     $bug_list = explode(" ", "0 0 0 0");
330     $temp = preg_replace("/\+/", "_", $package);
331     while(!feof($fp)) {
332     $line = fgets($fp, "512");
333     $line = preg_replace("/\+/", "_", $line);
334     if(preg_match("/^$temp\s+(\d+\s\d+\s\d+\s\d+)/", $line, $results)) {
335     $bug_list = explode(" ", $results[1]);
336     break;
337     }
338    
339     }
340     fclose($fp);
341    
342 weasel 362 if(strcmp($version_stable, "-") == 0 || !debcheckavailable('stable', $package)) {
343     $stable_dep = "<font size=\"-1\">-</font>";
344 igenibel 358 }else{
345     $stable_dep = '<font size="-1"><a href="http://qa.debian.org/debcheck.php?dist=stable&package=' . rawurlencode($package) .'">Stable</a></font>';
346     }
347    
348 weasel 362 if(strcmp($version_testing, "-")== 0 || !debcheckavailable('testing', $package)) {
349     $testing_dep = "<font size=\"-1\">-</font>";
350 igenibel 358 }else{
351     $testing_dep = '<font size="-1"><a href="http://qa.debian.org/debcheck.php?dist=testing&package=' . rawurlencode($package) .'">Testing</a></font>';
352     }
353    
354     $buildd = "http://buildd.debian.org/build.php?pkg=".$package;
355     if(preg_match("/non-US/", $branch)) {
356     $pool = "http://non-us.debian.org/debian-non-US/pool/". $branch . "/" .get_rep($package) . "/" . $package . "/";
357     }else{
358     $pool = "http://ftp.debian.org/debian/pool/". $branch . "/" .get_rep($package) . "/" . $package;
359     }
360    
361 weasel 362 if(strcmp($version_unstable, "-")== 0 || !debcheckavailable('unstable', $package)) {
362     $sid_dep = "<font size=\"-1\">-</font>";
363     }else{
364     $sid_dep = '<font size="-1"><a href="http://qa.debian.org/debcheck.php?dist=unstable&package=' . rawurlencode($package) . '">Unstable</a></font>';
365     }
366 igenibel 358 $char = substr($package, 0, 1);
367     if(file_exists("$prefix/excuses/$char/$package")) {
368     $excuse = "<a href=\"developer.php?excuse=$package\">Excuses</a>";
369     }else{
370     $excuse = "No";
371     }
372    
373     if(strcmp($version_experimental, "-")) {
374     $version_experimental = '<font color="2222AA"><b>' . $version_experimental . '</b></font>';
375     }
376     $experimental = '<td rowspan="1" colspan="1"><font size="-1">' . $version_experimental . '</font></td>';
377    
378    
379     if((strcmp ($version_stable, $version_testing) == 0) &&
380     (strcmp ($version_stable, "/") != 0)) {
381     if((strcmp ($version_unstable, $version_testing) == 0)) {
382     $version_print = '<td rowspan="1" colspan="3"><font size="-1">' . $version_stable . '</font></td>' .$experimental;
383     }else{
384     $version_print = '<td rowspan="1" colspan="2"><font size="-1" color="magenta">' . $version_stable . '</font></td><td rowspan="1" colspan="1"><font size="-1">' . $version_unstable . '</font></td>' . $experimental;
385     }
386     $ver = explode("-", $version_unstable);
387     if((preg_match("/(.+\..+?)$/", $ver[count($ver) - 1], $toto)) && (count($ver) != 1))
388     {
389     $version_print = preg_replace("/$version_unstable/", "<font color=\"red\">$version_unstable</font>", $version_print);
390     }
391     }else if(strcmp ($version_testing, $version_unstable) == 0) {
392     if(strcmp($version_stable, "/") != 0) {
393     $version_stable = '<font color="#00AADD" size="-1">'.$version_stable.'</font>';
394     }
395     $version_print = '<td><font size="-1">'.$version_stable.'</font></td><td rowspan="1" colspan="2"><font size="-1">' . $version_testing .'</font></td>' .$experimental;
396     $ver = explode("-", $version_unstable);
397     if((preg_match("/(.+\..+?)$/", $ver[count($ver) - 1], $toto)) && (count($ver) != 1))
398     {
399     $version_print = preg_replace("/$version_unstable/", "<font color=\"red\">$version_unstable</font>", $version_print);
400     }
401     }else {
402     if(strcmp($version_stable, "/") != 0) {
403     $version_stable = '<font color="#00AADD" size="-1">'.$version_stable.'</font>';
404     }else{
405     $version_stable = '<font size="-1">'.$version_stable.'</font>';
406     }
407     $version_print = '<td>' . $version_stable . '</td><td><font size="-1" color="magenta">'.$version_testing . '</font></td><td><font size="-1">'.$version_unstable.'</font></td>' . $experimental;
408     $ver = explode("-", $version_unstable);
409     if((preg_match("/(.+\..+?)$/", $ver[count($ver) - 1], $toto)) && (count($ver) != 1))
410     {
411     $version_print = preg_replace("/$version_unstable/", "<font color=\"red\">$version_unstable</font>", $version_print);
412     }
413     }
414    
415     ?>
416     <tr align="center">
417     <td width="15%">
418     <font size="-1"
419     <?
420     if($uploader == 1) {
421     print ' color="blue"';
422     $uploader = 0;
423     }
424     print "><b>$package</b><a href=\"http://pts.debian.net/".get_rep($package)."/$package.html\">[pts]</a>";
425     ?></font></td>
426     <td>
427     <font size="-1">
428     <?
429     $bugs = "http://bugs.debian.org/cgi-bin/pkgreport.cgi?src=". rawurlencode($package)."&repeatmerged=yes&archive=no&pend-exc=pending-fixed&pend-exc=fixed&pend-exc=done";
430     $bugs_all = "http://bugs.debian.org/cgi-bin/pkgreport.cgi?src=". rawurlencode($package);
431     $bug_count = $bug_list[0] + $bug_list[1] + $bug_list[2] + $bug_list[3];
432     if($bug_count == 0) { ?>
433     <font size="-1">0</font>
434     <? }else{ ?>
435     <a href="<?print $bugs_all?>"><? print $bug_count; ?></a>
436     <? } ?>
437     </font>
438     </td>
439     <td>
440     <?
441     if(!strcmp($bug_list[0], "0")) { ?>
442     <font size="-1">0</font>
443     <? }else{ ?>
444     <font size="-1"><a class="a" href="<? print $bugs; ?>&sev-inc=critical&sev-inc=grave&sev-inc=serious"><? print $bug_list[0]; ?></a></font>
445     <? } ?>
446     </td>
447     <td>
448     <?
449     if(!strcmp($bug_list[1], "0")) { ?>
450     <font size="-1">0</font>
451     <? }else{ ?>
452     <font size="-1"><a class="a" href="<? print $bugs; ?>&sev-inc=important&sev-inc=normal"><? print $bug_list[1]; ?></a></font>
453     <? } ?>
454     </td>
455     <td>
456     <?
457     if(!strcmp($bug_list[2], "0")) { ?>
458     <font size="-1">0</font>
459     <? }else{ ?>
460     <font size="-1"><a class="a" href="<? print $bugs; ?>&sev-inc=minor&sev-inc=wishlist"><? print $bug_list[2]; ?></a></font>
461     <? } ?>
462     </td>
463     <td>
464     <?
465     if(!strcmp($bug_list[3], "0")) { ?>
466     <font size="-1">0</font>
467     <? }else{ ?>
468     <font size="-1"><a class="a" href="http://bugs.debian.org/cgi-bin/pkgreport.cgi?src=<? print rawurlencode($package); ?>&repeatmerged=yes&archive=no&pend-inc=pending-fixed&pend-inc=fixed"><? print $bug_list[3]; ?></a></font>
469     <? } ?>
470     </td>
471     <?
472    
473     print $version_print;
474     if(strcmp($security_stable,"-")) {
475     $security_stable = "<font color=\"red\">$security_stable</font>";
476     }
477     if(strcmp($security_testing,"-")) {
478     $security_testing = "<font color=\"red\">$security_stable</font>";
479     }
480     print '<td><font size="-1">'.$security_stable.'</font></td><td><font size="-1">'.$security_testing.'</font></td>';
481     ?>
482     <td width="15%">
483     <font size="-1">
484     <?
485     for ($i = 1; $i <= count($list); $i++) {
486     $url = rawurlencode("${list[$i -1]}");
487     print '<a href="http://packages.debian.org/';
488     print $url;
489     print '">';
490     print $i;
491     print "</a>";
492     if(($i % 3 ) == 0) {
493     print " ";
494     }else{
495     print "&nbsp;";
496     }
497     }
498     ?>
499     </font>
500     </td>
501     <td>
502     <font size="-1">
503     <?
504     if($all == 1) {
505     print "Arch. All";
506     $all = 0;
507     }else{
508     print "<a href=\"$buildd\">Buildd</a>";
509     }
510     ?>
511     </font>
512     </td>
513     <td>
514     <font size="-1">
515     <?
516     print $excuse;
517     ?>
518     </font>
519     </td>
520     <td>
521     <?print $stable_dep?>
522     </td>
523     <td>
524     <?print $testing_dep?>
525     </td>
526     <td>
527     <?print $sid_dep?>
528     </td>
529     <td>
530     <?
531     print "<font size=\"-1\">$section</font>";
532     ?>
533     </td>
534     <td>
535     <?
536     print "<font size=\"-1\">$priority</font>";
537     ?>
538     </td>
539     <td>
540     <font size="-1">
541     <a href="<?print $pool?>">Pool</a>
542     </font>
543     </td>
544     <td>
545     <?
546     print "<font size=\"-1\">$uninstalable_stable</font>";
547     ?>
548     </td>
549     <td>
550     <?
551     print "<font size=\"-1\">$uninstalable_testing</font>";
552     ?>
553     </td>
554     <td>
555     <?
556     print "<font size=\"-1\">$uninstalable_unstable</font>";
557     ?>
558     </td>
559     </tr>
560     <?
561     }
562     ?>
563     </table>
564     </font>
565     <?
566     }
567    
568     if($excuse != "") {
569     $char = substr($excuse, 0, 1);
570     if(file_exists("$prefix/excuses/$char/$excuse")) {
571     $fp = fopen("$prefix/excuses/$char/$excuse","r");
572     print fread ($fp, filesize ("$prefix/excuses/$char/$excuse"));
573     fclose($fp);
574     }else{
575     print "<h2>No excuse for $excuse</h2>";
576     }
577     }else if($gpg_key != "") {
578     $contents = file("$prefix/extract");
579    
580     $printed = 0;
581     $match = 0;
582    
583     $gpg_key = preg_replace ("/0x/i", "", $gpg_key);
584     foreach ($contents as $line) {
585     if(preg_match("/;(.+?);(.*$gpg_key.*);(.+?);(.*?);(.*?);(.*?);(.*?);(.*?);(.*)/i", $line, $pack_array)) {
586     $match += 1;
587     if($printed == 0) {
588     print_header_entries_top($pack_array[2], $pack_array[3]);
589     $printed = 1;
590     }else{
591     print "<hr>";
592     }
593    
594     print_header_entries_body($pack_array[1], $pack_array[2], $pack_array[3]);
595     $count = 4;
596     foreach ($branch as $value) {
597     if($pack_array[$count] != "") {
598     print_package_entries($value, $pack_array[$count]);
599     }
600     $count += 1;
601     }
602     }
603     }
604     if($match == 0) {
605     print_notfound($gpg_key);
606     }
607    
608     printBackLink();
609     }else if($login != "") {
610     $fp = fopen("$prefix/extract", "r");
611     $contents = fread($fp, filesize ("$prefix/extract"));
612    
613     if(! preg_match("/@/i", $login)) {
614     $login .= "@debian.org";
615     }
616    
617     if(preg_match("/;$login;(.*?);(.*?);(.*?);(.*?);(.*?);(.*?);(.*?);(.*)/i", $contents, $pack_array))
618     {
619     print_header_entries_top($pack_array[1], $pack_array[2]);
620     print_header_entries_body($login, $pack_array[1], $pack_array[2]);
621     $count = 3;
622     foreach ($branch as $value) {
623     if($pack_array[$count] != "") {
624     print_package_entries($value, $pack_array[$count]);
625     }
626     $count += 1;
627     }
628     }else{
629     print_notfound($login);
630     }
631     fclose($fp);
632     printBackLink();
633     }else if ($package != "") {
634     $fp = fopen("$prefix/extract", "r");
635     $found = 0;
636     if(preg_match("/\+\+/", $package)) {
637     $package_short = preg_replace("/\+/", "", $package);
638     $regexp="/[ ;]$package_short..\(/";
639     }elseif(preg_match("/\+/", $package)){
640     $package_short = preg_replace("/\+/", "", $package);
641     $regexp="/[ ;]$package_short.\(/";
642     }else{
643     $regexp="/[ ;]$package\(/";
644     }
645     while(!feof($fp)) {
646     $line = fgets($fp, "8192");
647     if(preg_match("$regexp", $line, $results)) {
648     $found = 1;
649     preg_match("/;(.+?);(.*?);(.*?);(.*?);(.*?);(.*?);(.*?);(.*?);(.*)/i", $line, $pack_array);
650     print_header_entries_top($pack_array[2], $pack_array[3]);
651     print_header_entries_body($pack_array[1], $pack_array[2], $pack_array[3]);
652     $count = 4;
653     foreach ($branch as $value) {
654     if($pack_array[$count] != "") {
655     print_package_entries($value, $pack_array[$count]);
656     }
657     $count += 1;
658     }
659     }
660     }
661     if($found == 0) {
662     print_notfound($package);
663     }
664     fclose($fp);
665     printBackLink();
666     }else{
667     print_form();
668     if($all) {
669     print_all();
670     }else{
671     print_query_all();
672     }
673     }
674    
675     $fp = fopen("$prefix/extract.date", "r");
676     $general = fgets($fp, "512");
677     fclose($fp);
678     $fp = fopen("$prefix/bugs.date", "r");
679     $bugs = fgets($fp, "512");
680     fclose($fp);
681     ?>
682 joy 368 <hr>
683 igenibel 358 <div align="left">
684 joy 368 <p><small>
685 igenibel 358 Last updated:<br>
686 joy 368 General information: <? print $general; ?><br>
687     Bugs information: <? print $bugs; ?>
688     </small></p>
689 igenibel 358 </div>

Properties

Name Value
svn:eol-style native
svn:keywords Author Date Id Revision

  ViewVC Help
Powered by ViewVC 1.1.5