Page Menu
Home
Phorge
Search
Configure Global Search
Log In
Files
F7055663
mailto.inc
No One
Temporary
Actions
Download File
Edit File
Delete File
View Transforms
Subscribe
Flag For Later
Award Token
Size
2 KB
Referenced Files
None
Subscribers
None
mailto.inc
View Options
<
?
php
/*
+-----------------------------------------------------------------------+
| program/steps/addressbook/mailto.inc |
| |
| This file is part of the Roundcube Webmail client |
| Copyright (C) 2007, The Roundcube Dev Team |
| Licensed under the GNU GPL |
| |
| PURPOSE: |
| Compose a recipient list with all selected contacts |
| |
+-----------------------------------------------------------------------+
| Author: Thomas Bruederli <roundcube@gmail.com> |
+-----------------------------------------------------------------------+
$Id: copy.inc 471 2007-02-09 21:25:50Z thomasb $
*/
$
cids
=
rcmail_get_cids
();
$
mailto
=
array
();
$
recipients
=
null
;
foreach
(
$
cids
as
$
source
=
>
$
cid
)
{
$
CONTACTS
=
$
RCMAIL
-
>
get_address_book
(
$
source
);
if
(
$
CONTACTS
-
>
ready
)
{
$
CONTACTS
-
>
set_page
(
1
);
$
CONTACTS
-
>
set_pagesize
(
count
(
$
cid
)
+
2
);
// +2 to skip counting query
$
recipients
=
$
CONTACTS
-
>
search
(
$
CONTACTS
-
>
primary_key
,
$
cid
,
false
,
true
,
true
,
'
email
'
);
}
}
if
(
!
empty
(
$
_REQUEST
[
'
_gid
'
])
&&
isset
(
$
_REQUEST
[
'
_source
'
]))
{
$
source
=
get_input_value
(
'
_source
'
,
RCUBE_INPUT_GPC
);
$
CONTACTS
=
$
RCMAIL
-
>
get_address_book
(
$
source
);
$
group_id
=
get_input_value
(
'
_gid
'
,
RCUBE_INPUT_GPC
);
$
group_data
=
$
CONTACTS
-
>
get_group
(
$
group_id
);
// group has an email address assigned: use that
if
(
$
group_data
[
'
email
'
])
{
$
mailto
[]
=
format_email_recipient
(
$
group_data
[
'
email
'
][
0
],
$
group_data
[
'
name
'
]);
}
else
if
(
$
CONTACTS
-
>
ready
)
{
$
CONTACTS
-
>
set_group
(
$
group_id
);
$
CONTACTS
-
>
set_page
(
1
);
$
CONTACTS
-
>
set_pagesize
(
200
);
// limit somehow
$
recipients
=
$
CONTACTS
-
>
list_records
();
}
}
if
(
$
recipients
)
{
while
(
is_object
(
$
recipients
)
&&
(
$
rec
=
$
recipients
-
>
iterate
()))
{
$
emails
=
$
CONTACTS
-
>
get_col_values
(
'
email
'
,
$
rec
,
true
);
$
mailto
[]
=
format_email_recipient
(
$
emails
[
0
],
$
rec
[
'
name
'
]);
}
}
if
(
!
empty
(
$
mailto
))
{
$
mailto_str
=
join
(
'
,
'
,
$
mailto
);
$
mailto_id
=
substr
(
md5
(
$
mailto_str
),
0
,
16
);
$
_SESSION
[
'
mailto
'
][
$
mailto_id
]
=
urlencode
(
$
mailto_str
);
$
OUTPUT
-
>
redirect
(
array
(
'
task
'
=
>
'
mail
'
,
'
_action
'
=
>
'
compose
'
,
'
_mailto
'
=
>
$
mailto_id
));
}
else
{
$
OUTPUT
-
>
show_message
(
'
nocontactsfound
'
,
'
warning
'
);
}
// send response
$
OUTPUT
-
>
send
();
File Metadata
Details
Attached
Mime Type
text/x-php
Expires
Fri, Jun 12, 3:07 AM (1 d, 8 h)
Storage Engine
blob
Storage Format
Raw Data
Storage Handle
914567
Default Alt Text
mailto.inc (2 KB)
Attached To
Mode
R3 roundcubemail
Attached
Detach File
Event Timeline
Log In to Comment