/**
 * @file llprogressview.cpp
 * @brief LLProgressView class implementation
 *
 * $LicenseInfo:firstyear=2002&license=viewerlgpl$
 * Second Life Viewer Source Code
 * Copyright (C) 2010, Linden Research, Inc.
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation;
 * version 2.1 of the License only.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
 *
 * Linden Research, Inc., 945 Battery Street, San Francisco, CA  94111  USA
 * $/LicenseInfo$
 */

#include "llviewerprecompiledheaders.h"

#include "llprogressview.h"

#include "indra_constants.h"
#include "llmath.h"
#include "llgl.h"
#include "llrender.h"
#include "llui.h"
#include "llfontgl.h"
#include "lltimer.h"
#include "lltextbox.h"
#include "llglheaders.h"

#include "llagent.h"
#include "llbutton.h"
#include "llcallbacklist.h"
#include "llfocusmgr.h"
#include "llnotifications.h"
#include "llprogressbar.h"
#include "llstartup.h"
#include "llviewercontrol.h"
#include "llviewertexturelist.h"
#include "llviewerwindow.h"
#include "llappviewer.h"
#include "llweb.h"
#include "lluictrlfactory.h"
#include "llpanellogin.h"

LLProgressView* LLProgressView::sInstance = NULL;

S32 gStartImageWidth = 1;
S32 gStartImageHeight = 1;
const F32 FADE_TO_WORLD_TIME = 1.0f;

static LLPanelInjector<LLProgressView> r("progress_view");

// XUI: Translate
LLProgressView::LLProgressView()
:   LLPanel(),
    mPercentDone( 0.f ),
    mMediaCtrl( NULL ),
    mMouseDownInActiveArea( false ),
    mUpdateEvents("LLProgressView"),
    mFadeToWorldTimer(),
    mFadeFromLoginTimer(),
    mStartupComplete(false)
{
    mUpdateEvents.listen("self", boost::bind(&LLProgressView::handleUpdate, this, _1));
    mFadeToWorldTimer.stop();
    mFadeFromLoginTimer.stop();
}

bool LLProgressView::postBuild()
{
    mProgressBar = getChild<LLProgressBar>("login_progress_bar");

    mProgressText = getChild<LLTextBox>("progress_text");
    mMessageText = getChild<LLTextBox>("message_text");
    mMessageTextRectInitial = mMessageText->getRect(); // auto resizes, save initial size

    // media control that is used to play intro video
    mMediaCtrl = getChild<LLMediaCtrl>("login_media_panel");
    mMediaCtrl->setVisible( false );        // hidden initially
    mMediaCtrl->addObserver( this );        // watch events

    LLViewerMedia::getInstance()->setOnlyAudibleMediaTextureID(mMediaCtrl->getTextureID());

    mCancelBtn = getChild<LLButton>("cancel_btn");
    mCancelBtn->setClickedCallback(  LLProgressView::onCancelButtonClicked, NULL );

    mLayoutPanel4 = getChild<LLView>("panel4");
    mLayoutPanel4RectInitial = mLayoutPanel4->getRect();

    mLayoutMOTD = getChild<LLView>("panel_motd");
    mLayoutMOTDRectInitial = mLayoutMOTD->getRect();

    getChild<LLTextBox>("title_text")->setText(LLStringExplicit(LLAppViewer::instance()->getSecondLifeTitle()));

    getChild<LLTextBox>("message_text")->setClickedCallback(onClickMessage, this);

    // hidden initially, until we need it
    setVisible(false);

    LLNotifications::instance().getChannel("AlertModal")->connectChanged(boost::bind(&LLProgressView::onAlertModal, this, _1));

    sInstance = this;
    return true;
}


LLProgressView::~LLProgressView()
{
    // Just in case something went wrong, make sure we deregister our idle callback.
    gIdleCallbacks.deleteFunction(onIdle, this);

    gFocusMgr.releaseFocusIfNeeded( this );

    sInstance = NULL;
}

bool LLProgressView::handleHover(S32 x, S32 y, MASK mask)
{
    if( childrenHandleHover( x, y, mask ) == NULL )
    {
        gViewerWindow->setCursor(UI_CURSOR_WAIT);
    }
    return true;
}


bool LLProgressView::handleKeyHere(KEY key, MASK mask)
{
    // Suck up all keystokes except CTRL-Q.
    if( ('Q' == key) && (MASK_CONTROL == mask) )
    {
        LLAppViewer::instance()->userQuit();
    }
    return true;
}

