how would i utilize sockmark in this instance? i can understand i would use '/sockmark sending $sockname' but past that, it gets a bit foggy for me. in the code below, %queuespace_ [ $+ [ $sockname ] ] returns $null so the 'if ... isnum 1-' fails.

Code:
  var %queuespace_ [ $+ [ $sockname ] ] = $calc(16384 - $sock($sockname).sq)
  if ( %queuespace_ [ $+ [ $sockname ] ] isnum 1- ) {
    bread %sendfile_ [ $+ [ $sockname ] ] %sendpos_ [ $+ [ $sockname ] ] %queuespace_ [ $+ [ $sockname ] ] &temp_ [ $+ [ $sockname ] ]
    sockwrite $sockname &temp_ [ $+ [ $sockname ] ]
    inc %sendpos_ [ $+ [ $sockname ] ] %queuespace_ [ $+ [ $sockname ] ]
    if ( %sendpos_ [ $+ [ $sockname ] ] >= $file(%sendfile_ [ $+ [ $sockname ] ]).size ) {
      sockmark $sockname
      .remove $pws_temp $+ $sockname $+ .tmp
      .remove $pws_temp $+ $sockname $+ _c.tmp
      ;unset %sendfile %sendpos
      .timer 1 1 sockclose $sockname
    }
    ;else { aline @pws 4 %sendpos_ [ $+ [ $sockname ] ] >= $file(%sendfile_ [ $+ [ $sockname ] ]).size   }
  }
  else { aline @pws 4 %queuespace_ [ $+ [ $sockname ] ] isnum 1-  }
}

Last edited by MTec007; 04/02/09 08:35 PM.