githubFork/roundcubemail.git

svncommit

2005-10-27 66773789e392305bba4cdf7ed8e6ae3b8380de51

commit \| author \| age
4e17e6	1	<?php
T	2
	3	/*
	4	+-----------------------------------------------------------------------+
	5	\| program/steps/mail/compose.inc \|
	6	\| \|
	7	\| This file is part of the RoundCube Webmail client \|
	8	\| Copyright (C) 2005, RoundCube Dev. - Switzerland \|
30233b	9	\| Licensed under the GNU GPL \|
4e17e6	10	\| \|
T	11	\| PURPOSE: \|
	12	\| Compose a new mail message with all headers and attachments \|
	13	\| \|
	14	+-----------------------------------------------------------------------+
	15	\| Author: Thomas Bruederli <roundcube@gmail.com> \|
	16	+-----------------------------------------------------------------------+
	17
	18	$Id$
	19
	20	*/
	21
	22
	23	require_once('Mail/mimeDecode.php');
	24
	25
	26	$MESSAGE_FORM = NULL;
	27	$REPLY_MESSAGE = NULL;
	28	$FORWARD_MESSAGE = NULL;
	29
	30
	31	if (!is_array($_SESSION['compose']))
	32	$_SESSION['compose'] = array('id' => uniqid(rand()));
	33
	34
	35	if ($_GET['_reply_uid'] \|\| $_GET['_forward_uid'])
	36	{
	37	$msg_uid = $_GET['_reply_uid'] ? $_GET['_reply_uid'] : $_GET['_forward_uid'];
	38
	39	// similar as in program/steps/mail/show.inc
	40	$MESSAGE = array();
	41	$MESSAGE['headers'] = $IMAP->get_headers($msg_uid);
	42
	43	$MESSAGE['source'] = rcmail_message_source($msg_uid);
	44
	45	$mmd = new Mail_mimeDecode($MESSAGE['source']);
	46	$MESSAGE['structure'] = $mmd->decode(array('include_bodies' => TRUE,
	47	'decode_headers' => TRUE,
	48	'decode_bodies' => FALSE));
	49
	50	$MESSAGE['subject'] = $IMAP->decode_header($MESSAGE['headers']->subject);
	51	$MESSAGE['parts'] = $mmd->getMimeNumbers($MESSAGE['structure']);
	52
	53	if ($_GET['_reply_uid'])
	54	{
	55	$REPLY_MESSAGE = $MESSAGE;
	56	$_SESSION['compose']['reply_uid'] = $_GET['_reply_uid'];
	57	$_SESSION['compose']['reply_msgid'] = $REPLY_MESSAGE['headers']->messageID;
	58	}
	59	else
	60	{
	61	$FORWARD_MESSAGE = $MESSAGE;
	62	$_SESSION['compose']['forward_uid'] = $_GET['_forward_uid'];
	63	}
	64	}
	65
	66
	67
	68	/**** compose mode functions ******/
	69
	70
	71	function rcmail_compose_headers($attrib)
	72	{
	73	global $IMAP, $REPLY_MESSAGE, $DB;
	74
	75	list($form_start, $form_end) = get_form_tags($attrib);
	76
	77	$out = '';
	78	$part = strtolower($attrib['part']);
	79
	80	switch ($part)
	81	{
	82	case 'from':
	83	// pass the following attributes to the form class
	84	$field_attrib = array('name' => '_from');
	85	foreach ($attrib as $attr => $value)
	86	if (in_array($attr, array('id', 'class', 'style', 'size')))
	87	$field_attrib[$attr] = $value;
	88
	89	// get this user's identities
d7cb77	90	$sql_result = $DB->query("SELECT identity_id, name, email
S	91	FROM ".get_table_name('identities')." WHERE user_id=?
	92	AND del<>'1'
	93	ORDER BY ".$DB->quoteIdentifier('default')." DESC, name ASC",
	94	$_SESSION['user_id']);
4e17e6	95
T	96	if ($DB->num_rows($sql_result))
	97	{
	98	$select_from = new select($field_attrib);
	99	while ($sql_arr = $DB->fetch_assoc($sql_result))
	100	$select_from->add(format_email_recipient($sql_arr['email'], $sql_arr['name']), $sql_arr['identity_id']);
	101
	102	$out = $select_from->show($_POST['_from']);
	103	}
	104	else
	105	{
	106	$input_from = new textfield($field_attrib);
	107	$out = $input_from->show($_POST['_from']);
	108	}
	109
	110	if ($form_start)
	111	$out = $form_start.$out;
	112
	113	return $out;
	114
	115
	116	case 'to':
	117	$fname = '_to';
	118	$header = 'to';
	119
	120	// we have contact id's as get parameters
597170	121	if (!empty($_GET['_to']) && preg_match('/[0-9]+,?/', $_GET['_to']))
4e17e6	122	{
T	123	$a_recipients = array();
d7cb77	124	$sql_result = $DB->query("SELECT name, email
S	125	FROM ".get_table_name('contacts')." WHERE user_id=?
	126	AND del<>'1'
	127	AND contact_id IN (".$_GET['_to'].")",
	128	$_SESSION['user_id']);
4e17e6	129
T	130	while ($sql_arr = $DB->fetch_assoc($sql_result))
	131	$a_recipients[] = format_email_recipient($sql_arr['email'], $sql_arr['name']);
	132
	133	if (sizeof($a_recipients))
	134	$fvalue = join(', ', $a_recipients);
	135	}
597170	136	else if (!empty($_GET['_to']))
4e17e6	137	$fvalue = $_GET['_to'];
T	138
	139	case 'cc':
	140	if (!$fname)
	141	{
	142	$fname = '_cc';
	143	//$header = 'cc';
	144	}
	145	case 'bcc':
	146	if (!$fname)
	147	$fname = '_bcc';
	148
	149	$allow_attrib = array('id', 'class', 'style', 'cols', 'rows', 'wrap');
	150	$field_type = 'textarea';
	151	break;
	152
	153	case 'replyto':
	154	case 'reply-to':
	155	$fname = '_replyto';
	156	$allow_attrib = array('id', 'class', 'style', 'size');
	157	$field_type = 'textfield';
	158	break;
	159
	160	}
	161
	162
597170	163	if ($fname && !empty($_POST[$fname]))
4e17e6	164	$fvalue = $_POST[$fname];
T	165	else if ($header && is_object($REPLY_MESSAGE['headers']))
	166	{
	167	// get recipent address(es) out of the message headers
	168	if ($header=='to' && $REPLY_MESSAGE['headers']->replyto)
	169	$fvalue = $IMAP->decode_header($REPLY_MESSAGE['headers']->replyto);
	170	else if ($header=='to' && $REPLY_MESSAGE['headers']->from)
	171	$fvalue = $IMAP->decode_header($REPLY_MESSAGE['headers']->from);
	172
	173	// split recipients and put them back together in a unique way
	174	$to_addresses = $IMAP->decode_address_list($fvalue);
	175	$fvalue = '';
	176	foreach ($to_addresses as $addr_part)
	177	$fvalue .= (strlen($fvalue) ? ', ':'').$addr_part['string'];
	178	}
	179
	180
	181	if ($fname && $field_type)
	182	{
	183	// pass the following attributes to the form class
	184	$field_attrib = array('name' => $fname);
	185	foreach ($attrib as $attr => $value)
	186	if (in_array($attr, $allow_attrib))
	187	$field_attrib[$attr] = $value;
	188
	189	// create teaxtarea object
	190	$input = new $field_type($field_attrib);
	191	$out = $input->show($fvalue);
	192	}
	193
	194	if ($form_start)
	195	$out = $form_start.$out;
	196
	197	return $out;
	198	}
	199
	200
	201	/*function rcube_compose_headers($attrib)
	202	{
	203	global $CONFIG, $OUTPUT;
	204
	205	list($form_start, $form_end) = get_form_tags($attrib);
	206
	207	// allow the following attributes to be added to the headers table
	208	$attrib_str = create_attrib_string($attrib, array('style', 'class', 'id', 'cellpadding', 'cellspacing', 'border'));
	209
	210	$labels = array();
	211	$labels['from'] = rcube_label('from');
	212	$labels['to'] = rcube_label('to');
	213	$labels['cc'] = rcube_label('cc');
	214	$labels['bcc'] = rcube_label('bcc');
	215	$labels['replyto'] = rcube_label('replyto');
	216
	217	$input_from = new textfield(array('name' => '_from', 'size' => 30));
	218	$input_to = new textfield(array('name' => '_to', 'size' => 30));
	219	$input_cc = new textfield(array('name' => '_cc', 'size' => 30));
	220	$input_bcc = new textfield(array('name' => '_bcc', 'size' => 30));
	221	$input_replyto = new textfield(array('name' => '_replyto', 'size' => 30));
	222
	223	$fields = array();
	224	$fields['from'] = $input_from->show($_POST['_from']);
	225	$fields['to'] = $input_to->show($_POST['_to']);
	226	$fields['cc'] = $input_cc->show($_POST['_cc']);
	227	$fields['bcc'] = $input_bcc->show($_POST['_bcc']);
	228	$fields['replyto'] = $input_replyto->show($_POST['_replyto']);
	229
	230
	231	$out = <<<EOF
	232	$form_start
	233	<table$attrib_str><tr>
	234
	235	<td class="title">$labels[from]</td>
	236	<td>$fields[from]</td>
	237
	238	</tr><tr>
	239
	240	<td class="title">$labels[to]</td>
	241	<td>$fields[to]</td>
	242
	243	</tr><tr>
	244
	245	<td class="title">$labels[cc]</td>
	246	<td>$fields[cc]</td>
	247
	248	</tr><tr>
	249
	250	<td class="title">$labels[bcc]</td>
	251	<td>$fields[bcc]</td>
	252
	253	</tr><tr>
	254
	255	<td class="title">$labels[replyto]</td>
	256	<td>$fields[replyto]</td>
	257
	258	</tr></table>
	259	$form_end
	260	EOF;
	261
	262	return $out;
	263	}
	264	*/
	265
	266
	267	function rcmail_compose_body($attrib)
	268	{
	269	global $CONFIG, $REPLY_MESSAGE, $FORWARD_MESSAGE;
	270
	271	list($form_start, $form_end) = get_form_tags($attrib);
	272	unset($attrib['form']);
	273
	274	$attrib['name'] = '_message';
	275	$textarea = new textarea($attrib);
	276
	277	$body = '';
	278
	279	// use posted message body
597170	280	if (!empty($_POST['_message']))
30233b	281	$body = stripslashes($_POST['_message']);
4e17e6	282
T	283	// compose reply-body
	284	else if (is_array($REPLY_MESSAGE['parts']))
	285	{
	286	$body = rcmail_first_text_part($REPLY_MESSAGE['parts']);
	287	if (strlen($body))
	288	$body = rcmail_create_reply_body($body);
	289	}
	290
	291	// forward message body inline
	292	else if (is_array($FORWARD_MESSAGE['parts']))
	293	{
	294	$body = rcmail_first_text_part($FORWARD_MESSAGE['parts']);
	295	if (strlen($body))
	296	$body = rcmail_create_forward_body($body);
	297	}
	298
	299	$out = $form_start ? "$form_start\n" : '';
	300	$out .= $textarea->show($body);
	301	$out .= $form_end ? "\n$form_end" : '';
	302
	303	return $out;
	304	}
	305
	306
	307	function rcmail_create_reply_body($body)
	308	{
	309	global $IMAP, $REPLY_MESSAGE;
	310
	311	// soft-wrap message first
	312	$body = wordwrap($body, 75);
	313
	314	// split body into single lines
	315	$a_lines = preg_split('/\r?\n/', $body);
	316
	317	// add > to each line
	318	for($n=0; $n<sizeof($a_lines); $n++)
	319	{
	320	if (strpos($a_lines[$n], '>')===0)
	321	$a_lines[$n] = '>'.$a_lines[$n];
	322	else
	323	$a_lines[$n] = '> '.$a_lines[$n];
	324	}
	325
	326	$body = join("\n", $a_lines);
	327
	328	// add title line
	329	$pefix = sprintf("\n\n\nOn %s, %s wrote:\n",
	330	$REPLY_MESSAGE['headers']->date,
	331	$IMAP->decode_header($REPLY_MESSAGE['headers']->from));
	332
	333	return $pefix.$body;
	334	}
	335
	336
	337	function rcmail_create_forward_body($body)
	338	{
	339	global $IMAP, $FORWARD_MESSAGE;
	340
	341	// soft-wrap message first
	342	$body = wordwrap($body, 80);
	343
	344	$prefix = sprintf("\n\n\n-------- Original Message --------\nSubject: %s\nDate: %s\nFrom: %s\nTo: %s\n\n",
	345	$FORWARD_MESSAGE['subject'],
	346	$FORWARD_MESSAGE['headers']->date,
	347	$IMAP->decode_header($FORWARD_MESSAGE['headers']->from),
	348	$IMAP->decode_header($FORWARD_MESSAGE['headers']->to));
	349
597170	350	// add attachments
T	351	if (!isset($_SESSION['compose']['forward_attachments']) && is_array($FORWARD_MESSAGE['parts']) && sizeof($FORWARD_MESSAGE['parts'])>1)
	352	{
	353	$temp_dir = rcmail_create_compose_tempdir();
	354
	355	if (!is_array($_SESSION['compose']['attachments']))
	356	$_SESSION['compose']['attachments'] = array();
	357
	358	foreach ($FORWARD_MESSAGE['parts'] as $part)
	359	{
	360	if ($part->disposition != 'attachment')
	361	continue;
	362
	363	$tmp_path = tempnam($temp_dir, 'rcmAttmnt');
	364	if ($fp = fopen($tmp_path, 'w'))
	365	{
	366	fwrite($fp, $IMAP->mime_decode($part->body, $part->headers['content-transfer-encoding']));
	367	fclose($fp);
	368
	369	$_SESSION['compose']['attachments'][] = array('name' => $part->d_parameters['filename'],
	370	'mimetype' => $part->ctype_primary . '/' . $part->ctype_secondary,
	371	'path' => $tmp_path);
	372	}
	373	}
	374
	375	$_SESSION['compose']['forward_attachments'] = TRUE;
	376	}
	377
4e17e6	378	return $prefix.$body;
T	379	}
	380
	381
	382
	383	function rcmail_compose_subject($attrib)
	384	{
	385	global $CONFIG, $REPLY_MESSAGE, $FORWARD_MESSAGE;
	386
	387	list($form_start, $form_end) = get_form_tags($attrib);
	388	unset($attrib['form']);
	389
	390	$attrib['name'] = '_subject';
	391	$textfield = new textfield($attrib);
	392
	393	$subject = '';
	394
	395	// use subject from post
597170	396	if (isset($_POST['_subject']))
30233b	397	$subject = stripslashes($_POST['_subject']);
4e17e6	398
T	399	// create a reply-subject
	400	else if (isset($REPLY_MESSAGE['subject']))
520c36	401	{
09941e	402	if (eregi('^re:', $REPLY_MESSAGE['subject']))
520c36	403	$subject = $REPLY_MESSAGE['subject'];
T	404	else
	405	$subject = 'Re: '.$REPLY_MESSAGE['subject'];
	406	}
4e17e6	407
T	408	// create a forward-subject
	409	else if (isset($FORWARD_MESSAGE['subject']))
09941e	410	{
T	411	if (eregi('^fwd:', $REPLY_MESSAGE['subject']))
	412	$subject = $FORWARD_MESSAGE['subject'];
	413	else
	414	$subject = 'Fwd: '.$FORWARD_MESSAGE['subject'];
	415	}
4e17e6	416
T	417
	418	$out = $form_start ? "$form_start\n" : '';
	419	$out .= $textfield->show($subject);
	420	$out .= $form_end ? "\n$form_end" : '';
	421
	422	return $out;
	423	}
	424
	425
	426	function rcmail_compose_attachment_list($attrib)
	427	{
	428	global $OUTPUT, $JS_OBJECT_NAME;
	429
	430	// add ID if not given
	431	if (!$attrib['id'])
	432	$attrib['id'] = 'rcmAttachmentList';
	433
	434	// allow the following attributes to be added to the <ul> tag
	435	$attrib_str = create_attrib_string($attrib, array('id', 'class', 'style'));
	436
	437	$out = '<ul'. $attrib_str . ">\n";
	438
	439	if (is_array($_SESSION['compose']['attachments']))
	440	{
	441	foreach ($_SESSION['compose']['attachments'] as $i => $a_prop)
	442	$out .= sprintf("<li>%s</li>\n", $a_prop['name']);
	443	}
	444
	445	$OUTPUT->add_script(sprintf("%s.gui_object('attachmentlist', '%s');", $JS_OBJECT_NAME, $attrib['id']));
	446
	447	$out .= '</ul>';
	448	return $out;
	449	}
	450
	451
	452
	453	function rcmail_compose_attachment_form($attrib)
	454	{
	455	global $OUTPUT, $JS_OBJECT_NAME, $SESS_HIDDEN_FIELD;
	456
	457	// add ID if not given
	458	if (!$attrib['id'])
	459	$attrib['id'] = 'rcmUploadbox';
	460
	461	// allow the following attributes to be added to the <div> tag
	462	$attrib_str = create_attrib_string($attrib, array('id', 'class', 'style'));
	463	$input_field = rcmail_compose_attachment_field(array());
	464	$label_send = rcube_label('upload');
	465	$label_close = rcube_label('close');
	466
	467	$out = <<<EOF
	468	<div$attrib_str>
	469	<form action="./" method="post" enctype="multipart/form-data">
	470	$SESS_HIDDEN_FIELD
	471	$input_field<br />
	472	<input type="button" value="$label_close" class="button" onclick="document.getElementById('$attrib[id]').style.visibility='hidden'" />
	473	<input type="button" value="$label_send" class="button" onclick="$JS_OBJECT_NAME.command('send-attachment', this.form)" />
	474	</form>
	475	</div>
	476	EOF;
	477
	478
	479	$OUTPUT->add_script(sprintf("%s.gui_object('uploadbox', '%s');", $JS_OBJECT_NAME, $attrib['id']));
	480	return $out;
	481	}
	482
	483
	484	function rcmail_compose_attachment_field($attrib)
	485	{
	486	// allow the following attributes to be added to the <input> tag
	487	$attrib_str = create_attrib_string($attrib, array('id', 'class', 'style', 'size'));
	488
	489	$out = '<input type="file" name="_attachments[]"'. $attrib_str . " />";
	490	return $out;
	491	}
	492
	493
	494	function rcmail_priority_selector($attrib)
	495	{
	496	list($form_start, $form_end) = get_form_tags($attrib);
	497	unset($attrib['form']);
	498
	499	$attrib['name'] = '_priority';
	500	$selector = new select($attrib);
	501
	502	$selector->add(array(rcube_label('lowest'),
	503	rcube_label('low'),
	504	rcube_label('normal'),
	505	rcube_label('high'),
	506	rcube_label('highest')),
7902df	507	array(5, 4, 0, 2, 1));
4e17e6	508
597170	509	$sel = isset($_POST['_priority']) ? $_POST['_priority'] : 0;
4e17e6	510
T	511	$out = $form_start ? "$form_start\n" : '';
	512	$out .= $selector->show($sel);
	513	$out .= $form_end ? "\n$form_end" : '';
	514
	515	return $out;
	516	}
	517
	518
	519	function get_form_tags($attrib)
	520	{
	521	global $CONFIG, $OUTPUT, $JS_OBJECT_NAME, $MESSAGE_FORM, $SESS_HIDDEN_FIELD;
	522
	523	$form_start = '';
	524	if (!strlen($MESSAGE_FORM))
	525	{
	526	$hiddenfields = new hiddenfield(array('name' => '_task', 'value' => $GLOBALS['_task']));
	527	$hiddenfields->add(array('name' => '_action', 'value' => 'send'));
	528
597170	529	$form_start = empty($attrib['form']) ? '<form name="form" action="./" method="post">' : '';
4e17e6	530	$form_start .= "\n$SESS_HIDDEN_FIELD\n";
T	531	$form_start .= $hiddenfields->show();
	532	}
	533
	534	$form_end = (strlen($MESSAGE_FORM) && !strlen($attrib['form'])) ? '</form>' : '';
597170	535	$form_name = !empty($attrib['form']) ? $attrib['form'] : 'form';
4e17e6	536
T	537	if (!strlen($MESSAGE_FORM))
	538	$OUTPUT->add_script("$JS_OBJECT_NAME.gui_object('messageform', '$form_name');");
	539
	540	$MESSAGE_FORM = $form_name;
	541
	542	return array($form_start, $form_end);
	543	}
	544
	545
	546	function format_email_recipient($email, $name='')
	547	{
	548	if ($name && $name != $email)
	549	return sprintf('%s <%s>', strpos($name, ",") ? '"'.$name.'"' : $name, $email);
	550	else
	551	return $email;
	552	}
	553
	554
	555	/**** get contacts for this user and add them to client scripts ******/
	556
d7cb77	557	$sql_result = $DB->query("SELECT name, email
S	558	FROM ".get_table_name('contacts')." WHERE user_id=?
	559	AND del<>'1'",$_SESSION['user_id']);
4e17e6	560
T	561	if ($DB->num_rows($sql_result))
	562	{
	563	$a_contacts = array();
	564	while ($sql_arr = $DB->fetch_assoc($sql_result))
	565	if ($sql_arr['email'])
	566	$a_contacts[] = format_email_recipient($sql_arr['email'], rep_specialchars_output($sql_arr['name'], 'js'));
	567
	568	$OUTPUT->add_script(sprintf("$JS_OBJECT_NAME.set_env('contacts', %s);", array2js($a_contacts)));
	569	}
	570
	571
	572
	573
	574	parse_template('compose');
	575	?>