DSL Ideas and Suggestions :: Show IP Address

When DSL's network settings are obtained via DHCP the current IP Address is often unknown. Knowing the IP Address is necessary when connecting to the ssh server/ftp server/monkey webserver which come with DSL.

I put together this short lua-fltk script to display the current IP Address of the network device eth0. When run it pops up with a dialog box containing the current IP address and a 'ok' button to dismiss it. I then added it to the fluxbox menu (under System,Net Setup). I thought I'd post it here in the hope people find it useful.

Code Sample

#!/usr/bin/env flua
-- (c) 2005 Richard Osborne
-- Show IP current Address in a dialog box

function get_ip_address(interface)
local command="ifconfig " .. interface .. " > /tmp/pipe.lua &"
execute(command)
local file,err = openfile("/tmp/pipe.lua", "r")
if not file then
print("Cannot open file. ".. err)
exit(1)
end
local data = read(file,"*a")
local label = "inet addr:"
local i,j = strfind (data,label .. "([%d.]*)")
if not i then
return("Not Configured")
else
return (strsub (data, i+strlen(label),j))
end
end

-- Main GUI loop

w = Window{200,80, "IP Address"}
ip = Input{40,10,120,25,"IP:"}
ip.value = get_ip_address("eth0")

ok = Button{65,45,70,25,"&OK"}
function ok:callback()
flush()
exit(0)
end

w:end_layout()
w:show()

cool

Nice job.

Looks like a good candidate for addition to a future release.

Friedgold, thank you. This is a neat little piece of code.

I was looking for something that would display my IP address at startup. I run this code from my .xinitrc and bingo, at start up it displays the IP address.

I have a problem on one of my older machines that causes this code to return a "Not Configured" error the first time that it's run. I don't think it's your code, I think it just takes the machine a little while to set the net. Because of this I've added an "Again" button the code. The Again button simple tries to get the IP address another time. On my trouble machine, the second time is always a charm.

Thanks again.

Code with Again button follows:

Code Sample

#!/usr/bin/env flua
-- (c) 2005 Richard Osborne
-- Show IP current Address in a dialog box

function get_ip_address(interface)
local command="ifconfig " .. interface .. " > /tmp/pipe.lua &"
execute(command)
local file,err = openfile("/tmp/pipe.lua", "r")
if not file then
print("Cannot open file. ".. err)
exit(1)
end
local data = read(file,"*a")
local label = "inet addr:"
local i,j = strfind (data,label .. "([%d.]*)")
if not i then
return("Not Configured")
else
return (strsub (data, i+strlen(label),j))
end
end

-- Main GUI loop

w = Window{200,80, "IP Address"}
ip = Input{40,10,120,25,"IP:"}
ip.value = get_ip_address("eth0")
od = Button{100,45,70,25,"&Again"}
ok = Button{10,45,70,25,"&OK"}
function ok:callback()
flush()
exit(0)
end

function od:callback()
ip.value = get_ip_address("eth0")
end
w:end_layout()
w:show()

What about those who arent using eth0? My network device is ath0 (wireless PCMCIA card). I see where I can change the script, but if you want it universal you might want to have a drop down list where you can select the appropriate device. Just a suggestion.

Next Page...
original here.