//<MStar Software>
//******************************************************************************
// MStar Software
// Copyright (c) 2010 - 2012 MStar Semiconductor, Inc. All rights reserved.
// All software, firmware and related documentation herein ("MStar Software") are
// intellectual property of MStar Semiconductor, Inc. ("MStar") and protected by
// law, including, but not limited to, copyright law and international treaties.
// Any use, modification, reproduction, retransmission, or republication of all
// or part of MStar Software is expressly prohibited, unless prior written
// permission has been granted by MStar.
//
// By accessing, browsing and/or using MStar Software, you acknowledge that you
// have read, understood, and agree, to be bound by below terms ("Terms") and to
// comply with all applicable laws and regulations:
//
// 1. MStar shall retain any and all right, ownership and interest to MStar
//    Software and any modification/derivatives thereof.
//    No right, ownership, or interest to MStar Software and any
//    modification/derivatives thereof is transferred to you under Terms.
//
// 2. You understand that MStar Software might include, incorporate or be
//    supplied together with third party`s software and the use of MStar
//    Software may require additional licenses from third parties.
//    Therefore, you hereby agree it is your sole responsibility to separately
//    obtain any and all third party right and license necessary for your use of
//    such third party`s software.
//
// 3. MStar Software and any modification/derivatives thereof shall be deemed as
//    MStar`s confidential information and you agree to keep MStar`s
//    confidential information in strictest confidence and not disclose to any
//    third party.
//
// 4. MStar Software is provided on an "AS IS" basis without warranties of any
//    kind. Any warranties are hereby expressly disclaimed by MStar, including
//    without limitation, any warranties of merchantability, non-infringement of
//    intellectual property rights, fitness for a particular purpose, error free
//    and in conformity with any international standard.  You agree to waive any
//    claim against MStar for any loss, damage, cost or expense that you may
//    incur related to your use of MStar Software.
//    In no event shall MStar be liable for any direct, indirect, incidental or
//    consequential damages, including without limitation, lost of profit or
//    revenues, lost or damage of data, and unauthorized system use.
//    You agree that this Section 4 shall still apply without being affected
//    even if MStar Software has been modified by MStar in accordance with your
//    request or instruction for your use, except otherwise agreed by both
//    parties in writing.
//
// 5. If requested, MStar may from time to time provide technical supports or
//    services in relation with MStar Software to you for your use of
//    MStar Software in conjunction with your or your customer`s product
//    ("Services").
//    You understand and agree that, except otherwise agreed by both parties in
//    writing, Services are provided on an "AS IS" basis and the warranty
//    disclaimer set forth in Section 4 above shall apply.
//
// 6. Nothing contained herein shall be construed as by implication, estoppels
//    or otherwise:
//    (a) conferring any license or right to use MStar name, trademark, service
//        mark, symbol or any other identification;
//    (b) obligating MStar or any of its affiliates to furnish any person,
//        including without limitation, you and your customers, any assistance
//        of any kind whatsoever, or any information; or
//    (c) conferring any license or right under any intellectual property right.
//
// 7. These terms shall be governed by and construed in accordance with the laws
//    of Taiwan, R.O.C., excluding its conflict of law rules.
//    Any and all dispute arising out hereof or related hereto shall be finally
//    settled by arbitration referred to the Chinese Arbitration Association,
//    Taipei in accordance with the ROC Arbitration Law and the Arbitration
//    Rules of the Association by three (3) arbitrators appointed in accordance
//    with the said Rules.
//    The place of arbitration shall be in Taipei, Taiwan and the language shall
//    be English.
//    The arbitration award shall be final and binding to both parties.
//
//******************************************************************************
//<MStar Software>

//=============================================================================
//#include <MsCommon.h> // NUSED

//#include "include/drvConfig.h" // NUSED
//#include "include/drvCompiler.h" // NUSED
//#include "include/drvErrno.h" // NUSED
//#include "include/drvPorts.h" // NUSED
//#include "include/drvTimer.h" // NUSED
#include "include/drvKernel.h"
//#include "include/drvList.h" // NUSED

U32 volatile jiffies;

static void ms_SW_Timer_Tick(U32 u32StTimer, U32 u32TimerID);
static struct list_head sw_timer_vec_head;

