classes/class.ilMail.php

Go to the documentation of this file.

<?php
/*
        +-----------------------------------------------------------------------------+
        | ILIAS open source                                                           |
        +-----------------------------------------------------------------------------+
        | Copyright (c) 1998-2001 ILIAS open source, University of Cologne            |
        |                                                                             |
        | This program is free software; you can redistribute it and/or               |
        | modify it under the terms of the GNU General Public License                 |
        | as published by the Free Software Foundation; either version 2              |
        | of the License, or (at your option) any later version.                      |
        |                                                                             |
        | This program is distributed in the hope that it will be useful,             |
        | but WITHOUT ANY WARRANTY; without even the implied warranty of              |
        | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the               |
        | GNU General Public License for more details.                                |
        |                                                                             |
        | You should have received a copy of the GNU General Public License           |
        | along with this program; if not, write to the Free Software                 |
        | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA. |
        +-----------------------------------------------------------------------------+
*/


class ilMail
{
        var $ilias;

        var $lng;

        var $mfile;

        var $mail_options;

        var $user_id;

        var $table_mail;

        var $table_mail_saved;

        var $mail_counter;

        var $mail_data;


        var $mail_obj_ref_id;

        var $mail_send_type;

        var $save_in_sentbox;

        var $mail_rcp_to;
        var $mail_rcp_cc;
        var $mail_rcp_bc;
        var $mail_subject;
        var $mail_message;

        var $soap_enabled = true;


        function ilMail($a_user_id)
        {
                require_once "classes/class.ilFileDataMail.php";
                require_once "classes/class.ilMailOptions.php";

                global $ilias, $lng;

                $lng->loadLanguageModule("mail");

                // Initiate variables
                $this->ilias =& $ilias;
                $this->lng   =& $lng;
                $this->table_mail = 'mail';
                $this->table_mail_saved = 'mail_saved';
                $this->user_id = $a_user_id;
                $this->mfile =& new ilFileDataMail($this->user_id);
                $this->mail_options =& new ilMailOptions($a_user_id);

                // DEFAULT: sent mail aren't stored insentbox of user.
                $this->setSaveInSentbox(false);

                // GET REFERENCE ID OF MAIL OBJECT
                $this->readMailObjectReferenceId();

        }

        function enableSOAP($a_status)
        {
                $this->soap_enabled = $a_status;
        }
        function isSOAPEnabled()
        {
                if(!extension_loaded('curl'))
                {
                        return false;
                }
                return (bool) $this->soap_enabled;
        }


        function setSaveInSentbox($a_save_in_sentbox)
        {
                $this->save_in_sentbox = $a_save_in_sentbox;
        }

        function getSaveInSentbox()
        {
                return $this->save_in_sentbox;
        }

        function setMailSendType($a_types)
        {
                $this->mail_send_type = $a_types;
        }

        function setMailRcpTo($a_rcp_to)
        {
                $this->mail_rcp_to = $a_rcp_to;
        }

        function setMailRcpCc($a_rcp_cc)
        {
                $this->mail_rcp_cc = $a_rcp_cc;
        }

        function setMailRcpBc($a_rcp_bc)
        {
                $this->mail_rcp_bc = $a_rcp_bc;
        }

        function setMailSubject($a_subject)
        {
                $this->mail_subject = $a_subject;
        }

        function setMailMessage($a_message)
        {
                $this->mail_message = $a_message;
        }

        function readMailObjectReferenceId()
        {
                // mail settings id is set by a constant in ilias.ini. Keep the select for some time until everyone has updated his ilias.ini
                if (!MAIL_SETTINGS_ID)
                {
                        $query = "SELECT object_reference.ref_id FROM object_reference,tree,object_data ".
                                        "WHERE tree.parent = '".SYSTEM_FOLDER_ID."' ".
                                        "AND object_data.type = 'mail' ".
                                        "AND object_reference.ref_id = tree.child ".
                                        "AND object_reference.obj_id = object_data.obj_id";
                        $res = $this->ilias->db->query($query);

                        while ($row = $res->fetchRow(DB_FETCHMODE_ASSOC))
                        {
                                $this->mail_obj_ref_id = $row["ref_id"];
                        }
                }
                else
                {
                        $this->mail_obj_ref_id = MAIL_SETTINGS_ID;
                }
        }

