Inf-Datei auslesen

AltairKD

Hi,

ich will gerne eine Inf Datei auslesen (Inf-Datei von Druckertreiber) da ich an einen Script Arbeite was hier auf meiner Arbeit sämtliche drucker mit 2klicks installiert, jedoch wäre es sehr viel Arbeit die Druckernamen aus den Inf-Dateien per hand rauszusuchen und als Variablen im Script zu speichern(wie ich es mit 4 Druckern gemacht habe zum test). Ich denke mal das man das Problem mit RegExp lösen kann allerdings kenne ich mich damit noch NULL aus. Desweiteren besteht das Problem das die Inf-Dateien nicht gleichmäßig aufgebaut sind, jeder Herrsteller kann sie im prinzip selbst gestallten, nur das Shema bleibt gleich.

Hier mal 2ausschnitte als Beispiel:

Code

;HP Printer Driver 
;Windows NT printer installation INF file 
;Copyright Hewlett-Packard 2001 - 2007 
[Version] 
Signature="$Windows NT$" 
Provider=Hewlett-Packard 
ClassGUID={4D36E979-E325-11CE-BFC1-08002BE10318} 
Class=Printer 
CatalogFile=hp1055c1.cat 
DriverVer=01/03/2007,4.31 
; The Manufacturer sections lists all of the manufacturers 
; that we willdisplay in the Dialog box 
[Manufacturer] 
"HP"=Models 
; Model sections. Each section here corresponds with an entry listed in the 
; [Manufacturer] section, above. The models will be displayed in the order 
; that they appear in the INF file. 
[Models] 
"HP DesignJet 1050C PS3" = HP1050C1.PPD,LPTENUM\Hewlett-PackardDesig912D 
"HP DesignJet 1055CM PS3" = HP1055C1.PPD,LPTENUM\Hewlett-PackardDesig4E6B

Alles anzeigen

Hier müsste er zu Manufacture gehen dann lesen das "HP"=Models ist und zu Models gehen um die hier 2 Modelle auszulesen und zu speichern. Eig. nicht so schwer denk ich aber:

Code

; HPP1010H.INF 
; SuperPrint 5.5 hp LaserJet 1010 Series 
; Copyright (C) 2002 Zenographics Inc. 
[Version] 
Signature="$Chicago$" 
Provider=%ZS% 
ClassGUID={4D36E979-E325-11CE-BFC1-08002BE10318} 
Class=Printer 
DriverVer=05/28/2003,5.60.1604.0 
catalogfile.nt=hpp1010h.cat 
[DestinationDirs] 
DefaultDestDir = 11 
DRIVER = 11 
DRIVER2K = 66000 
HELP = 11 
HELP2K = 66000 
PAREPP = 11 
PRTPROCS = 66001 
PRTPROCS_COPY = 66000 
SD = 11 
SDNT = 66000 
SD4INI = 10 
SD9X = 11 
LANGMON_FILES = 11 
LANGMON_FILES_NT5 = 66002 
LANGMON_DRVCOPY = 66000 
[Manufacturer] 
"HP" 
[HP] 
%LJ1010% = LJ1010, DOT4PRT\VID_03F0&PID_0C17&REV_0100 
%LJ1010% = LJ1010, DOT4PRT\VID_03F0&PID_0C17&DOT4&PRINT_HPZ 
%LJ1010% = LJ1010, DOT4PRT\Hewlett-Packardhp_La17C4&PRINT_HPZ 
%LJ1010% = LJ1010, LPTENUM\Hewlett-Packardhp_La17C4, Hewlett-Packardhp_La17C4 
%LJ1010% = LJ1010, USBPRINT\Hewlett-Packardhp_La17C4 
%LJ1012% = LJ1010, DOT4PRT\VID_03F0&PID_0D17&REV_0100 
%LJ1012% = LJ1010, DOT4PRT\VID_03F0&PID_0D17&DOT4&PRINT_HPZ 
%LJ1012% = LJ1010, DOT4PRT\Hewlett-Packardhp_LaD645&PRINT_HPZ 
%LJ1012% = LJ1010, LPTENUM\Hewlett-Packardhp_LaD645, Hewlett-Packardhp_LaD645 
%LJ1012% = LJ1010, USBPRINT\Hewlett-Packardhp_LaD645 
%LJ1015% = LJ1010, DOT4PRT\VID_03F0&PID_0E17&REV_0100 
%LJ1015% = LJ1010, DOT4PRT\VID_03F0&PID_0E17&DOT4&PRINT_HPZ 
%LJ1015% = LJ1010, DOT4PRT\Hewlett-Packardhp_La1404&PRINT_HPZ 
%LJ1015% = LJ1010, LPTENUM\Hewlett-Packardhp_La1404, Hewlett-Packardhp_La1404 
%LJ1015% = LJ1010, USBPRINT\Hewlett-Packardhp_La1404

