REFRESH/X fuzzer - admin clients testing script

[VirtualTT]

Script Name: REFRESH/X fuzzer
Script Description: Sends to TCP admins random corrupted REFRESH/REFRESHX packets.
Original Author(s): VirtualTT
Server Version: 2.7.0c
Core Version: 3.0

Written for admin clients testing.
Will run only if Safe mode is disabled!
Start the server with -safe 0 to disable Safe Mode.

Output example:


Since Random() function appears to be not that random i'm looking for some means to make it so... Any ideas?

[Gizd]

Try this:

Code: [Select]

function Random2(Min, Max: integer): integer;
var
  res: array[1..10] of integer;
  i: byte;
begin
  for i:= 1 to 10 do res[i]:= Random(Min, Max);
  Result:= res[Random(1,11)];
end;
I wrote this right now so fix it if there's anything wrong. It looks stupid but is more random.

[VirtualTT]

Unfortunately casting Random() on some data generated by another Random() just before this one, isn't a way to overcome relatively short repetition period of Random() function.
I was thinking about adding some buffer to hold random data which will be modified with Random() function a bit every second. So calling Random() with longer interval will give better results.

[xmRipper]

Baka Admin? That looks great. When will you release?

[tk]

Looks cool, what about finding some random algorithm and basing it on microtime?

edit
Have you heard about TCPAdminPM? http://devs.soldat.pl/wiki/index.php?title=TCPAdminPM

[VirtualTT]

Looks cool, what about finding some random algorithm and basing it on microtime?

edit
Have you heard about TCPAdminPM? http://devs.soldat.pl/wiki/index.php?title=TCPAdminPM

Yes, but i didn't mess with it since i want to see output in console window. I think that normal Random() is also based on microtime, but this is the main problem since microtime doesn't change during packet generation.

[tk]

GetTickCount, and GetPlayerStat results don't change in ApponIdle even if you put Sleeps between them. Maybe it's the same with micro time. Only the way is threadfunc then which may be unstable.

[VirtualTT]

GetTickCount() (1/60 s), microtime() (1/1000) values aren't changed during packet generation since it hardly last even a 1 ms.

[tk]

Are you sure microtime is 1/1000?

Returns the current Unix timestamp with microseconds.

Microsecond is 10^-6 of a second.

If the script is used only for testing admin clients, you can use OnCommand (event where results of functions are changed during executing code) to send a single packet.

[VirtualTT]

Yes, for me it returns time in milliseconds.
According to manual http://www.enesce.com/help/index.html?Functions/microtime.html it should return microseconds. Or maybe gettimeofday() system call is not supported under windows.
And btw, his example outputs

// Code executed in 5.385 seconds. Good for benchmarking stuff

This confuses me even more...