        function getMailObjectReferenceId()
        {
                return $this->mail_obj_ref_id;
        }

        function getMailsOfFolder($a_folder_id)
        {
                $this->mail_counter = array();
                $this->mail_counter["read"] = 0;
                $this->mail_counter["unread"] = 0;

                $query = "SELECT * FROM $this->table_mail ".
                        "WHERE user_id = $this->user_id ".
                        "AND folder_id = '".$a_folder_id."' ORDER BY send_time DESC";
                
                $res = $this->ilias->db->query($query);

                while ($row = $res->fetchRow(DB_FETCHMODE_OBJECT))
                {
                        if($row->sender_id and !ilObjectFactory::ObjectIdExists($row->sender_id))
                        {
                                continue;
                        }
                        $tmp = $this->fetchMailData($row);

                        if ($tmp["m_status"] == 'read')
                        {
                                ++$this->mail_counter["read"];
                        }

                        if ($tmp["m_status"] == 'unread')
                        {
                                ++$this->mail_counter["unread"];
                        }

                        $output[] = $tmp;
                }

                $this->mail_counter["total"] = count($output);

                return $output ? $output : array();
        }

        function getMailCounterData()
        {
                return is_array($this->mail_counter) ? $this->mail_counter : array(
                        "total"  => 0,
                        "read"   => 0,
                        "unread" => 0);
        }

        function getMail($a_mail_id)
        {
                $query = "SELECT * FROM $this->table_mail ".
                        "WHERE user_id = $this->user_id ".
                        "AND mail_id = '".$a_mail_id."'";
                
                $this->mail_data = $this->fetchMailData($this->ilias->db->getRow($query,DB_FETCHMODE_OBJECT));
                
                return $this->mail_data; 
        }

        function markRead($a_mail_ids)
        {
                // CREATE IN STATEMENT
                $in = "(". implode(",",$a_mail_ids) . ")";
                
                $query = "UPDATE $this->table_mail ".
                        "SET m_status = 'read' ".
                        "WHERE user_id = '".$this->user_id."' ".
                        "AND mail_id IN $in";

                $res = $this->ilias->db->query($query);

                return true;
        }

        function markUnread($a_mail_ids)
        {
                // CREATE IN STATEMENT
                $in = "(". implode(",",$a_mail_ids) . ")";
                
                $query = "UPDATE $this->table_mail ".
                        "SET m_status = 'unread' ".
                        "WHERE user_id = '".$this->user_id."' ".
                        "AND mail_id IN $in";

                $res = $this->ilias->db->query($query);

                return true;
        }

        function moveMailsToFolder($a_mail_ids,$a_folder_id)
        {
                // CREATE IN STATEMENT
                $in = "(". implode(",",$a_mail_ids) . ")";

                $query = "UPDATE $this->table_mail ".
                        "SET folder_id = '".$a_folder_id."' ".
                        "WHERE user_id = '".$this->user_id."' ".
                        "AND mail_id IN $in";

                $res = $this->ilias->db->query($query);

                return true;
        }

        function deleteMails($a_mail_ids)
        {

                foreach ($a_mail_ids as $id)
                {
                        $query = "DELETE FROM $this->table_mail ".
                                "WHERE user_id = '".$this->user_id."' ".
                                "AND mail_id = '".$id."'";
                        $res = $this->ilias->db->query($query);
                        $this->mfile->deassignAttachmentFromDirectory($id);
                }

                return true;
        }

        function fetchMailData($a_row)
        {
                return array(
                        "mail_id"         => $a_row->mail_id,
                        "user_id"         => $a_row->user_id,
                        "folder_id"       => $a_row->folder_id,
                        "sender_id"       => $a_row->sender_id,
                        "attachments"     => unserialize(stripslashes($a_row->attachments)), 
                        "send_time"       => $a_row->send_time,
                        "rcp_to"          => stripslashes($a_row->rcp_to),
                        "rcp_cc"          => stripslashes($a_row->rcp_cc),
                        "rcp_bcc"         => stripslashes($a_row->rcp_bcc),
                        "m_status"        => $a_row->m_status,
                        "m_type"          => unserialize(stripslashes($a_row->m_type)),
                        "m_email"         => $a_row->m_email,
                        "m_subject"       => stripslashes($a_row->m_subject),
                        "m_message"       => stripslashes($a_row->m_message),
                        "import_name"     => stripslashes($a_row->import_name));
        }

