ClickSpotter 0.1.1

data/lib/StatusCode.rb

@@ -0,0 +1,72 @@
+#
+# StatusCode.rb - ClickSpotter
+#
+# Copyright (c) 2005, 2006 by Chris Schlaeger <cs@kde.org>
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of version 2 of the GNU General Public License as
+# published by the Free Software Foundation.
+#
+# $Id: StatusCode.rb 8 2006-01-22 15:19:51Z cs $
+#
+
+class StatusCode
+
+  attr_reader :description
+
+  def initialize(code)
+    @hits = []
+    @@codes = { 100 => 'Continue', 101 => 'Switching Protocols',
+                200 => 'Ok', 201 => 'Created', 202 => 'Accepted',
+                203 => 'Non-Authorative Information',
+                204 => 'No Content', 205 => 'Reset Content',
+                206 => 'Partial Content',
+                300 => 'Multiple Choices', 301 => 'Permanently Moved',
+                302 => 'Found', 303 => 'See Other', 304 => 'Not Modified',
+                305 => 'Use Proxy',
+                400 => 'Bad Request', 401 => 'Unauthorized',
+                402 => 'Payment Required', 403 => 'Forbidden',
+                404 => 'Not Found', 405 => 'Method Not Allowed',
+                406 => 'Not Acceptable',
+                407 => 'Proxy Authentication Required',
+                408 => 'Request Timeout', 409 => 'Conflict',
+                410 => 'Gone', 411 => 'Length Required',
+                412 => 'Precondition Failed',
+                413 => 'Request Entity Too Large',
+                414 => 'Request URI Too Long',
+                415 => 'Unsupported Media Type',
+                416 => 'Requested Range Not Satisfiable',
+                417 => 'Expectation Failed',
+                500 => 'Internal Server Error', 501 => 'Not Implemented',
+                502 => 'Bad Gateway', 503 => 'Service Unavailable',
+                504 => 'Gateway Timeout',
+                505 => 'HTTP Version Not Supported'
+       }
+
+    if @@codes[code]
+      @description = @@codes[code]
+    else
+      @description = "Unknown Code #{code}"
+    end
+  end
+
+  def addHit(hit)
+    @hits.push(hit)
+  end
+
+  def purge(deadline)
+    @hits.each do |h|
+      if h.timeStamp < deadline
+        @hits.delete(h)
+      else
+        return false
+      end
+    end
+    @hits.empty?
+  end
+
+  def hitCount
+    return @hits.length()
+  end
+
+end
+

data/lib/TraceRouter.rb

@@ -0,0 +1,53 @@
+#
+# TraceRouter.rb - ClickSpotter
+#
+# Copyright (c) 2005, 2006 by Chris Schlaeger <cs@kde.org>
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of version 2 of the GNU General Public License as
+# published by the Free Software Foundation.
+#
+# $Id: TraceRouter.rb 8 2006-01-22 15:19:51Z cs $
+#
+
+require 'time'
+require 'AsyncResolverWithCache'
+
+class TraceRouterRecord
+  attr_reader :routers
+  attr_accessor :timeStamp
+
+  def initialize
+    @routers = []
+  end
+
+  def resolve(ip)
+    begin
+      `traceroute -n #{ip}`.each_line do |line|
+      router = line.scan(/^\s*\d+\s+([0-9]+\.[0-9]+\.[0-9]+\.[0-9]+)\s+.*$/)
+      @routers << router[0][0] unless router.empty?
+      end
+      rescue
+      return false
+    end
+    # Don't include the IP of the destination host
+    @routers.pop if @routers.size > 0 && @routers[-1] == ip
+    @timeStamp = Time.now()
+    return true
+  end
+
+end
+
+class TraceRouter < AsyncResolverWithCache
+
+  def initialize
+    super('TraceRouterCache', $globals.getSetting('TracerTimeout') * 60 * 60,
+        10)
+    @enabled = $globals.getSetting('TraceRouter')
+  end
+
+  def newRecord
+    TraceRouterRecord.new
+  end
+
+end
+

