[mw_shl_code=php,true]<?php
/**
* [Aptarti!] (C)2001–2099 Comsenz Inc.
* Tai nėra nemokama programinė įranga, naudojimui taikomos licencijos sąlygos
*
* $Id: function_filesock.php 34441 2014-04-29 07:47:26Z nemohou $
*/
if(!defined('IN_DISCUZ')) {
exit('Prieiga uždrausta');
}
function _dfsockopen($url, $limit = 0, $post = '', $cookie = '', $bysocket = FALSE, $ip = '', $timeout = 15, $block = TRUE, $encodetype = 'URLENCODE', $allowcurl = TRUE, $position = 0, $files = array( )) {
$return = '';
$matches = parse_url($url);
$scheme = $matches['schema'];
$host = $matches['host'];
$path = $matches['kelias'] ? $matches['kelias']. ($matches['užklausa'] ? '?'. $matches['užklausa'] : '') : '/';
$port = !empty($matches['port']) ? $matches['port'] : ($scheme == 'http' ? '80' : '');
$boundary = $encodetype == 'URLENCODE'? '' : atsitiktinis [40];
jei($post) {
if(!is_array($post)) {
parse_str ($post, $post);
}
_format_postkey ($post, $postnew);
$post = $postnew;
}
if(function_exists('curl_init') & function_exists('curl_exec') && $allowcurl) {
$ch = curl_init();
$httpheader = masyvas();
jei($ip) {
$httpheader[] = "Pagrindinis kompiuteris: ".$host;
}
if($httpheader) {
curl_setopt ($ch, CURLOPT_HTTPHEADER, $httpheader);
}
curl_setopt($ch, CURLOPT_URL, $scheme.'://'.( $ip ? $ip : $host). ($port ? ':'.$port : '').$path);
curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, klaidingas);
curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, klaidingas);
curl_setopt($ch, CURLOPT_RETURNTRANSFER, tiesa);
curl_setopt($ch, CURLOPT_FOLLOWLOCATION, tiesa);
curl_setopt ($ch, CURLOPT_HEADER, 1);
jei($post) {
curl_setopt ($ch, CURLOPT_POST, 1);
if($encodetype == 'URLENCODE') {
curl_setopt ($ch, CURLOPT_POSTFIELDS, $post);
} else {
foreach($post kaip $k => $v) {
if(isset($files[$k])) {
$post[$k] = '@'.$files[$k];
}
}
foreach($files kaip $k => $file) {
if(!isset($post[$k]) && file_exists($file)) {
$post[$k] = '@'.$file;
}
}
curl_setopt ($ch, CURLOPT_POSTFIELDS, $post);
}
}
jei($cookie) {
curl_setopt ($ch, CURLOPT_COOKIE, $cookie);
}
curl_setopt ($ch, CURLOPT_CONNECTTIMEOUT, $timeout);
curl_setopt ($ch, CURLOPT_TIMEOUT, $timeout);
$data = curl_exec($ch);
$status = curl_getinfo($ch);
$errno = curl_errno($ch);
curl_close ($ch);
if($errno || $status['http_code'] != 200) {
grąžinimas;
} else {
$GLOBALS['filesockheader'] = substr($data, 0, $status['header_size']);
$data = substr($data, $status['header_size']);
grįžti !$limit ? $data : substr($data, 0, $limit);
}
}
jei($post) {
if($encodetype == 'URLENCODE') {
$data = http_build_query($post);
} else {
$data = '';
foreach($post kaip $k => $v) {
$data .= "--$boundary\r\n";
$data .= 'Turinio dispozicija: formos duomenys; name="'.$k.'"'. (isset($files[$k]) ? '; failo pavadinimas="'.basename($files[$k]).'"; Turinio tipas: application/octet-stream' : '')." \r\n\r\n";
$data .= $v." \r\n";
}
foreach($files kaip $k => $file) {
if(!isset($post[$k]) && file_exists($file)) {
if($fp = @fopen($file, 'r')) {
$v = fread($fp, filesize($file));
fclose($fp);
$data .= "--$boundary\r\n";
$data .= 'Turinio dispozicija: formos duomenys; name="'.$k.'"; failo pavadinimas="'.basename($file).'"; Turinio tipas: application/octet-stream'." \r\n\r\n";
$data .= $v." \r\n";
}
}
}
$data .= "--$boundary\r\n";
}
$out = "RAŠYTI $path HTTP/1.0\r\n";
$header = "Priimti: */*\r\n";
$header .= "Priimtina kalba: zh-cn\r\n";
$header .= $encodetype == 'URLENCODE'? "Content-Type: application/x-www-form-urlencoded\r\n" : "Content-Type: multipart/form-data; riba=$boundary\r\n";
$header .= 'turinio ilgis: '.strlen($data)." \r\n";
$header .= "Vartotojo agentas: $_SERVER[HTTP_USER_AGENT]\r\n";
$header .= "Pagrindinis: $host:$port\r\n";
$header .= "Ryšys: Uždaryti\r\n";
$header .= "Talpyklos valdymas: no-cache\r\n";
$header .= "Slapukas: $cookie\r\n\r\n";
$out .= $header;
$out .= $data;
} else {
$out = "GAUTI $path HTTP/1.0\r\n";
$header = "Priimti: */*\r\n";
$header .= "Priimtina kalba: zh-cn\r\n";
$header .= "Vartotojo agentas: $_SERVER[HTTP_USER_AGENT]\r\n";
$header .= "Pagrindinis: $host:$port\r\n";
$header .= "Ryšys: Uždaryti\r\n";
$header .= "Slapukas: $cookie\r\n\r\n";
$out .= $header;
}
$fpflag = 0;
if(!$fp = @fsocketopen(($ip ? $ip : $host), $port, $errno, $errstr, $timeout)) {
$context = masyvas(
'http' => masyvas(
'metodas' => $post ? "POST" : "GAUTI",
'header' => $header,
"turinys" = > $post,
skirtasis laikas = > $timeout,
),
);
$context = stream_context_create($context);
$fp = @fopen($scheme.'://'.( $ip ? $ip : $host).':'.$port.$path, 'b', false, $context);
$fpflag = 1;
}
if(!$fp) {
grąžinti '';
} else {
stream_set_blocking ($fp, $block);
stream_set_timeout ($fp, $timeout);
@fwrite ($fp, $out);
$status = stream_get_meta_data($fp);
if(!$status['timed_out']) {
o (!feof($fp) && !$fpflag) {
$header = @fgets($fp);
$headers .= $header;
if($header && ($header == "\r\n" || $header == "\n")) {
pertrauka;
}
}
$GLOBALS['filesockheader'] = $headers;
if($position) {
už($i=0; $i<$position; $i++) {
$char = fgetc($fp);
if($char == "\n" && $oldchar != "\r") {
$i++;
}
$oldchar = $char;
}
}
jei($limit) {
$return = stream_get_contents($fp, $limit);
} else {
$return = stream_get_contents($fp);
}
}
@fclose straipsnio $fp dalis;
grąžinti $return;
}
}
funkcija _format_postkey($post, &$result, $key = '') {
foreach($post kaip $k => $v) {
$_k = $key ? $key." ['.$k.']' : $k;
if(is_array($v)) {
_format_postkey ($v, $result, _k USD);
} else {
$result[$_k] = $v;
}
}
}
?>[/mw_shl_code]
|
Paskelbta 2014-11-30 21:09:51
|
|
|
Paskelbta 2014-12-01 12:20:49
|
Savininkas|
Paskelbta 2014-12-01 13:45:36
|
Jūs žinote, kokia yra šios klaidos priežastis, o lėtas užklausos vykdymas įrašys šią klaidą ilgiau nei 5 sekundes, serverio nginx ir php-fpm
Tavo sesuo, aš taip pat žinau, kad ši eilutė neteisinga, bet nežinau, kam skirtas šis dokumentas