brmlab/hackerbase
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Safe passing of subprocess arguments - always.

Browse source
This commit is contained in:
Dominik Pantůček 2023-04-13 20:45:35 +02:00
parent ee8aa95e24
commit 7f7d1c43c8
3 changed files with 13 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/util-io.scm
View file

@ -58,8 +58,8 @@
;; Very simple shell command wrapper that returns lines produced by
;; given command. Dangerous - performs no argument escaping!
(define (get-process-output-lines cmd)
(let-values (((stdout stdin pid stderr) (process* cmd)))
(define (get-process-output-lines cmd . args)
(let-values (((stdout stdin pid stderr) (process* cmd args)))
(close-output-port stdin)
(let ((result (read-lines stdout)))
(let-values (((a b c) (process-wait pid)))