// Torrent Info
// ©2024 bytim

//参考：
//https://en.wikipedia.org/wiki/Torrent_file
//https://en.wikipedia.org/wiki/Magnet_uri
//https://ted423.github.io/Document/Network/magnet/
//http://www.bittorrent.org/beps/bep_0000.html   BitTorrent增强建议索引
//http://bittorrent.org/beps/bep_0009.html
//https://github.com/bittorrent/bittorrent.org
//http://www.python.org/dev/peps/pep-0001
//https://github.com/nutbread/t2m/tree/gh-pages  JS种子转磁力链接，速度极快
//https://blog.rhilip.info/archives/1255/  Bittorrent v2对比及实践相关 
//https://pypi.org/project/BitTorrent-bencode/#files
//https://github.com/arvidn/libtorrent/
//https://resource.dopus.com/t/torrent-file-info/39836
//010 Editor 的脚本模板 Torrent.bt （支持torrent v2）
//https://www.sweetscape.com/010editor/repository/templates/
//https://www.sweetscape.com/010editor/repository/files/Torrent.bt


//v1.0 2023.11.06
//实现基本decode功能，及自定义列

//v1.1 2023.12.14
//添加了3个分组规则：总大小 文件数 制种日期

//v1.2.1 2023.12.19
//优化了Decode函数，更简洁

//v1.3.1 2023.12.21
//添加了Comment备注列
//添加了对GBK编码的处理
//添加了Publisher列

//v1.3.2 2024.2.2
//修正了对 "10:created by0:" 这种长度为0的字符串的处理
//修正了对 "9:publisher"与"19:publisher-url.utf-8" 可能混淆的解析

//v1.3.3 2024.4.15
//addColumn添加列时，"CreationDate" 改为 Global["Torrent.DateGroup"]


//全局定义脚本的基本信息，用于初始化OnInit和关于OnAboutScript等函数=============
var Global = { };
Global.SCRIPT_NAME = "Torrent Info";
Global.SCRIPT_DESC = DOpus.strings.Get("ScriptDesc");
Global.SCRIPT_VERSION = 'v1.3.3';
Global.SCRIPT_COPYRIGHT = '©2024 bytim';
Global.SCRIPT_MIN_VERSION = '12.23';
Global.SCRIPT_DATE = '2024.4.15';
Global.SCRIPT_GROUP = 'bytim';

Global.cfgGroupRange = DOpus.strings.Get("cfgGroupRange");
Global["Torrent.SizeGroup"] = 'TotalSize';
Global["Torrent.SizeByteGroup"] = 'TotalSizeByte';
Global["Torrent.CountGroup"] = 'FileCount';
Global["Torrent.DateGroup"] = 'CreationDate';

//===============================================================

