on udpread help - mIRC Discussion Forums

Hi!!

I attempting to use udpread event but seems that non-binary way doesn't reading the bytes correctly even if $sockbr is not $null there. The fail seems to be on /sockread %temp under server2 udpread event that doesn't saving the data. i will provide a short reproduce code.

Reproduce Code :

Code

ON *:UDPREAD:server1: {
  if ($sockerr) { echo 4 -sg Sockerr $sockname > $sockerr --> $sock($sockname).wsmsg | return }

  sockread $sock($sockname).rq &temp

  if ($sockbr) { echo 12 -sg $sockname -- $sockbr -- $bvar(&temp,0) -- $bvar(&temp,1-) -- $bvar(&temp,1-).text }
}

ON *:UDPREAD:server2: {
  if ($sockerr) { echo 4 -sg Sockerr $sockname > $sockerr --> $sock($sockname).wsmsg | return }

  var %temp
  sockread %temp

  if ($sockbr) { echo 13 -sg $sockname -- $sockbr -- %temp }
}

alias fast_test {
  sockclose server1
  sockclose server2

  sockudp -k server1 7901
  sockudp -k server2 7902

  bset &temp -1 255 255 255 255 82 76 32 48 52 47 49 55 47 50 48 51 50 32 45 32 49 53 58 49 55 58 48 57 58 32 10 0

  var %t = 3
  while (%t) { sockudp client1 127.0.0.1 7901 &temp | sockudp client2 127.0.0.1 7902 &temp | dec %t }
}