unix/mksyscall_zos_s390x.go - sys - Git at Google

 // Copyright 2024 The Go Authors. All rights reserved.
 // Use of this source code is governed by a BSD-style
 // license that can be found in the LICENSE file.

 //go:build ignore

 /*
 This program must be on the most current zos release.

 This program generates with data from

 	//\'CEE.SCEELIB\(CELQS003\)\'
 	syscall_zos_s390x.go

 to output files:

 	zsyscall_zos_s390x.go (generated syscall)
 	zsymaddr_zos_s390x.s  (access to the function variable for functions that may not exist)
 	zsysnum_zos_s390x.go  (offset from libvec)

 synopsis:

 	  go run ./mksyscall_zos_s390x.go

 	or (with default flags)
 	  go run mksyscall_zos_s390x.go -o_sysnum zsysnum_zos_s390x.go -o_syscall zsyscall_zos_s390x.go -i_syscall syscall_zos_s390x.go -o_asm zsymaddr_zos_s390x.s

 	or if processed on a different platform
 	  go run ./mksyscall_zos_s390x.go -i_testfile CELQS003.txt
 		where CELQS003.txt is a text file copy of //\'CEE.SCEELIB\(CELQS003\)\'
 */
 package main

 import (
 	"bufio"
 	"flag"
 	"fmt"
 	"io"
 	"log"
 	"os"
 	"os/exec"
 	"path"
 	"regexp"
 	"runtime"
 	"sort"
 	"strconv"
 	"strings"
 )

 var (
 	sysnumfile = flag.String("o_sysnum", "zsysnum_zos_s390x.go", "zos LE offsets output file in Go")
 	outputgo   = flag.String("o_syscall", "zsyscall_zos_s390x.go", "zos generated syscall output file in Go")
 	inputgo    = flag.String("i_syscall", "syscall_zos_s390x.go", "zos input file that contain //sys statements")
 	outasm     = flag.String("o_asm", "zsymaddr_zos_s390x.s", "zos output file for function variable addresses")
 	testfile   = flag.String("i_testfile", "", "file for local validation")
 )
 var copyr = `// %s
 // Code generated by the command above; see README.md. DO NOT EDIT.

 //go:build zos && s390x
 `
 var AsmTemplate = `
 // THIS FILE IS GENERATED BY THE COMMAND AT THE TOP; DO NOT EDIT

 TEXT ·get_%sAddr(SB), NOSPLIT|NOFRAME, $0-8
 	MOVD $·%s(SB), R8
 	MOVD R8, ret+0(FP)
 	RET
 `

 // cmdLine returns this programs's commandline arguments
 func cmdLine() string {
 	_, fileName, _, _ := runtime.Caller(1)
 	return "go run " + path.Base(fileName) + " -o_sysnum " + *sysnumfile + " -o_syscall " + *outputgo + " -i_syscall " + *inputgo + " -o_asm " + *outasm
 }

 func out(ch chan string, file io.ReadCloser) {
 	defer file.Close()
 	defer close(ch)
 	rd := bufio.NewReader(file)
 loop:
 	for {
 		str, err := rd.ReadString('\n')
 		if err != nil {
 			if err != io.EOF {
 				log.Fatal("Read Error:", err)
 			}
 			break loop
 		} else {
 			ch <- str
 		}
 	}
 }

 type SO struct {
 	Symbol string
 	Offset int64
 }

 type SOList []SO

 func (s SOList) Len() int      { return len(s) }
 func (s SOList) Swap(i, j int) { s[i], s[j] = s[j], s[i] }
 func (s SOList) Less(i, j int) bool {
 	if s[i].Offset == s[j].Offset {
 		return s[i].Symbol < s[j].Symbol
 	}
 	return s[i].Offset < s[j].Offset
 }

 // Param is function parameter
 type Param struct {
 	Name string
 	Type string
 }

 // parseParamList parses parameter list and returns a slice of parameters
 func parseParamList(list string) []string {
 	list = strings.TrimSpace(list)
 	if list == "" {
 		return []string{}
 	}
 	return regexp.MustCompile(`\s*,\s*`).Split(list, -1)
 }

 // parseParam splits a parameter into name and type
 func parseParam(p string) Param {
 	ps := regexp.MustCompile(`^(\S*) (\S*)$`).FindStringSubmatch(p)
 	if ps == nil {
 		fmt.Fprintf(os.Stderr, "malformed parameter: %s\n", p)
 		os.Exit(1)
 	}
 	return Param{ps[1], ps[2]}
 }

 func main() {
 	flag.Parse()
 	sidedeck := "//'CEE.SCEELIB(CELQS003)'"
 	if *testfile != "" {
 		sidedeck = *testfile
 	}
 	args := []string{"-u", sidedeck}
 	cmd := exec.Command("/bin/cat", args...)
 	stdout, err := cmd.StdoutPipe()
 	if err != nil {
 		println("err stdout ")
 		log.Fatal(err)
 	}
 	c1 := make(chan string)
 	go out(c1, stdout)
 	err2 := cmd.Start()
 	if err2 != nil {
 		log.Fatal(err2)
 	}
 	longest := 0
 	outstanding := 1
 	// IMPORT DATA64,CELQV003,'environ',001
 	r1 := regexp.MustCompile("^ +IMPORT +CODE64,CELQV003,'([A-Za-z_][A-Za-z0-9_]*)',([0-9A-F][0-9A-F][0-9A-F]) *\n$")
 	m := make(map[string]int64)
 	for outstanding > 0 {
 		select {
 		case msg1, ok := <-c1:
 			if ok {
 				result := r1.FindStringSubmatch(msg1)
 				if result != nil {
 					if len(result) > 2 {
 						symbol := "SYS_" + strings.ToUpper(result[1])
 						offset, e1 := strconv.ParseInt(result[2], 16, 64)
 						if e1 == nil {
 							if len(symbol) > longest {
 								longest = len(symbol)
 							}
 							m[symbol] = offset
 						} else {
 							fmt.Printf("ERROR %s\n", msg1)
 						}
 					}
 				}
 			} else {
 				c1 = nil
 				outstanding--
 			}

 		}
 	}

 	list := make(SOList, len(m))

 	i := 0
 	for k, v := range m {
 		list[i] = SO{k, v}
 		i++
 	}
 	sort.Sort(list)
 	fmt.Printf("Writing %s\n", *sysnumfile)
 	err = writesysnum(*sysnumfile, &list)
 	if err != nil {
 		fmt.Fprintf(os.Stderr, "Error writesysnum %s %v\n", *sysnumfile, err)
 		os.Exit(1)
 	}
 	err = gofmt(*sysnumfile)
 	if err != nil {
 		fmt.Fprintf(os.Stderr, "Error gofmt %s %v\n", *sysnumfile, err)
 		os.Exit(1)
 	}

 	fmt.Printf("Reading %s\n", *inputgo)
 	f, err := os.Open(*inputgo)
 	if err != nil {
 		fmt.Fprintf(os.Stderr, err.Error())
 		os.Exit(1)
 	}

 	// open and setup the asm output file
 	fmt.Printf("Writing %s\n", *outasm)
 	fasm, asmerr := os.Create(*outasm)
 	if asmerr != nil {
 		fmt.Fprintf(os.Stderr, "Error open %s %s\n", *outasm, asmerr.Error())
 		os.Exit(1)
 	}
 	asm := bufio.NewWriter(fasm)
 	fmt.Fprintf(asm, copyr, cmdLine())
 	fmt.Fprintf(asm, `#include "textflag.h"

 //  provide the address of function variable to be fixed up.
 `)

 	// open and setup the Go output file
 	fmt.Printf("Writing %s\n", *outputgo)
 	fgo, goerr := os.Create(*outputgo)
 	if goerr != nil {
 		fmt.Fprintf(os.Stderr, "Error open %s %s\n", *outputgo, goerr.Error())
 		os.Exit(1)
 	}
 	go1 := bufio.NewWriter(fgo)
 	fmt.Fprintf(go1, copyr, cmdLine())
 	fmt.Fprintf(go1, `

 package unix

 import (
 	"syscall"
 	"unsafe"
 	"runtime"
 )

 var _ syscall.Errno

 `)

 	s := bufio.NewScanner(f)
 	scanErr := processStream(s, asm, go1, &m)

 	asm.Flush()
 	fasm.Close()

 	go1.Flush()
 	fgo.Close()
 	err = gofmt(*outputgo)
 	if err != nil {
 		fmt.Fprintf(os.Stderr, "Error gofmt %s %v\n", *outputgo, err)
 		os.Exit(1)
 	}
 	if scanErr != nil {
 		fmt.Fprintf(os.Stderr, "%s", scanErr.Error())
 		os.Exit(1)
 	}

 }

 func writesysnum(file string, l *SOList) error {
 	f, err := os.Create(file)
 	if err != nil {
 		return err
 	}
 	w := bufio.NewWriter(f)
 	defer f.Close()
 	defer w.Flush()
 	fmt.Fprintf(w, copyr, cmdLine())
 	fmt.Fprintf(w, `package unix
 const (
 `)
 	for _, item := range *l {
 		fmt.Fprintf(w, "    %-40s = 0x%X   // %d\n", item.Symbol, item.Offset, item.Offset)
 	}
 	fmt.Fprintf(w, `
 )`)
 	return nil
 }
 func gofmt(file string) error {
 	cmd := exec.Command("gofmt", "-w", file)
 	_, err := cmd.Output()

 	if err != nil {
 		return err
 	}

 	return nil
 }

 func processStream(s *bufio.Scanner, asm, go1 *bufio.Writer, m *map[string]int64) error {
 	for s.Scan() {
 		t := s.Text()
 		t = strings.TrimSpace(t)
 		t = regexp.MustCompile(`\s+`).ReplaceAllString(t, ` `)
 		nonblock := regexp.MustCompile(`^\/\/sysnb `).FindStringSubmatch(t)
 		if regexp.MustCompile(`^\/\/sys `).FindStringSubmatch(t) == nil && nonblock == nil {
 			continue
 		}

 		// Line must be of the form
 		//	func Open(path string, mode int, perm int) (fd int, errno error)
 		// Split into name, in params, out params.
 		f := regexp.MustCompile(`^\/\/sys(nb)? (\w+)\(([^()]*)\)\s*(?:\(([^()]+)\))?\s*(?:=\s*((?i)SYS_[A-Z0-9_]+))?$`).FindStringSubmatch(t)
 		if f == nil {
 			return fmt.Errorf("%s:%s\nmalformed //sys declaration\n", *inputgo, t)
 		}
 		funct, inps, outps, sysname := f[2], f[3], f[4], f[5]

 		if sysname == "" {
 			// if it is empty, it is derived from the function name
 			sysname = "SYS_" + funct
 			sysname = regexp.MustCompile(`([a-z])([A-Z])`).ReplaceAllString(sysname, `${1}_$2`)
 			sysname = strings.ToUpper(sysname)
 		}

 		// Split argument lists on comma.
 		in := parseParamList(inps)
 		out := parseParamList(outps)
 		val, ok := (*m)[sysname]
 		if !ok {
 			return fmt.Errorf("%s:%s\nsysname %s not found on this system\n", *inputgo, s.Text(), sysname)
 		}
 		var newfunc bool
 		if val > 3488 {
 			fmt.Fprintf(asm, AsmTemplate, funct, funct)
 			newfunc = true
 		} else {
 			newfunc = false
 		}
 		// Try in vain to keep people from editing this file.
 		// The theory is that they jump into the middle of the file
 		// without reading the header.
 		text1 := "// THIS FILE IS GENERATED BY THE COMMAND AT THE TOP; DO NOT EDIT\n\n"
 		text2 := ""
 		text3 := ""

 		// Go function header.
 		outDecl := ""
 		if len(out) > 0 {
 			outDecl = fmt.Sprintf(" (%s)", strings.Join(out, ", "))
 		}
 		if newfunc {
 			text1 += fmt.Sprintf("func impl_%s(%s)%s {\n", funct, strings.Join(in, ", "), outDecl)
 			text2 += fmt.Sprintf("//go:nosplit\nfunc get_%sAddr() *(func(%s) %s)\nvar %s = enter_%s\n", funct, strings.Join(in, ", "), outDecl, funct, funct)
 			text2 += fmt.Sprintf("func enter_%s(%s)%s {\n", funct, strings.Join(in, ", "), outDecl)
 			text2 += fmt.Sprintf("funcref := get_%sAddr()\n", funct)
 			text2 += fmt.Sprintf("\tif funcptrtest(GetZosLibVec()+%s<<4, \"\") == 0 {\n\t\t*funcref = impl_%s\n", sysname, funct)
 			text2 += fmt.Sprintf("\t} else {\n\t\t*funcref = error_%s\n", funct)
 			text2 += fmt.Sprintf("\t}\n")
 			text3 += fmt.Sprintf("func error_%s(%s)%s {\n", funct, strings.Join(in, ", "), outDecl)
 		} else {
 			text1 += fmt.Sprintf("func %s(%s)%s {\n", funct, strings.Join(in, ", "), outDecl)
 		}

 		// Check if err return available
 		errvar := ""
 		for _, param := range out {
 			p := parseParam(param)
 			if p.Type == "error" {
 				errvar = p.Name
 				break
 			}
 		}
 		// Prepare arguments to Syscall.
 		var args []string
 		var fargs []string // for call fowarding
 		n := 0
 		for _, param := range in {
 			p := parseParam(param)
 			fargs = append(fargs, p.Name)
 			if regexp.MustCompile(`^\*`).FindStringSubmatch(p.Type) != nil {
 				args = append(args, "uintptr(unsafe.Pointer("+p.Name+"))")
 			} else if p.Type == "string" && errvar != "" {
 				text1 += fmt.Sprintf("\tvar _p%d *byte\n", n)
 				text1 += fmt.Sprintf("\t_p%d, %s = BytePtrFromString(%s)\n", n, errvar, p.Name)
 				text1 += fmt.Sprintf("\tif %s != nil {\n\t\treturn\n\t}\n", errvar)
 				args = append(args, fmt.Sprintf("uintptr(unsafe.Pointer(_p%d))", n))
 				n++
 			} else if p.Type == "string" {
 				fmt.Fprintf(os.Stderr, *inputgo+":"+funct+" uses string arguments, but has no error return\n")
 				text1 += fmt.Sprintf("\tvar _p%d *byte\n", n)
 				text1 += fmt.Sprintf("\t_p%d, _ = BytePtrFromString(%s)\n", n, p.Name)
 				args = append(args, fmt.Sprintf("uintptr(unsafe.Pointer(_p%d))", n))
 				n++
 			} else if regexp.MustCompile(`^\[\](.*)`).FindStringSubmatch(p.Type) != nil {
 				// Convert slice into pointer, length.
 				// Have to be careful not to take address of &a[0] if len == 0:
 				// pass dummy pointer in that case.
 				// Used to pass nil, but some OSes or simulators reject write(fd, nil, 0).
 				text1 += fmt.Sprintf("\tvar _p%d unsafe.Pointer\n", n)
 				text1 += fmt.Sprintf("\tif len(%s) > 0 {\n\t\t_p%d = unsafe.Pointer(&%s[0])\n\t}", p.Name, n, p.Name)
 				text1 += fmt.Sprintf(" else {\n\t\t_p%d = unsafe.Pointer(&_zero)\n\t}\n", n)
 				args = append(args, fmt.Sprintf("uintptr(_p%d)", n), fmt.Sprintf("uintptr(len(%s))", p.Name))
 				n++
 			} else {
 				args = append(args, fmt.Sprintf("uintptr(%s)", p.Name))
 			}
 		}

 		// Determine which form to use; pad args with zeros.
 		asmcall := "CallLeFuncWithErr"

 		// Actual call.
 		arglist := strings.Join(args, ", ")
 		call := fmt.Sprintf("%s(GetZosLibVec()+%s<<4, %s)", asmcall, sysname, arglist)

 		// Assign return values.
 		body := ""
 		ret := []string{"_", "_", "_"}
 		doErrno := false
 		for i := 0; i < len(out); i++ {
 			p := parseParam(out[i])
 			reg := ""
 			if p.Name == "err" {
 				reg = "e1"
 				ret[0] = "r0"
 				ret[1] = "e2"
 				ret[2] = reg
 				doErrno = true
 			} else {
 				reg = fmt.Sprintf("r%d", i)
 				ret[i] = reg

 			}
 			if p.Type == "bool" {
 				reg = fmt.Sprintf("%s != 0", reg)
 			}
 			if reg != "e1" {
 				body += fmt.Sprintf("\t%s = %s(%s)\n", p.Name, p.Type, reg)
 				if newfunc {
 					text3 += fmt.Sprintf("\t%s = -1\n", p.Name)
 				}
 			}
 		}
 		if ret[0] == "_" && ret[1] == "_" && ret[2] == "_" {
 			if nonblock == nil {
 				text1 += fmt.Sprintf("\truntime.EnterSyscall()\n")
 			}
 			text1 += fmt.Sprintf("\t%s\n", call)
 			if nonblock == nil {
 				text1 += fmt.Sprintf("\truntime.ExitSyscall()\n")
 			}
 			text2 += fmt.Sprintf("\t(*funcref)(%s)\n", strings.Join(fargs, ", "))
 			text2 += "\treturn\n"
 		} else {
 			if nonblock == nil {
 				text1 += fmt.Sprintf("\truntime.EnterSyscall()\n")
 			}
 			text1 += fmt.Sprintf("\t%s, %s, %s := %s\n", ret[0], ret[1], ret[2], call)
 			if nonblock == nil {
 				text1 += fmt.Sprintf("\truntime.ExitSyscall()\n")
 			}
 			text2 += fmt.Sprintf("\treturn (*funcref)(%s)\n", strings.Join(fargs, ", "))
 		}
 		text1 += body

 		if doErrno {
 			if newfunc {
 				text3 += fmt.Sprintf("\terr = ENOSYS\n")
 			}
 			text1 += "\tif int64(r0) == -1 {\n"
 			text1 += "\t\terr = errnoErr2(e1,e2)\n"
 			text1 += "\t}\n"
 		}
 		if newfunc {
 			text2 += "}\n\n"
 			text3 += "\treturn\n"
 			text3 += "}\n\n"
 		}
 		text1 += "\treturn\n"
 		text1 += "}\n\n"
 		fmt.Fprintf(go1, "%s", text1)
 		if newfunc {
 			fmt.Fprintf(go1, "%s", text2)
 			fmt.Fprintf(go1, "%s", text3)
 		}

 	}
 	if err := s.Err(); err != nil {
 		return err
 	}
 	return nil
 }
	// Copyright 2024 The Go Authors. All rights reserved.
	// Use of this source code is governed by a BSD-style
	// license that can be found in the LICENSE file.

	//go:build ignore

	/*
	This program must be on the most current zos release.

	This program generates with data from

	//\'CEE.SCEELIB\(CELQS003\)\'
	syscall_zos_s390x.go

	to output files:

	zsyscall_zos_s390x.go (generated syscall)
	zsymaddr_zos_s390x.s (access to the function variable for functions that may not exist)
	zsysnum_zos_s390x.go (offset from libvec)

	synopsis:

	go run ./mksyscall_zos_s390x.go

	or (with default flags)
	go run mksyscall_zos_s390x.go -o_sysnum zsysnum_zos_s390x.go -o_syscall zsyscall_zos_s390x.go -i_syscall syscall_zos_s390x.go -o_asm zsymaddr_zos_s390x.s

	or if processed on a different platform
	go run ./mksyscall_zos_s390x.go -i_testfile CELQS003.txt
	where CELQS003.txt is a text file copy of //\'CEE.SCEELIB\(CELQS003\)\'
	*/
	package main

	import (
	"bufio"
	"flag"
	"fmt"
	"io"
	"log"
	"os"
	"os/exec"
	"path"
	"regexp"
	"runtime"
	"sort"
	"strconv"
	"strings"
	)

	var (
	sysnumfile = flag.String("o_sysnum", "zsysnum_zos_s390x.go", "zos LE offsets output file in Go")
	outputgo = flag.String("o_syscall", "zsyscall_zos_s390x.go", "zos generated syscall output file in Go")
	inputgo = flag.String("i_syscall", "syscall_zos_s390x.go", "zos input file that contain //sys statements")
	outasm = flag.String("o_asm", "zsymaddr_zos_s390x.s", "zos output file for function variable addresses")
	testfile = flag.String("i_testfile", "", "file for local validation")
	)
	var copyr = `// %s
	// Code generated by the command above; see README.md. DO NOT EDIT.

	//go:build zos && s390x
	`
	var AsmTemplate = `
	// THIS FILE IS GENERATED BY THE COMMAND AT THE TOP; DO NOT EDIT

	TEXT ·get_%sAddr(SB), NOSPLIT\|NOFRAME, $0-8
	MOVD $·%s(SB), R8
	MOVD R8, ret+0(FP)
	RET
	`

	// cmdLine returns this programs's commandline arguments
	func cmdLine() string {
	_, fileName, _, _ := runtime.Caller(1)
	return "go run " + path.Base(fileName) + " -o_sysnum " + sysnumfile + " -o_syscall " + outputgo + " -i_syscall " + inputgo + " -o_asm " + outasm
	}

	func out(ch chan string, file io.ReadCloser) {
	defer file.Close()
	defer close(ch)
	rd := bufio.NewReader(file)
	loop:
	for {
	str, err := rd.ReadString('\n')
	if err != nil {
	if err != io.EOF {
	log.Fatal("Read Error:", err)
	}
	break loop
	} else {
	ch <- str
	}
	}
	}

	type SO struct {
	Symbol string
	Offset int64
	}

	type SOList []SO

	func (s SOList) Len() int { return len(s) }
	func (s SOList) Swap(i, j int) { s[i], s[j] = s[j], s[i] }
	func (s SOList) Less(i, j int) bool {
	if s[i].Offset == s[j].Offset {
	return s[i].Symbol < s[j].Symbol
	}
	return s[i].Offset < s[j].Offset
	}

	// Param is function parameter
	type Param struct {
	Name string
	Type string
	}

	// parseParamList parses parameter list and returns a slice of parameters
	func parseParamList(list string) []string {
	list = strings.TrimSpace(list)
	if list == "" {
	return []string{}
	}
	return regexp.MustCompile(`\s,\s`).Split(list, -1)
	}

	// parseParam splits a parameter into name and type
	func parseParam(p string) Param {
	ps := regexp.MustCompile(`^(\S) (\S)$`).FindStringSubmatch(p)
	if ps == nil {
	fmt.Fprintf(os.Stderr, "malformed parameter: %s\n", p)
	os.Exit(1)
	}
	return Param{ps[1], ps[2]}
	}

	func main() {
	flag.Parse()
	sidedeck := "//'CEE.SCEELIB(CELQS003)'"
	if *testfile != "" {
	sidedeck = *testfile
	}
	args := []string{"-u", sidedeck}
	cmd := exec.Command("/bin/cat", args...)
	stdout, err := cmd.StdoutPipe()
	if err != nil {
	println("err stdout ")
	log.Fatal(err)
	}
	c1 := make(chan string)
	go out(c1, stdout)
	err2 := cmd.Start()
	if err2 != nil {
	log.Fatal(err2)
	}
	longest := 0
	outstanding := 1
	// IMPORT DATA64,CELQV003,'environ',001
	r1 := regexp.MustCompile("^ +IMPORT +CODE64,CELQV003,'([A-Za-z_][A-Za-z0-9_])',([0-9A-F][0-9A-F][0-9A-F]) \n$")
	m := make(map[string]int64)
	for outstanding > 0 {
	select {
	case msg1, ok := <-c1:
	if ok {
	result := r1.FindStringSubmatch(msg1)
	if result != nil {
	if len(result) > 2 {
	symbol := "SYS_" + strings.ToUpper(result[1])
	offset, e1 := strconv.ParseInt(result[2], 16, 64)
	if e1 == nil {
	if len(symbol) > longest {
	longest = len(symbol)
	}
	m[symbol] = offset
	} else {
	fmt.Printf("ERROR %s\n", msg1)
	}
	}
	}
	} else {
	c1 = nil
	outstanding--
	}

	}
	}

	list := make(SOList, len(m))

	i := 0
	for k, v := range m {
	list[i] = SO{k, v}
	i++
	}
	sort.Sort(list)
	fmt.Printf("Writing %s\n", *sysnumfile)
	err = writesysnum(*sysnumfile, &list)
	if err != nil {
	fmt.Fprintf(os.Stderr, "Error writesysnum %s %v\n", *sysnumfile, err)
	os.Exit(1)
	}
	err = gofmt(*sysnumfile)
	if err != nil {
	fmt.Fprintf(os.Stderr, "Error gofmt %s %v\n", *sysnumfile, err)
	os.Exit(1)
	}

	fmt.Printf("Reading %s\n", *inputgo)
	f, err := os.Open(*inputgo)
	if err != nil {
	fmt.Fprintf(os.Stderr, err.Error())
	os.Exit(1)
	}

	// open and setup the asm output file
	fmt.Printf("Writing %s\n", *outasm)
	fasm, asmerr := os.Create(*outasm)
	if asmerr != nil {
	fmt.Fprintf(os.Stderr, "Error open %s %s\n", *outasm, asmerr.Error())
	os.Exit(1)
	}
	asm := bufio.NewWriter(fasm)
	fmt.Fprintf(asm, copyr, cmdLine())
	fmt.Fprintf(asm, `#include "textflag.h"

	// provide the address of function variable to be fixed up.
	`)

	// open and setup the Go output file
	fmt.Printf("Writing %s\n", *outputgo)
	fgo, goerr := os.Create(*outputgo)
	if goerr != nil {
	fmt.Fprintf(os.Stderr, "Error open %s %s\n", *outputgo, goerr.Error())
	os.Exit(1)
	}
	go1 := bufio.NewWriter(fgo)
	fmt.Fprintf(go1, copyr, cmdLine())
	fmt.Fprintf(go1, `

	package unix

	import (
	"syscall"
	"unsafe"
	"runtime"
	)

	var _ syscall.Errno

	`)

	s := bufio.NewScanner(f)
	scanErr := processStream(s, asm, go1, &m)

	asm.Flush()
	fasm.Close()

	go1.Flush()
	fgo.Close()
	err = gofmt(*outputgo)
	if err != nil {
	fmt.Fprintf(os.Stderr, "Error gofmt %s %v\n", *outputgo, err)
	os.Exit(1)
	}
	if scanErr != nil {
	fmt.Fprintf(os.Stderr, "%s", scanErr.Error())
	os.Exit(1)
	}

	}

	func writesysnum(file string, l *SOList) error {
	f, err := os.Create(file)
	if err != nil {
	return err
	}
	w := bufio.NewWriter(f)
	defer f.Close()
	defer w.Flush()
	fmt.Fprintf(w, copyr, cmdLine())
	fmt.Fprintf(w, `package unix
	const (
	`)
	for _, item := range *l {
	fmt.Fprintf(w, " %-40s = 0x%X // %d\n", item.Symbol, item.Offset, item.Offset)
	}
	fmt.Fprintf(w, `
	)`)
	return nil
	}
	func gofmt(file string) error {
	cmd := exec.Command("gofmt", "-w", file)
	_, err := cmd.Output()

	if err != nil {
	return err
	}

	return nil
	}

	func processStream(s bufio.Scanner, asm, go1 bufio.Writer, m *map[string]int64) error {
	for s.Scan() {
	t := s.Text()
	t = strings.TrimSpace(t)
	t = regexp.MustCompile(`\s+`).ReplaceAllString(t, ` `)
	nonblock := regexp.MustCompile(`^\/\/sysnb `).FindStringSubmatch(t)
	if regexp.MustCompile(`^\/\/sys `).FindStringSubmatch(t) == nil && nonblock == nil {
	continue
	}

	// Line must be of the form
	// func Open(path string, mode int, perm int) (fd int, errno error)
	// Split into name, in params, out params.
	f := regexp.MustCompile(`^\/\/sys(nb)? (\w+)\(([^()])\)\s(?:\(([^()]+)\))?\s(?:=\s((?i)SYS_[A-Z0-9_]+))?$`).FindStringSubmatch(t)
	if f == nil {
	return fmt.Errorf("%s:%s\nmalformed //sys declaration\n", *inputgo, t)
	}
	funct, inps, outps, sysname := f[2], f[3], f[4], f[5]

	if sysname == "" {
	// if it is empty, it is derived from the function name
	sysname = "SYS_" + funct
	sysname = regexp.MustCompile(`([a-z])([A-Z])`).ReplaceAllString(sysname, `${1}_$2`)
	sysname = strings.ToUpper(sysname)
	}

	// Split argument lists on comma.
	in := parseParamList(inps)
	out := parseParamList(outps)
	val, ok := (*m)[sysname]
	if !ok {
	return fmt.Errorf("%s:%s\nsysname %s not found on this system\n", *inputgo, s.Text(), sysname)
	}
	var newfunc bool
	if val > 3488 {
	fmt.Fprintf(asm, AsmTemplate, funct, funct)
	newfunc = true
	} else {
	newfunc = false
	}
	// Try in vain to keep people from editing this file.
	// The theory is that they jump into the middle of the file
	// without reading the header.
	text1 := "// THIS FILE IS GENERATED BY THE COMMAND AT THE TOP; DO NOT EDIT\n\n"
	text2 := ""
	text3 := ""

	// Go function header.
	outDecl := ""
	if len(out) > 0 {
	outDecl = fmt.Sprintf(" (%s)", strings.Join(out, ", "))
	}
	if newfunc {
	text1 += fmt.Sprintf("func impl_%s(%s)%s {\n", funct, strings.Join(in, ", "), outDecl)
	text2 += fmt.Sprintf("//go:nosplit\nfunc get_%sAddr() *(func(%s) %s)\nvar %s = enter_%s\n", funct, strings.Join(in, ", "), outDecl, funct, funct)
	text2 += fmt.Sprintf("func enter_%s(%s)%s {\n", funct, strings.Join(in, ", "), outDecl)
	text2 += fmt.Sprintf("funcref := get_%sAddr()\n", funct)
	text2 += fmt.Sprintf("\tif funcptrtest(GetZosLibVec()+%s<<4, \"\") == 0 {\n\t\t*funcref = impl_%s\n", sysname, funct)
	text2 += fmt.Sprintf("\t} else {\n\t\t*funcref = error_%s\n", funct)
	text2 += fmt.Sprintf("\t}\n")
	text3 += fmt.Sprintf("func error_%s(%s)%s {\n", funct, strings.Join(in, ", "), outDecl)
	} else {
	text1 += fmt.Sprintf("func %s(%s)%s {\n", funct, strings.Join(in, ", "), outDecl)
	}

	// Check if err return available
	errvar := ""
	for _, param := range out {
	p := parseParam(param)
	if p.Type == "error" {
	errvar = p.Name
	break
	}
	}
	// Prepare arguments to Syscall.
	var args []string
	var fargs []string // for call fowarding
	n := 0
	for _, param := range in {
	p := parseParam(param)
	fargs = append(fargs, p.Name)
	if regexp.MustCompile(`^\*`).FindStringSubmatch(p.Type) != nil {
	args = append(args, "uintptr(unsafe.Pointer("+p.Name+"))")
	} else if p.Type == "string" && errvar != "" {
	text1 += fmt.Sprintf("\tvar _p%d *byte\n", n)
	text1 += fmt.Sprintf("\t_p%d, %s = BytePtrFromString(%s)\n", n, errvar, p.Name)
	text1 += fmt.Sprintf("\tif %s != nil {\n\t\treturn\n\t}\n", errvar)
	args = append(args, fmt.Sprintf("uintptr(unsafe.Pointer(_p%d))", n))
	n++
	} else if p.Type == "string" {
	fmt.Fprintf(os.Stderr, *inputgo+":"+funct+" uses string arguments, but has no error return\n")
	text1 += fmt.Sprintf("\tvar _p%d *byte\n", n)
	text1 += fmt.Sprintf("\t_p%d, _ = BytePtrFromString(%s)\n", n, p.Name)
	args = append(args, fmt.Sprintf("uintptr(unsafe.Pointer(_p%d))", n))
	n++
	} else if regexp.MustCompile(`^\[\](.*)`).FindStringSubmatch(p.Type) != nil {
	// Convert slice into pointer, length.
	// Have to be careful not to take address of &a[0] if len == 0:
	// pass dummy pointer in that case.
	// Used to pass nil, but some OSes or simulators reject write(fd, nil, 0).
	text1 += fmt.Sprintf("\tvar _p%d unsafe.Pointer\n", n)
	text1 += fmt.Sprintf("\tif len(%s) > 0 {\n\t\t_p%d = unsafe.Pointer(&%s[0])\n\t}", p.Name, n, p.Name)
	text1 += fmt.Sprintf(" else {\n\t\t_p%d = unsafe.Pointer(&_zero)\n\t}\n", n)
	args = append(args, fmt.Sprintf("uintptr(_p%d)", n), fmt.Sprintf("uintptr(len(%s))", p.Name))
	n++
	} else {
	args = append(args, fmt.Sprintf("uintptr(%s)", p.Name))
	}
	}

	// Determine which form to use; pad args with zeros.
	asmcall := "CallLeFuncWithErr"

	// Actual call.
	arglist := strings.Join(args, ", ")
	call := fmt.Sprintf("%s(GetZosLibVec()+%s<<4, %s)", asmcall, sysname, arglist)

	// Assign return values.
	body := ""
	ret := []string{"_", "_", "_"}
	doErrno := false
	for i := 0; i < len(out); i++ {
	p := parseParam(out[i])
	reg := ""
	if p.Name == "err" {
	reg = "e1"
	ret[0] = "r0"
	ret[1] = "e2"
	ret[2] = reg
	doErrno = true
	} else {
	reg = fmt.Sprintf("r%d", i)
	ret[i] = reg

	}
	if p.Type == "bool" {
	reg = fmt.Sprintf("%s != 0", reg)
	}
	if reg != "e1" {
	body += fmt.Sprintf("\t%s = %s(%s)\n", p.Name, p.Type, reg)
	if newfunc {
	text3 += fmt.Sprintf("\t%s = -1\n", p.Name)
	}
	}
	}
	if ret[0] == "_" && ret[1] == "_" && ret[2] == "_" {
	if nonblock == nil {
	text1 += fmt.Sprintf("\truntime.EnterSyscall()\n")
	}
	text1 += fmt.Sprintf("\t%s\n", call)
	if nonblock == nil {
	text1 += fmt.Sprintf("\truntime.ExitSyscall()\n")
	}
	text2 += fmt.Sprintf("\t(*funcref)(%s)\n", strings.Join(fargs, ", "))
	text2 += "\treturn\n"
	} else {
	if nonblock == nil {
	text1 += fmt.Sprintf("\truntime.EnterSyscall()\n")
	}
	text1 += fmt.Sprintf("\t%s, %s, %s := %s\n", ret[0], ret[1], ret[2], call)
	if nonblock == nil {
	text1 += fmt.Sprintf("\truntime.ExitSyscall()\n")
	}
	text2 += fmt.Sprintf("\treturn (*funcref)(%s)\n", strings.Join(fargs, ", "))
	}
	text1 += body

	if doErrno {
	if newfunc {
	text3 += fmt.Sprintf("\terr = ENOSYS\n")
	}
	text1 += "\tif int64(r0) == -1 {\n"
	text1 += "\t\terr = errnoErr2(e1,e2)\n"
	text1 += "\t}\n"
	}
	if newfunc {
	text2 += "}\n\n"
	text3 += "\treturn\n"
	text3 += "}\n\n"
	}
	text1 += "\treturn\n"
	text1 += "}\n\n"
	fmt.Fprintf(go1, "%s", text1)
	if newfunc {
	fmt.Fprintf(go1, "%s", text2)
	fmt.Fprintf(go1, "%s", text3)
	}

	}
	if err := s.Err(); err != nil {
	return err
	}
	return nil
	}