File: tokenizer.php

package info (click to toggle)
php5 5.6.33%2Bdfsg-0%2Bdeb8u1
  • links: PTS, VCS
  • area: main
  • in suites: jessie
  • size: 157,872 kB
  • sloc: ansic: 756,065; php: 22,030; sh: 12,311; cpp: 8,771; xml: 6,179; yacc: 1,564; exp: 1,514; makefile: 1,467; pascal: 1,147; awk: 538; perl: 315; sql: 22
file content (35 lines) | stat: -rw-r--r-- 631 bytes parent folder | download | duplicates (13)
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
<?php

if(!extension_loaded('tokenizer')) {
	    dl('tokenizer.so');
}

$fp = fopen('php://stdin', 'r');
while (!feof($fp)) {
	$content .= fread($fp, 4096);
}
fclose($fp);

$tokens = token_get_all($content);

$count = count($tokens);
$state = 0;
for ($i = 0; $i < $count; $i++) {
	$token = $tokens[$i];
	if (is_array($token)) {
		if ($state == 1 && $token[0] == T_STRING) {
			$token[1] = preg_replace('!([a-z])([A-Z])!e', '"$1_".strtolower("$2")', $token[1]);
			$state = 0;
		} else if ($token[0] == T_FUNCTION) {
			$state = 1;
		}
		$chunk = $token[1];
	} else {
		$chunk = $token;
	}
	$output .= $chunk;
}

print $output;

?>