[Bug]: Read Zip Issue

[wincowgerDEV]

Guidelines

• I agree to follow this project's Contributing Guidelines.

Project Version

No response

Platform and OS Version

No response

Existing Issues

No response

What happened?

We would expect this zip folder of spc files to read correctly but it returns an error.

10.37.zip

Steps to reproduce

library(OpenSpecy)
file <- "10.37.zip"
check <- read_any(file)

Error in do.call(paste0("read_", tolower(ex)), list(file = file, ...)) :
'what' must be a function or character string

Also if we try to read the files as spc by themselves with read_spc

read_spc("10.8.D.spc")

Error in gsub(rawToChar(replace.nul), "\r\n", log.txt) :
'pattern' is invalid

Somehow the files can be read into OpenSpecy.org though, really a head scratcher.

Expected behavior

Read the spc files and/or zip

Attachments

No response

Screenshots or Videos

No response

Additional Information

No response

[wincowgerDEV]

A bit more recon on this, the error line seems to be here in read_zip:

lst <- lapply(file.path(tmp, flst$Name), read_any, ...)

[wincowgerDEV]

When it sends back to read_any we can find this line causing the issue os <- do.call(paste0("read_", tolower(ex)), list(file = file, ...))

[wincowgerDEV]

Broke through the first error with 3133956 by updating how we extract the extension name.

[wincowgerDEV]

The second error with read.spc is still there. I think it has something to do with file naming but not positive, I tested changing the file name but that didn't work. Will file issue with hyperSpec.