aboutsummaryrefslogtreecommitdiff
path: root/soxdial
diff options
context:
space:
mode:
authorB. Watson <urchlay@slackware.uk>2024-04-11 15:05:05 -0400
committerB. Watson <urchlay@slackware.uk>2024-04-11 15:07:54 -0400
commit20e5469d6ff26335652751bbd241aa6c1742d163 (patch)
tree32a1ba0c9e08ec6bac9cacc1cfa55f32bf5bbf99 /soxdial
parentc019c21f84259c3e690ad60f8b6c1a83744fa3a9 (diff)
downloadmisc-scripts-20e5469d6ff26335652751bbd241aa6c1742d163.tar.gz
soxdial: support spaces in extensionless output filenames, too.
Diffstat (limited to 'soxdial')
-rwxr-xr-xsoxdial13
1 files changed, 8 insertions, 5 deletions
diff --git a/soxdial b/soxdial
index 519e4dd..4127951 100755
--- a/soxdial
+++ b/soxdial
@@ -494,21 +494,24 @@ sub set_dialtone_type {
# final sox command, to which we pipe all the others.
sub make_sox_cmd {
+ # support quotes, spaces, etc in filenames.
+ # this can probably be fooled by a determined luser.
+ $output =~ s,",\\",g;
+ $output = "\"$output\"";
+
if($output !~ /\./) {
$output = "-t raw $output";
- } else {
- # support quotes, spaces, etc in filenames.
- # this can probably be fooled by a determined luser.
- $output =~ s,",\\",g;
- $output = "\"$output\"";
}
+
my $ch = $stereo ? "channels 2" : "";
+
my $remix = "";
if($left) {
$remix = "remix 1 1v0";
} elsif($right) {
$remix = "remix 1v0 1";
}
+
my $cmd = "sox -traw -b$bits $encoding -r$rate -c1 - $output $ch $remix";
my $subcmds = join(" ; ", @sox_subcmds);
return "( " . $subcmds . " ) | " . $cmd;