void LLProgressView::revealIntroPanel()
{
    // if user hasn't yet seen intro video
    std::string intro_url = gSavedSettings.getString("PostFirstLoginIntroURL");
    if ( intro_url.length() > 0 &&
            gSavedSettings.getBOOL("BrowserJavascriptEnabled") &&
            !gSavedSettings.getBOOL("PostFirstLoginIntroViewed"))
    {
        // hide the progress bar
        getChild<LLView>("stack1")->setVisible(false);

        // navigate to intro URL and reveal widget
        mMediaCtrl->navigateTo( intro_url );
        mMediaCtrl->setVisible( true );


        // flag as having seen the new user post login intro
        gSavedSettings.setBOOL("PostFirstLoginIntroViewed", true );

        mMediaCtrl->setFocus(true);
    }

    mFadeFromLoginTimer.start();
    gIdleCallbacks.addFunction(onIdle, this);
}

void LLProgressView::setStartupComplete()
{
    mStartupComplete = true;

    // if we are not showing a video, fade into world
    if (!mMediaCtrl->getVisible())
    {
        mFadeFromLoginTimer.stop();
        mFadeToWorldTimer.start();
    }
}

void LLProgressView::setVisible(bool visible)
{
    if (!visible && mFadeFromLoginTimer.getStarted())
    {
        mFadeFromLoginTimer.stop();
    }
    // hiding progress view
    if (getVisible() && !visible)
    {
        LLPanel::setVisible(false);
    }
    // showing progress view
    else if (visible && (!getVisible() || mFadeToWorldTimer.getStarted()))
    {
        setFocus(true);
        mFadeToWorldTimer.stop();
        LLPanel::setVisible(true);
    }
}


void LLProgressView::drawStartTexture(F32 alpha)
{
    gGL.pushMatrix();
    if (gStartTexture)
    {
        LLGLSUIDefault gls_ui;
        gGL.getTexUnit(0)->bind(gStartTexture.get());
        gGL.color4f(1.f, 1.f, 1.f, alpha);
        F32 image_aspect = (F32)gStartImageWidth / (F32)gStartImageHeight;
        S32 width = getRect().getWidth();
        S32 height = getRect().getHeight();
        F32 view_aspect = (F32)width / (F32)height;
        // stretch image to maintain aspect ratio
        if (image_aspect > view_aspect)
        {
            gGL.translatef(-0.5f * (image_aspect / view_aspect - 1.f) * width, 0.f, 0.f);
            gGL.scalef(image_aspect / view_aspect, 1.f, 1.f);
        }
        else
        {
            gGL.translatef(0.f, -0.5f * (view_aspect / image_aspect - 1.f) * height, 0.f);
            gGL.scalef(1.f, view_aspect / image_aspect, 1.f);
        }
        gl_rect_2d_simple_tex( getRect().getWidth(), getRect().getHeight() );
        gGL.getTexUnit(0)->unbind(LLTexUnit::TT_TEXTURE);
    }
    else
    {
        gGL.getTexUnit(0)->unbind(LLTexUnit::TT_TEXTURE);
        gGL.color4f(0.f, 0.f, 0.f, 1.f);
        gl_rect_2d(getRect());
    }
    gGL.popMatrix();
}

void LLProgressView::draw()
{
    static LLTimer timer;

    if (mFadeFromLoginTimer.getStarted())
    {
        F32 alpha = clamp_rescale(mFadeFromLoginTimer.getElapsedTimeF32(), 0.f, FADE_TO_WORLD_TIME, 0.f, 1.f);
        LLViewDrawContext context(alpha);

        if (!mMediaCtrl->getVisible())
        {
            drawStartTexture(alpha);
        }

        LLPanel::draw();
        return;
    }

    // handle fade out to world view when we're asked to
    if (mFadeToWorldTimer.getStarted())
    {
        // draw fading panel
        F32 alpha = clamp_rescale(mFadeToWorldTimer.getElapsedTimeF32(), 0.f, FADE_TO_WORLD_TIME, 1.f, 0.f);
        LLViewDrawContext context(alpha);

        drawStartTexture(alpha);
        LLPanel::draw();

        // faded out completely - remove panel and reveal world
        if (mFadeToWorldTimer.getElapsedTimeF32() > FADE_TO_WORLD_TIME )
        {
            mFadeToWorldTimer.stop();

            LLViewerMedia::getInstance()->setOnlyAudibleMediaTextureID(LLUUID::null);

            // Fade is complete, release focus
            gFocusMgr.releaseFocusIfNeeded( this );

            // turn off panel that hosts intro so we see the world
            setVisible(false);

            // stop observing events since we no longer care
            mMediaCtrl->remObserver( this );

            // hide the intro
            mMediaCtrl->setVisible( false );

            // navigate away from intro page to something innocuous since 'unload' is broken right now
            //mMediaCtrl->navigateTo( "about:blank" );

            // FIXME: this causes a crash that i haven't been able to fix
            mMediaCtrl->unloadMediaSource();

            releaseTextures();
        }
        return;
    }

    drawStartTexture(1.0f);
    // draw children
    LLPanel::draw();
}

