/[ascend]/trunk/tools/mediawiki/ashighlight.class.php
ViewVC logotype

Annotation of /trunk/tools/mediawiki/ashighlight.class.php

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1767 - (hide annotations) (download)
Tue Apr 22 13:12:03 2008 UTC (16 years, 4 months ago) by jpye
File size: 3033 byte(s)
Fixes bug with PHP 5.2 as reported by Madison Kelly 21 Apr 08.
1 jpye 1390 <?php
2    
3 jpye 1767 define('ASHIGHLIGHT_LANG_ROOT',"/usr/share/highlight/langDefs");
4 jpye 1390
5     class ASHighlight{
6    
7     function __construct($dir="/tmp",$default_lang="py"){
8     $this->env=array();
9     $this->dir=$dir;
10     $this->encoding="ascii";
11     $this->line_numbers=false;
12 jpye 1424 $this->tabwidth=0;//zero means that we haven't specified it
13 jpye 1390 $this->default_lang=$default_lang;
14     }
15    
16     function set_encoding($encoding="UTF-8"){
17     $this->encoding=$encoding;
18     }
19    
20     function enable_line_numbers(){
21     $this->line_numbers = true;
22     }
23     function disable_line_numbers(){
24     $this->line_numbers = false;
25     }
26    
27     function start_line_numbers_at($start_line){
28 jpye 1393 $this->start_line = floor($start_line);
29 jpye 1390 }
30    
31     function set_tab_width($tabwidth){
32 jpye 1393 $this->tabwidth=floor($tabwidth);
33 jpye 1390 }
34    
35     function parse_code($text,$lang=""){
36     $descriptorspec = array(
37     0 => array("pipe", "r"), // stdin is a pipe that the child will read from
38     1 => array("pipe", "w"), // stdout is a pipe that the child will write to
39     2 => array("pipe", "w") // stderr is another pipe that the child (might) write to
40     );
41    
42     if(!$lang)$lang=$this->default_lang;
43    
44     $cmd = "highlight --fragment"
45     ." --syntax=".escapeshellarg($lang);
46    
47     if($this->line_numbers){
48     $cmd.=" --linenumbers";
49     if(isset($this->start_line)){
50     $cmd.=" --line-number-start=".$this->start_line;
51     }
52     }
53    
54 jpye 1424 // only if the tabwidth value is non-zero will this
55     // flag be shown
56 jpye 1390 if($this->tabwidth)$cmd.=" --replace-tabs=".$this->tabwidth;
57    
58     $css = $this->dir . "/" . "highlight.css";
59     $cmd.=" --style-outfile=".escapeshellarg($css);
60     if(file_exists($css)){
61     $this->error=-888;
62     $this->errmsg="'highlight.css' file already exists in ".$this->dir;
63     }
64    
65     if(!$this->env)$this->env=array();
66    
67     $process = proc_open($cmd, $descriptorspec, $pipes, $this->dir, $this->env);
68    
69     if(is_resource($process)) {
70     // $pipes now looks like this:
71     // 0 => writeable handle connected to child stdin
72     // 1 => readable handle connected to child stdout
73     // Any error output will be appended to /tmp/error-output.txt
74    
75     fwrite($pipes[0], $text);
76     fclose($pipes[0]);
77    
78     $out = stream_get_contents($pipes[1]);
79     fclose($pipes[1]);
80    
81     $err = stream_get_contents($pipes[2]);
82     fclose($pipes[2]);
83    
84     // It is important that you close any pipes before calling
85     // proc_close in order to avoid a deadlock
86     $this->error = proc_close($process);
87    
88 jpye 1623 // Workaround for bug in proc_close. Thanks to Sebastian Krysmanski.
89     if ($this->error === -1 && !$err) {
90     $this->error = 0;
91     }
92    
93 jpye 1390 if(!$this->error){
94     if(file_exists($css)){
95     $this->stylesheet = file_get_contents($css);
96     unlink($css);
97     return $out;
98     }else{
99     $this->error=-777;
100     $this->stylesheet="kwa{font:bold}";
101     $this->errmsg="'$css' was not created by $cmd (dir=$this->dir)";
102     return $out;
103     }
104     }else{
105     $this->errmsg = $err;
106     }
107     }else{
108     $this->error = -999;
109     $this->errmsg="Process '$cmd' failed to start?";
110     }
111     }
112    
113     function get_stylesheet(){
114     return $this->stylesheet;
115     }
116     }
117    
118     ?>

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22