PHP r函数代码示例

 /**
  * undocumented function
  *
  * @param string $file 
  * @return void
  * @access public
  */
 function import($file)
 {
     $source = file_get_contents($file);
     $xml = new Xml($source);
     $result = $xml->toArray();
     $result = $result['Xmlarchive']['Fileset']['File'];
     if (empty($result)) {
         return false;
     }
     $count = 0;
     foreach ($result as $smiley) {
         $name = $smiley['filename'];
         $content = $smiley['content'];
         $content = preg_replace('/\\s/', '', $content);
         $content = base64_decode($content);
         $filePath = SMILEY_PATH . $name;
         if (file_exists($filePath)) {
             continue;
         }
         $this->create(array('code' => ':' . r('.gif', '', $name) . ':', 'filename' => $name));
         $this->save();
         $f = fopen($filePath, 'w+');
         fwrite($f, $content);
         fclose($f);
         $count++;
     }
     return $count;
 }

 function r($url)
 {
     if (!Configure::read('App.baseUrl')) {
         return $url;
     }
     return r('/index.php', '', $url);
 }

 static function env($key)
 {
     if (isset($_SERVER[$key])) {
         return $_SERVER[$key];
     } else {
         if (isset($_ENV[$key])) {
             return $_ENV[$key];
         } else {
             if (getenv($key) !== false) {
                 return getenv($key);
             }
         }
     }
     if ($key == 'DOCUMENT_ROOT') {
         $offset = 0;
         if (!strpos(NServer::env('SCRIPT_NAME'), '.php')) {
             $offset = 4;
         }
         return substr(NServer::env('SCRIPT_FILENAME'), 0, strlen(NServer::env('SCRIPT_FILENAME')) - (strlen(NServer::env('SCRIPT_NAME')) + $offset));
     }
     if ($key == 'PHP_SELF') {
         return r(NServer::env('DOCUMENT_ROOT'), '', NServer::env('SCRIPT_FILENAME'));
     }
     return null;
 }

 public function testUserRegex()
 {
     $r = new RouterTestWrapper();
     $r->get(r('|/|'), function () {
     });
     $this->assertEquals('|/|', $r->routes['GET'][0]->regex());
 }

 /**
  * Renmove HTML inutil ou com problemas
  *
  * @return String formatada com HTML removido
  */
 function replace($strContent = null)
 {
     $strSiteUrl = 'http://' . $this->siteurl;
     $arrProcura = array("<FONT COLOR=\"000000\">", '</FONT>', '<font FACE=Tahoma color=\'#CC0000\' size=2>', '</font>', '<FONT COLOR="5F9F9F">Entregue', '<td> Entregue </td>', '<FONT COLOR="007FFF">Saiu para entrega', '<td> Aguardando retirada </td>', 'Conferido', '<td> Encaminhado </td>', 'Postado', '<td> Destinatário ausente </td>', 'FISCALIZACAO/CUSTOMS', 'FISCALIZAÇÃO/CUSTOMS', 'Liberado pela alfândega', 'CTCI SAO PAULO (GEARA)', 'CTCI SAO PAULO (GEEXP)', 'OBJ RETIDO - VER AUTENTICIDADE MARCA', 'Recebido/Brasil', 'TRIBUTADO', 'Por favor, entre em contato conosco clicando <a href="http://www.correios.com.br/servicos/falecomoscorreios/default.cfm">aqui</a>.');
     $arrTroca = array(' ', ' ', ' ', ' ', '<span class="entregue">Entregue</span>', '<td><span class="entregue">Entregue</span></td>', '<span class="saiu">Saiu para entrega</span>', '<td><span class="saiu">Saiu para entrega</span></td>', '<span class="conferido">Conferido</span>', '<td><span class="encaminhado">Encaminhado</span></td>', '<span class="postado">Postado</span>', '<td><span class="ausente">Destinatário ausente</span></td>', '<a href="' . $strSiteUrl . '/fiscalizacao-ou-customs" class="informacao">FISCALIZACAO/CUSTOMS</a>', '<a href="' . $strSiteUrl . '/fiscalizacao-ou-customs" class="informacao">FISCALIZACAO/CUSTOMS</a>', '<a href="' . $strSiteUrl . '/liberado-pela-alfandega" class="informacao">Liberado pela alfândega</a>', '<a href="' . $strSiteUrl . '/o-que-e-ctci" class="informacao">CTCI SAO PAULO (GEARA)</a>', '<span class="informacao">CTCI SAO PAULO (GEEXP)</span>', '<a href="' . $strSiteUrl . '/objeto-retido" class="informacao">OBJ RETIDO - VER AUTENTICIDADE MARCA</a>', '<a href="' . $strSiteUrl . '/recebido-no-brasil" class="informacao">Recebido/Brasil</a>', '<a href="' . $strSiteUrl . '/tributado" class="informacao">TRIBUTADO</a>', '<span class="problema"><a href="http://www.correios.com.br/servicos/falecomoscorreios/default.cfm">Por favor, entre em contato conosco clicando aqui</a>.</span>');
     return r($arrProcura, $arrTroca, preg_replace('/\\s{2,}/', '', $strContent));
 }

 /**
  *
  */
 public static function get_ip($i_asLong = false)
 {
     static $env_keys = array('HTTP_CLIENT_IP', 'HTTP_X_FORWARDED_FOR', 'REMOTE_ADDR');
     static $ip = null;
     $skip_ips = r(self::PROXY_IPS);
     if ($ip) {
         return $i_asLong ? ip2long($ip) : $ip;
     }
     foreach ($env_keys as $key) {
         if (!($val = @$_SERVER[$key])) {
             continue;
         }
         if (strcasecmp($val, 'unknown') == 0) {
             continue;
         }
         list($first) = explode(',', $val);
         $first = trim($first);
         if (preg_match('/^(\\d{1,3}\\.){3,3}\\d{1,3}$/', $first)) {
             if (in_array($first, $skip_ips)) {
                 continue;
             }
             $ip = $first;
             return $i_asLong ? ip2long($ip) : $ip;
         }
     }
     return null;
 }

 function read($dir = null, $recursive = false)
 {
     $notes = array();
     $path = CORE_PATH . APP_PATH . $dir;
     $folder = new Folder(APP_PATH . $dir);
     $fold = $recursive ? $folder->findRecursive('.*\\.php') : $folder->find('.*\\.php');
     foreach ($fold as $file) {
         $file = $recursive ? $file : $path . $file;
         $file_path = r(CORE_PATH . APP_PATH, '', $file);
         $handle = new File($file_path);
         $content = $handle->read();
         $lines = explode(PHP_EOL, $content);
         //$lines = file($file);
         $ln = 1;
         if (!empty($lines)) {
             foreach ($lines as $line) {
                 if ((is_null($this->type) || $this->type == 'TODO') && preg_match("/[#\\*\\/\\/]\\s*TODO\\s*(.*)/", $line, $match)) {
                     $this->notes[$file_path]['TODO'][$ln] = $match[1];
                 }
                 if ((is_null($this->type) || $this->type == 'OPTIMIZE') && preg_match("/[#\\*\\/\\/]\\s*OPTIMIZE|OPTIMISE\\s*(.*)/", $line, $match)) {
                     $this->notes[$file_path]['OPTIMIZE'][$ln] = $match[1];
                 }
                 if ((is_null($this->type) || $this->type == 'FIXME') && preg_match("/[#\\*\\/\\/]\\s*FIXME|BUG\\s*(.*)/", $line, $match)) {
                     $this->notes[$file_path]['FIXME'][$ln] = $match[1];
                 }
                 $ln++;
             }
         }
     }
     return $this->notes;
 }

 private function array_to_xml($array, $container = 'response', $is_root = true)
 {
     if (!is_array($array)) {
         return array_to_xml(array($array));
     }
     $xml = '';
     if ($is_root) {
         $xml .= '<?xml version="1.0" encoding="utf-8"?>';
         $xml .= "<{$container}>";
     }
     foreach ($array as $key => $value) {
         // make sure key is a string
         $elem = $key;
         if (!is_string($key) && !empty($container)) {
             $elem = $container;
         }
         $xml .= "<{$elem}>";
         if (is_array($value)) {
             if (array_keys($value) !== array_keys(array_keys($value))) {
                 $xml .= array_to_xml($value, '', false);
             } else {
                 $xml .= array_to_xml($value, r('/s$/', '', $elem), false);
             }
         } else {
             $xml .= htmlspecialchars($value, ENT_COMPAT, 'ISO-8859-1') != $value ? "<![CDATA[{$value}]]>" : $value;
         }
         $xml .= "</{$elem}>";
     }
     if ($is_root) {
         $xml .= "</{$container}>";
     }
     return preg_replace('/[\\x00-\\x1F\\x7F]/', '', $xml);
 }

 /**
  * Embeds a github gist
  *
  * @param string $url Gist url: i.e. https://gist.github.com/2924148
  * @param string $file The name of a particular file from the gist, which should displayed only.
  * @return string
  */
 public static function gist($url, $file = null)
 {
     // url for the script file
     $url = $url . '.js' . r(!is_null($file), '?file=' . $file);
     // load the gist
     return html::tag('script', '', array('src' => $url));
 }

 function css($key)
 {
     //return;
     $out = '';
     $file = glob(CSS . $key . '_*.css');
     $out .= $this->Html->Css(r('.css', '', basename($file[count($file) - 1])));
     return $out;
 }

 function cleanTags($value)
 {
     $value = rtrim(preg_replace('/,+/', ',', r(' ', ',', trim($value))), ',') . ',';
     if ($value == ',') {
         $value = '';
     }
     return $value;
 }

 public function loginBeforeContinue()
 {
     if (!s()->user->id) {
         Core_Application::getInstance()->breakDispacher();
         $this->getView()->disableLayout();
         r('/');
     }
 }

 public function oauth()
 {
     if (isset($this->params['url']['code'])) {
         $code = $this->params['url']['code'];
     }
     SlSession::write('Api.facebook.accessToken', r('access_token=', '', $this->Facebook->graph("oauth/access_token", array('client_id' => SlConfigure::read('Api.facebook.appId'), 'redirect_uri' => Sl::url(true), 'client_secret' => SlConfigure::read('Api.facebook.secret'), 'code' => $code, 'decode' => false))));
     $this->redirect(SlConfigure::read('Api.facebook.oauthSuccess'));
 }

/**
 * Created by PhpStorm.
 * User: raynald
 * Date: 2/5/15
 * Time: 9:44 PM
 */
function r($a)
{
    if ($a < 2) {
        echo "{$a}<br>";
        r($a + 1);
    }
    echo "{$a}" . ' hello<br>';
}

 /**
  * Kill Now
  */
 public function fatal($msg)
 {
     if ($this->error_reporting) {
         $this->fatal_errors[] = $msg . @r(debug_backtrace());
     }
     $this->count++;
     exit;
 }