data/lib/VisitorInformation.rb

@@ -0,0 +1,132 @@
+#
+# VisitorInformation.rb - ClickSpotter
+#
+# Copyright (c) 2005, 2006 by Chris Schlaeger <cs@kde.org>
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of version 2 of the GNU General Public License as
+# published by the Free Software Foundation.
+#
+# $Id: VisitorInformation.rb 8 2006-01-22 15:19:51Z cs $
+#
+
+require 'VisitorInformationDlg'
+require 'PageInformation'
+require 'BrowserLauncher'
+require 'WorldMap'
+
+class VisitorInformation < VisitorInformationDlg
+
+  include BrowserLauncher
+
+  slots 'pageListClicked(QListViewItem*)', 'openReferer()'
+
+  def initialize(visitor, parent = nil, name = nil)
+    super(parent, name)
+    $windowList.push(self)
+    @visitor = visitor
+    setCaption("Visitor Information - %s" % visitor.host)
+    @pageListCSLV = CSListView.new(@pageList)
+    @pageList.setSorting(3, true)
+    @pageListCSLV.setColumnWidth(0, 400)
+    @pageListCSLV.setColumnWidth(1, 400)
+    @pageList.hideColumn(3)
+
+    @visitorGDV = GeoDistView.new(mapFrame, nil, routeList)
+    @visitorGDV.showRoutes = true
+    @visitorGDV.showAll = true
+
+    connect(@pageList, SIGNAL('clicked(QListViewItem*)'),
+            SLOT('pageListClicked(QListViewItem*)'))
+    connect(@openButton, SIGNAL('clicked()'), SLOT('openReferer()'))
+
+    if $globals.getSetting("VisitorWindowW") > 0 &&
+       $globals.getSetting("VisitorWindowH") > 0
+      resize($globals.getSetting("VisitorWindowW"),
+             $globals.getSetting("VisitorWindowH"))
+    end
+    @worldMapWindow = nil
+    updateWindow
+    show
+
+  end
+
+  def pageListClicked(item)
+    return if item == nil
+    win = PageInformation.new($pages[item.text(0)])
+  end
+
+  def openReferer
+    return if @visitor.referer == nil
+    browseURL(@visitor.referer.url)
+  end
+
+  def updateWindow
+    unless $visitors.values.include?(@visitor)
+      close(true)
+      return
+    end
+
+    @ip.setText(@visitor.ip)
+    @host.setText(@visitor.host)
+    geoloc = $geoLocator.resolve(@visitor.ip)
+    if geoloc && geoloc.country != nil
+      @country.setText(geoloc.country)
+      @city.setText(geoloc.city)
+      @latitude.setText("%7.2f" % geoloc.latitude) if geoloc.latitude
+      @longitude.setText("%7.2f" % geoloc.longitude) if geoloc.longitude
+      vl = { @visitor.ip => @visitor }
+      @visitorGDV.update(vl)
+      @worldMapWindow.update(vl) if @worldMapWindow
+    end
+    @hits.setText('%d' % @visitor.hitCount)
+    @bytes.setText('%d' % @visitor.bytes)
+    @pages.setText('%d' % @visitor.pageCount)
+    @firstSeen.setText(@visitor.firstHit.timeStamp.
+                       strftime("%H:%M:%S %Y/%m/%d"))
+    @lastSeen.setText(@visitor.lastHit.timeStamp.
+                     strftime("%H:%M:%S %Y/%m/%d"))
+    @duration.setText("%d min" % ((@visitor.lastHit.timeStamp -
+          @visitor.firstHit.timeStamp) / 60))
+    @browser.setText(@visitor.browser)
+    @robot.setText(@visitor.robot ? @visitor.robot : '')
+    @referer.setText(@visitor.referer ? @visitor.referer.url : '')
+
+    @pageListCSLV.startUpdate
+    index = 0
+    showRegularPages = $globals.getSetting("ShowRegularPages") != 0
+    showAuxPages = $globals.getSetting("ShowAuxPages") != 0
+    @visitor.hits.each do |h|
+      if (h.page.isPage && !showRegularPages) ||
+         (!h.page.isPage && !showAuxPages)
+        next
+      end
+      @pageListCSLV.insertItem(h, h.page.url, h.referer ? h.referer.url : '',
+                               h.timeStamp, index)
+      index += 1
+    end
+    @pageListCSLV.finishUpdate
+  end
+
+  def close(dummy)
+    @worldMapWindow.close(true) if @worldMapWindow
+    $globals.setSetting("VisitorWindowW", width())
+    $globals.setSetting("VisitorWindowH", height())
+    $windowList.delete(self)
+    super(true)
+  end
+
+  def largeMapBtnClicked
+    @worldMapWindow.close(true) if @worldMapWindow
+    @worldMapWindow = WorldMap.new(self)
+  end
+
+  def fixVisitorBtnClicked
+    browseURL("http://www.hostip.info/correct.html?spip=#{@visitor.ip}")
+  end
+
+  def worldMapClosed
+    @worldMapWindow = nil
+  end
+
+end
+

