CTar::writeHeader

function writeHeader($ar)
{
	$header0 = pack("a100a8a8a8a12a12", $ar['filename'], decoct($ar['mode']), decoct($ar['uid']), decoct($ar['gid']), decoct($ar['size']), decoct($ar['mtime']));
	$header1 = pack("a1a100a6a2a32a32a8a8a155", $ar['type'],'','','','','','', '', $ar['prefix'] ?? null);

	$checksum = pack("a8",decoct($this->checksum($header0.'        '.$header1)));
	$header = pack("a512", $header0.$checksum.$header1);
	return $this->writeBlock($header) || $this->Error('Error writing header');
}