NAME
Data::Plist::BinaryWriter - write binary property lists from Perl data structures
SYNOPSIS
# Create new
my $write = Data::Plist::BinaryWriter->new();
# Writing to a string ($ret is binary output)
my $ret = $write->write($data);
# Writing to a file C<$filename>
$write->write($filename, $data);
DESCRIPTION
Data::Plist::BinaryWriter
takes perl data structures, serializes them (see "SERIALIZED DATA" in Data::Plist) and recursively writes to a given filehandle in Apple's binary property list format.
METHODS
write_fh $fh, $data
Takes a perl data structure $data
, serializes it (see "SERIALIZED DATA" in Data::Plist) and writes it to the given filehandle $fh
in Apple's binary property list format.
The format starts with "bplist00" and contains a 32-byte trailer. The 32-byte trailer consists of the size of the offset objects in the offset table, the size of the indices of the offset table, the number of objects in the binary file, the index of top object in the binary file and the offset table offset.
dispatch $data
Takes serialized data structure $data
(see "SERIALIZED DATA" in Data::Plist) and checks its type. Checks the object against previously written objects. If no match is found, calls the appropriate write_ method. Returns the index into the offset table of the offset object that points to the data's position in the binary file.
make_type $type, $length
Takes a string representing the object's type $type
and an integer indicating its size $length
. Returns their binary representation.
Each object in the binary file is preceded by a byte - the higher nybble denoting its type and the lower its size. For objects whose size is equal to or great than 15, the lower byte contains an f and an integer object is added right after the first byte containing the object's actual size.
write_integer $int, $type
Takes an integer $int
and an optional type $type
(used for writing UIDs, since they're essentially the same). Returns the index into the offset table of the offset object that points to the integer's location in the binary file.
write_string $string
Takes a string $string
and returns the index into the offset table of the offset object that points to its location in the binary file. It is encoded in the file using UTF-8.
write_ustring $ustring
Takes a string $ustring
and returns the index into the offset table of the offset object that points to its location in the binary file.
While ustrings
are technically supposed to be stored in UTF-16, there is no known reason for them to not be written as UTF-8 encoded string
s instead; thus, for simplicity, all ustring
s are written as string
s.
write_dict $dict
Takes a hash reference $dict
and recursively processes each of its keys and values. Stores indices into the offset table of the offset objects pointing to its keys and values in the binary file. Returns the index into the offset table of the offset object that points to its location in the binary file.
write_array $array
Take an array reference $array
and recursively processes its contents. Stores the indices into the offset table of the offset objects pointing to its value. Returns the index into the offset table of the offset object that points to its location in the binary file.
write_UID $id
Takes a UID $id
and returns the index into the offset table of the offset object that points to its location in the binary file. Passes the UID off to "write_integer" for actual writing, since they're processed in the same manner, simply with different types.
write_real $real, $type
Takes a float $real
and an optional type $type
(used for writing dates, since they're essentially the same), and returns the index into the offset table of the offset object that points to its location in the binary file. The bytes of the float are packed in reverse.
write_date $date
Takes a date $date
and returns the index into the offset table of the offset object that points to its location in the binary file. Passes the date off to "write_real" for actual writing, since they're processed in the same manner, simply with different types.
write_null $null
Takes a null $null
and passes it to "write_misc", along with an integer indicating what type of misc it is. The null belongs to the misc category (see "write_misc").
write_false $false
Takes a false $false
and passes it to "write_misc", along with an integer indicating what type of misc it is. The false belongs to the misc category (see "write_misc").
write_true $true
Takes a true $true
and passes it to "write_misc", along with an integer indicating what type of misc it is. The true belongs to the misc category (see "write_misc").
write_fill $fill
Takes a fill $fill
and passes it to "write_misc", along with an integer indicating what type of misc it is. The fill belongs to the misc category (see "write_misc").
write_misc $type
Takes an integer indicating an object belonging to the misc category $type
(false, null, true or fill) and returns the index into the offset table of the offset object that points to its location in the file.
Miscs are a group of data types not easily represented in Perl, and they are written with the only header byte containing a 0 to indicate that they are a misc and their misc type.
write_data $data
Takes some binary data $data
and returns the index into the offset table of the offset object that points to its location in the file. Doesn't attempt to process the data at all.
count $data
Recursively counts the number of objects in a serialized data structure $data
. Does not take into account duplicates, so this number might be slightly higher than the number of objects that is indicated in the 32-byte trailer.
binary_write $obj
Does the actual writing to the binary file. Takes some binary data $obj
and writes it to the filehandle. Also adds the location of the binary data to the offset table and returns the index into the offset table of the current object.
power $int
Calculates the number of bytes necessary to encode an integer $int
. Returns a power of 2 indicating the number of bytes.
bytes $int
Calculates the number of bytes necessary to encode an integer $int
. Returns the actual number of bytes.
pack_in $int
Takes either a power of 2 or a number of bytes $int
and returns the format pack() needs for encoding.