[mw_shl_code=php,true]<?php
/** * [Discus!] (C)2001-2099 Comsenz Inc. * Toto NIE JE freeware, použitie podlieha licenčným podmienkam
* * $Id: function_filesock.php 34441 29.04.2014 07:47:26Z nemohou $ */
if(!defined('IN_DISCUZ')) { exit ('Prístup zamietnutý');
}
funkcia _dfsockopen($url, $limit = 0, $post = '', $cookie = '', $bysocket = NEPRAVDA, $ip = '', $timeout = 15, $block = PRAVDA, $encodetype = 'URLENCODE', $allowcurl = PRAVDA, $position = 0, $files = pole( )) { $return = ''; $matches = parse_url($url); $scheme = $matches['schéma']; $host = $matches['hostiteľ']; $path = $matches['cesta'] ? $matches['path']. ($matches['dotaz'] ? '?'. $matches['query'] : '') : '/'; $port = !empty($matches['port']) ? $matches['port'] : ($scheme == 'http' ? '80' : ''); $boundary = $encodetype == 'URLENCODE' ? '' : random(40);
if($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 = array(); if($ip) { $httpheader[] = "Moderátor: ".$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, nepravdivé); curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, nepravdivé); curl_setopt($ch, CURLOPT_RETURNTRANSFER, pravda); curl_setopt($ch, CURLOPT_FOLLOWLOCATION, pravda); curl_setopt($ch, CURLOPT_HEADER, 1); if($post) { curl_setopt($ch, CURLOPT_POST, 1); if($encodetype == 'URLENCODE') { curl_setopt($ch, CURLOPT_POSTFIELDS, $post); } inak { foreach($post ako $k => $v) { if(isset($files[$k])) { $post[$k] = '@'.$files[$k]; } } foreach($files ako $k => $file) { if(!isset($post[$k]) & file_exists($file)) { $post[$k] = '@'.$file; } } curl_setopt($ch, CURLOPT_POSTFIELDS, $post); } } if($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) { návrat; } inak { $GLOBALS['filesockheader'] = substr($data, 0, $status['header_size']); $data = substr($data, $status['header_size']); vráť sa! $limit ? $data : substr($data, 0, $limit); } }
if($post) { if($encodetype == 'URLENCODE') { $data = http_build_query($post); } inak { $data = ''; foreach($post ako $k => $v) { $data .= "--$boundary\r\n"; $data .= 'Obsah-Disposition: form-data; meno="'.$k.'"'. (isset($files[$k]) ? '; názov súboru="'.základný názov($files[$k]).'"; Typ obsahu: aplikácia/oktet-prúd' : '')." \r\n\r\n"; $data .= $v." \r\n"; } foreach($files ako $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 .= 'Obsah-Disposition: form-data; meno="'.$k.'"; názov súboru="'.základnémeno($file).'"; Typ obsahu: aplikácia/oktetový prúd'." \r\n\r\n"; $data .= $v." \r\n"; } } } $data .= "--$boundary\r\n"; } $out = "POST $path HTTP/1.0\r\n"; $header = "Akceptovať: */*\r\n"; $header .= "Accept-Language: zh-cn\r\n"; $header .= $encodetype == 'URLENCODE' ? "Content-Type: application/x-www-form-urlencoded\r\n" : "Content-Type: multipart/form-data; hranica=$boundary\r\n"; $header .= 'Dĺžka obsahu: '.strlen($data)." \r\n"; $header .= "User-Agent: $_SERVER[HTTP_USER_AGENT]\r\n"; $header .= "Moderátor: $host:$port\r\n"; $header .= "Spojenie: Blízko\r\n"; $header .= "Cache-Control: no-cache\r\n"; $header .= "Cookie: $cookie\r\n\r\n"; $out .= $header; $out .= $data; } inak { $out = "ZÍSKAŤ $path HTTP/1.0\r\n"; $header = "Akceptovať: */*\r\n"; $header .= "Accept-Language: zh-cn\r\n"; $header .= "User-Agent: $_SERVER[HTTP_USER_AGENT]\r\n"; $header .= "Moderátor: $host:$port\r\n"; $header .= "Spojenie: Blízko\r\n"; $header .= "Cookie: $cookie\r\n\r\n"; $out .= $header; }
$fpflag = 0; if(!$fp = @fsocketopen(($ip ? $ip : $host), $port, $errno, $errstr, $timeout)) { $context = pole( 'http' => pole( 'metóda' => $post ? 'POST' : 'CHOĎ', 'header' => $header, 'obsah' => $post, 'timeout' => $timeout, ), ); $context = stream_context_create($context); $fp = @fopen($scheme.'://'.( $ip? $ip : $host).':'.$port.$path, 'b', nepravdivé, $context); $fpflag = 1; }
if(!$fp) { return ''; } inak { stream_set_blocking($fp, $block); stream_set_timeout($fp, $timeout); @fwrite($fp, $out); $status = stream_get_meta_data($fp); if(!$status['timed_out']) { while (!feof($fp) & !$fpflag) { $header = @fgets($fp); $headers .= $header; if($header && ($header == "\r\n" || $header == "\n")) { prestávka; } } $GLOBALS['filesockheader'] = $headers;
if($position) { pre($i=0; $i<$position; $i++) { $char = fgetc($fp); if($char == "\n" & $oldchar != "\r") { $i++; } $oldchar = $char; } }
if($limit) { $return = stream_get_contents($fp, $limit); } inak { $return = stream_get_contents($fp); } } @fclose($fp); return $return; }
}
funkcia _format_postkey($post, &$result, $key = '') { foreach($post ako $k => $v) { $_k = $key ? $key.' ['.$k.']' : $k; if(is_array($v)) { _format_postkey($v, $result, $_k); } inak { $result[$_k] = $v; } }
}
?>[/mw_shl_code]
|