ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/CBOR-XS/XS.pm
(Generate patch)

Comparing CBOR-XS/XS.pm (file contents):
Revision 1.79 by root, Fri Dec 11 06:03:40 2020 UTC vs.
Revision 1.87 by root, Mon Dec 19 20:31:33 2022 UTC

64 64
65package CBOR::XS; 65package CBOR::XS;
66 66
67use common::sense; 67use common::sense;
68 68
69our $VERSION = 1.83; 69our $VERSION = 1.86;
70our @ISA = qw(Exporter); 70our @ISA = qw(Exporter);
71 71
72our @EXPORT = qw(encode_cbor decode_cbor); 72our @EXPORT = qw(encode_cbor decode_cbor);
73 73
74use Exporter; 74use Exporter;
121but configures the coder object to be safe to use with untrusted 121but configures the coder object to be safe to use with untrusted
122data. Currently, this is equivalent to: 122data. Currently, this is equivalent to:
123 123
124 my $cbor = CBOR::XS 124 my $cbor = CBOR::XS
125 ->new 125 ->new
126 ->validate_utf8
126 ->forbid_objects 127 ->forbid_objects
127 ->filter (\&CBOR::XS::safe_filter) 128 ->filter (\&CBOR::XS::safe_filter)
128 ->max_size (1e8); 129 ->max_size (1e8);
129 130
130But is more future proof (it is better to crash because of a change than 131But is more future proof (it is better to crash because of a change than
133=cut 134=cut
134 135
135sub new_safe { 136sub new_safe {
136 CBOR::XS 137 CBOR::XS
137 ->new 138 ->new
139 ->validate_utf8
138 ->forbid_objects 140 ->forbid_objects
139 ->filter (\&CBOR::XS::safe_filter) 141 ->filter (\&CBOR::XS::safe_filter)
140 ->max_size (1e8) 142 ->max_size (1e8)
141} 143}
142 144
471Perl data structure in memory at one time, it does allow you to parse a 473Perl data structure in memory at one time, it does allow you to parse a
472CBOR stream incrementally, using a similar to using "decode_prefix" to see 474CBOR stream incrementally, using a similar to using "decode_prefix" to see
473if a full CBOR object is available, but is much more efficient. 475if a full CBOR object is available, but is much more efficient.
474 476
475It basically works by parsing as much of a CBOR string as possible - if 477It basically works by parsing as much of a CBOR string as possible - if
476the CBOR data is not complete yet, the pasrer will remember where it was, 478the CBOR data is not complete yet, the parser will remember where it was,
477to be able to restart when more data has been accumulated. Once enough 479to be able to restart when more data has been accumulated. Once enough
478data is available to either decode a complete CBOR value or raise an 480data is available to either decode a complete CBOR value or raise an
479error, a real decode will be attempted. 481error, a real decode will be attempted.
480 482
481A typical use case would be a network protocol that consists of sending 483A typical use case would be a network protocol that consists of sending
633create such objects. 635create such objects.
634 636
635=item Types::Serialiser::true, Types::Serialiser::false, Types::Serialiser::error 637=item Types::Serialiser::true, Types::Serialiser::false, Types::Serialiser::error
636 638
637These special values become CBOR true, CBOR false and CBOR undefined 639These special values become CBOR true, CBOR false and CBOR undefined
638values, respectively. You can also use C<\1>, C<\0> and C<\undef> directly 640values, respectively.
639if you want.
640 641
641=item other blessed objects 642=item other blessed objects
642 643
643Other blessed objects are serialised via C<TO_CBOR> or C<FREEZE>. See 644Other blessed objects are serialised via C<TO_CBOR> or C<FREEZE>. See
644L<TAG HANDLING AND EXTENSIONS> for specific classes handled by this 645L<TAG HANDLING AND EXTENSIONS> for specific classes handled by this
704=back 705=back
705 706
706=head2 TYPE CASTS 707=head2 TYPE CASTS
707 708
708B<EXPERIMENTAL>: As an experimental extension, C<CBOR::XS> allows you to 709B<EXPERIMENTAL>: As an experimental extension, C<CBOR::XS> allows you to
709force specific cbor types to be used when encoding. That allows you to 710force specific CBOR types to be used when encoding. That allows you to
710encode types not normally accessible (e.g. half floats) as well as force 711encode types not normally accessible (e.g. half floats) as well as force
711string types even when C<text_strings> is in effect. 712string types even when C<text_strings> is in effect.
712 713
713Type forcing is done by calling a special "cast" function which keeps a 714Type forcing is done by calling a special "cast" function which keeps a
714copy of the value and returns a new value that can be handed over to any 715copy of the value and returns a new value that can be handed over to any
756 757
757Forces double-float (IEEE 754 binary64) encoding of the given value. 758Forces double-float (IEEE 754 binary64) encoding of the given value.
758 759
759=item CBOR::XS::as_cbor $cbor_text 760=item CBOR::XS::as_cbor $cbor_text
760 761
761Not a type cast per-se, this type cast forces the argument to eb encoded 762Not a type cast per-se, this type cast forces the argument to be encoded
762as-is. This can be used to embed pre-encoded CBOR data. 763as-is. This can be used to embed pre-encoded CBOR data.
763 764
764Note that no checking on the validity of the C<$cbor_text> is done - it's 765Note that no checking on the validity of the C<$cbor_text> is done - it's
765the callers responsibility to correctly encode values. 766the callers responsibility to correctly encode values.
766 767
767=item CBOR::XS::as_map [key => value...] 768=item CBOR::XS::as_map [key => value...]
768 769
769Treat the array reference as key value pairs and output a CBOR map. This 770Treat the array reference as key value pairs and output a CBOR map. This
770allows you to generate CBOR maps with arbitrary key types (or, if you 771allows you to generate CBOR maps with arbitrary key types (or, if you
771don't care about semantics, duplicate keys or prairs in a custom order), 772don't care about semantics, duplicate keys or pairs in a custom order),
772which is otherwise hard to do with Perl. 773which is otherwise hard to do with Perl.
773 774
774The single argument must be an array reference with an even number of 775The single argument must be an array reference with an even number of
775elements. 776elements.
777
778Note that only the reference to the array is copied, the array itself is
779not. Modifications done to the array before calling an encoding function
780will be reflected in the encoded output.
776 781
777Example: encode a CBOR map with a string and an integer as keys. 782Example: encode a CBOR map with a string and an integer as keys.
778 783
779 encode_cbor CBOR::XS::as_map [string => "value", 5 => "value"] 784 encode_cbor CBOR::XS::as_map [string => "value", 5 => "value"]
780 785

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines