// ==UserScript==
// @name         Steam添加FOD
// @namespace    sourcewater
// @version      0.12
// @description  添加愿望单和添加FOD的代码搜集于https://steamcn.com论坛，并非原创。批量激活的脚本来自于：https://greasyfork.org/zh-CN/scripts/32718-steamredeemkeys。因为两个脚本不兼容，因此进行合并。
// @author       sourcewater
// @match        https://store.steampowered.com/account/registerkey
// @grant        none
// @downloadURL none
// ==/UserScript==

(function() {
    'use strict';

    function getText(f){
        return f.toString().replace(/^[^\/]+\/\*!?\s?/, '').replace(/\*\/[^\/]+$/, '');
    }

    var maincontent=document.getElementById("main_content");
    var leftcontent=document.getElementsByClassName("leftcol")[0];

    var batchredeemscript=getText(function(){/*

    var s_s_s_autoDivideNum = 9;
    var s_s_s_waitingSeconds = 20;
    var s_s_s_ajaxTimeout = 15;

	var s_s_s_keyCount = 0;
	var s_s_s_recvCount = 0;
	var s_s_s_timer;

	var s_s_s_allUnusedKeys = [];

	var s_s_s_failureDetail = {
		14: '无效激活码',
		15: '重复激活',
		53: '次数上限',
		13: '地区限制',
		9: '已拥有',
		24: '缺少主游戏',
		36: '需要PS3?',
		50: '这是充值码',
    };

	var s_s_s_myTexts = {
		fail: '失败',
		success: '成功',
		network: '网络错误或超时',
		line: '——',
		nothing: '',
		others: '其他错误',
		unknown: '未知错误',
		redeeming: '激活中',
		waiting: '等待中',
		showUnusedKey: '显示未使用的Key',
		hideUnusedKey: '隐藏未使用的Key',
    };

    var s_s_s_unusedKeyReasons = [
        '次数上限',
        '地区限制',
        '已拥有',
        '缺少主游戏',
        '其他错误',
        '未知错误',
        '网络错误或超时',
    ];

	function s_s_s_redeemKey(key) {
		jQuery.ajax({
			url: 'https://store.steampowered.com/account/ajaxregisterkey/',
			data: {
				product_key: key,
				sessionid: g_sessionID
			},
			type: 'post',
			dataType: 'json',
			timeout: 1000 * s_s_s_ajaxTimeout,
			beforeSend: function(){
				if (jQuery('table').is(':hidden')) {
						jQuery('table').fadeIn();
				}
			},
			complete: function() {
			},
			error: function() {
				s_s_s_tableUpdateKey(key, s_s_s_myTexts.fail, s_s_s_myTexts.network, 0, s_s_s_myTexts.nothing);
				return;
			},
			success: function(data) {
				//console.log(data);

				if (data.success == 1) {
					s_s_s_tableUpdateKey(key, s_s_s_myTexts.success, s_s_s_myTexts.line,
						data.purchase_receipt_info.line_items[0].packageid,
						data.purchase_receipt_info.line_items[0].line_item_description);
					return;
				} else if (data.purchase_result_details !== undefined && data.purchase_receipt_info) {
					if (!data.purchase_receipt_info.line_items[0]) {
						s_s_s_tableUpdateKey(key, s_s_s_myTexts.fail,
							s_s_s_failureDetail[data.purchase_result_details] ? s_s_s_failureDetail[data.purchase_result_details] : s_s_s_myTexts.others,
                            0, s_s_s_myTexts.nothing);
					} else {
						s_s_s_tableUpdateKey(key, s_s_s_myTexts.fail,
							s_s_s_failureDetail[data.purchase_result_details] ? s_s_s_failureDetail[data.purchase_result_details] : s_s_s_myTexts.others,
							data.purchase_receipt_info.line_items[0].packageid,
							data.purchase_receipt_info.line_items[0].line_item_description);
                    }
					return;
				}
				tableUpdateKey(key, s_s_s_myTexts.fail, s_s_s_myTexts.nothing, 0, s_s_s_myTexts.nothing);
			}
		});
	}

	function s_s_s_setUnusedKeys(key, success, reason, subId, subName) {
        if (success && s_s_s_allUnusedKeys.includes(key)) {
            s_s_s_allUnusedKeys = s_s_s_allUnusedKeys.filter(function(keyItem){
                return keyItem != key;
            });

            var listObjects = jQuery('li');
            for(var i = 0; i < listObjects.length; i++) {
                var listElement = listObjects[i];
                var listObject = jQuery(listElement);

                if(listElement.innerHTML.includes(key)) {
                    listObject.remove();
                }
            }
        } else if (!success && !s_s_s_allUnusedKeys.includes(key) &&
                        s_s_s_unusedKeyReasons.includes(reason)) {
            var listObject = jQuery('<li></li>');
            listObject.html(key + ' ( ' + reason +
                (subId != 0 ? (': <code>' + subId + '</code> ' + subName) : '') +
            ' )');
            jQuery('#unusedKeys').append(listObject);

            s_s_s_allUnusedKeys.push(key);
        }
	}

	function s_s_s_tableInsertKey(key) {
		s_s_s_keyCount++;
		var row = jQuery('<tr></tr>');
		// number
		row.append('<td class="nobr">' + s_s_s_keyCount + '</td>');
		//key
		row.append('<td class="nobr"><code>' + key + '</code></td>');
		//redeeming...
		row.append('<td colspan="3">' + s_s_s_myTexts.redeeming + '...</td>');

		jQuery('tbody').prepend(row);
	}

	function s_s_s_tableWaitKey(key) {
		s_s_s_keyCount++;
		var row = jQuery('<tr></tr>');
		// number
		row.append('<td class="nobr">' + s_s_s_keyCount + '</td>');
		//key
		row.append('<td class="nobr"><code>' + key + '</code></td>');
		//waiting...
		row.append('<td colspan="3">' + s_s_s_myTexts.waiting +
			' (' + s_s_s_waitingSeconds + '秒)...</td>');

		jQuery('tbody').prepend(row);
	}

	function s_s_s_tableUpdateKey(key, result, detail, subId, subName) {
        s_s_s_setUnusedKeys(key, result === s_s_s_myTexts.success, detail, subId, subName);

		s_s_s_recvCount++;
		if (s_s_s_recvCount == s_s_s_keyCount) {
			jQuery('#buttonRedeem').fadeIn();
			jQuery('#inputKey').removeAttr('disabled');
		}

		var rowObjects = jQuery('tr');
		for (var i = 1; i < rowObjects.length; i++) {
			var rowElement = rowObjects[i];
			var rowObject = jQuery(rowElement);

			if (rowObject.children()[1].innerHTML.includes(key)&&
                rowObject.children()[2].innerHTML.includes(s_s_s_myTexts.redeeming)) {
				rowObject.children()[2].remove();

				// result
				if (result == s_s_s_myTexts.fail) rowObject.append('<td class="nobr" style="color:red">' + result + '</td>');
				else rowObject.append('<td class="nobr" style="color:green">' + result + '</td>');
				// detail
				rowObject.append('<td class="nobr">' + detail + '</td>');
				// sub
				if (subId === 0) {
					rowObject.append('<td>——</td>');
				} else {
					rowObject.append('<td><code>' + subId + '</code> <a href="https://steamdb.info/sub/' +
						subId + '/" target="_blank">' + subName + '</a></td>');
				}
				break;
			}
		}
	}

	function s_s_s_getKeysByRE(text) {
		text = text.trim().toUpperCase();
		var reg = new RegExp('([0-9,A-Z]{5}-){2,4}[0-9,A-Z]{5}', 'g');
		var keys = [];

		var result = void 0;
		while (result = reg.exec(text)) {
			keys.push(result[0]);
		}

		return keys;
	}

	function s_s_s_startTimer() {
		s_s_s_timer = setInterval(function() {
			var flag = false;
			var nowKey = 0;

			var rowObjects = jQuery('tr');
			for (var i = rowObjects.length - 1; i >= 1; i--) {
				var rowElement = rowObjects[i];
				var rowObject = jQuery(rowElement);
				if (rowObject.children()[2].innerHTML.includes(s_s_s_myTexts.waiting)) {
					nowKey++;
					if (nowKey <= s_s_s_autoDivideNum) {
						var key = rowObject.children()[1].innerHTML.substring(6);
						key = key.substring(0, key.indexOf('</code>'));
						rowObject.children()[2].innerHTML = '<td colspan="3">' + s_s_s_myTexts.redeeming + '...</td>';
						s_s_s_redeemKey(key);
					} else {
						flag = true;
						break;
					}
				}
			}
			if (!flag) {
				clearInterval(s_s_s_timer);
			}
		}, 1000 * s_s_s_waitingSeconds);
	}

	function s_s_s_redeemKeys() {
		var keys = s_s_s_getKeysByRE(jQuery('#inputKey').val().trim());
		if (keys.length <= 0) {
			return;
		}

		jQuery('#buttonRedeem').fadeOut();
		jQuery('#inputKey').attr('disabled', 'disabled');

		var nowKey = 0;
		keys.forEach(function (key) {
			nowKey++;
			if (nowKey <= s_s_s_autoDivideNum) {
				s_s_s_tableInsertKey(key);
				s_s_s_redeemKey(key);
			} else {
				s_s_s_tableWaitKey(key);
			}
		});

		if (nowKey > s_s_s_autoDivideNum) {
			s_s_s_startTimer();
		}
	}

	function s_s_s_toggleUnusedKeyArea() {
		if (jQuery('#unusedKeyArea').is(':hidden')) {
			jQuery('#unusedKeyArea').fadeIn();
		} else {
			jQuery('#unusedKeyArea').fadeOut();
		}
	}

	function s_s_s_showUnusedKey() {
		s_s_s_toggleUnusedKeyArea();
		if (this.innerHTML.includes(s_s_s_myTexts.showUnusedKey)) {
			this.innerHTML = this.innerHTML.replace(s_s_s_myTexts.showUnusedKey, s_s_s_myTexts.hideUnusedKey);
		} else {
			this.innerHTML = this.innerHTML.replace(s_s_s_myTexts.hideUnusedKey, s_s_s_myTexts.showUnusedKey);
		}
	}

    */});

    var batchredeemscriptnode=document.createElement("script");
    batchredeemscriptnode.innerHTML=batchredeemscript;
    var headelement=document.getElementsByTagName("head")[0];
    headelement.appendChild(batchredeemscriptnode);
    var batchredeemkey=getText(function(){/*

<br>
<div class="block_content checkout_content_box" style="height:230px;" class="registerkey_input_box_text">
<div>产品代码</div>
<div style="float: left;">
<textarea class="form-control" cols="80" rows="10" name="inputKey" id="inputKey" class="registerkey_input_box_text" placeholder="支持批量激活，可以把整个网页文字复制过来&#10;若一次激活的Key的数量超过9个则会自动分批激活（等待20秒）"></textarea>
</div>
<div class="button_row">
<a tabindex="300" id="buttonRedeem" class="btnv6_blue_hoverfade btn_medium" href="javascript:s_s_s_redeemKeys();" style="margin:10px 0px;">
<span>激活！</span>
</a>
&nbsp;&nbsp;
<a tabindex="300" id="buttonShowUnused" class="btnv6_blue_hoverfade btn_medium" href="javascript:s_s_s_showUnusedKey();" style="margin:10px 0px;">
<span>显示未使用的Key</span>
</a>
</div>
</div>
<br>
<br>
<br>
<br>
<div class="notice_box_content" id="unusedKeyArea" style="display: none">
<b>未使用的Key：</b><br>
<div><ol id="unusedKeys">
</ol></div>
</div>

<br>
<div class="table-responsive table-condensed">
<table class="table table-hover" style="display: none">
<caption><h2>激活记录</h2></caption><thead><th>No.</th><th>Key</th>
<th>结果</th><th>详情</th><th>Sub</th></thead><tbody></tbody>
</table></div><br><br><br>


    */});

    document.getElementById("registerkey_form").style.display="none";
    var keyexamplestext=document.getElementById("registerkey_examples_text");
    keyexamplestext.outerHTML=batchredeemkey+keyexamplestext.outerHTML;

    var outputtablecss = `
		table a {
			color: pink;
		}
		td {
			white-space: nowrap;
			overflow: hidden;
		}
		code {
			padding:2px 4px;
			font-size:90%;
			color:#c7254e;
			background-color:#f9f2f4;
			border-radius:3px
		}
		.notice_box_content {
			border: 1px solid #a25024;
			border-radius: 3px;
			width: 525px;
			color: #acb2b8;
			font-size: 14px;
			font-family: "Motiva Sans", Sans-serif;
			font-weight: normal;
			padding: 15px 15px;
			margin-bottom: 15px;
		}
		.notice_box_content b {
			font-weight: normal;
			color: #f47b20;
		}
		li {
			white-space: nowrap;
			overflow: hidden;
		}
	`;
    var outputtablenode=document.createElement("style");
    outputtablenode.type="text/css";
    outputtablenode.innerHTML=outputtablecss;
    headelement.appendChild(outputtablenode);

    var addtowishlistscript=getText(function(){/*

function s_s_s_addtowishlistfunction(){
    var args=arguments[0].split(",");
    if(!args[0].trim().match(/^[\d]+$/)){
        ShowAlertDialog("失败","请输入APP ID，多个APP ID用“,”隔开");
        return;
    }
    var appidlist=new Array();
    for(var i=0;i<args.length;++i){
        appidlist[i]=args[i].trim();
    }
    var bdialog;
    for(var i=0;i<appidlist.length;++i){
        AddToWishlist(appidlist[i],'add_to_wishlist_area', 'add_to_wishlist_area_success', 'add_to_wishlist_area_fail','1_5_9__407');
        if(document.getElementById("followgame_appid").checked){
            jQuery.post( '//store.steampowered.com/explore/followgame/', {sessionid: g_sessionID,appid: appidlist[i]
		    }).done( function() {
                console.log("followed");
		    }).fail( function() {
                console.log("follow failed!");
		    });
        }
        if(i==(appidlist.length-1)){
            if(i!=0) bdialog.Dismiss();
            ShowAlertDialog("成功","已经全部添加至愿望单");
        }else{
            bdialog=ShowBlockingWaitDialog('正在添加...',(i+1)+'/'+appidlist.length);
        }
    }
}

    */});
    var addtowishlistscriptnode=document.createElement("script");
    addtowishlistscriptnode.innerHTML=addtowishlistscript;
    headelement.appendChild(addtowishlistscriptnode);
    var addtowishlist=getText(function(){/*

<br>
<br>
<h2>输入APP ID添加跨区游戏至愿望单，输入SUB ID在Steam上添加免费产品。多个ID之间用“,”隔开</h2>
<div>输入APP ID</div>
<div style="float: left;" class="block_content checkout_content_box">
<input style="width:450px;" name="wishlist_appid" id="wishlist_appid" type="text" class="registerkey_input_box_text" value="">
</div>
<div class="button_row">
<a tabindex="300" href="javascript:s_s_s_addtowishlistfunction(document.getElementById('wishlist_appid').value);" class="btnv6_blue_hoverfade btn_medium">
<span>添加至愿望单</span>
</a>
</div>

<div style="clear: both;"></div>
<div class="block_content checkout_content_box" style="margin-top:10px">
<input type="checkbox" name="followgame_appid" value="1" id="followgame_appid">
<label for="followgame_appid">
<span>同时关注游戏</span>
</label>
</div>

    */});
    var addfreescript=getText(function(){/*

function s_s_s_addfreefunction(){
    var args=arguments[0].split(",");
    if(!args[0].trim().match(/^[\d]+$/)){
        ShowAlertDialog("失败","请输入SUB ID，多个SUB ID用“,”隔开");
        return;
    }
    var subidlist=new Array();
    for(var i=0;i<args.length;++i){
        subidlist[i]=args[i].trim();
    }

    if (location.hostname !== 'store.steampowered.com') {
        alert('请在steam商店运行本代码！');
        return;
    } else if (typeof jQuery !== 'function') {
        ShowAlertDialog('失败', '脚本需要jQuery库！');
        return;
    } else if (document.getElementById('header_notification_area') === null) {
        ShowAlertDialog('失败', '你必须处于登录状态.');
        return;
    }

    var freePackages = subidlist;//change here[221306,221459]

    var loaded = 0,
        total = freePackages.length,
        modal = ShowBlockingWaitDialog('正在添加...', '请等待所有请求结束。');

    for (var i = 0; i < total; i++) {
        jQuery.post(
            '//store.steampowered.com/checkout/addfreelicense', {
                action: 'add_to_cart',
                sessionid: g_sessionID,
                subid: freePackages[i]
            },
            function(data) {
                loaded++;

                modal.Dismiss();

                if (loaded === total) {
                    ShowAlertDialog('完成！', '已全部添加完毕。');
                } else {
                    modal = ShowBlockingWaitDialog('正在添加...', '载入 ' + loaded + '/' + total);
                }
            }
        ).fail(function() {
            loaded++;

            modal.Dismiss();

            if (loaded === total) {
                ShowAlertDialog('完成！', '已全部添加完毕。');
            } else {
                modal = ShowBlockingWaitDialog('正在添加...', '载入 ' + loaded + '/' + total);
            }
        });
    }
}

    */});
    var addfreescriptnode=document.createElement("script");
    addfreescriptnode.innerHTML=addfreescript;
    headelement.appendChild(addfreescriptnode);
    var addfree=getText(function(){/*

<br>
<div>输入SUB ID</div>
<div style="float: left;" class="block_content checkout_content_box">
<input style="width:450px;" name="free_appid" id="free_appid" type="text" class="registerkey_input_box_text" value="">
</div>
<div class="button_row">
<a tabindex="300" href="javascript:s_s_s_addfreefunction(document.getElementById('free_appid').value);" class="btnv6_blue_hoverfade btn_medium">
<span>添加免费游戏</span>
</a>
</div>

    */});
    leftcontent.innerHTML=leftcontent.innerHTML+addtowishlist+addfree;
})();