From a89d2a10b4337ee73d00980c38c550e4a3be9c44 Mon Sep 17 00:00:00 2001
From: Tom Copeland <tomcopeland@users.sourceforge.net>
Date: Wed, 27 Nov 2002 16:52:35 +0000
Subject: [PATCH] added backup of jobs, added colors and whatnot to web page

git-svn-id: https://pmd.svn.sourceforge.net/svnroot/pmd/trunk@1268 51baf565-9d33-0410-a72c-fc3788e3496d
---
 pmd-web/src/copytolocal.bat |   1 +
 pmd-web/src/jobs.tar.gz     | Bin 0 -> 2849 bytes
 pmd-web/src/webpmd.pl       |  22 ++++++++++++++++------
 3 files changed, 17 insertions(+), 6 deletions(-)
 create mode 100644 pmd-web/src/jobs.tar.gz

diff --git a/pmd-web/src/copytolocal.bat b/pmd-web/src/copytolocal.bat
index 63fb9a3d2e..8960a24f72 100755
--- a/pmd-web/src/copytolocal.bat
+++ b/pmd-web/src/copytolocal.bat
@@ -2,4 +2,5 @@ pscp tomcopeland@pmd.sourceforge.net:/home/groups/p/pm/pmd/cgi-bin/webpmd.pl .
 pscp tomcopeland@pmd.sourceforge.net:/home/groups/p/pm/pmd/cgi-bin/pmd.rb .
 pscp tomcopeland@pmd.sourceforge.net:/home/groups/p/pm/pmd/cgi-bin/processor.rb .
 pscp tomcopeland@pmd.sourceforge.net:/home/groups/p/pm/pmd/cgi-bin/PMD/Project.pm ./PMD/
+pscp tomcopeland@pmd.sourceforge.net:/home/users/t/to/tomcopeland/jobs.tar.gz .
 
