1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036 |
- <?php
- if (!defined('SMF'))
- die('Hacking attempt...');
- class xmlArray
- {
-
- public $array, $debug_level, $trim;
-
- public function __construct($data, $auto_trim = false, $level = null, $is_clone = false)
- {
-
- setMemoryLimit('32M');
-
- $this->debug_level = $level !== null ? $level : error_reporting();
- $this->trim = $auto_trim;
-
- if ($is_clone)
- {
- $this->array = $data;
- return;
- }
-
- if (is_array($data))
- $data = implode('', $data);
-
- $data = preg_replace('/<!--.*?-->/s', '', $this->_to_cdata(preg_replace(array('/^<\?xml.+?\?' . '>/is', '/<!DOCTYPE[^>]+?' . '>/s'), '', $data)));
-
- $this->array = $this->_parse($data);
- }
-
- public function name()
- {
- return isset($this->array['name']) ? $this->array['name'] : '';
- }
-
- public function fetch($path, $get_elements = false)
- {
-
- $array = $this->path($path);
- if ($array === false)
- return false;
-
- if ($get_elements && !is_string($array))
- {
- $temp = '';
-
- foreach ($array->array as $val)
- {
-
- if (is_array($val))
- $temp .= $this->_xml($val, null);
- }
-
- return $this->_to_cdata($temp);
- }
-
- return is_string($array) ? $array : $this->_fetch($array->array);
- }
-
- public function path($path, $return_full = false)
- {
-
- $path = explode('/', $path);
-
- $array = $this->array;
-
- foreach ($path as $el)
- {
-
- if (strpos($el, '[') !== false)
- {
- $lvl = (int) substr($el, strpos($el, '[') + 1);
- $el = substr($el, 0, strpos($el, '['));
- }
-
- elseif (substr($el, 0, 1) == '@')
- {
-
- if (isset($array[$el]))
- return $array[$el];
- else
- {
- $trace = debug_backtrace();
- $i = 0;
- while ($i < count($trace) && isset($trace[$i]['class']) && $trace[$i]['class'] == get_class($this))
- $i++;
- $debug = ' from ' . $trace[$i - 1]['file'] . ' on line ' . $trace[$i - 1]['line'];
-
- if ($this->debug_level & E_NOTICE)
- trigger_error('Undefined XML attribute: ' . substr($el, 1) . $debug, E_USER_NOTICE);
- return false;
- }
- }
- else
- $lvl = null;
-
- $array = $this->_path($array, $el, $lvl);
- }
-
- if ($return_full && (!isset($array['name']) || substr($array['name'], -1) != ']'))
- $array = array('name' => $el . '[]', $array);
-
- $newClass = get_class($this);
-
- return $array === false ? false : new $newClass($array, $this->trim, $this->debug_level, true);
- }
-
- public function exists($path)
- {
-
- $path = explode('/', $path);
-
- $array = $this->array;
-
- foreach ($path as $el)
- {
-
- if (strpos($el, '[') !== false)
- {
- $lvl = (int) substr($el, strpos($el, '[') + 1);
- $el = substr($el, 0, strpos($el, '['));
- }
-
- elseif (substr($el, 0, 1) == '@')
- return isset($array[$el]);
- else
- $lvl = null;
-
- $array = $this->_path($array, $el, $lvl, true);
- }
- return $array !== false;
- }
-
- public function count($path)
- {
-
- $temp = $this->path($path, true);
-
- $i = 0;
- foreach ($temp->array as $item)
- {
- if (is_array($item))
- $i++;
- }
- return $i;
- }
-
- public function set($path)
- {
-
- $array = array();
- $xml = $this->path($path, true);
- foreach ($xml->array as $val)
- {
-
- if (!is_array($val) || $val['name'] == '!')
- continue;
-
- $newClass = get_class($this);
-
- $array[] = new $newClass($val, $this->trim, $this->debug_level, true);
- }
- return $array;
- }
-
- public function create_xml($path = null)
- {
-
- if ($path !== null)
- {
- $path = $this->path($path);
-
- if ($path === false)
- return false;
- $path = $path->array;
- }
-
- else
- $path = $this->array;
-
- return '<?xml version="1.0"?' . '>' . $this->_xml($path, 0);
- }
-
- public function to_array($path = null)
- {
-
- if ($path !== null)
- {
- $path = $this->path($path);
-
- if ($path === false)
- return false;
- $path = $path->array;
- }
-
- else
- $path = $this->array;
- return $this->_array($path);
- }
-
- protected function _parse($data)
- {
-
- $current = array(
- );
-
- while ($data != '')
- {
-
- preg_match('/\A<([\w\-:]+)((?:\s+.+?)?)([\s]?\/)?' . '>/', $data, $match);
- if (isset($match[0]))
- $data = preg_replace('/' . preg_quote($match[0], '/') . '/s', '', $data, 1);
-
- if (!isset($match[1]) || $match[1] == '')
- {
-
- if (strpos($data, '<') === false)
- {
- $text_value = $this->_from_cdata($data);
- $data = '';
- if ($text_value != '')
- $current[] = array(
- 'name' => '!',
- 'value' => $text_value
- );
- }
-
- elseif (strpos($data, '<') > 0)
- {
- $text_value = $this->_from_cdata(substr($data, 0, strpos($data, '<')));
- $data = substr($data, strpos($data, '<'));
- if ($text_value != '')
- $current[] = array(
- 'name' => '!',
- 'value' => $text_value
- );
- }
-
- elseif (strpos($data, '<') !== false && strpos($data, '<') == 0)
- {
- if (strpos($data, '<', 1) !== false)
- {
- $text_value = $this->_from_cdata(substr($data, 0, strpos($data, '<', 1)));
- $data = substr($data, strpos($data, '<', 1));
- if ($text_value != '')
- $current[] = array(
- 'name' => '!',
- 'value' => $text_value
- );
- }
- else
- {
- $text_value = $this->_from_cdata($data);
- $data = '';
- if ($text_value != '')
- $current[] = array(
- 'name' => '!',
- 'value' => $text_value
- );
- }
- }
-
- continue;
- }
-
- $el = &$current[];
- $el['name'] = $match[1];
-
- if ((!isset($match[3]) || trim($match[3]) != '/') && (!isset($match[2]) || trim($match[2]) != '/'))
- {
-
- $last_tag_end = strpos($data, '</' . $match[1]. '>');
- if ($last_tag_end === false)
- continue;
- $offset = 0;
- while (1 == 1)
- {
-
- $next_tag_start = strpos($data, '<' . $match[1], $offset);
-
- if ($next_tag_start === false || $next_tag_start > $last_tag_end)
- break;
-
- $next_tag_end = strpos($data, '</' . $match[1]. '>', $offset);
-
- if ($next_tag_end === false)
- break;
- else
- {
- $last_tag_end = $next_tag_end;
- $offset = $next_tag_start + 1;
- }
- }
-
- $inner_match = substr($data, 0, $last_tag_end);
-
- $data = substr($data, $last_tag_end + strlen('</' . $match[1]. '>'));
- if (!empty($inner_match))
- {
-
- if (strpos($inner_match, '<') !== false)
- $el += $this->_parse($inner_match);
- elseif (trim($inner_match) != '')
- {
- $text_value = $this->_from_cdata($inner_match);
- if ($text_value != '')
- $el[] = array(
- 'name' => '!',
- 'value' => $text_value
- );
- }
- }
- }
-
- if (isset($match[2]) && $match[2] != '')
- {
-
- preg_match_all('/([\w:]+)="(.+?)"/', $match[2], $attr, PREG_SET_ORDER);
-
- foreach ($attr as $match_attr)
- $el['@' . $match_attr[1]] = $match_attr[2];
- }
- }
-
- return $current;
- }
-
- protected function _xml($array, $indent)
- {
- $indentation = $indent !== null ? '
- ' . str_repeat(' ', $indent) : '';
-
- if (is_array($array) && !isset($array['name']))
- {
- $temp = '';
- foreach ($array as $val)
- $temp .= $this->_xml($val, $indent);
- return $temp;
- }
-
- if ($array['name'] == '!')
- return $indentation . '<![CDATA[' . $array['value'] . ']]>';
- elseif (substr($array['name'], -2) == '[]')
- $array['name'] = substr($array['name'], 0, -2);
-
- $output = $indentation . '<' . $array['name'];
- $inside_elements = false;
- $output_el = '';
-
- foreach ($array as $k => $v)
- {
- if (substr($k, 0, 1) == '@')
- $output .= ' ' . substr($k, 1) . '="' . $v . '"';
- elseif (is_array($v))
- {
- $output_el .= $this->_xml($v, $indent === null ? null : $indent + 1);
- $inside_elements = true;
- }
- }
-
- if ($inside_elements)
- $output .= '>' . $output_el . $indentation . '</' . $array['name'] . '>';
- else
- $output .= ' />';
- return $output;
- }
-
- protected function _array($array)
- {
- $return = array();
- $text = '';
- foreach ($array as $value)
- {
- if (!is_array($value) || !isset($value['name']))
- continue;
- if ($value['name'] == '!')
- $text .= $value['value'];
- else
- $return[$value['name']] = $this->_array($value);
- }
- if (empty($return))
- return $text;
- else
- return $return;
- }
-
- function _to_cdata($data)
- {
- $inCdata = $inComment = false;
- $output = '';
- $parts = preg_split('~(<!\[CDATA\[|\]\]>|<!--|-->)~', $data, -1, PREG_SPLIT_DELIM_CAPTURE);
- foreach ($parts as $part)
- {
-
- if (!$inCdata && $part === '<!--')
- $inComment = true;
- if ($inComment && $part === '-->')
- $inComment = false;
- elseif ($inComment)
- continue;
-
- elseif (!$inComment && $part === '<![CDATA[')
- $inCdata = true;
- elseif ($inCdata && $part === ']]>')
- $inCdata = false;
- elseif ($inCdata)
- $output .= htmlentities($part, ENT_QUOTES);
-
- else
- $output .= $part;
- }
- return $output;
- }
-
- protected function _from_cdata($data)
- {
-
- $trans_tbl = array_flip(get_html_translation_table(HTML_ENTITIES, ENT_QUOTES));
-
- $data = strtr(preg_replace('~&#(\d{1,4});~e', "chr('\$1')", $data), $trans_tbl);
- return $this->trim ? trim($data) : $data;
- }
-
- protected function _fetch($array)
- {
-
- if (is_string($array))
- return '';
- $temp = '';
- foreach ($array as $text)
- {
-
- if (!isset($text['name']))
- continue;
-
- if ($text['name'] == '!')
- $temp .= $text['value'];
-
- else
- $temp .= $this->_fetch($text);
- }
-
- return $temp;
- }
-
- protected function _path($array, $path, $level, $no_error = false)
- {
-
- if (!is_array($array))
- return false;
-
- if ($path == '' || $path == '.')
- return $array;
- $paths = explode('|', $path);
-
- $show_all = in_array('*', $paths);
- $results = array();
-
- foreach ($array as $value)
- {
- if (!is_array($value) || $value['name'] === '!')
- continue;
- if ($show_all || in_array($value['name'], $paths))
- {
-
- if ($level !== null && $level > 0)
- $level--;
- else
- $results[] = $value;
- }
- }
-
- if (empty($results))
- {
- $trace = debug_backtrace();
- $i = 0;
- while ($i < count($trace) && isset($trace[$i]['class']) && $trace[$i]['class'] == get_class($this))
- $i++;
- $debug = ' from ' . $trace[$i - 1]['file'] . ' on line ' . $trace[$i - 1]['line'];
-
- if ($this->debug_level & E_NOTICE && !$no_error)
- trigger_error('Undefined XML element: ' . $path . $debug, E_USER_NOTICE);
- return false;
- }
-
- elseif (count($results) == 1 || $level !== null)
- return $results[0];
-
- else
- return $results + array('name' => $path . '[]');
- }
- }
- class ftp_connection
- {
- public $connection, $error, $last_message, $pasv;
-
- public function __construct($ftp_server, $ftp_port = 21, $ftp_user = 'anonymous', $ftp_pass = 'ftpclient@simplemachines.org')
- {
-
- $this->connection = 'no_connection';
- $this->error = false;
- $this->pasv = array();
- if ($ftp_server !== null)
- $this->connect($ftp_server, $ftp_port, $ftp_user, $ftp_pass);
- }
- public function connect($ftp_server, $ftp_port = 21, $ftp_user = 'anonymous', $ftp_pass = 'ftpclient@simplemachines.org')
- {
- if (strpos($ftp_server, 'ftp://') === 0)
- $ftp_server = substr($ftp_server, 6);
- elseif (strpos($ftp_server, 'ftps://') === 0)
- $ftp_server = 'ssl://' . substr($ftp_server, 7);
- if (strpos($ftp_server, 'http://') === 0)
- $ftp_server = substr($ftp_server, 7);
- $ftp_server = strtr($ftp_server, array('/' => '', ':' => '', '@' => ''));
-
- $this->connection = @fsockopen($ftp_server, $ftp_port, $err, $err, 5);
- if (!$this->connection)
- {
- $this->error = 'bad_server';
- return;
- }
-
- if (!$this->check_response(220))
- {
- $this->error = 'bad_response';
- return;
- }
-
- fwrite($this->connection, 'USER ' . $ftp_user . "\r\n");
- if (!$this->check_response(331))
- {
- $this->error = 'bad_username';
- return;
- }
-
- fwrite($this->connection, 'PASS ' . $ftp_pass . "\r\n");
- if (!$this->check_response(230))
- {
- $this->error = 'bad_password';
- return;
- }
- }
- public function chdir($ftp_path)
- {
- if (!is_resource($this->connection))
- return false;
-
- if ($ftp_path !== '/' && substr($ftp_path, -1) === '/')
- $ftp_path = substr($ftp_path, 0, -1);
- fwrite($this->connection, 'CWD ' . $ftp_path . "\r\n");
- if (!$this->check_response(250))
- {
- $this->error = 'bad_path';
- return false;
- }
- return true;
- }
- public function chmod($ftp_file, $chmod)
- {
- if (!is_resource($this->connection))
- return false;
- if ($ftp_file == '')
- $ftp_file = '.';
-
- fwrite($this->connection, 'SITE CHMOD ' . decoct($chmod) . ' ' . $ftp_file . "\r\n");
- if (!$this->check_response(200))
- {
- $this->error = 'bad_file';
- return false;
- }
- return true;
- }
- public function unlink($ftp_file)
- {
-
- if (!is_resource($this->connection))
- return false;
-
- fwrite($this->connection, 'DELE ' . $ftp_file . "\r\n");
- if (!$this->check_response(250))
- {
- fwrite($this->connection, 'RMD ' . $ftp_file . "\r\n");
-
- if (!$this->check_response(250))
- {
- $this->error = 'bad_file';
- return false;
- }
- }
- return true;
- }
- public function check_response($desired)
- {
-
- $time = time();
- do
- $this->last_message = fgets($this->connection, 1024);
- while ((strlen($this->last_message) < 4 || strpos($this->last_message, ' ') === 0 || strpos($this->last_message, ' ', 3) !== 3) && time() - $time < 5);
-
- return is_array($desired) ? in_array(substr($this->last_message, 0, 3), $desired) : substr($this->last_message, 0, 3) == $desired;
- }
- public function passive()
- {
-
- if (!is_resource($this->connection))
- return false;
-
- @fwrite($this->connection, 'PASV' . "\r\n");
- $time = time();
- do
- $response = fgets($this->connection, 1024);
- while (strpos($response, ' ', 3) !== 3 && time() - $time < 5);
-
- if (strpos($response, '227 ') !== 0)
- {
- $this->error = 'bad_response';
- return false;
- }
-
- if (preg_match('~\((\d+),\s*(\d+),\s*(\d+),\s*(\d+),\s*(\d+)(?:,\s*(\d+))\)~', $response, $match) == 0)
- {
- $this->error = 'bad_response';
- return false;
- }
-
- $this->pasv = array('ip' => $match[1] . '.' . $match[2] . '.' . $match[3] . '.' . $match[4], 'port' => $match[5] * 256 + $match[6]);
- return true;
- }
- public function create_file($ftp_file)
- {
-
- if (!is_resource($this->connection))
- return false;
-
- if (!$this->passive())
- return false;
-
- fwrite($this->connection, 'STOR ' . $ftp_file . "\r\n");
-
- $fp = @fsockopen($this->pasv['ip'], $this->pasv['port'], $err, $err, 5);
- if (!$fp || !$this->check_response(150))
- {
- $this->error = 'bad_file';
- @fclose($fp);
- return false;
- }
-
- fclose($fp);
- if (!$this->check_response(226))
- {
- $this->error = 'bad_response';
- return false;
- }
- return true;
- }
- public function list_dir($ftp_path = '', $search = false)
- {
-
- if (!is_resource($this->connection))
- return false;
-
- if (!$this->passive())
- return false;
-
- fwrite($this->connection, 'LIST -1' . ($search ? 'R' : '') . ($ftp_path == '' ? '' : ' ' . $ftp_path) . "\r\n");
-
- $fp = @fsockopen($this->pasv['ip'], $this->pasv['port'], $err, $err, 5);
- if (!$fp || !$this->check_response(array(150, 125)))
- {
- $this->error = 'bad_response';
- @fclose($fp);
- return false;
- }
-
- $data = '';
- while (!feof($fp))
- $data .= fread($fp, 4096);
- fclose($fp);
-
- if (!$this->check_response(226))
- {
- $this->error = 'bad_response';
- return false;
- }
- return $data;
- }
- public function locate($file, $listing = null)
- {
- if ($listing === null)
- $listing = $this->list_dir('', true);
- $listing = explode("\n", $listing);
- @fwrite($this->connection, 'PWD' . "\r\n");
- $time = time();
- do
- $response = fgets($this->connection, 1024);
- while ($response[3] != ' ' && time() - $time < 5);
-
- if (preg_match('~^257 "(.+?)" ~', $response, $match) != 0)
- $current_dir = strtr($match[1], array('""' => '"'));
- else
- $current_dir = '';
- for ($i = 0, $n = count($listing); $i < $n; $i++)
- {
- if (trim($listing[$i]) == '' && isset($listing[$i + 1]))
- {
- $current_dir = substr(trim($listing[++$i]), 0, -1);
- $i++;
- }
-
- $listing[$i] = $current_dir . '/' . trim(strlen($listing[$i]) > 30 ? strrchr($listing[$i], ' ') : $listing[$i]);
- if ($file[0] == '*' && substr($listing[$i], -(strlen($file) - 1)) == substr($file, 1))
- return $listing[$i];
- if (substr($file, -1) == '*' && substr($listing[$i], 0, strlen($file) - 1) == substr($file, 0, -1))
- return $listing[$i];
- if (basename($listing[$i]) == $file || $listing[$i] == $file)
- return $listing[$i];
- }
- return false;
- }
- public function create_dir($ftp_dir)
- {
-
- if (!is_resource($this->connection))
- return false;
-
- fwrite($this->connection, 'MKD ' . $ftp_dir . "\r\n");
- if (!$this->check_response(257))
- {
- $this->error = 'bad_file';
- return false;
- }
- return true;
- }
- public function detect_path($filesystem_path, $lookup_file = null)
- {
- $username = '';
- if (isset($_SERVER['DOCUMENT_ROOT']))
- {
- if (preg_match('~^/home[2]?/([^/]+?)/public_html~', $_SERVER['DOCUMENT_ROOT'], $match))
- {
- $username = $match[1];
- $path = strtr($_SERVER['DOCUMENT_ROOT'], array('/home/' . $match[1] . '/' => '', '/home2/' . $match[1] . '/' => ''));
- if (substr($path, -1) == '/')
- $path = substr($path, 0, -1);
- if (strlen(dirname($_SERVER['PHP_SELF'])) > 1)
- $path .= dirname($_SERVER['PHP_SELF']);
- }
- elseif (strpos($filesystem_path, '/var/www/') === 0)
- $path = substr($filesystem_path, 8);
- else
- $path = strtr(strtr($filesystem_path, array('\\' => '/')), array($_SERVER['DOCUMENT_ROOT'] => ''));
- }
- else
- $path = '';
- if (is_resource($this->connection) && $this->list_dir($path) == '')
- {
- $data = $this->list_dir('', true);
- if ($lookup_file === null)
- $lookup_file = $_SERVER['PHP_SELF'];
- $found_path = dirname($this->locate('*' . basename(dirname($lookup_file)) . '/' . basename($lookup_file), $data));
- if ($found_path == false)
- $found_path = dirname($this->locate(basename($lookup_file)));
- if ($found_path != false)
- $path = $found_path;
- }
- elseif (is_resource($this->connection))
- $found_path = true;
- return array($username, $path, isset($found_path));
- }
- public function close()
- {
-
- fwrite($this->connection, 'QUIT' . "\r\n");
- fclose($this->connection);
- return true;
- }
- }
|