Gammon Forum

Incoming packet: 343 (206 bytes) at Thursday, October 10, 2019, 5:22:43 PM

<.[35mGeneral   26 6c 74 3b 1b 5b 33 35 6d 47 65 6e 65 72 61 6c
.[0m> .[38;5;   1b 5b 30 6d 26 67 74 3b 20 1b 5b 33 38 3b 35 3b
220mB.[38;5;124m   32 32 30 6d 42 1b 5b 33 38 3b 35 3b 31 32 34 6d
urst.[0m .[38;5;   75 72 73 74 1b 5b 30 6d 20 1b 5b 33 38 3b 35 3b
220mA.[38;5;124m   32 32 30 6d 41 1b 5b 33 38 3b 35 3b 31 32 34 6d
ngel.[0m Jo says   6e 67 65 6c 1b 5b 30 6d 20 4a 6f 20 73 61 79 73
, "Meg is n   2c 20 26 71 75 6f 74 3b 4d 65 67 20 69 73 20 6e
ormal human bada   6f 72 6d 61 6c 20 68 75 6d 61 6e 20 62 61 64 61
ss, Jo is 'raise   73 73 2c 20 4a 6f 20 69 73 20 27 72 61 69 73 65
d in a lab to be   64 20 69 6e 20 61 20 6c 61 62 20 74 6f 20 62 65
 perfectly engin   20 70 65 72 66 65 63 74 6c 79 20 65 6e 67 69 6e
eered to murder'   65 65 72 65 64 20 74 6f 20 6d 75 72 64 65 72 27
 badass."     20 62 61 64 61 73 73 2e 26 71 75 6f 74 3b

Incoming packet: 344 (5 bytes) at Thursday, October 10, 2019, 5:22:44 PM

<BR>.              3c 42 52 3e 0a

Enter your name: (name)
Enter your password: (password)

connect (name) (password)

<?xml version="1.0" encoding="iso-8859-1"?>
<!DOCTYPE muclient>

<muclient>
<plugin
   name="Buffer_Lines"
   author="Nick Gammon"
   id="8eb1cd324d58655b0ff057db"
   language="Lua"
   purpose="Buffer packets so they have a newline in them"
   date_written="2019-10-11 17:27:00"
   requires="4.80"
   version="1.0"
   >
</plugin>

<!--  Trigger to show you have connected  -->

<triggers>
  <trigger
   enabled="y"
   match="You have connected!"
   script="we_connnected"
   sequence="100"
  >
  </trigger>
</triggers>



<!--  Script  -->

<script>
<![CDATA[

local previousPacket = { }
local lines = { }
local buffer_packets = false

-- add to lines table
function addToLines (s)
  lines [#lines + 1] = s
  return "" -- omit from the existing line
end  -- end of function addToLines
            
-- here when we log in 
function we_connnected (name, line, wildcards)
   buffer_packets = true
end -- we_connnected
       
function OnPluginPacketReceived (packet)
  
  -- do nothing if we haven't logged in
  if not buffer_packets then
   return nil
  end -- not reached connection message
 
 
  -- add packet to previous ones
  previousPacket [#previousPacket + 1] = packet

  -- combine into one long string
  local allPackets = table.concat (previousPacket)   

  lines = { }  -- no lines yet
  
  -- break up combined packet into lines with LF in them
  local LeftOver = string.gsub (allPackets, "([^\n]*)\n", addToLines)
   
  -- if no linefeed in line return nothing
  if #lines == 0 then
    return ""
  end -- if
  
 -- this last part did not have a LF in it
  previousPacket = { LeftOver }
  
  -- return existing lines with the LF added back
  return table.concat (lines, "\n") .. "\n"
end  -- OnPluginPacketReceived

function OnPluginConnect ()
  previousPacket = {}
  buffer_packets = false
end -- OnPluginConnect

]]>
</script>

</muclient>

<?xml version="1.0" encoding="iso-8859-1"?>
<!DOCTYPE muclient>

<muclient>
<plugin
   name="Buffer_Lines"
   author="Nick Gammon"
   id="8eb1cd324d58655b0ff057db"
   language="Lua"
   purpose="Buffer packets so they have a newline in them"
   date_written="2019-10-11 17:27:00"
   date_modified="2019-10-12 08:06:00"
   requires="4.80"
   version="1.1"
   >
</plugin>

<!--  Trigger to show you have connected  -->

<triggers>
  <trigger
   enabled="y"
   match="You have connected!"
   script="we_connnected"
   sequence="100"
  >
  </trigger>
</triggers>



<!--  Script  -->

<script>
<![CDATA[

local previousPacket = ""
local buffer_packets = false

-- here when we log in
function we_connnected (name, line, wildcards)
   if not buffer_packets then
     ColourNote ("green", "", "Packet buffering now active")
   end -- if
   buffer_packets = true
end -- we_connnected

function OnPluginPacketReceived (packet)

  -- do nothing if we haven't logged in
  if not buffer_packets then
   return nil  -- this makes the client process the unchanged packet
  end -- not reached connection message

  -- add packet to previous ones
  previousPacket = previousPacket .. packet

  -- find last newline (the search for a newline is "greedy")
  sendThis, keepThis = string.match (previousPacket, "^(.*\n)([^\n]*)")

  -- if no linefeed in line return nothing
  if not sendThis then
    return ""
  end -- if

  -- save stuff past the newline for next time
  previousPacket = keepThis

  -- send up to the last newline
  return sendThis

end  -- OnPluginPacketReceived

function OnPluginConnect ()
  previousPacket = ""
  buffer_packets = false
end -- OnPluginConnect

]]>
</script>

</muclient>

-- here when we log in
function we_connnected (name, line, wildcards)
   if not buffer_packets then
     ColourNote ("green", "", "Packet buffering now active")
   end -- if
   buffer_packets = true
end -- we_connnected