function OnInit(data)
{
	data.name = Global.SCRIPT_NAME;
	data.version = Global.SCRIPT_VERSION;
	data.copyright = Global.SCRIPT_COPYRIGHT;
	data.url = "https://resource.dopus.com/t/column-torrentinfo-bt-bdecode-parsing-torrent-file-to-generate-metadata-columns/49741";
	data.desc = Global.SCRIPT_DESC;
	data.default_enable = true;
	data.min_version = Global.SCRIPT_MIN_VERSION;
	//data.group = Global.SCRIPT_GROUP

	///////////////////////////////////////////////////////////////////////////
	function ConfigHelper(data){ //v1.3 add config_groups
		var t=this; t.d=data; t.c=data.config; t.cd=DOpus.Create.Map();t.cg=DOpus.Create.Map();
		t.add=function(name, val, des){ t.l={n:name,ln:name.
			toLowerCase()}; return t.val(val).des(des);}
		t.des=function(des){ if (!des) return t; if (t.cd.empty)
			t.d.config_desc=t.cd; t.cd(t.l.n)=des; return t;}
		t.val=function(val){ var l=t.l; if (l.v!==l.x&&typeof l.v=="object")
			l.v.push_back(val);else l.v=t.c[l.n]=val;return t;}
		t.grp=function(grp){ if (!grp) return t; if (t.cg.empty)
			t.d.config_groups=t.cg; t.cg(t.l.n)=grp; return t;}
		t.trn=function(){return t.des(t("script.config."+t.l.ln));}
	}
	///////////////////////////////////////////////////////////////////////////
	
	var cfg = new ConfigHelper(data);
			
	cfg.add('Torrent.DateGroup', DOpus.Create.Vector())
		.val("0;86400;"+DOpus.strings.Get("DateGroup1"))
		.val("86400;259200;"+DOpus.strings.Get("DateGroup2"))
		.val("259200;604800;"+DOpus.strings.Get("DateGroup3"))
		.val("604800;1296000;"+DOpus.strings.Get("DateGroup4"))
		.val("1296000;2592000;"+DOpus.strings.Get("DateGroup5"))
		.val("2592000;7776000;"+DOpus.strings.Get("DateGroup6"))
		.val("7776000;31557600;"+DOpus.strings.Get("DateGroup7"))
		.val("31557600;63115200;"+DOpus.strings.Get("DateGroup8"))
		.val("63115200;94672800;"+DOpus.strings.Get("DateGroup9"))
		.val("94672800;0;"+DOpus.strings.Get("DateGroup10"))
		.des('制种时间分组范围与名称')
		.grp(Global.cfgGroupRange);
	
	cfg.add('Torrent.SizeGroup', DOpus.Create.Vector())
		.val("0;1048576;0 - 1 MB;"+DOpus.strings.Get("SizeGroup1"))
		.val("1048576;52428800;1 - 50 MB;"+DOpus.strings.Get("SizeGroup2"))
		.val("52428800;524288000;50 - 500 MB;"+DOpus.strings.Get("SizeGroup3"))
		.val("524288000;2147483648;500 MB - 2 GB;"+DOpus.strings.Get("SizeGroup4"))
		.val("2147483648;53687091200;2 - 50 GB;"+DOpus.strings.Get("SizeGroup5"))
		.val("53687091200;0;> 50 GB;"+DOpus.strings.Get("SizeGroup6"))
		.des('总大小分组范围与名称')
		.grp(Global.cfgGroupRange);
	
	cfg.add('Torrent.CountGroup', DOpus.Create.Vector())
		.val("0;2;"+DOpus.strings.Get("CountGroup1"))
		.val("2;11;"+DOpus.strings.Get("CountGroup2"))
		.val("11;51;"+DOpus.strings.Get("CountGroup3"))
		.val("51;151;"+DOpus.strings.Get("CountGroup4"))
		.val("151;1001;"+DOpus.strings.Get("CountGroup5"))
		.val("1001;10001;"+DOpus.strings.Get("CountGroup6"))
		.val("10001;0;"+DOpus.strings.Get("CountGroup7"))
		.des('文件数分组范围与名称')
		.grp(Global.cfgGroupRange);
}

function OnAddColumns(AddColData){
	addColumn(AddColData, "MetaName", "Column_GetMultiInfo", "left", "text", true, false, true,"","","","m");
	addColumn(AddColData, Global["Torrent.DateGroup"], "Column_GetMultiInfo", "center", "datetime", true, true, false, "Torrent.DateGroup", 0);
	addColumn(AddColData, "Tracker", "Column_GetMultiInfo", "left", "text", true, true, true);
	addColumn(AddColData, "CreatedBy", "Column_GetMultiInfo", "left", "text", true, true, true);
	addColumn(AddColData, "Encoding", "Column_GetMultiInfo", "center", "text", true, false, true);
	addColumn(AddColData, "Comment", "Column_GetMultiInfo", "left", "text", true, false, true);
	addColumn(AddColData, "Publisher", "Column_GetMultiInfo", "left", "text", true, false, true);
	addColumn(AddColData, Global["Torrent.SizeGroup"], "Column_SizeCount", "right", "size", true, false, false, "Torrent.SizeGroup", 1);
	addColumn(AddColData, Global["Torrent.SizeByteGroup"], "Column_SizeCount", "right", "", true, false, false, "Torrent.SizeGroup", 1);
	addColumn(AddColData, Global["Torrent.CountGroup"], "Column_SizeCount", "right", "number", true, false, false, "Torrent.CountGroup", 1, -1);
}