S32 g_Timer_ID;
S32 _s32MutexUTimer;
void ms_init_timers(void)
{
    ms_list_init(&sw_timer_vec_head);
    // Register software timer dispatch program
    // Base 1 ms, interruptted every 1 ms

    BOOL err;

    g_Timer_ID = MsOS_CreateTimer((TimerCb) ms_SW_Timer_Tick,100, USB_SW_TIMER_TICK, FALSE, "USB_TIMER");
    //err = OS_DefineCyclicHandler(&g_Timer_ID, ms_SW_Timer_Tick, (void*) 0, 100);
    //USB_ASSERT((err == TRUE), "Define USB timer fail");

    //err = OS_ActivateCyclicHandler(g_Timer_ID);
    //
    err=MsOS_StartTimer(g_Timer_ID);
    USB_ASSERT((err == TRUE), "Activate USB timer fail");
    diag_printf("Init Software Timer ok \n");
    _s32MutexUTimer = MsOS_CreateMutex(E_MSOS_FIFO, "UTimer_MUTEX", MSOS_PROCESS_SHARED);
}

void ms_remove_timers(void)
{
    MsOS_DeleteTimer(g_Timer_ID);
    diag_printf("Remove Software Timer ok \n");
    MsOS_DeleteMutex(_s32MutexUTimer);
}

/*
 * Timer ISR: It's responsible for dispatching tasks registered to software-timer
 * task queue. It need to be implemented as Bottom-Half mechanism of Linux
 * Timer and USB IRQ have the same priority and cannot be interrupted by each other
 */
static void ms_SW_Timer_Tick(U32 u32StTimer, U32 u32TimerID)
{
    struct timer_list *timer;
    struct list_head  *tmp;

    jiffies += USB_SW_TIMER_TICK;

    //if ( Timer_task_lock == 1 )
        //goto sw_done;

    if (!ms_is_empty_list(&sw_timer_vec_head))
    {
        tmp = sw_timer_vec_head.next;
        while (tmp != &sw_timer_vec_head)
        {
            timer = entry_to_container (tmp, struct timer_list, entry);
            tmp = tmp->next;
            // decrease expire time
            timer->expires -= USB_SW_TIMER_TICK;
        }
    }

    // Dispath task from task queue of software-timer here
    if (!ms_is_empty_list(&sw_timer_vec_head))
    {
        tmp = sw_timer_vec_head.next;
        while (tmp != &sw_timer_vec_head)
        {
            timer = entry_to_container (tmp, struct timer_list, entry);
            tmp = tmp->next;
            //list_entry (tmp, struct timer_list, entry, struct list_head, timer);
            // Check if time expired ?
            if ( timer->expires <= 0 )
            {
                void (*pFunc)(U32);
                U32 data;
                // If lock ==> don't dispatch task
                /*
                                        if ( Timer_task_lock == 1 )
                                        {
                                        timer->expires++;
                                        continue;
                                        }
                                        */
                pFunc = timer->function;
                data = timer->data;
                ms_del_timer(timer);
                // Call registered function
                if ( (U32)pFunc )
                {
                    //lock_usb_core(); // NUSED
                    pFunc(data);
                    //unlock_usb_core(); // NUSED
                }
                else
                    USB_ASSERT( 0, "ERROR: fun is NULL\n");

                //Current version only support dispatch one task each time
                //break;
            }
        }
    }

//sw_done:
    return;
    // End of dispatching
}

/***
 * ms_del_timer - deactive a timer.
 * @timer: the timer to be deactivated
 *
 * ms_del_timer() deactivates a timer - this works on both active and inactive
 * timers.
 *
 * The function returns whether it has deactivated a pending timer or not.
 * (ie. ms_del_timer() of an inactive timer returns 0, del_timer() of an
 * active timer returns 1.)
 */