        function updateDraft($a_folder_id,
                                                 $a_attachments,
                                                 $a_rcp_to,
                                                 $a_rcp_cc,
                                                 $a_rcp_bcc,
                                                 $a_m_type,
                                                 $a_m_email,
                                                 $a_m_subject,
                                                 $a_m_message,
                                                 $a_draft_id = 0)
        {
                $query = "UPDATE $this->table_mail ".
                        "SET folder_id = '".$a_folder_id."',".
                        "attachments = '".addslashes(serialize($a_attachments))."',".
                        "send_time = now(),".
                        "rcp_to = '".addslashes($a_rcp_to)."',".
                        "rcp_cc = '".addslashes($a_rcp_cc)."',".
                        "rcp_bcc = '".addslashes($a_rcp_bcc)."',".
                        "m_status = 'read',".
                        "m_type = '".addslashes(serialize($a_m_type))."',".
                        "m_email = '".$a_m_email."',".
                        "m_subject = '".addslashes($a_m_subject)."',".
                        "m_message = '".addslashes($a_m_message)."' ".
                        "WHERE mail_id = '".$a_draft_id."'";
                        

                $res = $this->ilias->db->query($query);

                return $a_draft_id;
        }

        function sendInternalMail($a_folder_id,
                                                          $a_sender_id,
                                                          $a_attachments,
                                                          $a_rcp_to,
                                                          $a_rcp_cc,
                                                          $a_rcp_bcc,
                                                          $a_status,
                                                          $a_m_type,
                                                          $a_m_email,
                                                          $a_m_subject,
                                                          $a_m_message,
                                                          $a_user_id = 0)
        {
                $a_user_id = $a_user_id ? $a_user_id : $this->user_id;

                $query = "INSERT INTO $this->table_mail ".
                        "SET user_id = '".$a_user_id."',".
                        "folder_id = '".$a_folder_id."',".
                        "sender_id = '".$a_sender_id."',".
                        "attachments = '".addslashes(serialize($a_attachments))."',".
                        "send_time = now(),".
                        "rcp_to = '".addslashes($a_rcp_to)."',".
                        "rcp_cc = '".addslashes($a_rcp_cc)."',".
                        "rcp_bcc = '".addslashes($a_rcp_bcc)."',".
                        "m_status = '".$a_status."',".
                        "m_type = '".addslashes(serialize($a_m_type))."',".
                        "m_email = '".$a_m_email."',".
                        "m_subject = '".addslashes($a_m_subject)."',".
                        "m_message = '".addslashes($a_m_message)."'";

                $res = $this->ilias->db->query($query);
                $query = "SELECT LAST_INSERT_ID() as id FROM $this->table_mail";
                $row = $this->ilias->db->getRow($query,DB_FETCHMODE_ASSOC);

                return $row["id"];
        }
        function distributeMail($a_rcp_to,$a_rcp_cc,$a_rcp_bcc,$a_subject,$a_message,$a_attachments,$sent_mail_id,$a_type,$a_action)
        {
                include_once "classes/class.ilMailbox.php";
                include_once "./classes/class.ilObjUser.php";

                // REPLACE ALL LOGIN NAMES WITH '@' BY ANOTHER CHARACTER
                $a_rcp_to = $this->__substituteRecipients($a_rcp_to,"resubstitute");
                $a_rcp_cc = $this->__substituteRecipients($a_rcp_cc,"resubstitute");
                $a_rcp_bc = $this->__substituteRecipients($a_rcp_bc,"resubstitute");


                $as_email = array();

                $mbox =& new ilMailbox();

                $rcp_ids = $this->getUserIds(trim($a_rcp_to).",".trim($a_rcp_cc).",".trim($a_rcp_bcc));

                foreach($rcp_ids as $id)
                {
                        $tmp_mail_options =& new ilMailOptions($id);

                        // CONTINUE IF USER WNATS HIS MAIL SEND TO EMAIL
                        if ($tmp_mail_options->getIncomingType() == $this->mail_options->EMAIL)
                        {
                                $as_email[] = $id;
                                continue;
                        }

                        if ($tmp_mail_options->getIncomingType() == $this->mail_options->BOTH)
                        {
                                $as_email[] = $id;
                        }

                        if ($a_action == 'system')
                        {
                                $inbox_id = 0;
                        }
                        else
                        {
                                $mbox->setUserId($id);
                                $inbox_id = $mbox->getInboxFolder();
                        }
                        $mail_id = $this->sendInternalMail($inbox_id,$this->user_id,
                                                                  $a_attachments,$a_rcp_to,
                                                                  $a_rcp_cc,'','unread',$a_type,
                                                                  0,$a_subject,$a_message,$id);
                        if ($a_attachments)
                        {
                                $this->mfile->assignAttachmentsToDirectory($mail_id,$sent_mail_id,$a_attachments);
                        }
                }

                // SEND EMAIL TO ALL USERS WHO DECIDED 'email' or 'both'
                $counter = 0;
                $to = array();
                $bcc = array();
                foreach ($as_email as $id)
                {
                        if(!$counter++)
                        {
                                $to[] = ilObjUser::_lookupEmail($id);
                        }
                        else
                        {
                                $bcc[] = ilObjUser::_lookupEmail($id);
                        }
                }
                if($to)
                {
                        $this->sendMimeMail(implode(',',$to),'',implode(',',$bcc),$a_subject,$a_message,$a_attachments);
                }
                
                return true;
        }
        

        function getUserIds($a_recipients)
        {
                global $rbacreview;

                $tmp_names = $this->explodeRecipients($a_recipients);
                $ids = array();
                for ($i = 0;$i < count($tmp_names); $i++)
                {
                        if (substr($tmp_names[$i],0,1) == '#')
                        {
                                if(ilUtil::groupNameExists(addslashes(substr($tmp_names[$i],1))))
                                {
                                        include_once("./classes/class.ilObjectFactory.php");
                                        include_once('./classes/class.ilObjGroup.php');
                                        
                                        foreach(ilObject::_getAllReferences(ilObjGroup::_lookupIdByTitle(addslashes(substr($tmp_names[$i],1)))) as $ref_id)
                                        {
                                                $grp_object = ilObjectFactory::getInstanceByRefId($ref_id);
                                                break;
                                        }
                                        // STORE MEMBER IDS IN $ids
                                        foreach ($grp_object->getGroupMemberIds() as $id)
                                        {
                                                $ids[] = $id;
                                        }
                                }
                                // is role: get role ids
                                elseif($role_id = $rbacreview->roleExists(addslashes(substr($tmp_names[$i],1))))
                                {
                                        foreach($rbacreview->assignedUsers($role_id) as $usr_id)
                                        {
                                                $ids[] = $usr_id;
                                        }
                                }
                                
                        }
                        else if (!empty($tmp_names[$i]))
                        {
                                if ($id = ilObjUser::getUserIdByLogin(addslashes($tmp_names[$i])))
                                {
                                        $ids[] = $id;
                                }
#                               else if ($id = ilObjUser::getUserIdByEmail(addslashes($tmp_names[$i])))
#                               {
#                                       $ids[] = $id;
#                               }
                        }
                }
                return array_unique($ids);
        }
        function checkMail($a_rcp_to,$a_rcp_cc,$a_rcp_bcc,$a_m_subject,$a_m_message,$a_type)
        {
                $error_message = '';

                if (empty($a_m_subject))
                {
                        $error_message .= $error_message ? "<br>" : '';
                        $error_message .= $this->lng->txt("mail_add_subject");
                }

                if (empty($a_rcp_to))
                {
                        $error_message .= $error_message ? "<br>" : '';
                        $error_message .= $this->lng->txt("mail_add_recipient");
                }

                return $error_message;
        }

