1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
|
<?php
//
// SourceForge: Breaking Down the Barriers to Open Source Development
// Copyright 1999, 2000, 2001 (c) VA Linux Systems, Inc.
// http://sourceforge.net
//
// $Id: doc_utils.php 2683 2004-02-18 09:18:27Z gsmet $
//
// colorized link to a file with CVS history
// @param threshold age when quicklink is no longer highlighted (default is one week)
// @param path path to file within CVS module
//
//
//
//
//
function util_cvs_query($path, $threshold = 604800, $module = "alexandria", $cvsroot = "/home/cvsroot", $viewcvs = "http://webdev.sourceforge.net/cgi-bin/viewcvs.cgi/") {
// cvs, the client, is too restrictive to use via PHP
// instead, read and munge the RCS files directly
//
// clean up slashes on inputs: path and cvsroot should only have
// leading slashes, module should have none
//
// TODO
// fail if path is unset or a directory
//
if (($path == '') || (substr($path, -1) == '/')) {
return 0;
} // if
// extract head line and first date line
//
$cvspath = escapeshellcmd($cvsroot . "/" . $module . "/" . $path . ",v");
$cvstemp = explode("/", $cvspath);
$cvsfile = $cvstemp[sizeof($cvstemp) - 1];
$datecmd = "grep -a ^date $cvspath | head -n1";
$datestring = exec($datecmd);
$versioncmd = "grep -a ^head $cvspath | head -n1";
$versionstring = exec($versioncmd);
// test for error
//
if (substr($datestring, 0, 4) != "date") {
return 0;
} else {
// pull out date and format
//
$result["date_full"] = substr($datestring, 5, 19);
$result["date_YYYY"] = substr($datestring, 5, 4);
$result["date_MM"] = substr($datestring, 10, 2);
$result["date_DD"] = substr($datestring, 13, 2);
$result["date_HH"] = substr($datestring, 16, 2);
$result["date_II"] = substr($datestring, 19, 2);
$result["date_SS"] = substr($datestring, 22, 2);
$result["date_UNIX"] = mktime($result["date_HH"],
$result["date_II"],
$result["date_SS"],
$result["date_MM"],
$result["date_DD"],
$result["date_YYYY"]);
$result["date_RFC"] = date("Y/m/d H:i:s", $result["date_UNIX"]) . " GMT";
// pull author name
//
eregi(".*author.(.*);.state.*", $datestring, $eregi_result);
$result["author"] = $eregi_result[1];
// pull head version number
//
eregi("head.(.*);", $versionstring, $eregi_result);
$result["version"] = $eregi_result[1];
// generate ViewCVS string
//
$result["viewcvs"] = $viewcvs . $module . "/" . $path;
// build quick-status HTML string
//
$result["status"] = "<font size=\"-2\"><a href=\"" . $result["viewcvs"] . "\">" . $cvsfile . "</a> " . $result["version"] . " " . $result["date_RFC"] . " " . $result["author"] . "</font>";
if (time() < ($result["date_UNIX"] + $threshold)) {
$result["status"] = "<strong><font color=\"#000000\">" . $result["status"] . "</strong></font>";
} // if
} // if ... else
return $result;
} // util_cvs_query
// utility function to call util_cvs_query
//
function util_cvs_status($path) {
$result = util_cvs_query($path);
if (is_array($result)) {
return $result["status"] . " ";
}
else {
return "<font size=\"-2\">revision history n/a</font> ";
} // if
} // function util_cvs_status
?>
|