Alles anzeigen

Hier heißt der 2te Teil nach Manufacture, HP und nicht mehr Model.

Somit kann man den ersten teil finden aber wie den 2ten?(Da der in jeder 3ten Inf-Datei anders heißt)

Hoffe mir kann geholfen werden. Schonmal Danke für eure Mühe

**Xenobiologist**

Reicht das schon?

[autoit]

#include <Array.au3>
$re = StringRegExp(FileRead("inf.txt"), '(.+)=(.+)\\', 3)
_ArrayDisplay($re)

[/autoit]

SEuBo

Ich würd den hier probieren:

[autoit]

; Text einlesen
$sText = ClipGet()

[/autoit][autoit][/autoit][autoit]

$aSection = StringRegExp($sText,'(?:=|(?:[\r\n]|\r\n)"?)(\w+\b)(?:[\w\W]+?)\[\1\]',3)
If IsArray($aSection) Then MsgBox(0,"",$aSection[0])
If Not IsArray($aSection) Then MsgBox(0,"","Kein match :(")

[/autoit]

Liefert zumindest bei den beiden Testdateien das richtige
Die Section, die dann zurückgegeben wird, kannst du ja einfach mit IniReadSection auslesen (oder auch per RegExp, falls das nicht geht)

**Xenobiologist**

Geht es nur darum HP auszulesen? Das steht doch sogar im Namen der Datei.

AltairKD

@Xenobiologist: Deine Lösung funktioniert soweit schonmal, muss jedoch noch genauer testen und hab grade net so viel zeit.

SEuBo: Wie kann ich da den Dateipfad angeben wo die inf ist? xD

Blick da net so richtig durch, wei ClipGet ist ja für datei aus der zwichenablage aber wie krieg ich die inf darein?? *grins*

Edit: Es geht darum das Druckermodell rauszusuchen womit der Drucker per Inf datei isntalliert wird.(Oft sind es nicht die bekannte betzeichnung(die auf dem Drucker oder im Handbuch stehen) sondern i.welche abkürzungen oder sonstwas)

SEuBo

Statt ClipGet() einfach FileRead(....). Von mir aus auch mit FileOpenDialog, oder _FileListToArray. Das bleibt völlig dir überlassen.

Hab das nur zum Testen so gemacht, damit man nicht immer den Pfad anpassen muss (und damit ich die Dateien nicht auf meinem eh schon zu vollen Desktop speichern musste)

Aber wenns bei einer Datei nicht klappt, bitte die Datei dann posten

Der wesentliche Unterschied : Mein Pattern versucht die Section auszulesen. Das von Xeno versucht die Namen direkt auszulesen. MUsst entscheiden, was für dich am effektivsten und am Vorteilhaftesten ist.

AltairKD

ahh, also dann ist Section schon besser als direkt den namen auslesen da bei Sectionen der name auf jedenfall stimmen müsste. Werd evtl. bei glück heute noch testen können. Meld mich dann.

SEuBo: ist es auch noch möglich unter der gefundenen Section den darin stehenden Namen auszulesen? sodass er zuerst die section sucht und wenn er diese gefunden hat den Model namen der dort steht.

Wäre Super ;). Soweit funktionierts aber gut.

SEuBo

Zitat von AltairKD

SEuBo: ist es auch noch möglich unter der gefundenen Section den darin stehenden Namen auszulesen? sodass er zuerst die section sucht und wenn er diese gefunden hat den Model namen der dort steht.

so?!

Spoiler anzeigen

[autoit]

#include <Array.au3>
; Text einlesen
$sFile = FileOpenDialog("", "", "Inf (*.inf)")
$sText = FileRead($sFile)

[/autoit] [autoit][/autoit] [autoit]

$aSection = StringRegExp($sText, '(?:=|(?:[\r\n]|\r\n)"?)(\w+\b)(?:[\w\W]+?)\[\1\]', 3)

[/autoit] [autoit][/autoit] [autoit]

