General :  K-Meleon Web Browser Forum
General discussion about K-Meleon 
liveIP+ (includes constantIP)
Posted by: disrupted
Date: September 02, 2009 06:11AM

http://kmext.sourceforge.net/files/liveipplus.7z

displays liveip(local machine) and website(domain ip) in status bar.
this is also a combined constant ip for websites with fixes to bugs displaying ip of a background tab in the active tab. the website ip is also displayed constantly in the titlebar.. if you have used constip before please remove it and download this update

the extension replaces 'ready' in the statusbar and will always display your machine ip plus the website ip with the domain in square brackets, this however will not override the functions of page loading stats or hovering on href links or macro info description..they will still display normally but once you hover out, the ips will be displayed all the time. also supports dynamic ips and the statusbar is updated instantly once the ip is changed.. all functions work without any interference from the user.



srces

# K-Meleon Macros (http://kmeleon.sourceforge.net/wiki/index.php?id=MacroLanguage)

# ---------- displays liveIP/domainip in statusbar------------

$_tool_path=getfolder(RootFolder)."\\Tools";

liveIP{
exec($_tool_path."\\liveipplus.exe ");
}

# --------------------------------------------
$OnInit=$OnInit."liveIP;";
$macroModules=$macroModules."statusbarIP;";


; AutoIt Version: 3.3.0
; Language: Gibberish
; Platform: Win9x/NT
; Author: yannis kargas
;liveip in statusbar (constant) plus website ip in statusbar and titlebar(domain in brackets)
;kmstatusbarctrlID=59393 (willbeusefulforotherextensionswhenstatusbarneedstobemanipulated)
#NoTrayIcon
#Include <string.au3>
#include <Misc.au3>

if _Singleton("liveipplus",0) = 0 Then
exit
endif

TCPStartup()
while winExists("[CLASS:KMeleon Browser Window]", "")
$pagetitle=WinGetTitle("[CLASS:KMeleon Browser Window]")
$ddcheck=StringRegExp ($pagetitle, ":::")
if $ddcheck=1 then
noaddtitle()
else
addtitle()
endif
sleep(4000)
Wend
exit

func addtitle()
$liveIP=TCPNameToIP("")
$fuck=ControlGetText ("[CLASS:KMeleon Browser Window]", "", 1001)
$prop1=StringReplace($fuck, "http://";, "")
$prop2=StringReplace($prop1, "https://";, "")
$prop3=StringReplace($prop2, "ftp://";, "")
$prop4=StringReplace($prop3, "gopher://", "")
$prop5=StringReplace($prop4, "/", ")", 1)
$pos=StringInStr($prop5, ")")
$ddf=StringMid ($prop5, 1 , $pos-1)
$domainIP = TCPNameToIP($ddf)
$sdisplay=("liveIP: " & $liveIP & " | domainIP: " & $domainIP & " [" & $ddf & "]")
ControlSetText("[CLASS:KMeleon Browser Window]", "", 59393, $sdisplay)
$settitle=($pagetitle & " ::: " & $domainIP)
WinSetTitle ("[CLASS:KMeleon Browser Window]", "", $settitle)
endfunc

func noaddtitle()
$liveIP=TCPNameToIP("")
$fuck=ControlGetText ("[CLASS:KMeleon Browser Window]", "", 1001)
$prop1=StringReplace($fuck, "http://";, "")
$prop2=StringReplace($prop1, "https://";, "")
$prop3=StringReplace($prop2, "ftp://";, "")
$prop4=StringReplace($prop3, "gopher://", "")
$prop5=StringReplace($prop4, "/", ")", 1)
$pos=StringInStr($prop5, ")")
$ddf=StringMid ($prop5, 1 , $pos-1)
$domainIP = TCPNameToIP($ddf)
$sdisplay=("liveIP: " & $liveIP & " | domainIP: " & $domainIP & " [" & $ddf & "]")
ControlSetText("[CLASS:KMeleon Browser Window]", "", 59393, $sdisplay)
endfunc


Options: ReplyQuote
Re: liveIP+ (includes constantIP)
Posted by: soccerfan
Date: September 02, 2009 01:21PM

Thanks disrupted. Good to see you back again!

EDIT: I don't see any ip in my kmeleon 1.1.3.
I was using your dispip before (now disabled).
A missing ; somewhere?

soccerfan



Edited 1 time(s). Last edit at 09/02/2009 01:32PM by soccerfan.

Options: ReplyQuote
Re: liveIP+ (includes constantIP)
Posted by: disrupted(unlogged)
Date: September 02, 2009 01:40PM

it should work with 1.1.x without problems..since both have identical ctrlIDS. i'm now testing in 1.1.4 and it's working, it could be related to portable device you might need to allow access to liveipplus.exe and make sure it's in kmeleon's tools folder.

liveipplus replaces constip(titlebar ip which had few bugs) but you needn't disable displayip if you don't want because dispip works differently and wouldn't conflict and includes the whois button

test again in a local-hd kmeleon installation..if it works then it's probably related to usb

Options: ReplyQuote
Re: liveIP+ (includes constantIP)
Posted by: soccerfan
Date: September 02, 2009 07:11PM

disrupted, I got it to work after changing this line in constIP.kmm:
$OnInit=$OnInit."liveIP;";
to
$OnLoad=$OnLoad."liveIP;";

Is this ok too?

soccerfan

Options: ReplyQuote
Re: liveIP+ (includes constantIP)
Posted by: disrupted
Date: September 02, 2009 07:19PM

that's very strange, oninit should work with 1.1.x but since onload makes it work..it's alright, it would have caused quite a problem if liveipplus supported running multiple instances of itself and everytime a page/tab would open it would run a new instance of liveip but luckily i coded it to run only one instance so it won't cause you any trouble smiling smiley

Options: ReplyQuote
Re: liveIP+ (includes constantIP)
Posted by: soccerfan
Date: September 02, 2009 07:52PM

I'm glad to hear this mod will not cause me any problems.
Also, is it possible to not display the website ip in the titlebar? Thanks.

soccerfan

Options: ReplyQuote
Re: liveIP+ (includes constantIP)
Posted by: disrupted
Date: September 02, 2009 08:31PM

yes, we just remove the addtitle() function

this is a version that doesn't display in the titlebar:
http://kmext.sourceforge.net/files/liveip-basic.7z (no titlebar ip edition)

do not use its macro because you have problem with oninit, just extract the liveipplus.exe into the tools folder and replace the existing one.

Options: ReplyQuote
Re: liveIP+ (includes constantIP)
Posted by: soccerfan
Date: September 02, 2009 10:20PM

A big thank you for this 'basic version'.
Just right for my needs smiling smiley

soccerfan

Options: ReplyQuote


K-Meleon forum is powered by Phorum.