add some functions to pull git infomation from a repo
[gwvp-mini.git] / gwvpmini / gwvpmini_gitrepo.php
1 <?php
2 global $HOME_PAGE_PROVIDERS;\r
3
4
5 $CALL_ME_FUNCTIONS["repoadmin"] = "gwvpmini_RepoCallMe";
6 $HOME_PAGE_PROVIDERS["00gitlog"] = "gwvpmini_GitLogProvider";\r
7 \r
8 \r
9 // the home_page_provders bit is an array\r
10 \r
11 $MENU_ITEMS["10repos"]["text"] = "Repos";\r
12 $MENU_ITEMS["10repos"]["link"] = "$BASE_URL/repos";
13
14
15 function gwvpmini_RepoCallMe()\r
16 {\r
17 \r
18         // error_log("in repoadmin callme - err?");
19         // error_log(print_r($_REQUEST, true));\r
20         if(isset($_REQUEST["q"])) {
21                 // error_log("in repoadmin callme, for Q");\r
22                 $query = $_REQUEST["q"];\r
23                 $qspl = explode("/", $query);\r
24                 if(isset($qspl[0])) {\r
25                         if($qspl[0] == "repos") {
26                                 // error_log("in repos call");
27                                 if(isset($qspl[1])) {
28                                         if($qspl[1] == "create") {
29                                                 return "gwvpmini_RepoCreate";
30                                         } else {
31                                                 return "gwvpmini_RepoMainPage";
32                                         }
33                                 } else {\r
34                                         // error_log("i got here, where next?");\r
35                                         return "gwvpmini_RepoMainPage";
36                                 }\r
37                         } else return false;\r
38                 }\r
39                 else return false;\r
40         }\r
41 \r
42         return false;\r
43 }\r
44
45
46 function gwvpmini_RepoMainPage()\r
47 {\r
48         gwvpmini_goMainPage("gwvpmini_RepoMainPageBody");\r
49 }\r
50 \r
51
52 function gwvpmini_RepoMainPageBody()
53 {
54         global $BASE_URL;
55         
56         if(gwvpmini_isLoggedIn()) {
57                 $repos = gwvpmini_GetOwnedRepos($_SESSION["username"]);
58                 error_log("repos, ".print_r($repos, true));
59                 if(!$repos) {
60                         echo "You currently own no repos<br>";  
61                 } else {
62                         echo "<h2>Your Repos</h2>";
63                         echo "<table border=\"1\"><tr><th>Repo Name</th><th>Repo Description</th><th>Last Log</th></tr>";
64                         foreach($repos as $repo) {
65                                 $name = $repo["name"];
66                                 $desc = $repo["desc"];
67                                 $stat = $repo["status"];
68                                 $llog = "";\r
69                                 if($stat != 0) {\r
70                                         switch($stat) {\r
71                                                 case 1:\r
72                                                         $llog = "Repo Administratively Disabled";\r
73                                                         break;\r
74                                                 case 2:\r
75                                                         $llog = "Repo Cloning from remote";\r
76                                                         break;\r
77                                         }\r
78                                 } else {
79                                 
80                                         if($desc == "") $desc = "none";
81                                         
82                                         $repo_base = gwvpmini_getConfigVal("repodir");
83                                         $cmd = "git --git-dir=\"$repo_base/$name.git\" log --all -1 2> /dev/null";
84                                         // error_log("CMD: $cmd");
85                                         //system("$cmd");
86                                         $fls = popen($cmd, "r");
87                                         $tks = "";
88                                         if($fls !== false) while(!feof($fls)) {
89                                                 $tks .= fread($fls,1024);
90                                         }
91                                         
92                                         if($tks == "") {
93                                                 $llog =  "No Log Info Yet";
94                                         } else $llog = $tks;
95                                         
96                                 }
97                                 echo "<tr><td><a href=\"$BASE_URL/view/$name\">$name</a></td><td>$desc</td><td>$llog</td></tr>";
98                         }
99                         echo "</table>";
100                 }
101                 gwvpmini_GitCreateRepoForm();\r
102                 
103                 
104                 $contreps = gwvpmini_GetContributedRepos($_SESSION["username"]);
105                 
106                 if($contreps !== false) {
107                         echo "<h2>Repos you contribute to</h2>";
108                         echo "<table border=\"1\"><tr><th>Repo Name</th><th>Owner</th><th>Repo Description</th><th>Last Log</th></tr>";
109                         foreach($contreps as $repo) {
110                                 $name = $repo["name"];\r
111                                 $desc = $repo["desc"];
112                                 $stat = $repo["status"];
113                                 if($stat != 0) {
114                                         switch($stat) {
115                                                 case 1:
116                                                         $lastlog = "Repo Administratively Disabled";
117                                                         break;
118                                                 case 2:
119                                                         $lastlog = "Repo Cloning from remote";
120                                                         break;
121                                         }
122                                 } else {
123                                         $repo_base = gwvpmini_getConfigVal("repodir");\r
124                                         $cmd = "git --git-dir=\"$repo_base/$name.git\" log --all -1 2> /dev/null";
125                                         // error_log("CMD: $cmd");
126                                         //system("$cmd");
127                                         $fls = popen($cmd, "r");
128                                         $tks = "";
129                                         if($fls !== false) while(!feof($fls)) {
130                                                 $tks .= fread($fls,1024);
131                                         }
132                                         
133                                         if($tks == "") {
134                                                 $lastlog = "No Log Info Yet";
135                                         } else $lastlog = $tks;
136                                 }
137                                 
138                                 $owner = gwvpmini_getUser(null, null, $repo["owner"]);
139                                 $repname = "<a href=\"$BASE_URL/view/$name\">$name</a>";
140                                 $repown = gwvpmini_HtmlGravatar($owner["email"], 30, "<br>")."<a href=\"$BASE_URL/user/".$owner["username"]."\">".$owner["username"]."</a>";
141                                 
142                                 
143                                 echo "<tr><td>$repname</td><td>$repown</td><td>$desc</td><td>$lastlog</td></tr>";
144                         }
145                         echo "</table>";
146                 }
147         }
148         return true;
149 }
150
151
152 function gwvpmini_GitLogProvider()\r
153 {\r
154         /*\r
155          * The home page provider will:\r
156         * 1) show the last 10 commits for every repository - though, excluding private repos\r
157         * 2) if loged in, show the last commit on any repo's the user owns\r
158         *\r
159         * So i need a table thats going to list "writes" by user - as in POST writes but only\r
160         * put that info into the stats (doesnt exist) db if the repo is publically readable\r
161         *\r
162         * Or... should we instead just list every repo?\r
163         */
164         
165         global $BASE_URL;
166         
167         echo "<h2>Repo Activity</h2>";
168         if(gwvpmini_isLoggedIn()) {\r
169                 $repos = gwvpmini_GetOwnedRepos($_SESSION["username"]);
170                 if(!$repos) {
171                         echo "You currently own no repos<br>";  
172                 } else {
173                         echo "<h2>Your Repos</h2>";
174                         echo "<table border=\"1\"><tr><th>Repo Name</th><th>Repo Description</th><th>Repo Log</th></tr>";
175                         foreach($repos as $repo) {
176                                 $name = $repo["name"];
177                                 $desc = $repo["desc"];
178                                 
179                                 if($desc == "") $desc = "-";
180                                 echo "<tr><td><a href=\"$BASE_URL/view/$name\">$name</a></td><td>$desc</td>";
181                                 echo "<td>";
182                                 $repo_base = gwvpmini_getConfigVal("repodir");
183                                 $cmd = "git --git-dir=\"$repo_base/$name.git\" log --all -1 2> /dev/null";
184                                 // error_log("CMD: $cmd");
185                                 //system("$cmd");
186                                 $fls = popen($cmd, "r");
187                                 $tks = "";
188                                 if($fls !== false) while(!feof($fls)) {
189                                         $tks .= fread($fls,1024);
190                                 }
191                                 
192                                 if($tks == "") {
193                                         echo "No Log Info Yet";
194                                 } else echo $tks;
195                                 echo "</td>";
196                                 echo "</tr>";
197                         }
198                         echo "</table>";
199                 }\r
200         }
201 }
202
203 function gwvpmini_GitCreateRepoForm()
204 {
205         global $BASE_URL;
206         
207         echo "<form method=\"post\" action=\"$BASE_URL/repos/create\">";
208         echo "<table border=\"1\">";
209         echo "<tr><th colspan=\"2\">Create Repo</th></tr>";
210         echo "<tr><th>Repo Name</th><td><input type=\"text\" name=\"reponame\"></td><td>Name of your repo - letters, numbers _ and - only</td></tr>";
211         echo "<tr><th>Repo Description</th><td><input type=\"text\" name=\"repodesc\"></td><td>Description of your repo</td></tr>";
212         echo "<tr><th>Read Permissions</th><td>";
213         echo "<select name=\"perms\">";
214         echo "<option value=\"perms-public\">Anyone Can Read</option>";
215         echo "<option value=\"perms-registered\">Must be Registered To Read</option>";
216         echo "<option value=\"perms-onlywrite\">Only Writers can Read</option>";
217         echo "</select></td><td>The basic permissions for the initial repo creation</td></tr>";
218         echo "<tr><th>Clone From</th><td><input type=\"text\" name=\"clonefrom\"></td><td>Either a repo name (existing on this site) or a git url to clone from (blank for none)</td></tr>";
219         echo "<tr><td colspan=\"2\"><input type=\"submit\" name=\"Create\" value=\"Create\"></td></tr>";
220         echo "</table>";
221         echo "</form>";
222 }
223
224 function gwvpmini_RepoCreate()
225 {
226         
227         global $BASE_URL;
228         
229         // TODO: check the stuff out
230         // first reponame
231         $inputcheck = true;
232         
233
234         // remove a .git at the end if it was input
235         $_REQUEST["reponame"] = preg_replace("/\.git$/", "", $_REQUEST["reponame"]);
236         
237         // check for valid chars
238         $replcheck = preg_replace("/[a-zA-Z0-9_\-\.]/", "", $_REQUEST["reponame"]);
239         if(strlen($replcheck)>0) {
240                 $inputcheck = false;
241                 $inputcheckerror = "Repo name contains invalid characters, repos can only contain a-z, A-Z, 0-9, _, - and .";
242         }
243         
244         $clonefrom = false;
245         $fromremote = false;
246         if(isset($_REQUEST["clonefrom"])) {
247                 if($_REQUEST["clonefrom"] != "") {
248                         $clonefrom = $_REQUEST["clonefrom"];
249                         if(preg_match("/git.*:\/\/.*/", $clonefrom)>0) {
250                                 $fromremote = true;
251                         }
252                         if(preg_match("/http.*\:\/\//", $clonefrom)>0) $fromremote = true;
253                 }
254         }
255         
256         if($clonefrom !== false && $fromremote == false) {
257                 // check the local repo exists
258                 $rn = gwvpmini_getRepo(null, $clonefrom, null);
259                 $uid = $_SESSION["id"];
260                 
261                 if($rn == false) {
262                         gwvpmini_SendMessage("error", "local repo $clonefrom given as upstream clone, however $clonefrom doesnt exist on this site (or you cant read it unbake)");
263                         header("Location: $BASE_URL/repos");
264                         return;
265                 }
266                 
267                 // resolve repo permissions on the read/clone
268                 if(gwvpmini_GetRepoPerm($rn["id"], $uid) < 1) {
269                         gwvpmini_SendMessage("error", "local repo $clonefrom given as upstream clone, however $clonefrom doesnt exist on this site (or you cant read it bake)");
270                         header("Location: $BASE_URL/repos");
271                         return;
272                 }
273         }
274         
275         $defperms = "a";
276         switch($_REQUEST["perms"]) {
277                 case "perms-registered":
278                         $defperms = "r";
279                         break;
280                 case "perms-onlywrite":
281                         $defperms = "x";
282                         break;
283         }
284         
285         if(!$inputcheck) {
286                 gwvpmini_SendMessage("error", "$inputcheckerror");\r
287                 header("Location: $BASE_URL/repos");
288         } else  if(gwvpmini_isLoggedIn()) {
289                 //gwvpmini_createGitRepo($name, $ownerid, $desc, $bundle=null, $defaultperms=0)
290                 if(gwvpmini_HaveRepo($_REQUEST["reponame"])) {
291                         gwvpmini_SendMessage("error", "Repo ".$_REQUEST["reponame"]." already exists");\r
292                         header("Location: $BASE_URL/repos");
293                 } else {
294                         if(gwvpmini_createGitRepo($_REQUEST["reponame"], $_SESSION["id"], $_REQUEST["repodesc"], $defperms, $clonefrom, $fromremote)) {
295                                 gwvpmini_SendMessage("info", "Repo ".$_REQUEST["reponame"]." has been created");
296                         }
297                         header("Location: $BASE_URL/repos");
298                 }
299         } else {
300                 gwvpmini_SendMessage("info", "Must be logged in to create repo");
301                 header("Location: $BASE_URL/repos");
302         }
303 }
304
305 function gwvpmini_HaveRepo($reponame)
306 {
307         $repo_base = gwvpmini_getConfigVal("repodir");
308         
309         if(file_exists("$repo_base/$reponame.git")) return true;
310 }
311
312
313 function gwvpmini_RemoveRepo($rid)
314 {
315         $repo_base = gwvpmini_getConfigVal("repodir");
316         
317         $repdet = gwvpmini_getRepo(null, null, $rid);
318         
319         $rname = $repdet["name"];
320         
321         // error_log("FROM PANTS:".print_r($repdet,true)." ----------- ".print_r($rname, true));
322         
323         if($repdet != false && $rname != "") {
324                 if(file_exists("$repo_base/$rname.git")) {
325                         // recursive remove - frightening
326                         if(gwvpmini_RecursiveDelete("$repo_base/$rname.git")) {
327                                 gwvpmini_RemoveRepoDB($rid);
328                         }
329                 }
330         } return false;
331 }
332
333 function gwvpmini_RecursiveDelete($fpath)
334 {
335         // error_log("RECURSEDETELE: ".$fpath);
336         if(is_file($fpath)){\r
337                 return @unlink($fpath);\r
338         }\r
339         elseif(is_dir($fpath)){\r
340                 $scan = glob(rtrim($fpath,'/').'/*');\r
341                 foreach($scan as $index=>$path){\r
342                         gwvpmini_RecursiveDelete($path);\r
343                 }\r
344                 return @rmdir($fpath);\r
345         }
346 }
347
348 function gwvpmini_CompressCommitId($cid)
349 {
350         $compressedcid = substr($cid, 0, 5)."...".substr($cid, strlen($cid)-5, strlen($cid));
351         
352         return $compressedcid;
353 }
354
355 function gwvpmini_GetCommitDetail($repo, $commitid)
356 {
357         global $cmd_line_tool,$git_cli_cmd,$php_cli_cmd;
358         
359         $repo_base = gwvpmini_getConfigVal("repodir");
360         
361         $cmd = "$cmd_line_tool --git-dir=$repo_base/$repo.git log $commitid -1 --format='%an'"; 
362         exec($cmd, $commitername, $returnvar);
363
364         $cmd = "$cmd_line_tool --git-dir=$repo_base/$repo.git log $commitid -1 --format='%ae'"; 
365         exec($cmd, $commiteremail, $returnvar);
366
367         $cmd = "$cmd_line_tool --git-dir=$repo_base/$repo.git log $commitid -1 --format='%ct'"; 
368         exec($cmd, $commitertime, $returnvar);
369
370         $cmd = "$cmd_line_tool --git-dir=$repo_base/$repo.git log $commitid -1 --format='%s'";  
371         exec($cmd, $commiterlog, $returnvar);
372
373         $cmd = "$cmd_line_tool --git-dir=$repo_base/$repo.git log $commitid -1 --format='%b'";  
374         exec($cmd, $commiterbody, $returnvar);
375 }
376
377 function gwvpmini_GetCommitList($repo, $branch, $num=20)
378 {
379         global $cmd_line_tool,$git_cli_cmd,$php_cli_cmd;
380         
381         $repo_base = gwvpmini_getConfigVal("repodir");
382         
383         $cmd = "$cmd_line_tool --git-dir=$repo_base/$repo.git log $commitid -1 --format='%an'";\r
384         exec($cmd, $commitername, $returnvar);\r
385         
386 }
387
388 function gwvpmini_GetRefList($repo)
389 {
390         global $cmd_line_tool,$git_cli_cmd,$php_cli_cmd;
391         
392         $repo_base = gwvpmini_getConfigVal("repodir");
393
394         $cmd = "$cmd_line_tool --git-dir=$repo_base/$repo.git for-each-ref $commitid --format='%(objecttype):%(objectname):%(refname)'";
395         exec($cmd, $reflist, $returnvar);
396 }
397         
398 ?>