Annotation of cdn/www/sources.html, revision 1.81

1.9       cdn         1: <!-- MAIN CONTENT -->
                      2: <h5 class="page-header">Source Code</h5>
                      3: 
                      4: <p>
                      5:   The cdn source code can be accessed in either of the following ways:
                      6: </p>
                      7: 
                      8: <ul>
                      9: <li>View the source using the CVS <a href="http://www.mozdev.org/source/browse/cdn/">web interface</a></li>
                     10: <li>Check out the source using anonymous CVS with the following commands (password is guest):
                     11: 
                     12: <pre>
                     13: cvs -d :pserver:guest@mozdev.org:/cvs login
                     14: cvs -d :pserver:guest@mozdev.org:/cvs co cdn
                     15: </pre>
                     16: 
                     17: </li>
1.69      cdn        18: </ul><?php $doNotCapitalise = 1; // $project='orbits'; // testing ?>
1.9       cdn        19: 
1.2       cdn        20: <?php 
1.1       cdn        21: 
1.79      cdn        22: // $Id: sources.html,v 1.78 2003/02/21 20:33:05 cdn Exp $
1.42      cdn        23: // $cvsId: sources.html,v 1.37 2003/02/21 00:43:24 cdn Exp svc$
                     24:   
1.2       cdn        25:   require("include/CVS_PATHS");
1.1       cdn        26: 
1.2       cdn        27:   define(MAX_READ_SIZE, 500000);
                     28:   define(MAX_READ, 100000);
                     29: 
1.42      cdn        30:   $today              = date("y/m/d");
1.40      cdn        31:   $day = (int)date('d');
                     32:   --$day;
1.42      cdn        33:   $yesterday          = date("y/m/" . sprintf('%2u', $day));
1.2       cdn        34:   $commit_log         = "cvs@$project.mozdev.org";
                     35: 
1.78      cdn        36:  //  $today = '03/02/14';
1.47      cdn        37: 
1.2       cdn        38:   if(!$local_conf_commits) 
                     39:     print '<span id="CVS-local-conf-commits">' . $local_conf_commits_msg . "</span>\n";
                     40: 
                     41:   //BEGIN BLOCK
