in-portal
No OneTemporary
Actions

Subscribers

None

File Metadata

Created: Fri, Nov 21, 6:38 PM

in-portal
View Options

	Index: branches/unlabeled/unlabeled-1.15.2/core/kernel/utility/email.php
	===================================================================
	--- branches/unlabeled/unlabeled-1.15.2/core/kernel/utility/email.php (revision 6409)
	+++ branches/unlabeled/unlabeled-1.15.2/core/kernel/utility/email.php (revision 6410)
	@@ -1,456 +1,459 @@
	<?php

	class kEmailMessage extends kBase {

	var $Compiled;
	var $Headers;
	var $HeadersArray;
	var $BodyText;
	var $BodyHtml;
	var $Body;
	var $Subject;
	// var $From;
	// var $To;
	// var $ReplyTo;
	// var $CC;
	// var $BCC;
	var $Charset;
	var $LineFeed;
	var $TransferEncoding;
	var $From;
	var $To;


	var $IsMultipart;
	var $Parts;
	var $Files;


	var $TextBoundary;
	var $EmailBoundary;

	function kEmailMessage(){
	parent::kBase();
	//$this->TextBoundary = uniqid(adodb_mktime());
	$this->EmailBoundary = uniqid(adodb_mktime());
	$this->LineFeed = "\n";
	- $this->Charset='ISO-8859-1';
	+
	+ $lang =& $this->Application->recallObject('lang.current');
	+ $this->Charset = $lang->GetDBField('Charset') ? $lang->GetDBField('Charset') : 'ISO-8859-1';
	+
	$this->TransferEncoding='8bit';
	$this->Body = '';
	$this->setHeader('Subject', 'Automatically generated message');
	$this->HeadersArray=array();

	$this->setHeader('Mime-Version', '1.0');
	}

	function setHeader($header, $value){
	$this->HeadersArray[$header] = $value;
	$this->Compiled = false;
	}

	function fixLineBreaks($data)
	{
	$data = str_replace("\n\n","\r\n\r\n",$data);
	$data = str_replace("\r\n","\n",$data);
	$data = str_replace("\n","\r\n",$data);
	return $data;
	}

	function setHeaders($headers){
	$headers=$this->fixLineBreaks($headers);
	$headers_lines = explode("\r\n", $headers);
	foreach ($headers_lines as $line_num => $line){
	list($header_field, $header_value) = explode(':', $line, 2);
	$header_value = trim($header_value);
	$this->setHeader($header_field, $header_value);
	if ($header_field == 'Subject') $this->Subject = $header_value;
	}

	}

	function appendHeader($header, $value){
	$this->HeadersArray[$header][] = $value;
	$this->Compiled = false;
	}


	function setFrom($from, $name=''){

	$this->From = $from;

	if ($name!=''){
	$from = trim($name).' <'.$from.'>';
	}
	$this->setHeader('From', trim($from));
	}

	function setTo($to, $name=''){

	$this->To = $to;

	if ($name!=''){
	$to = trim($name).' <'.$to.'>';
	}

	$this->setHeader('To', trim($to));
	}

	function setSubject($subj){
	$this->setHeader('Subject', $subj);
	}

	function SetCC($to_cc){
	$this->appendHeader('CC', $to_cc);
	}

	function SetBCC($to_bcc){
	$this->appendHeader('BCC', $to_bcc);
	}

	function setReplyTo($reply_to){
	$this->setHeader('Reply-to', $reply_to);
	}

	function Clear()
	{
	$this->Compiled = false;
	$this->Body = '';
	$this->BodyHtml = '';
	$this->BodyText = '';
	$this->Headers = '';
	$this->Files = '';
	$this->From = '';
	$this->To = '';
	}

	function setTextBody($body_text){

	$this->BodyText = $body_text;
	$this->Compiled = false;
	}

	function setHTMLBody($body_html){

	$this->BodyHtml = $body_html;
	$this->IsMultipart = true;
	$this->Compiled = false;
	}


	function convertHTMLtoPlain($text)
	{
	$search = Array (
	"'(<\/td>.)[\r\n]+(.<td)'i",//formating text in tables
	"'(<br[ ]?[\/]?>[\r\n]{0,2})\|(<\/p>)\|(<\/div>)\|(<\/tr>)'i",
	"'<head>(.*?)</head>'si",
	"'<style(.*?)</style>'si",
	"'<title>(.*?)</title>'si",
	"'<script(.*?)</script>'si",
	// "'^[\s\n\r\t]+'", //strip all spacers & newlines in the begin of document
	// "'[\s\n\r\t]+$'", //strip all spacers & newlines in the end of document
	"'&(quot\|#34);'i",
	"'&(amp\|#38);'i",
	"'&(lt\|#60);'i",
	"'&(gt\|#62);'i",
	"'&(nbsp\|#160);'i",
	"'&(iexcl\|#161);'i",
	"'&(cent\|#162);'i",
	"'&(pound\|#163);'i",
	"'&(copy\|#169);'i",
	"'&#(\d+);'e"
	);

	$replace = Array (
	"\\1\t\\2",
	"\n",
	"",
	"",
	"",
	"",
	// "",
	// "",
	"\"",
	"&",
	"<",
	">",
	" ",
	chr(161),
	chr(162),
	chr(163),
	chr(169),
	"chr(\\1)"
	);
	return strip_tags( preg_replace ($search, $replace, $text) );
	}

	function compileBody(){

	if($this->BodyHtml){
	$not_html = $this->convertHTMLtoPlain($this->BodyHtml);

	// $not_html = $this->removeBlankLines($not_html);
	// Fixing problem with add exclamation characters "!" into the body of the email.
	$not_html = wordwrap($not_html, 72);
	$this->BodyHtml = wordwrap($this->BodyHtml, 72);

	$this->Body = '';
	//$this->Body .= 'Content-Type: multipart/alternative;'.$this->LF()." ".'boundary="----='.$this->TextBoundary.'"'.$this->LF();
	//$this->Body .= $this->LF();
	$this->Body .= '------='.$this->EmailBoundary.$this->LF();
	$this->Body .= 'Content-Type: text/plain;'." ".'charset="'.$this->Charset.'"'.$this->LF();
	$this->Body .= $this->LF();
	$this->Body .= $not_html.$this->LF().$this->LF();
	$this->Body .= '------='.$this->EmailBoundary.$this->LF();
	$this->Body .= 'Content-Type: text/html;'." ".'charset="'.$this->Charset.'"'.$this->LF();
	$this->Body .= 'Content-Transfer-Encoding: '.$this->TransferEncoding.$this->LF();
	$this->Body .= 'Content-Description: HTML part'.$this->LF();
	$this->Body .= 'Content-Disposition: inline'.$this->LF();
	$this->Body .= $this->LF();

	$this->BodyHtml = str_replace("\r", "", $this->BodyHtml);
	$this->BodyHtml = str_replace("\n", $this->LF(), $this->BodyHtml);

	$this->Body .= $this->BodyHtml;
	$this->Body .= $this->LF().$this->LF();


	$this->IsMultipart = true;

	}else{
	$not_html = $this->convertHTMLtoPlain($this->BodyText);
	// $not_html = $this->removeBlankLines($not_html);
	// Fixing problem with add exclamation characters "!" into the body of the email.
	$not_html = wordwrap($not_html, 72);


	if ($this->IsMultipart){
	$this->Body .= '------='.$this->EmailBoundary.$this->LF();
	$this->Body .= 'Content-Type: text/plain;'.$this->LF()." ".'charset="'.$this->Charset.'"'.$this->LF();
	$this->Body .= 'Content-Disposition: inline'.$this->LF();
	$this->Body .= $this->LF();
	$this->Body .= $not_html.$this->LF().$this->LF();
	}else{
	//$this->BodyText = str_replace("\r", "", $this->BodyText);
	//$this->BodyText = str_replace("\n", $this->LF(), $this->BodyText);
	$this->Body = $not_html;
	}

	}

	}

	function setCharset($charset){
	$this->Charset = $charset;
	$this->Compiled = false;
	}

	function setLineFeed($linefeed){
	$this->LineFeed=$linefeed;
	}

	function attachFile($filepath, $mime="application/octet-stream"){

	if(is_file($filepath)){
	$file_info = array('path'=>$filepath, 'mime'=>$mime);
	$this->Files[] = $file_info;
	}else{
	$this->Application->ApplicationDie('File "'.$filepath.'" not exist...'."\n");
	}

	$this->IsMultipart = true;
	$this->Compiled = false;
	}

	function LF($str=''){
	$str = str_replace("\n", "", $str);
	$str = str_replace("\r", "", $str);
	return $str.$this->LineFeed;
	}

	function getContentType(){
	$content_type="";
	if ($this->IsMultipart){
	$content_type .= $this->LF('multipart/alternative; boundary="----='.$this->EmailBoundary.'"');
	}else{
	$content_type .= $this->LF('text/plain;');
	$content_type .= $this->LF(" ".'charset='.$this->Charset);
	}

	return $content_type;

	}

	// ========================================

	function compileHeaders(){

	$this->Headers="";

	// $this->Headers .= "From: ".$this->LF($this->From);
	//if ($this->ReplyTo){
	// $this->Headers .= "Reply-To: ".$this->ReplyTo.$this->LF();
	//}
	//$this->Headers .= "To: ".$this->LF($this->To);
	//$this->Headers .= "Subject: ".$this->LF($this->Subject);
	/*
	if (sizeof($this->CC)){
	$this->Headers .= "Cc: ";
	foreach ($this->Cc as $key => $addr){
	$this->Headers.=$this->LF($addr.',');
	}
	}

	if (sizeof($this->BCC)){
	$this->Headers .= "Bcc: ";
	foreach ($this->BCC as $key => $addr){
	$this->Headers.=$this->LF($addr.',');
	}
	}
	*/

	foreach ($this->HeadersArray as $key => $val){
	if ($key=="To" \|\| $key=="") continue; // avoid duplicate "To" field in headers
	if (is_array($val)){
	$val = chunk_split(implode(', ', $val),72, $this->LF().' ');


	$this->Headers .= $key.": ".$val.$this->LF();
	}else{
	$this->Headers .= $key.": ".$val.$this->LF();
	}

	}

	if ($this->IsMultipart) {
	$this->Headers .= 'MIME-Version: 1.0'.$this->LF();
	}
	$this->Headers .= "Content-Type: ".$this->getContentType();

	//$this->Headers .= "Content-Transfer-Encoding: ".$this->TransferEncoding.$this->LF();


	}

	function compileFiles(){
	if ($this->Files){
	foreach($this->Files as $key => $file_info)
	{
	$filepath = $file_info['path'];
	$mime = $file_info['mime'];
	$attachment_header = $this->LF('------='.$this->EmailBoundary);
	$attachment_header .= $this->LF('Content-Type: '.$mime.'; name="'.basename($filepath).'"');
	$attachment_header .= $this->LF('Content-Transfer-Encoding: base64');
	$attachment_header .= $this->LF('Content-Description: '.basename($filepath));
	$attachment_header .= $this->LF('Content-Disposition: attachment; filename="'.basename($filepath).'"');
	$attachment_header .= $this->LF('');

	$attachment_data = fread(fopen($filepath,"rb"),filesize($filepath));
	$attachment_data = base64_encode($attachment_data);
	$attachment_data = chunk_split($attachment_data,72);

	$this->Body .= $attachment_header.$attachment_data.$this->LF('');
	$this->IsMultipart = true;
	}
	}
	}

	function compile(){

	if ($this->Compiled) return;

	$this->compileBody();

	$this->compileFiles();

	$this->compileHeaders();

	// Compile
	if ($this->IsMultipart){
	$this->Body .= '------='.$this->EmailBoundary.'--'.$this->LF();
	}

	$this->Body = $this->fixLineBreaks($this->Body);
	$this->Headers = $this->fixLineBreaks($this->Headers);


	$this->Compiled = true;
	}

	// ========================================

	function getHeaders(){

	$this->Compile();
	return $this->Headers;
	}

	function getBody(){

	$this->Compile();
	return $this->Body;
	}

	function send(){

	return mail($this->HeadersArray['To'], $this->HeadersArray['Subject'], "", $this->getHeaders().$this->LF().$this->LF().$this->getBody());
	//return mail($this->HeadersArray['To'], $this->HeadersArray['Subject'], "", $this->getHeaders().$this->LF().$this->LF().$this->getBody(), '-f'.$this->From);

	}

	function sendSMTP(&$smtp_object, $smtp_host, $user, $pass, $auth_used = 0){

	$params['host'] = $smtp_host; // The smtp server host/ip
	$params['port'] = 25; // The smtp server port
	$params['helo'] = $_SERVER['HTTP_HOST']; // What to use when sending the helo command. Typically, your domain/hostname
	$params['auth'] = TRUE; // Whether to use basic authentication or not
	$params['user'] = $user; // Username for authentication


	$params['pass'] = $pass; // Password for authentication
	$params['debug'] = 1;
	if ($auth_used == 0){
	$params['authmethod'] = 'NOAUTH'; // forse disabling auth
	}


	if (strpos($this->To, ',') !== false) {
	$this->To = str_replace(' ', '', $this->To);
	$send_params['recipients'] = explode(',', $this->To);
	}
	else {
	$send_params['recipients'] = array($this->To); // The recipients (can be multiple)
	}

	$send_params['headers'] = explode("\r\n", $this->getHeaders());

	array_unshift($send_params['headers'], 'To: '.$this->HeadersArray['To']);
	$send_params['from'] = $this->From; // This is used as in the MAIL FROM: cmd
	// It should end up as the Return-Path: header
	$send_params['body']=$this->getBody();


	if($smtp_object->connect($params) && $smtp_object->send($send_params)){
	if ( $this->Application->isDebugMode() )
	{
	$this->Application->Debugger->appendHTML('<pre>'.$smtp_object->debugtext.'</pre>');
	//define('DBG_REDIRECT', 1);
	}
	return true;
	}
	else {
	if ( $this->Application->isDebugMode() )
	{
	$this->Application->Debugger->appendHTML('<pre>'.$smtp_object->debugtext.'</pre>');
	//define('DBG_REDIRECT', 1);
	}
	return false;
	}

	}


	}



	?>

	Property changes on: branches/unlabeled/unlabeled-1.15.2/core/kernel/utility/email.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.15
	\ No newline at end of property
	+1.15.2.1
	\ No newline at end of property
	Index: branches/unlabeled/unlabeled-1.62.2/core/kernel/processors/main_processor.php
	===================================================================
	--- branches/unlabeled/unlabeled-1.62.2/core/kernel/processors/main_processor.php (revision 6409)
	+++ branches/unlabeled/unlabeled-1.62.2/core/kernel/processors/main_processor.php (revision 6410)
	@@ -1,930 +1,930 @@
	<?php

	class kMainTagProcessor extends TagProcessor {

	function Init($prefix, $special, $event_params = null)
	{
	parent::Init($prefix, $special, $event_params);

	$actions =& $this->Application->recallObject('kActions');
	$actions->Set('t', $this->Application->GetVar('t'));
	$actions->Set('sid', $this->Application->GetSID());
	$actions->Set('m_opener', $this->Application->GetVar('m_opener') );
	}

	/**
	* Used to handle calls where tag name
	* match with existing php function name
	*
	* @param Tag $tag
	* @return string
	*/
	function ProcessTag(&$tag)
	{
	if ($tag->Tag=='include') $tag->Tag='MyInclude';
	return parent::ProcessTag($tag);
	}

	/**
	* Base folder for all template includes
	*
	* @param Array $params
	* @return string
	*/
	function TemplatesBase($params)
	{
	if ($this->Application->IsAdmin()) {
	$module = isset($params['module']) ? $params['module'] : 'kernel';
	$path = preg_replace('/\/(.?)\/(.)/', $module.'/\\2', THEMES_PATH); // remove leading slash + substitute module
	}
	else {
	$path = substr(THEMES_PATH, 1);
	}
	return $this->Application->BaseURL().$path;
	}

	/**
	* Creates <base href ..> HTML tag for all templates
	* affects future css, js files and href params of links
	*
	* @return string
	* @access public
	*/
	function Base_Ref($params)
	{
	return '<base href="'.$this->TemplatesBase($params).'/" />';
	}

	/**
	* Returns base url for web-site
	*
	* @return string
	* @access public
	*/
	function BaseURL()
	{
	return $this->Application->BaseURL();
	}

	function ProjectBase($params)
	{
	return $this->Application->BaseURL();
	}

	/*function Base($params)
	{
	return $this->Application->BaseURL().$params['add'];
	}*/

	/**
	* Used to create link to any template.
	* use "pass" paramter if "t" tag to specify
	* prefix & special of object to be represented
	* in resulting url
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function T($params)
	{
	//by default link to current template
	$t = $this->SelectParam($params, 't,template');
	unset($params['t']);
	unset($params['template']);
	$prefix=isset($params['prefix']) ? $params['prefix'] : ''; unset($params['prefix']);
	$index_file = isset($params['index_file']) ? $params['index_file'] : null; unset($params['index_file']);

	return $this->Application->HREF($t, $prefix, $params, $index_file);
	}

	function Link($params)
	{
	if (isset($params['template'])) {
	$params['t'] = $params['template'];
	unset($params['template']);
	}
	if (!isset($params['pass']) && !isset($params['no_pass'])) $params['pass'] = 'm';
	if (isset($params['no_pass'])) unset($params['no_pass']);

	if( $this->Application->GetVar('admin') ) $params['admin'] = 1;

	return $this->T($params);
	}

	function Env($params)
	{
	$t = $params['template'];
	unset($params['template']);
	return $this->Application->BuildEnv($t, $params, 'm', null, false);
	}

	function FormAction($params)
	{
	return $this->Application->ProcessParsedTag('m', 't', array_merge($params, Array('pass'=>'all,m', 'pass_category' => 1 )) );
	}

	/*// NEEDS TEST
	function Config($params)
	{
	return $this->Application->ConfigOption($params['var']);
	}

	function Object($params)
	{
	$name = $params['name'];
	$method = $params['method'];

	$tmp =& $this->Application->recallObject($name);
	if ($tmp != null) {
	if (method_exists($tmp, $method))
	return $tmp->$method($params);
	else
	echo "Method $method does not exist in object ".get_class($tmp)." named $name<br>";
	}
	else
	echo "Object $name does not exist in the appliaction<br>";
	}*/

	/**
	* Tag, that always returns true.
	* For parser testing purposes
	*
	* @param Array $params
	* @return bool
	* @access public
	*/
	function True($params)
	{
	return true;
	}

	/**
	* Tag, that always returns false.
	* For parser testing purposes
	*
	* @param Array $params
	* @return bool
	* @access public
	*/
	function False($params)
	{
	return false;
	}

	/**
	* Returns block parameter by name
	*
	* @param Array $params
	* @return stirng
	* @access public
	*/
	function Param($params)
	{
	//$parser =& $this->Application->recallObject('TemplateParser');
	$res = $this->Application->Parser->GetParam($params['name']);
	if ($res === false) $res = '';
	if (isset($params['plus']))
	$res += $params['plus'];
	return $res;
	}

	function DefaultParam($params)
	{
	foreach ($params as $key => $val) {
	if ($this->Application->Parser->GetParam($key) === false) {
	$this->Application->Parser->SetParam($key, $val);
	}
	}
	}

	/**
	* Gets value of specified field from specified prefix_special and set it as parser param
	*
	* @param Array $params
	*/
	/*function SetParam($params)
	{
	// <inp2:m_SetParam param="custom_name" src="cf:FieldName"/>
	list($prefix_special, $field_name) = explode(':', $params['src']);

	$object =& $this->Application->recallObject($prefix_special);
	$name = $this->SelectParam($params, 'param,name,var');

	$this->Application->Parser->SetParam($name, $object->GetField($field_name) );
	}*/

	/**
	* Compares block parameter with value specified
	*
	* @param Array $params
	* @return bool
	* @access public
	*/
	function ParamEquals($params)
	{
	//$parser =& $this->Application->recallObject('TemplateParser');
	$name = $this->SelectParam($params, 'name,var,param');
	$value = $params['value'];
	return ($this->Application->Parser->GetParam($name) == $value);
	}

	/*function PHP_Self($params)
	{
	return $HTTP_SERVER_VARS['PHP_SELF'];
	}
	*/

	/**
	* Returns session variable value by name
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function Recall($params)
	{
	$ret = $this->Application->RecallVar( $this->SelectParam($params,'name,var,param') );
	$ret = ($ret === false && isset($params['no_null'])) ? '' : $ret;
	if( getArrayValue($params,'special') \|\| getArrayValue($params,'htmlchars')) $ret = htmlspecialchars($ret);

	if ( getArrayValue($params, 'urlencode') ) $ret = urlencode($ret);

	return $ret;
	}

	// bad style to store something from template to session !!! (by Alex)
	// Used here only to test how session works, nothing more
	function Store($params)
	{
	//echo"Store $params[name]<br>";
	$name = $params['name'];
	$value = $params['value'];
	$this->Application->StoreVar($name,$value);
	}

	/**
	* Sets application variable value(-s)
	*
	* @param Array $params
	* @access public
	*/
	function Set($params)
	{
	foreach ($params as $param => $value) {
	$this->Application->SetVar($param, $value);
	}
	}

	/**
	* Increment application variable
	* specified by number specified
	*
	* @param Array $params
	* @access public
	*/
	function Inc($params)
	{
	$this->Application->SetVar($params['param'], $this->Application->GetVar($params['param']) + $params['by']);
	}

	/**
	* Retrieves application variable
	* value by name
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function Get($params)
	{
	$ret = $this->Application->GetVar($this->SelectParam($params, 'name,var,param'), '');
	return getArrayValue($params, 'htmlchars') ? htmlspecialchars($ret) : $ret;
	}

	/**
	* Retrieves application constant
	* value by name
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function GetConst($params)
	{
	return defined($this->SelectParam($params, 'name,const')) ? constant($this->SelectParam($params, 'name,const,param')) : '';
	}

	/**
	* Retrieves configuration variable value by name
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function GetConfig($params)
	{
	$config_name = $this->SelectParam($params, 'name,var');
	$ret = $this->Application->ConfigValue($config_name);
	if( getArrayValue($params, 'escape') ) $ret = addslashes($ret);
	return $ret;
	}

	function ConfigEquals($params)
	{
	$option = $this->SelectParam($params, 'name,option,var');
	return $this->Application->ConfigValue($option) == getArrayValue($params, 'value');
	}

	/**
	* Creates all hidden fields
	* needed for kernel_form
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function DumpSystemInfo($params)
	{
	$actions =& $this->Application->recallObject('kActions');
	$actions->Set('t', $this->Application->GetVar('t') );

	$params = $actions->GetParams();
	$o='';
	foreach ($params AS $name => $val)
	{
	$o .= "<input type='hidden' name='$name' id='$name' value='$val'>\n";
	}
	return $o;
	}

	function GetFormHiddens($params)
	{
	$sid = $this->Application->GetSID();
	$t = $this->SelectParam($params, 'template,t');
	unset($params['template']);
	$env = $this->Application->BuildEnv($t, $params, 'm', null, false);
	$o = '';
	if ( $this->Application->RewriteURLs() )
	{
	$session =& $this->Application->recallObject('Session');
	if ($session->NeedQueryString()) {
	$o .= "<input type='hidden' name='sid' id='sid' value='$sid'>\n";
	}
	}
	else {
	$o .= "<input type='hidden' name='env' id='env' value='$env'>\n";
	}
	if ($this->Application->GetVar('admin') == 1) {
	$o .= "<input type='hidden' name='admin' id='admin' value='1'>\n";
	}
	return $o;
	}

	function Odd_Even($params)
	{
	$odd = $params['odd'];
	$even = $params['even'];
	if (!isset($params['var'])) {
	$var = 'odd_even';
	}
	else {
	$var = $params['var'];
	}

	if ($this->Application->GetVar($var) == 'even') {
	if (!isset($params['readonly']) \|\| !$params['readonly']) {
	$this->Application->SetVar($var, 'odd');
	}
	return $even;
	}
	else {
	if (!isset($params['readonly']) \|\| !$params['readonly']) {
	$this->Application->SetVar($var, 'even');
	}
	return $odd;
	}
	}

	/**
	* Returns phrase translation by name
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function Phrase($params)
	{
	// m:phrase name="phrase_name" default="Tr-alala" updated="2004-01-29 12:49"
	if (array_key_exists('default', $params)) return $params['default']; //backward compatibility
	$translation = $this->Application->Phrase($this->SelectParam($params, 'label,name,title'));
	if (getArrayValue($params, 'escape')) {
	$translation = htmlspecialchars($translation);
	$translation = str_replace('\'', ''', $translation);
	$translation = addslashes($translation);
	}
	return $translation;
	}

	// for tabs
	function is_active($params)
	{
	$test_templ = $this->SelectParam($params, 'templ,template,t');
	if ( !getArrayValue($params,'allow_empty') )
	{
	$if_true=getArrayValue($params,'true') ? $params['true'] : 1;
	$if_false=getArrayValue($params,'false') ? $params['false'] : 0;
	}
	else
	{
	$if_true=$params['true'];
	$if_false=$params['false'];
	}

	if ( preg_match("/^".str_replace('/', '\/', $test_templ)."/", $this->Application->GetVar('t'))) {
	return $if_true;
	}
	else {
	return $if_false;
	}
	}

	function IsNotActive($params)
	{
	return !$this->is_active($params);
	}

	function IsActive($params)
	{
	return $this->is_active($params);
	}

	function is_t_active($params)
	{
	return $this->is_active($params);
	}

	function CurrentTemplate($params)
	{
	return $this->is_active($params);
	}

	/**
	* Checks if session variable
	* specified by name value match
	* value passed as parameter
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function RecallEquals($params)
	{
	$name = $this->SelectParam($params, 'name,var');
	$value = $params['value'];
	return ($this->Application->RecallVar($name) == $value);
	}

	/**
	* Checks if application variable
	* specified by name value match
	* value passed as parameter
	*
	* @param Array $params
	* @return bool
	* @access public
	*/
	function GetEquals($params)
	{
	$name = $this->SelectParam($params, 'var,name,param');
	$value = $params['value'];
	if ($this->Application->GetVar($name) == $value) {
	return 1;
	}
	}

	/**
	* Includes template
	* and returns it's
	* parsed version
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function MyInclude($params)
	{
	$BlockParser =& $this->Application->makeClass('TemplateParser');
	// $BlockParser->SetParams($params);
	$parser =& $this->Application->Parser;
	$this->Application->Parser =& $BlockParser;

	$t = $this->SelectParam($params, 't,template,block,name');
	$t = eregi_replace("\.tpl$", '', $t);

	if (!$t) {
	trigger_error('Template name not specified in <b><inp2:m_include .../></b> tag', E_USER_ERROR);
	}

	$res = $BlockParser->ParseTemplate( $t, 1, $params, isset($params['is_silent']) ? 1 : 0 );

	if ( !$BlockParser->DataExists && (isset($params['data_exists']) \|\| isset($params['block_no_data'])) ) {
	if ($block_no_data = getArrayValue($params, 'block_no_data')) {
	$res = $BlockParser->Parse(
	$this->Application->TemplatesCache->GetTemplateBody($block_no_data, getArrayValue($params, 'is_silent') ),
	$t
	);
	}
	else {
	$res = '';
	}
	}
	$this->Application->Parser =& $parser;
	$this->Application->Parser->DataExists = $this->Application->Parser->DataExists \|\| $BlockParser->DataExists;
	return $res;
	}

	function ModuleInclude($params)
	{
	$ret = '';
	$block_params = array_merge($params, Array('is_silent' => 2)); // don't make fatal errors in case if template is missing
	$current_template = $this->Application->GetVar('t');
	$skip_prefixes = isset($params['skip_prefixes']) ? explode(',', $params['skip_prefixes']) : Array();
	foreach ($this->Application->ModuleInfo as $module_name => $module_data) {
	$module_key = strtolower($module_name);

	if ($module_name == 'In-Portal') {
	$module_prefix = '';
	}
	else {
	$module_prefix = $this->Application->IsAdmin() ? $module_key.'/' : $module_data['TemplatePath'].'/';
	}

	$block_params['t'] = $module_prefix.$this->SelectParam($params, $module_key.'_template,'.$module_key.'_t,template,t');
	if ($block_params['t'] == $current_template \|\| in_array($module_data['Var'], $skip_prefixes)) continue;

	$no_data = $this->SelectParam($params, $module_key.'_block_no_data,block_no_data');
	if ($no_data) {
	$block_params['block_no_data'] = $module_prefix.'/'.$no_data;
	}
	$ret .= $this->MyInclude($block_params);
	}
	return $ret;
	}

	function ModuleEnabled($params)
	{
	return $this->Application->isModuleEnabled( $params['module'] );
	}

	/*function Kernel_Scripts($params)
	{
	return '<script type="text/javascript" src="'.PROTOCOL.SERVER_NAME.BASE_PATH.'/kernel3/js/grid.js"></script>';
	}*/


	/*function GetUserPermission($params)
	{
	// echo"GetUserPermission $params[name]";
	if ($this->Application->RecallVar('user_type') == 1)
	return 1;
	else {
	$perm_name = $params[name];
	$aPermissions = unserialize($this->Application->RecallVar('user_permissions'));
	if ($aPermissions)
	return $aPermissions[$perm_name];
	}
	}*/


	/**
	* Set's parser block param value
	*
	* @param Array $params
	* @access public
	*/
	function AddParam($params)
	{
	$parser =& $this->Application->Parser; // recallObject('TemplateParser');
	foreach ($params as $param => $value) {
	$this->Application->SetVar($param, $value);
	$parser->SetParam($param, $value);
	$parser->AddParam('/\$'.$param.'/', $value);
	}
	}

	/*function ParseToVar($params)
	{
	$var = $params['var'];
	$tagdata = $params['tag'];
	$parser =& $this->Application->Parser; //recallObject('TemplateParser');
	$res = $this->Application->ProcessTag($tagdata);

	$parser->SetParam($var, $res);
	$parser->AddParam('/\$'.$var.'/', $res);
	return '';
	}*/

	/*function TagNotEmpty($params)
	{
	$tagdata = $params['tag'];
	$res = $this->Application->ProcessTag($tagdata);
	return $res != '';
	}*/

	/*function TagEmpty($params)
	{
	return !$this->TagNotEmpty($params);
	}*/

	/**
	* Parses block and returns result
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function ParseBlock($params)
	{
	$parser =& $this->Application->Parser; // recallObject('TemplateParser');
	return $parser->ParseBlock($params);
	}

	function RenderElement($params)
	{
	return $this->ParseBlock($params);
	}

	function RenderElements($params)
	{
	if (!isset($params['elements']) \|\| !$params['elements']) return;
	$elements = explode(',',$params['elements']);
	if (isset($params['skip']) && $params['skip']) {
	$tmp_skip = explode(',',$params['skip']);
	foreach ($tmp_skip as $elem) {
	$skip[] = trim($elem);
	}
	}
	else {
	$skip = array();
	}
	unset($params['elements']);
	$o = '';
	foreach ($elements as $an_element)
	{
	$cur = trim($an_element);
	if (in_array($cur,$skip)) continue;
	$pass_params = $params;
	$pass_params['name'] = $cur;
	$o .= $this->ParseBlock($pass_params);
	}
	return $o;

	}

	/**
	* Checks if debug mode is on
	*
	* @return bool
	* @access public
	*/
	function IsDebugMode()
	{
	return $this->Application->isDebugMode();
	}

	function MassParse($params)
	{
	$qty = $params['qty'];
	$block = $params['block'];
	$mode = $params['mode'];

	$o = '';
	if ($mode == 'func') {
	$func = create_function('$params', '
	$o = \'<tr>\';
	$o.= \'<td>a\'.$params[\'param1\'].\'</td>\';
	$o.= \'<td>a\'.$params[\'param2\'].\'</td>\';
	$o.= \'<td>a\'.$params[\'param3\'].\'</td>\';
	$o.= \'<td>a\'.$params[\'param4\'].\'</td>\';
	$o.= \'</tr>\';
	return $o;
	');
	for ($i=1; $i<$qty; $i++) {
	$block_params['param1'] = rand(1, 10000);
	$block_params['param2'] = rand(1, 10000);
	$block_params['param3'] = rand(1, 10000);
	$block_params['param4'] = rand(1, 10000);
	$o .= $func($block_params);
	}
	return $o;
	}

	$block_params['name'] = $block;

	for ($i=0; $i<$qty; $i++) {
	$block_params['param1'] = rand(1, 10000);
	$block_params['param2'] = rand(1, 10000);
	$block_params['param3'] = rand(1, 10000);
	$block_params['param4'] = rand(1, 10000);
	$block_params['passed'] = $params['passed'];
	$block_params['prefix'] = 'm';

	$o.= $this->Application->ParseBlock($block_params, 1);
	}
	return $o;
	}

	function LoggedIn($params)
	{
	return $this->Application->LoggedIn();
	}

	/**
	* Allows to check if permission exists directly in template and perform additional actions if required
	*
	* @param Array $params
	* @return bool
	*/
	function CheckPermission($params)
	{
	$perm_helper =& $this->Application->recallObject('PermissionsHelper');
	return $perm_helper->TagPermissionCheck($params, 'm_CheckPermission');
	}

	/**
	* Checks if user is logged in and if not redirects it to template passed
	*
	* @param Array $params
	*/
	function RequireLogin($params)
	{
	$t = $this->Application->GetVar('t');
	if ($next_t = getArrayValue($params, 'next_template')) {
	$t = $next_t;
	}

	// check by permissions: begin
	if ((isset($params['perm_event']) && $params['perm_event']) \|\|
	(isset($params['perm_prefix']) && $params['perm_prefix']) \|\|
	(isset($params['permissions']) && $params['permissions'])) {

	$perm_helper =& $this->Application->recallObject('PermissionsHelper');
	$perm_status = $perm_helper->TagPermissionCheck($params, 'm_RequireLogin');
	if (!$perm_status) {
	list($redirect_template, $redirect_params) = $perm_helper->getPermissionTemplate($params);
	$this->Application->Redirect($redirect_template, $redirect_params);
	}
	else {
	return ;
	}
	}
	// check by permissions: end

	// check by configuration value: begin
	$condition = getArrayValue($params, 'condition');
	if (!$condition) {
	$condition = true;
	}
	else {
	if (substr($condition, 0, 1) == '!') {
	$condition = !$this->Application->ConfigValue(substr($condition, 1));
	}
	else {
	$condition = $this->Application->ConfigValue($condition);
	}
	}
	// check by configuration value: end

	// check by belonging to group: begin
	$group = $this->SelectParam($params, 'group');
	$group_access = true;
	if ($group) {
	$conn =& $this->Application->GetADODBConnection();
	$group_id = $conn->GetOne('SELECT GroupId FROM '.TABLE_PREFIX.'PortalGroup WHERE Name = '.$conn->qstr($group));
	if ($group_id) {
	$groups = explode(',', $this->Application->RecallVar('UserGroups'));
	$group_access = in_array($group_id, $groups);
	}
	}
	// check by belonging to group: end

	if ((!$this->Application->LoggedIn() \|\| !$group_access) && $condition) {
	if ( $this->Application->LoggedIn() && !$group_access) {
	$this->Application->Redirect( $params['no_group_perm_template'], Array('next_template'=>$t) );
	}

	$redirect_params = Array('next_template' => $t);
	$session_expired = $this->Application->GetVar('expired');
	if ($session_expired) {
	$redirect_params['expired'] = $session_expired;
	}
	$this->Application->Redirect($params['login_template'], $redirect_params);
	}
	}

	function IsMember($params)
	{
	$group = getArrayValue($params, 'group');
	$conn =& $this->Application->DB;
	$group_id = $conn->GetOne('SELECT GroupId FROM '.TABLE_PREFIX.'PortalGroup WHERE Name = '.$conn->qstr($group));
	if ($group_id) {
	$groups = explode(',', $this->Application->RecallVar('UserGroups'));
	$group_access = in_array($group_id, $groups);
	}
	return $group_access;
	}

	/**
	* Checks if SSL is on and redirects to SSL URL if needed
	* If SSL_URL is not defined in config - the tag does not do anything
	* If for_logged_in_only="1" exits if user is not logged in.
	* If called without params forces https right away. If called with by_config="1" checks the
	* Require SSL setting from General Config and if it is ON forces https
	*
	* @param unknown_type $params
	*/
	function CheckSSL($params)
	{
	$ssl = $this->Application->ConfigValue('SSL_URL');
	if (!$ssl) return; //SSL URL is not set - no way to require SSL

	$require = false;

	if (isset($params['mode']) && $params['mode'] == 'required') {
	$require = true;
	if (isset($params['for_logged_in_only']) && $params['for_logged_in_only'] && !$this->Application->LoggedIn()) {
	$require = false;
	}

	if (isset($params['condition'])) {
	if (!$this->Application->ConfigValue($params['condition'])) {
	$require = false;
	}
	}
	}

	$http_query =& $this->Application->recallObject('HTTPQuery');
	$pass = $http_query->getRedirectParams();

	if ($require) {
	if (PROTOCOL == 'https://') {
	$this->Application->SetVar('__KEEP_SSL__', 1);
	return;
	}
	$this->Application->Redirect('', array_merge_recursive2($pass, Array('__SSL__' => 1)));
	}
	else {
	if (PROTOCOL == 'https://' && $this->Application->ConfigValue('Force_HTTP_When_SSL_Not_Required')) {
	if ($this->Application->GetVar('__KEEP_SSL__')) return;
	$pass = array('pass'=>'m', 'm_cat_id'=>0);
	$this->Application->Redirect('', array_merge_recursive2($pass, Array('__SSL__' => 0)));
	}
	}
	}

	function ConstOn($params)
	{
	$name = $this->SelectParam($params,'name,const');
	return constOn($name);
	}

	function SetDefaultCategory($params)
	{
	$module_name = $params['module'];
	$module =& $this->Application->recallObject('mod.'.$module_name);
	$this->Application->SetVar('m_cat_id', $module->GetDBField('RootCat') );
	}

	function XMLTemplate($params)
	{
	- define('DBG_SKIP_REPORTING', 1);
	+ safeDefine('DBG_SKIP_REPORTING', 1);
	$lang =& $this->Application->recallObject('lang.current');
	header('Content-type: text/xml; charset='.$lang->GetDBField('Charset'));
	}

	function Header($params)
	{
	header($params['data']);
	}

	function NoDebug($params)
	{
	define('DBG_SKIP_REPORTING', 1);
	}

	function RootCategoryName($params)
	{
	$root_phrase = $this->Application->ConfigValue('Root_Name');
	return $this->Application->Phrase($root_phrase);
	}

	function AttachFile($params)
	{
	$email_object =& $this->Application->recallObject('kEmailMessage');
	$path = FULL_PATH.'/'.$params['path'];
	if (file_exists($path)) {
	$email_object->attachFile($path);
	}
	}
	}

	Property changes on: branches/unlabeled/unlabeled-1.62.2/core/kernel/processors/main_processor.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.62.2.3
	\ No newline at end of property
	+1.62.2.4
	\ No newline at end of property
	Index: branches/unlabeled/unlabeled-1.58.2/kernel/include/emailmessage.php
	===================================================================
	--- branches/unlabeled/unlabeled-1.58.2/kernel/include/emailmessage.php (revision 6409)
	+++ branches/unlabeled/unlabeled-1.58.2/kernel/include/emailmessage.php (revision 6410)
	@@ -1,1006 +1,1008 @@
	<?php
	class clsEmailMessage extends clsParsedItem
	{
	var $Event = "";
	var $Item;
	var $headers = array();
	var $subject = "";
	var $body = "";
	var $TemplateParsed = FALSE;
	var $recipient = NULL;
	var $fromuser = NULL;

	function clsEmailMessage($MessageId=NULL,$Item=NULL)
	{
	$this->clsParsedItem();
	$this->tablename = GetTablePrefix()."EmailMessage";
	$this->Item = $Item;
	$this->BasePermission = "EMAIL";
	$this->id_field = "EmailMessageId";
	$this->TagPrefix = "email";
	$this->NoResourceId=1;
	if($MessageId)
	$this->LoadFromDatabase($MessageId);
	}

	function LoadEvent($event,$language=NULL)
	{
	global $objConfig, $objLanguages;

	if(!strlen($language))
	$language = $objLanguages->GetPrimary();
	$sql = "SELECT * FROM ".$this->tablename." WHERE EventId = $event AND LanguageId=$language";
	$rs = $this->adodbConnection->Execute($sql);
	if($rs && !$rs->EOF)
	{
	$data = $rs->fields;
	$this->SetFromArray($data);
	$this->Clean();
	return TRUE;
	}
	else
	return FALSE;
	}
	function LoadFromDatabase($MessageId)
	{
	global $Errors;

	$sql = sprintf("SELECT * FROM ".$this->tablename." WHERE ".$this->IdField()." = '%s'",$MessageId);
	$result = $this->adodbConnection->Execute($sql);
	if ($result === FALSE)
	{
	$Errors->AddError("error.DatabaseError",NULL,$this->adodbConnection->ErrorMsg(),"",get_class($this),"LoadFromDatabase");
	return FALSE;
	}
	$data = $result->fields;
	$this->SetFromArray($data);
	return TRUE;
	}

	function EditTemplate()
	{
	}

	/* read the template, split into peices */
	function ReadTemplate()
	{
	if (!$this->TemplateParsed) {
	$this->headers = Array();

	// add footer: begin
	$sql = 'SELECT em.Template
	FROM '.$this->tablename.' em
	LEFT JOIN '.TABLE_PREFIX.'Events e ON e.EventId = em.EventId
	WHERE em.LanguageId = '.$this->Get('LanguageId').' AND e.Event = "COMMON.FOOTER"';
	$footer = explode("\n\n", $this->Conn->GetOne($sql));

	$email_object = &$this->Application->recallObject('kEmailMessage');
	$email_object->Clear();

	$footer = $this->Get('MessageType') == 'text' ? $email_object->convertHTMLtoPlain($footer[1]) : '<br/>'.$footer[1];

	$template = $this->Get('Template')."\r\n".$footer;
	// add footer: end

	$template = str_replace("\r", '', $template);
	$lines = explode("\n", $template);
	$header_end = false;
	$i = 0;
	while(!$header_end && $i<count($lines))
	{
	$h = $lines[$i];
	if (strlen(trim($h))==0 \|\| ($h==".")) {
	$header_end = true;
	}
	else {
	$parts = explode(":",$h,2);

	if (strtolower($parts[0])=="subject") {
	$this->subject = $h;
	}
	else {
	$this->headers[] = $h;
	}
	}
	$i++;
	}
	while ($i<count($lines)) {
	$this->body .= trim($lines[$i++])."\r\n";
	}

	// $this->body .= "\r".$footer;
	$this->TemplateParsed = true;


	}
	}

	function ParseSection($text, $parser=null)
	{
	global $objUsers, $objTemplate;

	$res = $this->ParseTemplateText($text);

	/* parse email class tags */
	if(!is_object($this->fromuser))
	{
	$this->fromuser = $objUsers->GetItem($this->Get("FromUserId"));
	$this->fromuser->TagPrefix = "fromuser";
	}

	/* parse from user object */
	if(is_object($this->fromuser))
	{
	$res = $this->fromuser->ParseTemplateText($res);
	}

	/* parse recipient user object */
	if(is_object($this->recipient))
	{
	$res = $this->recipient->ParseTemplateText($res);
	}

	//print_pre($this->Item);
	if(is_object($this->Item))
	{
	$res = $this->Item->ParseTemplateText($res);
	}
	else
	{

	if(!is_object($objTemplate))
	$objTemplate = new clsTemplateList(" ");
	$res = $objTemplate->ParseTemplateText($res);
	}

	return $res;
	}

	function SendToGroup($GroupId)
	{
	global $objUsers;

	$users = $objUsers->Query_GroupPortalUser("GroupId=$GroupId");
	if(is_array($users))
	{
	foreach($users as $u)
	{
	$this->SendToUser($u->Get("PortalUserId"));
	}
	}
	}

	function SendToAddress($EmailAddress,$name="")
	{
	global $objUsers, $objEmailQueue,$objConfig;

	$conn = &GetADODBConnection();
	//$this->recipient = $objUsers->GetUser($UserId);
	//$this->recipient->TagPrefix="touser";
	if(strlen($EmailAddress))
	{
	$to_addr = $EmailAddress;
	$this->ReadTemplate();

	$subject = $this->ParseSection($this->subject);
	$body = $this->ParseSection($this->body);

	if(is_object($this->fromuser))
	{
	$FromAddr = $this->fromuser->Get("Email");
	$FromName = trim($this->fromuser->Get("FirstName")." ".$this->fromuser->Get("LastName"));
	}
	if(!strlen($FromAddr))
	{
	$FromName = strip_tags( $objConfig->Get('Site_Name') );
	$FromAddr = $objConfig->Get("Smtp_AdminMailFrom");
	}

	$charset = "ascii-us";
	if($this->Get("MessageType")=="html")
	{
	$objEmailQueue->SendMail($FromAddr,$FromName,$to_addr,$To,$subject,"",$body,$charset, $this->Get("Event"),NULL,NULL,NULL,$this->headers);
	}
	else
	{
	// $body = nl2br($body);
	// $body = str_replace("<br />","\n",$body);
	$objEmailQueue->SendMail($FromAddr,$FromName,$to_addr,$To,$subject,$body,"",$charset, $this->Get("Event"),NULL,NULL,NULL,$this->headers);
	}

	/*$time = adodb_mktime();

	$sql = "INSERT INTO ".GetTablePrefix()."EmailLog VALUES ('', '$FromName', '$To', '$subject', $time, '')";
	$conn->Execute($sql); */

	return TRUE;
	}
	return FALSE;
	}


	function SendToUser($UserId)
	{
	global $objUsers, $objEmailQueue, $objConfig;

	$conn = &GetADODBConnection();
	//echo "Handling Event ".$this->Get("Event")." for user $UserId <br>\n";
	$this->recipient = new clsPortalUser($UserId); // $objUsers->GetItem($UserId);
	//echo "<PRE>";print_r($this->recipient); echo "</PRE>";
	$this->recipient->TagPrefix="touser";
	if($this->recipient->Get("PortalUserId")==$UserId)
	{
	$to_addr = $this->recipient->Get("Email");
	$To = trim($this->recipient->Get("FirstName")." ".$this->recipient->Get("LastName"));

	$this->ReadTemplate();

	$subject = $this->ParseSection($this->subject, $this->recipient);
	$body = $this->ParseSection($this->body);

	if(!is_object($this->fromuser))
	{
	$this->fromuser = $objUsers->GetItem($this->Get("FromUserId"));
	}
	if(is_object($this->fromuser))
	{
	$FromAddr = $this->fromuser->Get("Email");
	$FromName = trim($this->fromuser->Get("FirstName")." ".$this->fromuser->Get("LastName"));

	$charset = "ascii-us";
	}

	if(!strlen($FromAddr))
	{
	$FromName = strip_tags( $objConfig->Get('Site_Name') );
	$FromAddr = $objConfig->Get("Smtp_AdminMailFrom");
	}
	// echo $this->Event;

	if($this->Get("MessageType")=="html")
	{
	$objEmailQueue->SendMail($FromAddr,$FromName,$to_addr,$To,$subject,"",$body,$charset, $this->Get("Event"),NULL,NULL,NULL,$this->headers);
	}
	else
	{
	// $body = str_replace("\r", "", $body);
	$objEmailQueue->SendMail($FromAddr,$FromName,$to_addr,$To,$subject,$body,"",$charset, $this->Get("Event"),NULL,NULL,NULL,$this->headers);
	}

	/*$time = adodb_mktime();

	$sql = "INSERT INTO ".GetTablePrefix()."EmailLog VALUES ('', '$FromName', '$To ($to_addr)', '$subject', $time, '')";
	$conn->Execute($sql); */

	return TRUE;
	}
	return FALSE;
	}

	function SendAdmin()
	{
	global $objUsers, $objConfig, $objEmailQueue;

	$conn = &GetADODBConnection();

	$this->recipient = $objUsers->GetUser($this->Get("FromUserId"));
	$this->recipient->TagPrefix="touser";

	if($this->recipient->Get("PortalUserId")==$this->Get("FromUserId") \|\| strlen($this->recipient->Get("PortalUserId")) == 0)
	{
	$to_addr = $this->recipient->Get("Email");
	$To = trim($this->recipient->Get("FirstName")." ".$this->recipient->Get("LastName"));
	$this->ReadTemplate();

	if (strlen($to_addr) == 0) {
	$to_addr = $objConfig->Get("Smtp_AdminMailFrom");
	}

	$subject = $this->ParseSection($this->subject);
	$body = $this->ParseSection($this->body);
	$FromName = strip_tags( $objConfig->Get('Site_Name') );
	$FromAddr = $objConfig->Get("Smtp_AdminMailFrom");
	if(strlen($FromAddr))
	{
	$charset = "ascii-us";
	if($this->Get("MessageType")=="html")
	{
	$objEmailQueue->SendMail($FromAddr,$FromName,$to_addr,$To,$subject,"",$body,$charset,$this->Get("Event"),NULL,NULL,NULL,$this->headers);
	}
	else
	{
	// $body = str_replace("\r", "", $body);
	$objEmailQueue->SendMail($FromAddr,$FromName,$to_addr,$To,$subject,$body,"",$charset, $this->Get("Event"),NULL,NULL,NULL,$this->headers);
	}

	/* $time = adodb_mktime();

	$sql = "INSERT INTO ".GetTablePrefix()."EmailLog VALUES ('', '$FromName', '$To ($to_addr)', '$subject', $time, '')";
	$conn->Execute($sql);
	*/
	return TRUE;
	}
	}
	return FALSE;
	}

	function ParseTemplateText($text)
	{
	$html = $text;
	$search = "<inp:";
	//$search = "<inp:".$this->TagPrefix;
	//$next_tag = strpos($html,"<inp:");
	$next_tag = strpos($html,$search);

	while($next_tag)
	{
	$closer = strpos(strtolower($html),">",$next_tag);
	$end_tag = strpos($html,"/>",$next_tag);
	if($end_tag < $closer \|\| $closer == 0)
	{
	$tagtext = substr($html,$next_tag,($end_tag - $next_tag)+2);
	$pre = substr($html,0,$next_tag);
	$post = substr($html,$end_tag+2);
	$inner = $this->ParseElement($tagtext);
	$html = $pre.$inner.$post;
	}
	else
	{

	$OldTagStyle = "</inp>";

	## Try to find end of TagName
	$TagNameEnd = strpos($html, " ", $next_tag);

	## Support Old version
	// $closer = strpos(strtolower($html),"</inp>",$next_tag);
	if ($TagNameEnd)
	{
	$Tag = strtolower(substr($html, $next_tag, $TagNameEnd-$next_tag));
	$TagName = explode(":", $Tag);
	if (strlen($TagName[1]))
	$CloserTag = "</inp:".$TagName[1].">";
	}
	else
	{
	$CloserTag = $OldTagStyle;
	}

	$closer = strpos(strtolower($html), $CloserTag, $next_tag);

	## Try to find old tag closer
	if (!$closer && ($CloserTag != $OldTagStyle))
	{
	$CloserTag = $OldTagStyle;
	$closer = strpos(strtolower($html), $CloserTag, $next_tag);
	}

	$end_tag = strpos($html,">",$next_tag);
	$tagtext = substr($html,$next_tag,($end_tag - $next_tag)+1);
	$pre = substr($html,0,$next_tag);
	$inner = substr($html,$end_tag+1,$closer-($end_tag+1));
	$post = substr($html,$end_tag+1+strlen($inner) + strlen($CloserTag));
	//echo "PRE:". htmlentities($pre,ENT_NOQUOTES);
	//echo "INNER:". htmlentities($inner,ENT_NOQUOTES);
	//echo "POST:". htmlentities($post,ENT_NOQUOTES);

	$parsed = $this->ParseElement($tagtext);
	if(strlen($parsed))
	{
	$html = $pre.$this->ParseTemplateText($inner).$post;
	}
	else
	$html = $pre.$post;
	}
	$next_tag = strpos($html,$search);
	}
	return $html;
	}

	function ParseElement($raw, $inner_html ="")
	{
	$tag = new clsHtmlTag($raw);
	$tag->inner_html = $inner_html;

	if($tag->parsed)
	{
	if($tag->name=="include" \|\| $tag->name=="perm_include" \|\| $tag->name=="lang_include")
	{
	$output = $this->Parser->IncludeTemplate($tag);
	}
	else
	{
	if (is_object($this->Item)) {
	$this->Item->TagPrefix = $tag->name;
	$output = $this->Item->ParseObject($tag);
	}
	else {
	$output = $this->ParseObject($tag);
	}

	if(substr($output,0,9)=="Undefined")
	{
	$output = $tag->Execute();
	// if(substr($output,0,8)="{Unknown")
	// $output = $raw;
	} return $output;
	}
	}
	else
	return "";
	}
	}

	class clsEmailMessageList extends clsItemCollection
	{
	function clsEmailMessageList()
	{
	$this->clsItemCollection();
	$this->classname = "clsEmailMessage";
	$this->SourceTable = GetTablePrefix()."EmailMessage";
	$this->PerPageVar = "Perpage_EmailEvents";
	$this->AdminSearchFields = array("Template","Description", "Module","Event");
	}

	function LoadLanguage($LangId=NULL)
	{
	global $objLanguages;

	if(!$LangId)
	$LangId = $objLanguages->GetPrimary();

	$sql = "SELECT * FROM ".$this->SourceTable." WHERE LanguageId=$LangId";
	$this->Clear();
	return $this->Query_Item($sql);
	}

	function &AddEmailEvent($Template, $Type, $LangId, $EventId)
	{
	$e = new clsEmailMessage();
	$e->tablename = $this->SourceTable;
	$e->Set(array("Template","MessageType","LanguageId","EventId"),
	array($Template,$Type,$LangId,$EventId));
	$e->Dirty();
	$e->Create();

	return $e;
	}

	function DeleteLanguage($LangId)
	{
	$sql = "DELETE FROM ".$this->SourceTable." WHERE LanguageId=$LangId OR LanguageId = 0";
	if( $GLOBALS['debuglevel'] ) echo $sql."<br>\n";

	$this->adodbConnection->Execute($sql);
	}

	function &GetMessage($EventId,$LangId,$LoadFromDB=TRUE)
	{
	$found=FALSE;

	if(is_array($this->Items))
	{
	for($x=0;$x<count($this->Items);$x++)
	{
	$i =& $this->GetItemRefByIndex($x);
	if(is_object($i))
	{
	if($i->Get("EventId")==$EventId && $i->Get("LanguageId")==$LangId)
	{
	$found=TRUE;
	break;
	}
	}
	}
	}
	if(!$found)
	{
	if($LoadFromDB)
	{
	$n = NULL;
	$n = new $this->classname();
	$n->tablename = $this->SourceTable;
	if($n->LoadEvent($EventId,$LangId))
	{
	array_push($this->Items, $n);
	$i =& $this->Items[count($this->Items)-1];
	}
	else
	$i = FALSE;
	}
	else
	$i = FALSE;
	}
	return $i;
	}

	function CreateEmptyEditTable($IdList, $use_parent = false)
	{
	global $objSession;

	if (!$use_parent) {
	$edit_table = $objSession->GetEditTable($this->SourceTable);
	@$this->adodbConnection->Execute("DROP TABLE IF EXISTS $edit_table");
	$query = "SELECT * FROM ".$this->SourceTable." WHERE 0";
	$insert = "CREATE TABLE ".$edit_table." ".$query;
	if($objSession->HasSystemPermission("DEBUG.LIST"))
	echo htmlentities($insert,ENT_NOQUOTES)."<br>\n";
	$this->adodbConnection->Execute($insert);
	$this->LoadLanguage();
	$idvalue = -1;
	for($i=0;$i<$this->NumItems();$i++)
	{
	$e =& $this->Items[$i];
	$e->SourceTable = $edit_table;
	if(is_array($IdList))
	{
	foreach($IdList as $id)
	{
	$e->UnsetIdField();
	$e->Set("EmailMessageId",$idvalue--);
	$e->Set("LanguageId",$id);
	// $e->Set("Description",admin_language("la_desc_emailevent_".$e->Get("Event"),$id));
	$e->Create();
	}
	}
	else
	{
	$e->UnsetIdField();
	$e->Set("EmailMessageId",$idvalue--);
	$e->Set("LanguageId",$IdList);
	// $e->Set("Description",admin_language("la_desc_emailevent_".$e->Get("Event"),$LangId));
	$e->Create();
	}
	}
	$this->Clear();
	}
	else {
	parent::CreateEmptyEditTable($IdList);
	}
	}

	function CopyFromEditTable()
	{
	global $objSession;
	$GLOBALS['_CopyFromEditTable']=1;

	$idfield = "EmailMessageId";
	$edit_table = $objSession->GetEditTable($this->SourceTable);
	$sql = "SELECT * FROM $edit_table WHERE LanguageId <> 0";
	$rs = $this->adodbConnection->Execute($sql);
	while($rs && !$rs->EOF)
	{
	$data = $rs->fields;
	$c = new $this->classname;
	$c->SetFromArray($data);
	//$c->idfield = $idfield;
	if($c->Get($idfield)<1)
	{
	$old_id = $c->Get($idfield);
	$c->Dirty();
	$c->UnsetIdField();
	$c->Create();
	}
	else
	{
	$c->Dirty();
	$c->Update();
	}
	$rs->MoveNext();
	}
	@$this->adodbConnection->Execute("DROP TABLE IF EXISTS $edit_table");
	unset($GLOBALS['_CopyFromEditTable']);
	}

	function PurgeEditTable()
	{
	global $objSession;

	$edit_table = $objSession->GetEditTable($this->SourceTable);
	@$this->adodbConnection->Execute("DROP TABLE IF EXISTS $edit_table");
	}

	function &GetEmailEventObject($EventName,$Type=0,$LangId=NULL)
	{
	global $objLanguages;

	if(!$LangId)
	$LangId = $objLanguages->GetPrimary();
	$EmailTable = $this->SourceTable;
	$EventTable = GetTablePrefix()."Events";
	$sql = "SELECT * FROM $EventTable INNER JOIN $EmailTable ON ($EventTable.EventId = $EmailTable.EventId) ";
	$sql .="WHERE Event='$EventName' AND LanguageId=$LangId AND Type=$Type";
	$result = $this->adodbConnection->Execute($sql);

	if ($result === FALSE)
	{
	//$Errors->AddError("error.DatabaseError",NULL,$this->adodbConnection->ErrorMsg(),"","clsEvent","GetEmailEventObject");
	return FALSE;
	}
	$data = $result->fields;
	$e = new clsEmailMessage();
	$e->SetFromArray($data);
	$e->Clean();
	return $e;
	}

	function ReadImportTable($TableName,$Overwrite=FALSE, $MaxInserts=100,$Offset=0)
	{
	$eml = new clsEmailMessageList();
	$this->Clear();
	$Inserts = 0;
	$sql = "SELECT * FROM $TableName LIMIT $Offset,$MaxInserts";
	$this->Query_Item($sql);
	if($this->NumItems()>0)
	{
	foreach($this->Items as $i)
	{
	$e = $eml->GetMessage($i->Get("EventId"),$i->Get("LanguageId"));
	if(is_object($e))
	{
	if($Overwrite)
	{
	$e->Set("MessageType",$i->Get("MessageType"));
	$e->Set("Template",$i->Get("Template"));
	$e->Update();
	}
	}
	else
	{
	$i->Create();
	}
	$Inserts++;
	}
	}
	$Offset = $Offset + $Inserts;
	return $Offset;
	}
	}

	function EventEnabled($e)
	{
	global $objConfig;

	$var = "Email_".$e."_Enabled";

	return ($objConfig->Get($var)=="1");
	}

	class clsEmailQueue
	{
	var $SourceTable;
	var $MessagesAtOnce;
	var $MessagesSent=0;
	var $LogLevel = 0;
	var $HLB = "\n"; // Headers Line Break
	var $BLB = "\n"; // Body Line Break

	function clsEmailQueue($SourceTable=NULL,$MessagesAtOnce=NULL)
	{
	global $objConfig;

	$this->HLB = chr(10);
	$this->BLB = chr(10);

	if($SourceTable)
	{
	$this->SourceTable=$SourceTable;
	}
	else
	$this->SourceTable = GetTablePrefix()."EmailQueue";
	if(!$MessagesAtOnce)
	$MessagesAtOnce = (int)$objConfig->Get("Email_MaxSend");
	if($MessagesAtOnce<1)
	$MessagesAtOnce=1;
	$this->MessagesAtOnce = $MessagesAtOnce;
	$this->LogLevel = (int)$objConfig->Get("Smtp_LogLevel");
	}

	function WriteToMailLog($text)
	{
	global $pathtoroot,$admin;
	//echo htmlentities($text)."<br>\n";
	if($this->LogLevel>0)
	{
	$Logfile = $pathtoroot.$admin."/email/log.txt";
	if(is_writable($Logfile))
	{
	$fp = fopen($Logfile,"a");
	if($fp)
	{
	fputs($fp,$text."\n");
	fclose($fp);
	}
	}
	}
	}

	function AllowSockets()
	{
	$minver = explode(".", "4.3.0");
	$curver = explode(".", phpversion());
	if (($curver[0] < $minver[0])
	\|\| (($curver[0] == $minver[0])
	&& ($curver[1] < $minver[1]))
	\|\| (($curver[0] == $minver[0]) && ($curver[1] == $minver[1])
	&& ($curver[2][0] < $minver[2][0])))
	return false;
	else
	return true;
	}

	function DeliverMail($To,$From,$Subject,$Msg,$headers, $ForceSend=0)
	{
	global $MessagesSent,$objConfig;

	if(($this->MessagesSent >$this->MessagesAtOnce) && !$ForceSend)
	{
	$this->EnqueueMail($To,$From,$Subject,$Msg,$headers);
	return TRUE;
	}
	else
	{
	$this->MessagesSent++;

	$time = adodb_mktime();
	$conn = &GetADODBConnection();

	/* $sql = "INSERT INTO ".GetTablePrefix()."EmailLog VALUES ('', '".htmlspecialchars($From)."', '".htmlspecialchars($To)."', '$Subject', $time, '')";
	$conn->Execute($sql);*/


	$headers = "Date: ".adodb_date("r")."\n".$headers;
	$headers = "Return-Path: ".$objConfig->Get("Smtp_AdminMailFrom")."\n".$headers;

	/* ensure headers are using \r\n instead of \n */
	$headers = str_replace("\n\n","\r\n\r\n",$headers);
	$headers = str_replace("\r\n","\n",$headers);
	$headers = str_replace("\n","\r\n",$headers);

	// if (strtoupper(substr(PHP_OS, 0, 3) == 'WIN')) {
	$Msg = str_replace("\n\n","\r\n\r\n",$Msg);
	$Msg = str_replace("\r\n","\n",$Msg);
	$Msg = str_replace("\n","\r\n",$Msg);
	// }

	//echo "<PRE>"; print_r(htmlentities($headers)); echo "</PRE>";
	//echo "<PRE>"; print_r(htmlentities($Msg)); echo "</PRE>";
	$ver = phpversion();
	if(substr($Subject,0,9)=="Subject: ")
	$Subject = substr($Subject,9);
	if(!strlen($objConfig->Get("Smtp_Server")) \|\| !$this->AllowSockets())
	{
	return mail($To,trim($Subject),$Msg, $headers);
	}

	$headers = "To: <".$To.">"."\r\n".$headers;
	$headers = "Subject: ".trim($Subject)."\r\n".$headers;

	if (strpos($To, ',') !== false) {
	$To = str_replace(' ', '', $this->To);
	$send_params['recipients'] = explode(',', $this->To);
	}
	else {
	$send_params['recipients'] = array($To); // The recipients (can be multiple)
	}
	$send_params['from'] = $From; // This is used as in the MAIL FROM: cmd
	$send_params['headers'] = explode("\r\n",$headers);
	// It should end up as the Return-Path: header
	$send_params['body'] = $Msg; // The body of the email

	$params['host'] = $objConfig->Get("Smtp_Server"); // The smtp server host/ip

	$params['port'] = 25; // The smtp server port
	$params['hello'] = 'INPORTAL'; // What to use when sending the helo command. Typically, your domain/hostname
	if($objConfig->Get("Smtp_Authenticate")) // Whether to use basic authentication or not
	{
	$params['auth'] = TRUE;
	$params['user'] = $objConfig->Get("Smtp_User");
	$params['pass'] = $objConfig->get("Smtp_Pass");
	}
	else
	$params['auth'] = FALSE;
	$this->LogLevel=0;
	$SmtpServer = new smtp($params);
	if($this->LogLevel>0)
	{
	$SmtpServer->debug=1;
	foreach($params as $key=>$value)
	{
	$this->WriteToMailLog($key."=".$value);
	}
	}
	else
	{
	//$SmtpServer->debug = 1;
	}
	$connected = $SmtpServer->connect();

	if($connected)
	{
	if($this->LogLevel>1)
	{
	$this->WriteToMailLog("Connected to ".$params['host']);
	}
	$res = $SmtpServer->send($send_params);
	}
	$SmtpServer->disconnect();

	if($this->LogLevel>1)
	{
	foreach($SmtpServer->buffer as $l)
	{
	$this->WriteToMailLog($l);
	}
	}

	if($this->LogLevel>0)
	{
	if(count($SmtpServer->errors)>0)
	{
	foreach($SmtpServer->errors as $e)
	{
	$this->WriteToMailLog($e);
	}
	}
	else
	$this->WriteToMailLog("Message to $From Delivered Successfully");
	}
	unset($SmtpServer);
	return $res;
	}
	}

	function EnqueueMail($To,$From,$Subject,$Msg,$headers)
	{
	global $objSession;

	$ado = &GetADODBConnection();
	$To = mysql_escape_string($To);
	$From = mysql_escape_string($From);
	$Msg = mysql_escape_string($Msg);
	$headers = mysql_escape_string($headers);
	$Subject = mysql_escape_string($Subject);
	$sql = "INSERT INTO ".$this->SourceTable." (toaddr,fromaddr,subject,message,headers) VALUES ('$To','$From','$Subject','$Msg','$headers')";
	$ado->Execute($sql);
	}

	function SendMailQeue()
	{
	global $objConfig, $objSession, $TotalMessagesSent;

	$ado = &GetADODBConnection();
	$MaxAllowed = $this->MessagesAtOnce;

	$del_sql = array();

	$NumToSend = $MaxAllowed - $this->MessagesSent;
	if($NumToSend < 0) $NumToSend=1; // Don't really know why, but this could happend, so issued this temp fix
	$sql = "SELECT * FROM ".$this->SourceTable." ORDER BY queued ASC LIMIT $NumToSend";
	$rs = $ado->Execute($sql);

	while($rs && !$rs->EOF)
	{
	$data = $rs->fields;
	$this->DeliverMail($data["toaddr"],$data["fromaddr"],$data["Subject"],$data["message"],$data["headers"],1);

	$del_sql[] = "DELETE FROM ".$this->SourceTable." WHERE queued='".$data["queued"]."'";
	$rs->MoveNext();
	}

	$numdel = count($del_sql);
	for($i=0;$i<$numdel;$i++)
	{
	$sql = $del_sql[$i];
	if(strlen($sql))
	$ado->Execute($sql);
	if($objSession->HasSystemPermission("DEBUG.ITEM"))
	echo htmlentities($sql,ENT_NOQUOTES)."<br>\n";
	}
	}

	function SendMail($From, $FromName, $ToAddr, $ToName, $Subject, $Text, $Html, $charset, $SendEvent,$FileName="",$FileLoc="",$QueueOnly=0,$extra_headers = array())
	{
	+ $charset = GetRegionalOption('Charset');
	+
	$HasFile = FALSE;
	$HasFile = (strlen($FileName)>0);
	$OB="----=_OuterBoundary_000".md5( uniqid (rand()));
	$boundary = "-----=".md5( uniqid (rand()));
	$f = "\"$FromName\" <".$From.">";
	$headers = "From: $f"."\n";
	$headers .= "MIME-Version: 1.0"."\n";

	$conn = &GetADODBConnection();
	$time = adodb_mktime();

	$sendTo = $ToName;

	if (strlen($sendTo) > 0) {
	$sendTo .= "($ToAddr)";
	}
	else {
	$sendTo = $ToAddr;
	}
	$sendTo=addslashes($sendTo);
	$sql = "INSERT INTO ".GetTablePrefix()."EmailLog VALUES ('', ".$conn->qstr($FromName).", ".$conn->qstr($sendTo).", ".$conn->qstr( str_replace("Subject:", "", $Subject) ).", $time, '$SendEvent')";
	$conn->Execute($sql);

	if(is_array($extra_headers))
	{
	foreach ($extra_headers as $h)
	{
	$headers .= $h."\n";
	}
	}

	$msg .="This is a multi-part message in MIME format."."\n"."\n";
	if($HasFile)
	{
	//Messages start with text/html alternatives in OB
	$headers.="Content-Type: multipart/mixed;"."\n"."\tboundary=\"".$OB."\""."\n"."\n";
	$msg.="--".$OB."\n";
	$msg.="Content-Type: multipart/alternative; boundary=\"$boundary\""."\n"."\n"."\n";
	}
	else {
	$headers .= "Content-Type: multipart/alternative; boundary=\"$boundary\""."\n";
	}

	$application =& kApplication::Instance();
	$db =& $application->GetADODBConnection();

	if (!$Text) {
	$Text = strip_tags($Html);
	}
	else {
	$Text = strip_tags($Text);
	}

	$msg .= "--" . $boundary . "\n";
	$msg .= "Content-Type: text/plain; charset=\"$charset\""."\n";
	$msg .= "Content-Transfer-Encoding: 8bit"."\n"."\n";
	$msg .= stripslashes($Text);
	$msg .= "\n"."\n";

	if(strlen($Html)>0)
	{
	$msg .= "--" . $boundary . "\n";
	- $msg .= "Content-Type: text/html; charset=\"iso-8859-1\""."\n";
	+ $msg .= "Content-Type: text/html; charset=\"".$charset."\""."\n";
	$msg .= "Content-Transfer-Encoding: 8bit"."\n"."\n";
	$msg .= stripslashes($Html);
	$msg .= "\n"."\n";
	}
	$msg .= "--" . $boundary . "--"."\n";
	if($HasFile)
	{
	if(!strlen($FileLoc)) {
	$FileLoc = $FileName;
	}
	$FileName = basename($FileName);
	$msg .= "\n"."--".$OB."\n";
	$msg.="Content-Type: application/octetstream;"."\n"."\tname=\"".$FileName."\""."\n";
	$msg.="Content-Transfer-Encoding: base64"."\n";
	$msg.="Content-Disposition: attachment;"."\n"."\tfilename=\"".$FileName."\""."\n"."\n";

	//file goes here
	$fd=fopen ($FileLoc, "r");
	if($fd)
	{
	$FileContent=fread($fd,filesize($FileLoc));
	fclose ($fd);
	}
	$FileContent=chunk_split(base64_encode($FileContent));
	$msg .= $FileContent."\n";
	$msg .= "--".$OB."--"."\n";
	}

	if($this->MessagesSent>$this->MessagesAtOnce \|\| $QueueOnly==1)
	{
	$this->EnqueueMail($ToAddr,$From,$Subject,$msg,$headers);
	}
	else
	{
	$this->DeliverMail($ToAddr,$From,$Subject,$msg,$headers);
	}
	}

	}
	?>

	Property changes on: branches/unlabeled/unlabeled-1.58.2/kernel/include/emailmessage.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.58
	\ No newline at end of property
	+1.58.2.1
	\ No newline at end of property

in-portalNo OneTemporaryActions

File Metadata

in-portalView Options

Event Timeline

in-portal
No OneTemporary
Actions

in-portal
View Options