summaryrefslogtreecommitdiffstats
path: root/php-pear/strip.php
blob: 5c5216b0fca5b1c53fcc0b0c54f86a24da7e7e62 (plain)
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 

#
# strip.php /path/to/file key_name
# 
# Takes a file as input and a string prefix; reads
# the file as a serialized data blob and removes a
# key with name key_name from the hash.
# Serializes again and writes output to stdout.
# 

$file = $_SERVER['argv'][1];
$key = $_SERVER['argv'][2];

function remove_key($array, $name) {
    if (array_key_exists($name, $array)) {
        unset($array[$name]);
    }

    return $array;
}

$input = file_get_contents($file);

# Special case for /etc/pear.conf.
if (strncmp($input, "#PEAR_Config 0.9\n", 17) == 0) {
    echo substr($input, 0, 17);
    $s = substr($input, 17);
} else {
    $s = $input;
}

echo serialize(remove_key(unserialize($s), $key));

?>