request script spy chat history for op
 

News:

29 December 2022 - PtokaX 0.5.3.0 (20th anniversary edition) released...
11 April 2017 - PtokaX 0.5.2.2 released...
8 April 2015 Anti child and anti pedo pr0n scripts are not allowed anymore on this board!
28 September 2015 - PtokaX 0.5.2.1 for Windows 10 IoT released...
3 September 2015 - PtokaX 0.5.2.1 released...
16 August 2015 - PtokaX 0.5.2.0 released...
1 August 2015 - Crowdfunding for ADC protocol support in PtokaX ended. Clearly nobody want ADC support...
30 June 2015 - PtokaX 0.5.1.0 released...
30 April 2015 Crowdfunding for ADC protocol support in PtokaX
26 April 2015 New support hub!
20 February 2015 - PtokaX 0.5.0.3 released...
13 April 2014 - PtokaX 0.5.0.2 released...
23 March 2014 - PtokaX testing version 0.5.0.1 build 454 is available.
04 March 2014 - PtokaX.org sites were temporary down because of DDOS attacks and issues with hosting service provider.

Main Menu

request script spy chat history for op

Started by gemini, 08 June, 2005, 00:48:33

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

gemini

request spy
it exists a script to see all user what say itself in private citizen and also is possible it in manner to do the alone vision to who want I with chat history for op

 this example:

