[PowerShell] Renommer des fichiers PDF avec leurs métadonnées

Renommer des fichiers PDF avec leurs métadonnées [PowerShell] - Shell/Batch - Programmation

Marsh Posté le 24-06-2011 à 16:57:27    

Bonjour et merci de prendre le temps de lire ce sujet,
 
Je me retrouve à devoir créer un script PowerShell pour ma boite (sachant que je n'en ai jamais fait, ni même de l'objet... :o, je suis admin Unix normalement ) permettant de renommer des fichiers PDF à partir du titre contenu dans les metadonnées du fichier.
 
J'ai trouvé un bon exemple sur le net, se basant sur une dll proposée par sourceforge (itextsharp.dll) :
Mais en tant que bon débutant et admin Unix, je comprends rien à la programmation objet, je ne sais faire que tu procéduriel.
 
Voici la tête de mon code :
 

Code :
  1. ### Script de renommages des fichiers PDF en sortie du serveur Autocom ###
  2. ### Integré par XXXXX ###
  4. ############### Chargement de la DDL ITextSHarp.dll (sourceforge), des modules Powershell et des variables ################
  5. ### Chemin de la DLL ITextSHarp ###
  6. $path_DLL="C:\aaa\script"
  7. ### Chargement du module PowerShell ###
  8. [System.Reflection.Assembly]::LoadFrom("$path_DLL\itextsharp.dll" )
  10. ### Chemin des fichiers PDF ###
  11. $files="C:\aaa\in"
  13. ############### Fonction PDFDocumentInformation permettant la lecture des Metadonnees d'un PDF ##############
  14. function New-PDFDocumentInformation{
  15. #Lit les propriétés et metadonnées d'un fichier PDF
  16. #
  17. # Un fichier pdf contient une table des références (xref),
  18. # celle-ci est toujours stockée en fin de fichier.
  19. # Le chargement partiel du document peut donc prendre un certain temps...
  21. #Dépendance : itextsharp.dll ( v5.0.4)
  22. # http://sourceforge.net/projects/itextsharp/
  24. param(
  25.             [ValidateNotNullOrEmpty()] 
  26.             [Parameter(Position=0,Mandatory=$true,ValueFromPipeline = $true,ValueFromPipelineByPropertyName= $true)]
  27.             [Alias("PSPath" )]
  28.           #Référence un chemin d'un système de fichiers ou une url : file://, http://, https:// 
  29.          [String] $Path
  30.        )
  32. begin   {$isForceToReadAll=$False}
  34. process {
  35.    try
  36.    {
  37.      # Vérifie le type du chemin
  38.       #pour "h:/", "h:\" -> false
  39.       #pour "htoto:/", "http://" -> true
  40.       #pour "htoto:\", "http:\\"-> false
  41.     if (-not [Uri]::IsWellFormedUriString($Path,[UriKind]::Absolute))
  42.     {
  43.          #Transforme le path qui peut être relatif ou
  44.          # contenir une référence à un provider.
  45.        $Path=$ExecutionContext.SessionState.Path.GetUnresolvedProviderPathFromPSPath($Path)
  46.     }
  47.     #Le constructeur gére l'inexistence du fichier.   
  48.    $AccessFile = New-object iTextSharp.text.pdf.RandomAccessFileOrArray($Path)
  49.      Write-debug "`tWait load Pdf : $path"
  50.     #Charge partiellement en mémoire un document PDF
  51.    $reader = New-object iTextSharp.text.pdf.PdfReader($AccessFile, $isForceToReadAll)
  52.      Write-debug "Next pdf file"
  53.      # Construit un objet à partir des propriétés du pdf.
  54.   $PDFDocument=New-Object PSObject -Property @{
  55.                       FileName=$_.FullName
  56.                       NumberOfPages=$reader.NumberOfPages;
  57.                        #Pas de méthode Clone sur un dictionnaire générique.
  58.                       Info=$(
  59.                               $hCopy=@{}
  60.                               $reader.Info.GetEnumerator()|
  61.                                Foreach {$hCopy.Add($_.Key,$_.Value) }
  62.                               $hCopy
  63.                             )
  64.                        #Le fichier est altéré ?
  65.                       Tampered=$reader.Tampered;
  66.                        #Only the last version char is returned
  67.                       PdfVersion=$reader.PdfVersion;
  68.                        #encryption permissions
  69.                       Permissions=$reader.Permissions;
  70.                        #le fichier peut être complété ?
  71.                       Appendable=$reader.Appendable;
  72.                        #Metadonnées XMP.
  73.                        #conversion [Byte[]] to String
  74.                       MetaData=New-Object String(,$Reader.Metadata);
  75.                        #Informations sur la page
  76.                       PageSize=$reader.GetPageSize(1)
  77.                     }
  78.    #Défini le type de l'objet personnalisé
  79.   $PDFDocument.PsObject.TypeNames[0] = "PDFDocumentInfo"
  80.   $PDFDocument 
  81.   } catch {
  82.      $PSCmdlet.WriteError(
  83.                   (New-Object System.Management.Automation.ErrorRecord(
  84.                                 $_.Exception,
  85.                        "PDFDocumentInfoUriOrPath",
  86.                        "InvalidOperation",
  87.                        ("{0} : {1}" -f $MyInvocation.Mycommand.Name,$_.Exception.Message))
  88.                      ) 
  89.                   )
  90.   }
  91.   finally {
  92.    if ($reader -ne $null)
  93.     { $reader.Close() }
  94.    if ($AccessFile -ne $null)
  95.     { $AccessFile.Close() }
  96.   } #finally
  97. } #process
  98. } #New-PDFDocumentInformation
  100. #New-Alias New-PdfInfo New-PDFDocumentInformation -description "Construit un objet contenant les metadonnées d'un fichier PDF."
  103. ###### MAin #########
  104. $PDFInfos=gci $files *.pdf -recurse | New-PDFDocumentInformation
  105. $Nom_fic=$PDFInfos|Select @{n="Title";e={$_.info.Title}}|Out-GridView
  106. # Trop bien, ici j'arrive a récupérer les titres contenu dans les metadonnées .... mais comment faire pour renommer mes fichiers ?!
  108. # Alors là, c'est ici que commence la merde ... et surtout, ça fait pas du tout ce que je veux...
  109. #foreach ($Fichier in gci $files) {
  110. #    Get-ChildItem -path $files -Filter *.pdf | rename-item -newname { $Nom_fic[$i]  }
  111. #    $i=$i+1
  112. #    echo $i
  113. #}


 
