github.com/juelite/golang.org-x-sys@v0.0.0-20181121071242-7b69e1c5db33/unix/mksysnum_linux.pl (about)

     1  #!/usr/bin/env perl
     2  # Copyright 2009 The Go Authors. All rights reserved.
     3  # Use of this source code is governed by a BSD-style
     4  # license that can be found in the LICENSE file.
     5  
     6  use strict;
     7  
     8  if($ENV{'GOARCH'} eq "" || $ENV{'GOOS'} eq "") {
     9  	print STDERR "GOARCH or GOOS not defined in environment\n";
    10  	exit 1;
    11  }
    12  
    13  my $command = "mksysnum_linux.pl ". join(' ', @ARGV);
    14  
    15  print <<EOF;
    16  // $command
    17  // MACHINE GENERATED BY THE ABOVE COMMAND; DO NOT EDIT
    18  
    19  // +build $ENV{'GOARCH'},$ENV{'GOOS'}
    20  
    21  package unix
    22  
    23  const(
    24  EOF
    25  
    26  my $offset = 0;
    27  
    28  sub fmt {
    29  	my ($name, $num) = @_;
    30  	if($num > 999){
    31  		# ignore deprecated syscalls that are no longer implemented
    32  		# https://git.kernel.org/cgit/linux/kernel/git/torvalds/linux.git/tree/include/uapi/asm-generic/unistd.h?id=refs/heads/master#n716
    33  		return;
    34  	}
    35  	$name =~ y/a-z/A-Z/;
    36  	$num = $num + $offset;
    37  	print "	SYS_$name = $num;\n";
    38  }
    39  
    40  my $prev;
    41  open(GCC, "gcc -E -dD $ARGV[0] |") || die "can't run gcc";
    42  while(<GCC>){
    43  	if(/^#define __NR_Linux\s+([0-9]+)/){
    44  		# mips/mips64: extract offset
    45  		$offset = $1;
    46  	}
    47  	elsif(/^#define __NR_syscalls\s+/) {
    48  		# ignore redefinitions of __NR_syscalls
    49  	}
    50  	elsif(/^#define __NR_(\w+)\s+([0-9]+)/){
    51  		$prev = $2;
    52  		fmt($1, $2);
    53  	}
    54  	elsif(/^#define __NR3264_(\w+)\s+([0-9]+)/){
    55  		$prev = $2;
    56  		fmt($1, $2);
    57  	}
    58  	elsif(/^#define __NR_(\w+)\s+\(\w+\+\s*([0-9]+)\)/){
    59  		fmt($1, $prev+$2)
    60  	}
    61  	elsif(/^#define __NR_(\w+)\s+\(__NR_Linux \+ ([0-9]+)/){
    62  		fmt($1, $2);
    63  	}
    64  }
    65  
    66  print <<EOF;
    67  )
    68  EOF