int ms_del_timer(struct timer_list *timer)
{
    U32 u32OldIntr;

    osapi_spin_lock_irqsave(&sw_timer_lock, u32OldIntr);
    if( timer->entry.next != NULL && timer->entry.prev != NULL )
    {
        USB_ASSERT(timer->entry.prev->next == &timer->entry, "timer->entry.prev->next error!!!!\n");
        USB_ASSERT(timer->entry.next != 0, "timer->entry.next!!!!\n");
        USB_ASSERT(timer->entry.next->prev == &timer->entry, "timer->entry.next->prev error!!!!\n");
        USB_ASSERT(timer->entry.prev != 0, "timer->entry.prev error!!!!\n");
        ms_list_remove_and_init(&timer->entry);
    }

    osapi_spin_unlock_irqrestore(&sw_timer_lock, u32OldIntr);
    return 1;
}

/***
 * ms_del_timer_sync - deactive a timer.
 * @timer: the timer to be deactivated
 *
 * ms_del_timer_sync() deactivates a timer - this works on both active and inactive
 * timers.
 *
 * The function will protect synchronization problem before deactivating timer
 */
int ms_del_timer_sync(struct timer_list *timer)
{
    U32 u32OldIntr;

    osapi_spin_lock_irqsave(&sw_timer_lock, u32OldIntr);
    if( timer->entry.next != NULL && timer->entry.prev != NULL )
    {
        USB_ASSERT(timer->entry.prev->next == &timer->entry, "timer->entry.prev->next error!!!!\n");
        USB_ASSERT(timer->entry.next != 0, "timer->entry.next!!!!\n");
        USB_ASSERT(timer->entry.next->prev == &timer->entry, "timer->entry.next->prev error!!!!\n");
        USB_ASSERT(timer->entry.prev != 0, "timer->entry.prev error!!!!\n");
        ms_list_remove_and_init(&timer->entry);
    }

    osapi_spin_unlock_irqrestore(&sw_timer_lock, u32OldIntr);
    return 1;
}

/***
 * ms_add_timer - start a timer
 * @timer: the timer to be added
 *
 * The kernel will do a ->function(->data) callback from the
 * timer interrupt at the ->expired point in the future. The
 * current time is 'jiffies'.
 *
 * The timer's ->expired, ->function (and if the handler uses it, ->data)
 * fields must be set prior calling this function.
 *
 * Timers with an ->expired field in the past will be executed in the next
 * timer tick. It's illegal to add an already pending timer.
 */
void ms_add_timer(struct timer_list *timer)
{
    U32 u32OldIntr;

    osapi_spin_lock_irqsave(&sw_timer_lock, u32OldIntr);
    if ( (timer->tmout_step > 0) && (timer->tmout_value > timer->tmout_step) )
        timer->expires = timer->tmout_step;
    else
        timer->expires = timer->tmout_value;

    ms_insert_list_before(&timer->entry, &sw_timer_vec_head);

    osapi_spin_unlock_irqrestore(&sw_timer_lock, u32OldIntr);
}

int ms_update_timer(struct timer_list *timer, U32 expires, U32 steps)
{
    int ret = 0;
    U32 u32OldIntr;

    osapi_spin_lock_irqsave(&sw_timer_lock, u32OldIntr);
    timer->tmout_value = expires;
    timer->tmout_step = steps;

    if( timer->entry.next != NULL && timer->entry.prev != NULL )
    {
        USB_ASSERT(timer->entry.prev->next == &timer->entry, "timer->entry.prev->next error!!!!\n");
        USB_ASSERT(timer->entry.next != 0, "timer->entry.next!!!!\n");
        USB_ASSERT(timer->entry.next->prev == &timer->entry, "timer->entry.next->prev error!!!!\n");
        USB_ASSERT(timer->entry.prev != 0, "timer->entry.prev error!!!!\n");
        ms_list_remove_and_init(&timer->entry);
    }

    if ( (timer->tmout_step > 0) && (timer->tmout_value > timer->tmout_step) )
        timer->expires = timer->tmout_step;
    else
        timer->expires = timer->tmout_value;
    ms_insert_list_before(&timer->entry, &sw_timer_vec_head);

    osapi_spin_unlock_irqrestore(&sw_timer_lock, u32OldIntr);
    return ret;
}

#define MS_MSEC_PER_SEC    1000L
unsigned int ms_jiffies_to_msecs(unsigned long jiffies_n)
{
    unsigned int retval;

    retval = (MS_MSEC_PER_SEC / HZ) * jiffies_n;

    return retval;
}