Context Navigation

source: branches/2.1/expressoMail1_2/inc/class.imap_functions.inc.php @ 2232

Revision 2232, 137.4 KB checked in by niltonneto, 14 years ago (diff)
Ticket #934 - Corrigido problema gerado por include, quando display_errors = on
Property svn:eol-style set to `native` Property svn:executable set to ``*

Rev	Line
[2]	1	<?php
[1040]	2
[2]	3	include_once("class.functions.inc.php");
	4	include_once("class.ldap_functions.inc.php");
[91]	5	include_once("class.exporteml.inc.php");
	6
[2]	7	class imap_functions
	8	{
	9	var $public_functions = array
[1472]	10	(
[2]	11	'get_range_msgs' => True,
	12	'get_info_msg' => True,
[689]	13	'get_info_msgs' => True,
[615]	14	'get_folders_list' => True,
[1518]	15	'import_msgs' => True,
	16	'msgs_to_archive' => True
[2]	17	);
	18
	19	var $ldap;
	20	var $mbox;
	21	var $imap_port;
	22	var $has_cid;
	23	var $imap_options = '';
	24	var $functions;
[650]	25	var $foldersLimit;
[1912]	26	var $imap_sentfolder;
[2]	27
	28	function imap_functions (){
[650]	29	$this->foldersLimit = 200; //Limit of folders (mailboxes) user can see
[2]	30	$this->username = $_SESSION['phpgw_info']['expressomail']['user']['userid'];
	31	$this->password = $_SESSION['phpgw_info']['expressomail']['user']['passwd'];
	32	$this->imap_server = $_SESSION['phpgw_info']['expressomail']['email_server']['imapServer'];
	33	$this->imap_port = $_SESSION['phpgw_info']['expressomail']['email_server']['imapPort'];
	34	$this->imap_delimiter = $_SESSION['phpgw_info']['expressomail']['email_server']['imapDelimiter'];
[1472]	35	$this->functions = new functions();
[1912]	36	$this->imap_sentfolder = $_SESSION['phpgw_info']['expressomail']['email_server']['imapDefaultSentFolder'] ? $_SESSION['phpgw_info']['expressomail']['email_server']['imapDefaultSentFolder'] : str_replace("*","", $this->functions->getLang("Sent"));
[2]	37	$this->has_cid = false;
[1472]	38
[2]	39	if ($_SESSION['phpgw_info']['expressomail']['email_server']['imapTLSEncryption'] == 'yes')
	40	{
	41	$this->imap_options = '/tls/novalidate-cert';
	42	}
	43	else
	44	{
	45	$this->imap_options = '/notls/novalidate-cert';
	46	}
	47	}
	48	// BEGIN of functions.
	49	function open_mbox($folder = False)
	50	{
[828]	51	if (is_resource($this->mbox))
	52	return $this->mbox;
[51]	53	$folder = mb_convert_encoding($folder, "UTF7-IMAP","ISO_8859-1");
[504]	54	$this->mbox = @imap_open("{".$this->imap_server.":".$this->imap_port.$this->imap_options."}".$folder, $this->username, $this->password) or die(serialize(array('imap_error' => $this->parse_error(imap_last_error()))));
[2]	55	return $this->mbox;
	56	}
	57
[504]	58	function parse_error($error){
	59	// This error is returned from Imap.
	60	if(strstr($error,'Connection refused')) {
	61	return str_replace("%1", $this->functions->getLang("Mail"), $this->functions->getLang("Connection failed with %1 Server. Try later."));
	62	}
	63	// This error is returned from Postfix.
	64	elseif(strstr($error,'message file too big')) {
[1264]	65	return str_replace("%1",$_SESSION['phpgw_info']['user']['preferences']['expressoMail']['max_attachment_size'],$this->functions->getLang('The size of this message has exceeded the limit (%1B).'));
[504]	66	}
[628]	67	elseif(strstr($error,'virus')) {
	68	return str_replace("%1", $this->functions->getLang("Mail"), $this->functions->getLang("Your message was rejected by antivirus. Perhaps your attachment has been infected."));
	69	}
[504]	70	// This condition verifies if SESSION is expired.
[1472]	71	elseif(!count($_SESSION))
[504]	72	return "nosession";
	73
	74	return $error;
	75	}
[1472]	76
[2]	77	function get_range_msgs2($params)
	78	{
[53]	79	$folder = $params['folder'];
[2]	80	$msg_range_begin = $params['msg_range_begin'];
	81	$msg_range_end = $params['msg_range_end'];
[1472]	82	$sort_box_type = $params['sort_box_type'];
[53]	83	$sort_box_reverse = $params['sort_box_reverse'];
[51]	84	$search_box_type = $params['search_box_type'] != "ALL" && $params['search_box_type'] != "" ? $params['search_box_type'] : false;
[828]	85	$sort_array_msg = $this-> get_msgs($folder, $sort_box_type, $search_box_type, $sort_box_reverse,$msg_range_begin,$msg_range_end);
[1472]	86
[2]	87	$return = array();
	88	$i = 0;
[828]	89	$num_msgs = imap_num_msg($this->mbox);
	90	if(is_array($sort_array_msg)){
[1472]	91	foreach($sort_array_msg as $msg_number => $value)
[689]	92	{
	93	$temp = $this->get_info_head_msg($msg_number);
[1940]	94	$temp['msg_sample'] = $this->get_msg_sample($msg_number);
[689]	95	if(!$temp)
[1752]	96	{
[689]	97	return false;
[1752]	98	}
[828]	99
[689]	100	$return[$i] = $temp;
	101	$i++;
	102	}
	103	}
[828]	104	$return['num_msgs'] = $num_msgs;
	105
[689]	106	return $return;
	107	}
[828]	108
[689]	109	function get_info_head_msg($msg_number) {
	110	$head_array = array();
	111	include_once("class.imap_attachment.inc.php");
	112	$imap_attachment = new imap_attachment();
[828]	113
[830]	114
	115
[1472]	116	/*Como eu preciso do atributo Importance para saber se o email é
[828]	117	* importante ou não, uso abaixo a função imap_fetchheader e busco
	118	* o atributo importance nela. Isso faz com que eu acesse o cabeçalho
	119	* duas vezes e de duas formas diferentes, mas em contrapartida, eu
	120	* não preciso reimplementar o método utilizando o fetchheader.
	121	* Como as mensagens são renderizadas em um número pequeno por vez,
	122	* não parece ter perda considerável de performance.
	123	*/
[1174]	124
	125	$tempHeader = imap_fetchheader($this->mbox, imap_msgno($this->mbox, $msg_number));
	126	$flag = preg_match('/importance : (.*)\r/i', $tempHeader, $importance);
	127
	128	// Reimplemenatado código para identificação dos e-mails assinados e cifrados
	129	// no método getMessageType(). Mário César Kolling <mario.kolling@serpro.gov.br>
	130	$head_array['ContentType'] = $this->getMessageType($msg_number, $tempHeader);
[689]	131	$head_array['Importance'] = $flag==0?"Normal":$importance[1];
	132
[828]	133
[689]	134	$header = $this->get_header($msg_number);
[828]	135	if (!is_object($header))
	136	return false;
[689]	137	$head_array['Recent'] = $header->Recent;
	138	$head_array['Unseen'] = $header->Unseen;
	139	if($header->Answered =='A' && $header->Draft == 'X'){
	140	$head_array['Forwarded'] = 'F';
[2]	141	}
[689]	142	else {
	143	$head_array['Answered'] = $header->Answered;
[828]	144	$head_array['Draft'] = $header->Draft;
[46]	145	}
[689]	146	$head_array['Deleted'] = $header->Deleted;
	147	$head_array['Flagged'] = $header->Flagged;
[828]	148
[689]	149	$head_array['msg_number'] = $msg_number;
[828]	150	//$head_array['msg_folder'] = $folder;
	151
[693]	152	$date_msg = gmdate("d/m/Y",$header->udate);
[872]	153	if ( date("d/m/Y") == $date_msg)
[693]	154	$head_array['udate'] = gmdate("H:i",$header->udate);
[689]	155	else
[872]	156	{
[689]	157	$head_array['udate'] = $date_msg;
[872]	158	if ( date("d/m/Y", time() - 86400) == gmdate("d/m/Y",$header->udate) )
	159	$head_array['udate'] = $this -> functions -> getLang( 'Yesterday' );
	160	if ( date("d/m/Y", time() - 172800) == gmdate("d/m/Y",$header->udate) )
	161	$head_array['udate'] = $this -> functions -> getLang( gmdate("l",$header->udate) );
	162	if ( date("d/m/Y", time() - 259200) == gmdate("d/m/Y",$header->udate) )
	163	$head_array['udate'] = $this -> functions -> getLang( gmdate("l",$header->udate) );
	164	}
[828]	165
[689]	166	$head_array['aux_date'] = $date_msg; //Auxiliar apenas para mensagens locais.
[828]	167
[689]	168	$from = $header->from;
	169	$head_array['from'] = array();
[1740]	170	$head_array['from']['name'] = ( isset( $from[0]->personal ) ) ? $this->decode_string($from[0]->personal) : NULL;
[689]	171	$head_array['from']['email'] = $this->decode_string($from[0]->mailbox) . "@" . $from[0]->host;
	172	if(!$head_array['from']['name'])
	173	$head_array['from']['name'] = $head_array['from']['email'];
	174	$to = $header->to;
	175	$head_array['to'] = array();
[1740]	176	$tmp = ( isset( $to[0]->personal ) ) ? imap_mime_header_decode($to[0]->personal) : NULL;
	177	$head_array['to']['name'] = ( isset( $tmp[0]->text ) ) ? $this->decode_string($this->decode_string($tmp[0]->text)) : NULL;
	178	$head_array['to']['email'] = ( isset( $to[0]->mailbox ) ) ? ( $this->decode_string($to[0]->mailbox) . "@" . ( ( isset( $to[0]->host ) ) ? $to[0]->host : '' ) ) : NULL;
[689]	179	if(!$head_array['to']['name'])
	180	$head_array['to']['name'] = $head_array['to']['email'];
[1751]	181	$head_array['subject'] = ( isset( $header->fetchsubject ) ) ? $this->decode_string($header->fetchsubject) : '';
[828]	182
[689]	183	$head_array['Size'] = $header->Size;
[828]	184
[689]	185	$head_array['attachment'] = array();
	186	$head_array['attachment'] = $imap_attachment->get_attachment_headerinfo($this->mbox, $msg_number);
[828]	187
[689]	188	return $head_array;
[2]	189	}
[828]	190
[2]	191	function decode_string($string)
[1472]	192	{
	193
[2]	194	if ((strpos(strtolower($string), '=?iso-8859-1') !== false) \|\| (strpos(strtolower($string), '=?windows-1252') !== false))
	195	{
[1740]	196	$return = '';
[2]	197	$tmp = imap_mime_header_decode($string);
	198	foreach ($tmp as $tmp1)
	199	$return .= $this->htmlspecialchars_encode($tmp1->text);
[1472]	200
[2]	201	return $return;
	202	}
	203	else if (strpos(strtolower($string), '=?utf-8') !== false)
	204	{
[1401]	205	$elements = imap_mime_header_decode($string);
	206
	207	for($i = 0;$i < count($elements);$i++)
	208	{
[1384]	209	$charset = strtolower($elements[$i]->charset);
[1401]	210	$text = $elements[$i]->text;
	211
	212	if(!strcasecmp($charset, "utf-8") \|\| !strcasecmp($charset, "utf-7"))
	213	{
[1384]	214	$decoded .= $this->functions->utf8_to_ncr($text);
	215	}
	216	else
[1401]	217	{
	218	if( strcasecmp($charset,"default") )
	219	$decoded .= $this->htmlspecialchars_encode(iconv($charset, "iso-8859-1", $text));
	220	else
	221	$decoded .= $this->htmlspecialchars_encode($text);
	222	}
[1384]	223	}
[2]	224	return $decoded;
	225	}
	226	else
	227	return $this->htmlspecialchars_encode($string);
	228	}
[615]	229	/**
	230	* Função que importa arquivos .eml exportados pelo expresso para a caixa do usuário. Testado apenas
	231	* com .emls gerados pelo expresso, e o arquivo pode ser um zip contendo vários emls ou um .eml.
	232	*/
[660]	233	function import_msgs($params) {
[1000]	234	if(!$this->mbox)
[660]	235	$this->mbox = $this->open_mbox();
[1472]	236
[1365]	237	if( preg_match('/local_/',$params["folder"]) )
[1000]	238	{
[1366]	239	// PLEASE, BE CAREFULL!!! YOU SHOULD USE EMAIL CONFIGURATION VALUES (EMAILADMIN MODULE)
[1367]	240	$tmp_box = mb_convert_encoding('INBOX'.$this->imap_delimiter.$_SESSION['phpgw_info']['expressomail']['email_server']['imapDefaultTrashFolder'].$this->imap_delimiter.'tmpMoveToLocal', "UTF7-IMAP", "UTF-8");
[1000]	241	if ( ! imap_createmailbox( $this -> mbox,"{".$this -> imap_server."}$tmp_box" ) )
	242	return $this->functions->getLang( 'Import to Local : fail...' );
	243	imap_reopen($this->mbox, "{".$this->imap_server.":".$this->imap_port.$this->imap_options."}".$tmp_box);
	244	$params["folder"] = $tmp_box;
	245	}
[615]	246	$errors = array();
	247	$invalid_format = false;
[1472]	248	$filename = $params['FILES'][0]['name'];
[1365]	249	$params["folder"] = mb_convert_encoding($params["folder"], "UTF7-IMAP","ISO_8859-1");
[660]	250	$quota = imap_get_quotaroot($this->mbox, $params["folder"]);
	251	if((($quota['limit'] - $quota['usage'])*1024) <= $params['FILES'][0]['size']){
	252	return array( 'error' => $this->functions->getLang("fail in import:").
[1000]	253	" ".$this->functions->getLang("Over quota"));
[660]	254	}
[615]	255	if(substr($filename,strlen($filename)-4)==".zip") {
[660]	256	$zip = zip_open($params['FILES'][0]['tmp_name']);
[615]	257
	258	if ($zip) {
	259	while ($zip_entry = zip_read($zip)) {
[1000]	260
[615]	261	if (zip_entry_open($zip, $zip_entry, "r")) {
	262	$email = zip_entry_read($zip_entry, zip_entry_filesize($zip_entry));
	263	$status = @imap_append($this->mbox,
[660]	264	"{".$this->imap_server.":".$this->imap_port.$this->imap_options."}".$params["folder"],
[615]	265	$email
	266	);
	267	if(!$status)
	268	array_push($errors,zip_entry_name($zip_entry));
	269	zip_entry_close($zip_entry);
	270	}
	271	}
[660]	272	zip_close($zip);
[615]	273	}
[1000]	274
	275	if ( isset( $tmp_box ) && ! sizeof( $errors ) )
	276	{
	277
	278	$mc = imap_check($this->mbox);
	279
	280	$result = imap_fetch_overview( $this -> mbox, "1:{$mc -> Nmsgs}", 0 );
	281
	282	$ids = array( );
	283	foreach ($result as $overview)
	284	$ids[ ] = $overview -> uid;
	285
	286	return implode( ',', $ids );
[830]	287	}
[1000]	288	}
[615]	289	else if(substr($filename,strlen($filename)-4)==".eml") {
[660]	290	$email = implode("",file($params['FILES'][0]['tmp_name']));
[615]	291	$status = @imap_append($this->mbox,
[660]	292	"{".$this->imap_server.":".$this->imap_port.$this->imap_options."}".$params["folder"],
[615]	293	$email
	294	);
[660]	295	if(!$status){
[615]	296	array_push($errors,zip_entry_name($zip_entry));
[660]	297	zip_entry_close($zip_entry);
	298	}
[615]	299	}
[1000]	300	else
[615]	301	{
[1000]	302	if ( isset( $tmp_box ) )
	303	imap_deletemailbox( $this->mbox,"{".$this -> imap_server."}$tmp_box" );
	304
[660]	305	return array("error" => $this->functions->getLang("wrong file format"));
[615]	306	$invalid_format = true;
	307	}
[1000]	308
[615]	309	if(!$invalid_format) {
	310	if(count($errors)>0) {
[660]	311	$message = $this->functions->getLang("fail in import:")."\n";
[615]	312	foreach($errors as $arquivo) {
	313	$message.=$arquivo."\n";
	314	}
[660]	315	return array("error" => $message);
[615]	316	}
	317	else
[1000]	318	return $this->functions->getLang("The import was executed successfully.");
[615]	319	}
[1000]	320	}
	321	/*
[613]	322	Remove os anexos de uma mensagem. A estratégia para isso é criar uma mensagem nova sem os anexos, mantendo apenas
	323	a primeira parte do e-mail, que é o texto, sem anexos.
	324	O método considera que o email é multpart.
	325	*/
	326	function remove_attachments($params) {
	327	include_once("class.message_components.inc.php");
	328	if(!$this->mbox \|\| !is_resource($this->mbox))
	329	$this->mbox = $this->open_mbox($params["folder"]);
	330	$return["status"] = true;
	331	$header = "";
[1472]	332
[613]	333	$headertemp = explode("\n",imap_fetchheader($this->mbox, imap_msgno($this->mbox, $params["msg_num"])));
	334	foreach($headertemp as $head) {//Se eu colocar todo o header do email dá pau no append, então procuro apenas o que interessa.
	335	$head1 = explode(":",$head);
[1472]	336	if ( (strtoupper($head1[0]) == "TO") \|\|
	337	(strtoupper($head1[0]) == "FROM") \|\|
[1319]	338	(strtoupper($head1[0]) == "SUBJECT") \|\|
	339	(strtoupper($head1[0]) == "DATE") )
[613]	340	$header .= $head."\r\n";
	341	}
[1472]	342
[613]	343	$msg = &new message_components($this->mbox);
[1472]	344	$msg->fetch_structure($params["msg_num"]);/* O fetchbody tava trazendo o email com problemas na acentuação.
	345	Então uso essa classe para verificar a codificação e o charset,
[613]	346	para que o método decodeBody do expresso possa trazer tudo certinho*/
[1472]	347
[1319]	348	$status = imap_append($this->mbox,
[613]	349	"{".$this->imap_server.":".$this->imap_port.$this->imap_options."}".$params["folder"],
	350	$header.
	351	"\r\n".
	352	str_replace("\n","\r\n",$this->decodeBody(
	353	imap_fetchbody($this->mbox,imap_msgno($this->mbox, $params["msg_num"]),"1"),
	354	$msg->encoding[$params["msg_num"]][0], $msg->charset[$params["msg_num"]][0]
[1472]	355	)
[1319]	356	), "\\Seen"); //Append do novo email, só com header e conteúdo sem anexos.
[1472]	357
[1319]	358	if(!$status)
	359	{
[613]	360	$return["status"] = false;
	361	$return["msg"] = lang("error appending mail on delete attachments");
	362	}
[1319]	363	else
	364	{
	365	$status = imap_status($this->mbox, "{".$this->imap_server.":".$this->imap_port."}".$params['folder'], SA_UIDNEXT);
[1472]	366	$return['msg_no'] = $status->uidnext - 1;
[1319]	367	imap_delete($this->mbox, imap_msgno($this->mbox, $params["msg_num"]));
	368	imap_expunge($this->mbox);
	369	}
[1472]	370
[613]	371	return $return;
[1472]	372
[613]	373	}
[1518]	374
	375	function msgs_to_archive($params) {
	376
	377	$folder = $params['folder'];
[1931]	378	$all_ids = $this-> get_msgs($folder, 'SORTARRIVAL', false, 0,-1,-1);
[613]	379
[1518]	380	$messages_not_to_copy = explode(",",$params['mails']);
	381	$ids = array();
	382
[1931]	383	$cont = 0;
	384
[1518]	385	foreach($all_ids as $each_id=>$value) {
[1931]	386	if(!in_array($each_id,$messages_not_to_copy)) {
[1518]	387	array_push($ids,$each_id);
[1931]	388	$cont++;
	389	}
	390	if($cont>=100)
	391	break;
[1518]	392	}
	393
	394	if (empty($ids))
	395	return array();
	396
	397	$params = array("folder"=>$folder,"msgs_number"=>implode(",",$ids));
	398
	399
	400	return $this->get_info_msgs($params);
	401
	402
	403	}
	404
[689]	405	/**
[1472]	406	*
	407	* @return
[689]	408	* @param $params Object
	409	*/
	410	function get_info_msgs($params) {
	411	include_once("class.exporteml.inc.php");
	412	$return = array();
	413	$new_params = array();
	414	$attach_params = array();
	415	$new_params["msg_folder"]=$params["folder"];
	416	$attach_params["folder"] = $params["folder"];
	417	$msgs = explode(",",$params["msgs_number"]);
	418	$exporteml = new ExportEml();
[1382]	419	$unseen_msgs = array();
[689]	420	foreach($msgs as $msg_number) {
	421	$new_params["msg_number"] = $msg_number;
	422	//ini_set("display_errors","1");
	423	$msg_info = $this->get_info_msg($new_params);
	424
	425	$this->mbox = $this->open_mbox($params['folder']); //Não sei porque, mas se não abrir de novo a caixa dá erro.
	426	$msg_info['header'] = $this->get_info_head_msg($msg_number);
	427
	428	$attach_params["num_msg"] = $msg_number;
	429	$msg_info['array_attach'] = $exporteml->get_attachments_in_array($attach_params);
	430	$msg_info['url_export_file'] = $exporteml->export_to_archive($msg_number,$params["folder"]);
	431	imap_close($this->mbox);
	432	$this->mbox=false;
	433	array_push($return,serialize($msg_info));
[1472]	434
[1388]	435	if($msg_info['Unseen'] == "U" \|\| $msg_info['Recent'] == "N"){
[1472]	436	array_push($unseen_msgs,$msg_number);
	437	}
	438	}
[1382]	439	if($unseen_msgs){
	440	$msgs_list = implode(",",$unseen_msgs);
	441	$array_msgs = array('folder' => $new_params["msg_folder"], "msgs_to_set" => $msgs_list, "flag" => "unseen");
[1472]	442	$this->set_messages_flag($array_msgs);
[689]	443	}
[1472]	444
[689]	445	return $return;
	446	}
	447
[2]	448	function get_info_msg($params)
	449	{
[51]	450	$return = array();
[2]	451	$msg_number = $params['msg_number'];
[2101]	452	if(@preg_match('(.+)(_[a-zA-Z0-9]+)',$msg_number,$matches)) { //Verifies if it comes from a tab diferent of the main one.
[1970]	453	$msg_number = $matches[1];
	454	$plus_id = $matches[2];
	455	}
	456	else {
	457	$plus_id = '';
	458	}
[1724]	459	$msg_folder = urldecode($params['msg_folder']);
[1472]	460
[411]	461	if(!$this->mbox \|\| !is_resource($this->mbox))
[1472]	462	$this->mbox = $this->open_mbox($msg_folder);
	463
[535]	464	$header = $this->get_header($msg_number);
[205]	465	if (!$header) {
[1472]	466	$return['status_get_msg_info'] = "false";
[205]	467	return $return;
	468	}
[1472]	469
[828]	470	$header_ = imap_fetchheader($this->mbox, $msg_number, FT_UID);
	471
[51]	472	$return_get_body = $this->get_body_msg($msg_number, $msg_folder);
[1707]	473
	474	$body = $return_get_body['body'];
[1527]	475	//Remoção de tags <span></span> para correção de erro no firefox
[2215]	476	$body = mb_eregi_replace("<span><span>","",$body);
	477	$body = mb_eregi_replace("</span></span>","",$body);
[1808]	478
[1035]	479	if($return_get_body['body']=='isCripted'){
	480	$exporteml = new ExportEml();
	481	$return['source']=$exporteml->export_msg_data($msg_number,$msg_folder);
	482	$return['body'] = "";
	483	$return['attachments'] = "";
	484	$return['thumbs'] = "";
	485	$return['signature'] = "";
	486	//return $return;
	487	}else{
	488	$return['body'] = $body;
	489	$return['attachments'] = $return_get_body['attachments'];
	490	$return['thumbs'] = $return_get_body['thumbs'];
	491	$return['signature'] = $return_get_body['signature'];
[1707]	492	}
	493
[828]	494	$pattern = '/^[ \t]Disposition-Notification-To(^:):(.+)@(.+)$/isUm';
	495	if (preg_match($pattern, $header_, $fields))
	496	{
	497	preg_match('/[[:alnum:]\._\-]+@[[:alnum:]_\-\.]+/',$fields[0], $matches);
	498	$return['DispositionNotificationTo'] = "<".$matches[0].">";
[2]	499	}
[828]	500
[2]	501	$return['Recent'] = $header->Recent;
	502	$return['Unseen'] = $header->Unseen;
[1472]	503	$return['Deleted'] = $header->Deleted;
[2]	504	$return['Flagged'] = $header->Flagged;
	505
	506	if($header->Answered =='A' && $header->Draft == 'X'){
	507	$return['Forwarded'] = 'F';
	508	}
[1472]	509
[2]	510	else {
	511	$return['Answered'] = $header->Answered;
[1472]	512	$return['Draft'] = $header->Draft;
[2]	513	}
	514
[1970]	515	$return['msg_number'] = $msg_number.$plus_id;
[2]	516	$return['msg_folder'] = $msg_folder;
[1472]	517
[535]	518	$date_msg = gmdate("d/m/Y",$header->udate);
[2]	519	if (date("d/m/Y") == $date_msg)
[535]	520	$return['udate'] = gmdate("H:i",$header->udate);
[2]	521	else
	522	$return['udate'] = $date_msg;
[1472]	523
	524	$return['msg_day'] = $date_msg;
[535]	525	$return['msg_hour'] = gmdate("H:i",$header->udate);
[1472]	526
[2]	527	if (date("d/m/Y") == $date_msg) //no dia
	528	{
[535]	529	$return['fulldate'] = gmdate("d/m/Y H:i",$header->udate);
	530	$return['smalldate'] = gmdate("H:i",$header->udate);
[605]	531
[1472]	532	$timestamp_now = strtotime("now");
[605]	533	$timestamp_msg_time = $header->udate;
[1472]	534	// $timestamp_now is GMT and $timestamp_msg_time is MailDate TZ.
[535]	535	// The variable $timestamp_diff is calculated without MailDate TZ.
	536	$pdate = date_parse($header->MailDate);
	537	$timestamp_diff = $timestamp_now - $timestamp_msg_time + ($pdate['zone']*(-60));
[1472]	538
[2]	539	if (gmdate("H",$timestamp_diff) > 0)
	540	{
[197]	541	$return['fulldate'] .= " (" . gmdate("H:i", $timestamp_diff) . ' ' . $this->functions->getLang('hours ago') . ')';
[2]	542	}
	543	else
	544	{
	545	if (gmdate("i",$timestamp_diff) == 0){
[197]	546	$return['fulldate'] .= ' ('. $this->functions->getLang('now').')';
[2]	547	}
	548	elseif (gmdate("i",$timestamp_diff) == 1){
[197]	549	$return['fulldate'] .= ' (1 '. $this->functions->getLang('minute ago').')';
[2]	550	}
	551	else{
[197]	552	$return['fulldate'] .= " (" . gmdate("i",$timestamp_diff) .' '. $this->functions->getLang('minutes ago') . ')';
[2]	553	}
	554	}
	555	}
	556	else{
[535]	557	$return['fulldate'] = gmdate("d/m/Y H:i",$header->udate);
	558	$return['smalldate'] = gmdate("d/m/Y",$header->udate);
[2]	559	}
[1472]	560
[2]	561	$from = $header->from;
	562	$return['from'] = array();
[1384]	563	$return['from']['name'] = $this->decode_string($from[0]->personal);
[2]	564	$return['from']['email'] = $this->decode_string($from[0]->mailbox . "@" . $from[0]->host);
	565	if ($return['from']['name'])
	566	{
	567	if (substr($return['from']['name'], 0, 1) == '"')
	568	$return['from']['full'] = $return['from']['name'] . ' ' . '<' . $return['from']['email'] . '>';
	569	else
	570	$return['from']['full'] = '"' . $return['from']['name'] . '" ' . '<' . $return['from']['email'] . '>';
	571	}
	572	else
	573	$return['from']['full'] = $return['from']['email'];
[1472]	574
[2]	575	// Sender attribute
	576	$sender = $header->sender;
[1472]	577	$return['sender'] = array();
[1384]	578	$return['sender']['name'] = $this->decode_string($sender[0]->personal);
[2]	579	$return['sender']['email'] = $this->decode_string($sender[0]->mailbox . "@" . $sender[0]->host);
	580	if ($return['sender']['name'])
	581	{
	582	if (substr($return['sender']['name'], 0, 1) == '"')
	583	$return['sender']['full'] = $return['sender']['name'] . ' ' . '<' . $return['sender']['email'] . '>';
	584	else
	585	$return['sender']['full'] = '"' . $return['sender']['name'] . '" ' . '<' . $return['sender']['email'] . '>';
	586	}
	587	else
	588	$return['sender']['full'] = $return['sender']['email'];
	589
	590	if($return['from']['full'] == $return['sender']['full'])
	591	$return['sender'] = null;
	592	$to = $header->to;
	593	$return['toaddress2'] = "";
	594	if (!empty($to))
	595	{
	596	foreach ($to as $tmp)
	597	{
	598	if (!empty($tmp->personal))
	599	{
	600	$personal_tmp = imap_mime_header_decode($tmp->personal);
	601	$return['toaddress2'] .= '"' . $personal_tmp[0]->text . '"';
	602	$return['toaddress2'] .= " ";
	603	$return['toaddress2'] .= "<";
[320]	604	if ($tmp->host != 'unspecified-domain')
	605	$return['toaddress2'] .= $tmp->mailbox . "@" . $tmp->host;
	606	else
	607	$return['toaddress2'] .= $tmp->mailbox;
[2]	608	$return['toaddress2'] .= ">";
	609	$return['toaddress2'] .= ", ";
	610	}
	611	else
	612	{
[320]	613	if ($tmp->host != 'unspecified-domain')
	614	$return['toaddress2'] .= $tmp->mailbox . "@" . $tmp->host;
	615	else
	616	$return['toaddress2'] .= $tmp->mailbox;
[2]	617	$return['toaddress2'] .= ", ";
	618	}
	619	}
	620	$return['toaddress2'] = $this->del_last_two_caracters($return['toaddress2']);
	621	}
	622	else
	623	{
	624	$return['toaddress2'] = "<Empty>";
[1472]	625	}
	626
[2]	627	$cc = $header->cc;
	628	$return['cc'] = "";
	629	if (!empty($cc))
	630	{
	631	foreach ($cc as $tmp_cc)
	632	{
	633	if (!empty($tmp_cc->personal))
	634	{
	635	$personal_tmp_cc = imap_mime_header_decode($tmp_cc->personal);
	636	$return['cc'] .= '"' . $personal_tmp_cc[0]->text . '"';
	637	$return['cc'] .= " ";
	638	$return['cc'] .= "<";
	639	$return['cc'] .= $tmp_cc->mailbox . "@" . $tmp_cc->host;
	640	$return['cc'] .= ">";
	641	$return['cc'] .= ", ";
	642	}
	643	else
	644	{
	645	$return['cc'] .= $tmp_cc->mailbox . "@" . $tmp_cc->host;
	646	$return['cc'] .= ", ";
	647	}
	648	}
	649	$return['cc'] = $this->del_last_two_caracters($return['cc']);
	650	}
	651	else
	652	{
	653	$return['cc'] = "";
[1472]	654	}
[449]	655
	656	##
	657	# @AUTHOR Rodrigo Souza dos Santos
	658	# @DATE 2008/09/12
	659	# @BRIEF Adding the BCC field.
	660	##
	661	$bcc = $header->bcc;
	662	$return['bcc'] = "";
	663	if (!empty($bcc))
	664	{
	665	foreach ($bcc as $tmp_bcc)
	666	{
	667	if (!empty($tmp_bcc->personal))
	668	{
	669	$personal_tmp_bcc = imap_mime_header_decode($tmp_bcc->personal);
	670	$return['bcc'] .= '"' . $personal_tmp_bcc[0]->text . '"';
	671	$return['bcc'] .= " ";
	672	$return['bcc'] .= "<";
	673	$return['bcc'] .= $tmp_bcc->mailbox . "@" . $tmp_bcc->host;
	674	$return['bcc'] .= ">";
	675	$return['bcc'] .= ", ";
	676	}
	677	else
	678	{
	679	$return['bcc'] .= $tmp_bcc->mailbox . "@" . $tmp_bcc->host;
	680	$return['bcc'] .= ", ";
	681	}
	682	}
	683	$return['bcc'] = $this->del_last_two_caracters($return['bcc']);
[426]	684	}
[449]	685	else
	686	{
	687	$return['bcc'] = "";
[1472]	688	}
[426]	689
[2]	690	$reply_to = $header->reply_to;
	691	$return['reply_to'] = "";
	692	if (is_object($reply_to[0]))
	693	{
	694	if ($return['from']['email'] != ($reply_to[0]->mailbox."@".$reply_to[0]->host))
	695	{
	696	if (!empty($reply_to[0]->personal))
	697	{
	698	$personal_reply_to = imap_mime_header_decode($tmp_reply_to->personal);
[41]	699	if(!empty($personal_reply_to[0]->text)) {
	700	$return['reply_to'] .= '"' . $personal_reply_to[0]->text . '"';
	701	$return['reply_to'] .= " ";
	702	$return['reply_to'] .= "<";
	703	$return['reply_to'] .= $reply_to[0]->mailbox . "@" . $reply_to[0]->host;
	704	$return['reply_to'] .= ">";
	705	}
	706	else {
	707	$return['reply_to'] .= $reply_to[0]->mailbox . "@" . $reply_to[0]->host;
	708	}
[2]	709	}
	710	else
	711	{
	712	$return['reply_to'] .= $reply_to[0]->mailbox . "@" . $reply_to[0]->host;
	713	}
	714	}
	715	}
	716	$return['reply_to'] = $this->decode_string($return['reply_to']);
	717	$return['subject'] = $this->decode_string($header->fetchsubject);
	718	$return['Size'] = $header->Size;
[828]	719	$return['reply_toaddress'] = $header->reply_toaddress;
	720
[689]	721	//All this is to help in local messages
	722	$return['timestamp'] = $header->udate;
	723	$return['login'] = $_SESSION['phpgw_info']['expressomail']['user']['account_id'];//$GLOBALS['phpgw_info']['user']['account_id'];
	724	$return['reply_toaddress'] = $header->reply_toaddress;
[2]	725	return $return;
	726	}
[1472]	727
[1940]	728	function get_msg_sample($msg_number)
[1752]	729	{
	730
	731
	732	include_once("class.message_components.inc.php");
	733	$msg = &new message_components($this->mbox);
	734	$msg->fetch_structure($msg_number);
	735	$return = "";
	736
	737	if( (isset($_SESSION['phpgw_info']['user']['preferences']['expressoMail']['preview_msg_subject']) && ($_SESSION['phpgw_info']['user']['preferences']['expressoMail']['preview_msg_subject'] == "0")) && (isset($_SESSION['phpgw_info']['user']['preferences']['expressoMail']['preview_msg_tip']) && ($_SESSION['phpgw_info']['user']['preferences']['expressoMail']['preview_msg_tip'] == "0")) )
	738	{
	739	$return['body'] = "";
	740	return $return;
	741	}
	742
	743
	744
	745	if(!$msg->structure[$msg_number]->parts)
	746	{
	747	$content = '';
	748	if (strtolower($msg->structure[$msg_number]->subtype) == "plain" \|\| strtolower($msg->structure[$msg_number]->subtype) == "html")
	749	{
	750	$content = $this->decodeBody(imap_body($this->mbox, $msg_number, FT_UID\|FT_PEEK), $msg->encoding[$msg_number][0], $msg->charset[$msg_number][0]);
	751	}
	752	}
	753	else
	754	{
	755	foreach($msg->pid[$msg_number] as $values => $msg_part)
	756	{
	757
	758	$file_type = strtolower($msg->file_type[$msg_number][$values]);
	759	if($file_type == "text/plain" \|\| $file_type == "text/html") {
	760	$content = $this->decodeBody(imap_fetchbody($this->mbox, $msg_number, $msg_part, FT_UID\|FT_PEEK), $msg->encoding[$msg_number][$values], $msg->charset[$msg_number][$values]);
	761	break;
	762	}
	763	}
	764	}
	765	$content = $this->replace_special_characters($content);
	766	$tags_replace = array("<br>","<br/>","<br />");
	767	$content = str_replace($tags_replace," ", $content);
	768	$content = strip_tags($content);
	769	$content = str_replace(array("{","}"," "), " ", $content);
	770	$content = trim($content);
	771	$content = substr($content,0,300);
	772	$content != "" ? $return['body'] = " - " . $content: $return['body'] = "";
	773	return $return;
	774	}
	775
[2]	776	function get_body_msg($msg_number, $msg_folder)
	777	{
	778	include_once("class.message_components.inc.php");
[51]	779	$msg = &new message_components($this->mbox);
[2]	780	$msg->fetch_structure($msg_number);
[51]	781	$return = array();
[1472]	782	$return['attachments'] = $this-> download_attachment($msg,$msg_number);
[51]	783	if(!$this->has_cid)
[91]	784	{
[178]	785	$return['thumbs'] = $this->get_thumbs($msg,$msg_number,urlencode($msg_folder));
[91]	786	$return['signature'] = $this->get_signature($msg,$msg_number,$msg_folder);
[1472]	787	}
	788
[2]	789	if(!$msg->structure[$msg_number]->parts) //Simple message, only 1 piece
	790	{
[1035]	791	if(strtolower($msg->structure[$msg_number]->subtype) == 'x-pkcs7-mime'){
	792	$return['body']='isCripted';
	793	return $return;
	794	}
	795
[2]	796	$attachment = array(); //No attachments
[1035]	797
	798	if(strtolower($msg->structure[$msg_number]->subtype) == 'x-pkcs7-mime'){
	799	$return['body']='isCripted';
	800	return $return;
	801	}
	802
[2]	803	$content = '';
	804	if (strtolower($msg->structure[$msg_number]->subtype) == "plain")
	805	{
[1898]	806	$content .= '<span style="font-family: monospace">' . nl2br($this->decodeBody((imap_body($this->mbox, $msg_number, FT_UID)), $msg->encoding[$msg_number][0], $msg->charset[$msg_number][0])) . '</span>';
[2]	807	}
	808	else if (strtolower($msg->structure[$msg_number]->subtype) == "html")
	809	{
[51]	810	$content .= $this->decodeBody(imap_body($this->mbox, $msg_number, FT_UID), $msg->encoding[$msg_number][0], $msg->charset[$msg_number][0]);
[2]	811	}
	812	}
[1472]	813	else
[2]	814	{ //Complicated message, multiple parts
	815	$html_body = '';
	816	$content = '';
	817	$has_multipart = true;
	818	$this->has_cid = false;
[1472]	819
[2]	820	if (strtolower($msg->structure[$msg_number]->subtype) == "related")
	821	$this->has_cid = true;
[1472]	822
[469]	823	if (strtolower($msg->structure[$msg_number]->subtype) == "alternative") {
	824	$show_only_html = false;
	825	foreach($msg->pid[$msg_number] as $values => $msg_part) {
[432]	826	$file_type = strtolower($msg->file_type[$msg_number][$values]);
	827	if($file_type == "text/html")
[1472]	828	$show_only_html = true;
[432]	829	}
[469]	830	}
[2]	831	else
	832	$show_only_html = false;
	833
	834	foreach($msg->pid[$msg_number] as $values => $msg_part)
	835	{
[1472]	836
[2]	837	$file_type = strtolower($msg->file_type[$msg_number][$values]);
	838	if($file_type == "message/rfc822")
	839	$has_multipart = false;
[1472]	840
[2]	841	if($file_type == "multipart/alternative")
	842	$has_multipart = false;
[1472]	843
	844	if(($file_type == "text/plain"
[2]	845	\|\| $file_type == "text/html")
	846	&& $file_type != 'attachment')
	847	{
	848	if($file_type == "text/plain" && !$show_only_html && $has_multipart)
	849	{
	850	// if TXT file size > 100kb, then it will not expand.
	851	if(!($file_type == "text/plain" && $msg->fsize[$msg_number][$values] > 102400)) {
[1472]	852	$content .= nl2br(htmlentities($this->decodeBody(imap_fetchbody($this->mbox, $msg_number, $msg_part, FT_UID), $msg->encoding[$msg_number][$values], $msg->charset[$msg_number][$values])));
[2]	853	}
	854	}
	855	// if HTML attachment file size > 300kb, then it will not expand.
[449]	856	else if($file_type == "text/html" && $msg->fsize[$msg_number][$values] < 307200)
[2]	857	{
[51]	858	$content .= $this->decodeBody(imap_fetchbody($this->mbox, $msg_number, $msg_part, FT_UID), $msg->encoding[$msg_number][$values], $msg->charset[$msg_number][$values]);
[2]	859	$show_only_html = true;
	860	}
	861	}
	862	else if($file_type == "message/delivery-status"){
	863	$content .= "<hr align='left' width='95%' style='border:1px solid #DCDCDC'>";
[1472]	864	$content .= nl2br($this->decodeBody(imap_fetchbody($this->mbox, $msg_number, $msg_part, FT_UID), $msg->encoding[$msg_number][$values], $msg->charset[$msg_number][$values]));
[2]	865
	866	}
[65]	867	else if($file_type == "message/rfc822" \|\| $file_type == "text/rfc822-headers"){
[1472]	868
[2]	869	include_once("class.imap_attachment.inc.php");
	870	$att = new imap_attachment();
[51]	871	$attachments = $att -> get_attachment_info($this->mbox,$msg_number);
[1472]	872	if($attachments['number_attachments'] > 0) {
[1897]	873	foreach($attachments ['attachment'] as $index => $attachment)
	874	{
	875	if ( in_array( strtolower( $attachment[ 'type' ] ), array( 'delivery-status', 'rfc822', 'rfc822-headers', 'plain' ) ) )
	876	{
	877	$obj = imap_rfc822_parse_headers( imap_fetchbody( $this -> mbox, $msg_number, $msg_part, FT_UID ), $msg -> encoding[ $msg_number ][ $values ] );
	878
	879	$content .= '<hr align="left" width="95%" style="border:1px solid #DCDCDC">';
	880	$content .= '<br><table style="margin:2px;border:1px solid black;background:#EAEAEA">';
	881
	882	$content .= '<tr><td><b>' . $this->functions->getLang("Subject")
	883	. ':</b></td><td>' .$this->decode_string($obj->subject) . '</td></tr>';
	884
	885	$content .= '<tr><td><b>' . $this -> functions -> getLang( 'From' ) . ':</b></td><td>'
	886	. $this -> replace_links( $this -> decode_string( $obj -> from[ 0 ] -> mailbox . '@' . $obj -> from[ 0 ] -> host) )
	887	. '</td></tr>';
	888
	889	$content .= '<tr><td><b>' . $this->functions->getLang("Date") . ':</b></td><td>' . $obj->date . '</td></tr>';
	890
	891	$content .= '<tr><td><b>' . $this -> functions -> getLang( 'TO' ) . ':</b></td><td>'
	892	. $this -> replace_links( $this -> decode_string( $obj -> to[ 0 ] -> mailbox . '@' . $obj -> to[ 0 ] -> host ) )
	893	. '</td></tr>';
	894
	895	if ( $obj->cc )
	896	$content .= '<tr><td><b>' . $this -> functions -> getLang( 'CC' ) . ':</b></td><td>'
	897	. $this -> replace_links( $this -> decode_string( $obj -> cc[ 0 ] -> mailbox . '@' . $obj -> cc[ 0 ] -> host ) )
	898	. '</td></tr>';
	899
	900	$content .= '</table><br>';
	901
[1489]	902	$content .= $this->decodeBody(
	903	imap_fetchbody(
	904	$this->mbox,
	905	$msg_number,
	906	( $attachment['part_in_msg'] + (
	907	( strtolower( $attachment[ 'type' ] ) == 'delivery-status' ) ? 0 : 1 )
	908	) . ".1",
	909	FT_UID
	910	),
	911	$msg->encoding[ $msg_number ][ $values ],
	912	$msg->charset[ $msg_number ][ $values ]
	913	);
[1472]	914	break;
[2]	915	}
	916	}
	917	}
	918	}
	919	}
	920	if($file_type == "text/plain" && ($show_only_html && $msg_part == 1) \|\| (!$show_only_html && $msg_part == 3)){
	921	if(strtolower($msg->structure[$msg_number]->subtype) == "mixed" && $msg_part == 1)
[51]	922	$content .= nl2br(imap_base64(imap_fetchbody($this->mbox, $msg_number, $msg_part, FT_UID)));
[25]	923	else if(!strtolower($msg->structure[$msg_number]->subtype) == "mixed")
[1472]	924	$content .= nl2br(imap_fetchbody($this->mbox, $msg_number, $msg_part, FT_UID));
[2]	925	}
[1472]	926	}
[2]	927	// Force message with flag Seen (imap_fetchbody not works correctly)
[1472]	928	$params = array('folder' => $msg_folder, "msgs_to_set" => $msg_number, "flag" => "seen");
[2]	929	$this->set_messages_flag($params);
[205]	930	$content = $this->process_embedded_images($msg,$msg_number,$content, $msg_folder);
[2]	931	$content = $this->replace_special_characters($content);
[51]	932	$return['body'] = $content;
	933	return $return;
[2]	934	}
[1472]	935
[2]	936	function htmlfilter($body)
	937	{
	938	require_once('htmlfilter.inc');
[1472]	939
[2]	940	$tag_list = Array(
	941	false,
	942	'blink',
	943	'object',
	944	'meta',
	945	'html',
	946	'link',
	947	'frame',
	948	'iframe',
	949	'layer',
	950	'ilayer',
	951	'plaintext'
	952	);
	953
	954	/**
	955	* A very exclusive set:
	956	*/
	957	// $tag_list = Array(true, "b", "a", "i", "img", "strong", "em", "p");
	958	$rm_tags_with_content = Array(
	959	'script',
	960	'style',
	961	'applet',
	962	'embed',
	963	'head',
	964	'frameset',
	965	'xml',
	966	'xmp'
	967	);
	968
	969	$self_closing_tags = Array(
	970	'img',
	971	'br',
	972	'hr',
	973	'input'
	974	);
	975
	976	$force_tag_closing = true;
	977
	978	$rm_attnames = Array(
	979	'/.*/' =>
	980	Array(
	981	'/target/i',
	982	//'/^on.*/i', -> onClick, dos compromissos da agenda.
	983	'/^dynsrc/i',
	984	'/^datasrc/i',
	985	'/^data.*/i',
	986	'/^lowsrc/i'
	987	)
	988	);
	989
	990	/**
	991	* Yeah-yeah, so this looks horrible. Check out htmlfilter.inc for
	992	* some idea of what's going on here. :)
	993	*/
	994
	995	$bad_attvals = Array(
	996	'/.*/' =>
	997	Array(
	998	'/.*/' =>
	999	Array(
	1000	Array(
	1001	'/^([\'\"])\s\S+\sscript\s:(.*)([\'\"])/si',
	1002	//'/^([\'\"])\shttps\s:(.)([\'\"])/si', -> doclinks notes
	1003	'/^([\'\"])\smocha\s:(.)([\'\"])/si',
	1004	'/^([\'\"])\sabout\s:(.*)([\'\"])/si'
	1005	),
	1006	Array(
	1007	'\\1oddjob:\\2\\1',
	1008	//'\\1uucp:\\2\\1', -> doclinks notes
	1009	'\\1amaretto:\\2\\1',
	1010	'\\1round:\\2\\1'
	1011	)
[1472]	1012	),
	1013
[2]	1014	'/^style/i' =>
	1015	Array(
	1016	Array(
	1017	'/expression/i',
	1018	'/behaviou*r/i',
	1019	'/binding/i',
	1020	'/include-source/i',
	1021	'/url\s\(\s([\'\"])\shttps:.([\'\"])\s\)/si',
	1022	'/url\s\(\s([\'\"])\s\S+\sscript:.([\'\"])\s\)/si'
	1023	),
	1024	Array(
	1025	'idiocy',
	1026	'idiocy',
	1027	'idiocy',
	1028	'idiocy',
	1029	'url(\\1http://securityfocus.com/\\1)',
	1030	'url(\\1http://securityfocus.com/\\1)'
	1031	)
	1032	)
	1033	)
	1034	);
	1035
	1036	$add_attr_to_tag = Array(
	1037	'/^a$/i' => Array('target' => '"_new"')
	1038	);
[1472]	1039
	1040
[2]	1041	$trusted_body = sanitize($body,
	1042	$tag_list,
	1043	$rm_tags_with_content,
	1044	$self_closing_tags,
	1045	$force_tag_closing,
	1046	$rm_attnames,
	1047	$bad_attvals,
	1048	$add_attr_to_tag
	1049	);
[1472]	1050
[2]	1051	return $trusted_body;
	1052	}
[1472]	1053
[2]	1054	function decodeBody($body, $encoding, $charset=null)
	1055	{
	1056	/**
	1057	* replace e-mail by anchor.
	1058	*/
	1059	// HTML Filter
[13]	1060	//$body = preg_replace("#(^\|[\n ])([a-z0-9&\-_.]+?)@([\w\-]+\.([\w\-\.]+\.)*[\w]+)#i", "\\1<a href=# onclick=\"javascript:new_message('new_by_message', '\\2@\\3')\">\\2@\\3</a>", $body);
[828]	1061	//$body = str_replace("\r\n", "\n", $body);
[2]	1062	if ($encoding == 'quoted-printable')
[828]	1063	{
	1064	/*
[1472]	1065
[2]	1066	for($i=0;$i<256;$i++) {
	1067	$c1=dechex($i);
	1068	if(strlen($c1)==1){$c1="0".$c1;}
	1069	$c1="=".$c1;
	1070	$myqprinta[]=$c1;
	1071	$myqprintb[]=chr($i);
[1472]	1072	}
[828]	1073	*/
[2]	1074	$body = str_replace($myqprinta,$myqprintb,($body));
	1075	$body = quoted_printable_decode($body);
[1472]	1076	while (ereg("=\n", $body))
[2]	1077	{
	1078	$body = ereg_replace ("=\n", '', $body);
	1079	}
	1080	}
[1472]	1081	else if ($encoding == 'base64')
[2]	1082	{
	1083	$body = base64_decode($body);
	1084	}
[1792]	1085
[2]	1086	// All other encodings are returned raw.
	1087	if (strtolower($charset) == "utf-8")
	1088	return utf8_decode($body);
	1089	else
	1090	return $body;
	1091	}
[1472]	1092
[205]	1093	function process_embedded_images($msg, $msgno, $body, $msg_folder)
[2]	1094	{
	1095	if (count($msg->inline_id[$msgno]) > 0)
	1096	{
	1097	foreach ($msg->inline_id[$msgno] as $index => $cid)
	1098	{
	1099	$cid = eregi_replace("<", "", $cid);
	1100	$cid = eregi_replace(">", "", $cid);
	1101	$msg_part = $msg->pid[$msgno][$index];
	1102	//$body = eregi_replace("alt=\"\"", "", $body);
	1103	$body = eregi_replace("<br/>", "", $body);
	1104	$body = str_replace("src=\"cid:".$cid."\"", " src=\"./inc/show_embedded_attach.php?msg_folder=$msg_folder&msg_num=$msgno&msg_part=$msg_part\" ", $body);
	1105	$body = str_replace("src='cid:".$cid."'", " src=\"./inc/show_embedded_attach.php?msg_folder=$msg_folder&msg_num=$msgno&msg_part=$msg_part\" ", $body);
	1106	$body = str_replace("src=cid:".$cid, " src=\"./inc/show_embedded_attach.php?msg_folder=$msg_folder&msg_num=$msgno&msg_part=$msg_part\" ", $body);
	1107	}
	1108	}
[1472]	1109
[2]	1110	return $body;
	1111	}
[1472]	1112
[2]	1113	function replace_special_characters($body)
	1114	{
	1115	// Suspected TAGS!
[1472]	1116	/*$tag_list = Array(
[2]	1117	'blink','object','meta',
	1118	'html','link','frame',
	1119	'iframe','layer','ilayer',
	1120	'plaintext','script','style','img',
	1121	'applet','embed','head',
	1122	'frameset','xml','xmp');
	1123	*/
	1124
[1472]	1125	// Layout problem: Change html elements
	1126	// with absolute position to relate position, CASE INSENSITIVE.
[1233]	1127	$body = @mb_eregi_replace("POSITION: ABSOLUTE;","",$body);
[6]	1128
[2]	1129	$tag_list = Array('head','blink','object','frame',
	1130	'iframe','layer','ilayer','plaintext','script',
[63]	1131	'applet','embed','frameset','xml','xmp','style');
[2]	1132
[1472]	1133	$blocked_tags = array();
[2]	1134	foreach($tag_list as $index => $tag) {
[1233]	1135	$new_body = @mb_eregi_replace("<$tag", "<!--$tag", $body);
[2]	1136	if($body != $new_body) {
	1137	$blocked_tags[] = $tag;
	1138	}
[1233]	1139	$body = @mb_eregi_replace("</$tag>", "</$tag-->", $new_body);
[2]	1140	}
[650]	1141	// Malicious Code Remove
[1923]	1142	$dirtyCodePattern = "/(<([\w]+[\w0-9])(.)on(mouse(move\|over\|down\|up)\|load\|blur\|change\|error\|click\|dblclick\|focus\|key(down\|up\|press)\|select)([\n\ ])=([\n\ ])[\"'][^>\"'][\"']([^>])>)(.*)(<\/\\2>)?/misU";
[650]	1143	preg_match_all($dirtyCodePattern,$body,$rest,PREG_PATTERN_ORDER);
	1144	foreach($rest[0] as $i => $val)
[1270]	1145	if (!(preg_match("/javascript:window\.open\(\"([^'\"]*)\/index\.php\?menuaction=calendar\.uicalendar\.set_action\&cal_id=([^;'\"]+);?['\"]/i",$rest[1][$i]) && strtoupper($rest[4][$i]) == "CLICK" )) //Calendar events
[1057]	1146	$body = str_replace($rest[1][$i],"<".$rest[2][$i].$rest[3][$i].$rest[7][$i].">",$body);
[2]	1147
[1707]	1148	return "<span>".$this-> replace_links($body);
[2]	1149	}
	1150
[1897]	1151	function replace_links( $body )
	1152	{
	1153	$matches = array( );
[2]	1154	// Verify exception.
[1897]	1155	@preg_match( "/<a href=\"notes:\/\/\//", $body, $matches );
	1156
	1157	// If there is no exception, then open the link in new window.
	1158	if ( count( $matches ) )
[449]	1159	return $body;
[1472]	1160
[1897]	1161	// All links should be moderated and they should only have the attribute 'target="blank"'.
[1707]	1162	$pattern = '/<a[^>]+href="([^>"]+)"[^>]>(.)<\/a>/im';
	1163	$replacement = '<a href="$1" target="_blank">$2</a>';
[1897]	1164	$body = preg_replace( $pattern, $replacement, $body );
[1707]	1165
	1166
[2101]	1167	// Domains and IPs addresses found in the text and which is not a link yet should be replaced by one.
	1168	// See more informations in www.iana.org
	1169	$octets = array(
	1170	'first' => '(2[0-3][0-9]\|1[0-9]{2}\|[1-9][0-9]?)',
	1171	'middle' => '(25[0-5]\|2[0-4][0-9]\|1?[0-9]{1,2})',
	1172	'last' => '(25[0-4]\|2[0-4][0-9]\|1[0-9]{2}\|[1-9][0-9]?)'
	1173	);
	1174
	1175	$ip = "\b{$octets[ 'first' ]}\.({$octets[ 'middle' ]}\.){2}{$octets[ 'last' ]}\b";
	1176
	1177	$top_level_domains = '(\.(ac\|ad\|ae\|aero\|af\|ag\|ai\|al\|am\|an\|ao\|aq\|ar\|as\|asia\|at\|au\|aw\|ax\|az\|'
	1178	. 'ba\|bb\|bd\|be\|bf\|bg\|bh\|bi\|biz\|bj\|bl\|bm\|bn\|bo\|br\|bs\|bt\|bv\|bw\|by\|bz\|'
	1179	. 'ca\|cat\|cc\|cd\|cf\|cg\|ch\|ci\|ck\|cl\|cm\|cn\|co\|com\|coop\|cr\|cu\|cv\|cx\|cy\|cz\|'
	1180	. 'de\|dj\|dk\|dm\|do\|dz\|ec\|edu\|ee\|eg\|eh\|er\|es\|et\|eu\|fi\|fj\|fk\|fm\|fo\|fr\|'
	1181	. 'ga\|gb\|gd\|ge\|gf\|gg\|gh\|gi\|gl\|gm\|gn\|gov\|gp\|gq\|gr\|gs\|gt\|gu\|gw\|gy\|'
	1182	. 'hk\|hm\|hn\|hr\|ht\|hu\|id\|ie\|il\|im\|in\|info\|int\|io\|iq\|ir\|is\|it\|je\|jm\|jo\|jobs\|jp\|'
	1183	. 'ke\|kg\|kh\|ki\|km\|kn\|kp\|kr\|kw\|ky\|kz\|la\|lb\|lc\|li\|lk\|lr\|ls\|lt\|lu\|lv\|ly\|'
	1184	. 'ma\|mc\|md\|me\|mf\|mg\|mh\|mil\|mk\|ml\|mm\|mn\|mo\|mobi\|mp\|mq\|mr\|ms\|mt\|mu\|museum\|'
	1185	. 'mv\|mw\|mx\|my\|mz\|na\|name\|nc\|ne\|net\|nf\|ng\|ni\|nl\|no\|np\|nr\|nu\|nz\|om\|org\|'
	1186	. 'pa\|pe\|pf\|pg\|ph\|pk\|pl\|pm\|pn\|pro\|ps\|pt\|pw\|py\|qa\|re\|ro\|rs\|ru\|rw\|'
	1187	. 'sa\|sb\|sc\|sd\|se\|sg\|sh\|si\|sj\|sk\|sl\|sm\|sn\|so\|sr\|st\|su\|sv\|sy\|sz\|'
	1188	. 'tc\|td\|tel\|tf\|tg\|th\|tj\|tk\|tl\|tm\|tn\|to\|tp\|tr\|travel\|tt\|tv\|tw\|tz\|'
	1189	. 'ua\|ug\|uk\|um\|us\|uy\|uz\|va\|vc\|ve\|vg\|vi\|vn\|vu\|wf\|ws\|ye\|yt\|yu\|za\|zm\|zw))+\b';
	1190
[2219]	1191	$path = '(?>\/[\w\d\/\.\'\(\)\-\+~?!&#@$%\|:;,*=_]+)?';
[2101]	1192	$port = '(?>:\d{2,5})?';
	1193	$domain = '(?>[\w\d_\-]+)';
	1194	$subdomain = "(?>{$domain}\.)*";
	1195	$protocol = '(?>(http\|ftp)(s)?:\/\/)?';
	1196	$url = "(?>{$protocol}((?>{$subdomain}{$domain}{$top_level_domains}\|{$ip}){$port}{$path}))";
	1197
	1198	$pattern = "/(url\( *['\"]?\|['\"@=])?{$url}/";
	1199
	1200	/*
	1201	// PHP 5.3
	1202	$replace = function( $matches )
	1203	{
	1204	if ( $matches[ 1 ] )
	1205	return $matches[ 0 ];
	1206
	1207	$url = ( $matches[ 2 ] ) ? $matches[ 2 ] : 'http';
	1208	$url .= "{$matches[ 3 ]}://{$matches[ 4 ]}";
	1209	return "<a href=\"{$url}\" target=\"_blank\">{$matches[ 4 ]}</a>";
	1210	};
	1211	$body = preg_replace_callback( $pattern, $replace, $body );
	1212	*/
	1213
	1214	// PHP 5.2.x - Remover assim que possível
	1215	$body = preg_replace_callback( $pattern,
	1216	create_function(
	1217	'$matches',
	1218	'if ( $matches[ 1 ] ) return $matches[ 0 ];'
	1219	. '$url = ( $matches[ 2 ] ) ? $matches[ 2 ] : "http";'
	1220	. '$url .= "{$matches[ 3 ]}://{$matches[ 4 ]}";'
	1221	. 'return "<a href=\"{$url}\" target=\"_blank\">{$matches[ 4 ]}</a>";'
	1222	), $body
	1223	);
	1224
[1897]	1225	// E-mail address in the text should create a new e-mail on ExpressoMail
	1226	$pattern = '/( \|<\|<\|>)([A-Za-z0-9\.~?\/_=#\-]@[A-Za-z0-9\.~?\/_=#\-])( \|>\|>\|<)/im';
	1227	$replacement = '$1<a href="javascript:new_message_to(\'$2\')">$2</a>$3';
	1228	$body = preg_replace( $pattern, $replacement, $body );
[1707]	1229
[1897]	1230	// If there is an link with a "mailto:" in href attribute, it will changed to create a new e-mail on ExpressoMail.
	1231	$pattern = '/<a[^>]+href=["\']mailto:([^"]+)["\'][^>]*>([^<]+)<\/a>/im';
	1232	$replacement = '<a href="javascript:new_message_to(\'$1\')">$2</a>';
	1233	$body = preg_replace( $pattern, $replacement, $body );
[1707]	1234
	1235	return $body;
[2]	1236	}
	1237
[91]	1238	function get_signature($msg, $msg_number, $msg_folder)
[1035]	1239	{
[2232]	1240	include_once(dirname( __FILE__ ) ."/../../security/classes/CertificadoB.php");
[1035]	1241	include_once("class.db_functions.inc.php");
[91]	1242	foreach ($msg->file_type[$msg_number] as $index => $file_type)
	1243	{
[1035]	1244	$sign = array();
	1245	$temp = $this->get_info_head_msg($msg_number);
	1246	if($temp['ContentType'] =='normal') return $sign;
[91]	1247	$file_type = strtolower($file_type);
[1472]	1248	if(strtolower($msg->encoding[$msg_number][$index]) == 'base64')
[91]	1249	{
[1472]	1250	if ($file_type == 'application/x-pkcs7-signature' \|\| $file_type == 'application/pkcs7-signature')
[91]	1251	{
[1035]	1252	if(!$this->mbox \|\| !is_resource($this->mbox))
	1253	$this->mbox = $this->open_mbox($msg_folder);
	1254
	1255	$header = @imap_headerinfo($this->mbox, imap_msgno($this->mbox, $msg_number), 80, 255);
	1256
	1257	$imap_msg = @imap_fetchheader($this->mbox, $msg_number, FT_UID);
	1258	$imap_msg .= @imap_body($this->mbox, $msg_number, FT_UID);
	1259
	1260	$certificado = new certificadoB();
	1261	$validade = $certificado->verificar($imap_msg);
	1262
	1263	if ($certificado->apresentado)
[109]	1264	{
[1035]	1265	$from = $header->from;
	1266	foreach ($from as $id => $object) {
	1267	$fromname = $object->personal;
	1268	$fromaddress = $object->mailbox . "@" . $object->host;
[109]	1269	}
[1035]	1270	$sign_alert = '';
	1271	foreach ($certificado->erros_ssl as $item)
	1272	{
	1273	$check_error_msg = $this->functions->getLang($item);
	1274	/*
	1275	* Desabilite o teste abaixo para mostrar todas as mensagem
	1276	* de erro.
	1277	*/
	1278	//if (!strpos($check_error_msg,'*',strlen($check_error_msg-1)))
	1279	//{
	1280	$sign[] = "<span style=color:red>" . $check_error_msg . " </span>";
	1281	//}
	1282	}
	1283	if (count($certificado->erros_ssl) < 1)
	1284	{
	1285	$check_msg = $this->functions->getLang('Message untouched') . " ";
[1630]	1286	if(strtoupper($fromaddress) != strtoupper($certificado->dados['EMAIL']))
[1035]	1287	{
	1288	$check_msg .= $this->functions->getLang('and') . " ";
	1289	$check_msg .= $this->functions->getLang('authentic');
	1290	}
	1291	$sign[] = "<strong>".$check_msg."</strong>";
	1292	}
[1630]	1293	if(strtoupper($fromaddress) != strtoupper($certificado->dados['EMAIL']))
[1035]	1294	{
	1295	$sign[] = "<span style=color:red>" .
	1296	$this->functions->getLang('message') . " " .
	1297	$this->functions->getLang('with signer different from sender') .
	1298	" </span>";
	1299	}
	1300	$sign[] = "<strong>" . $this->functions->getLang('Message signed by: ') . "</strong>" . $certificado->dados['NOME'];
	1301	$sign[] = "<strong>" . $this->functions->getLang('Certificate email: ') . "</strong>" . $certificado->dados['EMAIL'];
	1302	$sign[] = "<strong>" . $this->functions->getLang('Mail from: ') . "</strong>" . $fromaddress;
	1303	$sign[] = "<strong>" . $this->functions->getLang('Certificate Authority: ') . "</strong>" . $certificado->dados['EMISSOR'];
	1304	$sign[] = "<strong>" . $this->functions->getLang('Validity of certificate: ') . "</strong>" . gmdate('r',openssl_to_timestamp($certificado->dados['FIM_VALIDADE']));
	1305	$sign[] = "<strong>" . $this->functions->getLang('Message date: ') . "</strong>" . $header->Date;
	1306
	1307	$cert = openssl_x509_parse($certificado->cert_assinante);
	1308	/*
	1309	$sign[] = '<table>';
	1310	$sign[] = '<tr><td colspan=1><b>Expedido para:</b></td></tr>';
	1311	$sign[] = '<tr><td>Nome Comum (CN) </td><td>' . $cert[subject]['CN'] . '</td></tr>';
	1312	$X = substr($certificado->dados['NASCIMENTO'] ,0,2) . '-' . substr($certificado->dados['NASCIMENTO'] ,2,2) . '-' . substr($certificado->dados['NASCIMENTO'] ,4,4);
	1313	$sign[] = '<tr><td>Data de nascimento </td><td>' . $certificado->dados['NASCIMENTO'] . '</td></tr>';
	1314	$sign[] = '<tr><td>CPF </td><td>' . $certificado->dados['CPF'] . '</td></tr>';
	1315	$sign[] = '<tr><td>Documento identidade </td><td>' . $certificado->dados['RG'] . '</td></tr>';
	1316	$sign[] = '<tr><td>Empresa (O) </td><td>' . $cert[subject]['O'] . '</td></tr>';
	1317	$sign[] = '<tr><td>Unidade Organizacional (OU) </td><td>' . $cert[subject]['OU'][0] . '</td></tr>';
	1318	//$sign[] = '<tr><td>Numero de serie </td><td>' . $cert['serialNumber'] . '</td></tr>';
	1319	$sign[] = '<tr><td colspan=1> </td></tr>';
	1320	$sign[] = '<tr><td colspan=1><b>Expedido por:</b></td></tr>';
	1321	$sign[] = '<tr><td>Nome Comum (CN) </td><td>' . $cert[issuer]['CN'] . '</td></tr>';
	1322	$sign[] = '<tr><td>Empresa (O) </td><td>' . $cert[issuer]['O'] . '</td></tr>';
	1323	$sign[] = '<tr><td>Unidade Organizacional (OU) </td><td>' . $cert[issuer]['OU'][0] . '</td></tr>';
	1324	$sign[] = '<tr><td colspan=1> </td></tr>';
	1325	$sign[] = '<tr><td colspan=1><b>Validade:</b></td></tr>';
	1326	$H = data_hora($cert[validFrom]);
	1327	$X = substr($H,6,2) . '-' . substr($H,4,2) . '-' . substr($H,0,4);
	1328	$sign[] = '<tr><td>Expedido em </td><td>' . $X . '</td></tr>';
	1329	$H = data_hora($cert[validTo]);
	1330	$X = substr($H,6,2) . '-' . substr($H,4,2) . '-' . substr($H,0,4);
	1331	$sign[] = '<tr><td>Valido ate </td><td>' . $X . '</td></tr>';
	1332	$sign[] = '<tr><td colspan=1> </td></tr>';
	1333	$sign[] = '</table>';
	1334	*/
	1335	$sign_alert .= 'Expedido para:\n';
	1336	$sign_alert .= 'Nome Comum (CN) ' . $cert[subject]['CN'] . '\n';
	1337	$X = substr($certificado->dados['NASCIMENTO'] ,0,2) . '-' . substr($certificado->dados['NASCIMENTO'] ,2,2) . '-' . substr($certificado->dados['NASCIMENTO'] ,4,4);
	1338	$sign_alert .= 'Data de nascimento ' . $X . '\n';
	1339	$sign_alert .= 'CPF ' . $certificado->dados['CPF'] . '\n';
	1340	$sign_alert .= 'Documento identidade ' . $certificado->dados['RG'] . '\n';
	1341	$sign_alert .= 'Empresa (O) ' . $cert[subject]['O'] . '\n';
	1342	$sign_alert .= 'Unidade Organizacional (OU) ' . $cert[subject]['OU'][0] . '\n';
	1343	//$sign_alert[] = '<tr><td>Numero de serie </td><td>' . $cert['serialNumber'] . '</td></tr>';
	1344	$sign_alert .= '\n';
	1345	$sign_alert .= 'Expedido por:\n';
	1346	$sign_alert .= 'Nome Comum (CN) ' . $cert[issuer]['CN'] . '\n';
	1347	$sign_alert .= 'Empresa (O) ' . $cert[issuer]['O'] . '\n';
	1348	$sign_alert .= 'Unidade Organizacional (OU) ' . $cert[issuer]['OU'][0] . '\n';
	1349	$sign_alert .= '\n';
	1350	$sign_alert .= 'Validade:\n';
	1351	$H = data_hora($cert[validFrom]);
	1352	$X = substr($H,6,2) . '-' . substr($H,4,2) . '-' . substr($H,0,4);
	1353	$sign_alert .= 'Expedido em ' . $X . '\n';
	1354	$H = data_hora($cert[validTo]);
	1355	$X = substr($H,6,2) . '-' . substr($H,4,2) . '-' . substr($H,0,4);
	1356	$sign_alert .= 'Valido ate ' . $X . '\n';
	1357
	1358	$sign[] = "<a onclick=\"javascript:alert('" . $sign_alert . "')\"><b><font color=\"#0000FF\">".$this->functions->getLang("More")."...</font></b></a>";
	1359	$this->db = new db_functions();
	1360
	1361	// TODO: testar se existe um certificado no banco e verificar qual ï¿œ o mais atual.
	1362	if(!$certificado->dados['EXPIRADO'] && !$certificado->dados['REVOGADO'] && count($certificado->erros_ssl) < 1)
	1363	$this->db->insert_certificate(strtolower($certificado->dados['EMAIL']), $certificado->cert_assinante, $certificado->dados['SERIALNUMBER'], $certificado->dados['AUTHORITYKEYIDENTIFIER']);
	1364	}
[91]	1365	else
[1035]	1366	{
	1367	$sign[] = "<span style=color:red>" . $this->functions->getLang('Invalid signature') . "</span>";
	1368	foreach($certificado->erros_ssl as $item)
	1369	$sign[] = "<span style=color:red>" . $this->functions->getLang($item) . "</span>";
	1370	}
[91]	1371	}
	1372	}
	1373	}
[1472]	1374	return $sign;
[91]	1375	}
	1376
[51]	1377	function get_thumbs($msg, $msg_number, $msg_folder)
[2]	1378	{
	1379	$thumbs_array = array();
	1380	$i = 0;
	1381	foreach ($msg->file_type[$msg_number] as $index => $file_type)
	1382	{
	1383	$file_type = strtolower($file_type);
	1384	if(strtolower($msg->encoding[$msg_number][$index]) == 'base64') {
	1385	if (($file_type == 'image/jpeg') \|\| ($file_type == 'image/pjpeg') \|\| ($file_type == 'image/gif') \|\| ($file_type == 'image/png')) {
	1386	$img = "<IMG id='".$msg_folder.";;".$msg_number.";;".$i.";;".$msg->pid[$msg_number][$index].";;".$msg->encoding[$msg_number][$index]."' style='border:2px solid #fde7bc;padding:5px' title='".$this->functions->getLang("Click here do view (+)")."'src=./inc/show_thumbs.php?file_type=".$file_type."&msg_num=".$msg_number."&msg_folder=".$msg_folder."&msg_part=".$msg->pid[$msg_number][$index].">";
[1005]	1387	$href = "<a onMouseDown='save_image(event,this,\"".$file_type."\")' href='#".$msg_folder.";;".$msg_number.";;".$i.";;".$msg->pid[$msg_number][$index].";;".$msg->encoding[$msg_number][$index]."' onClick=\"window.open('./inc/show_img.php?msg_num=".$msg_number."&msg_folder=".$msg_folder."&msg_part=".$msg->pid[$msg_number][$index]."','mywindow','width=700,height=600,scrollbars=yes');\">". $img ."</a>";
[2]	1388	$thumbs_array[] = $href;
	1389	}
	1390	$i++;
	1391	}
	1392	}
	1393	return $thumbs_array;
	1394	}
[1472]	1395
[2]	1396	/*function delete_msg($params)
	1397	{
	1398	$folder = $params['folder'];
	1399	$msgs_to_delete = explode(",",$params['msgs_to_delete']);
[1472]	1400
[2]	1401	$mbox_stream = $this->open_mbox($folder);
[1472]	1402
[2]	1403	foreach ($msgs_to_delete as $msg_number){
	1404	imap_delete($mbox_stream, $msg_number, FT_UID);
	1405	}
	1406	imap_close($mbox_stream, CL_EXPUNGE);
	1407	return $params['msgs_to_delete'];
	1408	}*/
	1409
	1410	// Novo
	1411	function delete_msgs($params)
	1412	{
[1472]	1413
[2]	1414	$folder = $params['folder'];
[51]	1415	$folder = mb_convert_encoding($folder, "UTF7-IMAP","ISO-8859-1");
[2]	1416	$msgs_number = explode(",",$params['msgs_number']);
	1417	$border_ID = $params['border_ID'];
[1472]	1418
[2]	1419	$return = array();
[1472]	1420
[449]	1421	if ($params['get_previous_msg']){
[2]	1422	$return['previous_msg'] = $this->get_info_previous_msg($params);
[449]	1423	// Fix problem in unserialize function JS.
	1424	$return['previous_msg']['body'] = str_replace(array('{','}'), array('{','}'), $return['previous_msg']['body']);
	1425	}
[2]	1426
[1472]	1427	//$mbox_stream = $this->open_mbox($folder);
[504]	1428	$mbox_stream = @imap_open("{".$this->imap_server.":".$this->imap_port.$this->imap_options."}".$folder, $this->username, $this->password) or die(serialize(array('imap_error' => $this->parse_error(imap_last_error()))));
[1472]	1429
[2]	1430	foreach ($msgs_number as $msg_number)
	1431	{
	1432	if (imap_delete($mbox_stream, $msg_number, FT_UID));
	1433	$return['msgs_number'][] = $msg_number;
	1434	}
[1472]	1435
[2]	1436	$return['folder'] = $folder;
	1437	$return['border_ID'] = $border_ID;
[1472]	1438
[51]	1439	if($mbox_stream)
	1440	imap_close($mbox_stream, CL_EXPUNGE);
[2]	1441	return $return;
	1442	}
	1443
[1472]	1444
[2]	1445	function refresh($params)
	1446	{
[689]	1447	include_once("class.imap_attachment.inc.php");
[1472]	1448	$imap_attachment = new imap_attachment();
[2]	1449	$folder = $params['folder'];
	1450	$msg_range_begin = $params['msg_range_begin'];
	1451	$msg_range_end = $params['msg_range_end'];
	1452	$msgs_existent = $params['msgs_existent'];
[1472]	1453	$sort_box_type = $params['sort_box_type'];
[2]	1454	$sort_box_reverse = $params['sort_box_reverse'];
	1455	$msgs_in_the_server = array();
[53]	1456	$search_box_type = $params['search_box_type'] != "ALL" && $params['search_box_type'] != "" ? $params['search_box_type'] : false;
[828]	1457	$msgs_in_the_server = $this->get_msgs($folder, $sort_box_type, $search_box_type, $sort_box_reverse,$msg_range_begin,$msg_range_end);
	1458	$msgs_in_the_server = array_keys($msgs_in_the_server);
	1459	if(!count($msgs_in_the_server))
[51]	1460	return array();
[1472]	1461
[828]	1462	$num_msgs = (count($msgs_in_the_server) - imap_num_recent($this->mbox));
[1472]	1463	$msgs_in_the_client = explode(",", $msgs_existent);
[51]	1464
[2]	1465	$msg_to_insert = array_diff($msgs_in_the_server, $msgs_in_the_client);
[271]	1466	$msg_to_delete = array_diff($msgs_in_the_client, $msgs_in_the_server);
[1472]	1467
[2]	1468	$msgs_to_exec = array();
	1469	if ((count($msg_to_insert)) && ($msgs_existent))
	1470	{
	1471	foreach($msg_to_insert as $index => $msg_number)
	1472	{
	1473	if ($msgs_in_the_server[$index+1])
	1474	{
	1475	//$msgs_to_exec[$msg_number] = 'Inserir mensage numero ' . $msg_number . ' antes da ' . $msgs_in_the_server[$index+1];
	1476	$msgs_to_exec[$msg_number] = 'box.insertBefore(new_msg, Element("'.$msgs_in_the_server[$index+1].'"));';
	1477	}
	1478	else
	1479	{
	1480	//$msgs_to_exec[$msg_number] = 'Inserir mensage numero ' . $msg_number . ' no final (append)';
	1481	$msgs_to_exec[$msg_number] = 'box.appendChild(new_msg);';
	1482	}
	1483	}
	1484	ksort($msgs_to_exec);
	1485	}
	1486	elseif(!$msgs_existent)
	1487	{
	1488	foreach($msgs_in_the_server as $index => $msg_number)
	1489	{
	1490	$msgs_to_exec[$msg_number] = 'box.appendChild(new_msg);';
	1491	}
	1492	}
[1472]	1493
[2]	1494	$return = array();
	1495	$i = 0;
	1496	foreach($msgs_to_exec as $msg_number => $command)
	1497	{
[614]	1498	/*A função imap_headerinfo não traz o cabeçalho completo, e sim alguns
[1472]	1499	* atributos do cabeçalho. Como eu preciso do atributo Importance
[614]	1500	* para saber se o email é importante ou não, uso abaixo a função
	1501	* imap_fetchheader e busco o atributo importance nela para passar
	1502	* para as funções ajax. Isso faz com que eu acesse o cabeçalho
	1503	* duas vezes e de duas formas diferentes, mas em contrapartida, eu
	1504	* não preciso reimplementar o método utilizando o fetchheader.
	1505	* Como na atualização são poucas as mensagens que devem ser renderizadas,
	1506	* a perda em performance é insignificante.
	1507	*/
[1035]	1508	$tempHeader = @imap_fetchheader($this->mbox, imap_msgno($this->mbox, $msg_number));
	1509	$flag = preg_match('/importance : (.*)\r/i', $tempHeader, $importance);
[689]	1510	$return[$i]['Importance'] = $flag==0?"Normal":$importance[1];
[1472]	1511
[1752]	1512	$msg_sample = $this->get_msg_sample($msg_number);
	1513	$return[$i]['msg_sample'] = $msg_sample;
	1514
[535]	1515	$header = $this->get_header($msg_number);
[2]	1516	if (!is_object($header))
[828]	1517	continue;
	1518
[2]	1519	$return[$i]['msg_number'] = $msg_number;
	1520	$return[$i]['command'] = $command;
[1472]	1521
[2]	1522	$return[$i]['msg_folder'] = $folder;
[1035]	1523	// Atribui o tipo (normal, signature ou cipher) ao campo Content-Type
	1524	$return[$i]['ContentType'] = $this->getMessageType($msg_number, $tempHeader);
[2]	1525	$return[$i]['Recent'] = $header->Recent;
	1526	$return[$i]['Unseen'] = $header->Unseen;
	1527	$return[$i]['Answered'] = $header->Answered;
	1528	$return[$i]['Deleted'] = $header->Deleted;
	1529	$return[$i]['Draft'] = $header->Draft;
	1530	$return[$i]['Flagged'] = $header->Flagged;
	1531
[535]	1532	$date_msg = gmdate("d/m/Y",$header->udate);
	1533	if (gmdate("d/m/Y") == $date_msg)
	1534	$return[$i]['udate'] = gmdate("H:i",$header->udate);
[2]	1535	else
	1536	$return[$i]['udate'] = $date_msg;
[1472]	1537
[2]	1538	$from = $header->from;
	1539	$return[$i]['from'] = array();
	1540	$tmp = imap_mime_header_decode($from[0]->personal);
	1541	$return[$i]['from']['name'] = $tmp[0]->text;
	1542	$return[$i]['from']['email'] = $from[0]->mailbox . "@" . $from[0]->host;
[1472]	1543	//$return[$i]['from']['full'] ='"' . $return[$i]['from']['name'] . '" ' . '<' . $return[$i]['from']['email'] . '>';
[2]	1544	if(!$return[$i]['from']['name'])
	1545	$return[$i]['from']['name'] = $return[$i]['from']['email'];
[1472]	1546
[2]	1547	/*$toaddress = imap_mime_header_decode($header->toaddress);
	1548	$return[$i]['toaddress'] = '';
	1549	foreach ($toaddress as $tmp)
	1550	$return[$i]['toaddress'] .= $tmp->text;*/
	1551	$to = $header->to;
	1552	$return[$i]['to'] = array();
	1553	$tmp = imap_mime_header_decode($to[0]->personal);
	1554	$return[$i]['to']['name'] = $tmp[0]->text;
	1555	$return[$i]['to']['email'] = $to[0]->mailbox . "@" . $to[0]->host;
	1556	$return[$i]['to']['full'] ='"' . $return[$i]['to']['name'] . '" ' . '<' . $return[$i]['to']['email'] . '>';
[1472]	1557
[2]	1558	$return[$i]['subject'] = $this->decode_string($header->fetchsubject);
	1559
	1560	$return[$i]['Size'] = $header->Size;
	1561	$return[$i]['reply_toaddress'] = $header->reply_toaddress;
[1472]	1562
[2]	1563	$return[$i]['attachment'] = array();
[51]	1564	$return[$i]['attachment'] = $imap_attachment->get_attachment_headerinfo($this->mbox, $msg_number);
[2]	1565	$i++;
	1566	}
[51]	1567	$return['new_msgs'] = imap_num_recent($this->mbox);
[271]	1568	$return['msgs_to_delete'] = $msg_to_delete;
[411]	1569	if($this->mbox && is_resource($this->mbox))
[51]	1570	imap_close($this->mbox);
[828]	1571
[2]	1572	return $return;
	1573	}
	1574
[1035]	1575	/**
	1576	* Método que faz a verificação do Content-Type do e-mail e verifica se é um e-mail normal,
	1577	* assinado ou cifrado.
	1578	* @author Mário César Kolling <mario.kolling@serpro.gov.br>
	1579	* @param $headers Uma String contendo os Headers do e-mail retornados pela função imap_imap_fetchheader
	1580	* @param $msg_number O número da mesagem
	1581	* @return Retorna o tipo da mensagem (normal, signature, cipher).
	1582	*/
	1583	function getMessageType($msg_number, $headers = false){
	1584
	1585	$contentType = "normal";
	1586	if (!$headers){
	1587	$headers = imap_fetchheader($this->mbox, imap_msgno($this->mbox, $msg_number));
	1588	}
	1589	//$header2 = imap_fetchheader($this->mbox, imap_msgno($this->mbox, $msg_number));
	1590	if (preg_match("/Content-Type:.*pkcs7-signature/i", $headers) == 1){
	1591	$contentType = "signature";
	1592	} else if (preg_match("/Content-Type:.*x-pkcs7-mime/i", $headers) == 1){
	1593	$contentType = "cipher";
	1594	}
	1595
	1596	return $contentType;
	1597	}
	1598
[1375]	1599	/**
	1600	* Metodo que retorna todas as pastas do usuario logado.
	1601	* @param $params array opcional para repassar os argumentos ao metodo.
	1602	* Se usar $params['noSharedFolders'] = true, ira retornar todas as pastas do usuário logado,
	1603	* excluindo as compartilhadas para ele.
[1472]	1604	* @return Retorna um array contendo as seguintes informacoes de cada pasta: folder_unseen,
[1375]	1605	* folder_id, folder_name, folder_parent e folder_hasChildren.
[1472]	1606	*/
[449]	1607	function get_folders_list($params = null)
[2]	1608	{
[1472]	1609	$mbox_stream = $this->open_mbox();
[1953]	1610	if($params && $params['onload'] && $_SESSION['phpgw_info']['expressomail']['server']['certificado']){
	1611	$this->delete_mailbox(array("del_past" => "INBOX/decifradas"));
	1612	}
[115]	1613	$serverString = "{".$this->imap_server.":".$this->imap_port.$this->imap_options."}";
[1375]	1614	$folders_list = imap_getmailboxes($mbox_stream, $serverString, ($params && $params['noSharedFolders']) ? "INBOX/" : "");
[650]	1615	$folders_list = array_slice($folders_list,0,$this->foldersLimit);
	1616
[2]	1617	$tmp = array();
[1816]	1618	$resultMine = array();
	1619	$resultDefault = array();
[1472]	1620
[1824]	1621	$inbox = 'INBOX';
	1622	$trash = $inbox . $this->imap_delimiter . $_SESSION['phpgw_info']['expressomail']['email_server']['imapDefaultTrashFolder'];
	1623	$drafts = $inbox . $this->imap_delimiter . $_SESSION['phpgw_info']['expressomail']['email_server']['imapDefaultDraftsFolder'];
	1624	$spam = $inbox . $this->imap_delimiter . $_SESSION['phpgw_info']['expressomail']['email_server']['imapDefaultSpamFolder'];
	1625	$sent = $inbox . $this->imap_delimiter . $_SESSION['phpgw_info']['expressomail']['email_server']['imapDefaultSentFolder'];
[1816]	1626
[2]	1627	if (is_array($folders_list)) {
	1628	reset($folders_list);
[1816]	1629	$this->ldap = new ldap_functions();
[1472]	1630
[2]	1631	$i = 0;
	1632	while (list($key, $val) = each($folders_list)) {
	1633	$status = imap_status($mbox_stream, $val->name, SA_UNSEEN);
[1035]	1634
[2]	1635	//$tmp_folder_id = explode("}", imap_utf7_decode($val->name));
	1636	$tmp_folder_id = explode("}", mb_convert_encoding($val->name, "ISO_8859-1", "UTF7-IMAP" ));
[1816]	1637	if($tmp_folder_id[1]=='INBOX'.$this->imap_delimiter.'decifradas') {
	1638	//error_log('passou', 3,'/tmp/imap_get_list.log');
	1639	//imap_deletemailbox($mbox_stream,imap_utf7_encode("{".$this->imap_server."}".'INBOX/decifradas'));
	1640	continue;
	1641	}
	1642	$result[$i]['folder_unseen'] = $status->unseen;
[2]	1643	$folder_id = $tmp_folder_id[1];
	1644	$result[$i]['folder_id'] = $folder_id;
[1472]	1645
[2]	1646	$tmp_folder_parent = explode($this->imap_delimiter, $folder_id);
	1647	$result[$i]['folder_name'] = array_pop($tmp_folder_parent);
[96]	1648	$result[$i]['folder_name'] = $result[$i]['folder_name'] == 'INBOX' ? 'Inbox' : $result[$i]['folder_name'];
[1816]	1649	if ($_SESSION['phpgw_info']['user']['preferences']['expressoMail']['uid2cn'] && substr($folder_id,0,4) == 'user') {
[1340]	1650	//$this->ldap = new ldap_functions();
[1816]	1651	if ($cn = $this->ldap->uid2cn($result[$i]['folder_name'])) {
[325]	1652	$result[$i]['folder_name'] = $cn;
	1653	}
	1654	}
[1472]	1655
[2]	1656	$tmp_folder_parent = implode($this->imap_delimiter, $tmp_folder_parent);
	1657	$result[$i]['folder_parent'] = $tmp_folder_parent == 'INBOX' ? '' : $tmp_folder_parent;
[1472]	1658
[96]	1659	if (($val->attributes == 32) && ($result[$i]['folder_name'] != 'Inbox'))
[2]	1660	$result[$i]['folder_hasChildren'] = 1;
	1661	else
	1662	$result[$i]['folder_hasChildren'] = 0;
	1663
[1816]	1664	switch ($tmp_folder_id[1]) {
[1824]	1665	case $inbox:
	1666	case $sent:
	1667	case $drafts:
	1668	case $spam:
	1669	case $trash:
[1816]	1670	$resultDefault[]=$result[$i];
	1671	default:
	1672	$resultMine[]=$result[$i];
	1673	}
	1674
[1472]	1675	$i++;
[2]	1676	}
	1677	}
[1472]	1678
[1816]	1679	// Sorting resultMine
	1680	foreach ($resultMine as $folder_info)
[2]	1681	{
	1682	$array_tmp[] = $folder_info['folder_id'];
	1683	}
[1472]	1684
[2]	1685	natcasesort($array_tmp);
[1472]	1686
[2]	1687	foreach ($array_tmp as $key => $folder_id)
	1688	{
[1816]	1689	$result2[] = $resultMine[$key];
[2]	1690	}
[1816]	1691
	1692	$resultDefault2=$resultDefault;
	1693	// Sorting resultDefault
	1694	foreach ($resultDefault as $key => $folder_id)
	1695	{
[1472]	1696
[1816]	1697	switch ($resultDefault[$key]['folder_id']) {
[1824]	1698	case $inbox:
[1816]	1699	$resultDefault2[0] = $resultDefault[$key];
	1700	break;
[1824]	1701	case $sent:
[1816]	1702	$resultDefault2[1] = $resultDefault[$key];
	1703	break;
[1824]	1704	case $drafts:
[1816]	1705	$resultDefault2[2] = $resultDefault[$key];
	1706	break;
[1824]	1707	case $spam:
[1816]	1708	$resultDefault2[3] = $resultDefault[$key];
	1709	break;
[1824]	1710	case $trash:
[1816]	1711	$resultDefault2[4] = $resultDefault[$key];
	1712	break;
	1713	}
	1714	}
	1715
	1716	// Merge default folders and mines
	1717	$result2 = array_merge($resultDefault2, $result2);
	1718
[449]	1719	$current_folder = "INBOX";
	1720	if($params && $params['folder'])
	1721	$current_folder = $params['folder'];
[1739]	1722	return array_merge($result2, $this->get_quota(array('folder_id' => $current_folder)));
[2]	1723	}
[1472]	1724
[2]	1725	function create_mailbox($arr)
	1726	{
	1727	$namebox = $arr['newp'];
	1728	$mbox_stream = $this->open_mbox();
	1729	$imap_server = $_SESSION['phpgw_info']['expressomail']['email_server']['imapServer'];
[51]	1730	$namebox = mb_convert_encoding($namebox, "UTF7-IMAP", "UTF-8");
[1472]	1731
[2]	1732	$result = "Ok";
[51]	1733	if(!imap_createmailbox($mbox_stream,"{".$imap_server."}$namebox"))
[2]	1734	{
	1735	$result = implode("<br />\n", imap_errors());
[1472]	1736	}
	1737
[51]	1738	if($mbox_stream)
	1739	imap_close($mbox_stream);
[1472]	1740
[2]	1741	return $result;
[1472]	1742
[2]	1743	}
[1472]	1744
[2]	1745	function create_extra_mailbox($arr)
	1746	{
	1747	$nameboxs = explode(";",$arr['nw_folders']);
	1748	$result = "";
	1749	$mbox_stream = $this->open_mbox();
	1750	$imap_server = $_SESSION['phpgw_info']['expressomail']['email_server']['imapServer'];
[1472]	1751	foreach($nameboxs as $key=>$tmp){
[2]	1752	if($tmp != ""){
	1753	if(!imap_createmailbox($mbox_stream,imap_utf7_encode("{".$imap_server."}$tmp"))){
	1754	$result = implode("<br />\n", imap_errors());
[51]	1755	if($mbox_stream)
[1472]	1756	imap_close($mbox_stream);
[2]	1757	return $result;
	1758	}
	1759	}
	1760	}
[51]	1761	if($mbox_stream)
	1762	imap_close($mbox_stream);
[2]	1763	return true;
	1764	}
[1472]	1765
[2]	1766	function delete_mailbox($arr)
	1767	{
	1768	$namebox = $arr['del_past'];
	1769	$imap_server = $_SESSION['phpgw_info']['expressomail']['email_server']['imapServer'];
[1953]	1770	$mbox_stream = $this->mbox ? $this->mbox : $this->open_mbox();
[2]	1771	//$del_folder = imap_deletemailbox($mbox_stream,"{".$imap_server."}INBOX.$namebox");
[1472]	1772
[2]	1773	$result = "Ok";
	1774	$namebox = mb_convert_encoding($namebox, "UTF7-IMAP","UTF-8");
	1775	if(!imap_deletemailbox($mbox_stream,"{".$imap_server."}$namebox"))
	1776	{
	1777	$result = implode("<br />\n", imap_errors());
	1778	}
[1953]	1779	/*
[51]	1780	if($mbox_stream)
	1781	imap_close($mbox_stream);
[1953]	1782	*/
[2]	1783	return $result;
	1784	}
[1472]	1785
[2]	1786	function ren_mailbox($arr)
	1787	{
	1788	$namebox = $arr['current'];
	1789	$new_box = $arr['rename'];
	1790	$imap_server = $_SESSION['phpgw_info']['expressomail']['email_server']['imapServer'];
	1791	$mbox_stream = $this->open_mbox();
	1792	//$ren_folder = imap_renamemailbox($mbox_stream,"{".$imap_server."}INBOX.$namebox","{".$imap_server."}INBOX.$new_box");
[1472]	1793
[2]	1794	$result = "Ok";
	1795	$namebox = mb_convert_encoding($namebox, "UTF7-IMAP","UTF-8");
[51]	1796	$new_box = mb_convert_encoding($new_box, "UTF7-IMAP","UTF-8");
[1472]	1797
[2]	1798	if(!imap_renamemailbox($mbox_stream,"{".$imap_server."}$namebox","{".$imap_server."}$new_box"))
	1799	{
[1472]	1800	$result = imap_errors();
[2]	1801	}
[51]	1802	if($mbox_stream)
	1803	imap_close($mbox_stream);
[2]	1804	return $result;
[1472]	1805
[2]	1806	}
[1472]	1807
[2]	1808	function get_num_msgs($params)
	1809	{
	1810	$folder = $params['folder'];
[411]	1811	if(!$this->mbox \|\| !is_resource($this->mbox)) {
[2]	1812	$this->mbox = $this->open_mbox($folder);
[411]	1813	if(!$this->mbox \|\| !is_resource($this->mbox))
[2]	1814	return imap_last_error();
[1472]	1815	}
[2]	1816	$num_msgs = imap_num_msg($this->mbox);
[432]	1817	if($this->mbox && is_resource($this->mbox))
[51]	1818	imap_close($this->mbox);
[1472]	1819
[2]	1820	return $num_msgs;
	1821	}
[1472]	1822
[1912]	1823	function folder_exists($folder){
	1824	$mbox = $this->open_mbox();
	1825	$serverString = "{".$this->imap_server.":".$this->imap_port.$this->imap_options."}";
	1826	$list = imap_getmailboxes($mbox,$serverString, $folder);
	1827	$return = is_array($list);
	1828	imap_close($mbox);
	1829	return $return;
	1830	}
	1831
[2]	1832	function send_mail($params)
	1833	{
	1834	include_once("class.phpmailer.php");
	1835	$mail = new PHPMailer();
	1836	include_once("class.db_functions.inc.php");
	1837	$db = new db_functions();
	1838	$fromaddress = $params['input_from'] ? explode(';',$params['input_from']) : "";
[449]	1839	##
	1840	# @AUTHOR Rodrigo Souza dos Santos
	1841	# @DATE 2008/09/17
	1842	# @BRIEF Checks if the user has permission to send an email with the email address used.
	1843	##
	1844	if ( is_array($fromaddress) && ($fromaddress[1] != $_SESSION['phpgw_info']['expressomail']['user']['email']) )
	1845	{
	1846	$deny = true;
	1847	foreach( $_SESSION['phpgw_info']['expressomail']['user']['shared_mailboxes'] as $key => $val )
	1848	if ( array_key_exists('mail', $val) && $val['mail'][0] == $fromaddress[1] )
	1849	$deny = false and end($_SESSION['phpgw_info']['expressomail']['user']['shared_mailboxes']);
	1850
	1851	if ( $deny )
	1852	return "The server denied your request to send a mail, you cannot use this mail address.";
	1853	}
[828]	1854
[707]	1855	//new_message_to backs to mailto: pattern
[708]	1856	$params['body'] = eregi_replace("<a href=\"javascript:new_message_to\('([^>]+)'\)\">[^>]+</a>","<a href='mailto:\\1'>\\1</a>",$params['body']);
[828]	1857
[2]	1858	$toaddress = implode(',',$db->getAddrs(explode(',',$params['input_to'])));
	1859	$ccaddress = implode(',',$db->getAddrs(explode(',',$params['input_cc'])));
	1860	$ccoaddress = implode(',',$db->getAddrs(explode(',',$params['input_cco'])));
	1861	$subject = $params['input_subject'];
[271]	1862	$msg_uid = $params['msg_id'];
[2]	1863	$return_receipt = $params['input_return_receipt'];
[614]	1864	$is_important = $params['input_important_message'];
[1035]	1865	$encrypt = $params['input_return_cripto'];
	1866	$signed = $params['input_return_digital'];
	1867
	1868	if($params['smime'])
	1869	{
	1870	$body = $params['smime'];
	1871	$mail->SMIME = true;
	1872	// A MSG assinada deve ser testada neste ponto.
	1873	// Testar o certificado e a integridade da msg....
[1174]	1874	include_once("../security/classes/CertificadoB.php");
[1035]	1875	$erros_acumulados = '';
	1876	$certificado = new certificadoB();
	1877	$validade = $certificado->verificar($body);
	1878	if(!$validade)
	1879	{
	1880	foreach($certificado->erros_ssl as $linha_erro)
	1881	{
	1882	$erros_acumulados .= $linha_erro;
	1883	}
	1884	}
	1885	else
	1886	{
	1887	// Testa o CERTIFICADO: se o CPF he o do usuario logado, se pode assinar msgs e se nao esta expirado...
	1888	if ($certificado->apresentado)
	1889	{
	1890	if($certificado->dados['EXPIRADO']) $erros_acumulados .='Certificado expirado.';
	1891	if($certificado->dados['CPF'] != $this->username) $erros_acumulados .=' CPF no certificado diferente do logado no expresso.';
	1892	if(!($certificado->dados['KEYUSAGE']['digitalSignature'] && $certificado->dados['EXTKEYUSAGE']['emailProtection'])) $erros_acumulados .=' Certificado nao permite assinar mensagens.';
	1893	}
	1894	else
	1895	{
	1896	$$erros_acumulados .= 'Nao foi possivel usar o certificado para assinar a msg';
	1897	}
	1898	}
	1899	if(!$erros_acumulados =='')
	1900	{
	1901	return $erros_acumulados;
	1902	}
	1903	}
	1904	else
	1905	{
	1906	$body = $params['body'];
	1907	}
[1247]	1908	//echo "<script language=\"javascript\">javascript:alert('".$body."');</script>";
[2]	1909	$attachments = $params['FILES'];
	1910	$forwarding_attachments = $params['forwarding_attachments'];
[689]	1911	$local_attachments = $params['local_attachments'];
[1912]	1912
	1913	//Test if must be saved in shared folder and change if necessary
	1914	if( $fromaddress[2] == 'y' ){
	1915	//build shared folder path
	1916	$newfolder = "user".$this->imap_delimiter.$fromaddress[3].$this->imap_delimiter.$this->imap_sentfolder;
	1917	if( $this->folder_exists($newfolder) ) $folder = $newfolder;
	1918	else $folder = $params['folder'];
	1919	} else {
	1920	$folder = $params['folder'];
	1921	}
	1922
[1472]	1923	$folder = mb_convert_encoding($folder, "UTF7-IMAP","ISO_8859-1");
	1924	$folder_name = $params['folder_name'];
[6]	1925	// Fix problem with cyrus delimiter changes.
[1472]	1926	// Dots in names: enabled/disabled.
[6]	1927	$folder = @eregi_replace("INBOX/", "INBOX".$this->imap_delimiter, $folder);
	1928	$folder = @eregi_replace("INBOX.", "INBOX".$this->imap_delimiter, $folder);
	1929	// End Fix.
[1472]	1930	if ($folder != 'null'){
[2]	1931	$mail->SaveMessageInFolder = $folder;
	1932	}
	1933	////////////////////////////////////////////////////////////////////////////////////////////////////
	1934	$mail->SMTPDebug = false;
[1035]	1935
	1936	if($signed && !$params['smime'])
	1937	{
	1938	$mail->Mailer = "smime";
	1939	$mail->SignedBody = true;
	1940	}
	1941	else
	1942	$mail->IsSMTP();
[1472]	1943
[2]	1944	$mail->Host = $_SESSION['phpgw_info']['expressomail']['email_server']['smtpServer'];
	1945	$mail->Port = $_SESSION['phpgw_info']['expressomail']['email_server']['smtpPort'];
	1946	$mail->From = $_SESSION['phpgw_info']['expressomail']['user']['email'];
	1947	$mail->FromName = $_SESSION['phpgw_info']['expressomail']['user']['fullname'];
	1948	if($fromaddress){
	1949	$mail->Sender = $mail->From;
	1950	$mail->SenderName = $mail->FromName;
	1951	$mail->FromName = $fromaddress[0];
	1952	$mail->From = $fromaddress[1];
	1953	}
[1472]	1954
[2]	1955	$this->add_recipients("to", $toaddress, &$mail);
	1956	$this->add_recipients("cc", $ccaddress, &$mail);
	1957	$this->add_recipients("cco", $ccoaddress, &$mail);
	1958	$mail->Subject = $subject;
	1959	$mail->IsHTML(true);
[1035]	1960	$mail->Body = $body;
[271]	1961
[1035]	1962	if (($encrypt && $signed && $params['smime']) \|\| ($encrypt && !$signed)) // a msg deve ser enviada cifrada...
	1963	{
	1964	$email = $this->add_recipients_cert($toaddress . ',' . $ccaddress. ',' .$ccoaddress);
	1965	$email = explode(",",$email);
	1966	// Deve ser testado se foram obtidos os certificados de todos os destinatarios.
	1967	// Deve ser verificado um numero limite de destinatarios.
	1968	// Deve ser verificado se os certificados sao validos.
	1969	// Se uma das verificacoes falhar, nao enviar o e-mail e avisar o usuario.
	1970	// O array $mail->Certs_crypt soh deve ser preenchido se os certificados passarem nas verificacoes.
	1971	$numero_maximo = $_SESSION['phpgw_info']['user']['preferences']['expressoMail']['num_max_certs_to_cipher']; // Este valor dever ser configurado pelo administrador do site ....
	1972	$erros_acumulados = "";
	1973	$aux_mails = array();
	1974	$mail_list = array();
	1975	if(count($email) > $numero_maximo)
	1976	{
	1977	$erros_acumulados .= "Excedido o numero maximo (" . $numero_maximo . ") de destinatarios para uma msg cifrada...." . chr(0x0A);
	1978	return $erros_acumulados;
	1979	}
	1980	// adiciona o email do remetente. eh para cifrar a msg para ele tambem. Assim vai poder visualizar a msg na pasta enviados..
	1981	$email[] = $_SESSION['phpgw_info']['expressomail']['user']['email'];
	1982	foreach($email as $item)
	1983	{
	1984	$certificate = $db->get_certificate(strtolower($item));
	1985	if(!$certificate)
	1986	{
	1987	$erros_acumulados .= "Chamada com parametro invalido. e-Mail nao pode ser vazio." . chr(0x0A);
	1988	return $erros_acumulados;
	1989	}
	1990
	1991	if (array_key_exists("dberr1", $certificate))
	1992	{
	1993
	1994	$erros_acumulados .= "Ocorreu um erro quando pesquisava certificados dos destinatarios para cifrar a msg." . chr(0x0A);
	1995	return $erros_acumulados;
	1996	}
	1997	if (array_key_exists("dberr2", $certificate))
	1998	{
	1999	$erros_acumulados .= $item . ' : Nao pode cifrar a msg. Certificado nao localizado.' . chr(0x0A);
	2000	//continue;
	2001	}
	2002	/* Retirado este teste para evitar mensagem de erro duplicada.
	2003	if (!array_key_exists("certs", $certificate))
	2004	{
	2005	$erros_acumulados .= $item . ' : Nao pode cifrar a msg. Certificado nao localizado.' . chr(0x0A);
	2006	continue;
	2007	}
	2008	*/
[1174]	2009	include_once("../security/classes/CertificadoB.php");
[1035]	2010
	2011	foreach ($certificate['certs'] as $registro)
	2012	{
	2013	$c1 = new certificadoB();
	2014	$c1->certificado($registro['chave_publica']);
	2015	if ($c1->apresentado)
	2016	{
	2017	$c2 = new Verifica_Certificado($c1->dados,$registro['chave_publica']);
	2018	if (!$c1->dados['EXPIRADO'] && !$c2->revogado && $c2->status)
	2019	{
	2020	$aux_mails[] = $registro['chave_publica'];
	2021	$mail_list[] = strtolower($item);
	2022	}
	2023	else
	2024	{
	2025	if ($c1->dados['EXPIRADO'] \|\| $c2->revogado)
	2026	{
	2027	$db->update_certificate($c1->dados['SERIALNUMBER'],$c1->dados['EMAIL'],$c1->dados['AUTHORITYKEYIDENTIFIER'],
	2028	$c1->dados['EXPIRADO'],$c2->revogado);
	2029	}
	2030
	2031	$erros_acumulados .= $item . ': ' . $c2->msgerro . chr(0x0A);
	2032	foreach($c2->erros_ssl as $linha)
	2033	{
	2034	$erros_acumulados .= $linha . chr(0x0A);
	2035	}
	2036	$erros_acumulados .= 'Emissor: ' . $c1->dados['EMISSOR'] . chr(0x0A);
	2037	$erros_acumulados .= $c1->dados['CRLDISTRIBUTIONPOINTS'] . chr(0x0A);
	2038	}
	2039	}
	2040	else
	2041	{
	2042	$erros_acumulados .= $item . ' : Nao pode cifrar a msg. Certificado invalido.' . chr(0x0A);
	2043	}
	2044	}
	2045	if(!(in_array(strtolower($item),$mail_list)) && !empty($erros_acumulados))
	2046	{
	2047	return $erros_acumulados;
	2048	}
	2049	}
	2050
	2051	$mail->Certs_crypt = $aux_mails;
	2052	}
	2053
[2]	2054	////////////////////////////////////////////////////////////////////////////////////////////////////
[271]	2055	// Build CID for embedded Images!!!
[449]	2056	$pattern = '/src="([^"]*?show_embedded_attach.php\?msg_folder=(.+)?&(amp;)?msg_num=(.+)?&(amp;)?msg_part=(.+)?)"/isU';
[271]	2057	$cid_imgs = '';
	2058	$name_cid_files = array();
	2059	preg_match_all($pattern,$mail->Body,$cid_imgs,PREG_PATTERN_ORDER);
	2060	$cid_array = array();
[449]	2061	foreach($cid_imgs[6] as $j => $val){
	2062	if ( !array_key_exists($cid_imgs[4][$j].$val, $cid_array) )
[271]	2063	{
[449]	2064	$cid_array[$cid_imgs[4][$j].$val] = base_convert(microtime(), 10, 36);
[271]	2065	}
[1472]	2066	$cid = $cid_array[$cid_imgs[4][$j].$val];
[271]	2067	$mail->Body = str_replace($cid_imgs[1][$j], "cid:".$cid, $mail->Body);
[1472]	2068
[1711]	2069	if (!$forwarding_attachments[$cid_imgs[6][$j]-2]) // The image isn't in the same mail?
[271]	2070	{
[449]	2071	$fileContent = $this->get_forwarding_attachment($cid_imgs[2][$j], $cid_imgs[4][$j], $cid_imgs[6][$j], 'base64');
[271]	2072	$fileName = "image_".($j).".jpg";
	2073	$fileCode = "base64";
	2074	$fileType = "image/jpg";
	2075	}
	2076	else
	2077	{
[449]	2078	$attach_img = $forwarding_attachments[$cid_imgs[6][$j]-2];
[271]	2079	$file_description = unserialize(rawurldecode($attach_img));
	2080
[1472]	2081	foreach($file_description as $i => $descriptor){
[271]	2082	$file_description[$i] = eregi_replace('\'*\'','',$descriptor);
	2083	}
[1711]	2084	$fileContent = $this->get_forwarding_attachment($file_description[0], $cid_imgs[4][$j], $file_description[3], 'base64');
[271]	2085	$fileName = $file_description[2];
	2086	$fileCode = $file_description[4];
	2087	$fileType = $this->get_file_type($file_description[2]);
[449]	2088	unset($forwarding_attachments[$cid_imgs[6][$j]-2]);
[271]	2089	}
	2090	$tempDir = ini_get("session.save_path");
[1472]	2091	$file = "cidimage_".$_SESSION[ 'phpgw_session' ][ 'session_id' ].$cid_imgs[6][$j].".dat";
[271]	2092	$f = fopen($tempDir.'/'.$file,"w");
	2093	fputs($f,$fileContent);
	2094	fclose($f);
	2095	if ($fileContent)
	2096	$mail->AddEmbeddedImage($tempDir.'/'.$file, $cid, $fileName, $fileCode, $fileType);
	2097	//else
[1472]	2098	// return "Error loading image attachment content";
[271]	2099
	2100	}
	2101	////////////////////////////////////////////////////////////////////////////////////////////////////
[2]	2102	// Build Uploading Attachments!!!
[689]	2103	if ((count($attachments)) && ($params['is_local_forward']!="1")) //Caso seja forward normal...
[2]	2104	{
	2105	$total_uploaded_size = 0;
[1264]	2106	$upload_max_filesize = str_replace("M","",$_SESSION['phpgw_info']['user']['preferences']['expressoMail']['max_attachment_size']) * 1024 * 1024;
[2]	2107	foreach ($attachments as $attach)
	2108	{
	2109	$mail->AddAttachment($attach['tmp_name'], $attach['name'], "base64", $this->get_file_type($attach['name'])); // optional name
	2110	$total_uploaded_size = $total_uploaded_size + $attach['size'];
	2111	}
[1247]	2112	if( $total_uploaded_size > $upload_max_filesize)
[1472]	2113	return $this->parse_error("message file too big");
[828]	2114	}
[689]	2115	else if(($params['is_local_forward']=="1") && (count($local_attachments))) { //Caso seja forward de mensagens locais
[828]	2116
[689]	2117	$total_uploaded_size = 0;
[1472]	2118	$upload_max_filesize = str_replace("M","",ini_get('upload_max_filesize')) * 1024 * 1024;
[689]	2119	foreach($local_attachments as $local_attachment) {
	2120	$file_description = unserialize(rawurldecode($local_attachment));
	2121	$tmp = array_values($file_description);
[1472]	2122	foreach($file_description as $i => $descriptor){
[689]	2123	$tmp[$i] = eregi_replace('\'*\'','',$descriptor);
	2124	}
	2125	$mail->AddAttachment($_FILES[$tmp[1]]['tmp_name'], $tmp[2], "base64", $this->get_file_type($tmp[2])); // optional name
	2126	$total_uploaded_size = $total_uploaded_size + $_FILES[$tmp[1]]['size'];
	2127	}
	2128	if( $total_uploaded_size > $upload_max_filesize)
[828]	2129	return 'false';
[689]	2130	}
[2]	2131	////////////////////////////////////////////////////////////////////////////////////////////////////
[271]	2132	// Build Forwarding Attachments!!!
[2]	2133	if (count($forwarding_attachments) > 0)
	2134	{
	2135	// Bug fixed for array_search function
	2136	if(count($name_cid_files) > 0) {
	2137	$name_cid_files[count($name_cid_files)] = $name_cid_files[0];
	2138	$name_cid_files[0] = null;
[1472]	2139	}
	2140
[2]	2141	foreach($forwarding_attachments as $forwarding_attachment)
	2142	{
[271]	2143	$file_description = unserialize(rawurldecode($forwarding_attachment));
	2144	$tmp = array_values($file_description);
[1472]	2145	foreach($file_description as $i => $descriptor){
[271]	2146	$tmp[$i] = eregi_replace('\'*\'','',$descriptor);
	2147	}
[1472]	2148	$file_description = $tmp;
[271]	2149	$fileContent = $this->get_forwarding_attachment($file_description[0], $file_description[1], $file_description[3],$file_description[4]);
	2150	$fileName = $file_description[2];
	2151	if(!array_search(trim($fileName),$name_cid_files)) {
	2152	$mail->AddStringAttachment($fileContent, $fileName, $file_description[4], $this->get_file_type($file_description[2]));
[63]	2153	}
[2]	2154	}
	2155	}
[37]	2156
[2]	2157	////////////////////////////////////////////////////////////////////////////////////////////////////
[614]	2158	// Important message
	2159	if($is_important)
	2160	$mail->isImportant();
	2161
	2162	////////////////////////////////////////////////////////////////////////////////////////////////////
[2]	2163	// Disposition-Notification-To
	2164	if ($return_receipt)
	2165	$mail->ConfirmReadingTo = $_SESSION['phpgw_info']['expressomail']['user']['email'];
	2166	////////////////////////////////////////////////////////////////////////////////////////////////////
[504]	2167
[117]	2168	$sent = $mail->Send();
[1472]	2169
[117]	2170	if(!$sent)
[2]	2171	{
[504]	2172	return $this->parse_error($mail->ErrorInfo);
[2]	2173	}
	2174	else
	2175	{
[1035]	2176	if ($signed && !$params['smime'])
	2177	{
	2178	return $sent;
	2179	}
[1472]	2180	if($_SESSION['phpgw_info']['server']['expressomail']['expressoMail_enable_log_messages'] == "True")
[117]	2181	{
	2182	$userid = $_SESSION['phpgw_info']['expressomail']['user']['userid'];
	2183	$userip = $_SESSION['phpgw_info']['expressomail']['user']['session_ip'];
	2184	$now = date("d/m/y H:i:s");
	2185	$addrs = $toaddress.$ccaddress.$ccoaddress;
[1472]	2186	$sent = trim($sent);
[117]	2187	error_log("$now - $userip - $sent [$subject] - $userid => $addrs\r\n", 3, "/home/expressolivre/mail_senders.log");
	2188	}
[1472]	2189	if($_SESSION['phpgw_info']['user']['preferences']['expressoMail']['number_of_contacts'] &&
[485]	2190	$_SESSION['phpgw_info']['user']['preferences']['expressoMail']['use_dynamic_contacts']) {
[469]	2191	$contacts = new dynamic_contacts();
[485]	2192	$new_contacts = $contacts->add_dynamic_contacts($toaddress.",".$ccaddress.",".$ccoaddress);
	2193	return array("success" => true, "new_contacts" => $new_contacts);
[413]	2194	}
[485]	2195	return array("success" => true);
[2]	2196	}
	2197	}
	2198
[1035]	2199	function add_recipients_cert($full_address)
	2200	{
	2201	$result = "";
	2202	$parse_address = imap_rfc822_parse_adrlist($full_address, "");
	2203	foreach ($parse_address as $val)
	2204	{
	2205	//echo "<script language=\"javascript\">javascript:alert('".$val->mailbox."@".$val->host."');</script>";
	2206	if ($val->mailbox == "INVALID_ADDRESS")
	2207	continue;
	2208	if ($val->mailbox == "UNEXPECTED_DATA_AFTER_ADDRESS")
	2209	continue;
	2210	if (empty($val->personal))
	2211	$result .= $val->mailbox."@".$val->host . ",";
	2212	else
	2213	$result .= $val->mailbox."@".$val->host . ",";
	2214	}
	2215
	2216	return substr($result,0,-1);
	2217	}
	2218
[2]	2219	function add_recipients($recipient_type, $full_address, $mail)
	2220	{
[1472]	2221	$parse_address = imap_rfc822_parse_adrlist($full_address, "");
	2222	foreach ($parse_address as $val)
[2]	2223	{
	2224	//echo "<script language=\"javascript\">javascript:alert('".$val->mailbox."@".$val->host."');</script>";
	2225	if ($val->mailbox == "INVALID_ADDRESS")
	2226	continue;
[1472]	2227
[2]	2228	if (empty($val->personal))
	2229	{
	2230	switch($recipient_type)
	2231	{
	2232	case "to":
	2233	$mail->AddAddress($val->mailbox."@".$val->host);
	2234	break;
	2235	case "cc":
	2236	$mail->AddCC($val->mailbox."@".$val->host);
	2237	break;
	2238	case "cco":
	2239	$mail->AddBCC($val->mailbox."@".$val->host);
	2240	break;
	2241	}
	2242	}
	2243	else
	2244	{
	2245	switch($recipient_type)
	2246	{
	2247	case "to":
	2248	$mail->AddAddress($val->mailbox."@".$val->host, $val->personal);
	2249	break;
	2250	case "cc":
	2251	$mail->AddCC($val->mailbox."@".$val->host, $val->personal);
	2252	break;
	2253	case "cco":
	2254	$mail->AddBCC($val->mailbox."@".$val->host, $val->personal);
	2255	break;
	2256	}
	2257	}
	2258	}
	2259	return true;
	2260	}
[1472]	2261
[2]	2262	function get_forwarding_attachment($msg_folder, $msg_number, $msg_part, $encoding)
	2263	{
[828]	2264	$mbox_stream = $this->open_mbox(utf8_decode(urldecode($msg_folder)));
[1472]	2265	$fileContent = imap_fetchbody($mbox_stream, $msg_number, $msg_part, FT_UID);
[2]	2266	if($encoding == 'base64')
[449]	2267	# The function imap_base64 adds a new line
	2268	# at ASCII text, with CRLF line terminators.
	2269	# So is being exchanged for base64_decode.
	2270	#
	2271	#$fileContent = imap_base64($fileContent);
	2272	$fileContent = base64_decode($fileContent);
[2]	2273	else if($encoding == 'quoted-printable')
[1472]	2274	$fileContent = quoted_printable_decode($fileContent);
[2]	2275	return $fileContent;
	2276	}
[1472]	2277
[2]	2278	function del_last_caracter($string)
	2279	{
	2280	$string = substr($string,0,(strlen($string) - 1));
[1472]	2281	return $string;
[2]	2282	}
[1472]	2283
[2]	2284	function del_last_two_caracters($string)
	2285	{
	2286	$string = substr($string,0,(strlen($string) - 2));
[1472]	2287	return $string;
[2]	2288	}
[1472]	2289
[828]	2290	function messages_sort($sort_box_type,$sort_box_reverse, $search_box_type,$offsetBegin,$offsetEnd)
[659]	2291	{
[1625]	2292	if ($sort_box_type != "SORTFROM" && $search_box_type!= "FLAGGED"){
[970]	2293	$imapsort = imap_sort($this->mbox,constant($sort_box_type),$sort_box_reverse,SE_UID,$search_box_type);
	2294	foreach($imapsort as $iuid)
	2295	$sort[$iuid] = "";
[1518]	2296
	2297	if ($offsetBegin == -1 && $offsetEnd ==-1 )
	2298	$slice_array = false;
	2299	else
	2300	$slice_array = true;
[970]	2301	}
	2302	else
[659]	2303	{
[970]	2304	$sort = array();
	2305	if ($offsetBegin > $offsetEnd) {$temp=$offsetEnd; $offsetEnd=$offsetBegin; $offsetBegin=$temp;}
	2306	$num_msgs = imap_num_msg($this->mbox);
	2307	if ($offsetEnd > $num_msgs) {$offsetEnd = $num_msgs;}
[975]	2308	$slice_array = true;
	2309
[983]	2310	for ($i=$num_msgs; $i>0; $i--)
[828]	2311	{
[983]	2312	if ($sort_box_type == "SORTARRIVAL" && $sort_box_reverse && count($sort) >= $offsetEnd)
	2313	break;
[970]	2314	$iuid = @imap_uid($this->mbox,$i);
	2315	$header = $this->get_header($iuid);
	2316	// List UNSEEN messages.
	2317	if($search_box_type == "UNSEEN" && (!trim($header->Recent) && !trim($header->Unseen))){
	2318	continue;
	2319	}
	2320	// List SEEN messages.
	2321	elseif($search_box_type == "SEEN" && (trim($header->Recent) \|\| trim($header->Unseen))){
	2322	continue;
	2323	}
	2324	// List ANSWERED messages.
	2325	elseif($search_box_type == "ANSWERED" && !trim($header->Answered)){
	2326	continue;
	2327	}
	2328	// List FLAGGED messages.
	2329	elseif($search_box_type == "FLAGGED" && !trim($header->Flagged)){
	2330	continue;
	2331	}
	2332
	2333	if($sort_box_type=='SORTFROM') {
	2334	if (($header->from[0]->mailbox . "@" . $header->from[0]->host) == $_SESSION['phpgw_info']['expressomail']['user']['email'])
	2335	$from = $header->to;
	2336	else
	2337	$from = $header->from;
	2338
	2339	$tmp = imap_mime_header_decode($from[0]->personal);
	2340
	2341	if ($tmp[0]->text != "")
	2342	$sort[$iuid] = $tmp[0]->text;
	2343	else
	2344	$sort[$iuid] = $from[0]->mailbox . "@" . $from[0]->host;
	2345	}
	2346	else if($sort_box_type=='SORTSUBJECT') {
	2347	$sort[$iuid] = $header->subject;
	2348	}
	2349	else if($sort_box_type=='SORTSIZE') {
	2350	$sort[$iuid] = $header->Size;
	2351	}
	2352	else {
	2353	$sort[$iuid] = $header->udate;
	2354	}
	2355
[659]	2356	}
[970]	2357	natcasesort($sort);
[828]	2358
[970]	2359	if ($sort_box_reverse)
	2360	$sort = array_reverse($sort,true);
[659]	2361	}
[828]	2362
[972]	2363	if(!is_array($sort))
	2364	$sort = array();
[1472]	2365
[1808]	2366
[972]	2367	if ($slice_array)
[828]	2368	$sort = array_slice($sort,$offsetBegin-1,$offsetEnd-($offsetBegin-1),true);
[970]	2369
[1472]	2370
[828]	2371	return $sort;
	2372
[659]	2373	}
[970]	2374
	2375
[1472]	2376	function move_search_messages($params){
	2377	$params['selected_messages'] = urldecode($params['selected_messages']);
[163]	2378	$params['new_folder'] = urldecode($params['new_folder']);
	2379	$params['new_folder_name'] = urldecode($params['new_folder_name']);
	2380	$sel_msgs = explode(",", $params['selected_messages']);
[1472]	2381	@reset($sel_msgs);
[163]	2382	$sorted_msgs = array();
	2383	foreach($sel_msgs as $idx => $sel_msg) {
	2384	$sel_msg = explode(";", $sel_msg);
	2385	if(array_key_exists($sel_msg[0], $sorted_msgs)){
	2386	$sorted_msgs[$sel_msg[0]] .= ",".$sel_msg[1];
[1472]	2387	}
[163]	2388	else {
	2389	$sorted_msgs[$sel_msg[0]] = $sel_msg[1];
	2390	}
	2391	}
	2392	@ksort($sorted_msgs);
[1472]	2393	$last_return = false;
	2394	foreach($sorted_msgs as $folder => $msgs_number) {
[163]	2395	$params['msgs_number'] = $msgs_number;
[1472]	2396	$params['folder'] = $folder;
[163]	2397	if($params['new_folder'] && $folder != $params['new_folder']){
[1472]	2398	$last_return = $this -> move_messages($params);
[163]	2399	}
	2400	elseif(!$params['new_folder'] \|\| $params['delete'] ){
	2401	$last_return = $this -> delete_msgs($params);
	2402	$last_return['deleted'] = true;
	2403	}
	2404	}
	2405	return $last_return;
	2406	}
[1472]	2407
[2]	2408	function move_messages($params)
	2409	{
[1472]	2410	$folder = $params['folder'];
	2411	$mbox_stream = $this->open_mbox($folder);
[51]	2412	$newmailbox = ($params['new_folder']);
	2413	$newmailbox = mb_convert_encoding($newmailbox, "UTF7-IMAP","ISO_8859-1");
[2]	2414	$new_folder_name = $params['new_folder_name'];
	2415	$msgs_number = $params['msgs_number'];
	2416	$return = array('msgs_number' => $msgs_number,
	2417	'folder' => $folder,
	2418	'new_folder_name' => $new_folder_name,
[325]	2419	'border_ID' => $params['border_ID'],
	2420	'status' => true); //Status foi adicionado para validar as permissoes ACL
[1472]	2421
[325]	2422	//Este bloco tem a finalidade de averiguar as permissoes para pastas compartilhadas
	2423	if (substr($folder,0,4) == 'user'){
	2424	$acl = $this->getacltouser($folder);
	2425	/*
	2426	* l - lookup (mailbox is visible to LIST/LSUB commands)
	2427	* r - read (SELECT the mailbox, perform CHECK, FETCH, PARTIAL, SEARCH, COPY from mailbox)
	2428	* s - keep seen/unseen information across sessions (STORE SEEN flag)
	2429	* w - write (STORE flags other than SEEN and DELETED)
	2430	* i - insert (perform APPEND, COPY into mailbox)
	2431	* p - post (send mail to submission address for mailbox, not enforced by IMAP4 itself)
	2432	* c - create (CREATE new sub-mailboxes in any implementation-defined hierarchy)
	2433	* d - delete (STORE DELETED flag, perform EXPUNGE)
	2434	* a - administer (perform SETACL)
	2435	*/
	2436	if (strpos($acl, "d") === false){
	2437	$return['status'] = false;
	2438	return $return;
	2439	}
	2440	}
[432]	2441	//Este bloco tem a finalidade de transformar o CPF das pastas compartilhadas em common name
[1747]	2442	if ($_SESSION['phpgw_info']['user']['preferences']['expressoMail']['uid2cn']){
	2443	if (substr($new_folder_name,0,4) == 'user'){
	2444	$this->ldap = new ldap_functions();
	2445	$tmp_folder_name = explode($this->imap_delimiter, $new_folder_name);
	2446	$return['new_folder_name'] = array_pop($tmp_folder_name);
	2447	if( $cn = $this->ldap->uid2cn($return['new_folder_name']))
	2448	{
	2449	$return['new_folder_name'] = $cn;
	2450	}
	2451	}
[432]	2452	}
[1472]	2453
	2454	// Caso estejamos no box principal, nao eh necessario pegar a informacao da mensagem anterior.
[51]	2455	if (($params['get_previous_msg']) && ($params['border_ID'] != 'null') && ($params['border_ID'] != ''))
[449]	2456	{
[2]	2457	$return['previous_msg'] = $this->get_info_previous_msg($params);
[449]	2458	// Fix problem in unserialize function JS.
	2459	$return['previous_msg']['body'] = str_replace(array('{','}'), array('{','}'), $return['previous_msg']['body']);
	2460	}
[1472]	2461
	2462	$mbox_stream = $this->open_mbox($folder);
[2]	2463	if(imap_mail_move($mbox_stream, $msgs_number, $newmailbox, CP_UID)) {
	2464	imap_expunge($mbox_stream);
[51]	2465	if($mbox_stream)
	2466	imap_close($mbox_stream);
[2]	2467	return $return;
	2468	}else {
[1472]	2469	if(strstr(imap_last_error(),'Over quota')) {
[2]	2470	$accountID = $_SESSION['phpgw_info']['expressomail']['email_server']['imapAdminUsername'];
[1472]	2471	$pass = $_SESSION['phpgw_info']['expressomail']['email_server']['imapAdminPW'];
	2472	$userID = $_SESSION['phpgw_info']['expressomail']['user']['userid'];
[2]	2473	$server = $_SESSION['phpgw_info']['expressomail']['email_server']['imapServer'];
[504]	2474	$mbox = @imap_open("{".$this->imap_server.":".$this->imap_port.$this->imap_options."}INBOX", $accountID, $pass) or die(serialize(array('imap_error' => $this->parse_error(imap_last_error()))));
[2]	2475	if(!$mbox)
	2476	return imap_last_error();
[1472]	2477	$quota = imap_get_quotaroot($mbox_stream, "INBOX");
[2]	2478	if(! imap_set_quota($mbox, "user".$this->imap_delimiter.$userID, 2.1 * $quota['usage'])) {
[51]	2479	if($mbox_stream)
	2480	imap_close($mbox_stream);
[1472]	2481	if($mbox)
[51]	2482	imap_close($mbox);
[1472]	2483	return "move_messages(): Error setting quota for MOVE or DELETE!! ". "user".$this->imap_delimiter.$userID." line ".__LINE__."\n";
[2]	2484	}
	2485	if(imap_mail_move($mbox_stream, $msgs_number, $newmailbox, CP_UID)) {
	2486	imap_expunge($mbox_stream);
[51]	2487	if($mbox_stream)
	2488	imap_close($mbox_stream);
[2]	2489	// return to original quota limit.
	2490	if(!imap_set_quota($mbox, "user".$this->imap_delimiter.$userID, $quota['limit'])) {
[51]	2491	if($mbox)
	2492	imap_close($mbox);
[1472]	2493	return "move_messages(): Error setting quota for MOVE or DELETE!! line ".__LINE__."\n";
[2]	2494	}
[1472]	2495	return $return;
[2]	2496	}
	2497	else {
[51]	2498	if($mbox_stream)
	2499	imap_close($mbox_stream);
[2]	2500	if(!imap_set_quota($mbox, "user".$this->imap_delimiter.$userID, $quota['limit'])) {
[51]	2501	if($mbox)
	2502	imap_close($mbox);
[1472]	2503	return "move_messages(): Error setting quota for MOVE or DELETE!! line ".__LINE__."\n";
[2]	2504	}
[1472]	2505	return imap_last_error();
[2]	2506	}
[1472]	2507
[2]	2508	}
	2509	else {
[51]	2510	if($mbox_stream)
	2511	imap_close($mbox_stream);
	2512	return "move_messages() line ".__LINE__.": ". imap_last_error()." folder:".$newmailbox;
[2]	2513	}
[1472]	2514	}
[2]	2515	}
[1472]	2516
[2]	2517	function save_msg($params)
	2518	{
[1472]	2519
[271]	2520	include_once("class.phpmailer.php");
	2521	$mail = new PHPMailer();
	2522	include_once("class.db_functions.inc.php");
	2523	$toaddress = $params['input_to'];
	2524	$ccaddress = $params['input_cc'];
[1638]	2525	$ccoaddress = $params['input_cco'];
[271]	2526	$subject = $params['input_subject'];
[320]	2527	$msg_uid = $params['msg_id'];
[2]	2528	$body = $params['body'];
	2529	$body = str_replace("%nbsp;"," ",$params['body']);
[155]	2530	$body = preg_replace("/\n/"," ",$body);
[51]	2531	$body = preg_replace("/\r/","",$body);
[271]	2532	$forwarding_attachments = $params['forwarding_attachments'];
	2533	$attachments = $params['FILES'];
	2534	$return_files = $params['FILES'];
[1472]	2535
[271]	2536	$folder = $params['folder'];
[1472]	2537	$folder = mb_convert_encoding($folder, "UTF7-IMAP","ISO_8859-1");
[271]	2538	// Fix problem with cyrus delimiter changes.
[1472]	2539	// Dots in names: enabled/disabled.
[271]	2540	$folder = @eregi_replace("INBOX/", "INBOX".$this->imap_delimiter, $folder);
	2541	$folder = @eregi_replace("INBOX.", "INBOX".$this->imap_delimiter, $folder);
	2542	// End Fix.
[1638]	2543	if(strtoupper($folder) == 'INBOX/DRAFTS')
	2544	{
	2545	$mail->SaveMessageAsDraft = $folder;
	2546	}
[271]	2547	$mail->SaveMessageInFolder = $folder;
	2548	$mail->SMTPDebug = false;
[1472]	2549
[271]	2550	$mail->IsSMTP();
	2551	$mail->Host = $_SESSION['phpgw_info']['expressomail']['email_server']['smtpServer'];
	2552	$mail->Port = $_SESSION['phpgw_info']['expressomail']['email_server']['smtpPort'];
	2553	$mail->From = $_SESSION['phpgw_info']['expressomail']['user']['email'];
	2554	$mail->FromName = $_SESSION['phpgw_info']['expressomail']['user']['fullname'];
[1472]	2555
[271]	2556	$mail->Sender = $mail->From;
	2557	$mail->SenderName = $mail->FromName;
	2558	$mail->FromName = $_SESSION['phpgw_info']['expressomail']['user']['fullname'];
	2559	$mail->From = $_SESSION['phpgw_info']['expressomail']['user']['email'];
[1472]	2560
[271]	2561	$this->add_recipients("to", $toaddress, &$mail);
	2562	$this->add_recipients("cc", $ccaddress, &$mail);
[1638]	2563	$this->add_recipients("cco", $ccoaddress, &$mail);
[271]	2564	$mail->Subject = $subject;
	2565	$mail->IsHTML(true);
	2566	$mail->Body = $body;
[1472]	2567
[320]	2568	// Build CID for embedded Images!!!
[449]	2569	$pattern = '/src="([^"]*?show_embedded_attach.php\?msg_folder=(.+)?&(amp;)?msg_num=(.+)?&(amp;)?msg_part=(.+)?)"/isU';
[320]	2570	$cid_imgs = '';
	2571	$name_cid_files = array();
	2572	preg_match_all($pattern,$mail->Body,$cid_imgs,PREG_PATTERN_ORDER);
	2573	$cid_array = array();
[449]	2574	foreach($cid_imgs[6] as $j => $val){
	2575	if ( !array_key_exists($cid_imgs[4][$j].$val, $cid_array) )
[320]	2576	{
[449]	2577	$cid_array[$cid_imgs[4][$j].$val] = base_convert(microtime(), 10, 36);
[320]	2578	}
[1472]	2579	$cid = $cid_array[$cid_imgs[4][$j].$val];
[320]	2580	$mail->Body = str_replace($cid_imgs[1][$j], "cid:".$cid, $mail->Body);
[1472]	2581
[449]	2582	if ($msg_uid != $cid_imgs[4][$j]) // The image isn't in the same mail?
[320]	2583	{
[449]	2584	$fileContent = $this->get_forwarding_attachment($cid_imgs[2][$j], $cid_imgs[4][$j], $cid_imgs[6][$j], 'base64');
	2585	//prototype: get_forwarding_attachment ( folder, msg number, part, encoding)
[320]	2586	$fileName = "image_".($j).".jpg";
	2587	$fileCode = "base64";
	2588	$fileType = "image/jpg";
[449]	2589	$file_attached[0] = $cid_imgs[2][$j];
	2590	$file_attached[1] = $cid_imgs[4][$j];
	2591	$file_attached[2] = $fileName;
	2592	$file_attached[3] = $cid_imgs[6][$j];
	2593	$file_attached[4] = 'base64';
	2594	$file_attached[5] = strlen($fileContent); //Size of file
	2595	$return_forward[] = $file_attached;
[320]	2596	}
	2597	else
	2598	{
[449]	2599	$attach_img = $forwarding_attachments[$cid_imgs[6][$j]-2];
[320]	2600	$file_description = unserialize(rawurldecode($attach_img));
[1472]	2601	foreach($file_description as $i => $descriptor){
[320]	2602	$file_description[$i] = eregi_replace('\'*\'','',$descriptor);
	2603	}
	2604	$fileContent = $this->get_forwarding_attachment($file_description[0], $msg_uid, $file_description[3], 'base64');
	2605	$fileName = $file_description[2];
	2606	$fileCode = $file_description[4];
	2607	$fileType = $this->get_file_type($file_description[2]);
[449]	2608	unset($forwarding_attachments[$cid_imgs[6][$j]-2]);
[320]	2609	if (!empty($file_description))
	2610	{
	2611	$file_description[5] = strlen($fileContent); //Size of file
	2612	$return_forward[] = $file_description;
	2613	}
	2614	}
	2615	$tempDir = ini_get("session.save_path");
[1472]	2616	$file = "cidimage_".$_SESSION[ 'phpgw_session' ][ 'session_id' ].$cid_imgs[6][$j].".dat";
[320]	2617	$f = fopen($tempDir.'/'.$file,"w");
	2618	fputs($f,$fileContent);
	2619	fclose($f);
	2620	if ($fileContent)
	2621	$mail->AddEmbeddedImage($tempDir.'/'.$file, $cid, $fileName, $fileCode, $fileType);
	2622	//else
[1472]	2623	// return "Error loading image attachment content";
[320]	2624
	2625	}
[1472]	2626
	2627	// Build Forwarding Attachments!!!
[271]	2628	if (count($forwarding_attachments) > 0)
	2629	{
	2630	foreach($forwarding_attachments as $forwarding_attachment)
	2631	{
	2632	$file_description = unserialize(rawurldecode($forwarding_attachment));
	2633	$tmp = array_values($file_description);
[1472]	2634	foreach($file_description as $i => $descriptor){
[271]	2635	$tmp[$i] = eregi_replace('\'*\'','',$descriptor);
	2636	}
	2637	$file_description = $tmp;
[1472]	2638
[271]	2639	$fileContent = $this->get_forwarding_attachment($file_description[0], $file_description[1], $file_description[3],$file_description[4]);
	2640	$fileName = $file_description[2];
[1472]	2641
[271]	2642	$file_description[5] = strlen($fileContent); //Size of file
	2643	$return_forward[] = $file_description;
[1472]	2644
[271]	2645	$mail->AddStringAttachment($fileContent, $fileName, $file_description[4], $this->get_file_type($file_description[2]));
	2646	}
	2647	}
[1472]	2648
[271]	2649	if ((count($return_forward) > 0) && (count($return_files) > 0))
	2650	$return_files = array_merge_recursive($return_forward,$return_files);
	2651	else
	2652	if (count($return_files) < 1)
	2653	$return_files = $return_forward;
[1472]	2654
[271]	2655	// Build Uploading Attachments!!!
[1005]	2656	$sizeof_attachments = count($attachments);
	2657	if ($sizeof_attachments)
	2658	foreach ($attachments as $numb => $attach){
	2659	if ($numb == ($sizeof_attachments-1) && $params['insertImg'] == 'true'){ // Auto-resize image
	2660	list($width, $height,$image_type) = getimagesize($attach['tmp_name']);
	2661	switch ($image_type)
	2662	{
[1380]	2663	// Do not corrupt animated gif
	2664	//case 1: $image_big = imagecreatefromgif($attach['tmp_name']);break;
[1005]	2665	case 2: $image_big = imagecreatefromjpeg($attach['tmp_name']); break;
	2666	case 3: $image_big = imagecreatefrompng($attach['tmp_name']); break;
	2667	case 6:
[1247]	2668	require_once("gd_functions.php");
[1005]	2669	$image_big = imagecreatefrombmp($attach['tmp_name']); break;
	2670	default:
	2671	$mail->AddAttachment($attach['tmp_name'], $attach['name'], "base64", $this->get_file_type($attach['name']));
	2672	break;
	2673	}
	2674	header('Content-type: image/jpeg');
	2675	$max_resolution = $_SESSION['phpgw_info']['user']['preferences']['expressoMail']['image_size'];
	2676	$max_resolution = ($max_resolution==""?'65536':$max_resolution);
	2677	if ($width < $max_resolution && $height < $max_resolution){
	2678	$new_width = $width;
	2679	$new_height = $height;
	2680	}
	2681	else if ($width > $max_resolution){
	2682	$new_width = $max_resolution;
	2683	$new_height = $height*($new_width/$width);
	2684	}
	2685	else {
	2686	$new_height = $max_resolution;
	2687	$new_width = $width*($new_height/$height);
	2688	}
	2689	$image_new = imagecreatetruecolor($new_width, $new_height);
	2690	imagecopyresampled($image_new, $image_big, 0, 0, 0, 0, $new_width, $new_height, $width, $height);
	2691	$tmpDir = ini_get("session.save_path");
[1472]	2692	$_file = "/cidimage_".$_SESSION[ 'phpgw_session' ][ 'session_id' ].".dat";
[1005]	2693	imagejpeg($image_new,$tmpDir.$_file, 85);
	2694	$mail->AddAttachment($tmpDir.$_file, $attach['name'], "base64", $this->get_file_type($tmpDir.$_file));
	2695	}
	2696	else
	2697	$mail->AddAttachment($attach['tmp_name'], $attach['name'], "base64", $this->get_file_type($attach['name']));
	2698	// optional name
	2699	}
[1472]	2700
	2701
	2702
	2703
[271]	2704	if(!empty($mail->AltBody))
	2705	$mail->ContentType = "multipart/alternative";
	2706
[828]	2707	$mail->error_count = 0; // reset errors
	2708	$mail->SetMessageType();
	2709	$header = $mail->CreateHeader();
[1472]	2710	$body = $mail->CreateBody();
[828]	2711
[1472]	2712	$mbox_stream = $this->open_mbox($folder);
[271]	2713	$new_header = str_replace("\n", "\r\n", $header);
	2714	$new_body = str_replace("\n", "\r\n", $body);
[830]	2715	$return['append'] = imap_append($mbox_stream, "{".$this->imap_server.":".$this->imap_port."}".$folder, $new_header . $new_body, "\\Seen \\Draft");
[271]	2716	$status = imap_status($mbox_stream, "{".$this->imap_server.":".$this->imap_port."}".$folder, SA_UIDNEXT);
	2717	$return['msg_no'] = $status->uidnext - 1;
	2718	$return['folder_id'] = $folder;
[828]	2719
[51]	2720	if($mbox_stream)
	2721	imap_close($mbox_stream);
[1472]	2722	if (is_array($return_files))
[828]	2723	foreach ($return_files as $index => $_attachment) {
	2724	if (array_key_exists("name",$_attachment)){
[271]	2725	unset($return_files[$index]);
	2726	$return_files[$index] = $_attachment['name']."_SIZE_".$return_files[$index][1] = $_attachment['size'];
	2727	}
	2728	else
	2729	{
	2730	unset($return_files[$index]);
	2731	$return_files[$index] = $_attachment[2]."_SIZE_". $return_files[$index][1] = $_attachment[5];
	2732	}
	2733	}
[1472]	2734
[271]	2735	$return['files'] = serialize($return_files);
[673]	2736	$return["subject"] = $subject;
[1472]	2737
[2]	2738	if (!$return['append'])
	2739	$return['append'] = imap_last_error();
[1472]	2740
[2]	2741	return $return;
	2742	}
[1472]	2743
[2]	2744	function set_messages_flag($params)
	2745	{
	2746	$folder = $params['folder'];
	2747	$msgs_to_set = $params['msgs_to_set'];
	2748	$flag = $params['flag'];
	2749	$return = array();
	2750	$return["msgs_to_set"] = $msgs_to_set;
	2751	$return["flag"] = $flag;
[1472]	2752
[411]	2753	if(!$this->mbox && !is_resource($this->mbox))
[51]	2754	$this->mbox = $this->open_mbox($folder);
[1472]	2755
[2]	2756	if ($flag == "unseen")
[51]	2757	$return["status"] = imap_clearflag_full($this->mbox, $msgs_to_set, "\\Seen", ST_UID);
[2]	2758	elseif ($flag == "seen")
[51]	2759	$return["status"] = imap_setflag_full($this->mbox, $msgs_to_set, "\\Seen", ST_UID);
[2]	2760	elseif ($flag == "answered"){
[51]	2761	$return["status"] = imap_setflag_full($this->mbox, $msgs_to_set, "\\Answered", ST_UID);
	2762	imap_clearflag_full($this->mbox, $msgs_to_set, "\\Draft", ST_UID);
[2]	2763	}
	2764	elseif ($flag == "forwarded")
[51]	2765	$return["status"] = imap_setflag_full($this->mbox, $msgs_to_set, "\\Answered \\Draft", ST_UID);
[2]	2766	elseif ($flag == "flagged")
[51]	2767	$return["status"] = imap_setflag_full($this->mbox, $msgs_to_set, "\\Flagged", ST_UID);
[614]	2768	elseif ($flag == "unflagged") {
	2769	$flag_importance = false;
	2770	$msgs_number = explode(",",$msgs_to_set);
[659]	2771	$unflagged_msgs = "";
[614]	2772	foreach($msgs_number as $msg_number) {
	2773	preg_match('/importance : (.*)\r/i',
	2774	imap_fetchheader($this->mbox, imap_msgno($this->mbox, $msg_number))
[1472]	2775	,$importance);
[673]	2776	if(strtolower($importance[1])=="high" && $_SESSION['phpgw_info']['user']['preferences']['expressoMail']['use_important_flag']) {
[614]	2777	$flag_importance=true;
	2778	}
[659]	2779	else {
	2780	$unflagged_msgs.=$msg_number.",";
[1472]	2781	}
[614]	2782	}
	2783
[659]	2784	if($unflagged_msgs!="") {
	2785	imap_clearflag_full($this->mbox,substr($unflagged_msgs,0,strlen($unflagged_msgs)-1), "\\Flagged", ST_UID);
	2786	$return["msgs_unflageds"] = substr($unflagged_msgs,0,strlen($unflagged_msgs)-1);
	2787	}
	2788	else {
	2789	$return["msgs_unflageds"] = false;
	2790	}
	2791
[673]	2792	if($flag_importance && $_SESSION['phpgw_info']['user']['preferences']['expressoMail']['use_important_flag']) {
[614]	2793	$return["status"] = false;
	2794	$return["msg"] = $this->functions->getLang("At least one of selected message cant be marked as normal");
	2795	}
[659]	2796	else {
	2797	$return["status"] = true;
	2798	}
[614]	2799	}
[1472]	2800
[411]	2801	if($this->mbox && is_resource($this->mbox))
[51]	2802	imap_close($this->mbox);
[2]	2803	return $return;
	2804	}
[1472]	2805
[2]	2806	function get_file_type($file_name)
	2807	{
	2808	$file_name = strtolower($file_name);
	2809	$strFileType = strrev(substr(strrev($file_name),0,4));
[1472]	2810	if ($strFileType == ".asf")
[2]	2811	return "video/x-ms-asf";
	2812	if ($strFileType == ".avi")
	2813	return "video/avi";
	2814	if ($strFileType == ".doc")
	2815	return "application/msword";
	2816	if ($strFileType == ".zip")
	2817	return "application/zip";
	2818	if ($strFileType == ".xls")
	2819	return "application/vnd.ms-excel";
	2820	if ($strFileType == ".gif")
	2821	return "image/gif";
	2822	if ($strFileType == ".jpg" \|\| $strFileType == "jpeg")
	2823	return "image/jpeg";
	2824	if ($strFileType == ".png")
	2825	return "image/png";
	2826	if ($strFileType == ".wav")
	2827	return "audio/wav";
	2828	if ($strFileType == ".mp3")
	2829	return "audio/mpeg3";
	2830	if ($strFileType == ".mpg" \|\| $strFileType == "mpeg")
	2831	return "video/mpeg";
	2832	if ($strFileType == ".rtf")
	2833	return "application/rtf";
	2834	if ($strFileType == ".htm" \|\| $strFileType == "html")
	2835	return "text/html";
[1472]	2836	if ($strFileType == ".xml")
[2]	2837	return "text/xml";
[1472]	2838	if ($strFileType == ".xsl")
[2]	2839	return "text/xsl";
[1472]	2840	if ($strFileType == ".css")
[2]	2841	return "text/css";
[1472]	2842	if ($strFileType == ".php")
[2]	2843	return "text/php";
[1472]	2844	if ($strFileType == ".asp")
[2]	2845	return "text/asp";
	2846	if ($strFileType == ".pdf")
	2847	return "application/pdf";
	2848	if ($strFileType == ".txt")
	2849	return "text/plain";
	2850	if ($strFileType == ".wmv")
	2851	return "video/x-ms-wmv";
	2852	if ($strFileType == ".sxc")
	2853	return "application/vnd.sun.xml.calc";
	2854	if ($strFileType == ".stc")
	2855	return "application/vnd.sun.xml.calc.template";
	2856	if ($strFileType == ".sxd")
	2857	return "application/vnd.sun.xml.draw";
	2858	if ($strFileType == ".std")
	2859	return "application/vnd.sun.xml.draw.template";
	2860	if ($strFileType == ".sxi")
	2861	return "application/vnd.sun.xml.impress";
	2862	if ($strFileType == ".sti")
	2863	return "application/vnd.sun.xml.impress.template";
	2864	if ($strFileType == ".sxm")
	2865	return "application/vnd.sun.xml.math";
	2866	if ($strFileType == ".sxw")
	2867	return "application/vnd.sun.xml.writer";
	2868	if ($strFileType == ".sxq")
	2869	return "application/vnd.sun.xml.writer.global";
	2870	if ($strFileType == ".stw")
	2871	return "application/vnd.sun.xml.writer.template";
[1472]	2872
	2873
	2874	return "application/octet-stream";
[2]	2875	}
[1472]	2876
[2]	2877	function htmlspecialchars_encode($str)
	2878	{
[449]	2879	return str_replace( array('&', '"','\'','<','>','{','}'), array('&','"',''','<','>','{','}'), $str);
[2]	2880	}
	2881	function htmlspecialchars_decode($str)
	2882	{
[449]	2883	return str_replace( array('&','"',''','<','>','{','}'), array('&', '"','\'','<','>','{','}'), $str);
[2]	2884	}
[1472]	2885
[828]	2886	function get_msgs($folder, $sort_box_type, $search_box_type, $sort_box_reverse,$offsetBegin = 0,$offsetEnd = 0)
	2887	{
	2888	if(!$this->mbox \|\| !is_resource($this->mbox))
[51]	2889	$this->mbox = $this->open_mbox($folder);
[432]	2890
[828]	2891	return $this->messages_sort($sort_box_type,$sort_box_reverse, $search_box_type,$offsetBegin,$offsetEnd);
	2892	}
[1472]	2893
[53]	2894	function get_info_next_msg($params)
	2895	{
	2896	$msg_number = $params['msg_number'];
	2897	$folder = $params['msg_folder'];
	2898	$sort_box_type = $params['sort_box_type'];
	2899	$sort_box_reverse = $params['sort_box_reverse'];
	2900	$reuse_border = $params['reuse_border'];
	2901	$search_box_type = $params['search_box_type'] != "ALL" && $params['search_box_type'] != "" ? $params['search_box_type'] : false;
[1472]	2902	$sort_array_msg = $this -> get_msgs($folder, $sort_box_type, $search_box_type, $sort_box_reverse);
	2903
[320]	2904	$success = false;
	2905	if (is_array($sort_array_msg))
[2]	2906	{
[320]	2907	foreach ($sort_array_msg as $i => $value){
	2908	if ($value == $msg_number)
	2909	{
	2910	$success = true;
	2911	break;
	2912	}
	2913	}
[2]	2914	}
	2915
[320]	2916	if (! $success \|\| $i >= sizeof($sort_array_msg)-1)
[2]	2917	{
	2918	$params['status'] = 'false';
	2919	$params['command_to_exec'] = "delete_border('". $reuse_border ."');";
	2920	return $params;
	2921	}
[1472]	2922
[2]	2923	$params = array();
	2924	$params['msg_number'] = $sort_array_msg[($i+1)];
	2925	$params['msg_folder'] = $folder;
[1472]	2926
	2927	$return = $this->get_info_msg($params);
[2]	2928	$return["reuse_border"] = $reuse_border;
	2929	return $return;
	2930	}
	2931
	2932	function get_info_previous_msg($params)
	2933	{
	2934	$msg_number = $params['msgs_number'];
	2935	$folder = $params['folder'];
	2936	$sort_box_type = $params['sort_box_type'];
	2937	$sort_box_reverse = $params['sort_box_reverse'];
	2938	$reuse_border = $params['reuse_border'];
[53]	2939	$search_box_type = $params['search_box_type'] != "ALL" && $params['search_box_type'] != "" ? $params['search_box_type'] : false;
	2940	$sort_array_msg = $this -> get_msgs($folder, $sort_box_type, $search_box_type, $sort_box_reverse);
[1472]	2941
[320]	2942	$success = false;
	2943	if (is_array($sort_array_msg))
[2]	2944	{
[320]	2945	foreach ($sort_array_msg as $i => $value){
	2946	if ($value == $msg_number)
	2947	{
	2948	$success = true;
	2949	break;
	2950	}
	2951	}
[2]	2952	}
[320]	2953	if (! $success \|\| $i == 0)
	2954	{
[2]	2955	$params['status'] = 'false';
	2956	$params['command_to_exec'] = "delete_border('". $reuse_border ."');";
	2957	return $params;
	2958	}
[1472]	2959
[2]	2960	$params = array();
	2961	$params['msg_number'] = $sort_array_msg[($i-1)];
	2962	$params['msg_folder'] = $folder;
[1472]	2963
[2]	2964	$return = $this->get_info_msg($params);
	2965	$return["reuse_border"] = $reuse_border;
	2966	return $return;
	2967	}
[1472]	2968
[2]	2969	// This function updates the values: quota, paging and new messages menu.
	2970	function get_menu_values($params){
	2971	$return_array = array();
	2972	$return_array = $this->get_quota($params);
[1472]	2973
[2]	2974	$mbox_stream = $this->open_mbox($params['folder']);
[1472]	2975	$return_array['num_msgs'] = imap_num_msg($mbox_stream);
[51]	2976	if($mbox_stream)
	2977	imap_close($mbox_stream);
[1472]	2978
	2979	return $return_array;
[2]	2980	}
[1472]	2981
[325]	2982	function get_quota($params){
[449]	2983	// folder_id = user/{uid} for shared folders
	2984	if(substr($params['folder_id'],0,5) != 'INBOX' && preg_match('/user\\'.$this->imap_delimiter.'/i', $params['folder_id'])){
	2985	$array_folder = explode($this->imap_delimiter,$params['folder_id']);
[1472]	2986	$folder_id = "user".$this->imap_delimiter.$array_folder[1];
[449]	2987	}
	2988	// folder_id = INBOX for inbox folders
	2989	else
	2990	$folder_id = "INBOX";
[1472]	2991
[1035]	2992	if(!$this->mbox \|\| !is_resource($this->mbox))
[51]	2993	$this->mbox = $this->open_mbox();
[345]	2994
[325]	2995	$quota = imap_get_quotaroot($this->mbox, $folder_id);
[411]	2996	if($this->mbox && is_resource($this->mbox))
[51]	2997	imap_close($this->mbox);
[1472]	2998
[2]	2999	if (!$quota){
	3000	return array(
	3001	'quota_percent' => 0,
	3002	'quota_used' => 0,
	3003	'quota_limit' => 0
	3004	);
	3005	}
[1472]	3006
[2]	3007	if(count($quota) && $quota['limit']) {
	3008	$quota_limit = (($quota['limit']/1024)* 100 + .5 )* .01;
	3009	$quota_used = (($quota['usage']/1024)* 100 + .5 )* .01;
	3010	if($quota_used >= $quota_limit)
[650]	3011	{
	3012	$quotaPercent = 100;
	3013	}
	3014	else
	3015	{
[2]	3016	$quotaPercent = ($quota_used / $quota_limit)*100;
	3017	$quotaPercent = (($quotaPercent)* 100 + .5 )* .01;
[650]	3018	}
[2]	3019	return array(
	3020	'quota_percent' => floor($quotaPercent),
	3021	'quota_used' => floor($quota_used),
	3022	'quota_limit' => floor($quota_limit)
	3023	);
	3024	}
[1472]	3025	else
[2]	3026	return array();
	3027	}
[1472]	3028
[2]	3029	function send_notification($params){
	3030	require_once("class.phpmailer.php");
	3031	$mail = new PHPMailer();
[1472]	3032
[2]	3033	$toaddress = $params['notificationto'];
[1472]	3034
[449]	3035	$subject = 'Confirmação de leitura: ' . $params['subject'];
[2]	3036	$body = 'Sua mensagem: ' . $params['subject'] . '<br>';
	3037	$body .= 'foi lida por: ' . $_SESSION['phpgw_info']['expressomail']['user']['fullname'] . ' <' . $_SESSION['phpgw_info']['expressomail']['user']['email'] . '> em ' . date("d/m/Y H:i");
	3038	$mail->SMTPDebug = false;
	3039	$mail->IsSMTP();
	3040	$mail->Host = $_SESSION['phpgw_info']['expressomail']['email_server']['smtpServer'];
	3041	$mail->Port = $_SESSION['phpgw_info']['expressomail']['email_server']['smtpPort'];
	3042	$mail->From = $_SESSION['phpgw_info']['expressomail']['user']['email'];
	3043	$mail->FromName = $_SESSION['phpgw_info']['expressomail']['user']['fullname'];
	3044	$mail->AddAddress($toaddress);
	3045	$mail->Subject = $this->htmlspecialchars_decode($subject);
	3046
	3047	$mail->IsHTML(true);
	3048	$mail->Body = $body;
[1472]	3049
[2]	3050	if(!$mail->Send()){
	3051	return $mail->ErrorInfo;
	3052	}
	3053	else
	3054	return true;
	3055	}
[1472]	3056
[2]	3057	function empty_trash()
	3058	{
[1472]	3059	$folder = 'INBOX' . $this->imap_delimiter . $_SESSION['phpgw_info']['expressomail']['email_server']['imapDefaultTrashFolder'];
[2]	3060	$mbox_stream = $this->open_mbox($folder);
	3061	$return = imap_delete($mbox_stream,'1:*');
[51]	3062	if($mbox_stream)
	3063	imap_close($mbox_stream, CL_EXPUNGE);
[2]	3064	return $return;
	3065	}
[1472]	3066
[2]	3067	function search($params)
	3068	{
[673]	3069	include("class.imap_attachment.inc.php");
[1472]	3070	$imap_attachment = new imap_attachment();
[2]	3071	$criteria = $params['criteria'];
	3072	$return = array();
	3073	$folders = $this->get_folders_list();
[1472]	3074
[2]	3075	$j = 0;
	3076	foreach($folders as $folder)
	3077	{
	3078	$mbox_stream = $this->open_mbox($folder);
	3079	$messages = imap_search($mbox_stream, $criteria, SE_UID);
[1472]	3080
[2]	3081	if ($messages == '')
	3082	continue;
[1472]	3083
[2]	3084	$i = 0;
	3085	$return[$j] = array();
	3086	$return[$j]['folder_name'] = $folder['name'];
[1472]	3087
[2]	3088	foreach($messages as $msg_number)
	3089	{
[535]	3090	$header = $this->get_header($msg_number);
[2]	3091	if (!is_object($header))
	3092	return false;
[1472]	3093
[2]	3094	$return[$j][$i]['msg_folder'] = $folder['name'];
	3095	$return[$j][$i]['msg_number'] = $msg_number;
	3096	$return[$j][$i]['Recent'] = $header->Recent;
	3097	$return[$j][$i]['Unseen'] = $header->Unseen;
	3098	$return[$j][$i]['Answered'] = $header->Answered;
	3099	$return[$j][$i]['Deleted'] = $header->Deleted;
	3100	$return[$j][$i]['Draft'] = $header->Draft;
	3101	$return[$j][$i]['Flagged'] = $header->Flagged;
[1472]	3102
[535]	3103	$date_msg = gmdate("d/m/Y",$header->udate);
	3104	if (gmdate("d/m/Y") == $date_msg)
	3105	$return[$j][$i]['udate'] = gmdate("H:i",$header->udate);
[2]	3106	else
	3107	$return[$j][$i]['udate'] = $date_msg;
[1472]	3108
[2]	3109	$fromaddress = imap_mime_header_decode($header->fromaddress);
	3110	$return[$j][$i]['fromaddress'] = '';
	3111	foreach ($fromaddress as $tmp)
	3112	$return[$j][$i]['fromaddress'] .= $this->replace_maior_menor($tmp->text);
[1472]	3113
[2]	3114	$from = $header->from;
	3115	$return[$j][$i]['from'] = array();
	3116	$tmp = imap_mime_header_decode($from[0]->personal);
	3117	$return[$j][$i]['from']['name'] = $tmp[0]->text;
	3118	$return[$j][$i]['from']['email'] = $from[0]->mailbox . "@" . $from[0]->host;
[1472]	3119	$return[$j][$i]['from']['full'] ='"' . $return[$j][$i]['from']['name'] . '" ' . '<' . $return[$j][$i]['from']['email'] . '>';
[2]	3120
	3121	$to = $header->to;
	3122	$return[$j][$i]['to'] = array();
	3123	$tmp = imap_mime_header_decode($to[0]->personal);
	3124	$return[$j][$i]['to']['name'] = $tmp[0]->text;
	3125	$return[$j][$i]['to']['email'] = $to[0]->mailbox . "@" . $to[0]->host;
[1472]	3126	$return[$j][$i]['to']['full'] ='"' . $return[$i]['to']['name'] . '" ' . '<' . $return[$i]['to']['email'] . '>';
[2]	3127
	3128	$subject = imap_mime_header_decode($header->fetchsubject);
	3129	$return[$j][$i]['subject'] = '';
	3130	foreach ($subject as $tmp)
	3131	$return[$j][$i]['subject'] .= $tmp->text;
	3132
	3133	$return[$j][$i]['Size'] = $header->Size;
	3134	$return[$j][$i]['reply_toaddress'] = $header->reply_toaddress;
[1472]	3135
[2]	3136	$return[$j][$i]['attachment'] = array();
	3137	$return[$j][$i]['attachment'] = $imap_attachment->get_attachment_headerinfo($mbox_stream, $msg_number);
[1472]	3138
[2]	3139	$i++;
	3140	}
	3141	$j++;
[51]	3142	if($mbox_stream)
	3143	imap_close($mbox_stream);
[2]	3144	}
[1472]	3145
[2]	3146	return $return;
	3147	}
[1709]	3148
	3149
	3150	function mobile_search($params)
	3151	{
	3152	include("class.imap_attachment.inc.php");
	3153	$imap_attachment = new imap_attachment();
	3154	$criterias = array ("TO","SUBJECT","FROM","CC");
	3155	$return = array();
	3156	$folders = $this->get_folders_list();
	3157	$num_msgs = 0;
	3158
	3159	foreach($folders as $id =>$folder)
	3160	{
	3161	if(strpos($folder['folder_id'],'user')===false && is_array($folder)) {
	3162	foreach($criterias as $criteria_fixed)
	3163	{
	3164	$_filter = $criteria_fixed . ' "'.$params['filter'].'"';
	3165	$mbox_stream = $this->open_mbox($folder['folder_name']);
	3166
	3167	$messages = imap_search($mbox_stream, $_filter, SE_UID);
	3168
	3169	if ($messages == ''){
	3170	if($mbox_stream)
	3171	imap_close($mbox_stream);
	3172	continue;
	3173	}
	3174
	3175	foreach($messages as $msg_number)
	3176	{
	3177	$temp = $this->get_info_head_msg($msg_number);
	3178	if(!$temp)
	3179	return false;
	3180
	3181	$return[$num_msgs] = $temp;
	3182	$num_msgs++;
	3183	}
	3184	$return['num_msgs'] = $num_msgs;
	3185
	3186	if($mbox_stream)
	3187	imap_close($mbox_stream);
	3188	}
	3189	}
	3190
	3191	}
	3192	return $return;
	3193	}
[1472]	3194
[2]	3195	function delete_and_show_previous_message($params)
	3196	{
	3197	$return = $this->get_info_previous_msg($params);
[1472]	3198
[2]	3199	$params_tmp1 = array();
	3200	$params_tmp1['msgs_to_delete'] = $params['msg_number'];
	3201	$params_tmp1['folder'] = $params['msg_folder'];
	3202	$return_tmp1 = $this->delete_msg($params_tmp1);
[1472]	3203
[2]	3204	$return['msg_number_deleted'] = $return_tmp1;
[1472]	3205
[2]	3206	return $return;
	3207	}
[1472]	3208
	3209
[2]	3210	function automatic_trash_cleanness($params)
	3211	{
	3212	$before_date = date("m/d/Y", strtotime("-".$params['before_date']." day"));
	3213	$criteria = 'BEFORE "'.$before_date.'"';
[325]	3214	$mbox_stream = $this->open_mbox('INBOX'.$this->imap_delimiter.$_SESSION['phpgw_info']['expressomail']['email_server']['imapDefaultTrashFolder']);
[2]	3215	$messages = imap_search($mbox_stream, $criteria, SE_UID);
	3216	if (is_array($messages)){
	3217	foreach ($messages as $msg_number){
	3218	imap_delete($mbox_stream, $msg_number, FT_UID);
	3219	}
	3220	}
[51]	3221	if($mbox_stream)
	3222	imap_close($mbox_stream, CL_EXPUNGE);
[2]	3223	return $messages;
	3224	}
	3225	// Fix the search problem with special characters!!!!
	3226	function remove_accents($string) {
[1472]	3227	return strtr($string,
	3228	"?Ó??ó?Ý?úÁÀÃÂÄÇÉÈÊËÍÌ?ÎÏÑÕÔÓÒÖÚÙ?ÛÜ?áàãâäçéèêëíì?îïñóòõôöúù?ûüýÿ",
[2]	3229	"SOZsozYYuAAAAACEEEEIIIIINOOOOOUUUUUsaaaaaceeeeiiiiinooooouuuuuyy");
	3230	}
	3231
[1622]	3232	function make_search_date($date){
	3233
	3234	$months = array(
	3235	1 => 'jan',
	3236	2 => 'feb',
	3237	3 => 'mar',
	3238	4 => 'apr',
	3239	5 => 'may',
	3240	6 => 'jun',
	3241	7 => 'jul',
	3242	8 => 'aug',
	3243	9 => 'sep',
	3244	10 => 'oct',
	3245	11 => 'nov',
	3246	12 => 'dec'
	3247	);
	3248
	3249	//TODO: Adaptar a data de acordo com o locale do sistema.
	3250	list($day,$month,$year) = explode("/", $date);
	3251	$search_date = $day."-".$months[intval($month)]."-".$year;
	3252	return $search_date;
	3253
	3254	}
	3255
[1472]	3256	function search_msg($params = ''){
[1614]	3257	$retorno = "";
	3258	$mbox_stream = "";
	3259	if(strpos($params['condition'],"#")===false) { //local messages
	3260	$search=false;
	3261	}
	3262	else {
	3263	$search = explode(",",$params['condition']);
	3264	}
[689]	3265
[1614]	3266	if($search){
	3267	$search_criteria = '';
	3268	$search_result_number = $_SESSION['phpgw_info']['user']['preferences']['expressoMail']['search_result_number'];
	3269	foreach($search as $tmp)
	3270	{
	3271	$tmp1 = explode("##",$tmp);
	3272	$sum = 0;
	3273	$name_box = $tmp1[0];
	3274	unset($filter);
	3275	foreach($tmp1 as $index => $criteria)
	3276	{
	3277	if ($index != 0 && strlen($criteria) != 0)
	3278	{
	3279	$filter_array = explode("<=>",rawurldecode($criteria));
	3280	$filter .= " ".$filter_array[0];
[1622]	3281	if (strlen($filter_array[1]) != 0){
	3282	if (trim($filter_array[0]) != 'BEFORE' &&
	3283	trim($filter_array[0]) != 'SINCE' &&
	3284	trim($filter_array[0]) != 'ON')
	3285	{
	3286	$filter .= '"'.$filter_array[1].'"';
	3287	}
	3288	else
	3289	{
	3290	$filter .= '"'.$this->make_search_date($filter_array[1]).'"';
	3291	}
	3292	}
[1614]	3293	}
	3294	}
	3295	$name_box = mb_convert_encoding(utf8_decode($name_box), "UTF7-IMAP", "ISO_8859-1" );
	3296	$filter = $this->remove_accents($filter);
	3297	//Este bloco tem a finalidade de transformar o login (quando numerico) das pastas compartilhadas em common name
[1747]	3298	if ($_SESSION['phpgw_info']['user']['preferences']['expressoMail']['uid2cn'] && substr($name_box,0,4) == 'user')
[1614]	3299	{
[1747]	3300	$folder_name = explode($this->imap_delimiter,$name_box);
[1614]	3301	$this->ldap = new ldap_functions();
	3302	if ($cn = $this->ldap->uid2cn($folder_name[1]))
	3303	{
	3304	$folder_name[1] = $cn;
	3305	}
[1747]	3306	$folder_name = implode($this->imap_delimiter,$folder_name);
[1614]	3307	}
[1747]	3308	else
	3309	{
	3310	$folder_name = mb_convert_encoding(utf8_decode($name_box), "UTF7-IMAP", "ISO_8859-1" );
	3311	}
[1472]	3312
[1614]	3313	if(!is_resource($mbox_stream))
	3314	{
	3315	$mbox_stream = $this->open_mbox($name_box);
	3316	}
	3317	else
	3318	{
	3319	imap_reopen($mbox_stream, "{".$this->imap_server.":".$this->imap_port.$this->imap_options."}".$name_box);
	3320	}
[1472]	3321
[1614]	3322	if (preg_match("/^.?\bALL\b/", $filter))
	3323	{ // Quick Search, note: this ALL isn't the same ALL from imap_search
[1472]	3324
[1614]	3325	$all_criterias = array ("TO","SUBJECT","FROM","CC");
	3326	foreach($all_criterias as $criteria_fixed)
	3327	{
	3328	$_filter = $criteria_fixed . substr($filter,4);
[1472]	3329
[1614]	3330	$search_criteria = imap_search($mbox_stream, $_filter, SE_UID);
[1472]	3331
[1614]	3332	if($search_criteria) //&& count($search_criteria) < 50)
	3333	{
	3334	foreach($search_criteria as $new_search)
	3335	{
	3336	if ($search_result_number != '65536' && $sum == $search_result_number)
[1608]	3337	{
[1614]	3338	return $retorno ? $sum . "=sumResults=" . $retorno : "none";
[1608]	3339	}
	3340
[1614]	3341	$m_token = trim("##".mb_convert_encoding( $name_box, "ISO_8859-1", "UTF7-IMAP" ) . "--" . $this->get_msg($new_search,$name_box,$mbox_stream) . "--".$new_search."##"."\n");
	3342	if(!@strstr($retorno,$m_token))
	3343	{
	3344	$retorno .= $m_token;
	3345	$sum ++;
	3346	}
	3347	}
	3348	}
	3349	}
	3350	}
	3351	else {
	3352	$search_criteria = imap_search($mbox_stream, $filter, SE_UID);
	3353	if( is_array( $search_criteria) )
	3354	{
	3355	foreach($search_criteria as $new_search)
	3356	{
	3357	if ($search_result_number != '65536' && $sum == $search_result_number)
[1608]	3358	{
[1614]	3359	return $retorno ? $sum . "=sumResults=" . $retorno : "none";
[1608]	3360	}
[1614]	3361	$retorno .= trim("##".mb_convert_encoding( $name_box, "ISO_8859-1", "UTF7-IMAP" ) . "--" . $this->get_msg($new_search,$name_box,$mbox_stream) . "--" . $new_search."##"."\n");
	3362	$sum++;
	3363	}
	3364	}
	3365	}
	3366	}
	3367	}
	3368	if($mbox_stream)
	3369	{
	3370	imap_close($mbox_stream);
	3371	}
[1472]	3372
[1614]	3373	if ($retorno)
	3374	{
	3375	return $retorno;
	3376	}
	3377	else
	3378	{
	3379	return 'none';
	3380	}
[2]	3381	}
[1472]	3382
[271]	3383	function get_msg($uid_msg,$name_box, $mbox_stream )
	3384	{
[828]	3385	$header = $this->get_header($uid_msg);
	3386	include_once("class.imap_attachment.inc.php");
	3387	$imap_attachment = new imap_attachment();
	3388	$attachments = $imap_attachment->get_attachment_headerinfo($mbox_stream, $uid_msg);
	3389	$attachments = $attachments['number_attachments'] > 0?"T".$attachments['number_attachments']:"";
	3390	$flag = $header->Unseen
	3391	.$header->Recent
	3392	.$header->Flagged
	3393	.$header->Draft
	3394	.$header->Answered
	3395	.$header->Deleted
	3396	.$attachments;
	3397
	3398
[163]	3399	$subject = $this->decode_string($header->fetchsubject);
	3400	$from = $header->from[0]->mailbox;
[2]	3401	if($header->from[0]->personal != "")
	3402	$from = $header->from[0]->personal;
[650]	3403	$ret_msg = $this->decode_string($from) . "--" . $subject . "--". gmdate("d/m/Y",$header ->udate)."--". $this->size_msg($header->Size) ."--". $flag;
[1472]	3404	return $ret_msg;
	3405	}
[828]	3406
[2]	3407	function size_msg($size){
	3408	$var = floor($size/1024);
	3409	if($var >= 1){
[1472]	3410	return $var." kb";
[2]	3411	}else{
[1472]	3412	return $size ." b";
[2]	3413	}
	3414	}
	3415
	3416	function ob_array($the_object)
	3417	{
	3418	$the_array=array();
	3419	if(!is_scalar($the_object))
	3420	{
	3421	foreach($the_object as $id => $object)
	3422	{
	3423	if(is_scalar($object))
	3424	{
	3425	$the_array[$id]=$object;
	3426	}
	3427	else
	3428	{
	3429	$the_array[$id]=$this->ob_array($object);
	3430	}
	3431	}
	3432	return $the_array;
	3433	}
	3434	else
	3435	{
	3436	return $the_object;
	3437	}
	3438	}
[1472]	3439
[2]	3440	function getacl()
	3441	{
	3442	$this->ldap = new ldap_functions();
[1472]	3443
[2]	3444	$return = array();
[1472]	3445	$mbox_stream = $this->open_mbox();
[2]	3446	$mbox_acl = imap_getacl($mbox_stream, 'INBOX');
[1472]	3447
[2]	3448	$i = 0;
	3449	foreach ($mbox_acl as $user => $acl)
	3450	{
	3451	if ($user != $this->username)
	3452	{
	3453	$return[$i]['uid'] = $user;
	3454	$return[$i]['cn'] = $this->ldap->uid2cn($user);
	3455	}
	3456	$i++;
	3457	}
	3458	return $return;
	3459	}
[1472]	3460
[2]	3461	function setacl($params)
	3462	{
	3463	$old_users = $this->getacl();
	3464	if (!count($old_users))
	3465	$old_users = array();
[1472]	3466
[2]	3467	$tmp_array = array();
	3468	foreach ($old_users as $index => $user_info)
	3469	{
	3470	$tmp_array[$index] = $user_info['uid'];
	3471	}
	3472	$old_users = $tmp_array;
[1472]	3473
[2]	3474	$users = unserialize($params['users']);
	3475	if (!count($users))
	3476	$users = array();
[1472]	3477
[2]	3478	//$add_share = array_diff($users, $old_users);
	3479	$remove_share = array_diff($old_users, $users);
	3480
	3481	$mbox_stream = $this->open_mbox();
	3482
	3483	$serverString = "{".$this->imap_server.":".$this->imap_port.$this->imap_options."}";
	3484	$mailboxes_list = imap_getmailboxes($mbox_stream, $serverString, "user".$this->imap_delimiter.$this->username."*");
	3485
	3486	/*if (count($add_share))
	3487	{
	3488	foreach ($add_share as $index=>$uid)
	3489	{
	3490	if (is_array($mailboxes_list))
	3491	{
	3492	foreach ($mailboxes_list as $key => $val)
	3493	{
	3494	$folder = str_replace($serverString, "", imap_utf7_decode($val->name));
	3495	imap_setacl ($mbox_stream, $folder, "$uid", "lrswipcda");
	3496	}
	3497	}
	3498	}
	3499	}*/
[1472]	3500
[2]	3501	if (count($remove_share))
	3502	{
	3503	foreach ($remove_share as $index=>$uid)
	3504	{
	3505	if (is_array($mailboxes_list))
	3506	{
	3507	foreach ($mailboxes_list as $key => $val)
	3508	{
	3509	$folder = str_replace($serverString, "", imap_utf7_decode($val->name));
	3510	imap_setacl ($mbox_stream, $folder, "$uid", "");
	3511	}
	3512	}
[1472]	3513	}
[2]	3514	}
[1472]	3515
[2]	3516	return true;
	3517	}
[1472]	3518
[2]	3519	function getaclfromuser($params)
	3520	{
	3521	$useracl = $params['user'];
[1472]	3522
[2]	3523	$return = array();
	3524	$return[$useracl] = 'false';
[1472]	3525	$mbox_stream = $this->open_mbox();
[2]	3526	$mbox_acl = imap_getacl($mbox_stream, 'INBOX');
[1472]	3527
[2]	3528	foreach ($mbox_acl as $user => $acl)
	3529	{
	3530	if (($user != $this->username) && ($user == $useracl))
	3531	{
	3532	$return[$user] = $acl;
	3533	}
	3534	}
	3535	return $return;
	3536	}
	3537
	3538	function getacltouser($user)
	3539	{
	3540	$return = array();
	3541	$mbox_stream = $this->open_mbox();
[325]	3542	//Alterado, antes era 'imap_getacl($mbox_stream, 'user'.$this->imap_delimiter.$user);
	3543	//Afim de tratar as pastas compartilhadas, verificandos as permissoes de operacao sobre as mesmas
	3544	//No caso de se tratar da caixa do proprio usuario logado, utiliza a sintaxe abaixo
	3545	if(substr($user,0,4) != 'user')
[449]	3546	$mbox_acl = imap_getacl($mbox_stream, 'user'.$this->imap_delimiter.$user);
[325]	3547	else
	3548	$mbox_acl = imap_getacl($mbox_stream, $user);
[2]	3549	return $mbox_acl[$this->username];
	3550	}
	3551
[1472]	3552
[2]	3553	function setaclfromuser($params)
	3554	{
	3555	$user = $params['user'];
	3556	$acl = $params['acl'];
[1472]	3557
[2]	3558	$mbox_stream = $this->open_mbox();
	3559
	3560	$serverString = "{".$this->imap_server.":".$this->imap_port.$this->imap_options."}";
	3561	$mailboxes_list = imap_getmailboxes($mbox_stream, $serverString, "user".$this->imap_delimiter.$this->username."*");
	3562
	3563	if (is_array($mailboxes_list))
	3564	{
	3565	foreach ($mailboxes_list as $key => $val)
	3566	{
[449]	3567	$folder = str_replace($serverString, "", imap_utf7_encode($val->name));
	3568	$folder = str_replace("&-", "&", $folder);
[2]	3569	if (!imap_setacl ($mbox_stream, $folder, $user, $acl))
	3570	{
[449]	3571	$return = imap_last_error();
[2]	3572	}
	3573	}
	3574	}
[449]	3575	if (isset($return))
	3576	return $return;
	3577	else
	3578	return true;
[2]	3579	}
[1472]	3580
[51]	3581	function download_attachment($msg,$msgno)
	3582	{
[1472]	3583	$array_parts_attachments = array();
[51]	3584	$array_parts_attachments['names'] = '';
[689]	3585	include_once("class.imap_attachment.inc.php");
[1472]	3586	$imap_attachment = new imap_attachment();
	3587
[51]	3588	if (count($msg->fname[$msgno]) > 0)
	3589	{
	3590	$i = 0;
	3591	foreach ($msg->fname[$msgno] as $index=>$fname)
	3592	{
	3593	$array_parts_attachments[$i]['pid'] = $msg->pid[$msgno][$index];
[1397]	3594	$array_parts_attachments[$i]['name'] = $imap_attachment->flat_mime_decode($this->decode_string($fname));
[51]	3595	$array_parts_attachments[$i]['name'] = $array_parts_attachments[$i]['name'] ? $array_parts_attachments[$i]['name'] : "attachment.bin";
	3596	$array_parts_attachments[$i]['encoding'] = $msg->encoding[$msgno][$index];
	3597	$array_parts_attachments['names'] .= $array_parts_attachments[$i]['name'] . ', ';
	3598	$array_parts_attachments[$i]['fsize'] = $msg->fsize[$msgno][$index];
	3599	$i++;
	3600	}
	3601	}
	3602	$array_parts_attachments['names'] = substr($array_parts_attachments['names'],0,(strlen($array_parts_attachments['names']) - 2));
	3603	return $array_parts_attachments;
[1472]	3604	}
[69]	3605
	3606	function spam($params)
	3607	{
	3608	$is_spam = $params['spam'];
	3609	$folder = $params['folder'];
	3610	$mbox_stream = $this->open_mbox($folder);
	3611	$msgs_number = explode(',',$params['msgs_number']);
	3612
	3613	foreach($msgs_number as $msg_number) {
[877]	3614	$imap_msg_number = imap_msgno($mbox_stream, $msg_number);
	3615	$header = imap_fetchheader($mbox_stream, $imap_msg_number);
	3616	$body = imap_body($mbox_stream, $imap_msg_number);
[69]	3617	$msg = $header . $body;
	3618	$email = $_SESSION['phpgw_info']['expressomail']['user']['email'];
[449]	3619	$username = $this->username;
[69]	3620	strtok($email, '@');
	3621	$domain = strtok('@');
	3622
[449]	3623	//Encontrar a assinatura do dspam no cabecalho
	3624	$v = explode("\r\n", $header);
	3625	foreach ($v as $linha){
[877]	3626	if (eregi("^Message-ID", $linha)) {
	3627	$args = explode(" ", $linha);
	3628	$msg_id = "'$args[1]'";
	3629	} elseif (eregi("^X-DSPAM-Signature", $linha)) {
[449]	3630	$args = explode(" ",$linha);
	3631	$signature = $args[1];
	3632	}
	3633	}
	3634
[877]	3635	// Seleciona qual comando a ser executado
[449]	3636	switch($is_spam){
	3637	case 'true': $cmd = $_SESSION['phpgw_info']['server']['expressomail']['expressoMail_command_for_spam']; break;
	3638	case 'false': $cmd = $_SESSION['phpgw_info']['server']['expressomail']['expressoMail_command_for_ham']; break;
	3639	}
[877]	3640
	3641	$tags = array('##EMAIL##', '##USERNAME##', '##DOMAIN##', '##SIGNATURE##', '##MSGID##');
	3642	$cmd = str_replace($tags, array($email, $username, $domain, $signature, $msg_id), $cmd);
[78]	3643	system($cmd);
[69]	3644	}
	3645	imap_close($mbox_stream);
	3646	return false;
	3647	}
[535]	3648	function get_header($msg_number){
	3649	$header = @imap_headerinfo($this->mbox, imap_msgno($this->mbox, $msg_number), 80, 255);
	3650	if (!is_object($header))
	3651	return false;
	3652	// Prepare udate from mailDate (DateTime arrived with TZ) for fixing summertime problem.
	3653	$pdate = date_parse($header->MailDate);
	3654	$header->udate += $pdate['zone']*(-60);
[1472]	3655
[673]	3656	if($header->Flagged != "F" && $_SESSION['phpgw_info']['user']['preferences']['expressoMail']['use_important_flag']) {
[659]	3657	$flag = preg_match('/importance : (.*)\r/i',
	3658	imap_fetchheader($this->mbox, imap_msgno($this->mbox, $msg_number))
[1472]	3659	,$importance);
[659]	3660	$header->Flagged = $flag==0?false:strtolower($importance[1])=="high"?"F":false;
	3661	}
[1472]	3662
[535]	3663	return $header;
	3664	}
[1000]	3665
	3666	//Por Bruno Costa(bruno.vieira-costa@serpro.gov.br - Insere emails no imap a partir do fonte do mesmo. Se o argumento timestamp for passado ele utiliza do script python
	3667	///expressoMail1_2/imap.py para inserir uma msg com o horário correto pois isso não é porssível com a função imap_append do php.
	3668
	3669	function insert_email($source,$folder,$timestamp){
	3670	$username = $_SESSION['phpgw_info']['expressomail']['user']['userid'];
	3671	$password = $_SESSION['phpgw_info']['expressomail']['user']['passwd'];
	3672	$imap_server = $_SESSION['phpgw_info']['expressomail']['email_server']['imapServer'];
	3673	$imap_port = $_SESSION['phpgw_info']['expressomail']['email_server']['imapPort'];
	3674	$imap_options = '/notls/novalidate-cert';
	3675	$mbox_stream = imap_open("{".$imap_server.":".$imap_port.$imap_options."}".$folder, $username, $password);
	3676	if(imap_last_error())
	3677	{
	3678	imap_createmailbox($mbox_stream,imap_utf7_encode("{".$imap_server."}".$folder));
	3679	}
	3680	if($timestamp){
	3681	$tempDir = ini_get("session.save_path");
[1247]	3682	$file = $tempDir."imap_".$_SESSION[ 'phpgw_session' ][ 'session_id' ];
[1000]	3683	$f = fopen($file,"w");
	3684	fputs($f,base64_encode($source));
	3685	fclose($f);
[1586]	3686	$command = "python ".$_SERVER['DOCUMENT_ROOT']."/expressoMail1_2/imap.py ".escapeshellarg($imap_server)." ".escapeshellarg($imap_port)." ".escapeshellarg($username)." ".escapeshellarg($password)." ".escapeshellarg($timestamp)." ".escapeshellarg($folder)." ".escapeshellarg($file);
[1012]	3687	$return['command']=exec(escapeshellcmd($command));
[1000]	3688	}else{
	3689	$return['append'] = imap_append($mbox_stream, "{".$imap_server.":".$imap_port."}".$folder, $source, "\\Seen");
	3690	}
	3691	$status = imap_status($mbox_stream, "{".$this->imap_server.":".$this->imap_port."}".$folder, SA_UIDNEXT);
	3692	$return['msg_no'] = $status->uidnext - 1;
	3693	$return['error'] = imap_last_error();
	3694	if($mbox_stream)
	3695	imap_close($mbox_stream);
	3696	return $return;
	3697
	3698	}
	3699
[1035]	3700	function show_decript($params){
	3701	$source = $params['source'];
	3702	//error_log("source: $source\nversao: " . PHP_VERSION, 3, '/tmp/teste.log');
	3703	$source = str_replace(" ", "+", $source,$i);
[1472]	3704
[1035]	3705	if (version_compare(PHP_VERSION, '5.2.0', '>=')){
	3706	if(!$source = base64_decode($source,true))
	3707	return "error ".$source."Espaços ".$i;
	3708
	3709	}
	3710	else {
	3711	if(!$source = base64_decode($source))
	3712	return "error ".$source."Espaços ".$i;
	3713	}
	3714
	3715	$insert = $this->insert_email($source,'INBOX'.$this->imap_delimiter.'decifradas');
	3716
	3717	$get['msg_number'] = $insert['msg_no'];
	3718	$get['msg_folder'] = 'INBOX'.$this->imap_delimiter.'decifradas';
	3719	$return = $this->get_info_msg($get);
	3720	$get['msg_number'] = $params['ID'];
	3721	$get['msg_folder'] = $params['folder'];
	3722	$tmp = $this->get_info_msg($get);
	3723	if(!$tmp['status_get_msg_info'])
	3724	{
	3725	$return['msg_day']=$tmp['msg_day'];
	3726	$return['msg_hour']=$tmp['msg_hour'];
	3727	$return['fulldate']=$tmp['fulldate'];
	3728	$return['smalldate']=$tmp['smalldate'];
	3729	}
	3730	else
	3731	{
	3732	$return['msg_day']='';
	3733	$return['msg_hour']='';
	3734	$return['fulldate']='';
	3735	$return['smalldate']='';
	3736	}
	3737	$return['msg_no'] =$insert['msg_no'];
	3738	$return['error'] = $insert['error'];
	3739	$return['folder'] = $params['folder'];
	3740	//$return['acls'] = $insert['acls'];
	3741	$return['original_ID'] = $params['ID'];
	3742
	3743	return $return;
	3744
	3745	}
[1472]	3746
[1000]	3747	//Por Bruno Costa(bruno.vieira-costa@serpro.gov.br - Trata fontes de emails enviados via POST para o servidor por um xmlhttprequest, as partes codificados com
	3748	//Base64 os "+" são substituidos por " " no envio e essa função arruma esse efeito.
	3749
	3750	function treat_base64_from_post($source){
	3751	$offset = 0;
	3752	do
	3753	{
	3754	if($inicio = strpos($source, 'Content-Transfer-Encoding: base64', $offset))
	3755	{
	3756	$inicio = strpos($source, "\n\r", $inicio);
	3757	$fim = strpos($source, '--', $inicio);
	3758	if(!$fim)
	3759	$fim = strpos($source,"\n\r", $inicio);
	3760	$length = $fim-$inicio;
	3761	$parte = substr( $source,$inicio,$length-1);
	3762	$parte = str_replace(" ", "+", $parte);
	3763	$source = substr_replace($source, $parte, $inicio, $length-1);
	3764	}
	3765	if($offset > $inicio)
	3766	$offset=FALSE;
	3767	else
	3768	$offset = $inicio;
	3769	}
	3770	while($offset);
	3771	return $source;
	3772	}
	3773
	3774	//Por Bruno Costa(bruno.vieira-costa@serpro.gov.br - Recebe os fontes dos emails a serem desarquivados, separa e envia cada um para função insert_mail.
	3775
	3776	function unarchive_mail($params)
	3777	{
	3778	$dest_folder = $params['folder'];
	3779	$sources = explode("#@#@#@",$params['source']);
	3780	$timestamps = explode("#@#@#@",$params['timestamp']);
	3781	foreach($sources as $index=>$src) {
	3782	if($src!=""){
	3783	$source = $this->treat_base64_from_post($src);
	3784	$insert = $this->insert_email($source,$dest_folder,$timestamps[$index]);
	3785	}
	3786	}
	3787	return $insert;
	3788	}
	3789
	3790	function download_all_local_attachments($params)
	3791	{
	3792	$source = $params['source'];
	3793	$source = $this->treat_base64_from_post($source);
	3794	$insert = $this->insert_email($source,'INBOX'.$this->imap_delimiter.'decifradas');
	3795	$exporteml = new ExportEml();
	3796	$params['num_msg']=$insert['msg_no'];
	3797	$params['folder']='INBOX'.$this->imap_delimiter.'decifradas';
	3798	return $exporteml->download_all_attachments($params);
	3799	}
[2]	3800	}
[278]	3801	?>

Note: See TracBrowser for help on using the repository browser.

Download in other formats: