Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[REBOL] Re: How to get allocated ip number

From: gscottjones:mchsi at: 16-Oct-2002 5:03

Hi, Michel, From: "Goasampis Michel"
> I need to manipulate the ip number my PC obtain from > the provider when connect to internet. > > To get it, I hack something with the 'get-modes function which give this > result on my linux pc : > >>probe get-modes tcp:// 'interfaces > [ > make object! [ > name: "lo" > addr:
> so I do : > > all-interfaces: get-modes tcp:// 'interfaces > internet-interf: all-interfaces/3 > my-ip: copy to-string internet-interf/addr > > but it isn't verry elegant, and does'nt work on all pc (if more or less
interfaces are found).
> Please help me, I hope there is a more efficient way like > my-ip: copy some/voodoo/path...
... I hesitated to answer yesterday, in case someone else had a "whiz bang" suggestion. I do not speak with authority, but I believe that there are several issues here. In addition to having variable numbers of tcp interfaces, depending on the machine, the names given to an individual interface may not be consistent across platforms. If no one "knows" the answer to this question, then a little feedback will quickly resolve it. My platform returns names that look like: name: "lo0" name: "if17474259" The first evidently refers to the local (loopback) ip and the second must refer to my network interface card. I do not know how this number is generated (is it an encoding of the NIC MAC number?). Besides the variability in the number of interfaces and the variability in the naming of the interfaces, I thought your solution was fine because it a) works, and b) it is readily understood. You can avoid one variable intermediate by writing the full path out, like: internet-interf: all-interfaces/3/addr ; yields the desired IP tuple There are many other ways to manipulate the block containing the various IP interfaces. The next example shows how to iterate through all interfaces foreach interface all-interfaces [print interface/addr] If you know that you are looking for a particular class of IP, you could further refine the result similar to the following: foreach interface all-interfaces [ if find interface/name "ppp" [ print interface/addr ] ] will find interfaces that use the ppp protocol (namely, dial-up connections). Hope this helps. Please don't worry about the language issue. I've been speaking English for 43 years, and still haven't figured it out. :-) So please ask further questions, especially if I missed the point. --Scott Jones