qemudb/account.php

<?php
/**
 * Account login/logout handler.
 *
 * Mandatory parameters:
 *  - sCmd, action to perform ("new", "do_new", "login", "do_login", "send_passwd", "logout")
 * 
 * Optional parameters:
 *  - sUserPassword, new password
 *  - sUserPassword2, new password confirmation
 *  - sUserEmail, e-mail address
 *  - sUserRealname, user's real name
 *  - sWineRelease, user's Wine release
 *
 * TODO:
 *  - replace sCmd with iAction and replace "new", "login", etc. with integer constants NEW, LOGIN, etc.
 *  - move functions into their respective modules (probably static methods of user class)
 */

// application environment
require("path.php");
require(BASE."include/incl.php");
require_once(BASE."include/mail.php");

// set http header to not cache
header("Pragma: no-cache");
header("Cache-control: no-cache");

// process command
do_account($aClean['sCmd']);


/**
 * process according to $sCmd from URL
 */
function do_account($sCmd = null)
{
    if (!$sCmd) return 0;
    switch($sCmd)
    {
        case "new":
            apidb_header("New Account");
            include(BASE."include/"."form_new.php");
            apidb_footer();
            exit;

        case "do_new":
            cmd_do_new();
            exit;

        case "login":
            apidb_header("Login");
            include(BASE."include/"."form_login.php");
            apidb_footer();
            exit;

        case "do_login":
            cmd_do_login();
            exit;

        case "send_passwd":
            cmd_send_passwd();
            exit;

        case "logout":
            /* if we are logged in, log us out */
            if($_SESSION['current'])
                $_SESSION['current']->logout();

            util_redirect_and_exit(apidb_fullurl("index.php"));
    }
    // not valid command, display error page
    util_show_error_page_and_exit("Internal Error","This module was called with incorrect parameters");
}

/**
 * retry
 */
function retry($sCmd, $sMsg)
{
    addmsg($sMsg, "red");
    do_account($sCmd);
}


/**
 * create new account
 */
function cmd_do_new()
{
    global $aClean;

    if(!ereg("^.+@.+\\..+$", $aClean['sUserEmail']))
    {
        $aClean['sUserEmail'] = "";
        retry("new", "Invalid email address");
        return;
    }
    if(empty($aClean['sUserRealname']))
    {
        retry("new", "You don't have a Real name?");
        return;
    }
   
    $oUser = new User();
    $sPassword =  substr(base_convert(rand(0, PHP_INT_MAX),10, 36), 0, 9);
    $iResult = $oUser->create($aClean['sUserEmail'], $sPassword,
                              $aClean['sUserRealname'], $aClean['sWineRelease'] );

    if($iResult == SUCCESS)
    {
        mail_appdb($oUser->sEmail, "New account", "Your password is ".$sPassword);
        util_redirect_and_exit(apidb_fullurl());
    }
    else if($iResult == USER_CREATE_EXISTS)
    {
        addmsg("An account with this e-mail exists already.", "red");
        retry("new", "Failed to create account");
    } else if($iResult = USER_CREATE_FAILED)
    {
        addmsg("Error while creating a new user.", "red");
        retry("new", "Failed to create account");
    } else
    {
        addmsg("Unknown failure while creating new user.  Please report this problem to OS DB admins.", "red");
        retry("new", "Failed to create account");
    }
}


/**
 * email lost password
 */
function cmd_send_passwd()
{
    global $aClean;
 
    /* if the user didn't enter any email address we should */
    /* ask them to */
    if($aClean['sUserEmail'] == "")
    {
        addmsg("Please enter your email address in the 'E-mail' field and re-request a new password",
               "green");
        util_redirect_and_exit(apidb_fullurl("account.php?sCmd=login"));
    }

/*
    $shNote = '(<b>Note</b>: accounts for the OS DB and <b>bugs</b>.claunia.com '
           .'are separated, so You might need to <b>create second</b> account for OS DB.)';
*/
    $shNote = '';
		
    $iUserId = User::exists($aClean['sUserEmail']);
    $sPasswd = User::generate_passwd();
    $oUser = new User($iUserId);
    if ($iUserId)
    {
    	if ($oUser->update_password($sPasswd))
        {
            $sSubject =  "OS DB Lost Password";
            $sMsg  = "We have received a request that you lost your password.\r\n";
            $sMsg .= "We will create a new password for you. You can then change\r\n";
            $sMsg .= "your password at the Preferences screen.\r\n";
            $sMsg .= "Your new password is: ".$sPasswd."\r\n";
            

            if (mail_appdb($oUser->sEmail, $sSubject ,$sMsg))
            {
                addmsg("Your new password has been emailed to you.", "green");
            }
            else
            {
                addmsg("Your password has changed, but we could not email it to you. Contact Support (".APPDB_OWNER_EMAIL.") !", "red");
            }
        }
        else
        {
            addmsg("Internal Error, we could not update your password.", "red");
        }
    }
    else
    {
        addmsg("Sorry, that user (".$aClean['sUserEmail'].") does not exist.<br><br>"
               .$shNote, "red");
    }
    
    util_redirect_and_exit(apidb_fullurl("account.php?sCmd=login"));
}

/**
 * on login handler
 */
function cmd_do_login()
{
    global $aClean;

    $oUser = new User();
    $iResult = $oUser->login($aClean['sUserEmail'], $aClean['sUserPassword']);

    if($iResult == SUCCESS)
    {
        $sReturnUrl = urldecode($aClean['sReturnTo']);
        if(!$sReturnUrl)
            $sReturnUrl = apidb_fullurl("index.php");
        addmsg("You are successfully logged in as '$oUser->sRealname'.", "green");
        util_redirect_and_exit($sReturnUrl);
    } else
    {
        retry("login","Login failed ".$shNote);
    }
}

?>