| /openbsd/src/gnu/usr.bin/perl/t/op/ |
| D | pack.t | 86 my @ary2 = unpack($format,$foo); 103 is( ($x = unpack("%32B*", "\001\002\004\010\020\040\100\200\377")), 16 ); 105 is( ($x = unpack("%32b69", "\001\002\004\010\020\040\100\200\017")), 12 ); 107 is( ($x = unpack("%32B69", "\001\002\004\010\020\040\100\200\017")), 9 ); 115 is( ($x = unpack("%32B*", "Now is the time for all good blurfl")), $sum ); 123 $sum = unpack("%32b*", $foo); 124 my $longway = unpack("b*", $foo); 130 is( ($x = unpack("I",pack("I", 0xFFFFFFFF))), 0xFFFFFFFF ); 143 my @y = unpack('w*', $y); 150 @y = unpack('w2', $x); [all …]
|
| D | infnan.t | 149 eval { $b = unpack($f, $a) }; 155 eval { $b = unpack($f, $a) }; 169 is eval { unpack "p", pack 'p', $PInf }, "Inf", "pack p +Inf"; 170 is eval { unpack "P3", pack 'P', $PInf }, "Inf", "pack P +Inf"; 171 is eval { unpack "p", pack 'p', $NInf }, "-Inf", "pack p -Inf"; 172 is eval { unpack "P4", pack 'P', $NInf }, "-Inf", "pack P -Inf"; 340 eval { $b = unpack($f, $a) }; 349 is eval { unpack "p", pack 'p', $NaN }, "NaN", "pack p +NaN"; 350 is eval { unpack "P3", pack 'P', $NaN }, "NaN", "pack P +NaN";
|
| D | utf8decode.t | 57 warning_is(sub {@got = unpack 'C0U*', $octets}, undef, 62 warnings_like(sub {unpack 'C0U*', $octets}, [qr/$experr/], 77 unpack 'C0U*', $octets;
|
| /openbsd/src/gnu/usr.bin/perl/t/lib/warnings/ |
| D | pp_pack | 3 Invalid type in unpack: '%c 5 my @A = unpack ("A,A", "22") ; 13 use warnings 'unpack' ; 14 my @a = unpack ("A,A", "22") ; 17 no warnings 'unpack' ; 18 my @b = unpack ("A,A", "22") ; 21 Invalid type ',' in unpack at - line 4. 38 print unpack("C", pack("C", -1)), "\n", 39 unpack("C", pack("C", 0)), "\n", 40 unpack("C", pack("C", 255)), "\n", [all …]
|
| /openbsd/src/usr.sbin/smtpd/ |
| D | unpack_dns.c | 23 static int unpack_data(struct unpack *, void *, size_t); 24 static int unpack_u16(struct unpack *, uint16_t *); 25 static int unpack_u32(struct unpack *, uint32_t *); 26 static int unpack_inaddr(struct unpack *, struct in_addr *); 27 static int unpack_in6addr(struct unpack *, struct in6_addr *); 28 static int unpack_dname(struct unpack *, char *, size_t); 31 unpack_init(struct unpack *unpack, const char *buf, size_t len) in unpack_init() argument 33 unpack->buf = buf; in unpack_init() 34 unpack->len = len; in unpack_init() 35 unpack->offset = 0; in unpack_init() [all …]
|
| D | unpack_dns.h | 25 struct unpack { struct 88 void unpack_init(struct unpack *, const char *, size_t); 89 int unpack_header(struct unpack *, struct dns_header *); 90 int unpack_rr(struct unpack *, struct dns_rr *); 91 int unpack_query(struct unpack *, struct dns_query *);
|
| /openbsd/src/gnu/llvm/lldb/examples/python/ |
| D | file_extract.py | 67 v, = struct.unpack(self.byte_order + 'b', s) 76 v, = struct.unpack(self.byte_order + 'B', s) 85 v, = struct.unpack(self.byte_order + 'h', s) 94 v, = struct.unpack(self.byte_order + 'H', s) 103 v, = struct.unpack(self.byte_order + 'i', s) 112 v, = struct.unpack(self.byte_order + 'I', s) 121 v, = struct.unpack(self.byte_order + 'q', s) 130 v, = struct.unpack(self.byte_order + 'Q', s) 143 cstr, = struct.unpack(self.byte_order + ("%i" % n) + 's', s) 168 return struct.unpack(self.byte_order + ("%u" % n) + 'b', s) [all …]
|
| D | mach_o.py | 505 def unpack(self, data): member in Mach.Magic 525 self.unpack(extractor) 532 self.unpack(file_extractor) 570 def unpack(self, data): member in Mach 571 self.magic.unpack(data) 580 self.content.unpack(data, self.magic) 606 def unpack(self, data, magic=None): member in Mach.Universal 610 self.magic.unpack(data) 619 self.archs[i].unpack(data) 624 skinny_magic.unpack(data) [all …]
|
| /openbsd/src/gnu/usr.bin/perl/t/uni/ |
| D | lex_utf8.t | 50 is((join "", unpack("C*", $A_with_ogonek)), fixup("196", "132"), 'single char above 0x100'); 51 is((join "", unpack("C*", $micro_sign)), fixup("194", "181"), 'single char in 0x80 .. 0xFF'); 54 …is((join "", unpack("C*", $hex_first)), fixup("97", "194", "162", "196", "132"), 'a, \x{A2}, char … 55 …is((join "", unpack("C*", $hex_last)), fixup("97", "196", "132", "194", "162"), 'a, char above 0x1… 57 …is((join "", unpack("C*", $name_first)), fixup("98", "194", "181", "198", "129"), 'b, \N{MICRO SIG… 58 …is((join "", unpack("C*", $name_last)), fixup("98", "198", "129", "194", "181"), 'b, char above 0x… 59 …is((join "", unpack("C*", $uname_first)), fixup("98", "194", "181", "198", "129"), 'b, \N{U+00B5},… 60 …is((join "", unpack("C*", $uname_last)), fixup("98", "198", "129", "194", "181"), 'b, char above 0… 63 …is((join "", unpack("C*", $octal_first)), fixup("99", "195", "191", "196", "134"), 'c, \377, char … 64 …is((join "", unpack("C*", $octal_last)), fixup("99", "196", "134", "195", "191"), 'c, char above 0…
|
| D | sprintf.t | 118 is((sprintf "%x %d", unpack("U*", $a), length($a)), "1234 1", 121 is((sprintf "%x %d", unpack("U*", $a), length($a)), "5678 1", 124 is((sprintf "%x %x %d", unpack("U*", $a), length($a)), "1234 5678 2",
|
| /openbsd/src/gnu/usr.bin/perl/pod/ |
| D | perlpacktut.pod | 3 perlpacktut - tutorial on C<pack> and C<unpack> 7 C<pack> and C<unpack> are two functions for transforming data according 24 representational conversion provided by C<pack> and C<unpack> is an 27 the so-called "template" argument. C<unpack> is the reverse process, 44 sequence and a string of hexadecimal digits. Let's use C<unpack>, since 51 my( $hex ) = unpack( 'H*', $mem ); 66 we note that C<unpack> with the template code C<H> converts the contents 122 if you use the right tools. C<pack> and C<unpack> are designed to help 124 look at a solution with C<unpack>: 127 my($date, $desc, $income, $expend) = unpack("A10xA27xA7A*", $_); [all …]
|
| /openbsd/src/gnu/llvm/compiler-rt/lib/gwp_asan/tests/ |
| D | compression.cpp | 153 unpack(Compressed, BytesUsedForPacking, Uncompressed, NumEntries)); in runPackUnpack() 165 EXPECT_EQ(2u, unpack(Compressed, sizeof(Compressed), Uncompressed, 2u)); in TEST() 174 EXPECT_EQ(2u, unpack(Compressed, sizeof(Compressed), Uncompressed, 2u)); in TEST() 225 EXPECT_EQ(unpack(Compressed, kBytesForLargestVarInt + 1, &Uncompressed, 1), in TEST() 233 EXPECT_EQ(unpack(Compressed, 1u, &Uncompressed, 1), 0u); in TEST()
|
| /openbsd/src/gnu/usr.bin/perl/cpan/IPC-SysV/t/ |
| D | ipcsysv.t | 200 ($rmsgtype, $rmsgtext) = unpack("L$N a*", $msgbuf); 250 my @data = unpack("s$N*", $data); 265 @data = unpack("s$N*", $data); 291 is(unpack("N", unpack("P4", $addr)), 0xdeadbeef, 'read shm by addr'); 298 is(unpack("N", $var), 0xdeadbeef, 'read shm by memread'); 302 is(unpack("N", unpack("P4", $addr)), 0xbadc0de5, 'read modified shm by addr');
|
| /openbsd/src/gnu/llvm/compiler-rt/tools/gwp_asan/ |
| D | stack_trace_compressor_fuzzer.cpp | 17 gwp_asan::compression::unpack(Data, Size, in LLVMFuzzerTestOneInput() 27 size_t DecodedElements = gwp_asan::compression::unpack( in LLVMFuzzerTestOneInput()
|
| /openbsd/src/gnu/llvm/llvm/utils/ |
| D | llvm-gisel-cov.py | 47 backend, = struct.unpack("%ds" % len(backend), backend) 52 rule_id, = struct.unpack("Q", data[:8])
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Socket/t/ |
| D | sockaddr.t | 19 …is(join(".", unpack("C*",inet_aton("10.20.30.40"))), "10.20.30.40", 'inet_aton returns packed byte… 34 …is(join(".", unpack("C*",inet_pton(AF_INET, "10.20.30.40"))), "10.20.30.40", 'inet_pton AF_INET re… 50 …is(uc unpack("H*",inet_pton($AF_INET6, "2001:503:BA3E::2:30")), "20010503BA3E00000000000000020030",
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Pod-Simple/t/ |
| D | eol2.t | 87 my $cksum1 = unpack("%32C*", $o1); 88 my $cksum2 = unpack("%32C*", $o2); 89 my $cksum3 = unpack("%32C*", $o3);
|
| D | eol.t | 90 my $cksum1 = unpack("%32C*", $o1); 91 my $cksum2 = unpack("%32C*", $o2); 92 my $cksum3 = unpack("%32C*", $o3);
|
| /openbsd/src/gnu/usr.bin/perl/dist/Storable/t/ |
| D | overload.t | 88 $f = unpack 'u', q{7!084$0S(P>)MUN7%V=/6P<0*!**5EJ8`}; 90 $f = unpack 'u', q{7!084$0Q(05-?3U9%4DQ/040*!'-N;W<`};
|
| D | compat06.t | 87 $data .= unpack("u", $_); 95 $data .= unpack("u", $_);
|
| /openbsd/src/gnu/llvm/lldb/examples/summaries/cocoa/ |
| D | NSDate.py | 90 value_double = struct.unpack('d', struct.pack('Q', self.data))[0] 122 value_double = struct.unpack( 156 value_double = struct.unpack( 293 value_double = struct.unpack(
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Encode/t/ |
| D | encoding.t | 60 # we didn't break pack/unpack, I hope 62 print "not " unless unpack("C", pack("C", 0xdf)) == 0xdf; 66 print "not " unless unpack("U0 C", chr(0xdf)) == 0xce; 69 print "not " unless unpack("U", pack("U", 0xdf)) == 0xdf; 72 print "not " unless unpack("U", chr(0xdf)) == 0x3af;
|
| /openbsd/src/gnu/llvm/llvm/include/llvm/ADT/ |
| D | Bitfields.h | 131 static T unpack(T StorageValue) { return StorageValue; } in unpack() function 147 static T unpack(T StorageValue) { 180 return C::unpack(StorageValue);
|
| /openbsd/src/lib/libc/asr/ |
| D | asr_utils.c | 174 _asr_unpack_init(struct asr_unpack *unpack, const char *buf, size_t len) in _asr_unpack_init() argument 176 unpack->buf = buf; in _asr_unpack_init() 177 unpack->len = len; in _asr_unpack_init() 178 unpack->offset = 0; in _asr_unpack_init() 179 unpack->err = 0; in _asr_unpack_init()
|
| /openbsd/src/gnu/llvm/compiler-rt/lib/gwp_asan/ |
| D | crash_handler.cpp | 126 size_t UnpackedLength = gwp_asan::compression::unpack( in __gwp_asan_get_allocation_trace() 150 size_t UnpackedLength = gwp_asan::compression::unpack( in __gwp_asan_get_deallocation_trace()
|