Lines Matching refs:this

59 my %this;
233 my $this = $_[0];
234 my $size = $this->{elsize};
235 my $h = $this->{argparams};
237 foreach my $arg (@{$this->{args}}) {
247 my ($this, $postfix, $is_same_reg) = @_;
249 ($this->{args}, $this->{argparams}, $this->{name});
252 my @sorted_args = @{$this->{sorted_args}};
254 my $size = arr_size($this);
278 ", \"$name" . (defined $this->{discontig} ? " $lim_arg" : "") . "\" },\n"
279 if is_limit_reg $this->{base_addr};
292 $hdr_data .= sprintf "#define %-62s %s", "CCS_" . (uc ${this{name}}) ."_$bit", bit_def($addr) . "\n";
298 { "name" => "MASK", "addr" => (1 << ($msb + 1)) - 1 - ((1 << $lsb) - 1), "fmt" => "0x%" . join(".", ($this{"elsize"} >> 2) x 2) . "x" } );
299 $this{"field"} = $this_field;
302 $hdr_data .= sprintf "#define %-62s " . $ar->{"fmt"} . "\n", "CCS_" . (uc $this{"name"}) . (defined $this_field ? "_" . uc $this_field : "") . "_" . $ar->{"name"}, $ar->{"addr"} . "\n";
308 $hdr_data .= sprintf "#define %-62s %s", "CCS_" . (uc ${this{name}}) . (defined $this{"field"} ? "_" . uc $this{"field"} : "") ."_$enum", $addr . ($addr =~ /0x/i ? "" : "U") . "\n";
317 $hdr_data .= sprintf "#define %-62s %s", "CCS_LIM_" . (uc ${this{name}} . "_MIN_$arg"), $min . ($min =~ /0x/i ? "" : "U") . "\n";
318 $hdr_data .= sprintf "#define %-62s %s", "CCS_LIM_" . (uc ${this{name}} . "_MAX_$arg"), $max . ($max =~ /0x/i ? "" : "U") . "\n";
320 my $h = $this{argparams};
327 $this{discontig} = $arg if @discontig;
329 next if $#{$this{args}} + 1 != scalar keys %{$this{argparams}};
331 my $reg_formula = "$this{addr}";
336 $reg_formula = "(" . $reg_formula if $this{flagstring} ne "";
338 foreach my $arg (@{$this{args}}) {
357 print $H tabconv sprintf("#define %-62s %s", "CCS_R_" . (uc $this{name}) .
358 $this{arglist}, $reg_formula .
359 (($this{flagstring} eq "") ? "" :
360 " | " . $this{flagstring} . ")") . "\n");
366 @{$this{sorted_args}} = sort {
368 } @{$this{args}};
370 if (defined $this{discontig}) {
371 my $da = $this{argparams}->{$this{discontig}};
376 print_args(\%this, "", 0);
380 print_args(\%this, $first_discontig, 1);
382 print_args(\%this, "", 0);
385 next unless is_limit_reg $this{base_addr};
388 "CCS_L_" . (uc $this{name}) . "_OFFSET(" .
389 (join ", ", @{$this{args}}) . ")", "($lim_formula)";
392 if (! @{$this{args}}) {
434 %this = ( name => $name,
450 $this{elsize} . ", 0, \"$name\" },\n"
451 if is_limit_reg $this{base_addr};
455 "CCS_L_" . (uc $this{name}), $limitcount++
456 if is_limit_reg $this{base_addr};