]>
git.proxmox.com Git - pve-firmware.git/blob - assemble-firmware.pl
9 my $fwsrc2 = "dvb-firmware.git";
10 my $fwsrc3 = "firmware-misc";
13 die "no firmware list specified" if !$fwlist || ! -f
$fwlist;
16 die "no target directory" if !$target || ! -d
$target;
22 my $ALLOW_MISSING = {};
23 # debian squeeze also misses those files
34 amdgpu/aldebaran_cap.bin
35 amdgpu/cyan_skillfish_ce.bin
36 amdgpu/cyan_skillfish_me.bin
37 amdgpu/cyan_skillfish_mec.bin
38 amdgpu/cyan_skillfish_mec2.bin
39 amdgpu/cyan_skillfish_pfp.bin
40 amdgpu/cyan_skillfish_rlc.bin
41 amdgpu/cyan_skillfish_sdma.bin
42 amdgpu/cyan_skillfish_sdma1.bin
43 amdgpu/gc_11_0_0_toc.bin
44 amdgpu/gc_11_0_3_mes.bin
45 amdgpu/gc_9_4_3_mec.bin
46 amdgpu/gc_9_4_3_rlc.bin
47 amdgpu/ip_discovery.bin
50 amdgpu/psp_13_0_6_sos.bin
51 amdgpu/psp_13_0_6_ta.bin
53 amdgpu/sienna_cichlid_cap.bin
54 amdgpu/sienna_cichlid_mes.bin
55 amdgpu/sienna_cichlid_mes1.bin
56 amdgpu/vangogh_gpu_info.bin
59 amdgpu/yellow_carp_gpu_info.bin
62 ath10k/QCA6174/hw2.1/firmware-4.bin
63 ath10k/QCA6174/hw3.0/firmware-5.bin
64 ath10k/QCA9887/hw1.0/board-2.bin
65 ath10k/QCA988X/hw2.0/board-2.bin
66 ath10k/QCA988X/hw2.0/firmware-2.bin
67 ath10k/QCA988X/hw2.0/firmware-3.bin
68 ath10k/QCA988X/hw2.0/firmware.bin
69 ath6k/AR6003/hw2.0/bdata.bin
70 ath6k/AR6003/hw2.1.1/bdata.bin
71 ath6k/AR6004/hw1.0/bdata.DB132.bin
72 ath6k/AR6004/hw1.0/bdata.bin
73 ath6k/AR6004/hw1.0/fw.ram.bin
74 ath6k/AR6004/hw1.1/bdata.DB132.bin
75 ath6k/AR6004/hw1.1/bdata.bin
76 ath6k/AR6004/hw1.1/fw.ram.bin
77 ath6k/AR6004/hw1.2/fw.ram.bin
78 ath6k/AR6004/hw1.3/fw.ram.bin
106 brcm/brcmfmac*-pcie.*.clm_blob
107 brcm/brcmfmac*-pcie.*.txcap_blob
108 brcm/brcmfmac*-pcie.txt
109 brcm/brcmfmac*-sdio.*.bin
110 brcm/brcmfmac-sdio.bin
111 brcm/brcmfmac-sdio.txt
112 brcm/brcmfmac43143-sdio.txt
113 brcm/brcmfmac43241b0-sdio.txt
114 brcm/brcmfmac43241b4-sdio.txt
115 brcm/brcmfmac43241b5-sdio.txt
116 brcm/brcmfmac4329-sdio.txt
117 brcm/brcmfmac4330-sdio.txt
118 brcm/brcmfmac4334-sdio.txt
119 brcm/brcmfmac43340-sdio.txt
120 brcm/brcmfmac4335-sdio.txt
121 brcm/brcmfmac43362-sdio.txt
122 brcm/brcmfmac4339-sdio.txt
123 brcm/brcmfmac43430-sdio.txt
124 brcm/brcmfmac43430b0-sdio.bin
125 brcm/brcmfmac43439-sdio.bin
126 brcm/brcmfmac43439-sdio.clm_blob
127 brcm/brcmfmac43455-sdio.txt
128 brcm/brcmfmac43456-sdio.bin
129 brcm/brcmfmac4350-pcie.txt
130 brcm/brcmfmac4354-pcie.bin
131 brcm/brcmfmac4354-pcie.txt
132 brcm/brcmfmac4354-sdio.txt
133 brcm/brcmfmac4355-pcie.bin
134 brcm/brcmfmac4355-pcie.clm_blob
135 brcm/brcmfmac4355c1-pcie.bin
136 brcm/brcmfmac4355c1-pcie.clm_blob
137 brcm/brcmfmac4356-pcie.txt
138 brcm/brcmfmac43570-pcie.txt
139 brcm/brcmfmac4358-pcie.txt
140 brcm/brcmfmac4359-pcie.bin
141 brcm/brcmfmac4359-sdio.bin
142 brcm/brcmfmac4359c-pcie.bin
143 brcm/brcmfmac43602-pcie.txt
144 brcm/brcmfmac4364-pcie.bin
145 brcm/brcmfmac4364b2-pcie.bin
146 brcm/brcmfmac4364b2-pcie.clm_blob
147 brcm/brcmfmac4364b3-pcie.bin
148 brcm/brcmfmac4364b3-pcie.clm_blob
149 brcm/brcmfmac4365b-pcie.bin
150 brcm/brcmfmac4365b-pcie.txt
151 brcm/brcmfmac4365c-pcie.bin
152 brcm/brcmfmac4366b-pcie.txt
153 brcm/brcmfmac4371-pcie.txt
154 brcm/brcmfmac43752-sdio.bin
155 brcm/brcmfmac43752-sdio.clm_blob
156 brcm/brcmfmac4377b3-pcie.bin
157 brcm/brcmfmac4377b3-pcie.clm_blob
158 brcm/brcmfmac4378b1-pcie.bin
159 brcm/brcmfmac4378b1-pcie.clm_blob
160 brcm/brcmfmac4378b3-pcie.bin
161 brcm/brcmfmac4378b3-pcie.clm_blob
162 brcm/brcmfmac4387c2-pcie.bin
163 brcm/brcmfmac4387c2-pcie.clm_blob
164 brcm/brcmfmac89459-pcie.bin
175 cxgb4/t4fw-1.3.10.0.bin
177 daqboard2000_firmware.bin
178 dvb_driver_si2141_rom60.fw
179 dvb_driver_si2141_rom61.fw
180 dvb_driver_si2146_rom11.fw
181 dvb_driver_si2147_rom50.fw
182 dvb_driver_si2148_rom32.fw
183 dvb_driver_si2148_rom33.fw
184 dvb_driver_si2157_rom50.fw
185 dvb_driver_si2158_rom51.fw
186 dvb_driver_si2177_rom50.fw
187 dvb_driver_si2178_rom50.fw
190 i1480-pre-phy-0.0.bin
192 i2400m-fw-sdio-1.3.sbcf
193 i2400m-fw-usb-1.5.sbcf
194 i6050-fw-usb-1.5.sbcf
196 inside-secure/eip197b/ifpp.bin
197 inside-secure/eip197b/ipue.bin
198 inside-secure/eip197d/ifpp.bin
199 inside-secure/eip197d/ipue.bin
212 iwlwifi-3165-10.ucode
213 iwlwifi-3168-26.ucode
215 iwlwifi-6000g2b-IWL6000G2B_UCODE_API_MAX.ucode
216 iwlwifi-7265D-26.ucode
217 iwlwifi-8000-10.ucode
218 iwlwifi-8000-12.ucode
219 iwlwifi-8000-13.ucode
221 iwlwifi-8000C-26.ucode
222 iwlwifi-8000C-33.ucode
223 iwlwifi-8265-26.ucode
224 iwlwifi-8265-33.ucode
225 iwlwifi-9000-pu-a0-jf-a0--26.ucode
226 iwlwifi-9000-pu-a0-jf-a0--33.ucode
227 iwlwifi-9000-pu-a0-jf-a0-34.ucode
228 iwlwifi-9000-pu-a0-jf-a0-43.ucode
229 iwlwifi-9000-pu-a0-jf-b0--33.ucode
230 iwlwifi-9000-pu-a0-jf-b0-34.ucode
231 iwlwifi-9000-pu-a0-jf-b0-43.ucode
232 iwlwifi-9000-pu-a0-lc-a0--26.ucode
233 iwlwifi-9260-th-a0-jf-a0--26.ucode
234 iwlwifi-9260-th-a0-jf-a0--33.ucode
235 iwlwifi-9260-th-a0-jf-a0-34.ucode
236 iwlwifi-9260-th-a0-jf-a0-43.ucode
237 iwlwifi-9260-th-b0-jf-b0--33.ucode
238 iwlwifi-BzBnj-a0-fm-a0-72.ucode
239 iwlwifi-BzBnj-a0-fm4-a0-72.ucode
240 iwlwifi-BzBnj-a0-gf-a0-72.ucode
241 iwlwifi-BzBnj-a0-gf4-a0-72.ucode
242 iwlwifi-BzBnj-a0-hr-b0-72.ucode
243 iwlwifi-BzBnj-b0-fm-b0-72.ucode
244 iwlwifi-Qu-a0-hr-a0--33.ucode
245 iwlwifi-Qu-a0-hr-a0-34.ucode
246 iwlwifi-Qu-a0-hr-a0-43.ucode
247 iwlwifi-Qu-a0-hr-a0-48.ucode
248 iwlwifi-Qu-a0-hr-a0-50.ucode
249 iwlwifi-Qu-a0-jf-b0--26.ucode
250 iwlwifi-Qu-a0-jf-b0--33.ucode
251 iwlwifi-Qu-a0-jf-b0-34.ucode
252 iwlwifi-Qu-a0-jf-b0-43.ucode
253 iwlwifi-Qu-a0-jf-b0-48.ucode
254 iwlwifi-Qu-a0-jf-b0-50.ucode
255 iwlwifi-Qu-b0-hr-b0-43.ucode
256 iwlwifi-Qu-b0-jf-b0-43.ucode
257 iwlwifi-QuQnj-a0-hr-a0-34.ucode
258 iwlwifi-QuQnj-a0-hr-a0-43.ucode
259 iwlwifi-QuQnj-a0-hr-a0-48.ucode
260 iwlwifi-QuQnj-a0-hr-a0-50.ucode
261 iwlwifi-QuQnj-a0-jf-b0-34.ucode
262 iwlwifi-QuQnj-a0-jf-b0-43.ucode
263 iwlwifi-QuQnj-b0-hr-b0-43.ucode
264 iwlwifi-QuQnj-b0-hr-b0-48.ucode
265 iwlwifi-QuQnj-b0-hr-b0-50.ucode
266 iwlwifi-QuQnj-b0-hr-b0-59.ucode
267 iwlwifi-QuQnj-b0-hr-b0-63.ucode
268 iwlwifi-QuQnj-b0-hr-b0-66.ucode
269 iwlwifi-QuQnj-b0-hr-b0-72.ucode
270 iwlwifi-QuQnj-b0-jf-b0-48.ucode
271 iwlwifi-QuQnj-b0-jf-b0-50.ucode
272 iwlwifi-QuQnj-b0-jf-b0-59.ucode
273 iwlwifi-QuQnj-b0-jf-b0-63.ucode
274 iwlwifi-QuQnj-b0-jf-b0-66.ucode
275 iwlwifi-QuQnj-b0-jf-b0-72.ucode
276 iwlwifi-QuQnj-f0-hr-a0-34.ucode
277 iwlwifi-QuQnj-f0-hr-a0-43.ucode
278 iwlwifi-QuQnj-f0-hr-a0-48.ucode
279 iwlwifi-QuQnj-f0-hr-a0-50.ucode
280 iwlwifi-SoSnj-a0-gf-a0-59.ucode
281 iwlwifi-SoSnj-a0-gf-a0-63.ucode
282 iwlwifi-SoSnj-a0-gf-a0-66.ucode
283 iwlwifi-SoSnj-a0-gf-a0-72.ucode
284 iwlwifi-SoSnj-a0-gf4-a0-59.ucode
285 iwlwifi-SoSnj-a0-gf4-a0-63.ucode
286 iwlwifi-SoSnj-a0-gf4-a0-66.ucode
287 iwlwifi-SoSnj-a0-gf4-a0-72.ucode
288 iwlwifi-SoSnj-a0-hr-b0-59.ucode
289 iwlwifi-SoSnj-a0-hr-b0-63.ucode
290 iwlwifi-SoSnj-a0-hr-b0-66.ucode
291 iwlwifi-SoSnj-a0-hr-b0-72.ucode
292 iwlwifi-SoSnj-a0-jf-b0-63.ucode
293 iwlwifi-SoSnj-a0-jf-b0-66.ucode
294 iwlwifi-SoSnj-a0-jf-b0-72.ucode
295 iwlwifi-SoSnj-a0-mr-a0-59.ucode
296 iwlwifi-SoSnj-a0-mr-a0-63.ucode
297 iwlwifi-SoSnj-a0-mr-a0-66.ucode
298 iwlwifi-SoSnj-a0-mr-a0-72.ucode
299 iwlwifi-bz-a0-fm-a0-72.ucode
300 iwlwifi-bz-a0-fm-b0-83.ucode
301 iwlwifi-bz-a0-fm-c0-83.ucode
302 iwlwifi-bz-a0-fm4-a0-72.ucode
303 iwlwifi-bz-a0-fm4-b0-83.ucode
304 iwlwifi-bz-a0-gf-a0-63.ucode
305 iwlwifi-bz-a0-gf-a0-66.ucode
306 iwlwifi-bz-a0-gf-a0-72.ucode
307 iwlwifi-bz-a0-gf-a0-83.ucode
308 iwlwifi-bz-a0-gf4-a0-63.ucode
309 iwlwifi-bz-a0-gf4-a0-66.ucode
310 iwlwifi-bz-a0-gf4-a0-72.ucode
311 iwlwifi-bz-a0-gf4-a0-83.ucode
312 iwlwifi-bz-a0-hr-b0-63.ucode
313 iwlwifi-bz-a0-hr-b0-66.ucode
314 iwlwifi-bz-a0-hr-b0-72.ucode
315 iwlwifi-bz-a0-hr-b0-83.ucode
316 iwlwifi-bz-a0-mr-a0-63.ucode
317 iwlwifi-bz-a0-mr-a0-66.ucode
318 iwlwifi-bz-a0-mr-a0-72.ucode
319 iwlwifi-gl-a0-fm-a0-72.ucode
320 iwlwifi-gl-b0-fm-b0-72.ucode
321 iwlwifi-gl-b0-fm-b0-83.ucode
322 iwlwifi-ma-a0-fm-a0-66.ucode
323 iwlwifi-ma-a0-fm-a0-72.ucode
324 iwlwifi-ma-a0-gf-a0-59.ucode
325 iwlwifi-ma-a0-gf-a0-63.ucode
326 iwlwifi-ma-a0-gf-a0-66.ucode
327 iwlwifi-ma-a0-gf-a0-72.ucode
328 iwlwifi-ma-a0-gf-a0-83.ucode
329 iwlwifi-ma-a0-gf4-a0-63.ucode
330 iwlwifi-ma-a0-gf4-a0-66.ucode
331 iwlwifi-ma-a0-gf4-a0-72.ucode
332 iwlwifi-ma-a0-gf4-a0-83.ucode
333 iwlwifi-ma-a0-hr-b0-63.ucode
334 iwlwifi-ma-a0-hr-b0-66.ucode
335 iwlwifi-ma-a0-hr-b0-72.ucode
336 iwlwifi-ma-a0-hr-b0-83.ucode
337 iwlwifi-ma-a0-mr-a0-59.ucode
338 iwlwifi-ma-a0-mr-a0-63.ucode
339 iwlwifi-ma-a0-mr-a0-66.ucode
340 iwlwifi-ma-a0-mr-a0-72.ucode
341 iwlwifi-ma-a0-mr-a0-83.ucode
342 iwlwifi-ma-b0-mr-a0-83.ucode
343 iwlwifi-sc-a0-fm-b0-83.ucode
344 iwlwifi-sc-a0-fm-c0-83.ucode
345 iwlwifi-sc-a0-gf-a0-83.ucode
346 iwlwifi-sc-a0-gf4-a0-83.ucode
347 iwlwifi-sc-a0-hr-b0-83.ucode
348 iwlwifi-sc-a0-wh-a0-83.ucode
349 iwlwifi-so-a0-gf-a0-48.ucode
350 iwlwifi-so-a0-gf-a0-50.ucode
351 iwlwifi-so-a0-gf-a0-59.ucode
352 iwlwifi-so-a0-gf-a0-63.ucode
353 iwlwifi-so-a0-gf-a0-66.ucode
354 iwlwifi-so-a0-hr-b0-48.ucode
355 iwlwifi-so-a0-hr-b0-50.ucode
356 iwlwifi-so-a0-hr-b0-59.ucode
357 iwlwifi-so-a0-hr-b0-63.ucode
358 iwlwifi-so-a0-hr-b0-66.ucode
359 iwlwifi-so-a0-jf-b0-48.ucode
360 iwlwifi-so-a0-jf-b0-50.ucode
361 iwlwifi-so-a0-jf-b0-59.ucode
362 iwlwifi-so-a0-jf-b0-63.ucode
363 iwlwifi-so-a0-jf-b0-66.ucode
364 iwlwifi-so-a0-jf-b0-83.ucode
365 iwlwifi-su-z0-43.ucode
366 iwlwifi-ty-a0-gf-a0-48.ucode
367 iwlwifi-ty-a0-gf-a0-50.ucode
368 iwmc3200wifi-calib-sdio.bin
369 iwmc3200wifi-lmac-sdio.bin
370 iwmc3200wifi-umac-sdio.bin
372 lantiq/xrx200_phy11g_a14.bin
373 lantiq/xrx200_phy11g_a22.bin
374 lantiq/xrx200_phy22f_a14.bin
375 lantiq/xrx200_phy22f_a22.bin
376 lantiq/xrx300_phy11g_a21.bin
377 lantiq/xrx300_phy22f_a21.bin
380 libertas/gspi8385.bin
381 libertas/gspi8385_helper.bin
382 libertas/gspi8385_hlp.bin
385 libertas_cs_helper.fw
386 liquidio/lio_210nv.bin
387 liquidio/lio_210sv.bin
388 liquidio/lio_23xx.bin
389 liquidio/lio_410nv.bin
392 mediatek/mt7996/mt7996_rom_patch.bin
393 mediatek/mt7996/mt7996_wa.bin
394 mediatek/mt7996/mt7996_wm.bin
396 mrvl/pcie8766_uapsta.bin
397 mrvl/pcie8997_uapsta.bin
398 mrvl/sd8786_uapsta.bin
399 mrvl/sd8977_uapsta.bin
400 mrvl/sd8987_uapsta.bin
401 mrvl/sd8997_uapsta.bin
402 mrvl/sdiouart8997_combo_v4.bin
403 mrvl/sdiouartiw416_combo_v0.bin
404 mrvl/usb8997_uapsta.bin
409 mwl8k/fmimage_8363.fw
432 rtl_bt/rtl8723b_config.bin
433 rtl_bt/rtl8723bs_config.bin
434 rtl_bt/rtl8723cs_cg_config.bin
435 rtl_bt/rtl8723cs_cg_fw.bin
436 rtl_bt/rtl8723cs_vf_config.bin
437 rtl_bt/rtl8723cs_vf_fw.bin
438 rtl_bt/rtl8723cs_xx_config.bin
439 rtl_bt/rtl8723cs_xx_fw.bin
440 rtl_bt/rtl8723ds_config.bin
441 rtl_bt/rtl8723ds_fw.bin
442 rtl_bt/rtl8761a_config.bin
443 rtl_bt/rtl8852bs_config.bin
444 rtl_bt/rtl8852bs_fw.bin
445 rtlwifi/rtl8723bu_bt.bin
446 rtlwifi/rtl8723efw.bin
450 softing-4.6/bcard.bin
451 softing-4.6/bcard2.bin
452 softing-4.6/cancard.bin
453 softing-4.6/cancrd2.bin
454 softing-4.6/cansja.bin
455 softing-4.6/ldcard.bin
456 softing-4.6/ldcard2.bin
463 ti-connectivity/wl18xx-conf.bin
468 wil6210_sparrow_plus.fw
471 wlan/prima/WCNSS_qcom_wlan_nv.bin
472 wlwifi-SoSnj-a0-mr-a0-59.ucode
476 $ALLOW_MISSING->{$fw} = 1;
480 my ($src, $dstfw) = @_;
482 my $dest = "$target/$dstfw";
483 return if -f
$dest || -f
"${dest}.xz";
485 mkpath dirname
($dest);
486 system ("cp '$src' '$dest'") == 0 or die "copy '$src' to '$dest' failed!\n";
489 my ($fwdone, $fwbase_name, $error) = ({}, {}, 0);
491 sub add_fw
:prototype($$) {
494 return if $fw =~ m/\b(?:microcode_amd|amd_sev_)/; # contained in amd64-microcode
496 my $fw_name = basename
($fw);
497 $fwbase_name->{$fw_name} = 1;
499 return if $mod =~ m
|^kernel
/sound
|;
500 return if $mod =~ m
|^kernel
/drivers/isdn
|;
502 # skip ZyDas usb wireless, use package zd1211-firmware instead
503 return if $fw =~ m
|^zd1211
/|;
505 # skip atmel at76c50x wireless networking chips, use package atmel-firmware instead
506 return if $fw =~ m
|^atmel_at76c50
|;
508 # skip Bluetooth dongles based on the Broadcom BCM203x, use package bluez-firmware instead
509 return if $fw =~ m
|^BCM2033
|;
511 return if $fw =~ m
|^xc3028-v27\
.fw
|; # found twice!
512 return if $fw =~ m
|^ueagle-atm
/|; # where are those files?
514 return if $fwdone->{$fw};
518 if ($fw eq 'libertas/gspi8686.bin') {
519 $fw = 'libertas/gspi8686_v9.bin';
521 if ($fw eq 'libertas/gspi8686_hlp.bin') {
522 $fw = 'libertas/gspi8686_v9_helper.bin';
525 if ($fw eq 'PE520.cis') {
526 $fw = 'cis/PE520.cis';
529 if (-e
"$target/$fw") {
530 warn "WARN: allowed to skip existing '$fw'\n" if $ALLOW_MISSING->{$fw};
533 if (-f
"$fwsrc3/$fw") {
534 copy_fw
("$fwsrc3/$fw", $fwdest);
538 my $module = basename
($mod);
539 my $name = basename
($fw);
542 my $sr = `find '$target' \\( -type f -o -type l \\) -name '$name'`;
545 for my $f (split("\n", $sr)) {
546 print "found $f for GLOB '$name'\n";
547 my $f_name = basename
($f);
548 $fwbase_name->{$f_name} = 1;
550 warn "WARN: allowed to skip existing '$fw'\n" if $ALLOW_MISSING->{$fw};
553 return if $ALLOW_MISSING->{$fw};
554 warn "ERROR: unable to find FW for GLOB ($module): $fw\n";
560 return if $ALLOW_MISSING->{$fw};
562 warn "ERROR: unable to find firmware ($module): $fw\n";
567 my $sr = `find '$target' \\( -type f -o -type l \\) -name '$name'`;
571 for my $f (split("\n", $sr)) {
573 print "found linked $fw in $f\n";
580 $sr = `find '$fwsrc2' -type f -name '$name'`;
583 print "found $fw in $sr\n";
584 copy_fw
($sr, $fwdest);
588 $sr = `find '$fwsrc3' -type f -name '$name'`;
591 print "found $fw in $sr\n";
592 copy_fw
($sr, $fwdest);
596 return if $ALLOW_MISSING->{$fw};
597 return if $fw =~ m
|^dvb-
| || $fw =~ m
|\
.inp
$|;
599 warn "ERROR: unable to find firmware ($module): $fw\n";
604 open(my $fd, '<', $fwlist);
605 while(defined(my $line = <$fd>)) {
607 my ($fw, $mod) = split(/\s+/, $line, 2);
613 for my $fw ($FORCE_INCLUDE->@*) {
614 add_fw
($fw, 'FORCE_INCLUDE');
617 exit($error) if $error;
619 my $target_fw_string = `find '$target' -type f -o -type l`;
620 chomp $target_fw_string;
621 exit(-1) if !$target_fw_string;
623 my $all_fw_files = [ split("\n", $target_fw_string) ];
625 my ($keep, $delete) = (0, 0);
627 my $link_target = {};
628 for my $f (@$all_fw_files) {
630 my $link = basename
($f);
631 my $file = readlink($f);
632 my $target = basename
($file);
633 $link_target->{$target} = 1 if $fwbase_name->{$link};
634 $link_target->{$file} = 1 if $fwbase_name->{$link};
637 for my $f (@$all_fw_files) {
638 my $name = basename
($f);
640 if ($fwbase_name->{$name}) {
642 } elsif ($link_target->{$name}) {
643 #print "skip link target '$f'\n";
646 print "delete unreferenced $f\n";
647 unlink $f or warn "ERROR deleting '$f' - $!\n";
652 print "cleanup end result: keep: $keep, delete: $delete\n";