Une âme charitable peut-elle m'expliquer comment utiliser l'objet instancié, nommé PDFInfos et surtout, comment s'en servir pour renommer tous mes fichiers qui sont dans C:\aaa\in, puis les déplacer dans C:\aaa\out ?
 
 
Merci à toi qui a pris la peine d'arriver en bas de mon post.


Message édité par tanshiro le 24-06-2011 à 16:58:58
Reply

Marsh Posté le 24-06-2011 à 16:57:27   

Reply

Marsh Posté le 27-06-2011 à 11:58:21    

Petit up,
 
Personne de meilleur que moi en PowaCoquillage ?  :sweat:

Reply

Marsh Posté le 29-06-2011 à 15:43:14    

Le up du dernier espoir, avant que le topic ne sombre dans les basfond de HFR  :(

Reply

Marsh Posté le 29-06-2011 à 16:06:34    

Je peux pas répondre à ta question spécifique, mais je peux te dire qu'en Perl, ça peut se faire (lecture/écriture des tags XMP) au moyen du module Image::ExifTool (et ses nombreux sous modules)
Les tags concernés sont indiqués ici: http://search.cpan.org/~exiftool/I [...] gNames.pod
Notes que je n'ai jamais jusqu’à maintenant utilisé ce module, donc je ne peux trop te donner d'indications, mais au vu de la doc, ça passe par des appels à SetNewValue.  
A+,


---------------
There's more than what can be linked! --  Le capitaine qui ne veut pas obéir à la carte finira par obéir aux récifs. -- No jab ? No job ! -- (╯°□°)╯︵ ┻━┻
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed