run.1: rename man page from simexec.1

Makefile

@@ -32,7 +32,7 @@ RUSTLIBS = --extern getopt=build/o/libgetopt.rlib \
 CFLAGS += -I$(SYSEXITS)
 
 .PHONY: all
-all: dj false fop hru intcmp mm npc pschdir rpn scrut str strcmp swab true
+all: dj false fop hru intcmp mm npc rpn run scrut str strcmp swab true
 
 # keep build/include until bindgen(1) has stdin support
 # https://github.com/rust-lang/rust-bindgen/issues/2703
@@ -122,16 +122,16 @@ npc: build/bin/npc
 build/bin/npc: src/npc.c build
 	$(CC) $(CFLAGAS) -o $@ src/npc.c
 
-.PHONY: pschdir
-pschdir: build/bin/pschdir
-build/bin/pschdir: src/pschdir.rs build
-	$(RUSTC) $(RUSTFLAGS) $(RUSTLIBS) -o $@ src/pschdir.rs
-
 .PHONY: rpn
 rpn: build/bin/rpn
 build/bin/rpn: src/rpn.rs build rustlibs
 	$(RUSTC) $(RUSTFLAGS) $(RUSTLIBS) -o $@ src/rpn.rs
 
+.PHONY: run
+run: build/bin/run
+build/bin/run: src/run.rs build
+	$(RUSTC) $(RUSTFLAGS) $(RUSTLIBS) -o $@ src/run.rs
+
 .PHONY: scrut
 scrut: build/bin/scrut
 build/bin/scrut: src/scrut.c build

docs/run.1

