// File: /workspace/github_c_makefile_star2_O0/nilyang[P]redis-tdd-annotation/src/redis.c
// Function: activeExpireCycle
void activeExpireCycle(int type) {
    /* This function has some global state in order to continue the work
     * incrementally across calls. */
    // 静态变量，用来累积函数连续执行时的数据
    static unsigned int current_db = 0; /* Last DB tested. */
    static int timelimit_exit = 0;      /* Time limit hit in previous call? */
    static long long last_fast_cycle = 0; /* When last fast cycle ran. */

    unsigned int j, iteration = 0;
    // 默认每次处理的数据库数量
    unsigned int dbs_per_call = REDIS_DBCRON_DBS_PER_CALL;
    // 函数开始的时间
    long long start = ustime(), timelimit;

    // 快速模式
    if (type == ACTIVE_EXPIRE_CYCLE_FAST) {
        /* Don't start a fast cycle if the previous cycle did not exited
         * for time limt. Also don't repeat a fast cycle for the same period
         * as the fast cycle total duration itself. */
        // 如果上次函数没有触发 timelimit_exit ，那么不执行处理
        if (!timelimit_exit) return;
        // 如果距离上次执行未够一定时间，那么不执行处理
        if (start < last_fast_cycle + ACTIVE_EXPIRE_CYCLE_FAST_DURATION*2) return;
        // 运行到这里，说明执行快速处理，记录当前时间
        last_fast_cycle = start;
    }

    /* We usually should test REDIS_DBCRON_DBS_PER_CALL per iteration, with
     * two exceptions:
     *
     * 一般情况下，函数只处理 REDIS_DBCRON_DBS_PER_CALL 个数据库，
     * 除非：
     *
     * 1) Don't test more DBs than we have.
     *    当前数据库的数量小于 REDIS_DBCRON_DBS_PER_CALL
     * 2) If last time we hit the time limit, we want to scan all DBs
     * in this iteration, as there is work to do in some DB and we don't want
     * expired keys to use memory for too much time. 
     *     如果上次处理遇到了时间上限，那么这次需要对所有数据库进行扫描，
     *     这可以避免过多的过期键占用空间
     */
    if (dbs_per_call > server.dbnum || timelimit_exit)
        dbs_per_call = server.dbnum;

    /* We can use at max ACTIVE_EXPIRE_CYCLE_SLOW_TIME_PERC percentage of CPU time
     * per iteration. Since this function gets called with a frequency of
     * server.hz times per second, the following is the max amount of
     * microseconds we can spend in this function. */
    // 函数处理的微秒时间上限
    // ACTIVE_EXPIRE_CYCLE_SLOW_TIME_PERC 默认为 25 ，也即是 25 % 的 CPU 时间
    timelimit = 1000000*ACTIVE_EXPIRE_CYCLE_SLOW_TIME_PERC/server.hz/100;
    timelimit_exit = 0;
    if (timelimit <= 0) timelimit = 1;

    // 如果是运行在快速模式之下
    // 那么最多只能运行 FAST_DURATION 微秒 
    // 默认值为 1000 （微秒）
    if (type == ACTIVE_EXPIRE_CYCLE_FAST)
        timelimit = ACTIVE_EXPIRE_CYCLE_FAST_DURATION; /* in microseconds. */

    // 遍历数据库
    for (j = 0; j < dbs_per_call; j++) {
        int expired;
        // 指向要处理的数据库
        redisDb *db = server.db+(current_db % server.dbnum);

        /* Increment the DB now so we are sure if we run out of time
         * in the current DB we'll restart from the next. This allows to
         * distribute the time evenly across DBs. */
        // 为 DB 计数器加一，如果进入 do 循环之后因为超时而跳出
        // 那么下次会直接从下个 DB 开始处理
        current_db++;

        /* Continue to expire if at the end of the cycle more than 25%
         * of the keys were expired. */
        do {
            unsigned long num, slots;
            long long now, ttl_sum;
            int ttl_samples;

            /* If there is nothing to expire try next DB ASAP. */
            // 获取数据库中带过期时间的键的数量
            // 如果该数量为 0 ，直接跳过这个数据库
            if ((num = dictSize(db->expires)) == 0) {
                db->avg_ttl = 0;
                break;
            }
            // 获取数据库中键值对的数量
            slots = dictSlots(db->expires);
            // 当前时间
            now = mstime();

            /* When there are less than 1% filled slots getting random
             * keys is expensive, so stop here waiting for better times...
             * The dictionary will be resized asap. */
            // 这个数据库的使用率低于 1% ，扫描起来太费力了（大部分都会 MISS）
            // 跳过，等待字典收缩程序运行
            if (num && slots > DICT_HT_INITIAL_SIZE &&
                (num*100/slots < 1)) break;

            /* The main collection cycle. Sample random keys among keys
             * with an expire set, checking for expired ones. 
             *
             * 样本计数器
             */
            // 已处理过期键计数器
            expired = 0;
            // 键的总 TTL 计数器
            ttl_sum = 0;
            // 总共处理的键计数器
            ttl_samples = 0;

            // 每次最多只能检查 LOOKUPS_PER_LOOP 个键
            if (num > ACTIVE_EXPIRE_CYCLE_LOOKUPS_PER_LOOP)
                num = ACTIVE_EXPIRE_CYCLE_LOOKUPS_PER_LOOP;

            // 开始遍历数据库
            while (num--) {
                dictEntry *de;
                long long ttl;

                // 从 expires 中随机取出一个带过期时间的键
                if ((de = dictGetRandomKey(db->expires)) == NULL) break;
                // 计算 TTL
                ttl = dictGetSignedIntegerVal(de)-now;
                // 如果键已经过期，那么删除它，并将 expired 计数器增一
                if (activeExpireCycleTryExpire(db,de,now)) expired++;
                if (ttl < 0) ttl = 0;
                // 累积键的 TTL
                ttl_sum += ttl;
                // 累积处理键的个数
                ttl_samples++;
            }

            /* Update the average TTL stats for this database. */
            // 为这个数据库更新平均 TTL 统计数据
            if (ttl_samples) {
                // 计算当前平均值
                long long avg_ttl = ttl_sum/ttl_samples;
                
                // 如果这是第一次设置数据库平均 TTL ，那么进行初始化
                if (db->avg_ttl == 0) db->avg_ttl = avg_ttl;
                /* Smooth the value averaging with the previous one. */
                // 取数据库的上次平均 TTL 和今次平均 TTL 的平均值
                db->avg_ttl = (db->avg_ttl+avg_ttl)/2;
            }

            /* We can't block forever here even if there are many keys to
             * expire. So after a given amount of milliseconds return to the
             * caller waiting for the other active expire cycle. */
            // 我们不能用太长时间处理过期键，
            // 所以这个函数执行一定时间之后就要返回

            // 更新遍历次数
            iteration++;

            // 每遍历 16 次执行一次
            if ((iteration & 0xf) == 0 && /* check once every 16 iterations. */
                (ustime()-start) > timelimit)
            {
                // 如果遍历次数正好是 16 的倍数
                // 并且遍历的时间超过了 timelimit
                // 那么断开 timelimit_exit
                timelimit_exit = 1;
            }

            // 已经超时了，返回
            if (timelimit_exit) return;

            /* We don't repeat the cycle if there are less than 25% of keys
             * found expired in the current DB. */
            // 如果已删除的过期键占当前总数据库带过期时间的键数量的 25 %
            // 那么不再遍历
        } while (expired > ACTIVE_EXPIRE_CYCLE_LOOKUPS_PER_LOOP/4);
    }
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x80, %rsp
movl %edi, -0x4(%rbp)
movl $0x0, -0xc(%rbp)
movl $0x10, -0x10(%rbp)
callq 0x252a0
movq %rax, -0x18(%rbp)
cmpl $0x1, -0x4(%rbp)
jne 0x25a20
cmpl $0x0, 0xee74a(%rip)     # 0x11413c
jne 0x259f9
jmp 0x25c98
movq -0x18(%rbp), %rax
movq 0xee73c(%rip), %rcx     # 0x114140
addq $0x7d0, %rcx            # imm = 0x7D0
cmpq %rcx, %rax
jge 0x25a15
jmp 0x25c98
movq -0x18(%rbp), %rax
movq %rax, 0xee720(%rip)     # 0x114140
movl -0x10(%rbp), %eax
cmpl 0xee34f(%rip), %eax     # 0x113d78
ja 0x25a34
cmpl $0x0, 0xee70a(%rip)     # 0x11413c
je 0x25a3d
movl 0xee33e(%rip), %eax     # 0x113d78
movl %eax, -0x10(%rbp)
movl $0x17d7840, %eax        # imm = 0x17D7840
cltd
idivl 0xedeb7(%rip)           # 0x113900
movl $0x64, %ecx
cltd
idivl %ecx
cltq
movq %rax, -0x20(%rbp)
movl $0x0, 0xee6db(%rip)     # 0x11413c
cmpq $0x0, -0x20(%rbp)
jg 0x25a70
movq $0x1, -0x20(%rbp)
cmpl $0x1, -0x4(%rbp)
jne 0x25a7e
movq $0x3e8, -0x20(%rbp)     # imm = 0x3E8
movl $0x0, -0x8(%rbp)
movl -0x8(%rbp), %eax
cmpl -0x10(%rbp), %eax
jae 0x25c98
movq 0xede70(%rip), %rax     # 0x113908
movq %rax, -0x78(%rbp)
movl 0xee696(%rip), %eax     # 0x114138
xorl %edx, %edx
divl 0xee2ce(%rip)           # 0x113d78
movq -0x78(%rbp), %rax
movl %edx, %ecx
shlq $0x6, %rcx
addq %rcx, %rax
movq %rax, -0x30(%rbp)
movl 0xee677(%rip), %eax     # 0x114138
addl $0x1, %eax
movl %eax, 0xee66e(%rip)     # 0x114138
movq -0x30(%rbp), %rax
movq 0x8(%rax), %rax
movq 0x28(%rax), %rax
movq -0x30(%rbp), %rcx
movq 0x8(%rcx), %rcx
addq 0x48(%rcx), %rax
movq %rax, -0x38(%rbp)
cmpq $0x0, %rax
jne 0x25afd
movq -0x30(%rbp), %rax
movq $0x0, 0x38(%rax)
jmp 0x25c88
movq -0x30(%rbp), %rax
movq 0x8(%rax), %rax
movq 0x18(%rax), %rax
movq -0x30(%rbp), %rcx
movq 0x8(%rcx), %rcx
addq 0x38(%rcx), %rax
movq %rax, -0x40(%rbp)
callq 0x252e0
movq %rax, -0x48(%rbp)
cmpq $0x0, -0x38(%rbp)
je 0x25b48
cmpq $0x4, -0x40(%rbp)
jbe 0x25b48
imulq $0x64, -0x38(%rbp), %rax
xorl %ecx, %ecx
movl %ecx, %edx
divq -0x40(%rbp)
cmpq $0x1, %rax
jae 0x25b48
jmp 0x25c88
movl $0x0, -0x24(%rbp)
movq $0x0, -0x50(%rbp)
movl $0x0, -0x54(%rbp)
cmpq $0x14, -0x38(%rbp)
jbe 0x25b6d
movq $0x14, -0x38(%rbp)
jmp 0x25b6f
movq -0x38(%rbp), %rax
movq %rax, %rcx
addq $-0x1, %rcx
movq %rcx, -0x38(%rbp)
cmpq $0x0, %rax
je 0x25bf5
movq -0x30(%rbp), %rax
movq 0x8(%rax), %rdi
callq 0x24470
movq %rax, -0x60(%rbp)
cmpq $0x0, %rax
jne 0x25b9d
jmp 0x25bf5
movq -0x60(%rbp), %rax
movq 0x8(%rax), %rax
subq -0x48(%rbp), %rax
movq %rax, -0x68(%rbp)
movq -0x30(%rbp), %rdi
movq -0x60(%rbp), %rsi
movq -0x48(%rbp), %rdx
callq 0x258f0
cmpl $0x0, %eax
je 0x25bcc
movl -0x24(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x24(%rbp)
cmpq $0x0, -0x68(%rbp)
jge 0x25bdb
movq $0x0, -0x68(%rbp)
movq -0x68(%rbp), %rax
addq -0x50(%rbp), %rax
movq %rax, -0x50(%rbp)
movl -0x54(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x54(%rbp)
jmp 0x25b6f
cmpl $0x0, -0x54(%rbp)
je 0x25c44
movq -0x50(%rbp), %rax
movslq -0x54(%rbp), %rcx
cqto
idivq %rcx
movq %rax, -0x70(%rbp)
movq -0x30(%rbp), %rax
cmpq $0x0, 0x38(%rax)
jne 0x25c23
movq -0x70(%rbp), %rcx
movq -0x30(%rbp), %rax
movq %rcx, 0x38(%rax)
movq -0x30(%rbp), %rax
movq 0x38(%rax), %rax
addq -0x70(%rbp), %rax
movl $0x2, %ecx
cqto
idivq %rcx
movq %rax, %rcx
movq -0x30(%rbp), %rax
movq %rcx, 0x38(%rax)
movl -0xc(%rbp), %eax
addl $0x1, %eax
movl %eax, -0xc(%rbp)
movl -0xc(%rbp), %eax
andl $0xf, %eax
cmpl $0x0, %eax
jne 0x25c71
callq 0x252a0
subq -0x18(%rbp), %rax
cmpq -0x20(%rbp), %rax
jle 0x25c71
movl $0x1, 0xee4cb(%rip)     # 0x11413c
cmpl $0x0, 0xee4c4(%rip)     # 0x11413c
je 0x25c7c
jmp 0x25c98
jmp 0x25c7e
cmpl $0x5, -0x24(%rbp)
jg 0x25aca
jmp 0x25c8a
movl -0x8(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x8(%rbp)
jmp 0x25a85
addq $0x80, %rsp
popq %rbp
retq
nopw %cs:(%rax,%rax)