void LLProgressView::setText(const std::string& text)
{
    mProgressText->setValue(text);
}

void LLProgressView::setPercent(const F32 percent)
{
    mProgressBar->setValue(percent);
}

void LLProgressView::setMessage(const std::string& msg)
{
    mMessage = msg;
    mMessageText->setValue(mMessage);
    S32 height = mMessageText->getTextPixelHeight();
    S32 delta  = height - mMessageTextRectInitial.getHeight();
    if (delta > 0)
    {
        mLayoutPanel4->reshape(mLayoutPanel4RectInitial.getWidth(), mLayoutPanel4RectInitial.getHeight() + delta);
        mLayoutMOTD->reshape(mLayoutMOTDRectInitial.getWidth(), mLayoutMOTDRectInitial.getHeight() + delta);
    }
    else
    {
        mLayoutPanel4->reshape(mLayoutPanel4RectInitial.getWidth(), mLayoutPanel4RectInitial.getHeight());
        mLayoutMOTD->reshape(mLayoutMOTDRectInitial.getWidth(), mLayoutMOTDRectInitial.getHeight());
    }
}

void LLProgressView::initStartTexture(S32 location_id, bool is_in_production)
{
    if (gStartTexture.notNull())
    {
        gStartTexture = NULL;
        LL_INFOS("AppInit") << "re-initializing start screen" << LL_ENDL;
    }

    LL_DEBUGS("AppInit") << "Loading startup bitmap..." << LL_ENDL;

    U8 image_codec = IMG_CODEC_PNG;
    std::string temp_str = gDirUtilp->getLindenUserDir() + gDirUtilp->getDirDelimiter();

    if ((S32)START_LOCATION_ID_LAST == location_id)
    {
        temp_str += LLStartUp::getScreenLastFilename();
    }
    else
    {
        std::string path = temp_str + LLStartUp::getScreenHomeFilename();

        if (!gDirUtilp->fileExists(path) && is_in_production)
        {
            // Fallback to old file, can be removed later
            // Home image only sets when user changes home, so it will take time for users to switch to pngs
            temp_str += "screen_home.bmp";
            image_codec = IMG_CODEC_BMP;
        }
        else
        {
            temp_str = path;
        }
    }

    LLPointer<LLImageFormatted> start_image_frmted = LLImageFormatted::createFromType(image_codec);

    // Turn off start screen to get around the occasional readback
    // driver bug
    if (!gSavedSettings.getBOOL("UseStartScreen"))
    {
        LL_INFOS("AppInit") << "Bitmap load disabled" << LL_ENDL;
        return;
    }
    else if (!start_image_frmted->load(temp_str))
    {
        LL_WARNS("AppInit") << "Bitmap load failed" << LL_ENDL;
        gStartTexture = NULL;
    }
    else
    {
        gStartImageWidth = start_image_frmted->getWidth();
        gStartImageHeight = start_image_frmted->getHeight();

        LLPointer<LLImageRaw> raw = new LLImageRaw;
        if (!start_image_frmted->decode(raw, 0.0f))
        {
            LL_WARNS("AppInit") << "Bitmap decode failed" << LL_ENDL;
            gStartTexture = NULL;
        }
        else
        {
            // HACK: getLocalTexture allows only power of two dimentions
            raw->expandToPowerOfTwo();
            gStartTexture = LLViewerTextureManager::getLocalTexture(raw.get(), false);
        }
    }

    if (gStartTexture.isNull())
    {
        gStartTexture = LLViewerTexture::sBlackImagep;
        gStartImageWidth = gStartTexture->getWidth();
        gStartImageHeight = gStartTexture->getHeight();
    }
}