function addColumn(data, name, method, justify, type, multicol, autorefresh, autogroup, cfgGroupKey, grpOrder, defsort, ellipsis) {
    var colPrefix = 'Ti ';
    var col = data.AddColumn();
	col.keyscroll = true;
    col.name = name;
    col.header = DOpus.strings.Get(name);
    col.label = colPrefix + col.header;
    col.method = method;
    col.justify = justify;
    col.type = type;
    col.multicol = multicol;
    col.autorefresh = autorefresh;
    if(!autogroup) {
    col.autogroup = autogroup;
    col.grouporder = OrderGroup(cfgGroupKey, grpOrder);
	}
    if(defsort==-1)
    col.defsort = -1;//列的排序默认是asc升序，若 defsort=-1 则是desc逆序，日期、大小类型默认是desc，无须设置此值
    if(ellipsis=="m" && DOpus.version.AtLeast("13.1")) //超长时省略，默认是在尾部省略为"..."，ellipsis="m" 则将中间省略为"..."
    col.ellipsis = "m"; //v13才增加的属性 (v12会报错不支持此属性)
	//col.graph_colors.push_back(graph_colors)
}

function OrderGroup(cfgGroupKey, grpOrder){ //order=0, asc; order=1, desc
	var groupNames = new Array();
	cfgItem = Script.config[cfgGroupKey];
	for(var v=0;v<cfgItem.length;v++){
		var parts = cfgItem(v).split(";");
		groupNames.push(parts[3]+" ("+parts[2]+")");
	}
	if(grpOrder) groupNames.reverse();
	return groupNames.join(";");
}

function OnScriptConfigChange(cfgData){
	Script.InitColumns();//重新初始化OnAddColumns中的所有列，也使col.grouporder从配置中更新
	for (var e = new Enumerator(cfgData.changed); !e.atEnd(); e.moveNext()){ 
		var cfgItem = e.item(); 
		//DOpus.Output(Global[cfgItem]);
		Script.RefreshColumn(Global[cfgItem]);//刷新配置项对应的脚本列
	}
}

function OnAboutScript(AboutData){
	var dlg	= DOpus.Dlg;
	dlg.window = AboutData.window
	dlg.title = Global.SCRIPT_NAME + ' - Directory Opus';
	dlg.icon = 'info';
	dlg.message = "\n" + Global.SCRIPT_NAME + " " + Global.SCRIPT_VERSION + "\n\n" + 
					Global.SCRIPT_COPYRIGHT + "\n\n" + 
					Global.SCRIPT_DATE + "\n\n\n" + 
					Global.SCRIPT_DESC + "                ";
	dlg.buttons = DOpus.strings.Get("ok");
	//dlg.detach = true;
	//dlg.create;
	dlg.Show();
	while(true){
		var msg = dlg.GetMsg();
		if(!msg.result) break;
	}
}

var fsu = DOpus.FSUtil;
var StrTools = DOpus.Create.StringTools;

/*
function Column_MetaName(data){ //get single column value
	//...
	var result = Decode(fullBlob, infoStart-1);
	data.value = result.c || "";
}
*/

//字符编码映射，用于解码字符串类型，少数种子的 name、path、comment 可能非utf-8编码
//可用编码：在注册表 HKEY_CLASSES_ROOT\MIME\Database\Codepage  每项右边 [BodyCharset] 的值
var encodeMap = {"UTF-8":"utf-8", "GBK":"gb2312"};