data/lib/VisitorInformationDlg.rb

@@ -0,0 +1,351 @@
+# Form implementation generated from reading ui file 'VisitorInformationDlg.ui'
+#
+# Created: Mon Jan 23 23:21:52 2006
+#      by: The QtRuby User Interface Compiler (rbuic)
+#
+# WARNING! All changes made in this file will be lost!
+
+
+require 'Qt'
+
+class VisitorInformationDlg < Qt::Widget
+
+    slots 'languageChange()',
+    'largeMapBtnClicked()',
+    'fixVisitorBtnClicked()'
+
+    attr_reader :splitter1
+    attr_reader :routeList
+    attr_reader :mapFrame
+    attr_reader :groupBox30
+    attr_reader :label
+    attr_reader :textLabel15
+    attr_reader :ip
+    attr_reader :textLabel16_2
+    attr_reader :country
+    attr_reader :city
+    attr_reader :textLabel2
+    attr_reader :textLabel6
+    attr_reader :host
+    attr_reader :textLabel1_3
+    attr_reader :latitude
+    attr_reader :longitude
+    attr_reader :fixVisitorBtn
+    attr_reader :largeMapBtn
+    attr_reader :groupBox31
+    attr_reader :referer
+    attr_reader :openButton
+    attr_reader :browser
+    attr_reader :textLabel1_2
+    attr_reader :robot
+    attr_reader :textLabel10
+    attr_reader :textLabel1
+    attr_reader :textLabel14
+    attr_reader :textLabel4
+    attr_reader :textLabel16
+    attr_reader :bytes
+    attr_reader :textLabel12
+    attr_reader :firstSeen
+    attr_reader :duration
+    attr_reader :pages
+    attr_reader :Duration
+    attr_reader :hits
+    attr_reader :lastSeen
+    attr_reader :textLabel3
+    attr_reader :pageList
+
+
+    def initialize(parent = nil, name = nil, fl = 0)
+        super
+
+        if name.nil?
+        	setName("VisitorInformationDlg")
+        end
+
+        @VisitorInformationDlgLayout = Qt::GridLayout.new(self, 1, 1, 11, 6, 'VisitorInformationDlgLayout')
+
+        @splitter1 = Qt::Splitter.new(self, "splitter1")
+        @splitter1.setOrientation( Qt::Splitter::Vertical )
+
+        @LayoutWidget = Qt::Widget.new(@splitter1, '@LayoutWidget')
+        @layout7 = Qt::GridLayout.new(@LayoutWidget, 1, 1, 0, 6, 'layout7')
+
+        @routeList = Qt::ListView.new(@LayoutWidget, "routeList")
+        @routeList.addColumn(trUtf8("Hop"))
+        @routeList.addColumn(trUtf8("IP"))
+        @routeList.addColumn(trUtf8("Host"))
+        @routeList.addColumn(trUtf8("Country"))
+        @routeList.addColumn(trUtf8("City"))
+        @routeList.addColumn(trUtf8("Latitude"))
+        @routeList.addColumn(trUtf8("Longitude"))
+        @routeList.setSizePolicy( Qt::SizePolicy.new(7, 7, 0, 20, @routeList.sizePolicy().hasHeightForWidth()) )
+        @routeList.setAllColumnsShowFocus( true )
+
+        @layout7.addMultiCellWidget(@routeList, 1, 1, 0, 1)
+
+        @mapFrame = Qt::GroupBox.new(@LayoutWidget, "mapFrame")
+        @mapFrame.setSizePolicy( Qt::SizePolicy.new(0, 0, 0, 0, @mapFrame.sizePolicy().hasHeightForWidth()) )
+        @mapFrame.setMinimumSize( Qt::Size.new(0, 0) )
+
+        @layout7.addWidget(@mapFrame, 0, 1)
+
+        @groupBox30 = Qt::GroupBox.new(@LayoutWidget, "groupBox30")
+        @groupBox30.setColumnLayout( 0, Qt::Vertical )
+        @groupBox30.layout().setSpacing(6)
+        @groupBox30.layout().setMargin(11)
+        @groupBox30Layout = Qt::GridLayout.new(@groupBox30.layout() )
+        @groupBox30Layout.setAlignment( AlignTop )
+
+        @label = Qt::Label.new(@groupBox30, "label")
+        @label.setSizePolicy( Qt::SizePolicy.new(1, 5, 0, 0, @label.sizePolicy().hasHeightForWidth()) )
+
+        @groupBox30Layout.addWidget(@label, 1, 0)
+
+        @textLabel15 = Qt::Label.new(@groupBox30, "textLabel15")
+
+        @groupBox30Layout.addWidget(@textLabel15, 4, 0)
+
+        @ip = Qt::LineEdit.new(@groupBox30, "ip")
+        @ip.setSizePolicy( Qt::SizePolicy.new(7, 0, 30, 0, @ip.sizePolicy().hasHeightForWidth()) )
+        @ip.setReadOnly( true )
+
+        @groupBox30Layout.addMultiCellWidget(@ip, 0, 0, 1, 2)
+
+        @textLabel16_2 = Qt::Label.new(@groupBox30, "textLabel16_2")
+
+        @groupBox30Layout.addWidget(@textLabel16_2, 5, 0)
+
+        @country = Qt::LineEdit.new(@groupBox30, "country")
+
+        @groupBox30Layout.addMultiCellWidget(@country, 2, 2, 1, 2)
+
+        @city = Qt::LineEdit.new(@groupBox30, "city")
+
+        @groupBox30Layout.addMultiCellWidget(@city, 3, 3, 1, 2)
+
+        @textLabel2 = Qt::Label.new(@groupBox30, "textLabel2")
+
+        @groupBox30Layout.addWidget(@textLabel2, 3, 0)
+
+        @textLabel6 = Qt::Label.new(@groupBox30, "textLabel6")
+
+        @groupBox30Layout.addWidget(@textLabel6, 0, 0)
+
+        @host = Qt::LineEdit.new(@groupBox30, "host")
+        @host.setSizePolicy( Qt::SizePolicy.new(7, 0, 70, 0, @host.sizePolicy().hasHeightForWidth()) )
+        @host.setReadOnly( true )
+
+        @groupBox30Layout.addMultiCellWidget(@host, 1, 1, 1, 2)
+
+        @textLabel1_3 = Qt::Label.new(@groupBox30, "textLabel1_3")
+
+        @groupBox30Layout.addWidget(@textLabel1_3, 2, 0)
+
+        @latitude = Qt::LineEdit.new(@groupBox30, "latitude")
+        @latitude.setReadOnly( true )
+
+        @groupBox30Layout.addWidget(@latitude, 4, 1)
+
+        @longitude = Qt::LineEdit.new(@groupBox30, "longitude")
+        @longitude.setReadOnly( true )
+
+        @groupBox30Layout.addWidget(@longitude, 5, 1)
+
+        @fixVisitorBtn = Qt::PushButton.new(@groupBox30, "fixVisitorBtn")
+
+        @groupBox30Layout.addWidget(@fixVisitorBtn, 5, 2)
+
+        @largeMapBtn = Qt::PushButton.new(@groupBox30, "largeMapBtn")
+        @largeMapBtn.setSizePolicy( Qt::SizePolicy.new(1, 0, 0, 0, @largeMapBtn.sizePolicy().hasHeightForWidth()) )
+
+        @groupBox30Layout.addWidget(@largeMapBtn, 4, 2)
+
+        @layout7.addWidget(@groupBox30, 0, 0)
+
+        @LayoutWidget_2 = Qt::Widget.new(@splitter1, '@LayoutWidget_2')
+        @layout8 = Qt::VBoxLayout.new(@LayoutWidget_2, 0, 6, 'layout8')
+
+        @groupBox31 = Qt::GroupBox.new(@LayoutWidget_2, "groupBox31")
+        @groupBox31.setColumnLayout( 0, Qt::Vertical )
+        @groupBox31.layout().setSpacing(6)
+        @groupBox31.layout().setMargin(11)
+        @groupBox31Layout = Qt::GridLayout.new(@groupBox31.layout() )
+        @groupBox31Layout.setAlignment( AlignTop )
+
+        @layout28 = Qt::GridLayout.new(nil, 1, 1, 0, 6, 'layout28')
+
+        @layout19 = Qt::HBoxLayout.new(nil, 0, 6, 'layout19')
+
+        @referer = Qt::LineEdit.new(@groupBox31, "referer")
+        @layout19.addWidget(@referer)
+
+        @openButton = Qt::PushButton.new(@groupBox31, "openButton")
+        @layout19.addWidget(@openButton)
+
+        @layout28.addLayout(@layout19, 2, 1)
+
+        @layout18 = Qt::HBoxLayout.new(nil, 0, 6, 'layout18')
+
+        @browser = Qt::LineEdit.new(@groupBox31, "browser")
+        @browser.setSizePolicy( Qt::SizePolicy.new(7, 0, 80, 0, @browser.sizePolicy().hasHeightForWidth()) )
+        @browser.setReadOnly( true )
+        @layout18.addWidget(@browser)
+
+        @textLabel1_2 = Qt::Label.new(@groupBox31, "textLabel1_2")
+        @layout18.addWidget(@textLabel1_2)
+
+        @robot = Qt::LineEdit.new(@groupBox31, "robot")
+        @robot.setSizePolicy( Qt::SizePolicy.new(7, 0, 20, 0, @robot.sizePolicy().hasHeightForWidth()) )
+        @layout18.addWidget(@robot)
+
+        @layout28.addLayout(@layout18, 1, 1)
+
+        @layout27 = Qt::VBoxLayout.new(nil, 0, 6, 'layout27')
+
+        @textLabel10 = Qt::Label.new(@groupBox31, "textLabel10")
+        @layout27.addWidget(@textLabel10)
+
+        @textLabel1 = Qt::Label.new(@groupBox31, "textLabel1")
+        @textLabel1.setSizePolicy( Qt::SizePolicy.new(5, 5, 0, 0, @textLabel1.sizePolicy().hasHeightForWidth()) )
+        @layout27.addWidget(@textLabel1)
+
+        @textLabel14 = Qt::Label.new(@groupBox31, "textLabel14")
+        @layout27.addWidget(@textLabel14)
+
+        @textLabel4 = Qt::Label.new(@groupBox31, "textLabel4")
+        @layout27.addWidget(@textLabel4)
+
+        @layout28.addMultiCellLayout(@layout27, 0, 2, 0, 0)
+
+        @layout12 = Qt::GridLayout.new(nil, 1, 1, 0, 6, 'layout12')
+
+        @textLabel16 = Qt::Label.new(@groupBox31, "textLabel16")
+
+        @layout12.addWidget(@textLabel16, 0, 3)
+
+        @bytes = Qt::LineEdit.new(@groupBox31, "bytes")
+        @bytes.setSizePolicy( Qt::SizePolicy.new(7, 0, 30, 0, @bytes.sizePolicy().hasHeightForWidth()) )
+        @bytes.setAlignment( Qt::LineEdit::AlignRight )
+        @bytes.setReadOnly( true )
+
+        @layout12.addWidget(@bytes, 0, 4)
+
+        @textLabel12 = Qt::Label.new(@groupBox31, "textLabel12")
+        @textLabel12.setSizePolicy( Qt::SizePolicy.new(1, 5, 0, 0, @textLabel12.sizePolicy().hasHeightForWidth()) )
+
+        @layout12.addWidget(@textLabel12, 0, 1)
+
+        @firstSeen = Qt::LineEdit.new(@groupBox31, "firstSeen")
+        @firstSeen.setReadOnly( true )
+
+        @layout12.addWidget(@firstSeen, 1, 0)
+
+        @duration = Qt::LineEdit.new(@groupBox31, "duration")
+        @duration.setAlignment( Qt::LineEdit::AlignRight )
+        @duration.setReadOnly( true )
+
+        @layout12.addWidget(@duration, 1, 4)
+
+        @pages = Qt::LineEdit.new(@groupBox31, "pages")
+        @pages.setSizePolicy( Qt::SizePolicy.new(7, 0, 30, 0, @pages.sizePolicy().hasHeightForWidth()) )
+        @pages.setAlignment( Qt::LineEdit::AlignRight )
+        @pages.setReadOnly( true )
+
+        @layout12.addWidget(@pages, 0, 2)
+
+        @Duration = Qt::Label.new(@groupBox31, "Duration")
+
+        @layout12.addWidget(@Duration, 1, 3)
+
+        @hits = Qt::LineEdit.new(@groupBox31, "hits")
+        @hits.setSizePolicy( Qt::SizePolicy.new(7, 0, 30, 0, @hits.sizePolicy().hasHeightForWidth()) )
+        @hits.setAlignment( Qt::LineEdit::AlignRight )
+        @hits.setReadOnly( true )
+
+        @layout12.addWidget(@hits, 0, 0)
+
+        @lastSeen = Qt::LineEdit.new(@groupBox31, "lastSeen")
+        @lastSeen.setReadOnly( true )
+
+        @layout12.addWidget(@lastSeen, 1, 2)
+
+        @textLabel3 = Qt::Label.new(@groupBox31, "textLabel3")
+        @textLabel3.setSizePolicy( Qt::SizePolicy.new(5, 5, 0, 0, @textLabel3.sizePolicy().hasHeightForWidth()) )
+
+        @layout12.addWidget(@textLabel3, 1, 1)
+
+        @layout28.addLayout(@layout12, 0, 1)
+
+        @groupBox31Layout.addLayout(@layout28, 0, 0)
+        @layout8.addWidget(@groupBox31)
+
+        @pageList = Qt::ListView.new(@LayoutWidget_2, "pageList")
+        @pageList.addColumn(trUtf8("Page"))
+        @pageList.addColumn(trUtf8("Referer"))
+        @pageList.addColumn(trUtf8("Time Stamp"))
+        @pageList.addColumn(trUtf8("Index"))
+        @pageList.header().setClickEnabled( false, @pageList.header().count() - 1 )
+        @pageList.header().setResizeEnabled( false, @pageList.header().count() - 1 )
+        @pageList.setSizePolicy( Qt::SizePolicy.new(7, 7, 0, 40, @pageList.sizePolicy().hasHeightForWidth()) )
+        @layout8.addWidget(@pageList)
+
+        @VisitorInformationDlgLayout.addWidget(@splitter1, 0, 0)
+        languageChange()
+        resize( Qt::Size.new(840, 903).expandedTo(minimumSizeHint()) )
+        clearWState( WState_Polished )
+
+        Qt::Object.connect(@largeMapBtn, SIGNAL("clicked()"), self, SLOT("largeMapBtnClicked()") )
+        Qt::Object.connect(@fixVisitorBtn, SIGNAL("clicked()"), self, SLOT("fixVisitorBtnClicked()") )
+    end
+
+    #
+    #  Sets the strings of the subwidgets using the current
+    #  language.
+    #
+    def languageChange()
+        setCaption(trUtf8("Visitor"))
+        @routeList.header().setLabel( 0, trUtf8("Hop") )
+        @routeList.header().setLabel( 1, trUtf8("IP") )
+        @routeList.header().setLabel( 2, trUtf8("Host") )
+        @routeList.header().setLabel( 3, trUtf8("Country") )
+        @routeList.header().setLabel( 4, trUtf8("City") )
+        @routeList.header().setLabel( 5, trUtf8("Latitude") )
+        @routeList.header().setLabel( 6, trUtf8("Longitude") )
+        @mapFrame.setTitle( trUtf8("Visitor Location") )
+        @groupBox30.setTitle( trUtf8("Visitor Details") )
+        @label.setText( trUtf8("<b>Host:</b>") )
+        @textLabel15.setText( trUtf8("<b>Latitude:</b>") )
+        @textLabel16_2.setText( trUtf8("<b>Longitude:</b>") )
+        @textLabel2.setText( trUtf8("<b>City:</b>") )
+        @textLabel6.setText( trUtf8("<b>IP:</b>") )
+        @textLabel1_3.setText( trUtf8("<b>Country:</b>") )
+        @fixVisitorBtn.setText( trUtf8("Correct Data") )
+        @largeMapBtn.setText( trUtf8("Large Map") )
+        @groupBox31.setTitle( trUtf8("Access Statistics") )
+        @openButton.setText( trUtf8("Open") )
+        @textLabel1_2.setText( trUtf8("<b>Robot:</b>") )
+        @textLabel10.setText( trUtf8("<b>Hits:</b>") )
+        @textLabel1.setText( trUtf8("<b>First&nbsp;Seen:</b>") )
+        @textLabel14.setText( trUtf8("<b>Browser:</b>") )
+        @textLabel4.setText( trUtf8("<b>Referer:</b>") )
+        @textLabel16.setText( trUtf8("<b>Bytes:</b>") )
+        @textLabel12.setText( trUtf8("<b>Pages:</b>") )
+        @Duration.setText( trUtf8("<b>Duration:</b>") )
+        @textLabel3.setText( trUtf8("<b>Last&nbsp;Seen:</b>") )
+        @pageList.header().setLabel( 0, trUtf8("Page") )
+        @pageList.header().setLabel( 1, trUtf8("Referer") )
+        @pageList.header().setLabel( 2, trUtf8("Time Stamp") )
+        @pageList.header().setLabel( 3, trUtf8("Index") )
+    end
+    protected :languageChange
+
+
+    def largeMapBtnClicked(*k)
+        print("VisitorInformationDlg.largeMapBtnClicked(): Not implemented yet.\n")
+    end
+
+    def fixVisitorBtnClicked(*k)
+        print("VisitorInformationDlg.fixVisitorBtnClicked(): Not implemented yet.\n")
+    end
+
+end