SendTo = { --> 1=on/0=off
[0] = 1,   -- Masters
[1] = 1,   -- Operators
[2] = 1,   -- Vips
[3] = 0,   -- Regs
[4] = 1,   -- Moderator
[5] = 1,   -- NetFounder
[-1] = 0,  -- Users

I wait your news cordial greetings
thanks

bastya_elvtars

QuoteOriginally posted by gemini
 request spy
it exists a script to see all user what say itself in private citizen and also is possible it in manner to do the alone vision to who want I with chat history for op

 this example:

SendTo = { --> 1=on/0=off
  • = 1,   -- Masters
  • [1] = 1,   -- Operators
    [2] = 1,   -- Vips
    [3] = 0,   -- Regs
    [4] = 1,   -- Moderator
    [5] = 1,   -- NetFounder
    [-1] = 0,  -- Users

    I wait your news cordial greetings
    thanks
Requesting a PM spy? Moderators (and Scooby Doo), where are you now?  :D
Everything could have been anything else and it would have just as much meaning.

gemini

request script spy user private message chat history for op

request spy
it exists a script to see spy all user private message  what say itself in private citizen and also is possible it in manner to do the alone vision to who want I with chat history for op

this example:

SendTo = { --> 1=on/0=off
[0] = 1, -- Masters
[1] = 1, -- Operators
[2] = 1, -- Vips
[3] = 0, -- Regs
[4] = 1, -- Moderator
[5] = 1, -- NetFounder
[-1] = 0, -- Users

I wait your news cordial greetings
thanks

i have this
--Chat History On Entry 1.03 LUA 5
--By Mutor The Ugly     4/14/04
--
--Based on a script by Tezlo     1/17/04
--Send chat history to PM on entry
--
-- +Converted to LUA 5 2/22/05
--
--  +Changes 5/22/05
--
--   +Added history command, displays last 'x' lines up to maxhistory limit
--   +If chat history file does not exist will be created with timestamp

-----------------------------------------------------------
GetChat = "+history"      -- Show chat history Syntax = +history 10 will show last 10 lines
chatfile = "chathistory.dat"-- Name for chat file
maxhistory = 20           -- Maximum lines of chat to cache
botname = "[Historian]"      -- Name for bot
BadChars = {".","?","!","+","-",}   --disallow command prefixes

function Main()
   if loadfile(chatfile) == nil then
      chathistory = {}
      local when = os.date("on: %B %d %Y  at: %X")
      local chat = "Chat history file created "
      table.insert(chathistory,when..chat)
      local f,e = io.open( chatfile, "w+" )
      f:write( "return {\n"..string.format("%q",chat..when)..",\n}" )
      f:close()
   end
   chathistory = dofile(chatfile)
   frmHub:RegBot(botname)   -- Comment this line to not have bot appear in user list.
                     -- Note: If botname is not registered,
                     -- default dc++ settings will not allow pm's to pop up
                     -- To allow pop from unregistered botname:
                     -- See: Settings -> Advanced:
                     --   [X] Popup private messages
                     --   [ ] Ingnore message from users that are not online
                     --   [ ] Popup private messages from users that are not online
end

function OnExit()
savehistory()
end

function NewUserConnected(user)
   local n = table.getn(chathistory)
   local str = "<----------------------------------------------------------------------[ Last ( "..n.." ) chat messages ]----------->\r\n"
   for i = 1, n do str = str.."\r\n"..chathistory end
   user:SendPM(botname,str.."\r\n")
   user:SendPM(botname,"<--------------------------------------------------------------------------[ End of chat history ]--------------->")
end

OpConnected = NewUserConnected

function ChatArrival(user, data)
   if string.sub(data, 1, 1) ~= "<" then end
   local s,e,pre = string.find(data, "^%b<> (.)")
   local s,e,cmd,lines = string.find(data, "^%b<>%s+(%S+)%s+(%d+)|$")
   local when = os.date("[%H:%M] ")
   local chat = string.sub(data, 1, -2)
   if cmd and cmd == GetChat then
        if lines ~= e then
            GetChatLines(user, lines)
            return 1
        else
            user:SendData("Please specify how may chat lines to see, you can display up to "..maxhistory.." lines.")
            return 1
        end
    else
   for k,v in BadChars do
      if pre == v then     -- disallow command input to cached chat
            return
        end
    end
   table.insert(chathistory,when..chat)
   if table.getn(chathistory) > maxhistory then table.remove(chathistory, 1) end
   savehistory()
   end
end

function GetChatLines(user, linecount)
    local n1 = table.getn(chathistory)
   local n2 = linecount
   --if n2 == 1 then n2 = 2 end
   local n3 = n1 - (n2-1)
   local str = "<----------------------------------------------------------------------[ Last ( "..n2.." ) chat messages ]----------->\r\n"
   for i =n3,n1 do str = str.."\r\n"..chathistory end
   user:SendPM(botname,str.."\r\n")
   user:SendPM(botname,"<--------------------------------------------------------------------------[ End of chat history ]--------------->")
end

function savehistory()
   local f,e = io.open( chatfile, "w+" )
   if f then
      f:write("return {\n")
        for i = 1, table.getn(chathistory) do
            f:write( "\t"..string.format("%q", chathistory)..",\r\n" )
        end
      f:write("}" )
      f:close()
      return 1
   else
      return nil
   end
end

gemini

-----------------------------------------------------------------------------
-- Chat History?
-----------------------------------------------------------------------------
-- ?2005 Double MM Connection?
-- for ### AMICI ITALIANO ###
----------------------------------------------------------------------------
--rev 2.1   -   06 / 04 / 2005
-- Load & save messages
------------------------------------------------------
--rev 2.0   -   12 / 03 / 2005
-- Changed to Lua 5.0
--Changed top/bottom message
-----------------------------------------------------------------------------

--Bot Name
sBot=frmHub:GetHubBotName()  
History="Chat History.dat"

MultiChatName="AMICI ITALIANO"
lMcn=7
MultiChatNickSeparator="?"

sMsg={}
iMin=0
iMax=0

nMsg=10

Top={}
Top[1] ="----------------------------------------------------------------------------------------------------------------"
Top[2] ="                   ---                AMICI ITALIANO                --- "
Top[3] ="                    Libera associazione di Hub Direct Connect"
Top[4] ="----------------------------------------------------------------------------------------------------------------"
Top[5] ="? AMICI ITALIANO  (dchub://amici.no-ip.org )"
Top[6] ="? xxxxxxxxxxxx    (dchub://xxxxxxxxxxxxxxxxxx )"
Top[7] ="? xxxxxxxxxxxx    (dchub://xxxxxxxxxxxxxxxxxx )"
Top[8] ="                  ULTIMI MESSAGGI DIGITATI IN MAIN CHAT"
Top[9]="----------------------------------------------------------------------------------------------------------------"
nTop=9

Bottom={}
Bottom[1]="----------------------------------------------------------------------------------------------------------------"
nBottom=1

---------------------------------------------------------------
-- Carica in avvio e salva in uscita
---------------------------------------------------------------
function Main()
   sMsg={}
   loadMessages()
end
function OnExit()
   saveMessages()
end

---------------------------------------------------------------
-- Registra Chat
---------------------------------------------------------------
function ChatArrival(User, Data)
   Data = string.sub(Data,1,string.len(Data)-1) --toglie l'a-capo finale
   local _,_,str = string.find(Data, "%b<>%s+(.+)")
   if string.sub(Data,1,1) == "<" then --main message
      if string.sub(Data,1,7) == "<"..MultiChatName..">" then -- ripulisce il nick dal tag della multi
         local _,_,n = string.find(str, "{.+?<(.+)}.+")
         local _,_,s = string.find(str, ".+>}(.+)")
         str="<"..n..s
      else
         local _,_,command = string.find(Data, ".+(> !).+")
         if command then
            str=nil --do not store any message
         else
            str=Data
         end
      end
      if str then
         sMsg[iMax]="["..os.date("%T").."] "..str
         iMax=iMax+1
         if iMax-nMsg>iMin then
            iMin=iMax-nMsg
        end
      end
   end
end

---------------------------------------------------------------
-- Ultima chat
---------------------------------------------------------------

function NewUserConnected(curUser)
   if curUser.sName~=MultiChatName then --curUser.iProfile>=0 and
      local i=1
      -- Top Header
      while i<=nTop-1 do
         curUser:SendData(sBot, Top)
         i=i+1  
      end
      ----
      local s=Top[nTop]  --- for graphical meanings  
      --Chat messages
      local i=iMin
      while i<=iMax do
         if sMsg then
            s=s.."\n\t"..sMsg
         end
         i=i+1
      end
      curUser:SendData(sBot, s)
      -- Bottom
      i=1
      while i<=nBottom do
         curUser:SendData(sBot, Bottom)
         i=i+1  
      end
   end
end
----------------------------------------------------------
--The same for any user
OpConnected = NewUserConnected

----------------------------------------------------------
-- Load from & Save to file
----------------------------------------------------------
function loadMessages()
   iMin=0
   iMax=0
   local f=io.open(History,"a")
   f:close()
   for line in
      io.lines(History) do
      iMax=iMax+1
      sMsg[iMax]=line
   end
end
function saveMessages()
   local f=io.open(History,"w")
   local i=iMin
   while i<=iMax do
      if sMsg then
         f:write(sMsg.."\n")
      end
      i=i+1
   end
   f:close()
end


it's possibile  spy pm user like these

Chat History On Entry 1.03 LUA 5
 Chat History?
I wait your news cordial greetings
thanks

plop

QuoteOriginally posted by gemini
it's possibile  spy pm user like these

your users like it when you spy on them???
i doubt that.

plop
http://www.plop.nl lua scripts/howto\'s.
http://www.thegoldenangel.net
http://www.vikingshub.com
http://www.lua.org

>>----> he who fights hatred with hatred, drives the spreading of hatred <----<<

bastya_elvtars

Just let the users have some private chat. If you run a hub, this is to be considered first. If some user wants to report something, he will. If not, then you will never know it, and do you think if you knew it it would be better for ya?

QuoteOriginally posted by bastya_elvtars
Requesting a PM spy? Moderators (and Scooby Doo), where are you now? :D
Everything could have been anything else and it would have just as much meaning.

gemini

cmdspy for all user with history

it's possible thanks bye

TTB

If... if I could make that, I wouldn't make it...  X(  This is lame dude!
TTB

(? ?.??.-> Admin @ Surfnet hubs <-.??.???)

Dessamator

it already exists, ptokax does that, maybe its something that should be fixed by ppk, :)
Ignorance is Bliss.

gemini

thank very much

Dessamator
TTB
bastya_elvtars
Mutor
plop

cordial greeting

Ubikk

If you want to read private messages all you have to do is check the hub's command log...
ex:

Quote[12:59] Ubikk (192.168.240.31) > $To: robotzel From: Ubikk $ this is a test|
[/size]

But, unfortunately there are thousands of commands in that log.. so it's tricky to understand a full private conversation.
My advice - get over it ...  :D

SMF spam blocked by CleanTalk