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.
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- }
}