2015-07-24 04:37:48 +02:00
< ? php
/**
* A Form can have multiply members / emails to email the submission
* to and custom subjects
*
* @ package userforms
*/
2016-07-21 07:53:59 +02:00
class UserDefinedForm_EmailRecipient extends DataObject
{
private static $db = array (
'EmailAddress' => 'Varchar(200)' ,
'EmailSubject' => 'Varchar(200)' ,
'EmailFrom' => 'Varchar(200)' ,
'EmailReplyTo' => 'Varchar(200)' ,
'EmailBody' => 'Text' ,
'EmailBodyHtml' => 'HTMLText' ,
'EmailTemplate' => 'Varchar' ,
'SendPlain' => 'Boolean' ,
'HideFormData' => 'Boolean' ,
'CustomRulesCondition' => 'Enum("And,Or")'
);
private static $has_one = array (
'Form' => 'UserDefinedForm' ,
'SendEmailFromField' => 'EditableFormField' ,
'SendEmailToField' => 'EditableFormField' ,
'SendEmailSubjectField' => 'EditableFormField'
);
private static $has_many = array (
'CustomRules' => 'UserDefinedForm_EmailRecipientCondition'
);
private static $summary_fields = array (
'EmailAddress' ,
'EmailSubject' ,
'EmailFrom'
);
/**
* Setting this to true will allow you to select " risky " fields as
* email recipient , such as free - text entry fields .
*
* It ' s advisable to leave this off .
*
* @ config
* @ var bool
*/
private static $allow_unbound_recipient_fields = false ;
public function summaryFields ()
{
$fields = parent :: summaryFields ();
if ( isset ( $fields [ 'EmailAddress' ])) {
$fields [ 'EmailAddress' ] = _t ( 'UserDefinedForm.EMAILADDRESS' , 'Email' );
}
if ( isset ( $fields [ 'EmailSubject' ])) {
$fields [ 'EmailSubject' ] = _t ( 'UserDefinedForm.EMAILSUBJECT' , 'Subject' );
}
if ( isset ( $fields [ 'EmailFrom' ])) {
$fields [ 'EmailFrom' ] = _t ( 'UserDefinedForm.EMAILFROM' , 'From' );
}
return $fields ;
}
/**
* Get instance of UserDefinedForm when editing in getCMSFields
*
* @ return UserDefinedFrom
*/
protected function getFormParent ()
{
$formID = $this -> FormID
? $this -> FormID
: Session :: get ( 'CMSMain.currentPage' );
return UserDefinedForm :: get () -> byID ( $formID );
}
public function getTitle ()
{
if ( $this -> EmailAddress ) {
return $this -> EmailAddress ;
}
if ( $this -> EmailSubject ) {
return $this -> EmailSubject ;
}
return parent :: getTitle ();
}
/**
* Generate a gridfield config for editing filter rules
*
* @ return GridFieldConfig
*/
protected function getRulesConfig ()
{
$formFields = $this -> getFormParent () -> Fields ();
$config = GridFieldConfig :: create ()
-> addComponents (
new GridFieldButtonRow ( 'before' ),
new GridFieldToolbarHeader (),
new GridFieldAddNewInlineButton (),
new GridFieldDeleteAction (),
$columns = new GridFieldEditableColumns ()
);
$columns -> setDisplayFields ( array (
'ConditionFieldID' => function ( $record , $column , $grid ) use ( $formFields ) {
return DropdownField :: create ( $column , false , $formFields -> map ( 'ID' , 'Title' ));
},
'ConditionOption' => function ( $record , $column , $grid ) {
$options = UserDefinedForm_EmailRecipientCondition :: config () -> condition_options ;
return DropdownField :: create ( $column , false , $options );
},
'ConditionValue' => function ( $record , $column , $grid ) {
return TextField :: create ( $column );
}
));
return $config ;
}
/**
* @ return FieldList
*/
public function getCMSFields ()
{
Requirements :: javascript ( USERFORMS_DIR . '/javascript/Recipient.js' );
// Determine optional field values
$form = $this -> getFormParent ();
// predefined choices are also candidates
$multiOptionFields = EditableMultipleOptionField :: get () -> filter ( 'ParentID' , $form -> ID );
// if they have email fields then we could send from it
$validEmailFromFields = EditableEmailField :: get () -> filter ( 'ParentID' , $form -> ID );
// For the subject, only one-line entry boxes make sense
$validSubjectFields = ArrayList :: create (
EditableTextField :: get ()
-> filter ( 'ParentID' , $form -> ID )
-> exclude ( 'Rows:GreaterThan' , 1 )
-> toArray ()
);
$validSubjectFields -> merge ( $multiOptionFields );
// Check valid email-recipient fields
if ( $this -> config () -> allow_unbound_recipient_fields ) {
// To address can only be email fields or multi option fields
$validEmailToFields = ArrayList :: create ( $validEmailFromFields -> toArray ());
$validEmailToFields -> merge ( $multiOptionFields );
} else {
// To address cannot be unbound, so restrict to pre-defined lists
$validEmailToFields = $multiOptionFields ;
}
// Build fieldlist
$fields = FieldList :: create ( Tabset :: create ( 'Root' ) -> addExtraClass ( 'EmailRecipientForm' ));
// Configuration fields
$fields -> addFieldsToTab ( 'Root.EmailDetails' , array (
// Subject
FieldGroup :: create (
TextField :: create ( 'EmailSubject' , _t ( 'UserDefinedForm.TYPESUBJECT' , 'Type subject' ))
-> setAttribute ( 'style' , 'min-width: 400px;' ),
DropdownField :: create (
'SendEmailSubjectFieldID' ,
_t ( 'UserDefinedForm.SELECTAFIELDTOSETSUBJECT' , '.. or select a field to use as the subject' ),
$validSubjectFields -> map ( 'ID' , 'Title' )
) -> setEmptyString ( '' )
)
-> setTitle ( _t ( 'UserDefinedForm.EMAILSUBJECT' , 'Email subject' )),
// To
FieldGroup :: create (
TextField :: create ( 'EmailAddress' , _t ( 'UserDefinedForm.TYPETO' , 'Type to address' ))
-> setAttribute ( 'style' , 'min-width: 400px;' ),
DropdownField :: create (
'SendEmailToFieldID' ,
_t ( 'UserDefinedForm.ORSELECTAFIELDTOUSEASTO' , '.. or select a field to use as the to address' ),
$validEmailToFields -> map ( 'ID' , 'Title' )
) -> setEmptyString ( ' ' )
)
-> setTitle ( _t ( 'UserDefinedForm.SENDEMAILTO' , 'Send email to' ))
-> setDescription ( _t (
'UserDefinedForm.SENDEMAILTO_DESCRIPTION' ,
'You may enter multiple email addresses as a comma separated list.'
)),
// From
TextField :: create ( 'EmailFrom' , _t ( 'UserDefinedForm.FROMADDRESS' , 'Send email from' ))
-> setDescription ( _t (
'UserDefinedForm.EmailFromContent' ,
" The from address allows you to set who the email comes from. On most servers this " .
" will need to be set to an email address on the same domain name as your site. " .
" For example on yoursite.com the from address may need to be something@yoursite.com. " .
" You can however, set any email address you wish as the reply to address. "
)),
// Reply-To
FieldGroup :: create (
TextField :: create ( 'EmailReplyTo' , _t ( 'UserDefinedForm.TYPEREPLY' , 'Type reply address' ))
-> setAttribute ( 'style' , 'min-width: 400px;' ),
DropdownField :: create (
'SendEmailFromFieldID' ,
_t ( 'UserDefinedForm.ORSELECTAFIELDTOUSEASFROM' , '.. or select a field to use as reply to address' ),
$validEmailFromFields -> map ( 'ID' , 'Title' )
) -> setEmptyString ( ' ' )
)
-> setTitle ( _t ( 'UserDefinedForm.REPLYADDRESS' , 'Email for reply to' ))
-> setDescription ( _t (
'UserDefinedForm.REPLYADDRESS_DESCRIPTION' ,
'The email address which the recipient is able to \'reply\' to.'
))
));
2017-06-21 05:42:18 +02:00
2016-07-21 07:53:59 +02:00
$fields -> fieldByName ( 'Root.EmailDetails' ) -> setTitle ( _t ( 'UserDefinedForm_EmailRecipient.EMAILDETAILSTAB' , 'Email Details' ));
// Only show the preview link if the recipient has been saved.
if ( ! empty ( $this -> EmailTemplate )) {
$preview = sprintf (
'<p><a href="%s" target="_blank" class="ss-ui-button">%s</a></p><em>%s</em>' ,
2017-06-21 05:42:18 +02:00
Controller :: join_links (
singleton ( 'CMSPageEditController' ) -> getEditForm () -> FormAction (),
" field/EmailRecipients/item/ { $this -> ID } /preview "
),
2016-07-21 07:53:59 +02:00
_t ( 'UserDefinedForm.PREVIEW_EMAIL' , 'Preview email' ),
_t ( 'UserDefinedForm.PREVIEW_EMAIL_DESCRIPTION' , 'Note: Unsaved changes will not appear in the preview.' )
);
} else {
$preview = sprintf (
'<em>%s</em>' ,
_t (
'UserDefinedForm.PREVIEW_EMAIL_UNAVAILABLE' ,
'You can preview this email once you have saved the Recipient.'
)
);
}
// Email templates
$fields -> addFieldsToTab ( 'Root.EmailContent' , array (
CheckboxField :: create ( 'HideFormData' , _t ( 'UserDefinedForm.HIDEFORMDATA' , 'Hide form data from email?' )),
CheckboxField :: create (
'SendPlain' ,
_t ( 'UserDefinedForm.SENDPLAIN' , 'Send email as plain text? (HTML will be stripped)' )
),
DropdownField :: create (
'EmailTemplate' ,
_t ( 'UserDefinedForm.EMAILTEMPLATE' , 'Email template' ),
$this -> getEmailTemplateDropdownValues ()
) -> addExtraClass ( 'toggle-html-only' ),
HTMLEditorField :: create ( 'EmailBodyHtml' , _t ( 'UserDefinedForm.EMAILBODYHTML' , 'Body' ))
-> addExtraClass ( 'toggle-html-only' ),
TextareaField :: create ( 'EmailBody' , _t ( 'UserDefinedForm.EMAILBODY' , 'Body' ))
-> addExtraClass ( 'toggle-plain-only' ),
2017-06-09 01:04:52 +02:00
LiteralField :: create ( 'EmailPreview' , $preview )
2016-07-21 07:53:59 +02:00
));
2017-06-09 00:38:49 +02:00
2016-07-21 07:53:59 +02:00
$fields -> fieldByName ( 'Root.EmailContent' ) -> setTitle ( _t ( 'UserDefinedForm_EmailRecipient.EMAILCONTENTTAB' , 'Email Content' ));
// Custom rules for sending this field
$grid = new GridField (
" CustomRules " ,
_t ( 'EditableFormField.CUSTOMRULES' , 'Custom Rules' ),
$this -> CustomRules (),
$this -> getRulesConfig ()
);
$grid -> setDescription ( _t (
'UserDefinedForm.RulesDescription' ,
'Emails will only be sent to the recipient if the custom rules are met. If no rules are defined, this receipient will receive notifications for every submission.'
));
$fields -> addFieldsToTab ( 'Root.CustomRules' , array (
new DropdownField (
'CustomRulesCondition' ,
_t ( 'UserDefinedForm.SENDIF' , 'Send condition' ),
array (
'Or' => _t ( 'UserDefinedForm.SENDIFOR' , 'Any conditions are true' ),
'And' => _t ( 'UserDefinedForm.SENDIFAND' , 'All conditions are true' )
)
),
$grid
));
2017-06-09 00:38:49 +02:00
2016-07-21 07:53:59 +02:00
$fields -> fieldByName ( 'Root.CustomRules' ) -> setTitle ( _t ( 'UserDefinedForm_EmailRecipient.CUSTOMRULESTAB' , 'Custom Rules' ));
$this -> extend ( 'updateCMSFields' , $fields );
return $fields ;
}
/**
* Return whether a user can create an object of this type
*
2015-12-22 23:14:36 +01:00
* @ param Member $member
* @ param array $context Virtual parameter to allow context to be passed in to check
2016-07-21 07:53:59 +02:00
* @ return bool
*/
public function canCreate ( $member = null )
{
// Check parent page
2015-12-22 23:14:36 +01:00
$parent = $this -> getCanCreateContext ( func_get_args ());
2016-07-21 07:53:59 +02:00
if ( $parent ) {
2015-12-22 23:14:36 +01:00
return $parent -> canEdit ( $member );
}
// Fall back to secure admin permissions
return parent :: canCreate ( $member );
2016-07-21 07:53:59 +02:00
}
2015-07-24 04:37:48 +02:00
2015-12-22 23:14:36 +01:00
/**
* Helper method to check the parent for this object
*
* @ param array $args List of arguments passed to canCreate
* @ return SiteTree Parent page instance
*/
2016-07-21 07:53:59 +02:00
protected function getCanCreateContext ( $args )
{
2015-12-22 23:14:36 +01:00
// Inspect second parameter to canCreate for a 'Parent' context
2016-07-21 07:53:59 +02:00
if ( isset ( $args [ 1 ][ 'Form' ])) {
2015-12-22 23:14:36 +01:00
return $args [ 1 ][ 'Form' ];
}
// Hack in currently edited page if context is missing
2016-07-21 07:53:59 +02:00
if ( Controller :: has_curr () && Controller :: curr () instanceof CMSMain ) {
2015-12-22 23:14:36 +01:00
return Controller :: curr () -> currentPage ();
}
// No page being edited
return null ;
}
2016-07-21 07:53:59 +02:00
/**
* @ param Member
*
* @ return boolean
*/
public function canView ( $member = null )
{
return $this -> Form () -> canView ( $member );
}
/**
* @ param Member
*
* @ return boolean
*/
public function canEdit ( $member = null )
{
return $this -> Form () -> canEdit ( $member );
}
/**
* @ param Member
*
* @ return boolean
*/
public function canDelete ( $member = null )
{
return $this -> canEdit ( $member );
}
/*
* Determine if this recipient may receive notifications for this submission
*
* @ param array $data
* @ param Form $form
* @ return bool
*/
public function canSend ( $data , $form )
{
// Skip if no rules configured
$customRules = $this -> CustomRules ();
if ( ! $customRules -> count ()) {
return true ;
}
// Check all rules
$isAnd = $this -> CustomRulesCondition === 'And' ;
foreach ( $customRules as $customRule ) {
$matches = $customRule -> matches ( $data , $form );
if ( $isAnd && ! $matches ) {
return false ;
}
if ( ! $isAnd && $matches ) {
return true ;
}
}
// Once all rules are checked
return $isAnd ;
}
/**
* Make sure the email template saved against the recipient exists on the file system .
*
* @ param string
*
* @ return boolean
*/
public function emailTemplateExists ( $template = '' )
{
$t = ( $template ? $template : $this -> EmailTemplate );
return in_array ( $t , $this -> getEmailTemplateDropdownValues ());
}
/**
* Get the email body for the current email format
*
* @ return string
*/
public function getEmailBodyContent ()
{
2017-06-09 00:38:49 +02:00
if ( $this -> SendPlain ) {
return DBField :: create_field ( 'HTMLText' , $this -> EmailBody ) -> NoHTML ();
}
return DBField :: create_field ( 'HTMLText' , $this -> EmailBodyHtml ) -> RAW ();
2016-07-21 07:53:59 +02:00
}
/**
* Gets a list of email templates suitable for populating the email template dropdown .
*
* @ return array
*/
public function getEmailTemplateDropdownValues ()
{
$templates = array ();
$finder = new SS_FileFinder ();
$finder -> setOption ( 'name_regex' , '/^.*\.ss$/' );
$found = $finder -> find ( BASE_PATH . '/' . UserDefinedForm :: config () -> email_template_directory );
foreach ( $found as $key => $value ) {
$template = pathinfo ( $value );
$templates [ $template [ 'filename' ]] = $template [ 'filename' ];
}
return $templates ;
}
2015-07-24 04:37:48 +02:00
}