*** Convert YnHub Register to PtokaX

[NightLitch]

Here is a script that converts YnHub registry to PtokaX:

--//----------------------------------------------------------------------------------------------->>
--//-- Convert YnHub Register to PtokaX
--//-- Created by NightLitch 2005-04-23
--//-- To start the convert use specified command bellow in mainchat
--//-- Usage: #convert
--//----------------------------------------------------------------------------------------------->>

--//-- Specify the YnHub Profiles to work with your PtokaX Profiles
--//-- YnHub Profiles   =   PtokaX Profiles
ProfileRegistry = {
	["Owner"] = "Master",
	["OP"] = "Operator",
	["VIP"] = "VIP",
	["Registered"] = "Reg",
}

--//-- Specify the Path to YnHubs Register File
FileName = "filename_here.xml"

--//----------------------------------------------------------------------------------------------->>
--//-- Don't Edit
--//----------------------------------------------------------------------------------------------->>
function ConvertYnHubRegisterFile(filename)
    local curTable = {}
    local curNick = ""
    local Count = 0
    local file = io.open(filename, "r")
    for line in file:lines() do
        local s,e,col,value = string.find(line, "<(%S+)>(%S+)<")
        if col and value then
            if col == "Nick" and Count == 0 then
                curNick = value
                curTable[value] = {["Pass"] = "", ["Profile"] = ""}
                Count = Count + 1
            elseif col == "Pass" and Count == 1 then
                curTable[curNick].Pass = value
                Count = Count + 1
            elseif col == "Profile" and Count == 2 then
                curTable[curNick].Profile = value
                Count = 0
            end
        end
    end
    file:close()
    return curTable
end

function ChatArrival(sUser,sData)
	local _,_,Cmd = string.find(sData, "%b<>%s*(%S+)%|")
	if Cmd == "#convert" then
		sUser:SendData("Converter","Start Converting YnHub register into PtokaX register")
		local T = ConvertYnHubRegisterFile(FileName)
		local t,g,b = 0,0,0
		for nick,_ in T do
			t = t + 1
			if ProfileRegistry[T[nick].Profile] and GetProfileIdx(ProfileRegistry[T[nick].Profile]) ~= -1 then
				g = g + 1
				AddRegUser(nick,T[nick].Pass, GetProfileIdx(ProfileRegistry[T[nick].Profile]))
			else
				b = b +1
			end
		end
		sUser:SendData("Converter", "*** Total ( "..t.." ) registered user(s) is found in YnHub")
		sUser:SendData("Converter","*** Total ( "..g.." ) user(s) are registered to PtokaX registry")
		sUser:SendData("Converter","*** Total ( "..b.." ) user(s) is not registered because profiles doesn't exist in PtokaX")
		return 1
	end
end
--// NightLitch

Enjoy!

[Snooze]

Thanks NightLitch for a quick and great fix for all those poor people still running YnHub

Best regards,

Snooze

[NightLitch]

Thank you.

Fun that an old "veteran" can be of some use  :D  LooooL

Me Veteran no no no no no no no no no .....  :P

Take care man...

[GeceBekcisi]

Getting errors when I use script without any editing except file path,

[14:59:16]  Start Converting YnHub register into PtokaX register 
[14:59:16]  *** Total ( 0 ) registered user(s) is found in YnHub 
[14:59:16]  *** Total ( 0 ) user(s) are registered to PtokaX registry 
[14:59:16]  *** Total ( 0 ) user(s) is not registered because profiles doesn't exist in PtokaX

Couldnt make it work!

[NightLitch]

Originally posted by GeceBekcisi
Getting errors when I use script without any editing except file path,

[14:59:16]  Start Converting YnHub register into PtokaX register 
[14:59:16]  *** Total ( 0 ) registered user(s) is found in YnHub 
[14:59:16]  *** Total ( 0 ) user(s) are registered to PtokaX registry 
[14:59:16]  *** Total ( 0 ) user(s) is not registered because profiles doesn't exist in PtokaX

Couldnt make it work!

show me how you typed the part...

Easiest way is to copy the RegFile from YnHub into the Script folder in PtokaX and just enter the filename.

[DarkElf]

[13:47:00] Start Converting YnHub register into PtokaX register
[13:47:00] <[Wh???W???W]-?LiAl> #convert

And nothing else..

Ptokax(0.3.3.1)  say:

[13:47] Syntax ...rse dc++\hubserver\0.3.3.1.nt.dbg\scripts\yn2pto.lua:59: attempt to index local `file' (a nil value)

[Snooze]

Did you edit this part to fit your settings?

--//-- Specify the Path to YnHubs Register File
FileName = "filename_here.xml"

Snooze