1.77      cdn        42:  //
1.78      cdn        43:    if(file_exists(COMMIT_PATH.$commit_log) && $local_conf_commits) { 
                     44:  //  if(file_exists('/tmp/commit_test') && $local_conf_commits) { 
1.2       cdn        45: 
1.78      cdn        46:     $size = filesize(COMMIT_PATH.$commit_log);
                     47:    // $size = filesize('/tmp/commit_test');
1.2       cdn        48:     $contents = array();
                     49:     if ($size > MAX_READ_SIZE) {
                     50:       // print "<!-- Log File is greater than 500K -->\n";
                     51: 
                     52:       $fp = fopen (COMMIT_PATH.$commit_log, "r");
                     53:       fseek($fp, $size - MAX_READ);
                     54:       if ($contents) {
                     55:         print "$contents\n";
                     56:         exit;
                     57:       }
                     58:       $tok = strtok(fread($fp, MAX_READ),"\n");
                     59:       while ($tok) {
                     60:         array_push($contents, $tok);
                     61:         $tok = strtok("\n");
                     62:       }
                     63:       fclose($fp);
1.42      cdn        64:     }
1.41      cdn        65:     
1.2       cdn        66:     if (!$contents)
1.41      cdn        67:     {
1.77      cdn        68:      //
1.78      cdn        69:       $contents = file(COMMIT_PATH.$commit_log);
                     70:      //      $contents = file('/tmp/commit_test'); // echo 'boing '; echo $contents;
1.41      cdn        71:     }
1.50      cdn        72: 
1.69      cdn        73:     // preprocess Tag: stuff
                     74:     
1.76      cdn        75:     $stnetnoc = implode('', $contents);
1.69      cdn        76:     
1.76      cdn        77:     $contents = ereg_replace('Tag\:[[:space:]]{1,}', 'Tag: ', $stnetnoc);
1.70      cdn        78: 
1.76      cdn        79:     //
                     80:     // '_[_cdn_]_  Log:'
                     81:     // '_[_cdn_]_  Tag: ...'
                     82:     
1.81    ! cdn        83:    // $contents = ereg_replace('Log\:[[:space:]]{1,}Tag', "Log\:\n  Tg", $contents);
1.70      cdn        84: 
1.76      cdn        85:     //
                     86:     // '_[_cdn_]_  Log:'
                     87:     // '_[_cdn_]_  Tg: ...'
                     88:     
                     89:     $stnetnoc = eregi_replace("Tag\:\ [^[:space:]\.]{1,}\ ", "\\0                        ", $contents);
1.70      cdn        90:     // needs to not process 'Tag:' if in a commemt, i.e. it follows 'Log:'
1.69      cdn        91:     
1.81    ! cdn        92:    // $stetnoc = ereg_replace("Log\:[[:space:]]{1,}Tg", "Log\:\n  Tag", $stetnoc);
1.70      cdn        93: 
1.76      cdn        94:     $contents = explode("\n", $stnetnoc);
1.69      cdn        95:     
                     96:     // /preprocess Tag: stuff
                     97:     
1.2       cdn        98:     $len=count($contents);
                     99:     $r            = -1;
                    100:   
1.5       cdn       101:     
1.11      cdn       102:     $_project = $project;
                    103:     
                    104:     if ( !isset($doNotCapitalise) )
                    105:     {
                    106:       $_project = PROJECT;
                    107:     }
                    108:    
1.78      cdn       109:    // print '<h4 id="CVS-h4">' . "Today's CVS Commits for " . $_project . " Project</h4>\n";
                    110:     print '<h4 id="CVS-h4">' . "Yesterday's CVS Commits for " . $_project . " Project</h4>\n";
1.69      cdn       111:    // print '<h4 id="CVS-h4">' . "Some day's CVS Commits for " . $_project . " Project</h4>\n";
1.2       cdn       112:     print '<table border="0" cellpadding="0" cellspacing="2" id="CVS-table">' . "\n";
                    113: 
                    114:     if($len) {
                    115:       for($i=0;$i<$len;$i++) {
                    116:         if(ereg("Modified:    www", $contents[$l]) && !$local_conf_commits)
                    117:           break;
                    118: 
1.42      cdn       119:        // if(ereg("  Date: [0-9]{2}/[0-9]{2}/[0-9]{2}", $contents[$i])) {
1.47      cdn       120:        // if(ereg("  Date: $yesterday", $contents[$i])) {
                    121:         if(ereg("  Date: $today", $contents[$i])) {
1.2       cdn       122:           $r++;
1.58      cdn       123: 
                    124:           $_i = $i + 1;
                    125: 
1.54      cdn       126:           $yy = substr(YEAR, 0, 2);
1.53      cdn       127: 
                    128:           $_timestamp = str_replace('Date: ', '', ltrim($contents[$i]));
1.54      cdn       129:           $_timestamp = str_replace("\n", '', $_timestamp);
1.53      cdn       130: 
1.69      cdn       131:           $_ts_link = $yy . ereg_replace('[\ \/]', '_', $_timestamp);
1.53      cdn       132: 
1.54      cdn       133:           $_timestamp = '<a name="' . $_ts_link . '">'; 
                    134: 
1.55      cdn       135:           $result[$r] = 
                    136:           '<tr class="CVS-tr-header" valign="top"><td class="CVS-td-900">' . "\n" .
                    137:           "<strong>" . $_timestamp . htmlspecialchars($contents[$i-1]) . "</a></strong>\n" . // who
                    138:           "</td></tr>\n" .
                    139:           '<tr class="CVS-tr-date">' .
                    140:           '<td class="CVS-td-f90">' . "\n";
1.54      cdn       141: 
1.55      cdn       142:           $_time = htmlspecialchars($contents[$i]);
1.54      cdn       143: 
1.63      cdn       144:           $result[$r] .= '<a class="CVS-td-f90" href="' . '#' . $_ts_link . '">' . $_time . '</a>'; // when
1.53      cdn       145: 
                    146:           $result[$r] .= "\n</td></tr>\n" .
1.10      cdn       147:           '<tr class="CVS-tr-checkins"><td class="CVS-td-checkins">' . "\n";
1.2       cdn       148: 
1.42      cdn       149:             $webcvs = 'http://www.mozdev.org/source/browse/' . $project; // . '/';
                    150: 
1.2       cdn       151:           for($l=$i+1;$l<$len;$l++) {
                    152:             if(ereg("  Revision  Changes    Path", $contents[$l]))
                    153:               break;
                    154: 
                    155:             if(ereg("  User:", $contents[$l]))
                    156:               break;
                    157: 
1.12      cdn       158:             $checkins = eregi_replace("((https|http|mailto|ftp):\/\/[^[:space:]<>]{1,})", 
1.69      cdn       159:             "<a href=\"\\1\">\\1</a>", htmlspecialchars($contents[$l]));
1.14      cdn       160: 
                    161:             // '  Added:       www/img  background.png' 
                    162:             // '  Modified:    www      cdn.css' 
                    163:             // '  Removed:     www/protected sources.html'
1.18      cdn       164:             // '               www/compact index.html' ?
1.14      cdn       165: 
1.76      cdn       166:             if ( ereg("((Added|Modified|Removed):)", $checkins) || ereg("^[[:space:]]{9}", $checkins) )
1.42      cdn       167:             {
                    168: 
1.69      cdn       169:               $identifier = trim(substr($checkins, 0, 15)); // may change to &nbsp; group
1.42      cdn       170: 
1.69      cdn       171:               $checkins = substr($checkins, 15);
1.42      cdn       172: 
                    173:               // find first non-space character
                    174:               // if > 16, chances are the files are in the directory defined in the previous line ?
                    175: 
1.69      cdn       176:               $_16 = strpos($checkins, ' ');
1.14      cdn       177: 
1.69      cdn       178:               $_path = substr( $checkins, 0, $_16);
1.31      cdn       179: 
1.69      cdn       180:               $checkins = ereg_replace('[[:space:]]{1,}', ' ', trim( substr ( $checkins, $_16 ) ) );
1.23      cdn       181: 
1.15      cdn       182:               $checkinsA = explode(' ', $checkins);
1.14      cdn       183: 
1.15      cdn       184:               unset($checkins);
1.14      cdn       185: 
1.15      cdn       186:               for($z=0; $z < count($checkinsA); ++$z)
                    187:               {
                    188:                 $checkinsA[$z] = trim($checkinsA[$z]);
                    189:               }
1.12      cdn       190: 
1.42      cdn       191:               if ( !empty($identifier) )
                    192:                 $checkins = $identifier;
1.31      cdn       193: 
1.42      cdn       194:               if ( !empty($_path))
                    195:               {
1.46      cdn       196:                 $webcvs = 'http://www.mozdev.org/source/browse/' . $project; // reset important !
1.42      cdn       197:                 $webcvs .= '/' . $_path;
                    198:                 $_path_ = $_path;
                    199:                 $checkins .= ' <a href="' . $webcvs;
                    200:                 $checkins .= '">' . $_path . '</a>';
                    201:               }
1.25      cdn       202: 
1.34      cdn       203:               for($y=0; $y < count($checkinsA); ++$y)
1.15      cdn       204:               {
1.49      cdn       205: 
1.69      cdn       206:                 if (ereg('Tag:', $checkinsA[$y]) || ereg('Tag:', $checkinsA[$y-1]))
1.65      cdn       207:                 {
1.69      cdn       208:                   $TAG = true;
                    209:                 }
                    210:                 else
                    211:                 {
                    212:                   $TAG = false;
1.65      cdn       213:                 }
                    214: 
1.69      cdn       215:                 if(!$TAG)
1.49      cdn       216:                 {
1.69      cdn       217:                   $checkins .= ' <a href="' . $webcvs . '/';
                    218: 
                    219:                   if($identifier == 'Removed:'): $checkins .= 'Attic/'; endif;
                    220: 
                    221:                   $checkins .= $checkinsA[$y] . '">';
1.50      cdn       222:                 }
1.69      cdn       223:                 else
1.50      cdn       224:                 {
1.69      cdn       225:                   $checkins .= ' ';  ++$_tagtracker;
1.49      cdn       226:                 }
                    227: 
                    228:                 $checkins .= $checkinsA[$y];
                    229: 
1.69      cdn       230:                 if(!$TAG): $checkins .= '</a>'; endif;
1.66      cdn       231: 
1.15      cdn       232:               }
1.42      cdn       233: 
1.14      cdn       234:             }
1.12      cdn       235: 
                    236:             $result[$r] .= '<div class="CVS-div-checkins">' . $checkins .
1.53      cdn       237:             "</div>\n"; // what
1.2       cdn       238:           }
                    239: 
                    240:           $result[$r]     .= "</td></tr>\n";
                    241:         }
                    242:       }
                    243:     }
                    244: 
                    245:   if(!$result) {  
1.3       cdn       246:     print '<tr><td id="CVS-no-commits">There are no new commits today</td></tr>' . "\n";
1.2       cdn       247:   } else {
                    248:     $reversed=array_reverse($result);
                    249:     for($i=0;$i<count($result);$i++)
                    250:       PRINT $reversed[$i];
                    251:   }
                    252: 
                    253:     print "</table>\n\n";
                    254: 
                    255:   } //END BLOCK
1.1       cdn       256: ?>

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>