Non puoi selezionare più di 25 argomenti
Gli argomenti devono iniziare con una lettera o un numero, possono includere trattini ('-') e possono essere lunghi fino a 35 caratteri.
501 righe
15 KiB
501 righe
15 KiB
<?php |
|
/* |
|
$Id: nusoapmime.php,v 1.13 2010/04/26 20:15:08 snichol Exp $ |
|
|
|
NuSOAP - Web Services Toolkit for PHP |
|
|
|
Copyright (c) 2002 NuSphere Corporation |
|
|
|
This library is free software; you can redistribute it and/or |
|
modify it under the terms of the GNU Lesser General Public |
|
License as published by the Free Software Foundation; either |
|
version 2.1 of the License, or (at your option) any later version. |
|
|
|
This library is distributed in the hope that it will be useful, |
|
but WITHOUT ANY WARRANTY; without even the implied warranty of |
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
|
Lesser General Public License for more details. |
|
|
|
You should have received a copy of the GNU Lesser General Public |
|
License along with this library; if not, write to the Free Software |
|
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
|
|
|
The NuSOAP project home is: |
|
http://sourceforge.net/projects/nusoap/ |
|
|
|
The primary support for NuSOAP is the mailing list: |
|
nusoap-general@lists.sourceforge.net |
|
|
|
If you have any questions or comments, please email: |
|
|
|
Dietrich Ayala |
|
dietrich@ganx4.com |
|
http://dietrich.ganx4.com/nusoap |
|
|
|
NuSphere Corporation |
|
http://www.nusphere.com |
|
|
|
*/ |
|
|
|
/*require_once('nusoap.php');*/ |
|
/* PEAR Mail_MIME library */ |
|
require_once('Mail/mimeDecode.php'); |
|
require_once('Mail/mimePart.php'); |
|
|
|
/** |
|
* nusoap_client_mime client supporting MIME attachments defined at |
|
* http://www.w3.org/TR/SOAP-attachments. It depends on the PEAR Mail_MIME library. |
|
* |
|
* @author Scott Nichol <snichol@users.sourceforge.net> |
|
* @author Thanks to Guillaume and Henning Reich for posting great attachment code to the mail list |
|
* @version $Id: nusoapmime.php,v 1.13 2010/04/26 20:15:08 snichol Exp $ |
|
* @access public |
|
*/ |
|
class nusoap_client_mime extends nusoap_client { |
|
/** |
|
* @var array Each array element in the return is an associative array with keys |
|
* data, filename, contenttype, cid |
|
* @access private |
|
*/ |
|
var $requestAttachments = array(); |
|
/** |
|
* @var array Each array element in the return is an associative array with keys |
|
* data, filename, contenttype, cid |
|
* @access private |
|
*/ |
|
var $responseAttachments; |
|
/** |
|
* @var string |
|
* @access private |
|
*/ |
|
var $mimeContentType; |
|
|
|
/** |
|
* adds a MIME attachment to the current request. |
|
* |
|
* If the $data parameter contains an empty string, this method will read |
|
* the contents of the file named by the $filename parameter. |
|
* |
|
* If the $cid parameter is false, this method will generate the cid. |
|
* |
|
* @param string $data The data of the attachment |
|
* @param string $filename The filename of the attachment (default is empty string) |
|
* @param string $contenttype The MIME Content-Type of the attachment (default is application/octet-stream) |
|
* @param string $cid The content-id (cid) of the attachment (default is false) |
|
* @return string The content-id (cid) of the attachment |
|
* @access public |
|
*/ |
|
function addAttachment($data, $filename = '', $contenttype = 'application/octet-stream', $cid = false) { |
|
if (! $cid) { |
|
$cid = md5(uniqid(time())); |
|
} |
|
|
|
$info['data'] = $data; |
|
$info['filename'] = $filename; |
|
$info['contenttype'] = $contenttype; |
|
$info['cid'] = $cid; |
|
|
|
$this->requestAttachments[] = $info; |
|
|
|
return $cid; |
|
} |
|
|
|
/** |
|
* clears the MIME attachments for the current request. |
|
* |
|
* @access public |
|
*/ |
|
function clearAttachments() { |
|
$this->requestAttachments = array(); |
|
} |
|
|
|
/** |
|
* gets the MIME attachments from the current response. |
|
* |
|
* Each array element in the return is an associative array with keys |
|
* data, filename, contenttype, cid. These keys correspond to the parameters |
|
* for addAttachment. |
|
* |
|
* @return array The attachments. |
|
* @access public |
|
*/ |
|
function getAttachments() { |
|
return $this->responseAttachments; |
|
} |
|
|
|
/** |
|
* gets the HTTP body for the current request. |
|
* |
|
* @param string $soapmsg The SOAP payload |
|
* @return string The HTTP body, which includes the SOAP payload |
|
* @access private |
|
*/ |
|
function getHTTPBody($soapmsg) { |
|
if (count($this->requestAttachments) > 0) { |
|
$params['content_type'] = 'multipart/related; type="text/xml"'; |
|
$mimeMessage = new Mail_mimePart('', $params); |
|
unset($params); |
|
|
|
$params['content_type'] = 'text/xml'; |
|
$params['encoding'] = '8bit'; |
|
$params['charset'] = $this->soap_defencoding; |
|
$mimeMessage->addSubpart($soapmsg, $params); |
|
|
|
foreach ($this->requestAttachments as $att) { |
|
unset($params); |
|
|
|
$params['content_type'] = $att['contenttype']; |
|
$params['encoding'] = 'base64'; |
|
$params['disposition'] = 'attachment'; |
|
$params['dfilename'] = $att['filename']; |
|
$params['cid'] = $att['cid']; |
|
|
|
if ($att['data'] == '' && $att['filename'] <> '') { |
|
if ($fd = fopen($att['filename'], 'rb')) { |
|
$data = fread($fd, filesize($att['filename'])); |
|
fclose($fd); |
|
} else { |
|
$data = ''; |
|
} |
|
$mimeMessage->addSubpart($data, $params); |
|
} else { |
|
$mimeMessage->addSubpart($att['data'], $params); |
|
} |
|
} |
|
|
|
$output = $mimeMessage->encode(); |
|
$mimeHeaders = $output['headers']; |
|
|
|
foreach ($mimeHeaders as $k => $v) { |
|
$this->debug("MIME header $k: $v"); |
|
if (strtolower($k) == 'content-type') { |
|
// PHP header() seems to strip leading whitespace starting |
|
// the second line, so force everything to one line |
|
$this->mimeContentType = str_replace("\r\n", " ", $v); |
|
} |
|
} |
|
|
|
return $output['body']; |
|
} |
|
|
|
return parent::getHTTPBody($soapmsg); |
|
} |
|
|
|
/** |
|
* gets the HTTP content type for the current request. |
|
* |
|
* Note: getHTTPBody must be called before this. |
|
* |
|
* @return string the HTTP content type for the current request. |
|
* @access private |
|
*/ |
|
function getHTTPContentType() { |
|
if (count($this->requestAttachments) > 0) { |
|
return $this->mimeContentType; |
|
} |
|
return parent::getHTTPContentType(); |
|
} |
|
|
|
/** |
|
* gets the HTTP content type charset for the current request. |
|
* returns false for non-text content types. |
|
* |
|
* Note: getHTTPBody must be called before this. |
|
* |
|
* @return string the HTTP content type charset for the current request. |
|
* @access private |
|
*/ |
|
function getHTTPContentTypeCharset() { |
|
if (count($this->requestAttachments) > 0) { |
|
return false; |
|
} |
|
return parent::getHTTPContentTypeCharset(); |
|
} |
|
|
|
/** |
|
* processes SOAP message returned from server |
|
* |
|
* @param array $headers The HTTP headers |
|
* @param string $data unprocessed response data from server |
|
* @return mixed value of the message, decoded into a PHP type |
|
* @access private |
|
*/ |
|
function parseResponse($headers, $data) { |
|
$this->debug('Entering parseResponse() for payload of length ' . strlen($data) . ' and type of ' . $headers['content-type']); |
|
$this->responseAttachments = array(); |
|
if (strstr($headers['content-type'], 'multipart/related')) { |
|
$this->debug('Decode multipart/related'); |
|
$input = ''; |
|
foreach ($headers as $k => $v) { |
|
$input .= "$k: $v\r\n"; |
|
} |
|
$params['input'] = $input . "\r\n" . $data; |
|
$params['include_bodies'] = true; |
|
$params['decode_bodies'] = true; |
|
$params['decode_headers'] = true; |
|
|
|
$structure = Mail_mimeDecode::decode($params); |
|
|
|
foreach ($structure->parts as $part) { |
|
if (!isset($part->disposition) && (strstr($part->headers['content-type'], 'text/xml'))) { |
|
$this->debug('Have root part of type ' . $part->headers['content-type']); |
|
$root = $part->body; |
|
$return = parent::parseResponse($part->headers, $part->body); |
|
} else { |
|
$this->debug('Have an attachment of type ' . $part->headers['content-type']); |
|
$info['data'] = $part->body; |
|
$info['filename'] = isset($part->d_parameters['filename']) ? $part->d_parameters['filename'] : ''; |
|
$info['contenttype'] = $part->headers['content-type']; |
|
$info['cid'] = $part->headers['content-id']; |
|
$this->responseAttachments[] = $info; |
|
} |
|
} |
|
|
|
if (isset($return)) { |
|
$this->responseData = $root; |
|
return $return; |
|
} |
|
|
|
$this->setError('No root part found in multipart/related content'); |
|
return ''; |
|
} |
|
$this->debug('Not multipart/related'); |
|
return parent::parseResponse($headers, $data); |
|
} |
|
} |
|
|
|
/* |
|
* For backwards compatiblity, define soapclientmime unless the PHP SOAP extension is loaded. |
|
*/ |
|
if (!extension_loaded('soap')) { |
|
class soapclientmime extends nusoap_client_mime { |
|
} |
|
} |
|
|
|
/** |
|
* nusoap_server_mime server supporting MIME attachments defined at |
|
* http://www.w3.org/TR/SOAP-attachments. It depends on the PEAR Mail_MIME library. |
|
* |
|
* @author Scott Nichol <snichol@users.sourceforge.net> |
|
* @author Thanks to Guillaume and Henning Reich for posting great attachment code to the mail list |
|
* @version $Id: nusoapmime.php,v 1.13 2010/04/26 20:15:08 snichol Exp $ |
|
* @access public |
|
*/ |
|
class nusoap_server_mime extends nusoap_server { |
|
/** |
|
* @var array Each array element in the return is an associative array with keys |
|
* data, filename, contenttype, cid |
|
* @access private |
|
*/ |
|
var $requestAttachments = array(); |
|
/** |
|
* @var array Each array element in the return is an associative array with keys |
|
* data, filename, contenttype, cid |
|
* @access private |
|
*/ |
|
var $responseAttachments; |
|
/** |
|
* @var string |
|
* @access private |
|
*/ |
|
var $mimeContentType; |
|
|
|
/** |
|
* adds a MIME attachment to the current response. |
|
* |
|
* If the $data parameter contains an empty string, this method will read |
|
* the contents of the file named by the $filename parameter. |
|
* |
|
* If the $cid parameter is false, this method will generate the cid. |
|
* |
|
* @param string $data The data of the attachment |
|
* @param string $filename The filename of the attachment (default is empty string) |
|
* @param string $contenttype The MIME Content-Type of the attachment (default is application/octet-stream) |
|
* @param string $cid The content-id (cid) of the attachment (default is false) |
|
* @return string The content-id (cid) of the attachment |
|
* @access public |
|
*/ |
|
function addAttachment($data, $filename = '', $contenttype = 'application/octet-stream', $cid = false) { |
|
if (! $cid) { |
|
$cid = md5(uniqid(time())); |
|
} |
|
|
|
$info['data'] = $data; |
|
$info['filename'] = $filename; |
|
$info['contenttype'] = $contenttype; |
|
$info['cid'] = $cid; |
|
|
|
$this->responseAttachments[] = $info; |
|
|
|
return $cid; |
|
} |
|
|
|
/** |
|
* clears the MIME attachments for the current response. |
|
* |
|
* @access public |
|
*/ |
|
function clearAttachments() { |
|
$this->responseAttachments = array(); |
|
} |
|
|
|
/** |
|
* gets the MIME attachments from the current request. |
|
* |
|
* Each array element in the return is an associative array with keys |
|
* data, filename, contenttype, cid. These keys correspond to the parameters |
|
* for addAttachment. |
|
* |
|
* @return array The attachments. |
|
* @access public |
|
*/ |
|
function getAttachments() { |
|
return $this->requestAttachments; |
|
} |
|
|
|
/** |
|
* gets the HTTP body for the current response. |
|
* |
|
* @param string $soapmsg The SOAP payload |
|
* @return string The HTTP body, which includes the SOAP payload |
|
* @access private |
|
*/ |
|
function getHTTPBody($soapmsg) { |
|
if (count($this->responseAttachments) > 0) { |
|
$params['content_type'] = 'multipart/related; type="text/xml"'; |
|
$mimeMessage = new Mail_mimePart('', $params); |
|
unset($params); |
|
|
|
$params['content_type'] = 'text/xml'; |
|
$params['encoding'] = '8bit'; |
|
$params['charset'] = $this->soap_defencoding; |
|
$mimeMessage->addSubpart($soapmsg, $params); |
|
|
|
foreach ($this->responseAttachments as $att) { |
|
unset($params); |
|
|
|
$params['content_type'] = $att['contenttype']; |
|
$params['encoding'] = 'base64'; |
|
$params['disposition'] = 'attachment'; |
|
$params['dfilename'] = $att['filename']; |
|
$params['cid'] = $att['cid']; |
|
|
|
if ($att['data'] == '' && $att['filename'] <> '') { |
|
if ($fd = fopen($att['filename'], 'rb')) { |
|
$data = fread($fd, filesize($att['filename'])); |
|
fclose($fd); |
|
} else { |
|
$data = ''; |
|
} |
|
$mimeMessage->addSubpart($data, $params); |
|
} else { |
|
$mimeMessage->addSubpart($att['data'], $params); |
|
} |
|
} |
|
|
|
$output = $mimeMessage->encode(); |
|
$mimeHeaders = $output['headers']; |
|
|
|
foreach ($mimeHeaders as $k => $v) { |
|
$this->debug("MIME header $k: $v"); |
|
if (strtolower($k) == 'content-type') { |
|
// PHP header() seems to strip leading whitespace starting |
|
// the second line, so force everything to one line |
|
$this->mimeContentType = str_replace("\r\n", " ", $v); |
|
} |
|
} |
|
|
|
return $output['body']; |
|
} |
|
|
|
return parent::getHTTPBody($soapmsg); |
|
} |
|
|
|
/** |
|
* gets the HTTP content type for the current response. |
|
* |
|
* Note: getHTTPBody must be called before this. |
|
* |
|
* @return string the HTTP content type for the current response. |
|
* @access private |
|
*/ |
|
function getHTTPContentType() { |
|
if (count($this->responseAttachments) > 0) { |
|
return $this->mimeContentType; |
|
} |
|
return parent::getHTTPContentType(); |
|
} |
|
|
|
/** |
|
* gets the HTTP content type charset for the current response. |
|
* returns false for non-text content types. |
|
* |
|
* Note: getHTTPBody must be called before this. |
|
* |
|
* @return string the HTTP content type charset for the current response. |
|
* @access private |
|
*/ |
|
function getHTTPContentTypeCharset() { |
|
if (count($this->responseAttachments) > 0) { |
|
return false; |
|
} |
|
return parent::getHTTPContentTypeCharset(); |
|
} |
|
|
|
/** |
|
* processes SOAP message received from client |
|
* |
|
* @param array $headers The HTTP headers |
|
* @param string $data unprocessed request data from client |
|
* @return mixed value of the message, decoded into a PHP type |
|
* @access private |
|
*/ |
|
function parseRequest($headers, $data) { |
|
$this->debug('Entering parseRequest() for payload of length ' . strlen($data) . ' and type of ' . $headers['content-type']); |
|
$this->requestAttachments = array(); |
|
if (strstr($headers['content-type'], 'multipart/related')) { |
|
$this->debug('Decode multipart/related'); |
|
$input = ''; |
|
foreach ($headers as $k => $v) { |
|
$input .= "$k: $v\r\n"; |
|
} |
|
$params['input'] = $input . "\r\n" . $data; |
|
$params['include_bodies'] = true; |
|
$params['decode_bodies'] = true; |
|
$params['decode_headers'] = true; |
|
|
|
$structure = Mail_mimeDecode::decode($params); |
|
|
|
foreach ($structure->parts as $part) { |
|
if (!isset($part->disposition) && (strstr($part->headers['content-type'], 'text/xml'))) { |
|
$this->debug('Have root part of type ' . $part->headers['content-type']); |
|
$return = parent::parseRequest($part->headers, $part->body); |
|
} else { |
|
$this->debug('Have an attachment of type ' . $part->headers['content-type']); |
|
$info['data'] = $part->body; |
|
$info['filename'] = isset($part->d_parameters['filename']) ? $part->d_parameters['filename'] : ''; |
|
$info['contenttype'] = $part->headers['content-type']; |
|
$info['cid'] = $part->headers['content-id']; |
|
$this->requestAttachments[] = $info; |
|
} |
|
} |
|
|
|
if (isset($return)) { |
|
return $return; |
|
} |
|
|
|
$this->setError('No root part found in multipart/related content'); |
|
return; |
|
} |
|
$this->debug('Not multipart/related'); |
|
return parent::parseRequest($headers, $data); |
|
} |
|
} |
|
|
|
/* |
|
* For backwards compatiblity |
|
*/ |
|
class nusoapservermime extends nusoap_server_mime { |
|
} |
|
|
|
?>
|
|
|