If IsArray($aSection) Then
$aIniRead = IniReadSection($sFile, $aSection[0]) ; That's where the magic happens
If Not @error Then
_ArrayDisplay($aIniRead)
Else
MsgBox(0, "", "Konnte Ini nicht lesen")
EndIf
Else
MsgBox(0, "", "Kein match :(")
EndIf

[/autoit]

AltairKD

Und wieder hat sich mein Problem erweitert, soweit funktioniert SEuBo's vorschlag ganz gut allerdings nicht bei jeder Inf-Datei.

z.B.

Code

; HP LaserJet 2100 Series driver - 2K 
; HP LaserJet 2100 Series driver installation file for MS Windows 2000 
; Copyright © Copyright Hewlett-Packard 1996, 1997, 1998, 1999, 2000, 2001 
; All Rights Reserved. 
; Version section 
[Version] 
Signature="$Windows NT$" 
Provider=HP 
layoutfile=hpbf212i.inf 
ClassGUID={4D36E979-E325-11CE-BFC1-08002BE10318} 
Class=Printer 
catalogfile=hp212ep6.cat 
DriverVer=12/30/2003,4.27.2100.410 


; Manufacturer section 
[Manufacturer] 
HP=HPLaserPrinter 


; Model sections. 
[HPLaserPrinter] 
%Printer%=hpbf212i.pmd,DOT4PRT\HEWLETT-PACKARDHP_LA928D&BPRINT,HEWLETT-PACKARDHP_LA928D 


; Installer Sections 
[hpbf212i.pmd] 
CopyFiles=hpbf212e_FILES,LANGMON_FILES 
DataSection=hpbf212e_DATA 
DataFile=hpbf212i.pmd 


; Data Sections 
[hpbf212e_DATA] 
DriverFile=hpbf212g.dll 
ConfigFile=hpbf212e.dll 
HelpFile=hpbf212e.hlp 
LanguageMonitor=%HP_LANG_MONITOR% 


; Copy Sections 
[hpbf212e_FILES] 
hpbf212e.dll 
hpbf212g.dll 
hpbf212i.pmd 
hpbf212e.hlp 
hpbafd32.dll 
hpbftm32.dll 
[LANGMON_FILES] 
hpdcmon.dll 


[DestinationDirs] 
hpbf212e_FILES=66000 
LANGMON_FILES=66000 
DefaultDestDir=66000 


; Localizable Strings 
[Strings] 
Printer="HP LaserJet 2100 Series PCL 6" 
DiskID1="HP LaserJet 2100 Series PCL 6 Printer Driver Disk" 
HP_LANG_MONITOR="HP LaserJet 5 Language Monitor,hpdcmon.dll"

Alles anzeigen

Hier findet er %Printer% was soweit ja richtig ist, nur %Printer% ist ein String in dem HP LaserJet 2100 Series PCL 6 steht(siehe Zeile 54) also müsste mein Script quasi irgendwie den String erkennen und zu den Punkt springen wo sein Inhalt steht um diesen das auszulesen. (Ich hasse Inf-Dateien).

**Schnitzel**

da müsste doch auch mit nem einfachen iniread gehen

[autoit]

Iniread($sFile, "HPLaserPrinter", "%Printer%", "")

[/autoit]

SEuBo

Hey Altair:

Langsam wird das ganze kompliziert
Zum Glück gibts Backreference. Ich würde die Variablen in der .inf dann erstmal aufschlüsseln.
Hilft dir dieses Script? Zeile 6-11 ist der "neue" und "interessante" Teil

Spoiler anzeigen

[autoit]

#include <Array.au3>
; Text einlesen
$sFile = FileOpenDialog("", "", "Inf (*.inf)")
$sText = FileRead($sFile)

[/autoit] [autoit][/autoit] [autoit]

;Variablen "entschlüsseln" und in Temp datei schreiben
Do
$sText = StringRegExpReplace($sText,"(?isx)(\%(\w+)\%)(.+?)\2(=([""']?[^""']+[""']?))","\5\3\2\4")
Until @extended = 0
FileDelete(@TempDir & "\~print.inf")
FileWrite(@TempDir & "\~print.inf",$sText)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

$aSection = StringRegExp($sText, '(?:=|(?:[\r\n]|\r\n)"?)(\w+\b)(?:[\w\W]+?)\[\1\]', 3)

[/autoit] [autoit][/autoit] [autoit]

