Backslash confusion on Windows with shared lib

[christophsax]

Problem

seasonal does not wrap x13.bin in normalizPath and uses invalid paths on some Windows systems.

E.g., this does not work

\\\\zzz.loc/soz/users/zzz/Dokumente/R/win-library/3.5/x13binary/bin/x13ashtml.exe

Workaround

Repair X13_PATH so it contains only /:

library(seasonal)
Sys.setenv(X13_PATH = normalizePath(system.file("bin", package = "x13binary"), winslash = "/"))
seas(AirPassengers)

Solution

Wrap x13.bin in normalizPath and change seas.R:551 to:

if (getOption("htmlmode") == 1){
  x13.bin <- paste0("\"", normalizePath(file.path(env.path, "x13ashtml.exe")), "\"")
} else {
  x13.bin <- paste0("\"", normalizePath(file.path(env.path, "x13as.exe")), "\"")
}

[christophsax]

Original output

> library(seasonal)
> broken <- "\\\\szh.loc/soz/users/sozrcb/Dokumente/R/win-library/3.5/x13binary/bin/x13ashtml.exe"
> broken
[1] "\\\\szh.loc/soz/users/sozrcb/Dokumente/R/win-library/3.5/x13binary/bin/x13ashtml.exe"
> fixed <- normalizePath(broken, mustWork = TRUE)
> fixed
[1] "\\\\szh.loc\\soz\\users\\sozrcb\\Dokumente\\R\\win-library\\3.5\\x13binary\\bin\\x13ashtml.exe"
>
> shell(paste0('"', broken,'"'))
"\\szh.loc\soz\users\sozrcb\Dokumente"
CMD.EXE wurde mit dem oben angegebenen Pfad als aktuellem Verzeichnis gestartet.
UNC-Pfade werden nicht unterst�tzt.
Stattdessen wird das Windows-Verzeichnis als aktuelles Verzeichnis gesetzt.
Die Syntax f�r den Dateinamen, Verzeichnisnamen oder die Datentr„gerbezeichnung ist falsch.
Warning message:
In shell(paste0("\"", broken, "\"")) :
  '"\\szh.loc/soz/users/sozrcb/Dokumente/R/win-library/3.5/x13binary/bin/x13ashtml.exe"' Ausführung mit Fehlerkode 1 fehlgeschlagen
> shell(paste0('"', fixed, '"'))
"\\szh.loc\soz\users\sozrcb\Dokumente"
CMD.EXE wurde mit dem oben angegebenen Pfad als aktuellem Verzeichnis gestartet.
UNC-Pfade werden nicht unterst�tzt.
Stattdessen wird das Windows-Verzeichnis als aktuelles Verzeichnis gesetzt.
 
X-13ARIMA-SEATS Seasonal Adjustment Program
Version Number 1.1 Build 39
Execution began  Nov 26, 2019  08.32.21