The Design and Implementation of the FreeBSD Operating System, Second Edition
Now available: The Design and Implementation of the FreeBSD Operating System (Second Edition)


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]

FreeBSD/Linux Kernel Cross Reference
sys/pci/locate.pl

Version: -  FREEBSD  -  FREEBSD-13-STABLE  -  FREEBSD-13-0  -  FREEBSD-12-STABLE  -  FREEBSD-12-0  -  FREEBSD-11-STABLE  -  FREEBSD-11-0  -  FREEBSD-10-STABLE  -  FREEBSD-10-0  -  FREEBSD-9-STABLE  -  FREEBSD-9-0  -  FREEBSD-8-STABLE  -  FREEBSD-8-0  -  FREEBSD-7-STABLE  -  FREEBSD-7-0  -  FREEBSD-6-STABLE  -  FREEBSD-6-0  -  FREEBSD-5-STABLE  -  FREEBSD-5-0  -  FREEBSD-4-STABLE  -  FREEBSD-3-STABLE  -  FREEBSD22  -  l41  -  OPENBSD  -  linux-2.6  -  MK84  -  PLAN9  -  xnu-8792 
SearchContext: -  none  -  3  -  10 

    1 #!/usr/local/bin/perl
    2 
    3 $errpos = hex($ARGV[0])/4;
    4 $ofs=0;
    5 
    6 open (INPUT, "cc -E ncr.c 2>/dev/null |");
    7 
    8 while ($_ = <INPUT>)
    9 {
   10     last if /^struct script \{/;
   11 }
   12 
   13 while ($_ = <INPUT>)
   14 {
   15     last if /^\}\;/;
   16     ($label, $size) = /ncrcmd\s+(\S+)\s+\[([^]]+)/;
   17     $size = eval($size);
   18     if ($label) {
   19         if ($errpos) {
   20             if ($ofs + $size > $errpos) {
   21                 printf ("%4x: %s\n", $ofs * 4, $label);
   22                 printf ("%4x: %s + %d\n", $errpos * 4, $label, $errpos - $ofs);
   23                 last;
   24             }
   25             $ofs += $size;
   26         } else {
   27             printf ("%4x: %s\n", $ofs * 4, $label);
   28         }
   29     }
   30 }
   31 

Cache object: 182230bb9311158af423f0ca569715b6


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]


This page is part of the FreeBSD/Linux Linux Kernel Cross-Reference, and was automatically generated using a modified version of the LXR engine.