        function getEmailsOfRecipients($a_rcp)
        {
                $addresses = array();

                $tmp_rcp = $this->explodeRecipients($a_rcp);

                foreach ($tmp_rcp as $rcp)
                {
                        // NO GROUP
                        if (substr($rcp,0,1) != '#')
                        {
                                if (strpos($rcp,'@'))
                                {
                                        $addresses[] = $rcp;
                                        continue;
                                }

                                if ($id = ilObjUser::getUserIdByLogin(addslashes($rcp)))
                                {
                                        $tmp_user = new ilObjUser($id);
                                        $addresses[] = $tmp_user->getEmail();
                                        continue;
                                }
                        }
                        else
                        {
                                // GROUP THINGS
                                include_once("./classes/class.ilObjectFactory.php");
                                include_once('./classes/class.ilObjGroup.php');

                                // Fix 
                                foreach(ilObjGroup::_getAllReferences(ilObjGroup::_lookupIdByTitle(addslashes(substr($tmp_names[$i],1)))) as $ref_id)
                                {
                                        $grp_object = ilObjectFactory::getInstanceByRefId($ref_id);
                                        break;
                                }
                                // GET EMAIL OF MEMBERS AND STORE THEM IN $addresses
                                foreach ($grp_object->getGroupMemberIds() as $id)
                                {
                                        $tmp_user = new ilObjUser($id);
                                        $addresses[] = $tmp_user->getEmail();
                                } 
                        }
                }

                return $addresses;
        }
                
        function checkRecipients($a_recipients,$a_type)
        {
                global $rbacsystem,$rbacreview;
                
                $wrong_rcps = '';

                $tmp_rcp = $this->explodeRecipients($a_recipients);

                foreach ($tmp_rcp as $rcp)
                {
                        if (empty($rcp))
                        {
                                continue;
                        }
                        // NO GROUP
                        if (substr($rcp,0,1) != '#')
                        {
                                // ALL RECIPIENTS MUST EITHER HAVE A VALID LOGIN OR A VALID EMAIL
                                if (!ilObjUser::getUserIdByLogin(addslashes($rcp)) and
                                        !ilUtil::is_email($rcp))
                                {
                                        $wrong_rcps .= "<BR/>".$rcp;
                                        continue;
                                }
                                
                                // CHECK IF USER CAN RECEIVE MAIL
                                if ($user_id = ilObjUser::getUserIdByLogin(addslashes($rcp)))
                                {
                                        if(!$rbacsystem->checkAccessOfUser($user_id, "mail_visible", $this->getMailObjectReferenceId()))
                                        {
                                                $wrong_rcps .= "<BR/>".$rcp." (".$this->lng->txt("user_cant_receive_mail").")";
                                                continue;
                                        }
                                }
                        }
                        elseif (ilUtil::groupNameExists(addslashes(substr($rcp,1))))
                        {
                                continue;
                        }
                        elseif(!$rbacreview->roleExists(addslashes(substr($rcp,1))))
                        {
                                $wrong_rcps .= "<BR/>".$rcp." (".$this->lng->txt("mail_no_valid_group_role").")";
                                continue;
                        }

                }

                return $wrong_rcps;
        }

        function savePostData($a_user_id,
                                                  $a_attachments,
                                                  $a_rcp_to,
                                                  $a_rcp_cc,
                                                  $a_rcp_bcc,
                                                  $a_m_type,
                                                  $a_m_email,
                                                  $a_m_subject,
                                                  $a_m_message)
        {
                $query = "DELETE FROM $this->table_mail_saved ".
                        "WHERE user_id = '".$this->user_id."'";
                $res = $this->ilias->db->query($query);

                $query = "INSERT INTO $this->table_mail_saved ".
                        "SET user_id = '".$a_user_id."',".
                        "attachments = '".addslashes(serialize($a_attachments))."',".
                        "rcp_to = '".addslashes($a_rcp_to)."',".
                        "rcp_cc = '".addslashes($a_rcp_cc)."',".
                        "rcp_bcc = '".addslashes($a_rcp_bcc)."',".
                        "m_type = '".addslashes(serialize($a_m_type))."',".
                        "m_email = '',".
                        "m_subject = '".addslashes($a_m_subject)."',".
                        "m_message = '".addslashes($a_m_message)."'";

                $res = $this->ilias->db->query($query);

                return true;
        }