diff --git a/pmd-web/src/jobs.tar.gz b/pmd-web/src/jobs.tar.gz
new file mode 100644
index 0000000000000000000000000000000000000000..48f15d0537eea927c84841f02674bad733650d8a
GIT binary patch
literal 2849
zcmai$i9gf}7sh7{QD`bzS{UVx(lWFRB14<hm8-IkrI3h35{>T9S_%mj*EY5ivQw^N
zEM?!xdTWFt+h7bcW9D~W_r8C?d;Ws+d_T|goI?l~!z`|hpTOW|ZH8|Rm&?quxEm^y
zRWvG0ggGR`Vg2B8$%NKFt2P(6mKPsvQtJAPFPPtL`CO{u*UrT4xm2u-hP$*_b6I0s
zo6#bFbWA$AA-sHi;YLj14=UQokeA7ys4$Uh-r{F6-!47xScyH${G_tzDOa9P{C2rO
zYc3F;$`<AOQjWK4+d3K+U2D;#&G|;Xco9i%Jap)8Pi)1`WO3b1Y&FBK>?BhsFH#h9
z43-29IMm})tYJ;|eFc5)_SGfgA1`?Z(bEsHTOI_e@UX(X_koGmY?Np6_c}-Ll`Tgo
z8=SQ1urT<Slk`2^7oPPBPrUTE8nkB3h^C5bdVX4O%pAOtVtRDnd7tOHsb9!4VME3G
z<5LR^Nt2Lqs#xf|2H@v6ha0Lt7+UyN#W3C~FW7%bGj420cX!Y^t2d&P4+6rph&_gy
zS&^Ps0C|KKWi1gu;v$5uQllq@^nldaMSoqr$EAG!@87EsnJg`D;X1u7#JKEvs*A&t
zIz-h*0#OG!hEjDoK(e2L^w$_epY0<!2?;~~r$tJ$-3x<du!{s2LGH>kJPXlQW82-a
zH_xs|>mPC$YR_6<{tC&-3gs|10^!Uh7`T%mmb-FthB^Yndd_?hOtG{~C~CCxE4jtK
z{z5hQjrUr1TmH_TF@gJn4wm|*2Z5brA%S&ZHu5=W!q|ejLv3yY$;SMOticp^xdSr#
zAgY%~Sl&Gk?$y1Zaz@B`XV!)E^<4*3mE;uWp4`<vNV{RPd;~Pc5V;mEV*eFH1>%DJ
z8=rlMYbmJ^X5+=~?QyWA9I`O9W>r^Kqa3?jWV~r5y;D;EUpR`@7MlY~DZYatcLM?y
z+sw{1<z`ZhmDBN)X82zGOdGH&&7dk?oRd!o01uJZC^@(O-mR%V6`R8!ZB6e4CwWe8
zy(n&U?OxIy*8x#BW_bec8=-VU6Ge}BQg@wTxY`V*v#i@6*96;;#<7yZMv2Ovwf)kw
zX6})YzX(ci7yn@MFcIKWm<Qrt<}+J@`*S-*lGI2>mX4Ou<{9VbkxM$=@(jpOxXR$s
z9=QTpPhXJ*{LZozSP9RE6Fu}>9usHZYYf%|(*&r*@yCct!m^c2$?c2UWx;LO<)>gf
z4Gwl}sVe*`l4nl^<_kB!?(a1>k6CQd@jRMm*{af8xEc>i5x3=<C>Skx#Gy;OO~dpL
zEp^|*mUUn8!il7V;;sV*-LMhpU37vUo6o2#g#HaFzhKz>+Pr<7B#$7LK(dkEcWee7
z1yxWv*~dbz^37Q=T|oO+`y`@xW9WH7i(x{Ei43D8sfsg8o|9UhA|L$;Uc>-qFnFvV
z<`G(6Dihy9hrhU>?s4j^%Hxy|^2_9i9fb^NxQiN(aBUS?NP6`$kIaGVe44jkk$fK`
zKe*Xgnx(nJXpBDDMS@Cd9f!biM`=SKn_3;Zz*yJHr(dWE?RsQ!9lHm~>rwsT60JR|
zG0}3|^6&z~TQHV=UTPomc{`VwG+i8D5|a2%j(cQs%SEB|R~FhcxkEJ{g5I}-DT+6n
zK<tIlH8@ca7lU=QB}<xl-yC7!g;|C%j#o}lwW0saESD}O>IDT+yHID5<OSgGZVDR>
z;)Yb};_CflE)uS#@a^{;bIV;o?ttBR4jY-N;dqGH2t0;pa+Cq5Q#3V9Yix0&pH5n2
z7mG`aCQP#E-}%P-)!2;RN2GE7fq_?brMhYI%o*}y0ncL$IXut2uP;~2rI~d`LQ^8S
zFZ)i_#kk8_10Bk31_addxkN8{Z>zJ*yY#8S6)s}&QI<2%KLIs7nzVO4(zKSkFt(%|
zE5cKY?Gf}L$Cb;c@lc{X+%rY(M(Wmf>lg(GLrl7#UPb9ZPA$bA6CXEYn>_oQ#!EJv
zEPGQxz1A0nyNkvV^!bbp$Hzd!2RXP+k3><U-#pMM2vD<|*hl!>liiFSQ5BsL`Bo0*
z9iU`93xO<TCiMu!wJ|4uswm6)n2+pCl`@cFT>i7j=5@md%t+RnlXN$wV@AQuehQ(m
z0>n-}Ykjj9SBp7yy8gOny^PkF_kmV*Yk#gUwUi6_t7Nu-aFRVLYs`dT0o`n^`+n9^
zYcSo5L8Twnev22Dz-`+vi+5{Ut3FRCP=KO|@0eUZG~(T9Aj(sb6tPv;TgIL8d4E9R
z&Hd$aG;0irj>ib6G=t}fa%lNSoJx&Qdbz!>J_}c``ZMW;mb0`mYg=XC7i*icyJ$iG
zPiP6JQ|#t2L0r0IJda7z{dLJ<wf~kh?~&AJ)x=8++l*qrl)mQ>YV*(^T>7Yi?2?Cw
zyda7kp-Z74ib0z)cYUtMXxN9{Sn7yzs>rb*ufSCYzBzLjehx~4-33Um&VV=eZJq|n
zTNrmT1GuLr{0SMjfdWYVLVp5j)uAkUp1n218O<R**rT5&ucV60Z6NWSdzR#ikjJz^
z$moZYA-nz;-i#6b{ePJCmx>e<c5W9;L>OE6cb3v6ziFatSgL~;7|QS1@akvHYw^ZN
zB1w8u>|u}<2<AXigN2MYmtlxvyHF2NYo3QAk*v6AhsnKWIsU66J+h0*B{Z^Mp(c(e
zKy=AC|K^5gUoPT!A%STTv6*|ltl|WpAmcb_oSquNry-0-EF^EO-8I^<m#QeW>jJRp
zF_~FYgJWD;J%^CPBI7inf8%cgMk8RH`E>Dgj=k>HzX^MDT+V)O=;kBlC{h9hKMO9T
ziLM~S`UY^oGOpD`0~0Z(lTs8TcIzl%61OhQHTq|Zc20OzAB-m;N6=h0Y-)$Hkf*4~
z`h4BZZJ`zOiCcQf=dNfGpZqW>0KYn}-9uFAEfWIS<o%OR!P08nWz_#FKW(pUdtPe&
z?jNUPGY_4;?BfyNNlZGbYMbvz#XifoA_H;gEr^Titzl9M1M8Y)E~4=SbD9<4?NVfF
zx==l3AmJ=TQ}azwx2<mqy7g9}9eP%fGlypi`anrG7|pBRxprxAN!Etg;$3wYWF)wC
z*pBF^zqRsOlnS6y0a&L(Zl8dL+vt1gcwT{4VXp8Xev{WgIJX}9znE~omHDC0lkZV_
zGeo9i79r1m80e<LVqd$?w2nC?G@QO1q~qKuZkN1=O%M93=5YY|g=c&Aq5H$&Fb<<B
z^<Z}e<iRdFU|#k~$pM?f!@9U*c!_DZUnSg-J}2W<xQo(sFk4qup(B(}SbGSdfz!N@
z92GZ_dA-iZ&+OHpYg6g^*uY&QX?tJeJ+)p%c3nW}xlGtX+r(7`LOT@VE(6lHRZ&v*
z+^awG!b>t6^%ik;r~dTPcRPb|HFIl+NH)?DJ4W8976Jdn*cAn{b`{fOgM}Z2o>m)<
zd0PGFLcNPkd*83`@&SScBoA3g_T{+>7-e}#7{oFOTSd>ciFA9_s_8R>YaJ4ddqTPz
z+_ZAsr>7w$e27D@fc-Hp7&X+o+J_IT9M>fqR)7x4sYSBKjEYUu)^rbB?)|p&tA#-?
zOs{~j9M$&C97H~wWs~KgX~iu&3*%T98h2noR7X)~F~;ewRrteKNO4ntqU|W6uMI0}
n)(`uRuGyv)oK~fRH?uXS*5`;~{_k+iM?BQmFRfzau$cb>Bk&XW

literal 0
HcmV?d00001

diff --git a/pmd-web/src/webpmd.pl b/pmd-web/src/webpmd.pl
index 7bff9acc2d..a9879cc202 100644
--- a/pmd-web/src/webpmd.pl
+++ b/pmd-web/src/webpmd.pl
@@ -19,6 +19,8 @@ sub default() {
  print "<center><a href=\"http://pmd.sourceforge.net/\"><img src=\"http://sourceforge.net/sflogo.php?group_id=56262&type=5\" alt=\"Project Ultra*Log @ DARPA\" border=\"0\" /></a></center>";
 
  print h3("<center>PMD-WEB</center>");
+ print "PMD is a Java source code analysis tool - it checks your code for unused fields, empty try/catch/finally/if/while blocks, unused method parameters, and stuff like that.  There's much more info <a href=\"http://pmd.sf.net/\">here</a>.<p>This table contains the results of running PMD's <a href=\"http://pmd.sourceforge.net/rules/unusedcode.html\">unused code ruleset</a> against a bunch of Sourceforge and Jakarta projects."; 
+ print hr();
 
  if (param("location")) {
   my $project = PMD::Project->new(param("location"),param("title"),param("unixname"), param("moduledirectory"), param("srcdir"));
@@ -26,7 +28,6 @@ sub default() {
   print p(), b("Added "), b($project->getTitle()), b(" to the schedule"), p();
  } 
 
- print "PMD is run every two hours (at 10 minutes past the hour) on these projects:";
  print loadProjectList();
 
  printStats();
@@ -64,6 +65,8 @@ sub printStats() {
  print br();
  print "The last run took ", sprintf("%.0f", $lastruntime/60), " minutes";
  print br();
+ print "This report is regenerated every two hours at 10 minutes past the hour";
+ print br();
 }
 
 sub getTimeUntil() {
@@ -90,15 +93,22 @@ sub loadProjectList() {
   }
  }
 
- @newprojects = sort { $a->getLocation() cmp $b->getLocation() || $a->getTitle() cmp $b->getTitle() } @projects;
+ @newprojects = sort { $b->getLocation() cmp $a->getLocation() || $a->getTitle() cmp $b->getTitle() } @projects;
 
- my $result="<table><tr><th>Project</th><th></th><th>Home page</th><th>Problems found</th></tr>";
+ my $result="<table align=center><tr><th>Project</th><th></th><th>Home page</th><th>Problems found</th></tr>";
  foreach $project (@newprojects) {
-  my $jobtext=$project->getTitle();
+  my $jobLink=$project->getTitle();
   if (-e $project->getRptFile()) {
-   $jobtext="<a href=\"@{[$project->getRptURL]}\">@{[$project->getTitle()]}</a>";
+   $jobLink="<a href=\"@{[$project->getRptURL]}\">@{[$project->getTitle()]}</a>";
   }
-  $result="${result}<tr><td>${jobtext}</td><td></td><td>@{[$project->getHomePage()]}</td><td>@{[$project->getLines()]}</td>";
+  $result="${result}<tr><td>${jobLink}</td><td></td><td>@{[$project->getHomePage()]}</td>";
+  my $color="red";
+  if ($project->getLines < 11) {
+   $color="ltgreen";
+  } elsif ($project->getLines < 31) {
+   $color="yellow";
+  }
+  $result="${result}<td bgcolor=$color>@{[$project->getLines()]}</td>";
  }
  $result = "${result}</table>";
  return $result;