Que formato é este arquivo (começando com “! R! SEM 9; EXIT;”) e como exibi-lo na tela

1

Eu tenho o seguinte arquivo encontrado em um sistema do cliente e eu preciso descobrir o formato que é e (se possível) como abri-lo no Windows (Win7 ou para cima seria perfeitamente bem).

Deve ser algum tipo de formato Graphics / Printer. O nome do arquivo não contém nenhuma extensão e foi gerado usando o Windows 95.

Cabeçalho do arquivo:

!R! SEM 9;EXIT;
%-12345X@PJL JOB
@PJL SET ECONOMODE=OFF 
@PJL RDYMSG DISPLAY=""
@PJL ENTER LANGUAGE=POSTSCRIPT
M%!PS-Adobe-3.0
%%Title: 
%%Creator: Kyocera Mita FS-1020D KX
%%CreationDate: 10/24/2016 08:45
%%DocumentPrinterRequired: Kyocera Mita FS-1020D KX
%%For: 
%%BoundingBox: (atend)
%%Pages: (atend)
%%Orientation: (atend)
%%PageOrder: Special
%%DocumentNeededResources: (atend)
%%DocumentSuppliedResources: (atend)
%%DocumentData: Clean7Bit
%%LanguageLevel: 2
%%EndComments
%%BeginDefaults
%%PageOrientation: Portrait
%%PageBoundingBox: 12 10 407 587
%%PageMedia: (Plain)
%%EndDefaults
%%BeginProlog
%%BeginResource: Macro_Basic
/KPDLBASE 100 dict dup begin

Ele contém mais "%%" - Seções, aqui sem conteúdo, já que podem ser dados confidenciais:

