diff options
Diffstat (limited to 'vendor/golang.org/x/sys/unix/mksysnum_netbsd.pl')
-rw-r--r-- | vendor/golang.org/x/sys/unix/mksysnum_netbsd.pl | 58 |
1 files changed, 0 insertions, 58 deletions
diff --git a/vendor/golang.org/x/sys/unix/mksysnum_netbsd.pl b/vendor/golang.org/x/sys/unix/mksysnum_netbsd.pl deleted file mode 100644 index 85988b1..0000000 --- a/vendor/golang.org/x/sys/unix/mksysnum_netbsd.pl +++ /dev/null | |||
@@ -1,58 +0,0 @@ | |||
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 | # Generate system call table for OpenBSD from master list | ||
7 | # (for example, /usr/src/sys/kern/syscalls.master). | ||
8 | |||
9 | use strict; | ||
10 | |||
11 | if($ENV{'GOARCH'} eq "" || $ENV{'GOOS'} eq "") { | ||
12 | print STDERR "GOARCH or GOOS not defined in environment\n"; | ||
13 | exit 1; | ||
14 | } | ||
15 | |||
16 | my $command = "mksysnum_netbsd.pl " . join(' ', @ARGV); | ||
17 | |||
18 | print <<EOF; | ||
19 | // $command | ||
20 | // Code generated by the command above; see README.md. DO NOT EDIT. | ||
21 | |||
22 | // +build $ENV{'GOARCH'},$ENV{'GOOS'} | ||
23 | |||
24 | package unix | ||
25 | |||
26 | const ( | ||
27 | EOF | ||
28 | |||
29 | my $line = ''; | ||
30 | while(<>){ | ||
31 | if($line =~ /^(.*)\\$/) { | ||
32 | # Handle continuation | ||
33 | $line = $1; | ||
34 | $_ =~ s/^\s+//; | ||
35 | $line .= $_; | ||
36 | } else { | ||
37 | # New line | ||
38 | $line = $_; | ||
39 | } | ||
40 | next if $line =~ /\\$/; | ||
41 | if($line =~ /^([0-9]+)\s+((STD)|(NOERR))\s+(RUMP\s+)?({\s+\S+\s*\*?\s*\|(\S+)\|(\S*)\|(\w+).*\s+})(\s+(\S+))?$/) { | ||
42 | my $num = $1; | ||
43 | my $proto = $6; | ||
44 | my $compat = $8; | ||
45 | my $name = "$7_$9"; | ||
46 | |||
47 | $name = "$7_$11" if $11 ne ''; | ||
48 | $name =~ y/a-z/A-Z/; | ||
49 | |||
50 | if($compat eq '' || $compat eq '13' || $compat eq '30' || $compat eq '50') { | ||
51 | print " $name = $num; // $proto\n"; | ||
52 | } | ||
53 | } | ||
54 | } | ||
55 | |||
56 | print <<EOF; | ||
57 | ) | ||
58 | EOF | ||