Country id

[-.Paradox.-]

Hello, i download countryid resource it show Country names, but wont show my country, i'm from morocco, and i can't see my country in scoreboard i guess because i have a local ip, there isn't a solution for it? i have morocco flag in admin folder and i add it to meta.xml

here is the code:

  
  
-- IMPORTANT: If you don't want to read this just don't read it 
-- and please if you change the script, keep my credits. 
  
  
  
--[[ 
  
****************************************** 
* 
*    PROJECT:    Country ID Project v1.1.1 
* 
*    Made by:    Timic 
*    Thanks to:  lil_Toady 
* 
****************************************** 
  
>> Description 
  
"Hello, thanks for using this resource, I'm 
very glad to update it to 1.1 and improve it 
I'll still continue this project, so report 
every bug on the community." 
  
========================================== 
  
>> Installation 
  
Just open countryid.zip and then you'll have 
to insert it into a folder, so create a folder 
called countryid and then put files into the folder 
you created. 
You'll also have to put this folder into 
":\Program Files\\server\mods\deathmatch\resources\" 
folder. 
If your server was running at the time of 
installation, just type: refresh 
in console or /refresh in chat box. Of 
course you must be logged in as admin to 
use these commands. 
  
IMPORTANT: 
  
Of course you'll have to put it in the ACL.xml file. 
(ACL means Access Control List) 
  
Example: 
a) Open ACL.XML 
b) Add after  the following line 
c)  
d) Save it 
e) Restart the server 
f) Type in console refresh or type /refresh in chatbox 
g) Start it (Type in console start or type /start in chatbox) 
  
========================================== 
  
>> LICENCE 
  
NO WARRANTY 
THE SOFTWARE IS DISTRIBUTED IN THE HOPE THAT IT WILL BE USEFUL, 
BUT WITHOUT ANY WARRANTY. IT IS PROVIDED "AS IS" WITHOUT WARRANTY 
OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT 
NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND 
FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE 
QUALITY AND PERFORMANCE OF THE SOFTWARE IS WITH YOU. SHOULD THE 
SOFTWARE PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY 
SERVICING, REPAIR OR CORRECTION. 
  
]] 
  
g_Root = getRootElement() 
  
function Initiate() 
    country = getPlayerCountry(source) 
        if country == nil or country == false then 
           country = "n/a" 
        end 
    setElementData(source, "country", country) 
end 
addEventHandler('onPlayerJoin', g_Root, Initiate) 
  
addEventHandler("onResourceStart",getResourceRootElement(getThisResource()),function() 
-- You can remove this if you want 
outputChatBox('#ffffff[C_ID] #ffff00Initiating CID system... #ffffffDONE', getRootElement(), 255, 100, 100, true) 
        call(getResourceFromName("scoreboard"),"addScoreboardColumn","country", getRootElement(), 9, 50) 
        setTimer( 
function() 
     country = getPlayerCountry(source) 
        if country == nil or country == false then 
           country = "n/a" 
        end 
    setElementData(source, "country", country) 
end, 4000, 1) 
  
    end 
) 
aCountries = {} 
  
  
function getPlayerCountry ( player ) 
    return getIpCountry ( getPlayerIP ( player ) ) 
