IMPORT TikiPro CLYDE FINAL

1 files changed, 110 insertions, 0 deletions

diff --git a/compose.php b/compose.php
new file mode 100644
index 0000000..b10dfbb
--- /dev/null
+++ b/compose.php
@@ -0,0 +1,110 @@
+<?php
+
+// $Header: /cvsroot/bitweaver/_bit_messages/compose.php,v 1.1 2005/06/19 04:56:31 bitweaver Exp $
+
+// Copyright (c) 2002-2003, Luis Argerich, Garland Foster, Eduardo Polidor, et. al.
+// All Rights Reserved. See copyright.txt for details and a complete list of authors.
+// Licensed under the GNU LESSER GENERAL PUBLIC LICENSE. See license.txt for details.
+require_once( '../bit_setup_inc.php' );
+require_once( MESSU_PKG_PATH.'messu_lib.php' );
+require_once( USERS_PKG_PATH.'BitUser.php' );
+
+if( !$gBitUser->isRegistered() ) {
+	$smarty->assign('msg', tra("You are not logged in"));
+	$gBitSystem->display( 'error.tpl' );
+	die;
+}
+
+$gBitSystem->isPackageActive( 'messu', TRUE );
+$gBitSystem->verifyPermission( 'bit_p_messages' );
+
+// Configure quicktags list
+if ($gBitSystem->getPreference('package_quicktags','n') == 'y') {
+	include_once( QUICKTAGS_PKG_PATH.'quicktags_inc.php' );
+}
+
+if (!isset($_REQUEST['to']))
+	$_REQUEST['to'] = '';
+
+if (!isset($_REQUEST['cc']))
+	$_REQUEST['cc'] = '';
+
+if (!isset($_REQUEST['bcc']))
+	$_REQUEST['bcc'] = '';
+
+if (!isset($_REQUEST['subject']))
+	$_REQUEST['subject'] = '';
+
+if (!isset($_REQUEST['body']))
+	$_REQUEST['body'] = '';
+
+if (!isset($_REQUEST['priority']))
+	$_REQUEST['priority'] = 3;
+
+if( !empty( $_REQUEST['action']['reply'] ) || !empty( $_REQUEST['action']['replyall'] ) ) {
+	$replyToUser = $gBitUser->getUserInfo( array( 'user_id' => $_REQUEST['replyto'] ) );
+	$_REQUEST['to'] = $replyToUser['login'];
+	if( !empty( $_REQUEST['action']['replyall'] ) ) {
+		$_REQUEST['cc'] = preg_replace( "/".$replyToUser['login'].",/", "", $_REQUEST['replyallto'] );
+		$_REQUEST['cc'] = preg_replace( "/".$gBitUser->mUsername.",/", "", $_REQUEST['cc'] );
+	}
+}
+
+// Strip Re:Re:Re: from subject
+if(isset($_REQUEST['action']['reply']) || isset($_REQUEST['action']['replyall'])) {
+	$_REQUEST['subject'] = tra("Re: ").preg_replace("/^(".tra("Re: ").")+/i", "", $_REQUEST['subject']);
+}
+
+$smarty->assign('to', $_REQUEST['to']);
+$smarty->assign('cc', $_REQUEST['cc']);
+$smarty->assign('bcc', $_REQUEST['bcc']);
+$smarty->assign('subject', $_REQUEST['subject']);
+$smarty->assign('body', $_REQUEST['body']);
+$smarty->assign('priority', $_REQUEST['priority']);
+
+$smarty->assign('sent', 0);
+$feedback = array();
+$smarty->assign_by_ref( 'feedback', $feedback );
+
+if (isset($_REQUEST['replyto']) || isset($_REQUEST['replyallto'])) {
+	$messulib->flag_message( $gBitUser->mUserId, $_REQUEST['msg_id'], 'is_replied', 'y' );
+}
+
+if (isset($_REQUEST['send'])) {
+	$message = '';
+	// Validation:
+	// must have a subject or body non-empty (or both)
+	if ( !empty($_REQUEST['subject']) && !empty($_REQUEST['body'])) {
+		// Parse the to, cc and bcc fields into an array
+		$arrTo = explode( ',', preg_replace( '/ /', '', $_REQUEST['to'] ) );
+		$arrCc = explode( ',', preg_replace( '/ /', '', $_REQUEST['cc'] ) );
+		$arrBcc = explode( ',', preg_replace( '/ /', '', $_REQUEST['bcc'] ) );
+
+		$toUsers = array_unique( array_merge( $arrTo, $arrCc, $arrBcc ) );
+		// Validation: either to, cc or bcc must have a valid user
+		if( count($toUsers) ) {
+			// Insert the message in the inboxes of each user
+			foreach ($toUsers as $toUser) {
+				if( !empty( $toUser ) ) {
+					if( $messulib->post_message( $toUser, $_REQUEST['to'], $_REQUEST['cc'], $_REQUEST['bcc'], $_REQUEST['subject'], $_REQUEST['body'],$_REQUEST['priority'] ) ) {
+						$feedback['success'][] =  tra( "Message will be sent to: " ).' '.$toUser;
+					} else {
+						$feedback['error'][] = $messulib->mErrors['compose'];
+					}
+				}
+			}
+			$smarty->assign('sent', 1);
+		} else {
+			$feedback['error'][] = tra('ERROR: No valid users to send the message.');
+		}
+	} else {
+		$feedback['error'][] = tra( 'ERROR: Either the subject or body must contain text.' );
+	}
+}
+
+$section = 'user_messages';
+
+
+
+$gBitSystem->display( 'bitpackage:messu/messu_compose.tpl', 'Compose Message' );
+?>