Lines Matching full:my
13 my $sysmap = "";
20 my $vmlinux = $ARGV[0];
21 my $keyring = $ARGV[1];
27 my @lines = <FD>;
30 my @sections = ();
32 foreach my $line (@lines) {
36 my $seg = $1;
37 my $name = $2;
38 my $len = Math::BigInt->new("0x" . $3);
39 my $vma = Math::BigInt->new("0x" . $4);
40 my $lma = Math::BigInt->new("0x" . $5);
41 my $foff = Math::BigInt->new("0x" . $6);
42 my $align = 2 ** $7;
61 my %symbols = ();
62 my $nr_symbols = 0;
65 foreach my $line (@_) {
69 my $addr = "0x" . $1;
70 my $type = $2;
71 my $name = $3;
98 my $start = Math::BigInt->new($symbols{"__cert_list_start"});
99 my $end;
100 my $size;
101 my $size_sym = Math::BigInt->new($symbols{"system_certificate_list_size"});
106 my $s = undef;
107 foreach my $sec (@sections) {
108 my $s_name = $sec->{name};
109 my $s_vma = $sec->{vma};
110 my $s_len = $sec->{len};
111 my $s_foff = $sec->{foff};
112 my $s_vend = $s_vma + $s_len;
123 my $size_off = $size_sym -$s_vma + $s_foff;
124 my $packed;
143 my $foff = $start - $s->{vma} + $s->{foff};
148 my $buf = "";
149 my $len = sysread(FD, $buf, $size);