Page Menu
Home
Phorge
Search
Configure Global Search
Log In
Files
F3311206
copy.inc
No One
Temporary
Actions
Download File
Edit File
Delete File
View Transforms
Subscribe
Flag For Later
Award Token
Size
4 KB
Referenced Files
None
Subscribers
None
copy.inc
View Options
<
?
php
/**
+-----------------------------------------------------------------------+
| program/steps/addressbook/copy.inc |
| |
| This file is part of the Roundcube Webmail client |
| Copyright (C) 2007-2013, The Roundcube Dev Team |
| |
| Licensed under the GNU General Public License version 3 or |
| any later version with exceptions for skins & plugins. |
| See the README file for a full license statement. |
| |
| PURPOSE: |
| Copy a contact record from one direcotry to another |
| |
+-----------------------------------------------------------------------+
| Author: Thomas Bruederli <roundcube@gmail.com> |
+-----------------------------------------------------------------------+
*/
// only process ajax requests
if
(
!$
OUTPUT
-
>
ajax_call
)
return
;
$
cids
=
rcmail_get_cids
();
$
target
=
rcube_utils
::
get_input_value
(
'
_to
'
,
rcube_utils
::
INPUT_POST
);
$
target_group
=
rcube_utils
::
get_input_value
(
'
_togid
'
,
rcube_utils
::
INPUT_POST
);
$
success
=
0
;
$
errormsg
=
'
copyerror
'
;
$
maxnum
=
$
RCMAIL
-
>
config
-
>
get
(
'
max_group_members
'
,
0
);
foreach
(
$
cids
as
$
source
=
>
$
cid
)
{
// Something wrong, target not specified
if
(
!
strlen
(
$
target
))
{
break
;
}
// It maight happen when copying records from search result
// Do nothing, go to next source
if
((
string
)
$
target
==
(
string
)
$
source
)
{
continue
;
}
$
CONTACTS
=
$
RCMAIL
-
>
get_address_book
(
$
source
);
$
TARGET
=
$
RCMAIL
-
>
get_address_book
(
$
target
);
if
(
!$
TARGET
||
!$
TARGET
-
>
ready
||
$
TARGET
-
>
readonly
)
{
break
;
}
$
ids
=
array
();
foreach
(
$
cid
as
$
cid
)
{
$
a_record
=
$
CONTACTS
-
>
get_record
(
$
cid
,
true
);
// avoid copying groups
if
(
$
a_record
[
'
_type
'
]
==
'
group
'
)
continue
;
// Check if contact exists, if so, we'll need it's ID
// Note: Some addressbooks allows empty email address field
// @TODO: should we check all email addresses?
$
email
=
$
CONTACTS
-
>
get_col_values
(
'
email
'
,
$
a_record
,
true
);
if
(
!
empty
(
$
email
))
$
result
=
$
TARGET
-
>
search
(
'
email
'
,
$
email
[
0
],
1
,
true
,
true
);
else
if
(
!
empty
(
$
a_record
[
'
name
'
]))
$
result
=
$
TARGET
-
>
search
(
'
name
'
,
$
a_record
[
'
name
'
],
1
,
true
,
true
);
else
$
result
=
new
rcube_result_set
();
// insert contact record
if
(
!$
result
-
>
count
)
{
$
plugin
=
$
RCMAIL
-
>
plugins
-
>
exec_hook
(
'
contact_create
'
,
array
(
'
record
'
=
>
$
a_record
,
'
source
'
=
>
$
target
,
'
group
'
=
>
$
target_group
));
if
(
!$
plugin
[
'
abort
'
])
{
if
(
$
insert_id
=
$
TARGET
-
>
insert
(
$
plugin
[
'
record
'
],
false
))
{
$
ids
[]
=
$
insert_id
;
$
success
++
;
}
}
else
if
(
$
plugin
[
'
result
'
])
{
$
ids
=
array_merge
(
$
ids
,
$
plugin
[
'
result
'
]);
$
success
++
;
}
}
else
{
$
record
=
$
result
-
>
first
();
$
ids
[]
=
$
record
[
'
ID
'
];
$
errormsg
=
empty
(
$
email
)
?
'
contactnameexists
'
:
'
contactexists
'
;
}
}
// assign to group
if
(
$
target_group
&&
$
TARGET
-
>
groups
&&
!
empty
(
$
ids
))
{
$
plugin
=
$
RCMAIL
-
>
plugins
-
>
exec_hook
(
'
group_addmembers
'
,
array
(
'
group_id
'
=
>
$
target_group
,
'
ids
'
=
>
$
ids
,
'
source
'
=
>
$
target
));
if
(
!$
plugin
[
'
abort
'
])
{
$
TARGET
-
>
reset
();
$
TARGET
-
>
set_group
(
$
target_group
);
if
(
$
maxnum
&&
(
$
TARGET
-
>
count
()
-
>
count
+
count
(
$
plugin
[
'
ids
'
])
>
$
maxnum
))
{
$
OUTPUT
-
>
show_message
(
'
maxgroupmembersreached
'
,
'
warning
'
,
array
(
'
max
'
=
>
$
maxnum
));
$
OUTPUT
-
>
send
();
}
if
((
$
cnt
=
$
TARGET
-
>
add_to_group
(
$
target_group
,
$
plugin
[
'
ids
'
]))
&&
$
cnt
>
$
success
)
$
success
=
$
cnt
;
}
else
if
(
$
plugin
[
'
result
'
])
{
$
success
=
$
plugin
[
'
result
'
];
}
$
errormsg
=
$
plugin
[
'
message
'
]
?:
'
copyerror
'
;
}
}
if
(
!$
success
)
$
OUTPUT
-
>
show_message
(
$
errormsg
,
'
error
'
);
else
$
OUTPUT
-
>
show_message
(
'
copysuccess
'
,
'
notice
'
,
array
(
'
nr
'
=
>
$
success
));
// send response
$
OUTPUT
-
>
send
();
File Metadata
Details
Attached
Mime Type
text/x-php
Expires
Thu, Apr 9, 12:58 PM (1 d, 20 h)
Storage Engine
blob
Storage Format
Raw Data
Storage Handle
470937
Default Alt Text
copy.inc (4 KB)
Attached To
Mode
R3 roundcubemail
Attached
Detach File
Event Timeline
Log In to Comment