Lines Matching refs:bdata
200 my $data, $bdata, $adata;
245 $bdata = '';
248 return undef unless (read($file, $bdata, $blen) == $blen);
262 return (\%hdr, $bdata, $adata);
267 my($file, $hdr, $bdata, $adata) = @_;
274 $bdata .= "\xff" unless ($bdata eq '');
277 $len = length($bdata) + length($adata);
285 if (length($bdata)) {
287 return undef unless (print $file $bdata);
288 $patch_start += length($bdata);
300 my $hdr = pack("VV", length($bdata), length($adata));
303 my $hdr = pack("VVVV", $boff, length($bdata), $aoff, length($adata));