        function getSavedData()
        {
                $query = "SELECT * FROM $this->table_mail_saved ".
                        "WHERE user_id = '".$this->user_id."'";

                $this->mail_data = $this->fetchMailData($this->ilias->db->getRow($query,DB_FETCHMODE_OBJECT));

                return $this->mail_data;
        }

        function sendMail($a_rcp_to,$a_rcp_cc,$a_rcp_bc,$a_m_subject,$a_m_message,$a_attachment,$a_type)
        {
                global $lng,$rbacsystem;

                $error_message = '';
                $message = '';

                if (in_array("system",$a_type))
                {
                        $this->__checkSystemRecipients($a_rcp_to);
                        $a_type = array('system');
                }

                if ($a_attachment)
                {
                        if (!$this->mfile->checkFilesExist($a_attachment))
                        {
                                return "YOUR LIST OF ATTACHMENTS IS NOT VALID, PLEASE EDIT THE LIST";
                        }
                }
                // CHECK NECESSARY MAIL DATA FOR ALL TYPES
                if ($error_message = $this->checkMail($a_rcp_to,$a_rcp_cc,$a_rcp_bc,$a_m_subject,$a_m_message,$a_type))
                {
                        return $error_message;
                }
                // check recipients
                if ($error_message = $this->checkRecipients($a_rcp_to,$a_type))
                {
                        $message .= $error_message;
                }

                if ($error_message = $this->checkRecipients($a_rcp_cc,$a_type))
                {
                        $message .= $error_message;
                }

                if ($error_message = $this->checkRecipients($a_rcp_bc,$a_type))
                {
                        $message .= $error_message;
                }
                // if there was an error
                if (!empty($message))
                {
                        return $this->lng->txt("mail_following_rcp_not_valid").$message;
                }

                // CHECK FOR SYSTEM MAIL
                if (in_array('system',$a_type))
                {
                        if (!empty($a_attachment))
                        {
                                return $lng->txt("mail_no_attach_allowed");
                        }
                }

                // REPLACE ALL LOGIN NAMES WITH '@' BY ANOTHER CHARACTER
                $a_rcp_to = $this->__substituteRecipients($a_rcp_to,"substitute");
                $a_rcp_cc = $this->__substituteRecipients($a_rcp_cc,"substitute");
                $a_rcp_bc = $this->__substituteRecipients($a_rcp_bc,"substitute");
                // COUNT EMAILS
                $c_emails = $this->__getCountRecipients($a_rcp_to,$a_rcp_cc,$a_rcp_bc,true);
                $c_rcp = $this->__getCountRecipients($a_rcp_to,$a_rcp_cc,$a_rcp_bc,false);

                if (count($c_emails))
                {
                        if (!$this->getEmailOfSender())
                        {
                                return $lng->txt("mail_check_your_email_addr");
                        }
                }

                // ACTIONS FOR ALL TYPES
                // save mail in sent box
                $sent_id = $this->saveInSentbox($a_attachment,$a_rcp_to,$a_rcp_cc,$a_rcp_bc,$a_type,
                                                                                $a_m_subject,$a_m_message);
                if ($a_attachment)
                {
                        $this->mfile->assignAttachmentsToDirectory($sent_id,$sent_id);
                        // ARE THERE INTERNAL MAILS
                        if ($c_emails < $c_rcp)
                        {
                                if ($error = $this->mfile->saveFiles($sent_id,$a_attachment))
                                {
                                        return $error;
                                }
                        }
                }

                // FILTER EMAILS
                // IF EMAIL RECIPIENT
                if ($c_emails)
                {
                        if (!$rbacsystem->checkAccess("smtp_mail",$this->getMailObjectReferenceId()))
                        {
                                return $lng->txt("mail_no_permissions_write_smtp");
                        }
                        $this->sendMimeMail($this->__getEmailRecipients($a_rcp_to),
                                                                $this->__getEmailRecipients($a_rcp_cc),
                                                                $this->__getEmailRecipients($a_rcp_bc),
                                                                $a_m_subject,
                                                                $a_m_message,
                                                                $a_attachment);
                }

                if (in_array('system',$a_type))
                {
                        if (!$this->distributeMail($a_rcp_to,$a_rcp_cc,$a_rcp_bc,$a_m_subject,$a_m_message,$a_attachment,$sent_id,$a_type,'system'))
                        {
                                return $lng->txt("mail_send_error");
                        }
                }
                // ACTIONS FOR TYPE SYSTEM AND NORMAL
                if (in_array('normal',$a_type))
                {
                        // TRY BOTH internal and email (depends on user settings)
                        if (!$this->distributeMail($a_rcp_to,$a_rcp_cc,$a_rcp_bc,$a_m_subject,$a_m_message,$a_attachment,$sent_id,$a_type,'normal'))
                        {
                                return $lng->txt("mail_send_error");
                        }
                }

                // Temporary bugfix
                if (!$this->getSaveInSentbox())
                {
                        $this->deleteMails(array($sent_id));
                }

                return '';
        }