%% Graphics
...
%% Font
...
%% Reencode
...
%% T42
...
end def
%%EndResource
%%EndProlog
%%BeginSetup
KPDLBASE begin
%%BeginFeature: *Resolution 600dpi
BF{
  <</HWResolution [600 600]>> SP
  <</PreRenderingEnhance t>> SP
}EF
%%EndFeature
%%BeginFeature: *InputSlot (Auto Tray Select)
BF{
<</DeferredMediaSelection t>> SP
}EF
%%EndFeature
%%BeginFeature: *PageSize (A5)
BF{
  <</Policies <</PageSize 7>> /PageSize [422 595] /ImagingBBox n>> SP
}EF
%%EndFeature
%%BeginFeature: *MediaType (Automatische Medienauswahl)
BF{
}EF
%%EndFeature
%%BeginFeature: Copies 1
BF{
  <</NumCopies 1>> SP
}EF
%%EndFeature
%%BeginFeature: *Duplex None
BF{
  & ' f setduplexmode E
}EF
%%EndFeature
%%BeginFeature: *Smoothing ON
BF{
  1 & /setdoret g e
}EF
%%EndFeature
%%BeginFeature: *Collate true
BF{
    userdict /UICollateDetails known not {userdict /UICollateDetails 10 # put} if
    userdict /UICollateDetails g @ /Mode 0 put /Hold 0 put
    <</Collate t /CollateDetails UICollateDetails>> SP
}EF
%%EndFeature
  /DTM [0.12000 0.0 0.0 -0.12000 10 587] d
%%EndSetup
KPDLBASE /PageSV save put
%%Page: 1 1
%%PageOrientation: Landscape
%%PageBoundingBox: (atend)
%%BeginPageSetup
  [0.0 0.12000 0.12000 0.0 12 10] + G
%%EndPageSetup

Em seguida, seguem ~ 2500 linhas de conteúdo e o rodapé a seguir:

%%PageTrailer
%%PageBoundingBox: 0 0 574 396
/PageSV where { pop PageSV restore } if
%%Trailer
%%Pages: 1
%%Orientation: Portrait Landscape
%%BoundingBox: 0 0 574 396
%%EOF
%-12345X@PJL EOJ
%-12345X

EDITAR:

Aqui está o código para um aplicativo de consola C # que tenta converter todos os arquivos em um determinado diretório em arquivos PDF. Por favor, note que eu não fiz nenhuma validação nos dados de entrada fornecidos.

using System;
using System.Collections.Generic;
using System.Diagnostics;
using System.IO;
using System.Linq;
using System.Text;
using System.Threading.Tasks;

namespace PrintDataToPDF
{
    class Program
    {
        static void Main(string[] args)
        {
        Console.WriteLine("Input filepath:");
        string inputDir = Console.ReadLine();

        DirectoryInfo dir = new DirectoryInfo(inputDir);

        Console.WriteLine("Output filepath:");

        string outputDir = Console.ReadLine();

        List<FileInfo> fileList = new List<FileInfo>();

        foreach (FileInfo item in dir.GetFiles())
        {
            fileList.Add(item);
        }

        Console.WriteLine(fileList.Count + " files found! Convertation is starting..");

        foreach (FileInfo item in fileList)
        {
            string tempname = Path.GetTempFileName();
            using (StreamReader reader = new StreamReader(item.FullName))
            {
                string content = reader.ReadToEnd();
                using (StreamWriter writer = new StreamWriter(tempname))
                {
                    writer.Write(content.Substring(content.IndexOf("%%")));
                }
                Process.Start(@"C:\Program Files\gs\gs9.21\bin\gswin64c.exe", "-o " + outputDir + item.Name + "out.pdf -sDEVICE=pdfwrite "+ tempname);
                Console.WriteLine(item.Name + " was converted!");
            }
        }

        Console.WriteLine("DONE");
        Console.ReadLine();
    }
}
}
    
por user450387 08.09.2017 / 14:23

1 resposta

2

!R!SEM6;EXIT; é um comando usado pelas impressoras e copiadoras kyocera (que provavelmente foi a chave de impressora usada para gerar esse arquivo).

  • !R! significa o código de reconhecimento para prescrever comandos.
  • SEM significa Definir modo de emulação. este comando altera temporariamente o modo de emulação.
  • O 6 significa emulação de HPIII
  • EXIT termina a execução

As seguintes linhas com @PJL indicam um "cabeçalho da linguagem de trabalho de impressão".

O M%!PS-Adobe-3.0 indica que todo o resto é código Postscript.

Você pode imprimir este arquivo RAW para uma impressora, mas se quiser visualizá-lo na tela, poderá pegar todo o código Postscript e convertê-lo em uma imagem visível.

Por exemplo, você pode usar o Ghostscript para criar um PDF. Salve todo o código Postscript (então tudo de %% Title em diante) para um arquivo e execute gs.exe.

gs.exe -o out.pdf -sDEVICE=pdfwrite input-file

Editar: Se você tiver mais de 1500 arquivos, poderá usar um arquivo em lote para convertê-los. Supondo que eles estejam todos em um diretório, você pode fazer algo assim:

Crie este convert.cmd em algum lugar:
Presume que seus arquivos estejam em C: \ YOUR_RAW_FILES
Assume que eles estão todos em um diretório
Assume que gs esteja instalado em C: \ Arquivos de Programas (x86) \ gs \ gs9.05 \ bin \ (altere se houver outra versão)

@echo off

:: create a convert directory and remove contents
if not exist "C:\MYCONVERTS\" mkdir C:\MYCONVERTS
del /Q C:\MYCONVERTS\*.*

:: loop through all your files and pass the linenumber for %%Title to convert-procedure
for %%X IN (C:\YOUR_RAW_FILES\*.*) do (
  for /f "delims=:" %%a in ('findstr /n "%%Title" %%X') do call :convert %%a %%X %%~nX
)

:: remove the temp files leaving the pdf files in MYCONVERTS
del /Q C:\MYCONVERTS\*.tmp

goto End
::--------------------------------

::================================
:convert
:: we need the lines above %%Title (so - 1)
set /a z=%1 - 1
:: export all remaining lines to .tmp (skipping the first x lines)
for /f "tokens=* skip=%z%" %%b IN ('type %2') DO @echo %%b >> C:\MYCONVERTS\%3.tmp

:: execute ghostscript with correct parameters
"C:\Program Files (x86)\gs\gs9.05\bin\gswin32c.exe" -o C:\MYCONVERTS\%3.pdf -sDEVICE=pdfwrite C:\MYCONVERTS\%3.tmp

goto :eof
::================================

:End

Não tenho certeza se isso será válido se os arquivos contiverem informações binárias reais, mas você pode tentar.

    
por 08.09.2017 / 14:33