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

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

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