void LLProgressView::initTextures(S32 location_id, bool is_in_production)
{
    initStartTexture(location_id, is_in_production);
}

void LLProgressView::releaseTextures()
{
    gStartTexture = NULL;
}

void LLProgressView::setCancelButtonVisible(bool b, const std::string& label)
{
    mCancelBtn->setVisible(b);
    mCancelBtn->setEnabled(b);
    mCancelBtn->setLabelSelected(label);
    mCancelBtn->setLabelUnselected(label);
}

// static
void LLProgressView::onCancelButtonClicked(void*)
{
    // Quitting viewer here should happen only when "Quit" button is pressed while starting up.
    // Check for startup state is used here instead of teleport state to avoid quitting when
    // cancel is pressed while teleporting inside region (EXT-4911)
    if (LLStartUp::getStartupState() < STATE_STARTED)
    {
        LL_INFOS() << "User requesting quit during login" << LL_ENDL;
        LLAppViewer::instance()->requestQuit();
    }
    else
    {
        gAgent.teleportCancel();
        sInstance->mCancelBtn->setEnabled(false);
        sInstance->setVisible(false);
    }
}

// static
void LLProgressView::onClickMessage(void* data)
{
    LLProgressView* viewp = (LLProgressView*)data;
    if ( viewp != NULL && ! viewp->mMessage.empty() )
    {
        std::string url_to_open( "" );

        size_t start_pos;
        start_pos = viewp->mMessage.find( "https://" );
        if (start_pos == std::string::npos)
            start_pos = viewp->mMessage.find( "http://" );
        if (start_pos == std::string::npos)
            start_pos = viewp->mMessage.find( "ftp://" );

        if ( start_pos != std::string::npos )
        {
            size_t end_pos = viewp->mMessage.find_first_of( " \n\r\t", start_pos );
            if ( end_pos != std::string::npos )
                url_to_open = viewp->mMessage.substr( start_pos, end_pos - start_pos );
            else
                url_to_open = viewp->mMessage.substr( start_pos );

            LLWeb::loadURLExternal( url_to_open );
        }
    }
}

bool LLProgressView::handleUpdate(const LLSD& event_data)
{
    LLSD message = event_data.get("message");
    LLSD desc = event_data.get("desc");
    LLSD percent = event_data.get("percent");

    if(message.isDefined())
    {
        setMessage(message.asString());
    }

    if(desc.isDefined())
    {
        setText(desc.asString());
    }

    if(percent.isDefined())
    {
        setPercent((F32)percent.asReal());
    }
    return false;
}

bool LLProgressView::onAlertModal(const LLSD& notify)
{
    // if the progress view is visible, it will obscure the notification window
    // in this case, we want to auto-accept WebLaunchExternalTarget notifications
    if (isInVisibleChain() && notify["sigtype"].asString() == "add")
    {
        LLNotificationPtr notifyp = LLNotifications::instance().find(notify["id"].asUUID());
        if (notifyp && notifyp->getName() == "WebLaunchExternalTarget")
        {
            notifyp->respondWithDefault();
        }
    }
    return false;
}

void LLProgressView::handleMediaEvent(LLPluginClassMedia* self, EMediaEvent event)
{
    // the intro web content calls javascript::window.close() when it's done
    if( event == MEDIA_EVENT_CLOSE_REQUEST )
    {
        if (mStartupComplete)
        {
            //make sure other timer has stopped
            mFadeFromLoginTimer.stop();
            mFadeToWorldTimer.start();
        }
        else
        {
            // hide the media ctrl and wait for startup to be completed before fading to world
            mMediaCtrl->setVisible(false);
            if (mMediaCtrl->getMediaPlugin())
            {
                mMediaCtrl->getMediaPlugin()->stop();
            }

            // show the progress bar
            getChild<LLView>("stack1")->setVisible(true);
        }
    }
}


// static
void LLProgressView::onIdle(void* user_data)
{
    LLProgressView* self = (LLProgressView*) user_data;

    // Close login panel on mFadeToWorldTimer expiration.
    if (self->mFadeFromLoginTimer.getStarted() &&
        self->mFadeFromLoginTimer.getElapsedTimeF32() > FADE_TO_WORLD_TIME)
    {
        self->mFadeFromLoginTimer.stop();
        LLPanelLogin::closePanel();

        // Nothing to do anymore.
        gIdleCallbacks.deleteFunction(onIdle, user_data);
    }
}