File: cvsgraph.php

package info (click to toggle)
chora2 2.0.1-2
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 2,208 kB
  • ctags: 302
  • sloc: php: 1,298; xml: 406; makefile: 66
file content (87 lines) | stat: -rw-r--r-- 3,036 bytes parent folder | download
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
<?php
/**
 * $Horde: chora/cvsgraph.php,v 1.15.8.1 2005/01/03 12:25:30 jan Exp $
 *
 * Wrapper for CVSGraph.
 *
 * Copyright 1999-2005 Anil Madhavapeddy <anil@recoil.org>
 * Copyright 1999-2005 Charles Hagenbuch <chuck@horde.org>
 *
 * See the enclosed file COPYING for license information (GPL).  If you
 * did not receive this file, see http://www.fsf.org/copyleft/gpl.html.
 */

@define('CHORA_BASE', dirname(__FILE__));
require_once CHORA_BASE . '/lib/base.php';

// Exit if cvsgraph isn't active or it's not supported.
if (empty($conf['paths']['cvsgraph']) || is_a($VC, 'VC_svn')) {
    header('Location: ' . Chora::url('', $where));
    exit;
}

if (@is_file($fullname . ',v')) {
    $root = escapeShellCmd($VC->sourceroot());
    $file = escapeShellCmd($where . ',v');

    if (Util::getFormData('show_image')) {
        // Pipe out the actual image.
        $args = array('c' => $conf['paths']['cvsgraph_conf'],
                      'r' => $root);

        // Build up the argument string.
        $argstr = '';
        if (substr(PHP_OS, 0, 3) == 'WIN') {
            foreach ($args as $key => $val) {
                $argstr .= "-$key \"$val\" ";
            }
        } else {
            foreach ($args as $key => $val) {
                $argstr .= "-$key '$val' ";
            }
        }

        header('Content-Type: image/png');
        passthru($conf['paths']['cvsgraph'] . ' ' . $argstr . ' ' . $file);
    } else {
        // Display the wrapper page for the image.
        $title = sprintf(_("Graph for %s"), Text::htmlAllSpaces($where));
        $upwhere = preg_replace('|[^/]+$|', '', $where);
        $extraLink = Chora::getFileViews();

        require CHORA_TEMPLATES . '/common-header.inc';
        require CHORA_TEMPLATES . '/menu.inc';
        require CHORA_TEMPLATES . '/headerbar.inc';

        $imgUrl = Chora::url('cvsgraph', $where, array('show_image' => 1));

        $args = array('c' => $conf['paths']['cvsgraph_conf'],
                      'M' => 'graphMap',
                      'r' => $root,
                      '0' => '&amp;',
                      '1' => Chora::url('', $where, array('dummy' => 'true')),
                      '2' => Chora::url('diff', $where, array('dummy' =>'true')),
                      '3' => Chora::url('co', $where, array('dummy' => 'true')),
                      );

        // Build up the argument string.
        $argstr = '';
        if (substr(PHP_OS, 0, 3) == 'WIN') {
            foreach ($args as $key => $val) {
                $argstr .= "-$key \"$val\" ";
            }
        } else {
            foreach ($args as $key => $val) {
                $argstr .= "-$key '$val' ";
            }
        }

        // Generate the imagemap.
        $map = shell_exec($conf['paths']['cvsgraph'] . ' ' . $argstr . ' -i ' . $file);

        require CHORA_TEMPLATES . '/cvsgraph/cvsgraph.inc';
        require $registry->get('templates', 'horde') . '/common-footer.inc';
    }
} else {
    Chora::fatal('404 Not Found', "$where: no such file or directory");
}