[原创]PB8 CM 欢迎大家来搞-CTF对抗-看雪-安全社区|安全招聘|kanxue.com

[原创]PB8 CM 欢迎大家来搞

发表于: 2013-4-12 10:31 4391

[原创]PB8 CM 欢迎大家来搞

neite

2013-4-12 10:31

4391

某商业软件注册算法，提取出来的！

和大家一起分享一下吧。。。。。。

open(w_pass_input)
ls_serial = message.stringparm
ls_serial = trim(ls_serial)
IF len(ls_serial) = 0 THEN RETURN
IF inv_serial.of_check(ls_serial) = 1 THEN //4
    li_ver = inv_serial.of_getversion(ls_serial)
    ld_date = inv_serial.of_getdate(ls_serial)
    IF li_ver = 5 AND ld_date > date("2000-1-1") AND ld_date < date("2100-1-1") THEN //7
        COMMIT USING sqlca;
        ls_com = inv_serial.of_getname(ls_serial)
        ls_key = "HKEY_LOCAL_MACHINE\SOFTWARE\INFOEASY\易胜特零售配送版 2003"
        li_rtn = registryset(ls_key,"serial",regstring!,ls_serial)
        IF li_rtn <> 1 THEN //12
            messagebox("系统提示","注册失败！")
            RETURN
        ELSE //12
            messagebox("系统提示","注册成功！")
        END IF //12
    ELSE //7
        messagebox("系统提示","该序列号非法，注册失败！")
    END IF //7
ELSE //4
    messagebox("系统提示","非法的序列号，注册失败！")
END IF //4