end 
function getIpCountry ( ip ) 
    local ip_group = tonumber ( gettok ( ip, 1, 46 ) ) 
    local ip_code = ( gettok ( ip, 1, 46 ) * 16777216 ) + ( gettok ( ip, 2, 46 ) * 65536 ) + ( gettok ( ip, 3, 46 ) * 256 ) + ( gettok ( ip, 4, 46 ) ) 
    if ( #aCountries == 0 ) then 
        loadIPGroups () 
    end 
    if ( not aCountries[ip_group] ) then 
        aCountries[ip_group] = {} 
    end 
    for id, group in ipairs ( aCountries[ip_group] ) do 
        if ( ( group.rstart <= ip_code ) and ( ip_code <= group.rend ) ) then 
            return group.rcountry 
        end 
    end 
    return false 
end 
  
  
-- Load all IP groups from "conf/IpToCountryCompact.csv" 
function loadIPGroups () 
    unrelPosReset() 
  
    local readFilename = "conf/IpToCountryCompact.csv"; 
    local hReadFile = fileOpen( readFilename, true ) 
    if not hReadFile then 
        outputHere ( "Cannot read " .. readFilename ) 
        return 
    end 
  
    local buffer = "" 
    while true do 
        local endpos = string.find(buffer, "\n") 
  
        -- If can't find CR, try to load more from the file 
        if not endpos then 
            if fileIsEOF( hReadFile ) then 
                break 
            end 
            buffer = buffer .. fileRead( hReadFile, 500 ) 
        end 
  
        if endpos then 
            -- Process line 
            local line = string.sub(buffer, 1, endpos - 1) 
            buffer = string.sub(buffer, endpos + 1) 
  
            local parts = split( line, string.byte(',') ) 
            if #parts > 2 then 
                local rstart = tonumber(parts[1]) 
                local rend = tonumber(parts[2]) 
                local rcountry = parts[3] 
  
                -- Relative to absolute numbers 
                rstart = unrelRange ( rstart ) 
                rend = unrelRange ( rend ) 
  
                local group = math.floor( rstart / 0x1000000 ) 
  
                if not aCountries[group] then 
                    aCountries[group] = {} 
                end 
                local count = #aCountries[group] + 1 
                aCountries[group][count] = {} 
                aCountries[group][count].rstart = rstart 
                aCountries[group][count].rend = rend 
                aCountries[group][count].rcountry = rcountry 
            end 
        end 
    end 
  
    fileClose(hReadFile) 
end 
  
  
  
-- Make a stream of absolute numbers relative to each other 
local relPos = 0 
function relPosReset() 
    relPos = 0 
end 
function relRange( v ) 
    local rel = v - relPos 
    relPos = v 
    return rel 
end 
  
-- Make a stream of relative numbers absolute 
local unrelPos = 0 
function unrelPosReset() 
    unrelPos = 0 
end 
function unrelRange( v ) 
    local unrel = v + unrelPos 
    unrelPos = unrel 
    return unrel 
end 
  
  
-- IP2C logging 
function outputHere( msg ) 
    --outputServerLog ( msg ) 
    outputChatBox ( msg ) 
end 
  
  
---------------------------------------------------------------------------------------- 
-- 
-- Set to true to enable commands "makecsv" and "iptest" 
-- 
---------------------------------------------------------------------------------------- 
local makeAndTestCompactCsv = false 
  
  
if makeAndTestCompactCsv then 
  
    local makeCor 
  
    -- Takes a 'IPV4 CSV' file sourced from [url=http://software77.net/geo-ip/]http://software77.net/geo-ip/[/url] 
    -- and makes a smaller one for use by Admin 
    addCommandHandler ( "makecsv", 
        function () 
            local status = makeCor and coroutine.status(makeCor) 
            if (status == "suspended") then 
                outputHere( "Please wait" ) 
                return 
            end 
            makeCor = coroutine.create ( makeCompactCsvWorker ) 
            coroutine.resume ( makeCor ) 
        end 
    ) 
  
  
    function makeCompactCsvWorker () 
        outputHere ( "makeCompactCsv started" ) 
        relPosReset() 
  
        local readFilename = "conf/IpToCountry.csv"; 
        local hReadFile = fileOpen( readFilename, true ) 
        if not hReadFile then 
            outputHere ( "Cannot read " .. readFilename ) 
            return 
        end 
  
        local writeFilename = "conf/IpToCountryCompact.csv"; 
        local hWriteFile = fileCreate( writeFilename, true ) 
        if not hWriteFile then 
            

[-.Paradox.-]

Bump

[codeluaeveryday]

You can't get the country from a local IP, it's simply impossible. Your local IP is related to your router and not other servers. It's just impossibru... just add a manual check for it.

[-.Paradox.-]

I can change my local ip, but not sure if it gonna work.