@@ -0,0 +1,60 @@
+.\" Copyright (c) 2022–2024 DTB <trinity@trinity.moe>
+.\"
+.\" This work is licensed under CC BY-SA 4.0. To see a copy of this license,
+.\" visit <http://creativecommons.org/licenses/by-sa/4.0/>.
+.\"
+.TH SIMEXEC 1 2024-07-24 "Harakit-overgrown X.X.X"
+.SH NAME
+run \(en execute a program
+.\"
+.SH SYNOPSIS
+
+run
+.B binary argument...
+.\"
+.SH DESCRIPTION
+Execute a binary with arguments.
+.\"
+.SH CAVEATS
+
+Non-binary programs cannot be executed on their own. The PATH environment
+variable is not used and a valid pathname (relative or absolute) must be
+specified.
+
+While POSIX.1-2017 doesn't mandate there being an argv[0] per se, a Strictly
+Conforming POSIX Application must pass an argv[0]. It has also been said that
+those who do not pass an argv[0] are mean and nasty and smell of elderberries.
+.\"
+.SH DIAGNOSTICS
+
+.BR run (1)
+exits with the returned value of
+.BR execv (3p),
+which will be 255 if an error occurs in execution, such as the binary not being
+found.
+This is indistinguishable from the executed binary exiting with the same
+status.
+
+.BR run (1)
+will print a error message and return the proper
+.BR sysexits.h (3)
+value if invoked in an invalid manner.
+.\"
+.SH AUTHOR
+
+Written by DTB
+.MT trinity@trinity.moe
+.ME .
+.\"
+.SH COPYRIGHT
+.\"
+Copyright \(co 2022–2024 DTB. License AGPLv3+: GNU AGPL version 3 or later
+<https://gnu.org/licenses/gpl.html>.
+.\"
+.SH SEE ALSO
+.BR execv (3p)
+
+The C89 standard's draft, section 2.1.2.2: "Hosted environment".
+
+POSIX.1-2017 System Interfaces: execv. Particularly under the RATIONALE section
+header.

src/pschdir.rs

@@ -1,61 +0,0 @@
-/*
- * Copyright (c) 2023_2024 DTB <trinity@trinity.moe>
- * SPDX-License-Identifier: AGPL-3.0-or-later
- *
- * This program is free software: you can redistribute it and/or modify it under
- * the terms of the GNU Affero General Public License as published by the Free
- * Software Foundation, either version 3 of the License, or (at your option) any
- * later version.
- * 
- * This program is distributed in the hope that it will be useful, but WITHOUT
- * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
- * FOR A PARTICULAR PURPOSE. See the GNU Affero General Public License for more
- * details.
- *
- * You should have received a copy of the GNU Affero General Public License
- * along with this program. If not, see https://www.gnu.org/licenses/.
- */
-
-use std::{ env::args, io::Error, process::{ Command, ExitCode } };
-
-extern crate strerror;
-use strerror::StrError;
-
-extern crate sysexits;
-use sysexits::{ EX_UNAVAILABLE, EX_USAGE };
-
-fn error(p: &str, n: &str, e: Error) -> ExitCode {
-	eprintln!("{}: {}: {}", p, n, e.strerror());
-	ExitCode::from(EX_UNAVAILABLE as u8)
-}
-
-fn main() -> ExitCode {
-	let argv = args().collect::<Vec<String>>();
-
-	if argv.len() < 3 {
-		eprintln!("Usage: {} directory command [argument]", argv[0]);
-		return ExitCode::from(EX_USAGE as u8);
-	}
-
-	let cmdargs = argv.iter().clone().skip(3).collect::<Vec<&String>>();
-
-	match Command::new(argv[2].clone())
-			.current_dir(argv[1].clone())
-			.args(cmdargs)
-			.spawn() {
-		Ok(mut child) => match child.wait() {
-			Ok(status) => {
-				match status.code() {
-					Some(code) => ExitCode::from(code as u8),
-					None => {
-						eprintln!("{}: {}: process terminated by signal",
-							argv[0], argv[2]);
-						ExitCode::FAILURE
-					}
-				}
-			},
-			Err(e) => error(&argv[0], &argv[2], e)
-		},
-		Err(e) => error(&argv[0], &argv[2], e)
-	}
-}

src/run.rs

@@ -0,0 +1,99 @@
+/*
+ * Copyright (c) 2022–2024 DTB <trinity@trinity.moe>
+ * SPDX-License-Identifier: AGPL-3.0-or-later
+ *
+ * This program is free software: you can redistribute it and/or modify it under
+ * the terms of the GNU Affero General Public License as published by the Free
+ * Software Foundation, either version 3 of the License, or (at your option) any
+ * later version.
+ * 
+ * This program is distributed in the hope that it will be useful, but WITHOUT
+ * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
+ * FOR A PARTICULAR PURPOSE. See the GNU Affero General Public License for more
+ * details.
+ *
+ * You should have received a copy of the GNU Affero General Public License
+ * along with this program. If not, see https://www.gnu.org/licenses/.
+ */
+
+use std::{
+	env::args,
+	io::Error,
+	os::unix::process::CommandExt,
+	process::{ Command, ExitCode }
+};
+
+extern crate getopt;
+use getopt::GetOpt;
+
+extern crate strerror;
+use strerror::StrError;
+
+extern crate sysexits;
+use sysexits::{ EX_UNAVAILABLE, EX_USAGE };
+
+fn error(p: &str, n: &str, e: Error) -> ExitCode {
+	eprintln!("{}: {}: {}", p, n, e.strerror());
+	ExitCode::from(EX_UNAVAILABLE as u8)
+}
+
+fn usage(s: &str) -> ExitCode {
+	eprintln!("Usage: {} command [argument...]", s);
+	ExitCode::from(EX_USAGE as u8)
+}
+
+fn main() -> ExitCode {
+	let argv = args().collect::<Vec<String>>();
+	let mut optind = 1;
+
+	/* arg0 is None if no argv[0] is meant to be given (argc will be 0),
+	 * however I don't know how to do this in Rust, so the option is currently
+	 * meaningless. -z will set this to None. */
+	let mut arg0: Option<String> = Some(String::default());
+	let mut dir = String::from("."); // $PWD for command
+
+	while let Some(opt) = argv.getopt("C:n:z") {
+		match opt.opt() {
+			// Consistent with precedent; git, make, tar, etc.
+			Ok("C") => dir = opt.arg().unwrap(),
+			Ok("n") => arg0 = Some(opt.arg().unwrap()),
+			// Ok("z") => arg0 = None,
+			_ => { return usage(&argv[0]); }
+		}
+		optind = opt.ind();
+	}
+
+	if argv.len() - optind < 1 { return usage(&argv[0]); }
+
+	let mut cmd = Command::new(argv[optind].clone());
+	cmd.current_dir(dir.clone());
+
+	match arg0 {
+		Some(a) if a != String::default() => { cmd.arg0(a); },
+		_ => () // TODO: argv[0]==NULL support
+	}
+
+	if argv.len() - optind > 1 { // there are arguments
+		let cmdargs = argv
+			.iter()
+			.clone()
+			.skip(optind + 1)
+			.collect::<Vec<&String>>();
+		cmd.args(cmdargs);
+	}
+
+	match cmd.spawn() {
+		Ok(mut child) => match child.wait() {
+			Ok(status) => match status.code() {
+				Some(code) => ExitCode::from(code as u8),
+				None => {
+					eprintln!("{}: {}: process terminated by signal",
+						argv[0], argv[2]);
+					ExitCode::FAILURE
+				}
+			},
+			Err(e) => error(&argv[0], &argv[optind], e)
+		},
+		Err(e) => error(&argv[0], &argv[optind], e)
+	}
+}