        function saveInSentbox($a_attachment,$a_rcp_to,$a_rcp_cc,$a_rcp_bcc,$a_type,
                                                   $a_m_subject,$a_m_message)
        {
                include_once "classes/class.ilMailbox.php";

                $mbox = new ilMailbox($this->user_id);
                $sent_id = $mbox->getSentFolder();

                return $this->sendInternalMail($sent_id,$this->user_id,$a_attachment,$a_rcp_to,$a_rcp_cc,
                                                                                $a_rcp_bcc,'read',$a_type,$a_as_email,$a_m_subject,$a_m_message,$this->user_id);
        }


        
        function addFullname($a_email)
        {
                include_once 'classes/class.ilMimeMail.php';
                
                global $ilUser;

                return ilMimeMail::_mimeEncode($ilUser->getFullname()).'<'.$a_email.'>';
        }

        function sendMimeMail($a_rcp_to,$a_rcp_cc,$a_rcp_bcc,$a_m_subject,$a_m_message,$a_attachments)
        {
                #var_dump("<pre>",$a_rcp_to,$a_rcp_cc,$a_rcp_bcc,$a_m_subject,$a_m_message,$a_attachments,"<pre>");
                
                $inst_name = $this->ilias->getSetting("inst_name") ? $this->ilias->getSetting("inst_name") : "ILIAS 3";
                $a_m_subject = "[".$inst_name."] ".$a_m_subject;


                if($this->isSOAPEnabled())
                {
                        // Send per soap
                        include_once 'Services/WebServices/SOAP/classes/class.ilSoapClient.php';

                        $soap_client = new ilSoapClient();
                        $soap_client->setTimeout(1);
                        $soap_client->setResponseTimeout(1);
                        $soap_client->enableWSDL(true);
                        $soap_client->init();

                        $attachments = array();
                        foreach($a_attachments as $attachment)
                        {
                                $attachments[] = $this->mfile->getAbsolutePath($attachment);
                        }
                        $attachments = implode(',',$attachments);

                        $soap_client->call('sendMail',array($_COOKIE['PHPSESSID'].'::'.$_COOKIE['ilClientId'],  // session id
                                                                                                $a_rcp_to,
                                                                                                $a_rcp_cc,
                                                                                                $a_rcp_bcc,
                                                                                                $this->addFullname($this->getEmailOfSender()),
                                                                                                $a_m_subject,
                                                                                                $a_m_message,
                                                                                                $attachments));
                
                        return true;
                }
                else
                {
                        // send direct
                        include_once "classes/class.ilMimeMail.php";

                        $sender = $this->addFullname($this->getEmailOfSender());

                        $mmail = new ilMimeMail();
                        $mmail->autoCheck(false);
                        $mmail->From($sender);
                        $mmail->To($a_rcp_to);
                        // Add installation name to subject
                        $mmail->Subject($a_m_subject);
                        $mmail->Body($a_m_message);

                        if ($a_rcp_cc)
                        {
                                $mmail->Cc($a_rcp_cc);
                        }

                        if ($a_rcp_bcc)
                        {
                                $mmail->Bcc($a_rcp_bcc);
                        }

                        foreach ($a_attachments as $attachment)
                        {
                                $mmail->Attach($this->mfile->getAbsolutePath($attachment));
                        }

                        $mmail->Send();
                }
        }
        function getEmailOfSender()
        {
                $umail = new ilObjUser($this->user_id);
                $sender = $umail->getEmail();

                if (ilUtil::is_email($sender))
                {
                        return $sender;
                }
                else
                {
                        return '';
                }
        }