If IsArray($aSection) Then
$aIniRead = IniReadSection(@TempDir & "\~print.inf", $aSection[0]) ; That's where the magic happens
If Not @error Then
_ArrayDisplay($aIniRead)
Else
MsgBox(0, "", "Konnte Inf nicht lesen")
EndIf
Else
MsgBox(0, "", "Kein match :(")
EndIf

[/autoit]

//EDIT: Kleine Korrektur. (Do-Until)

AltairKD

Leider gottes findet er immernoch nur %Printer%.

Habe selber auch noch ein wenig rumprobiert aber verzweifel förmlich drann...

AltairKD

Wäre echt megahappy wenn jemand eine Lösung für mein Problem finden könnte, da mir nix mehr einfällt ausser wirklich alle benötigten .inf-Dateien per hand durchzugehen um die Druckernamen rauszufinden und diese in mein Script einzupflegen.

**AspirinJunkie**

Hilft dir der Teil von Seubo nicht weiter?

Ansonsten mal ein anderer Ansatz hierzu um erstmal eine saubere Inf-Datei mit aufgelösten Variablen zu erhalten:

Spoiler anzeigen

[autoit]

$sFile = FileOpenDialog("", "", "Inf (*.inf)")
$sText = FileRead($sFile)

[/autoit] [autoit][/autoit] [autoit]

Global $aStringSection = IniReadSection($sFile, "Strings")

[/autoit] [autoit][/autoit] [autoit]

For $i = 1 To $aStringSection[0][0]
$sText = StringReplace($sText, "%" & $aStringSection[$i][0] & "%", StringTrimLeft(StringTrimRight($aStringSection[$i][1], 1), 1))
Next

[/autoit] [autoit][/autoit] [autoit]

;ab hier sind die Strings in der Variablen $sText aufgelöst.

[/autoit]

AltairKD

Ja SEuBo's lösungsvorschläge haben leider auch nicht ganz funktioniert.

Das problem liegt einfach darinn das es keine genauen vorschriften gibt wie eine Inf-Datei auszusehen hat. Es ist nur das schema vorgeschrieben also:

Code

[Variable1]
Muster = "Test"
 
[Variable2]
Muster2 = "Test2"

Wie jedoch die Variablen heißen kann sich jede Firma selbst aussuchen, und somit kann man nicht immer nach den gleichen schema die Dateien durchsuchen, da man nie weiß in wie die Variable heißt in dem der Druckername gespeichert ist.

**AspirinJunkie**

Also war das Problem gar nicht das du Variable nicht aufgelöst bekommst?
Ansonsten gibt es schon Vorschriften wie eine Inf-Datei für Treiber auszusehen hat.
Die String-Sektion z.B. ist so ein Standard.
Ansonsten findest du ein paar Erklärungen dazu z.B. >>Hier<<.

AltairKD

Das Problem was ich habe ist das ich nicht Automatisch den passenden Druckernamen der für die Installation per Inf benötigt wird rausfinden kann. Da es zwa vorschriften gibt aber die Variablen jeder Herrsteller selbst wählen kann, kann ich nicht in jeder nach der gleichen suchen um den Druckernamen zu kriegen, da wie bereits erwähnt fast jeder Herrsteller andere Namen benutzt.

SEuBo

Zitat von AltairKD

Leider gottes findet er immernoch nur %Printer%.

Komisch bei mir funktionierts. Wie ist denn der aktuelle Stand von deinem Script?

AltairKD

der aktuelle stand ist wie er war kann ja garnicht weitermachen da das auslesen nicht funktioniert. -.-

Bei dir funktioniert es wahrscheinlich bei ein oder zwei(wie hier auch) aber da hier ja nicht nur 2 verschiedene drucker installiert sind im Haus sondern ca. 150 gibt es auch dem entsprechend viele verschiedene Inf-Dateien. Und das auslesen müsste ja leider bei jeder funktionieren. Aber so langsam denk ich das ich einfach meinen Praktikanten die Inf-Dateien gebe und er soll sich da mal durcharbeiten und mir die Druckernamen raussuchen ;). Das funktioniert wenigstens auf unkomplizierte weise =).

AltairKD

Wie gestern persönlich besprochen SEuBo poste ich hier alle(bzw. erstmal nur die von den Laserdruckern) Inf-Dateien um die Automatische auslesung anzupassen. Dazu noch ein fettes Dankeschön an SEuBo für die Hilfe.

autoit.de/wcf/attachment/9672/