extern/egroupware_official
1
0
Fork 0
mirror of https://github.com/EGroupware/egroupware.git synced 2025-01-21 05:19:07 +01:00
Code Issues Packages Projects Releases Wiki Activity

support dparameters (structure part 8) for images while parsing the message body structure

Browse Source
This commit is contained in:
Klaus Leithoff 2011-07-21 14:56:45 +00:00
parent 204d961150
commit 6c4d5dfc48
1 changed files with 23 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
egw-pear/Net/IMAP.php
View File

@ -414,15 +414,16 @@ class Net_IMAP extends Net_IMAPProtocol {
}
#return $ret;
}
# this seems to be obsolet, since errors while retrieving header informations are 'covered' above
#if(strtoupper($ret["RESPONSE"]["CODE"]) != "OK"){
# error_log("egw-pear::NET::IMAP:getSummary->ResponseCode not OK");
# return new PEAR_Error($ret["RESPONSE"]["CODE"] . ", " . $ret["RESPONSE"]["STR_CODE"]);
#}
// this seems to be obsolet, since errors while retrieving header informations are 'covered' above
if(strtoupper($ret["RESPONSE"]["CODE"]) != "OK")
{
error_log("egw-pear::NET::IMAP:getSummary->ResponseCode not OK");
return new PEAR_Error($ret["RESPONSE"]["CODE"] . ", " . $ret["RESPONSE"]["STR_CODE"]);
}
#print "<hr>";
#error_log("egw-pear::NET::IMAP:getSummary->".print_r($ret["PARSED"],TRUE));
#print "<hr>";
//print "<hr>";
//if (PEAR::isError($ret)) error_log("egw-pear::NET::IMAP:getSummary->".print_r($ret->message,TRUE));
//print "<hr>";
if(isset( $ret["PARSED"] ) ){
for($i=0; $i<count($ret["PARSED"]) ; $i++){
if ($ret["PARSED"][$i]['COMMAND'] != 'FETCH') continue;
@ -709,6 +710,19 @@ class Net_IMAP extends Net_IMAPProtocol {
$part = $this->_parseStructureCommonFields($_structure);
$part->cid = $_structure[3];
$part->partID = $_partID;
// there may be a part 8 for images too, ...
if(is_array($_structure[8])) {
if(isset($_structure[8][0]) && $_structure[8][0] != 'NIL') {
$part->disposition = strtoupper($_structure[8][0]);
}
if(is_array($_structure[8][1])) {
foreach($_structure[8][1] as $key => $value) {
if($key%2 == 0) {
$part->dparameters[trim(strtoupper($_structure[8][1][$key]))] = $_structure[8][1][$key+1];
}
}
}
}
$_mimeParts[$_partID] = $part;
}