        function saveAttachments($a_attachments)
        {
                $query = "UPDATE $this->table_mail_saved ".
                        "SET attachments = '".addslashes(serialize($a_attachments))."' ".
                        "WHERE user_id = '".$this->user_id."'";

                $res = $this->ilias->db->query($query);

                return true;
        }

        function getAttachments()
        {
                return $this->mail_data["attachments"] ? $this->mail_data["attachments"] : array();
        }
        
        function explodeRecipients($a_recipients)
        {
                $a_recipients = trim($a_recipients);

                // WHITESPACE IS NOT ALLOWED AS SEPERATOR
                #$a_recipients = preg_replace("/ /",",",$a_recipients);
                $a_recipients = preg_replace("/;/",",",$a_recipients);
                

                foreach(explode(',',$a_recipients) as $tmp_rec)
                {
                        if($tmp_rec)
                        {
                                $rcps[] = trim($tmp_rec);
                        }
                }
                return is_array($rcps) ? $rcps : array();
                
        }

        function __getCountRecipient($rcp,$a_only_email = true)
        {
                $counter = 0;

                foreach ($this->explodeRecipients($rcp) as $to)
                {
                        if ($a_only_email)
                        {
                                if (strpos($to,'@'))
                                {
                                        ++$counter;
                                }
                        }
                        else
                        {
                                ++$counter;
                        }
                }

                return $counter;
        }
                        

        function __getCountRecipients($a_to,$a_cc,$a_bcc,$a_only_email = true)
        {
                return $this->__getCountRecipient($a_to,$a_only_email) 
                        + $this->__getCountRecipient($a_cc,$a_only_email) 
                        + $this->__getCountRecipient($a_bcc,$a_only_email);
        }

        function __getEmailRecipients($a_rcp)
        {
                foreach ($this->explodeRecipients($a_rcp) as $to)
                {
                        if(strpos($to,'@'))
                        {
                                $rcp[] = $to;
                        }
                }
                return implode(',',$rcp ? $rcp : array());
        }

        function __prependMessage($a_m_message,$rcp_to,$rcp_cc)
        {
                $inst_name = $this->ilias->getSetting("inst_name") ? $this->ilias->getSetting("inst_name") : "ILIAS 3";

                $message = $inst_name." To:".$rcp_to."\n";

                if ($rcp_cc)
                {
                        $message .= "Cc: ".$rcp_cc;
                }

                $message .= "\n\n";
                $message .= $a_m_message;

                return $message;
        }

        function __checkSystemRecipients(&$a_rcp_to)
        {
                if (preg_match("/@all/",$a_rcp_to))
                {
                        // GET ALL LOGINS
                        $all = ilObjUser::_getAllUserLogins($this->ilias);
                        $a_rcp_to = preg_replace("/@all/",implode(',',$all),$a_rcp_to);
                }

                return;
        }

        function __substituteRecipients($a_rcp,$direction)
        {
                $new_name = array();

                $tmp_names = $this->explodeRecipients($a_rcp);


                foreach($tmp_names as $name)
                {
                        if(strpos($name,"#") === 0)
                        {
                                $new_name[] = $name;
                                continue;
                        }
                        switch($direction)
                        {
                                case "substitute":
                                        if(strpos($name,"@") and loginExists($name))
                                        {
                                                $new_name[] = preg_replace("/@/","�#�",$name);
                                        }
                                        else
                                        {
                                                $new_name[] = $name;
                                        }
                                        break;
                                        
                                case "resubstitute":
                                        if(stristr($name,"�#�"))
                                        {
                                                $new_name[] = preg_replace("/�#�/","@",$name);
                                        }
                                        else
                                        {
                                                $new_name[] = $name;
                                        }
                                        break;
                        }
                }
                return implode(",",$new_name);
        }
} // END class.ilMail
?>