shithub: mc

ref: 5fcdb860c1c14604c276bc98a49f162d6fd367c2
dir: /opts.myr/

use std
use sys

use "config.use"

pkg bld =
	var opt_arch 	: byte[:]
	var opt_sys	: byte[:]
	var opt_runtime	: byte[:]
	var opt_genasm	: bool
	var opt_ldscript	: byte[:]
	var opt_incpaths	: byte[:][:]
	var opt_instroot	: byte[:]
	var opt_destdir	: byte[:]
	var opt_bldfile	: byte[:]
	var opt_debug	: bool

	/* undocumented/unsupported opts */
	var opt_mc	: byte[:]
	var opt_as	: byte[:]
	var opt_muse	: byte[:]
	var opt_ld	: byte[:]
	var opt_ar	: byte[:]

	var sysarchstr	: byte[:]
	var archstr	: byte[:]
	var sysstr	: byte[:]

	const initopts	: (-> void)
;;

var opt_arch 	= ""
var opt_sys	= ""
var opt_binname	= ""
var opt_libname	= ""
var opt_runtime	= ""
var opt_ldscript	= ""
var opt_incpaths	/* FIXME: taking a constant slice is a nonconstant initializer */
var opt_instroot	= ""
var opt_destdir	= ""
var opt_debug	= false
var opt_bldfile = "bldfile"
var opt_mc	= "6m"
var opt_as	= "as"
var opt_muse	= "muse"
var opt_ld	= "ld"
var opt_ar	= "ar"
var opt_genasm  = false

/* derived */
var sysarchstr	= ""
var archstr	= ""
var sysstr	= ""

const initopts = {
	var un

	if sys.uname(&un) < 0
		std.fatal(1, "unable to determine host information (uname)\n")
	;;
	match cstr2myr(un.system[:])
	| "Linux":	opt_sys = "linux"
	| "Darwin":	opt_sys = "osx"
	| "FreeBSD":	opt_sys = "freebsd"
	| unknown:	std.fatal(1, "unknown system \"%s\"\n", unknown)
	;;

	match cstr2myr(un.machine[:])
	| "x86_64":	opt_arch = "x64"
	| unknown:	std.fatal(1, "unknown architecture \"%s\"\n", unknown)
	;;

	opt_incpaths = [][:]
	opt_instroot = config.Instroot
	opt_destdir = std.getenvv("DESTDIR", "")
	opt_mc = std.getenvv("MYR_MC", "6m")
	opt_as = std.getenvv("MYR_AS", "as")
	opt_ld = std.getenvv("MYR_LD", "ld")
	opt_ar = std.getenvv("MYR_AR", "ar")
	opt_muse = std.getenvv("MYR_MUSE", "muse")

	sysarchstr = std.fmt("+%s-%s", opt_sys, opt_arch)
	sysstr = std.fmt("+%s", opt_sys)
	archstr = std.fmt("+%s", opt_arch)

	opt_runtime = std.pathcat(config.Instroot, "/lib/myr/_myrrt.o")
}

const cstr2myr = {cstr
	var i

	for i = 0; i < cstr.len; i++
		if cstr[i] == 0
			break
		;;
	;;
	-> cstr[:i]
}