/** * Check validity of user/password/entity * If test is ko, reason must be filled into $_SESSION["dol_loginmesg"] * * @param string $usertotest Login * @param string $passwordtotest Password * @param int $entitytotest Number of instance (always 1 if module multicompany not enabled) * @return string Login if OK, '' if KO */ function check_user_password_dolibarr($usertotest, $passwordtotest, $entitytotest = 1) { global $db, $conf, $langs; global $mc; dol_syslog("functions_dolibarr::check_user_password_dolibarr usertotest=" . $usertotest); $login = ''; if (!empty($usertotest)) { try { $host = substr($conf->couchdb->host, 7); $client = new couchClient('http://' . $usertotest . ':' . $passwordtotest . '@' . $host . ':' . $conf->couchdb->port . '/', $conf->couchdb->name, array("cookie_auth" => TRUE)); $_SESSION['couchdb'] = $client->getSessionCookie(); } catch (Exception $e) { print $e->getMessage(); exit; } if (strlen($_SESSION['couchdb']) < 15) { sleep(1); $langs->load('main'); $langs->load('errors'); $_SESSION["dol_loginmesg"] = $langs->trans("ErrorBadLoginPassword"); } else { $login = $usertotest; } } return $login; }