#include "sched.h"
#include <common/kprint.h>

/**
 * @brief 从就绪队列中取出PCB
 *
 * @return struct process_control_block*
 */
struct process_control_block *sched_cfs_dequeue()
{
    if (list_empty(&sched_cfs_ready_queue.proc_queue.list))
    {
        return &initial_proc_union.pcb;
    }

    struct process_control_block *proc = container_of(list_next(&sched_cfs_ready_queue.proc_queue.list), struct process_control_block, list);

    list_del(&proc->list);
    --sched_cfs_ready_queue.count;
    return proc;
}

/**
 * @brief 将PCB加入就绪队列
 *
 * @param pcb
 */
void sched_cfs_enqueue(struct process_control_block *pcb)
{
    struct process_control_block *proc = container_of(list_next(&sched_cfs_ready_queue.proc_queue.list), struct process_control_block, list);
    if (proc == &initial_proc_union.pcb)
        return;
    if (!(list_empty(&sched_cfs_ready_queue.proc_queue.list)))
    {
        while (proc->virtual_runtime < pcb->virtual_runtime)
        {
            proc = container_of(list_next(&proc->list), struct process_control_block, list);
        }
    }
    list_append(&proc->list, &pcb->list);
    ++sched_cfs_ready_queue.count;
}

/**
 * @brief 调度函数
 *
 */
void sched_cfs()
{

    current_pcb->flags &= ~PROC_NEED_SCHED;
    struct process_control_block *proc = sched_cfs_dequeue();

    if (current_pcb->virtual_runtime >= proc->virtual_runtime) // 当前进程运行时间大于了下一进程的运行时间，进行切换
    {

        if (current_pcb->state = PROC_RUNNING) // 本次切换由于时间片到期引发，则再次加入就绪队列，否则交由其它功能模块进行管理
            sched_cfs_enqueue(current_pcb);

        if (!sched_cfs_ready_queue.cpu_exec_proc_jiffies)
        {
            switch (proc->priority)
            {
            case 0:
            case 1:
                sched_cfs_ready_queue.cpu_exec_proc_jiffies = 4 / sched_cfs_ready_queue.count;
                break;
            case 2:
            default:

                sched_cfs_ready_queue.cpu_exec_proc_jiffies = (4 / sched_cfs_ready_queue.count) << 2;
                break;
            }
        }

        switch_proc(current_pcb, proc);
    }
    else // 不进行切换
    {
        kdebug("not switch.");
        sched_cfs_enqueue(current_pcb);

        if (!sched_cfs_ready_queue.cpu_exec_proc_jiffies)
        {
            switch (proc->priority)
            {
            case 0:
            case 1:
                sched_cfs_ready_queue.cpu_exec_proc_jiffies = 4 / sched_cfs_ready_queue.cpu_exec_proc_jiffies;
                break;
            case 2:
            default:
                sched_cfs_ready_queue.cpu_exec_proc_jiffies = (4 / sched_cfs_ready_queue.cpu_exec_proc_jiffies) << 2;
                break;
            }
        }
        kdebug("hhhh");
    }
}

/**
 * @brief 初始化进程调度器
 *
 */
void sched_init()
{
    memset(&sched_cfs_ready_queue, 0, sizeof(struct sched_queue_t));
    list_init(&sched_cfs_ready_queue.proc_queue.list);
    sched_cfs_ready_queue.count = 1; // 因为存在IDLE进程，因此为1
    sched_cfs_ready_queue.cpu_exec_proc_jiffies = 10;
    sched_cfs_ready_queue.proc_queue.virtual_runtime = 0x7fffffffffffffff;
}