You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

670 lines
24 KiB

<?php
/**
* @package tikiwiki
*/
// (c) Copyright by authors of the Tiki Wiki CMS Groupware Project
//
// All Rights Reserved. See copyright.txt for details and a complete list of authors.
// Licensed under the GNU LESSER GENERAL PUBLIC LICENSE. See license.txt for details.
// $Id$
$errors = [];
$inputConfiguration = [
[
'staticKeyFilters' => [
'offset' => 'int',
'numrows' => 'int',
'find' => 'text',
'filterEmail' => 'xss',
'sort_mode' => 'alnumdash',
'initial' => 'alpha',
'filterGroup' => 'text',
]
]
];
require_once('tiki-setup.php');
// temporary patch: tiki_p_admin includes tiki_p_admin_users but if you don't
// clean the temp/cache each time you sqlupgrade the perms setting is not
// synchronous with the cache
$access = TikiLib::lib('access');
$access->check_permission(['tiki_p_admin_users']);
if ($tiki_p_admin != 'y') {
$userGroups = $userlib->get_user_groups_inclusion($user);
$smarty->assign_by_ref('userGroups', $userGroups);
} else {
$userGroups = [];
}
/**
* @param $u
* @param $reason
* @return mixed
*/
function discardUser($u, $reason)
{
$u['reason'] = $reason;
return $u;
}
function batchImportUsers()
{
global $tiki_p_admin, $prefs, $userGroups;
$userlib = TikiLib::lib('user');
$tikilib = TikiLib::lib('tiki');
$smarty = TikiLib::lib('smarty');
$logslib = TikiLib::lib('logs');
$access = TikiLib::lib('access');
$fname = $_FILES['csvlist']['tmp_name'];
$fhandle = fopen($fname, 'r');
$fields = fgetcsv($fhandle, 1000);
if (! $fields[0]) {
$errors[] = tra('The file has incorrect syntax or is not a CSV file');
}
if (! in_array('login', $fields) || ! in_array('email', $fields) || ! in_array('password', $fields)) {
$errors[] = tra('The file does not have the required header:') . ' login, password, email';
}
if (! empty($errors)) {
Feedback::error(['mes' => $errors]);
$access->redirect('tiki-adminusers.php');
die;
}
while (! feof($fhandle)) {
$data = fgetcsv($fhandle, 1000);
if (empty($data)) {
continue;
}
$temp_max = count($fields);
for ($i = 0; $i < $temp_max; $i++) {
if (
$fields[$i] == 'login'
&& function_exists('mb_detect_encoding')
&& mb_detect_encoding($data[$i], 'ASCII, UTF-8, ISO-8859-1') == 'ISO-8859-1'
) {
$data[$i] = utf8_encode($data[$i]);
}
@$ar[$fields[$i]] = $data[$i];
}
$userrecs[] = $ar;
}
fclose($fhandle);
if (empty($userrecs) or ! is_array($userrecs)) {
Feedback::error(tra('No records were found. Check the file please!'));
$access->redirect('tiki-adminusers.php');
die;
}
// whether to force password change on first login or not
$pass_first_login = (isset($_REQUEST['forcePasswordChange']) && $_REQUEST['forcePasswordChange'] == 'on');
$added = 0;
$errors = [];
$discarded = [];
foreach ($userrecs as $u) {
$local = [];
$exist = false;
if ($prefs['feature_intertiki'] == 'y' && ! empty($prefs['feature_intertiki_mymaster'])) {
if (empty($u['login']) && empty($u['email'])) {
$local[] = discardUser($u, tra('User login or email is required'));
} else { // pick up the info on the master
$info = $userlib->interGetUserInfo(
$prefs['interlist'][$prefs['feature_intertiki_mymaster']],
empty($u['login']) ? '' : $u['login'],
empty($u['email']) ? '' : $u['email']
);
if (empty($info)) {
$local[] = discardUser($u, tra('User does not exist on master'));
} else {
$u['login'] = $info['login'];
$u['email'] = $info['email'];
}
}
} else {
if (empty($u['login'])) {
$local[] = discardUser($u, tra('User login is required'));
}
if (empty($u['password'])) {
$u['password'] = $tikilib->genPass();
}
if (empty($u['email'])) {
$local[] = discardUser($u, tra('Email is required'));
}
}
if (! empty($local)) {
$discarded = array_merge($discarded, $local);
continue;
}
if ($userlib->user_exists($u['login'])) { // exist on local
$exist = true;
}
if ($exist && $_REQUEST['overwrite'] == 'n') {
$discarded[] = discardUser($u, tra('User is duplicated'));
continue;
}
if (! $exist) {
if (! empty($_REQUEST['notification'])) {
$apass = md5($tikilib->genPass());
} else {
$apass = '';
}
$u['login'] = $userlib->add_user(
$u['login'],
$u['password'],
$u['email'],
$pass_first_login ? $u['password'] : '',
$pass_first_login,
$apass,
null,
(! empty($_REQUEST['notification']) ? 'u' : null)
);
global $user;
$logslib->add_log('adminusers', sprintf(tra('Created account %s <%s>'), $u['login'], $u['email']), $user);
if (! empty($_REQUEST['notification'])) {
$realpass = $pass_first_login ? '' : $u['password'];
$userlib->send_validation_email($u['login'], $apass, $u['email'], '', '', '', 'user_creation_validation_mail', $realpass);
}
}
$userlib->set_user_fields($u);
if ($exist && isset($_REQUEST['overwriteGroup'])) {
$userlib->remove_user_from_all_groups($u['login']);
}
if (! empty($u['groups'])) {
$grps = preg_split('/(?<!,),(?!,)/', $u['groups']);
foreach ($grps as $grp) {
$grp = preg_replace('/,,/', ',', preg_replace('/^ *(.*) *$/u', "$1", $grp));
$existg = false;
if ($userlib->group_exists($grp)) {
$existg = true;
} elseif (! empty($_REQUEST['createGroup']) && $userlib->add_group($grp)) {
$existg = true;
}
if (! $existg) {
$err = tra('Unknown') . ": $grp";
if (! in_array($err, $errors)) {
$errors[] = $err;
}
} elseif ($tiki_p_admin != 'y' && ! array_key_exists($grp, $userGroups)) {
$smarty->assign('errortype', 401);
$err = tra('Permission denied') . ": $grp";
if (! in_array($err, $errors)) {
$errors[] = $err;
}
} else {
$userlib->assign_user_to_group($u['login'], $grp);
$logslib->add_log('perms', sprintf(tra('Assigned %s in group %s'), $u['login'], $grp), $user);
}
}
}
if (! empty($u['default_group'])) {
if ($userlib->group_exists($u['default_group'])) {
$userlib->set_default_group($u['login'], $u['default_group']);
} else {
$errors[] = tr('Unknown default group: "%0" for user "%1"', $u['default_group'], $u['login']);
}
}
if (! empty($u['realName'])) {
$tikilib->set_user_preference($u['login'], 'realName', $u['realName']);
}
$added++;
}
Feedback::success(tr('Users added:') . ' ' . $added);
if (count($discarded)) {
foreach ($discarded as $key => $value) {
$df[] = $discarded[$key]['login'] . ' (' . $discarded[$key]['reason'] . ')';
}
Feedback::warning(['mes' => $df, 'title' => tr('%0 users not added', count($discarded))]);
}
if (count($errors)) {
$errors = array_unique($errors);
Feedback::error(['mes' => $errors]);
}
}
$auto_query_args = [
'offset',
'numrows',
'find',
'filterEmail',
'sort_mode',
'initial',
'filterGroup'
];
if (isset($_REQUEST['batch']) && is_uploaded_file($_FILES['csvlist']['tmp_name']) && $access->checkCsrf()) {
batchImportUsers();
// Process the form to add a user here
} elseif (isset($_REQUEST['newuser']) && $access->checkCsrf()) {
$AddUser = true;
;
// if email validation set check if email addr is set
if (
$prefs['login_is_email'] != 'y' && isset($_REQUEST['need_email_validation']) &&
empty($_REQUEST['email'])
) {
$errors[] = tra('Email validation requested but email address not set');
$AddUser = false;
}
if ($_REQUEST['pass'] != $_REQUEST['passAgain']) {
$errors[] = tra('The passwords do not match');
$AddUser = false;
} elseif (empty($_REQUEST['pass']) && empty($_REQUEST['genepass'])) {
$errors[] = tra('Password not set');
$AddUser = false;
}
$newPass = $_POST['pass'] ? $_POST['pass'] : $_POST['genepass'];
// Check if the user already exists
if ($userlib->user_exists($_REQUEST['login'])) {
$errors[] = sprintf(tra('User %s already exists'), $_REQUEST['login']);
$AddUser = false;
}
if ($prefs['login_is_email'] == 'y' && ! validate_email($_REQUEST['login'])) {
$errors[] = tra('Invalid email') . ' ' . $_REQUEST['login'];
$AddUser = false;
}
if (! empty($prefs['username_pattern']) && ! preg_match($prefs['username_pattern'], $_REQUEST['login'])) {
$errors[] = tra('User login contains invalid characters.');
$AddUser = false;
}
if ($prefs['login_is_email'] == 'y' && strlen($_REQUEST['login'])>200) {
$errors[] = sprintf(tra('Username %s must be less than 200 characters.'),$_REQUEST['login']);
$AddUser = false;
}
if ($prefs['login_is_email'] == 'n' && (strlen($_REQUEST['login'])>$prefs['max_username_length'] || strlen($_REQUEST['login'])<$prefs['min_username_length'])) {
$errors[] = sprintf(tra('Username %s must be less than %s characters and more than %s character(s).'),$_REQUEST['login'],$prefs['max_username_length'],$prefs['min_username_length']);
$AddUser = false;
}
// end verify newuser info
if ($AddUser) {
$pass_first_login = (isset($_REQUEST['pass_first_login']) && $_REQUEST['pass_first_login'] == 'on');
$polerr = $userlib->check_password_policy($newPass);
if (strlen($polerr) > 0) {
Feedback::error(['mes' => $polerr]);
} else {
if ($prefs['login_is_email'] == 'y' and empty($_REQUEST['email'])) {
$_REQUEST['email'] = $_REQUEST['login'];
}
$send_validation_email = false;
if (isset($_REQUEST['need_email_validation']) && $_REQUEST['need_email_validation'] == 'on') {
$send_validation_email = true;
$apass = md5($tikilib->genPass());
} else {
$apass = '';
}
if (
$_REQUEST['login'] = $userlib->add_user(
$_REQUEST['login'],
$newPass,
$_REQUEST['email'],
$pass_first_login ? $newPass : '',
$pass_first_login,
$apass,
null,
($send_validation_email ? 'u' : null)
)
) {
$feedback = sprintf(tra('New user created with username %s.'), $_REQUEST['login']);
Feedback::success($feedback);
$logslib->add_log('adminusers', $feedback, $user);
if ($send_validation_email) {
// No need to send credentials in mail if the user is forced to choose a new password after validation
$realpass = $pass_first_login ? '' : $newPass;
$userlib->send_validation_email(
$_REQUEST['login'],
$apass,
$_REQUEST['email'],
'',
'',
'',
'user_creation_validation_mail',
$realpass
);
}
if ($prefs['userTracker'] === 'y' && ! empty($_REQUEST['insert_user_tracker_item'])) {
TikiLib::lib('header')->add_jq_onready('setTimeout(function () { $(".insert-usertracker").click(); });');
$_REQUEST['user'] = $userlib->get_user_id($_REQUEST['login']);
$cookietab = '2';
} else {
$cookietab = '1';
$_REQUEST['find'] = $_REQUEST['login'];
}
} else {
$errors[] = sprintf(
tra('Impossible to create new %s with %s %s.'),
tra('user'),
tra('username'),
$_REQUEST['login']
);
}
}
}
$cookietab = 1;
} elseif (isset($_REQUEST['action'])) {
if ($_REQUEST['action'] == 'email_due' && isset($_REQUEST['user']) && $access->checkCsrf()) {
$result = $userlib->reset_email_due($_REQUEST['user']);
if ($result->numRows()) {
Feedback::success(tr('User account %0 has been invalidated by the admin', $_REQUEST['user']));
} else {
Feedback::error(tr('An error occurred - the user account %0 has not been invalidated by the admin', $_REQUEST['user']));
}
}
if (
$_REQUEST['action'] == 'remove_openid' && isset($_REQUEST['userId'])
&& $access->checkCsrf(true)
) {
$result = $userlib->remove_openid_link($_REQUEST['userId']);
if ($result->numRows()) {
Feedback::success(tr('Link to OpenID for user %0 has been removed', $_REQUEST['user']));
} else {
Feedback::error(tr('An error occurred - the link to OpenID for user %0 has not been removed', $_REQUEST['user']));
}
}
$_REQUEST['user'] = '';
}
if (! isset($_REQUEST['sort_mode'])) {
$sort_mode = 'login_asc';
} else {
$sort_mode = $_REQUEST['sort_mode'];
}
$smarty->assign_by_ref('sort_mode', $sort_mode);
if (empty($_REQUEST['numrows'])) {
$numrows = $maxRecords;
} else {
$numrows = $_REQUEST['numrows'];
}
$smarty->assign_by_ref('numrows', $numrows);
if (empty($_REQUEST['offset'])) {
$offset = 0;
} else {
$offset = $_REQUEST['offset'];
}
$smarty->assign_by_ref('offset', $offset);
if (isset($_REQUEST['initial'])) {
$initial = $_REQUEST['initial'];
} else {
$initial = '';
}
$smarty->assign('initial', $initial);
if (isset($_REQUEST['find'])) {
$find = $_REQUEST['find'];
} else {
$find = '';
}
$smarty->assign('find', $find);
if (isset($_REQUEST['filterGroup'])) {
$filterGroup = $_REQUEST['filterGroup'];
} else {
$filterGroup = '';
}
$smarty->assign('filterGroup', $filterGroup);
if (isset($_REQUEST['filterEmail'])) {
$filterEmail = $_REQUEST['filterEmail'];
} else {
$filterEmail = '';
}
$smarty->assign('filterEmail', $filterEmail);
list($username, $usermail, $usersTrackerId, $chlogin) = ['', '', '', false];
$trklib = TikiLib::lib('trk');
if (isset($_REQUEST['user']) and $_REQUEST['user']) {
if (! is_numeric($_REQUEST['user'])) {
$_REQUEST['user'] = $userlib->get_user_id($_REQUEST['user']);
}
$userinfo = $userlib->get_userid_info($_REQUEST["user"]);
$cookietab = '2';
// If login is e-mail, email field needs to be the same as name (and is generally not send)
if ($prefs['login_is_email'] == 'y' && isset($_POST['login'])) {
$_POST['email'] = $_POST['login'];
}
if (
isset($_POST['edituser']) and isset($_POST['login']) and isset($_POST['email'])
&& $access->checkCsrf(true)
) {
if (! empty($_POST['login'])) {
if ($prefs['login_is_email'] == 'y' && strlen($_REQUEST['login'])>200 && ($userinfo['login'] != $_POST['login'] || $userinfo['email'] != $_POST['email'])) {
$errors[] = sprintf(tra('Username %s must be less than 200 characters.'),$_REQUEST['login']);
}
elseif ($prefs['login_is_email'] == 'n' && (strlen($_REQUEST['login'])>$prefs['max_username_length'] || strlen($_REQUEST['login'])<$prefs['min_username_length']) && $userinfo['login'] != $_POST['login']) {
$errors[] = sprintf(tra('Username %s must be less than %s characters and more than %s character(s).'),$_REQUEST['login'],$prefs['max_username_length'],$prefs['min_username_length']);
} else {
if ($userinfo['login'] != $_POST['login'] && $userinfo['login'] != 'admin') {
if ($userlib->user_exists($_POST['login'])) {
$errors[] = tra('User already exists');
} elseif (!empty($prefs['username_pattern']) && !preg_match($prefs['username_pattern'], $_POST['login'])) {
$errors[] = tra('User login contains invalid characters.');
} elseif ($userlib->change_login($userinfo['login'], $_POST['login'])) {
Feedback::success(sprintf(
tra('%s changed from %s to %s'),
tra('Username'),
$userinfo['login'],
$_POST['login']
));
$logslib->add_log(
'adminusers',
'changed login for ' . $_POST['login'] . ' from ' . $userinfo['login'] . ' to ' . $_POST['login'],
$user
);
$userinfo['login'] = $_POST['login'];
} else {
$errors[] = sprintf(
tra("Unable to change %s from %s to %s"),
tra('login'),
$userinfo['login'],
$_POST['login']
);
}
}
}
}
$pass_first_login = (isset($_REQUEST['pass_first_login']) && $_REQUEST['pass_first_login'] == 'on');
if ((isset($_POST['pass']) && $_POST["pass"]) || $pass_first_login || (isset($_POST['genepass']) && $_POST['genepass'])) {
if ($_POST['pass'] != $_POST['passAgain']) {
Feedback::error(tra('The passwords do not match'));
}
if ($tiki_p_admin == 'y' || $tiki_p_admin_users == 'y' || $userinfo['login'] == $user) {
$newPass = $_POST['pass'] ? $_POST['pass'] : $_POST['genepass'];
$polerr = $userlib->check_password_policy($newPass);
if (strlen($polerr) > 0 && ! $pass_first_login) {
Feedback::error($polerr);
} else {
if ($userlib->change_user_password($userinfo['login'], $newPass, $pass_first_login)) {
Feedback::success(sprintf(tra('%s modified successfully.'), tra('password')));
$logslib->add_log('adminusers', 'changed password for ' . $_POST['login'], $user);
} else {
$errors[] = sprintf(tra('%s modification failed.'), tra('password'));
}
}
}
}
if ($userinfo['email'] != $_POST['email']) {
if ($userlib->change_user_email($userinfo['login'], $_POST['email'], '')) {
if ($prefs['login_is_email'] != 'y') {
Feedback::success(sprintf(
tra('%s changed from %s to %s'),
tra('Email'),
$userinfo['email'],
$_POST['email']
));
$logslib->add_log('adminusers', 'changed email for' . $_POST['login'] . ' from ' . $userinfo['email'] . ' to ' . $_POST['email'], $user);
}
$userinfo['email'] = $_POST['email'];
} else {
$errors[] = sprintf(tra('Impossible to change %s from %s to %s'), tra('email'), $userinfo['email'], $_POST['email']);
}
}
// check need_email_validation
if (! empty($_POST['login']) && ! empty($_POST['email']) && ! empty($_POST['need_email_validation'])) {
$userlib->invalidate_account($_POST['login']);
$userinfo = $userlib->get_user_info($_POST['login']);
$userlib->send_validation_email($_POST['login'], $userinfo['valid'], $_POST['email'], 'y');
}
$cookietab = '1';
}
if ($prefs['userTracker'] == 'y') {
$re = $userlib->get_usertracker($_REQUEST['user']);
if ($re['usersTrackerId']) {
$trklib = TikiLib::lib('trk');
$userstrackerid = $re['usersTrackerId'];
$smarty->assign('userstrackerid', $userstrackerid);
$usersFields = $trklib->list_tracker_fields($usersTrackerId, 0, -1, 'position_asc', '');
$smarty->assign_by_ref('usersFields', $usersFields['data']);
if (isset($re['usersFieldId']) and $re['usersFieldId']) {
$usersfieldid = $re['usersFieldId'];
$smarty->assign('usersfieldid', $usersfieldid);
$usersitemid = $trklib->get_item_id($userstrackerid, $usersfieldid, $re['user']);
$smarty->assign('usersitemid', $usersitemid);
if (empty($usersitemid)) { // calculate the user field forced value for item insert dialog
$usersfield = $trklib->get_tracker_field($usersfieldid);
$usersTrackerForced = [$usersfield['permName'] => $userinfo['login']];
$smarty->assign('usersTrackerForced', $usersTrackerForced);
}
}
}
}
if ($prefs['email_due'] > 0) {
$userinfo['daysSinceEmailConfirm'] = floor(($userlib->now - $userinfo['email_confirm']) / (60 * 60 * 24));
}
} else {
//For to get informations entered and placed in the fields
if (isset($_REQUEST['login'])) {
$userinfo['login'] = strip_tags((trim($_REQUEST['login'])));
}
if (isset($_REQUEST['email'])) {
$userinfo['email'] = strip_tags((trim($_REQUEST['email'])));
}
$userinfo['created'] = $tikilib->now;
$userinfo['registrationDate'] = '';
$userinfo['age'] = '';
$userinfo['currentLogin'] = '';
$userinfo['editable'] = true;
$_REQUEST['user'] = 0;
}
$all_groups = $userlib->list_all_groups();
//get users
$users = $userlib->get_users(
$offset,
$numrows,
$sort_mode,
$find,
$initial,
true,
$filterGroup,
$filterEmail,
! empty($_REQUEST['filterEmailNotConfirmed']),
! empty($_REQUEST['filterNotValidated']),
! empty($_REQUEST['filterNeverLoggedIn'])
);
if ($prefs['userTracker'] === 'y') {
foreach ($users['data'] as &$u) {
$userTrackerInfo = $userlib->get_usertracker($u['userId']);
if ($userTrackerInfo && $userTrackerInfo['usersTrackerId']) {
$u['itemId'] = $trklib->get_item_id($userTrackerInfo['usersTrackerId'], $userTrackerInfo['usersFieldId'], $u['login']);
}
}
}
$smarty->assign_by_ref('users', $users['data']);
$smarty->assign_by_ref('cant', $users['cant']);
if (isset($_REQUEST['add'])) {
$cookietab = '2';
}
//add tablesorter sorting and filtering
$ts = Table_Check::setVars('adminusers', true);
if ($ts['enabled'] && ! $ts['ajax']) {
//delete anonymous out of group list used for dropdown
$ts_groups = array_flip($all_groups);
unset($ts_groups['Anonymous']);
$ts_groups = array_flip($ts_groups);
//set tablesorter code
Table_Factory::build(
'TikiAdminusers',
[
'id' => $ts['tableid'],
'total' => $users['cant'],
'columns' => [
'#groups' => [
'filter' => [
'options' => $ts_groups
]
]
],
]
);
}
if (count($errors) > 0) {
Feedback::error(['mes' => $errors]);
}
$smarty->assign_by_ref('all_groups', $all_groups);
$smarty->assign('userinfo', $userinfo);
$smarty->assign('userId', $_REQUEST['user']);
$smarty->assign('username', $username);
$smarty->assign('usermail', $usermail);
// disallow robots to index page:
$smarty->assign('metatag_robots', 'NOINDEX, NOFOLLOW');
$smarty->assign('mid', 'tiki-adminusers.tpl');
if ($ts['ajax']) {
$smarty->display('tiki-adminusers.tpl');
} else {
$smarty->display('tiki.tpl');
}