Tr0n/server
1
0
Fork 0
forked from metin2/server
Code Issues Pull Requests Activity

change: Ignore build files, replace mysql password with Argon2.

Browse Source 
add: Missing .gitignore.
This commit is contained in:
WildEgo
2024-05-31 10:49:21 +01:00
parent ae708d9315
commit 65a81ec4a1
9 changed files with 95 additions and 101 deletions
Download Patch File Download Diff File Expand all files Collapse all files

71
gamefiles/data/quest/questing.lua
View File

@ -51,8 +51,8 @@ mysql_query = function(query)
end
math.randomseed(os.time())
local fi,t,out = 'mysql_data_'..math.random(10^9)+math.random(2^4,2^10),{},{}
--os.execute('mysql '..pre..' --e='..string.format('%q',query)..' > '..fi) -- f<>r MySQL51
os.execute('mysql '..pre..' -e'..string.format('%q',query)..' > '..fi) -- f<>r MySQL55
--os.execute('mysql '..pre..' --e='..string.format('%q',query)..' > '..fi) -- f<>r MySQL51
os.execute('mysql '..pre..' -e'..string.format('%q',query)..' > '..fi) -- f<>r MySQL55
for av in io.open(fi,'r'):lines() do table.insert(t,split(av,'\t')) end; os.remove(fi);
for i = 2, table.getn(t) do table.foreach(t[i],function(a,b)
out[i-1] = out[i-1] or {}
@ -100,7 +100,7 @@ function mysql_query_old(query,user,pass,db,ip)
os.remove(path)
if type(q.l[1]) ~= "table" then
return "ERROR"
--error("Fehler bei der MySQL Verbindung oder bei der R<>ckgabe! Abbruch!")
--error("Fehler bei der MySQL Verbindung oder bei der R<>ckgabe! Abbruch!")
end
local ix = 0
table.foreachi(q.l,function(i,l)
@ -115,7 +115,7 @@ function mysql_query_old(query,user,pass,db,ip)
end) end
end)
-- ENDE der eigentlichen MySQL-Funktion
-- START Zusatz: Hanashi-Kompatibilit<69>t & Fehlerbehandlung
-- START Zusatz: Hanashi-Kompatibilit<69>t & Fehlerbehandlung
q.out.__data = q.l[1]
setmetatable(q.out, { __index = function(a,b)
if type(b) == "number" then
@ -132,7 +132,7 @@ end
@name define
@author Mijago
@descr
Gibt die M<>glichkeit, globale Variablen zu definieren. Es k<>nnen auch Funktionen genutzt werden! Diese werden dann AUSGEF<45>HRT zur<75>ckgegeben!
Gibt die M<>glichkeit, globale Variablen zu definieren. Es k<>nnen auch Funktionen genutzt werden! Diese werden dann AUSGEF<45>HRT zur<75>ckgegeben!
--]]
_G.__data = {}
local meta = getmetatable(_G) or {}
@ -155,7 +155,7 @@ end
@name duration
@author Mijago
@descr
Gibt die verbleibende Zeit als String zur<75>ck.
Gibt die verbleibende Zeit als String zur<75>ck.
--]]
function duration(ipe)
local ipe,dat= ipe or 0,''
@ -183,7 +183,7 @@ end
@name is_number
@author Mijago
@descr
Pr<EFBFBD>ft, ob eine Variable eine Zahl ist.
Pr<EFBFBD>ft, ob eine Variable eine Zahl ist.
--]]
function is_number(var)
return (type(var) == "number")
@ -194,7 +194,7 @@ end
@name is_string
@author Mijago
@descr
Pr<EFBFBD>ft, ob eine Variable ein String ist.
Pr<EFBFBD>ft, ob eine Variable ein String ist.
--]]
function is_string(var)
return (type(var) == "string")
@ -205,7 +205,7 @@ end
@name is_table
@author Mijago
@descr
Pr<EFBFBD>ft, ob eine Variable eine Tabelle ist.
Pr<EFBFBD>ft, ob eine Variable eine Tabelle ist.
--]]
function is_table(var)
return (type(var) == "table")
@ -216,7 +216,7 @@ end
@name in_table
@author Mijago
@descr
Pr<EFBFBD>ft, ob eine Variablei in einer Tabelle ist.
Pr<EFBFBD>ft, ob eine Variablei in einer Tabelle ist.
Aufruf: in_table(var,table)
--]]
function in_table ( e, t )
@ -292,7 +292,7 @@ end
@name math.minmax
@author Mijago
@descr
Erm<EFBFBD>glicht die Angabe von min und max auf einmal
Erm<EFBFBD>glicht die Angabe von min und max auf einmal
--]]
math.minmax = function(min,num,max)
return math.min(math.max(num,min),max)
@ -304,8 +304,8 @@ end
@name n_input
@author Mijago
@descr
F<EFBFBD>r Inputs nur f<>r Zahlen.
Die Zahl ist IMMER positiv. Wenn sie nicht g<>ltig ist, ist sie 0.
F<EFBFBD>r Inputs nur f<>r Zahlen.
Die Zahl ist IMMER positiv. Wenn sie nicht g<>ltig ist, ist sie 0.
--]]
function n_input()
return math.abs(tonumber(input()) or 0)
@ -316,7 +316,7 @@ end
@name long_input
@author Mijago
@descr
Erm<EFBFBD>glicht es, l<>ngere Inputs zu nutzen.
Erm<EFBFBD>glicht es, l<>ngere Inputs zu nutzen.
--]]
function long_input()
local str,t = "",input()
@ -358,7 +358,7 @@ function select2(tab,...)
outputstr=outputstr..'sel = select("'..l..'"'
elseif outputcount == max and tablen > outputcount+incit then
if tablen ~= outputcount+incit+1 then
outputstr=outputstr..',"'..l..'","N<>chste Seite") + '..incit..' '
outputstr=outputstr..',"'..l..'","N<>chste Seite") + '..incit..' '
if nextc > 0 then
outputstr = outputstr..'end '
end
@ -392,7 +392,7 @@ end
@descr
Wie Select2:
Eine Tabelle oder eine Stringliste wird auf Seiten aufgeteilt.
Weiter, Zur<75>ck und Abbrechen (-1) Buttons.
Weiter, Zur<75>ck und Abbrechen (-1) Buttons.
--]]
function select3(...)
arg.n = nil
@ -438,7 +438,7 @@ function select3(...)
pe[i] = copy_tab(px[i])
local next,back,exit = 0,0,0
if i < table.getn(pe) and table.getn(pe) ~=1 then table.insert(pe[i],table.getn(pe[i])+1,'Weiter zu Seite '..(i+1)); next = table.getn(pe[i]) end
if i > 1 then table.insert(pe[i],table.getn(pe[i])+1,'Zur<EFBFBD>ck zu Seite '..(i-1)); back = table.getn(pe[i]) end
if i > 1 then table.insert(pe[i],table.getn(pe[i])+1,'Zur<EFBFBD>ck zu Seite '..(i-1)); back = table.getn(pe[i]) end
table.insert(pe[i],table.getn(pe[i])+1,'Abbruch'); exit = table.getn(pe[i])
if table.getn(pe) > 1 then
say('Seite '..i..' von '..table.getn(pe))
@ -564,7 +564,7 @@ zt.s_ms = function(s)
@name Autoumbruch in Say
@author Mijago
@descr
F<EFBFBD>gt die Funktion say2 an.
F<EFBFBD>gt die Funktion say2 an.
Mit ihr werden Texte automatisch umgebrochen.
--]]
function say2(str,dx)
@ -616,13 +616,14 @@ end
@author Mijago; Idee von Benhero
@needs mysql_query
@descr
Funktion zum <20>ndern des Nutzerpasswortes.
Funktion zum <20>ndern des Nutzerpasswortes.
Angabe des Accounts kann weggelassen werden, als Accountname oder als Account ID angegeben werden.
--]]
account = account or {}
function account.set_pw(pw,ac)
if pw == nil then error("Fehler... Passwort muss gesetzt werden!") end
local ac = ac or pc.get_account_id()
-- This is weird behaviour and might need to be changed if ever used.
if type(ac) == "string" then
mysql_query("UPDATE player.player,account.account SET account.password = password("..string.format('%q',pw)..") WHERE account.id = player.account_id and player.name = '"..ac.."' LIMIT 1")
elseif type(ac) == "number" then
@ -635,7 +636,7 @@ end
@name pc.check_inventory_place
@author Mijago
@descr
Checkt auf Freie Inventarpl<70>tze f<>r Items der gr<67><72>e X (H<>he).
Checkt auf Freie Inventarpl<70>tze f<>r Items der gr<67><72>e X (H<>he).
--]]
function pc.check_inventory_place(size)
if size <= 0 or size > 3 then
@ -663,7 +664,7 @@ end
@name do_for_other
@author Mijago
@descr
F<EFBFBD>hrt einen String als Luabefehle bei einem anderem User aus.
F<EFBFBD>hrt einen String als Luabefehle bei einem anderem User aus.
--]]
function do_for_other(name,ding)
local t = pc.select(find_pc_by_name(name))
@ -678,7 +679,7 @@ end
@descr
Setzt die Questflag eines anderen Spielers.
--]]
function local_pc_setqf(name, qf,wert) -- F<>r die aktuelle Quest
function local_pc_setqf(name, qf,wert) -- F<>r die aktuelle Quest
local target = find_pc_by_name(name)
local t = pc.select(target)
pc.setqf(qf,wert)
@ -753,7 +754,7 @@ end
@name download
@author Mijago
@descr
L<EFBFBD>dt eine Datei in den Data-Ordner.
L<EFBFBD>dt eine Datei in den Data-Ordner.
--]]
function download(url) os.execute("cd data && fetch "..url.." && cd ..") end
@ -762,7 +763,7 @@ function download(url) os.execute("cd data && fetch "..url.." && cd ..") end
@name dot
@author Mijago
@descr
F<EFBFBD>hrt alles Zwischen $ und $ im String aus.
F<EFBFBD>hrt alles Zwischen $ und $ im String aus.
--]]
function dot(x)
return string.gsub(x, "%$(.-)%$", function (s) return loadstring(s)() end)
@ -773,7 +774,7 @@ end
@name dostr
@author Mijago
@descr
F<EFBFBD>hrt einen String als Lua-Befehl aus.
F<EFBFBD>hrt einen String als Lua-Befehl aus.
--]]
function dostr(str)
assert(loadstring(str))()
@ -785,7 +786,7 @@ end
@author Mijago
@needs mysql_query
@descr
Versetzt alle Accounts (au<61>er GM-Accounts) in einen "Wartungsmodus" und wieder zur<75>ck.
Versetzt alle Accounts (au<61>er GM-Accounts) in einen "Wartungsmodus" und wieder zur<75>ck.
--]]
function wartungsmodus(v)
if v == 1 or v == true then
@ -815,7 +816,7 @@ end
@name INI-Parser
@author Mijago
@descr
Ein NEUER Parser f<>r INI-Dateien.
Ein NEUER Parser f<>r INI-Dateien.
--]]
ini = {
open = function(path)
@ -840,7 +841,7 @@ ini = {
else
r = r.."\n["..section.."]\n"..key.."="..value
end
-- <20>berfl<66>ssige leerzeichen l<>schen
-- <20>berfl<66>ssige leerzeichen l<>schen
r=string.gsub(string.gsub(string.gsub(r,"^(\n)",""),"(\n)$",""),"\n\n","\n")
local d = io.open(self.path,"w")
d:write(r)
@ -895,7 +896,7 @@ ini = {
@needs split
@descr
-- OUTDATED --
Ein Parser f<>r Ini-Dateien.
Ein Parser f<>r Ini-Dateien.
Besitzt eine Eigene Beschreibung der einzelnen Funktionen im Code.
--]]
do
@ -906,9 +907,9 @@ do
-- var:write_int(sub,name,wert)
-- var:write_bool(sub,name,boolean)
-- var:clear()
-- var:read_str(sub,name,norm) -- Gibt einen String zur<75>ck. -|
-- var:read_int(sub,name,norm) -- Gibt eine Zahl zur<75>ck -| norm wird zur<75>ckgegeben, wenn sub[name] nicht existiert.
-- var:read_bool(sub,name,norm) -- Gibt true / False zur<75>ck -|
-- var:read_str(sub,name,norm) -- Gibt einen String zur<75>ck. -|
-- var:read_int(sub,name,norm) -- Gibt eine Zahl zur<75>ck -| norm wird zur<75>ckgegeben, wenn sub[name] nicht existiert.
-- var:read_bool(sub,name,norm) -- Gibt true / False zur<75>ck -|
-- var:delete_key(sub,nm)
-- var:delete_section(sub)
local ini_f = {}
@ -997,7 +998,7 @@ do
if self.sub[sub] == nil then return norm end
if self.sub[sub][nm] == nil then return norm else return tonumber(self.sub[sub][nm]) end
end
function ini_f:read_bool(sub,nm,norm) -- Norm wird zur<75>ckgegeben, wenn der Key nm nicht existiert
function ini_f:read_bool(sub,nm,norm) -- Norm wird zur<75>ckgegeben, wenn der Key nm nicht existiert
if sub == '' or nm == '' or sub == nil or nm == nil then return end
self:parse()
if self.sub[sub] == nil then return norm end
@ -1032,7 +1033,7 @@ end
Wie die alten col-Befehle, sendet aber selbst.
Also kein say(col.red('bla'))
sondern
csay.red('bla') reicht v<>llig aus.
csay.red('bla') reicht v<>llig aus.
--]]
csay = setmetatable({__d = {
["aliceblue"] = {240, 248, 255}, ["antiquewhite"] = {250, 235, 215}, ["aqua"] = {0, 255, 255}, ["aquamarine"] = {127, 255, 212},
@ -1082,7 +1083,7 @@ csay = setmetatable({__d = {
@name Farbcodes
@author Mijago
@descr
Farbcodes f<>r Say
Farbcodes f<>r Say
--]]
col = col or {}
col.list= {