function Column_GetMultiInfo(data){
	if (data.item.ext.toLowerCase() != ".torrent") return;
	var file = data.item.open();
	if (file.error) return;
	var fullBlob = file.Read()
	file.Close();
	
	var fields = {"Encoding":"8:encoding", "MetaName":"10:name.utf-8", "CreationDate":"13:creation date", 
					"CreatedBy":"10:created by", "Tracker":"8:announce", "Comment":"13:comment.utf-8", "Publisher":"15:publisher.utf-8"};
	//fields.Nodes = "5:nodes";//nodes字段值是list类型，包含一系列ip和端口的列表，是用于连接DHT初始node（如5:nodesll13:59.174.191.18i33158eel14:208.101.85.231i63551eee）
	//fields.PublisherUrl = "19:publisher-url.utf-8";
	var result;
	for (var key in fields) {
		//DOpus.Output(key +' "' + fields[key] + '"');
		var temp = DOpus.Create.Blob;
		temp.CopyFrom(fields[key],"utf8");
		var fieldPos = fullBlob.Find(temp);
		if ( fieldPos == -1) {
			if (key == "MetaName") temp.CopyFrom("4:name","utf8");
			else if (key == "Comment") temp.CopyFrom("7:comment","utf8");
			else if (key == "Publisher") { 
				temp.CopyFrom("9:publisher","utf8"); //May Error if existing "19:publisher-url.utf-8"
			}
			else { data.columns(key).value = "";continue;}
			
			fieldPos = fullBlob.Find(temp);
			if(fieldPos==-1) {	data.columns(key).value = "";continue;}
			else {
				fieldPos.Add(temp.size);
				if (key == "Publisher") { 
					nextchar = getChar(fullBlob, fieldPos, 1)
					if (!nextchar.match(/\d/)) //May get wrong string if existing "19:publisher-url.utf-8"
						{ data.columns(key).value = ""; continue;}
				}
				var enc="utf-8";
				if(data.columns("Encoding").value) enc = encodeMap[data.columns("Encoding").value];
				result = Decode(fullBlob, fieldPos-1, "", enc);
				//data.columns(key).value = result.c;
			}
		}
		else {
			fieldPos.Add(temp.size);
			//DOpus.Output(key + " Start at: " + fieldPos + "  in file: " + data.item.name);
			result = Decode(fullBlob, fieldPos-1);
		}
		//try {
			if(result.c) {
				if (key == "Comment")
					data.columns(key).value = result.c.replace(/\s+$/gm,"").replace(/(\n|\r\n){2,}/gm,"\n");
				else if (key == "CreationDate") {
					var crtDate = DOpus.Create.Date("1970-01-01 00:00:00");
					crtDate.Add(result.c);
					data.columns(key).value = crtDate.FromUTC();
					
					//分组归属处理
					var NowSecs=Math.round((new Date().valueOf())/1000);
					var diff = NowSecs-result.c;
					if(diff<0) diff=0;
					//DOpus.Output("diff: " + DOpus.TypeOf(result.c) + "  " +DOpus.TypeOf(diff));
					data.columns(key).group = InGroup("Torrent.DateGroup", diff);
				}
				else
					data.columns(key).value = result.c;
			} else data.columns(key).value = "";
		//} catch(e) {
		//	DOpus.Output("ERROR line 278 = " + e + "\n						ERROR Key: " + key + " in file: " + data.item.name, true);}
		temp.Free();
	}
	fullBlob.Free()
}

function Column_SizeCount(data) {
	if (data.item.ext.toLowerCase() != ".torrent") return;
	var file = data.item.open();
	if (file.error) return;
	var fullBlob = file.Read()
	file.Close();
	
	var field2 = "9:file tree";//v2版种子, 必须有此字段, 无论单文件或多文件
	var field1 = "5:files";//v1版多文件种子必有
	var key0 = "d0:";//v2版种子, key为空值, 循环找到一个空key, 即为找到一个(file tree中的)文件叶子
	var lenKey = "6:length";//BitComet制作的v1版单文件种子info中没有"5:files"，只有一个length值; 
	//uTorrent制作的单文件种子info中有"5:files"，files中只有一个文件字典，字典中有一个length数值和path列表 

	var infoStart = 0; 
	var total = {};
	total.fileCount=0;
	total.totalSize=fsu.NewFileSize();
	//var fileCount = 0; 
	//var totalSize = fsu.NewFileSize();
	var fileList = DOpus.Create.Vector;
	var result
	
	var temp = DOpus.Create.Blob;
	temp.CopyFrom(field2,"utf8");
	infoStart = fullBlob.Find(temp);//先查找v2版文件字典
	if (infoStart == -1) {//如果找不到v2版文件字典
		temp.CopyFrom(field1,"utf8");
		infoStart = fullBlob.Find(temp);//则查找v1版文件列表
		if(infoStart == -1) {//如果也找不到，则是单文件种子, 只需找到唯一的length
			temp.CopyFrom(lenKey,"utf8");
			infoStart = fullBlob.Find(temp);//查找唯一length
			if(infoStart == -1) return;//则种子无效
			else {
				infoStart.Add(temp.size)
				result = Decode(fullBlob,infoStart-1)
				total.totalSize.Add(result.c)
				total.fileCount = 1; 
			}
		}
		else {//v1版种子 "5:files"的文件列表，其中可能1个或多个文件字典
			infoStart.Add(temp.size)
			temp.Free();
			//DOpus.Output("Version 1 - Start:" + infoStart + " in file:" + data.item.name)
			result = Decode(fullBlob, infoStart-1, total)
			//fileList = result.c
		}
	}
	else {//v2版种子，file tree树中不会存在 _____padding_file 填充文件，每个"d0:"后是一个文件字典叶子
		temp.CopyFrom(key0,"utf8");
		infoStart = fullBlob.Find(temp,infoStart)
		while (infoStart != -1) {
			infoStart.Add(temp.size)
			result = Decode(fullBlob, infoStart-1);
			total.totalSize.Add(result.c("length"));//此时result.c 为仅有length这一个key的map，直接求和计算总大小
			total.fileCount++;
			//fileList.push_back(result.c); infoStart = result.pos;
			infoStart = fullBlob.Find(temp,result.pos)
		}
		temp.Free();
	}

	//DOpus.Output("typeof fileList: " + DOpus.TypeOf(fileList))
	/*
	if (DOpus.TypeOf(fileList)=="object.FileSize") {
		fileCount = 1;
		totalSize.Add(fileList);
	}
	else if(fileList.count>0){
		//DOpus.Output("typeof fileList(0): " + DOpus.TypeOf(fileList(0)))
		for (var e = new Enumerator(fileList); !e.atEnd(); e.moveNext())
		{
			if(e.item().exists("path") && e.item()("path")(0).search(/^_____padding_file/i) != -1 ) {
				//DOpus.Output(e.item()("path")(0))
				continue;
			}
			else {
				fileCount++;
				totalSize.add(e.item()("length"));
			}
		}
	}
	*/
	data.columns(Global["Torrent.SizeGroup"]).value = total.totalSize;
	data.columns(Global["Torrent.SizeByteGroup"]).value = total.totalSize;
	data.columns(Global["Torrent.CountGroup"]).value = total.fileCount;
	data.columns(Global["Torrent.SizeGroup"]).group = InGroup("Torrent.SizeGroup", total.totalSize);
	data.columns(Global["Torrent.SizeByteGroup"]).group = InGroup("Torrent.SizeGroup", total.totalSize);
	data.columns(Global["Torrent.CountGroup"]).group = InGroup("Torrent.CountGroup", total.fileCount);
}

//分组归属处理
function InGroup(cfgkey, value){
	var result = "";
	for(var v=0;v<Script.config[cfgkey].length;v++){
		var entry = Script.config[cfgkey](v);
		var parts = entry.split(";");
		var min = parseInt(parts[0],10);
		var max = parseInt(parts[1],10);
		if (max == 0){
			if (value>=min){
				result = parts[3]+" ("+parts[2]+")";
				break;
			}
		}
		else if (value<max && value>=min){
			result = parts[3]+" ("+parts[2]+")";
			break;
		}
	}
	return result;
}

//================================================================
function getChar(Blob, pos, size, enc) {
	if (size==0) return "";
	else {
		enc = typeof(enc)=="undefined"?"utf-8":enc;
		var tmp = DOpus.Create.Blob;
		tmp.CopyFrom(Blob,0,pos,size);
		return StrTools.decode(tmp, enc);
	}
}

function Decode(Blob, pos, total, enc){
	var Char = getChar(Blob, ++pos, 1);//get next char, and move to next position; "++pos" also converts its type to number.
	//DOpus.Output("start: " + pos +"  char:" + Char);
	switch (Char) {
		case "d":
				var dict = DOpus.Create.Map;
				var key = "";
				Char = getChar(Blob, pos+1, 1);//get next char
				while (Char != 'e'){
					var result = Decode(Blob, pos, total);
					key = result.c; pos = result.pos;
					key = key.toLowerCase();
					//DOpus.Output("switch key: "+ key + " pos:" + pos);
					/*
					switch (key) {
						case "path":
						case "length":
							result = Decode(Blob, pos);
							dict(key) = result.c; pos = result.pos;
							//DOpus.Output("length: "+result.c+" pos:" + pos);
							break;
						default:
							result = Decode(Blob, pos);
							pos = result.pos;
							//DOpus.Output("other end pos: "+ pos );
					}
					*/
					result = Decode(Blob, pos, total);	pos = result.pos;
					if(key=="path" || key=="length")
						dict(key) = result.c;
					//if(DOpus.TypeOf(result.c)=="object.Vector") DOpus.Output("key:"+key+" result.c:" + result.c(0));
					Char = getChar(Blob, pos+1, 1);
				}
				//DOpus.Output("dict end:" + pos);
				return {c:dict, pos:++pos}
				break;
		case "l":
				var list = DOpus.Create.Vector;
				Char = getChar(Blob, pos+1, 1);
				while (Char != 'e'){
					var result = Decode(Blob, pos, total);
					//DOpus.Output("pos:" + pos + " " + DOpus.TypeOf(result.c))
					if(DOpus.TypeOf(result.c)=="object.Map" && result.c.exists("length")){//若结果是文件字典，则加入计算【此if段是第二次优化所加，避免将结果返回到外部后再次遍历以求和，对文件数3W+的种子能稍为提高效率】
						if(!result.c.exists("path") || result.c("path")(0).search(/^_____padding_file/i) == -1 ) {//排除padding_file填充文件
							total.fileCount++;
							total.totalSize.Add(result.c("length"));
						}
					}
					list.push_back(result.c); pos = result.pos;
					Char = getChar(Blob, pos+1, 1);
				}
				//DOpus.Output("List end pos:" + pos);
				return {c:list, pos:++pos}
				break;
		case "i":
				Char = getChar(Blob, ++pos, 1);
				var result = ""
				while (Char != "e")
				{
					result += Char;
					Char = getChar(Blob, ++pos, 1);
				}
				//DOpus.Output("length end pos：" +pos);
				return {c:fsu.NewFileSize(result), pos:pos};
				break;
		case "0":case "1":case "2":case "3":case "4":case "5":case "6":case "7":case "8":case "9":
				var size = ""
				while (Char != ":") {
					size += Char;
					Char = getChar(Blob, ++pos, 1);
				}
				var str = getChar(Blob, pos+1, size, enc)
				//if(size==0)DOpus.Output("string is - " + str + "  end at: " + (pos+Number(size)))
				return {c:str, pos:pos+Number(size)}
	}
}
/*
function Decode(Blob, pos){
	var Char = getChar(Blob, ++pos, 1);//get next char, and move to next position; "++pos" also converts its type to number.
	//DOpus.Output("start: " + pos +"  char:" + Char);
	switch (Char) {
		case "d":
				var dict = DOpus.Create.Map;
				var key = "";
				Char = getChar(Blob, pos+1, 1);//get next char
			    while (Char != 'e'){
					var result = Decode(Blob, pos);
					key = result.c; pos = result.pos;
					//DOpus.Output("switch key: "+ key + " pos:" + pos);
					key = key.toLowerCase();
					result = Decode(Blob, pos);	pos = result.pos;
					if(key=="path" || key=="length")
						dict(key) = result.c;
					Char = getChar(Blob, pos+1, 1);
				}
				//DOpus.Output("dict end:" + pos);
				return {c:dict, pos:++pos}
				break;
		case "l":
				var list = DOpus.Create.Vector;
				Char = getChar(Blob, pos+1, 1);
				while (Char != 'e'){
					var result = Decode(Blob, pos);
					list.push_back(result.c); pos = result.pos;
					Char = getChar(Blob, pos+1, 1);
				}
				//DOpus.Output("List end pos:" + pos);
				return {c:list,pos:++pos}
				break;
		case "i":
				Char = getChar(Blob, ++pos, 1);
				var result = ""
				while (Char != "e")
				{
					result += Char;
					Char = getChar(Blob, ++pos, 1);
				}
				//DOpus.Output("length end pos：" +pos);
				return {c:fsu.NewFileSize(result), pos:pos};
				break;
		case "0":case "1":case "2":case "3":case "4":case "5":case "6":case "7":case "8":case "9":
				var size = ""
				while (Char != ":") {
					size += Char;
					Char = getChar(Blob, ++pos, 1);
				}
				var str = getChar(Blob, pos+1, size)
				//DOpus.Output("string is - " + str + "  end at: " + (pos+Number(size)))
				return {c:str, pos:pos+Number(size)}
	}
}
*/

//将种子数据编码为字节流=========================================
/*
function Bencode(outBlob,Element) { //Element是未经编码的数据(字典、列表等)，outBlob是编码后的字节流结果
	//DOpus.Output(DOpus.TypeOf(Element))
	var temp = DOpus.Create.Blob
	var temp2 = DOpus.Create.Blob
	switch (DOpus.TypeOf(Element).toLowerCase()) {
		case "string"://字符串
			temp.CopyFrom(Element,"utf8")
			temp2.CopyFrom(temp.size+":","utf8")
			outBlob.CopyFrom(temp2,outBlob.size)
			outBlob.CopyFrom(temp,outBlob.size)
			break;
		case "object.filesize"://数字
			temp.CopyFrom("i"+Element+"e","utf8") 
			outBlob.CopyFrom(temp,outBlob.size)
			break;
		case "object.blob":
			temp.CopyFrom(Element.size+":","utf8")
			outBlob.CopyFrom(temp,outBlob.size)
			outBlob.CopyFrom(Element,outBlob.size)
			break;
		case "object.vector"://列表list
			temp.CopyFrom("l","utf8")
			outBlob.CopyFrom(temp,outBlob.size)
			for (var e = new Enumerator(Element); !e.atEnd(); e.moveNext())
			{
				//DOpus.Output("child file: " + DOpus.TypeOf(e.item()))
				Bencode(outBlob,e.item());
			}
			temp.CopyFrom("e","utf8")
			outBlob.CopyFrom(temp,outBlob.size)
			break;
		case "object.map"://字典dictionary
			temp.CopyFrom("d","utf8")
			outBlob.CopyFrom(temp,outBlob.size)
			for (var e = new Enumerator(Element); !e.atEnd(); e.moveNext())
			{
				var key = e.item();
				//DOpus.Output(key + " " + DOpus.TypeOf(Element(key)))
				Bencode(outBlob,key);
				Bencode(outBlob,Element(key));
			}
			temp.CopyFrom("e","utf8")
			outBlob.CopyFrom(temp,outBlob.size)
	}
	temp.Free()
	temp2.Free()
}
*/
//================================================================

