Logoj0ke.net Open Build Service > Projects > internetx:php7:EL7:7.0.9:extensions > php-pear > install-pear.php
Sign Up | Log In

File install-pear.php of Package php-pear

 
1
<?php
2
​
3
error_reporting(1803);
4
​
5
if (ini_get('date.timezone') === '') {
6
    date_default_timezone_set('UTC');
7
}
8
​
9
$pear_dir = dirname(__FILE__);
10
ini_set('include_path', '');
11
if (function_exists('mb_internal_encoding')) {
12
    mb_internal_encoding('ASCII');
13
}
14
set_time_limit(0);
15
include_once 'PEAR.php';
16
include_once 'PEAR/Installer.php';
17
include_once 'PEAR/Registry.php';
18
include_once 'PEAR/PackageFile.php';
19
include_once 'PEAR/Downloader/Package.php';
20
include_once 'PEAR/Frontend.php';
21
$a = true;
22
if (!PEAR::loadExtension('xml')) {
23
    $a = false;
24
    echo "[PEAR] xml extension is required\n";
25
}
26
if (!PEAR::loadExtension('pcre')) {
27
    $a = false;
28
    echo "[PEAR] pcre extension is required\n";
29
}
30
if (!$a) {
31
    return -1;
32
}
33
​
34
$force = false;
35
$install_files = array();
36
array_shift($argv);
37
$debug = false;
38
for ($i = 0; $i < sizeof($argv); $i++) {
39
    $arg = $argv[$i];
40
    $bn = basename($arg);
41
    if (preg_match('/package-(.*)\.xml$/', $bn, $matches) ||
42
        preg_match('/([A-Za-z0-9_:]+)-.*\.(tar|tgz)$/', $bn, $matches)) {
43
        $install_files[$matches[1]] = $arg;
44
    } elseif ($arg == '-a' || $arg == '--cache') {
45
        $cache_dir = $argv[$i+1];
46
        $i++;
47
    } elseif ($arg == '--force') {
48
        $force = true;
49
    } elseif ($arg == '-dp') {
50
        $prefix = $argv[$i+1];
51
        $i++;
52
    } elseif ($arg == '-ds') {
53
        $suffix = $argv[$i+1];
54
        $i++;
55
    } elseif ($arg == '-d' || $arg == '--dir') {
56
        $with_dir = $argv[$i+1];
57
        $i++;
58
    } elseif ($arg == '-b' || $arg == '--bin') {
59
        $bin_dir = $argv[$i+1];
60
        $i++;
61
    } elseif ($arg == '-c' || $arg == '--config') {
62
        $cfg_dir = $argv[$i+1];
63
        $i++;
64
    } elseif ($arg == '-w' || $arg == '--www') {
65
        $www_dir = $argv[$i+1];
66
        $i++;
67
    } elseif ($arg == '-p' || $arg == '--php') {
68
        $php_bin = $argv[$i+1];
69
        $i++;
70
    } elseif ($arg == '-o' || $arg == '--download') {
71
        $download_dir = $argv[$i+1];
72
        $i++;
73
    } elseif ($arg == '-m' || $arg == '--metadata') {
74
        $metadata_dir = $argv[$i+1];
75
        $i++;
76
    } elseif ($arg == '-t' || $arg == '--temp') {
77
        $temp_dir = $argv[$i+1];
78
        $i++;
79
    } elseif ($arg == '-A' || $arg == '--data') {
80
        $data_dir = $argv[$i+1];
81
        $i++;
82
    } elseif ($arg == '-D' || $arg == '--doc') {
83
        $doc_dir = $argv[$i+1];
84
        $i++;
85
    } elseif ($arg == '-T' || $arg == '--test') {
86
        $test_dir = $argv[$i+1];
87
        $i++;
88
    } elseif ($arg == '--debug') {
89
        $debug = 1;
90
    } elseif ($arg == '--extremedebug') {
91
        $debug = 2;
92
    } elseif ($arg == '-M' || $arg == '--man') {
93
        $man_dir = $argv[$i+1];
94
        $i++;
95
    }
96
}
97
​
98
$config = PEAR_Config::singleton();
99
​
100
if (PEAR::isError($config)) {
101
    $locs = PEAR_Config::getDefaultConfigFiles();
102
    die("ERROR: One of $locs[user] or $locs[system] is corrupt, please remove them and try again");
103
}
104
​
105
// make sure we use only default values
106
$config_layers = $config->getLayers();
107
foreach ($config_layers as $layer) {
108
    if ($layer == 'default') continue;
109
    $config->removeLayer($layer);
110
}
111
$keys = $config->getKeys();
112
if ($debug) {
113
    $config->set('verbose', 5, 'default');
114
} else {
115
    $config->set('verbose', 0, 'default');
116
}
117
// PEAR executables
118
if (!empty($bin_dir)) {
119
    $config->set('bin_dir', $bin_dir, 'default');
120
}
121
​
122
// Cache files
123
if (!empty($cache_dir)) {
124
    $config->set('cache_dir', $cache_dir, 'default');
125
}
126
​
127
// Config files
128
if (!empty($cfg_dir)) {
129
    $config->set('cfg_dir', $cfg_dir, 'default');
130
}
131
​
132
// Web files
133
if (!empty($www_dir)) {
134
    $config->set('www_dir', $www_dir, 'default');
135
}
136
​
137
// Manual pages
138
if (!empty($man_dir)) {
139
    $config->set('man_dir', $man_dir, 'default');
140
}
141
​
142
// Downloaded files
143
if (!empty($download_dir)) {
144
    $config->set('download_dir', $download_dir, 'default');
145
}
146
​
147
// Temporary files
148
if (!empty($temp_dir)) {
149
    $config->set('temp_dir', $temp_dir, 'default');
150
}
151
​
152
// Documentation files
153
if (!empty($doc_dir)) {
154
    $config->set('doc_dir', $doc_dir, 'default');
155
}
156
​
157
// Data files
158
if (!empty($data_dir)) {
159
    $config->set('data_dir', $data_dir, 'default');
160
}
161
​
162
// Unit tests
163
if (!empty($test_dir)) {
164
    $config->set('test_dir', $test_dir, 'default');
165
}
166
​
167
// User supplied a dir prefix
168
if (!empty($with_dir)) {
169
    $ds = DIRECTORY_SEPARATOR;
170
    $config->set('php_dir', $with_dir, 'default');
171
​
172
    // Metadata
173
    if (!empty($metadata_dir)) {
174
        $config->set('metadata_dir', $metadata_dir, 'default');
175
    }
176
    if (empty($doc_dir)) {
177
        $config->set('doc_dir', $with_dir . $ds . 'doc', 'default');
178
    }
179
    if (empty($data_dir)) {
180
        $config->set('data_dir', $with_dir . $ds . 'data', 'default');
181
    }
182
    if (empty($test_dir)) {
183
        $config->set('test_dir', $with_dir . $ds . 'test', 'default');
184
    }
185
    if (empty($www_dir)) {
186
        $config->set('www_dir', $with_dir . $ds . 'htdocs', 'default');
187
    }
188
    if (empty($cfg_dir)) {
189
        $config->set('cfg_dir', $with_dir . $ds . 'cfg', 'default');
190
    }
191
    if (empty($man_dir)) {
192
        $config->set('man_dir', $with_dir . $ds . 'local' . $ds . 'man', 'default');
193
    }
194
    if (!is_writable($config->get('cache_dir'))) {
195
        include_once 'System.php';
196
        $cdir = System::mktemp(array('-d', 'pear'));
197
        if (PEAR::isError($cdir)) {
198
            $ui->outputData("[PEAR] cannot make new temporary directory: " . $cdir);
199
            die(1);
200
        }
201
        $oldcachedir = $config->get('cache_dir');
202
        $config->set('cache_dir', $cdir);
203
    }
204
}
205
​
206
// PHP executable
207
if (!empty($php_bin)) {
208
    $config->set('php_bin', $php_bin);
209
}
210
​
211
// PHP prefix
212
if (isset($prefix)) {
213
    if ($prefix != 'a') {
214
        if ($prefix[0] == 'a') {
215
            $prefix = substr($prefix, 1);
216
        }
217
        $config->set('php_prefix', $prefix, 'system');
218
    }
219
}
220
​
221
// PHP suffix
222
if (isset($suffix)) {
223
    if ($suffix != 'a') {
224
        if ($suffix[0] == 'a') {
225
            $suffix = substr($suffix, 1);
226
        }
227
        $config->set('php_suffix', $suffix, 'system');
228
    }
229
}
230
​
231
/* Print PEAR Conf (useful for debugging do NOT REMOVE) */
232
if ($debug) {
233
    sort($keys);
234
    foreach ($keys as $key) {
235
        echo $key . '    ' .
236
            $config->getPrompt($key) . ": " . $config->get($key, null, 'default') . "\n";
237
    }
238
    if ($debug == 2) { // extreme debugging
239
        exit;
240
    }
241
}
242
// end print
243
​
244
$php_dir = $config->get('php_dir');
245
$options = array();
246
$options['upgrade'] = true;
247
$install_root = getenv('INSTALL_ROOT');
248
if (!empty($install_root)) {
249
    $options['packagingroot'] = $install_root;
250
    $reg = new PEAR_Registry($options['packagingroot'], false, false, $metadata_dir);
251
} else {
252
    $reg = $config->getRegistry('default');
253
}
254
​
255
$ui = PEAR_Frontend::singleton('PEAR_Frontend_CLI');
256
if (PEAR::isError($ui)) {
257
    die($ui->getMessage());
258
}
259
$installer = new PEAR_Installer($ui);
260
$pkg = new PEAR_PackageFile($config, $debug);
261
​
262
foreach ($install_files as $package => $instfile) {
263
    $info = $pkg->fromAnyFile($instfile, PEAR_VALIDATE_INSTALLING);
264
    if (PEAR::isError($info)) {
265
        if (is_array($info->getUserInfo())) {
266
            foreach ($info->getUserInfo() as $err) {
267
                $ui->outputData(sprintf("[PEAR] %s: %s", $package, $err['message']));
268
            }
269
        }
270
        $ui->outputData(sprintf("[PEAR] %s: %s", $package, $info->getMessage()));
271
        continue;
272
    }
273
    $new_ver = $info->getVersion();
274
    $downloaderpackage = new PEAR_Downloader_Package($installer);
275
    $err = $downloaderpackage->initialize($instfile);
276
    if (PEAR::isError($err)) {
277
        $ui->outputData(sprintf("[PEAR] %s: %s", $package, $err->getMessage()));
278
        continue;
279
    }
280
    if ($reg->packageExists($package)) {
281
        $old_ver = $reg->packageInfo($package, 'version');
282
        if (version_compare($new_ver, $old_ver, 'gt')) {
283
            $installer->setOptions($options);
284
            $dp = array($downloaderpackage);
285
            $installer->setDownloadedPackages($dp);
286
            $err = $installer->install($downloaderpackage, $options);
287
            if (PEAR::isError($err)) {
288
                $ui->outputData(sprintf("[PEAR] %s: %s", $package, $err->getMessage()));
289
                continue;
290
            }
291
            $ui->outputData(sprintf("[PEAR] %-15s- upgraded:  %s", $package, $new_ver));
292
        } else {
293
            if ($force) {
294
                $options['force'] = true;
295
                $installer->setOptions($options);
296
                $dp = array($downloaderpackage);
297
                $installer->setDownloadedPackages($dp);
298
                $err = $installer->install($downloaderpackage, $options);
299
                if (PEAR::isError($err)) {
300
                    $ui->outputData(sprintf("[PEAR] %s: %s", $package, $err->getMessage()));
301
                    continue;
302
                }
303
                $ui->outputData(sprintf("[PEAR] %-15s- installed: %s", $package, $new_ver));
304
            } else {
305
                $ui->outputData(sprintf("[PEAR] %-15s- already installed: %s", $package, $old_ver));
306
            }
307
        }
308
    } else {
309
        $options['nodeps'] = true;
310
        $installer->setOptions($options);
311
        $dp = array($downloaderpackage);
312
        $installer->setDownloadedPackages($dp);
313
        $err = $installer->install($downloaderpackage, $options);
314
        if (PEAR::isError($err)) {
315
            $ui->outputData(sprintf("[PEAR] %s: %s", $package, $err->getMessage()));
316
            continue;
317
        }
318
        $ui->outputData(sprintf("[PEAR] %-15s- installed: %s", $package, $new_ver));
319
    }
320
    if ($package == 'PEAR') {
321
        if (is_file($ufile = $config->getConfFile('user'))) {
322
            $ui->outputData('Warning! a PEAR user config file already exists from ' .
323
                            'a previous PEAR installation at ' .
324
                            "'$ufile'. You may probably want to remove it.");
325
        }
326
        $config->set('verbose', 1, 'default');
327
        if (isset($oldcachedir)) {
328
            $config->set('cache_dir', $oldcachedir);
329
        }
330
        $data = array();
331
        foreach ($config->getKeys() as $key) {
332
            $data[$key] = $config->get($key);
333
        }
334
        $cnf_file = $config->getConfFile('system');
335
        if (!empty($install_root)) {
336
            $cnf_file = $install_root . DIRECTORY_SEPARATOR . $cnf_file;
337
        }
338
        $config->writeConfigFile($cnf_file, 'system', $data);
339
        $ui->outputData('Wrote PEAR system config file at: ' . $cnf_file);
340
        $ui->outputData('You may want to add: ' . $config->get('php_dir') . ' to your php.ini include_path');
341
    }
342
}
343
?>
344
​

Cancel