Context Navigation

Script.bat @ 16104

Last change on this file since 16104 was 6061, checked in by Gotcha, 15 years ago
Correction of the accents.
File size: 29.8 KB

Line
1	@echo off
2
3	rem **************************************
4	rem Merci de ne PAS TOUCHER aux variables qui suivent !!!
5	set titre=BATCH_OPTIMISATEUR
6	set version=v5
7	set vdate=03.05.2010
8	set x=1
9	set y=7
10	set title=%titre% %version% du %vdate%
11	set tps=4
12	rem **************************************
13
14	rem **************************************
15	set debug=0
16	rem debug=0 Le script s'exécute normalement
17	rem debug=1 Mode debug actif TEMPORAIRE (cible quelques messages)
18	rem debug=2 Mode debig actif en permanance.
19	rem **************************************
20
21	rem SUPER ASTUCE: Le copier/coller qui fonctionne même avec MS-DOS !!!
22	rem Exemple: copiez le texte que vous voulez et faites un clic droit dans la fenêtre dos !
23	rem MAGIQUE !!! Votre texte est collé !!!
24	rem La combinaison Ctrl+V ne marche pas par contre... c'est le simple clic droit qui colle sur la fenêtre MS-DOS
25
26	rem Permet de "Copier-coller" dans la console MS-DOS
27	reg add "HKEY_CURRENT_USER\Console" /v QuickEdit /t REG_SZ /d 1 /f
28
29	rem Initialisation des variables obligatoires
30	set DIRinstall=%~dp0
31	set DIRtempo=%~dp0temp
32	set DIRcompo=%~dp0composants
33	set BOEXE=Batch_Optimisateur.exe
34	rem Définition des composants
35	set cechoEXE=%DIRcompo%\cecho.exe
36	set formaterARB=%DIRcompo%\formater.arb
37	set FreeWatchEXE=%DIRcompo%\FreeWatch.exe
38	set indexPHP=%DIRcompo%\index.php
39	set logoBAT=%DIRcompo%\logo.bat
40	set nconvertEXE=%DIRcompo%\nconvert.exe
41	set questionsBAT=%DIRcompo%\questions.bat
42	set switchEXE=%DIRcompo%\switch.exe
43	set vlogoBAT=%DIRcompo%\vlogo.bat
44	rem Définition des fichiers temporaires
45	set sourceTXT=%DIRtempo%\DIRsource.txt
46	set sortieTXT=%DIRtempo%\DIRsortie.txt
47	set sousrepTXT=%DIRtempo%\DIRsousrep.txt
48	set supTXT=%DIRtempo%\DIRsup.txt
49	set sortieNEWTXT=%DIRtempo%\DIRsortieNew.txt
50	set listingTXT=%DIRtempo%\listing.txt
51	rem Définition de variables...
52	set setupTXT=%~dp0Setup.txt
53	set vDPI=0
54
55	rem Identification du système (x86 ou x64)
56	if exist "%PROGRAMFILES%" set SYS_3264=%PROGRAMFILES%
57	if exist "%PROGRAMFILES(x86)%" set SYS_3264=%PROGRAMFILES(x86)%
58
59	if "%debug%" == "2" (
60	echo Rpertoire prsent : "%SYS_3264%"
61	pause
62	cls
63	)
64
65	rem Recherche du répertoire d'installation de Ant Renamer
66	if exist "%PROGRAMFILES%\Ant Renamer\Renamer.exe" set renamerEXE=%PROGRAMFILES%\Ant Renamer\Renamer.exe
67	if exist "%PROGRAMFILES(x86)%\Ant Renamer\Renamer.exe" set renamerEXE=%PROGRAMFILES(x86)%\Ant Renamer\Renamer.exe
68	if not defined renamerEXE set merror10=Le logiciel tierce Ant Renamer n'a pas t trouv. Il faut l'installer.
69
70	rem Taille de la fenêtre
71	title %title%
72	mode con lines=82 cols=80
73	color F1
74
75	if "%debug%" == "2" (
76	echo Je suis là
77	rem echo Lancé depuis %CD%
78	rem echo Présent dans %~dp0
79	rem echo Pour info, la commande %CD% donne le répertoire du fichier exécutant PARENT !
80	rem echo Pour info, la commande %~dp0 donne le répertoire (avec le slash \ ) du répertoire où se trouve le présent script !
81	echo %merror0%
82	pause
83	)
84
85	rem Initialisation du dossier temporaire. Si il existe on l'efface avant (pour le vider) avant de le recréer (vièrge)
86	if exist "%DIRtempo%" del "%DIRtempo%" /s /q >nul
87	if not exist "%DIRtempo%" mkdir "%DIRtempo%" >nul
88
89	rem Vérification des composants indispensables.
90	rem S'il ne sont pas présent, poursuite impossible...
91	if not exist "%setupTXT%" set merror100=Le fichier Setup.txt n'a pas t trouv.
92	rem Erreur 00 bloquante
93	if defined merror100 goto :bleme
94	if not exist "%cechoEXE%" set merror20=Le composant cecho.exe n'a pas t trouv.
95	if not exist "%formaterARB%" set merror30=Le composant formater.arb n'a pas t trouv.
96	if not exist "%FreeWatchEXE%" set merror40=Le composant FreeWatch.exe n'a pas t trouv.
97	if not exist "%indexPHP%" set merror50=Le composant index.php n'a pas t trouv.
98	if not exist "%logoBAT%" set merror50=Le composant logo.bat n'a pas t trouv.
99	if not exist "%nconvertEXE%" set merror60=Le composant nconvert.exe n'a pas t trouv.
100	if not exist "%questionsBAT%" set merror70=Le composant questions.bat n'a pas t trouv.
101	if not exist "%switchEXE%" set merror80=Le composant switch.exe n'a pas t trouv.
102	:: if not exist "%vlogoBAT%" set merror90=Le composant vlogo.bat n'a pas t trouv.
103
104	rem Appel du fichier Setup.txt (avant, je l'aurait converti en .bat)
105	copy "%setupTXT%" "%DIRtempo%\Setup.bat">nul
106	call "%DIRtempo%\Setup.bat"
107
108	rem Condition d'annulation de procédure
109	for /L %%d in (0,1,199) do if defined merror%%d goto :bleme
110
111	:P0
112	rem Condition de saut grâce à un paramètre transmis par un logiciel tiers (LrLoader).
113	if "%silentORNOT%" == "o" goto :L0
114	rem Condition de saut grâce à un paramètre transmis par question.bat Comme ce dernier est lancé APRES :P0
115	rem et que la boucle oublige à revenir plus haut, l'étape :P0 n'est plus utile pour ce cas.
116	if "%gfini%" == "1" goto :L0
117	set question=
118	color F1
119	call :header
120	if "%silentORNOT%" == "o" (
121	echo.
122	echo ATTENTION ^!^!^! ATTENTION ^!^!^! ATTENTION ^!^!^! ATTENTION ^!^!^! ATTENTION ^!^!^!
123	echo Le mode silencieux est activ ce qui veut dire que Batch_Optimisateur n'affichera
124	echo pas toutes les fentres. Vous gagnez ansi de en facilt.
125	echo.
126	echo.
127	echo Gardez l'esprit que Batch_Optimisateur prendra certaines dcisions à votre place.
128	echo Consulter le fichier Lisez-moi.rtf pour plus d'informations.
129	echo.
130	echo.
131	echo.
132	echo.
133	echo.
134	echo.
135	echo.
136	echo Appuyez sur une touche pour lancer Batch_Optimisateur en mode silencieux.
137	echo.
138	echo.
139	pause> nul
140	cls
141	goto :L0
142	) else (
143	echo.
144	echo.
145	echo.
146	echo Voulez vous diter le fichier "Setup.txt"
147	echo Dans le but de modifier vos paramtres par dfaut ? [o] - [n]
148	echo.
149	echo.
150	echo Validez en appuyant sur la touche "Entre"
151	echo.
152	set /p question=
153	)
154	if "%question%" == "o" goto :P1
155	if "%question%" == "n" goto :L0
156	cls
157	goto :P0
158
159	:P1
160	if "%silentORNOT%" == "o" goto :L1
161	rem action à exécuter lors de l'édition du fichier Setup.txt
162	call :header
163	echo Le fichier "%DIRinstall%Setup.txt" ...
164	echo ... viens de s'ouvrir avec le bloc-notes.
165	echo.
166	echo Une fois l'dition du fichier termine, veuillez fermer le bloc-notes
167	start /wait notepad.exe "%DIRinstall%Setup.txt"
168
169	:L0
170	rem Re-lecture
171	copy "%setupTXT%" "%DIRtempo%\Setup.bat">nul
172	call "%DIRtempo%\Setup.bat"
173
174	:L1
175	if "%debug%" == "2" (
176	cls
177	echo I'm here, after first panel...
178	echo.
179	echo Affichage des variable lues et prises en compte.
180	echo.
181	echo.
182	echo logoORNOT %logoORNOT%
183	echo DIRsource %DIRsource%
184	echo DIRsortie %DIRsortie%
185	echo copyORNOT %copyORNOT%
186	echo copyright %copyright%
187	echo DIRhightORNOT %DIRhightORNOT%
188	echo DIMhdORNOT %DIMhdORNOT%
189	echo paramdefORNOT %paramdefORNOT%
190	echo DIMhd %DIMhd%
191	echo DIMnormal %DIMnormal%
192	echo DIMthumbnail %DIMthumbnail%
193	echo Qhd %Qhd%
194	echo Qnormal %Qnormal%
195	echo Qthumbnail %Qthumbnail%
196	echo prefixe_mini %prefixe_mini%
197	echo renameORNOT %renameORNOT%
198	echo FreeWatchORNOT %FreeWatchORNOT%
199	echo DPIH %DPIH%
200	echo DPIV %DPIV%
201	echo openbehindORNOT %openbehindORNOT%
202	echo openafterORNOT %openbehindORNOT%
203	echo silentORNOT %silentORNOT%
204	echo.
205	echo module1 %module1%
206	echo module2 %module2%
207	echo module3 %module3%
208	echo module4 %module4%
209	echo module5 %module5%
210	echo module6 %module6%
211	echo module7 %module7%
212	echo module8 %module8%
213	echo module9 %module9%
214	echo module10 %module10%
215	echo module11 %module11%
216	echo module12 %module12%
217	echo module13 %module13%
218	echo module14 %module14%
219	echo module15 %module15%
220	echo module16 %module16%
221	echo module17 %module17%
222	echo module18 %module18%
223	echo module19 %module19%
224	echo module20 %module20%
225	pause
226	cls
227	)
228
229	:eta1
230	rem Correction arbitraire de deux répertoires pour eviter trop de complications...
231	if defined DIRsource (if not exist "%DIRsource%" set DIRsource=)
232	if defined DIRsortie (if not exist "%DIRsortie%" set DIRsortie=)
233
234
235	rem Vérifiaction et/ou rectification des données relatives à la qualité des images en sortie de traitement.
236	if not defined Qhd set Qhd=90
237	if /i %Qhd% GTR 100 set Qhd=
238	if not defined Qnormal set Qnormal=80
239	if /i %Qnormal% GTR 100 set Qnormal=
240	if not defined Qthumbnail set Qthumbnail=70
241	if /i %Qthumbnail% GTR 100 set Qthumbnail=
242
243	rem Vérification et/ou rectification des données relatives à la dimension des images en sortie de traitement.
244	if not defined DIMthumbnail set DIMthumbnail=
245	if not defined DIMnormal set DIMnormal=
246	if not defined DIMhd set DIMhd=
247
248	if /i %DIMhd% LEQ %DIMnormal% set merror101=La valeure de dimensions de DIMhd (ou DIMnoraml) est illogique.
249	if /i %DIMhd% LEQ %DIMthumbnail% set merror101=La valeure de dimensions de DIMhd (ou DIMnoraml) est illogique.
250
251	if /i %DIMnormal% LEQ %DIMthumbnail% set merror102=La valeure de dimensions de DIMnormal (ou DIMthumbnail) est illogique.
252	if /i %DIMnormal% GEQ %DIMhd% set merror102=La valeure de dimensions de DIMnormal (ou DIMthumbnail) est illogique.
253
254	if /i %DIMthumbnail% GEQ %DIMnormal% set merror103=La valeure de dimensions de DIMthumbnail (ou DIMnormal) est illogique.
255	if /i %DIMthumbnail% GEQ %DIMhd% set merror103=La valeure de dimensions de DIMthumbnail (ou DIMnormal) est illogique.
256
257	rem Vérification de la pertinence des informations saisies pour les variables "ORNOT"
258	if not defined logoORNOT set logoORNOT=o
259	if /i "%logoORnot%" NEQ "o" (
260	if /i "%logoORnot%" NEQ "n" (
261	set merror104= Dans le fichier "Setup.txt" la valeure donne logoORNOT est rone !
262	)
263	)
264	if defined copyORNOT (
265	if /i "%copyORNOT%" NEQ "o" (
266	if /i "%copyORNOT%" NEQ "n" (
267	set merror105= Dans le fichier "Setup.txt" la valeure donne copyORNOT est rone !
268	)
269	)
270	) else (
271	echo La variable copyORNOT est vide.
272	)
273	if defined DIRhightORNOT (
274	if /i "%DIRhightORNOT%" NEQ "o" (
275	if /i "%DIRhightORNOT%" NEQ "n" (
276	set merror106= Dans le fichier "Setup.txt" la valeure donne DIRhightORNOT est rone !
277	)
278	)
279	) else (
280	echo La variable DIRhightORNOT est vide.
281	)
282	if defined DIMhdORNOT (
283	if /i "%DIMhdORNOT%" NEQ "o" (
284	if /i "%DIMhdORNOT%" NEQ "n" (
285	set merror107= Dans le fichier "Setup.txt" la valeure donne DIMhdORNOT est rone !
286	)
287	)
288	) else (
289	echo La variable DIMhdORNOT est vide.
290	)
291	if defined paramdefORNOT (
292	if /i "%paramdefORNOT%" NEQ "o" (
293	if /i "%paramdefORNOT%" NEQ "n" (
294	set merror108= Dans le fichier "Setup.txt" la valeure donne paramdefORNOT est rone !
295	)
296	)
297	) else (
298	echo La variable paramdefORNOT est vide.
299	)
300	if defined renameORNOT (
301	if /i "%renameORNOT%" NEQ "o" (
302	if /i "%renameORNOT%" NEQ "n" (
303	set merror109= Dans le fichier "Setup.txt" la valeure donne renameORNOT est rone !
304	)
305	)
306	) else (
307	echo La variable renameORNOT est vide.
308	)
309	if defined FreeWatchORNOT (
310	if /i "%FreeWatchORNOT%" NEQ "o" (
311	if /i "%FreeWatchORNOT%" NEQ "n" (
312	set merror110= Dans le fichier "Setup.txt" la valeure donne FreeWatchORNOT est rone !
313	)
314	)
315	) else (
316	echo La variable FreeWatchORNOT est vide.
317	)
318	if defined DPIH set /a vDPI=%vDPI%+1
319	if defined DPIV set /a vDPI=%vDPI%+1
320	if "%vDPI%" NEQ "0" (
321	if "%vDPI%" == "2" (
322	set DPI=-dpi %DPIH%x%DPIV%
323	)
324	if not defined DPIH (set merror111= Dans le fichier "Setup.txt" une valeure donne aux DPI est rone !) else (if not defined DPIV (set merror111= Dans le fichier "Setup.txt" une valeure donne aux DPI est rone !))
325	)
326	if defined openbehindORNOT (
327	if /i "%openbehindORNOT%" NEQ "o" (
328	if /i "%openbehindORNOT%" NEQ "n" (
329	set merror112= Dans le fichier "Setup.txt" la valeure donne openbehindORNOT est rone !
330	)
331	)
332	) else (
333	echo La variable FreeWatchORNOT est vide.
334	)
335	if defined openafterORNOT (
336	if /i "%openafterORNOT%" NEQ "o" (
337	if /i "%openafterORNOT%" NEQ "n" (
338	set merror113= Dans le fichier "Setup.txt" la valeure donne openafterORNOT est rone !
339	)
340	)
341	) else (
342	echo La variable openafterORNOT est vide.
343	)
344	if defined silentORNOT (
345	if /i "%silentORNOT%" NEQ "o" (
346	if /i "%silentORNOT%" NEQ "n" (
347	set merror114= Dans le fichier "Setup.txt" la valeure donne silentORNOT est rone !
348	)
349	)
350	) else (
351	echo La variable silentORNOT est vide.
352	)
353
354	rem Autres vérifiactions
355	if not defined prefixe_mini set prefixe_mini=
356
357	rem Vérification la plus importante. Si cette condition n'est pas respéctée les autres messages d'erreurs ne safficheront même pas car le batch s'arrêtera avant. merro=0
358	rem Savoir sir le dossier de sortie est vide ou pas.
359	if defined DIRsortie (
360	for /f "delims=" %%a in ('dir "%DIRsortie%" /b') do (
361	if "%%a" NEQ "" (
362	set merror0=Le rpertoire de sortie n'est pas vide. Veuillez le vider avant.
363	)
364	)
365	)
366
367	rem Si le lancement de Batch_Optimisateur est silentieux (mode Silent) alors l'erreur n'apparait pas. Le répertoire sera vidé automatiquement.
368	if "%silentORNOT%" == "o" if defined merror0 set merror0=
369
370	rem Vérification que le répertoire source contienne bien des fichiers...
371	if not exist "%DIRsource%\." set merror9=Le rpertoire "source" ne contient aucune fichiers... Incorrect !
372
373	rem Renvoie à l'étiquette "bleme2" en cas d'erreur qui peux
374	for /L %%b in (0,1,8) do if defined merror%%b goto bleme2
375	rem Renvoie à l'étiquette "bleme" en cas d'erreur
376	for /L %%b in (9,1,199) do if defined merror%%b goto bleme
377
378	if "%debug%" == "2" (
379	echo i'm here :eta1
380	pause
381	cls
382	)
383
384	:eta2
385	rem Appel de question.bat
386	rem En fonction des réponse déjà programmées dans Steup.txt, question.bat n'affichera que le nécessaire.
387	cls
388	call "%questionsBAT%"
389	if "%gfini%" NEQ "1" goto :eta1
390
391	:eta3
392	if "%silentORNOT%" == "o" goto :eta5
393	if "%openbehindORNOT%" == "n" goto :eta4
394	rem Action à exécuter une fois le fichier Setup.txt édité
395	call :header
396	echo.
397	echo.
398	echo.
399	echo Ouverture des dossiers :
400	echo - "%DIRsource%"
401	echo - "%DIRsortie%"
402	echo.
403	explorer "%DIRsource%"
404	explorer "%DIRsortie%"
405	echo.
406	echo.
407	echo.
408	echo.
409	pause
410
411	if "%debug%" == "2" (
412	echo i'm here :eta3
413	pause
414	)
415
416	:eta4
417	if "%silentORNOT%" == "o" goto :eta5
418	cls
419	rem page de présentation
420	if "%logoORNOT%" == "n" goto :eta5
421	call "%vlogoBAT%"
422
423	if "%debug%" == "2" (
424	echo i'm here :eta4
425	pause
426	)
427
428	:eta5
429	if "%silentORNOT%" == "o" (
430	rmdir "%DIRsortie%" /s /q
431	ping -n 2 127.0.0.1 > NUL
432	mkdir "%DIRsortie%"
433	)
434
435	if "%debug%" == "2" (
436	echo i'm here :eta5
437	pause
438	)
439
440	:eta6
441	color 07
442	rem Lancement du chronographe
443	if "%FreeWatchORNOT%" == "o" (
444	start composants\FreeWatch.exe /start /label "Temps de traitement de Batch_Optimisateur"
445	)
446
447	if "%debug%" == "2" (
448	echo i'm here :eta6
449	pause
450	)
451
452	:eta7
453	rem Préparatifs
454
455	rem Formatage des arguments
456
457	:f0
458	rem Le texte
459
460	:f1
461	rem Definition de la taille du texte
462
463	:tailleN1
464	rem Images Normales
465	rem x < 800
466	rem 800 >= x < 1023
467	rem x >= 1024
468	rem commande01=taille 10 inf a 800
469	rem commande02=taille 16 compris entre 800 et 1023
470	rem commande03=taille 18 sup ou egal a 1024
471
472	if %DIMnormal% LSS 800 set tailleN1=10 & goto :tailleHD
473	if %DIMnormal% GEQ 800 if %DIMnormal% LSS 1023 set tailleN1=16 & goto :tailleHD
474	if %DIMnormal% GEQ 1024 set tailleN1=18 & goto :tailleHD
475
476	:tailleHD
477	rem Images HD
478	rem x < 1024
479	rem 1024 > x > 1279
480	rem x >= 1280
481	rem commande11=taille 16 inf a 1024
482	rem commande12=taille 18 compris entre 1024 et 1279
483	rem commande13=taille 20 sup ou egal a 1280
484
485	if %DIMhd% LSS 1024 set tailleHD=16 & goto :f2
486	if %DIMhd% GEQ 1024 if %DIMhd% LSS 1279 set tailleHD=18 & goto :f2
487	if %DIMhd% GEQ 1280 set tailleHD=20 & goto :f2
488
489	:f2
490	if "%prefixe_mini%" == " " set prefixe_mini=
491	if "%copyright%" == " " set texte=
492	if "%copyORNOT%" == "n" set texte=
493	if "%copyORNOT%" == "n" goto :f3
494	set texteN1=-text_font "MS Reference Sans Serif" %tailleN1% -text_color 0 0 0 -text_back 192 192 192 -text_flag bottom-left -text_pos 0 0 -text "%copyright%"
495	set texteHD=-text_font "MS Reference Sans Serif" %tailleHD% -text_color 0 0 0 -text_back 192 192 192 -text_flag bottom-left -text_pos 0 0 -text "%copyright%"
496
497	:f3
498	rem Le redimentionnement
499	set resize=-ratio -rtype lanczos -rflag decr
500	rem Incrustration d'un texte pour le copyright en bas à gauche, fond blanc, texte en noir, taille exprimée avec un facteur de x1,38 par rapport à la taille de base dans Xnview.
501	rem Exemple, pour une police de T13, on obtient en batch: 13*1,38=18. T18 donc...
502	rem Le symbole du © copyright, d'habitude obtenue avec la combinaison de touches [alt]0169 est en fait obtenue içi avec la combinaison de touches [alt]0184
503	rem Allez comprendre quelque chose...
504
505	:modulesA
506	cls
507	rem Lancement des modules qui agissent sur les photos dans le répertoire d'entrée (DIRsource).
508	rem Stop le chronographe si déjà lancé.
509	tasklist \| findstr /c:FreeWatch.exe
510	if "%ERRORLEVEL%" == "0" start composants\FreeWatch.exe /stop
511	cls
512	echo.
513	echo.
514	echo En attente des modules...
515	echo.
516
517	if defined module01 call %module01%
518	if defined module02 call %module02%
519	if defined module03 call %module03%
520	if defined module04 call %module04%
521	if defined module05 call %module05%
522	if defined module06 call %module06%
523	if defined module07 call %module07%
524	if defined module08 call %module08%
525	if defined module09 call %module09%
526	if defined module10 call %module10%
527
528	color 07
529
530	if "%debug%" == "2" (
531	echo i'm here :modulesA
532	pause
533	)
534
535	cls
536
537	:et100
538	rem Reprise du chronomètre si déjà ouvert.
539	tasklist \| findstr /c:FreeWatch.exe
540	if "%ERRORLEVEL%" == "0" start composants\FreeWatch.exe /start
541	rem Titre de la fenêtre
542	set etape= * Etape %x% sur %y% *
543	title %titre%%etape%
544	cls
545	rem Formatage des noms de dossiers + fichiers à l'aide du logiciel Renamer
546	if "%renameORNOT%" == "n" (
547	goto :et200
548	) else (
549	"%renamerEXE%" -b "%formaterARB%" -afr "%DIRsource%\." -aFr "%DIRsource%\." -g -x
550	)
551
552	if "%debug%" == "2" (
553	echo i'm here :et100
554	pause
555	)
556
557	:et200
558	rem Titre de la fenêtre
559	set /a x=%x%+1
560	set etape= * Etape %x% sur %y% *
561	title %titre%%etape%
562	cls
563	rem Je liste le contenu de %DIRsource% vers deux fichiers
564	echo %DIRsource%> "%sourceTXT%"
565	dir "%DIRsource%" /AD /B /S>> "%sourceTXT%"
566	echo %DIRsource%> "%sortieTXT%"
567	dir "%DIRsource%" /AD /B /S>> "%sortieTXT%"
568	rem Je transforme les occurences contenant le chemin de DIRsource pour les remplacer par celles du DIRsortie
569	echo "%switchEXE%" "%sortieTXT%" "%DIRsource%" "%DIRsortie%"> "%DIRtempo%\tmp.bat"
570	call "%DIRtempo%\tmp.bat"
571	rem Création des deux sous répertoires
572	rem Boucle pour tous les sous rep
573	if "%DIRhightORNOT%" == "o" (
574	for /f %%a in ('type "%sortieTXT%"') do mkdir "%%a\pwg_high\"
575	)
576	for /f %%a in ('type "%sortieTXT%"') do mkdir %%a\thumbnail\
577	rem Création d'un fichier ne contenant QUE les sous repertoires !!!
578	dir "%DIRsource%" /AD /B /S> "%sousrepTXT%"
579	"%switchEXE%" "%sousrepTXT%" "%DIRsource%" ""
580
581	if "%debug%"=="2" (
582	echo i'm here :et200
583	rem echo %sortieTXT%
584	rem echo %DIRsource%
585	rem echo %DIRsortie%
586	pause
587	)
588
589	del "%DIRtempo%\tmp.bat" /s /q
590
591	:et300
592	rem Titre de la fenêtre
593	set /a x=%x%+1
594	set etape= * Etape %x% sur %y% *
595	title %titre%%etape%
596	cls
597	rem Edition des images en haute qualité
598	rem Le script est modifiable facilement avec XnView.
599	rem répertoire d'entrée: %DIRsource%\%%a\ Fichiers concernés: *.jpg
600	rem répertoire de sortie: %DIRsortie%\%%a\pwg_high\ Fichiers concernés %%.jpg
601	rem Redimensionnement avec le plus grand coté limité à %dimhd% pixels
602	if "%DIRhightORNOT%" == "o" (
603	if "%DIMhdORNOT%" == "o" (
604	"%nconvertEXE%" -q %Qhd% -out jpeg -o "%DIRsortie%\pwg_high\%%.jpg" %resize% -resize %DIMhd% %DIMhd% "%DIRsource%\*.jpg"
605	) else (
606	xcopy "%DIRsource%\*.jpg" "%DIRsortie%\pwg_high\" /f /y> nul
607	)
608	)
609
610	if "%DIRhightORNOT%" == "o" (
611	if "%DIMhdORNOT%" == "o" (
612	for /f %%a in ('type "%sousrepTXT%"') do "%nconvertEXE%" -q %Qhd% %DPI% -out jpeg -o "%DIRsortie%\%%a\pwg_high\%%.jpg" %resize% -resize %DIMhd% %DIMhd% "%DIRsource%\%%a\*.jpg"
613	) else (
614	for /f %%a in ('type "%sousrepTXT%"') do xcopy "%DIRsource%\%%a\*.jpg" "%DIRsortie%\%%a\pwg_high\" /f /y> nul
615	)
616	)
617
618	if "%debug%" == "2" (
619	echo i'm here :et300
620	pause
621	)
622
623	:et400
624	rem Titre de la fenêtre
625	set /a x=%x%+1
626	set etape= * Etape %x% sur %y% *
627	title %titre%%etape%
628	cls
629	rem Edition des images en moyenne qualité
630	if "%DIRhightORNOT%" == "o" (
631	"%nconvertEXE%" -q %Qnormal% %DPI% -out jpeg -o "%DIRsortie%\%%.jpg" %resize% -resize %DIMnormal% %DIMnormal% "%DIRsortie%\pwg_high\*.jpg"
632	) else (
633	"%nconvertEXE%" -q %Qnormal% %DPI% -out jpeg -o "%DIRsortie%\%%.jpg" %resize% -resize %DIMnormal% %DIMnormal% "%DIRsource%\*.jpg"
634	)
635
636	if "%DIRhightORNOT%" == "o" (
637	for /f %%a in ('type "%sousrepTXT%"') do "%nconvertEXE%" -q %Qnormal% %DPI% -out jpeg -o "%DIRsortie%\%%a\%%.jpg" %resize% -resize %DIMnormal% %DIMnormal% "%DIRsortie%\%%a\pwg_high\*.jpg"
638	) else (
639	for /f %%a in ('type "%sousrepTXT%"') do "%nconvertEXE%" -q %Qnormal% %DPI% -out jpeg -o "%DIRsortie%\%%a\%%.jpg" %resize% -resize %DIMnormal% %DIMnormal% "%DIRsource%\%%a\*.jpg"
640	)
641
642	if "%debug%" == "2" (
643	echo i'm here :et400
644	pause
645	)
646
647	:et500
648	rem Titre de la fenêtre
649	set /a x=%x%+1
650	set etape= * Etape %x% sur %y% *
651	title %titre%%etape%
652	cls
653	rem Création des vignettes, toujours sur le même principe qu'à l'étape 1 et 2
654	rem Il n'y pas de d'ajout de la mention en filigranne.
655	rem Supression des meta-données
656	if "%DIRhightORNOT%" == "o" (
657	"%nconvertEXE%" -rmeta -rexifthumb -out jpeg -o "%DIRsortie%\thumbnail\%prefixe_mini%%%.jpg" %resize% -resize %DIMthumbnail% %DIMthumbnail% "%DIRsortie%\pwg_high\*.jpg"
658	) else (
659	"%nconvertEXE%" -rmeta -rexifthumb -out jpeg -o "%DIRsortie%\thumbnail\%prefixe_mini%%%.jpg" %resize% -resize %DIMthumbnail% %DIMthumbnail% "%DIRsortie%\*.jpg"
660	)
661
662	if "%DIRhightORNOT%" == "o" (
663	for /f %%a in ('type "%sousrepTXT%"') do (
664	"%nconvertEXE%" -rmeta -rexifthumb -out jpeg -o "%DIRsortie%\%%a\thumbnail\%prefixe_mini%%%.jpg" %resize% -resize %DIMthumbnail% %DIMthumbnail% "%DIRsortie%\%%a\pwg_high\*.jpg"
665	)
666	) else (
667	for /f %%a in ('type "%sousrepTXT%"') do (
668	"%nconvertEXE%" -rmeta -rexifthumb -out jpeg -o "%DIRsortie%\%%a\thumbnail\%prefixe_mini%%%.jpg" %resize% -resize %DIMthumbnail% %DIMthumbnail% "%DIRsortie%\%%a\*.jpg"
669	)
670	)
671
672	if "%debug%" == "2" (
673	echo i'm here :et500
674	pause
675	)
676
677	:et600
678	rem Titre de la fenêtre
679	set /a x=%x%+1
680	set etape= * Etape %x% sur %y% *
681	title %titre%%etape%
682	cls
683	rem Adjonction du texte (filigranne) (copyright)
684	if "%copyORNOT%" == "n" goto et700
685	if "%DIRhightORNOT%" == "o" (
686	if "%DIMhdORNOT%" == "o" (
687	"%nconvertEXE%" "%texteHD%" "%DIRsortie%\pwg_high\*.jpg"
688	)
689	)
690
691	if "%DIRhightORNOT%" == "o" (
692	if "%DIMhdORNOT%" == "o" (
693	for /f %%a in ('type "%sousrepTXT%"') do "%nconvertEXE%" "%texteHD%" "%DIRsortie%\%%a\pwg_high\*.jpg"
694	)
695	)
696
697	"%nconvertEXE%" "%texteN1%" "%DIRsortie%\*.jpg"
698	for /f %%a in ('type "%sousrepTXT%"') do "%nconvertEXE%" "%texteN1%" "%DIRsortie%\%%a\*.jpg"
699
700	if "%debug%" == "2" (
701	echo i'm here :et600
702	pause
703	)
704
705	:et700
706	rem Titre de la fenêtre
707	set /a x=%x%+1
708	set etape= * Etape %x% sur %y% *
709	title %titre%%etape%
710	cls
711	rem Suppression des dossiers vides
712	dir "%DIRsortie%" /AD /B /S> "%sortieTXT%"
713	sort /r "%sortieTXT%"> "%supTXT%"
714	for /f %%a in ('type "%supTXT%"') do if not exist "%%a\." rmdir "%%a"
715	rem Copie du fichier %indexPHP% vers les dossiers spécifiés
716	dir "%DIRsortie%" /AD /B /S> "%sortieNEWTXT%"
717	xcopy "%indexPHP%" "%DIRsortie%\" /f /y> nul
718	for /f %%a in ('type "%sortieNEWTXT%"') do xcopy "%indexPHP%" "%%a\" /f /y> nul
719
720	if "%debug%" == "2" (
721	echo i'm here :et700
722	pause
723	)
724
725	:modulesB
726	cls
727	rem Lancement des modules qui agissent sur les photos dans le répertoire de sortie (DIRsortie).
728	rem Stop le chronographe si déjà lancé.
729	tasklist \| findstr /c:FreeWatch.exe
730	if "%ERRORLEVEL%" == "0" start composants\FreeWatch.exe /stop
731	cls
732	echo.
733	echo.
734	echo En attente des modules...
735	echo.
736
737	if defined module11 call %module11%
738	if defined module12 call %module12%
739	if defined module13 call %module13%
740	if defined module14 call %module14%
741	if defined module15 call %module15%
742	if defined module16 call %module16%
743	if defined module17 call %module17%
744	if defined module18 call %module18%
745	if defined module19 call %module19%
746
747	color 07
748
749	if "%debug%" == "2" (
750	echo i'm here :modulesB
751	pause
752	)
753
754	cls
755
756	:et800
757	rem Stop le chronographe si déjà lancé.
758	taskList \| findstr /c:FreeWatch.exe
759	if "%ERRORLEVEL%" == "0" start composants\FreeWatch.exe /stop
760	goto :sortie
761
762	if "%debug%" == "2" (
763	echo i'm here :et800
764	pause
765	)
766
767	:sortie
768	rem Fin du script
769	cls
770	rem Ouverture consitionnelle du dossier de sortie
771	if "%openafterORNOT%" == "o" explorer "%DIRsortie%"
772	color 70
773	if "%logoORNOT%" == "o" call "%logoBAT%"
774	exit
775
776	:bleme
777	rundll32 user32.dll,MessageBeep
778	rem Erreurs
779	set nnn=nnn
780	for /L %%d in (0,1,199) do if defined merror%%d set cerror1=1
781	for /L %%e in (200,1,299) do if defined merror%%e set cerror5=1
782
783	color C0
784	cls
785	echo /----------------------------------------------------------------------------\
786	echo I I
787	echo I I
788	echo I * ATTENTION * I
789	echo I I
790	echo I I
791	echo \----------------------------------------------------------------------------/
792	echo.
793	echo !!! INTERUPSION DU PROCESSUS !!!
794	echo.
795	echo Aucune modifiaction n'a t ffectue
796	echo.
797	echo.
798	if defined merror0 echo %merror0% & echo.
799	if defined cerror1 echo Liste des eurreurs fatales: & echo.
800	for /L %%d in (0,1,199) do if defined merror%%d (echo nnn %%merror%%d%% zz nnn.)>"%DIRtempo%\blemeA.bat"
801	if exist "%DIRtempo%\blemeA.bat" (
802	"%switchEXE%" "%DIRtempo%\blemeA.bat" "nnn" "echo"
803	"%switchEXE%" "%DIRtempo%\blemeA.bat" "zz" "&"
804	call "%DIRtempo%\blemeA.bat"
805	if "%debug%" == "0" del "%DIRtempo%\blemeA.bat"> nul
806	)
807	if defined cerror5 (
808	echo Liste des erreurs trouves dans le fichier "Setup.txt".
809	echo.
810	echo Merci de les corriger.
811	echo.
812	echo.
813	echo.
814	echo.
815	echo.
816	)
817	for /L %%d in (199,1,299) do if defined merror%%d (echo nnn %%merror%%d%% zz nnn.)>"%DIRtempo%\blemeB.bat"
818	if exist "%DIRtempo%\blemeB.bat" (
819	"%switchEXE%" "%DIRtempo%\blemeB.bat" "nnn" "echo"
820	"%switchEXE%" "%DIRtempo%\blemeB.bat" "zz" "&"
821	call "%DIRtempo%\blemeB.bat"
822	if "%debug%" == "0" del "%DIRtempo%\blemeB.bat"> nul
823	)
824	echo.
825	if defined cerror1 (
826	echo *******************************************
827	echo * Veuillez rinstaller l'application. *
828	echo *******************************************
829	)
830	echo.
831	echo.
832	echo.
833	echo.
834	echo !!! FIN DU PROCESSUS !!!
835	echo.
836	echo.
837	echo.
838	echo.
839	echo.
840	echo.
841	echo.
842	pause
843
844	rem Suppresion des fichiers temporaires
845	if "%debug%" NEQ "0" (
846	if exist "%DIRtempo%" del "%DIRtempo%" /s /q >nul
847	if not exist "%DIRtempo%" mkdir "%DIRtempo%" >nul
848	)
849	exit
850
851	:bleme2
852	rem Erreurs non bloquante. Le script sera relancé.
853	cls
854	rundll32 user32.dll,MessageBeep
855	color C0
856	cls
857	echo /----------------------------------------------------------------------------\
858	echo I I
859	echo I I
860	echo I * ATTENTION * I
861	echo I I
862	echo I I
863	echo \----------------------------------------------------------------------------/
864	echo.
865	echo !!! INTERUPSION DU PROCESSUS !!!
866	echo.
867	echo Aucune modifiaction n'a t ffectue
868	echo.
869	echo.
870	if defined merror0 echo %merror0% & echo.
871	if defined merror0 start explorer %DIRsortie%
872	echo.
873	echo.
874	echo.
875	echo.
876	echo.
877	echo.
878	echo.
879	echo.
880	ping -n 3 127.0.0.1 > NUL
881	echo Le rpertoire de sortie viens de souvrir. A vous de le vider...
882	echo.
883	echo.
884	echo.
885	echo.
886	echo.
887	echo.
888	echo.
889	echo.
890	echo.
891	echo.
892	echo.
893	echo Appuez sur une touche pour relancer Batch_Optimisateur.
894	echo.
895	echo.
896	echo.
897	echo.
898	echo.
899	echo.
900	pause> nul
901	set merror0=
902	color F1
903	goto :P0
904
905	:header
906	cls
907	echo.
908	echo %title%
909	echo /***************************************\ /******************************\
910	echo * IH ID HHHHHHHHHHHHHHHHHHHHHHHHHHH*
911	echo * BATCH OPTIMISATEUR IHHffffffffHHHiiHHHHxxHHHHHHxxHHH*
912	echo * pour Piwigo (PWG) IHHffffffffHHHiiHHHHxxHHHHHHxxHHH*
913	echo * www.piwigo.org IHHffHHHHHHHHHiiHHHHHxxHHHHxxHHHH*
914	echo * IHHfffffHHHHHHiiHHHHHHxxHHxxHHHHH*
915	echo ------------------------------------------HHfffffHHHHHHiiHHHHHHHHxxHHHHHHH
916	echo * IHHffHHHHHHHHHiiHHHHHHxxHHxxHHHHH*
917	echo * Script ralis par MOREAU Julien IHHffHHHHHHHHHiiHHHHHxxHHHHxxHHHH*
918	echo * quelleheureestilsvp@yahoo.fr IHHffHHHHHHHHHiiHHHHxxHHHHHHxxHHH*
919	echo * IHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHH*
920	echo \***************************************/ \******************************/
921	echo.
922	echo.
923	if "%debug%" NEQ "0" (
924	echo /****************************************************************************\
925	echo * *
926	echo * MODE DEBUGAGE ACTIF *
927	echo * *
928	echo \****************************************************************************/
929	echo.
930	) else (
931	echo.
932	echo.
933	echo.
934	)
935	goto :eof

Note: See TracBrowser for help on using the repository browser.

Context Navigation

source: extensions/Batch_Optimisateur/Script.bat @ 16104

Download in other formats: