aktuelle.kurse/old_m133/Modul_Unterlagen_133_VOR/08-Uebungen/03 PHP Grundlagen/php-4.2.2-Win32/pear/Net/Curl.php
Müller Harald 507e5da390 muh
2022-05-13 11:53:50 +02:00

392 lines
7.7 KiB
PHP

<?php
//
// +----------------------------------------------------------------------+
// | PHP Version 4 |
// +----------------------------------------------------------------------+
// | Copyright (c) 1997-2002 The PHP Group |
// +----------------------------------------------------------------------+
// | This source file is subject to version 2.02 of the PHP license, |
// | that is bundled with this package in the file LICENSE, and is |
// | available at through the world-wide-web at |
// | http://www.php.net/license/2_02.txt. |
// | If you did not receive a copy of the PHP license and are unable to |
// | obtain it through the world-wide-web, please send a note to |
// | license@php.net so we can mail you a copy immediately. |
// +----------------------------------------------------------------------+
// | Author: Sterling Hughes <sterling@php.net> |
// +----------------------------------------------------------------------+
//
// $Id: Curl.php,v 1.9 2002/02/28 08:27:14 sebastian Exp $
//
// A nice friendly OO interface for CURL
//
require_once('PEAR.php');
class Net_Curl extends PEAR
{
// {{{ Public Properties
/**
* The URL for cURL to work with
*
* @var string $url
* @access public
*/
var $url;
/**
* The SSL version for the transfer
*
* @var integer $sslVersion
* @access public
*/
var $sslVersion;
/**
* The filename of the SSL certificate
*
* @var string $sslCert
* @access public
*/
var $sslCert;
/**
* The password corresponding to the certificate
* in the $sslCert property
*
* @var string $sslCertPasswd
* @access public
*/
var $sslCertPasswd;
/**
* User Agent string when making an HTTP request
*
* @var string $userAgent
* @access public
*/
var $userAgent;
/**
* Whether or not to include the header in the results
* of the CURL transfer
*
* @var boolean $header
*/
var $header = 0;
/**
* Whether or not to output debug information while executing a
* curl transfer
*
* @var boolean $verbose
* @access public
*/
var $verbose = 0;
/**
* Whether or not to display a progress meter for the current transfer
*
* @var boolean $progress
* @access public
*/
var $progress = 0;
/**
* Whether or not to suppress error messages
*
* @var boolean $mute
* @access public
*/
var $mute = 1;
/**
* Whether or not to follow HTTP Location headers.
*
* @var boolean $follow_location
* @access public
*/
var $follow_location = 1;
/**
* Time allowed for current transfer, in seconds. 0 means no limit
*
* @var int $timeout
* @access public
*/
var $timeout = 0;
/**
* Whether or not to return the results of the
* current transfer
*
* @var boolean $return_transfer
* @access public
*/
var $return_transfer = 1;
/**
* The type of transfer to perform
*
* @var string $type
* @access public
*/
var $type;
/**
* The file to upload
*
* @var string $file
* @access public
*/
var $file;
/**
* The file size of the file pointed to by the $file
* property
*
* @var integer $file_size
* @access public
*/
var $file_size;
/**
* The cookies to send to the remote site
*
* @var array $cookies
* @access public
*/
var $cookies;
/**
* The fields to send in a 'POST' request
*
* @var array $fields
* @access public
*/
var $fields;
/**
* The proxy server to go through
*
* @var string $proxy
* @access public
*/
var $proxy;
/**
* The username for the Proxy server
*
* @var string $proxyUser
* @access public
*/
var $proxyUser;
/**
* The password for the Proxy server
*
* @var string $proxyPassword
* @access public
*/
var $proxyPassword;
// }}}
// {{{ Private Properties
/**
* The current curl handle
*
* @var resource $_ch
* @access public
*/
var $_ch;
// }}}
// {{{ Net_Curl()
/**
* The Net_Curl constructor, called when a new Net_Curl object
* is initialized
*
* @param string [$url] The URL to fetch (can be set
* using the $url property as well)
*
* @return object Net_Curl $obj A new Net_Curl object
*
* @access public
* @author Sterling Hughes <sterling@php.net>
* @since PHP 4.0.5
*/
function Net_Curl($url = "")
{
if ($url) {
$this->url = $url;
}
$ch = curl_init();
if (!$ch) {
$this = new PEAR_Error("Couldn't initialize a new curl handle");
}
$this->_ch = $ch;
}
// }}}
// {{{ execute()
/**
* Executes a prepared CURL transfer
*
* @access public
* @author Sterling Hughes <sterling@php.net>
* @since PHP 4.0.5
*/
function execute()
{
$ch = &$this->_ch;
$ret = true;
// Basic stuff
$ret = curl_setopt($ch, CURLOPT_URL, $this->url);
$ret = curl_setopt($ch, CURLOPT_HEADER, $this->header);
// Whether or not to return the transfer contents
if ($this->return_transfer && !isset($this->file)) {
$ret = curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
}
// SSL Checks
if (isset($this->sslVersion)) {
$ret = curl_setopt($ch, CURLOPT_SSLVERSION, $this->sslVersion);
}
if (isset($this->sslCert)) {
$ret = curl_setopt($ch, CURLOPT_SSLCERT, $this->sslCert);
}
if (isset($this->sslCertPasswd)) {
$ret = curl_setopt($ch, CURLOPT_SSLCERTPASSWD, $this->sslCertPasswd);
}
// Proxy Related checks
if (isset($this->proxy)) {
$ret = curl_setopt($ch, CURLOPT_PROXY, $this->proxy);
}
if (isset($this->proxyUser) || isset($this->proxyPassword)) {
$proxyString = $this->proxyUser . ":" . $this->proxyPassword;
$ret = curl_setopt($ch, CURLOPT_PROXYUSERPWD, $proxyString);
}
// Transfer type
if (isset($this->type)) {
switch (strtolower($this->type)) {
case 'post':
$ret = curl_setopt($ch, CURLOPT_POST, 1);
break;
case 'put':
$ret = curl_setopt($ch, CURLOPT_PUT, 1);
break;
}
}
// Transfer upload, etc. related
if (isset($this->file)) {
if (!isset($this->file_size)) {
$this->file_size = filesize($this->file);
}
$ret = curl_setopt($ch, CURLOPT_INFILE, $this->file);
$ret = curl_setopt($ch, CURLOPT_INFILESIZE, $this->file_size);
}
if (isset($this->fields)) {
if (!isset($this->type)) {
$this->type = 'post';
$ret = curl_setopt($ch, CURLOPT_POST, 1);
}
$ret = curl_setopt($ch, CURLOPT_POSTFIELDS, $this->fields);
}
// Error related
if ($this->progress) {
$ret = curl_setopt($ch, CURLOPT_PROGRESS, 1);
}
if ($this->verbose) {
$ret = curl_setopt($ch, CURLOPT_VERBOSE, 1);
}
if (!$this->mute) {
$ret = curl_setopt($ch, CURLOPT_MUTE, 0);
}
// Other stuff
$ret = curl_setopt($ch, CURLOPT_FOLLOWLOCATION, $this->follow_location);
if ($this->timeout) {
$ret = curl_setopt($ch, CURLOPT_TIMEOUT, $this->timeout);
}
if (isset($this->userAgent)) {
$ret = curl_setopt($ch, CURLOPT_USERAGENT, $this->userAgent);
}
// Cookies and the such
if (isset($this->cookies)) {
foreach ($this->cookies as $name => $value) {
$cookie_data .= urlencode($name) . ": " . urlencode($value) . ";";
}
$ret = curl_setopt($ch, CURLOPT_COOKIE, $cookie_data);
}
$ret = curl_exec($ch);
if (!$ret) {
$errObj = new PEAR_Error(curl_error($ch), curl_errno($ch));
return($errObj);
}
return($ret);
}
// }}}
// {{{ close()
/**
* Closes the curl transfer and finishes the object (kinda ;)
*
* @access public
* @author Sterling Hughes <sterling@php.net>
* @since PHP 4.0.5
*/
function close()
{
if ($this->_ch) {
curl_close($this->_ch);
}
}
// }}}
}
// }}}
?>