/**
 * 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;
}