- /* Let the input modules try to identify the file. */
- if ((fd = open(opt_input_file, O_RDONLY)) == -1)
- g_critical("Failed to load %s: %s.", opt_input_file,
- strerror(errno));
- if ((len = read(fd, buf->str, BUFSIZE)) < 1)
- g_critical("Failed to read %s: %s.", opt_input_file,
- strerror(errno));
- buf->len = len;
- if (!(in = sr_input_scan_buffer(buf)))
+ if (!is_stdin) {
+ /*
+ * An actual filename: let the input modules try to
+ * identify the file.
+ */
+ if (sr_input_scan_file(opt_input_file, &in) == SR_OK) {
+ /* That worked, reopen the file for reading. */
+ fd = open(opt_input_file, O_RDONLY);
+ }
+ } else {
+ /*
+ * Taking input from a pipe: let the input modules try
+ * to identify the stream content.
+ */
+ if (is_stdin) {
+ /* stdin */
+ fd = 0;
+ } else {
+ fd = open(opt_input_file, O_RDONLY);
+ if (fd == -1)
+ g_critical("Failed to load %s: %s.", opt_input_file,
+ g_strerror(errno));
+ }
+ if ((len = read(fd, buf->str, CHUNK_SIZE)) < 1)
+ g_critical("Failed to read %s: %s.", opt_input_file,
+ g_strerror(errno));
+ buf->len = len;
+ sr_input_scan_buffer(buf, &in);
+ }
+ if (!in)