Lines Matching refs:size
102 # sign(size, cred, path)
107 my ($size, $cred, $path) = @_;
111 recvfile("$Tmpdir/in.zip", $size) || return;
157 # an OK SIGN response that includes the file size, followed by
162 my ($size, $bytes);
164 $size = -s $file;
169 read(F, $bytes, $size);
171 print "OK SIGN $size $path\n";
172 syswrite(STDOUT, $bytes, $size);
177 # recvfile(file, size)
180 # provides the size argument previously obtained from the
184 my ($file, $size) = @_;
187 if (!read(STDIN, $bytes, $size)) {
195 syswrite(F, $bytes, $size);