==SCRIPT RESOURCES
<resources>
	<resource type="strings">
		<strings lang="english">
			<string id="ScriptDesc" text="Parsing .torrent file to generate metadata columns.Torrent v1 and V2 are both supported." />
			<string id="MetaName" text="Name Inside" />
			<string id="TotalSize" text="Total Size" />
			<string id="TotalSizeByte" text="Total Size(Bytes)" />
			<string id="FileCount" text="File Count" />
			<string id="CreationDate" text="Creation Date" />
			<string id="Tracker" text="Tracker" />
			<string id="CreatedBy" text="Created By" />
			<string id="Encoding" text="Encoding" />
			<string id="Comment" text="Comment" />
			<string id="Publisher" text="Publisher" />
			<string id="ok" text="&amp;OK" />
			
			<string id="cfgGroupRange" text="Group range setting" />
			<string id="DateGroup1" text="0-24 hours;Within 1 day" />
			<string id="DateGroup2" text="1-3 days;Within 3 days" />
			<string id="DateGroup3" text="3-7 days;Within 7 days" />
			<string id="DateGroup4" text="7-15 days;Within 15 days" />
			<string id="DateGroup5" text="15-30 days;Within 1 month" />
			<string id="DateGroup6" text="1-3 months;Within 3 months" />
			<string id="DateGroup7" text="3-12 months;Within 1 year" />
			<string id="DateGroup8" text="1-2 years;Within 2 years" />
			<string id="DateGroup9" text="2-3 years;Within 3 years" />
			<string id="DateGroup10" text="Three years or more;A long time ago" />
			
			<string id="SizeGroup1" text="Tiny" />
			<string id="SizeGroup2" text="Small" />
			<string id="SizeGroup3" text="Medium" />
			<string id="SizeGroup4" text="Large" />
			<string id="SizeGroup5" text="Very large" />
			<string id="SizeGroup6" text="Huge" />
			
			<string id="CountGroup1" text="1 file;Olny one" />
			<string id="CountGroup2" text="2 - 10 files;A few" />
			<string id="CountGroup3" text="11 - 50 files;Medium" />
			<string id="CountGroup4" text="51 - 150 files;Many" />
			<string id="CountGroup5" text="151 - 1000 files;Hundreds" />
			<string id="CountGroup6" text="1000 -10000 files;Thousands" />
			<string id="CountGroup7" text="More than 10000 files;Quite a lot" />
		</strings>
		<strings lang="chs">
			<string id="ScriptDesc" text="解析BT种子文件torrent的数据生成信息列, v1和v2种子都支持." />
			<string id="MetaName" text="内部名称" />
			<string id="TotalSize" text="总大小" />
			<string id="TotalSizeByte" text="总大小(字节)" />
			<string id="FileCount" text="文件数" />
			<string id="CreationDate" text="制种日期" />
			<string id="Tracker" text="Tracker" />
			<string id="CreatedBy" text="制种软件" />
			<string id="Encoding" text="编码" />
			<string id="Comment" text="备注" />
			<string id="Publisher" text="发布者" />
			<string id="ok" text="确定(&amp;O)" />
			
			<string id="cfgGroupRange" text="分组区段设置" />
			<string id="DateGroup1" text="0-24 小时;1天内" />
			<string id="DateGroup2" text="1-3 天;3天内" />
			<string id="DateGroup3" text="3-7 天;7天内" />
			<string id="DateGroup4" text="7-15 天;15天内" />
			<string id="DateGroup5" text="15-30 天;1个月内" />
			<string id="DateGroup6" text="1-3 个月;3个月内" />
			<string id="DateGroup7" text="3-12 个月;1年内" />
			<string id="DateGroup8" text="1-2 年;2年内" />
			<string id="DateGroup9" text="2-3 年;3年内" />
			<string id="DateGroup10" text="3年以上;很久以前" />
			
			<string id="SizeGroup1" text="很小" />
			<string id="SizeGroup2" text="小" />
			<string id="SizeGroup3" text="中" />
			<string id="SizeGroup4" text="大" />
			<string id="SizeGroup5" text="很大" />
			<string id="SizeGroup6" text="非常大" />
			
			<string id="CountGroup1" text="1 个;最少" />
			<string id="CountGroup2" text="2 - 10 个;少" />
			<string id="CountGroup3" text="11 - 50 个;中" />
			<string id="CountGroup4" text="51 - 150 个;多" />
			<string id="CountGroup5" text="151 - 1000 个;较多" />
			<string id="CountGroup6" text="1000 -10000 个;很多" />
			<string id="CountGroup7" text="多于 10000 个;超多" />
		</strings>
	</resource>
</resources>