- fix factory submission (clam.tcl)
OBS-URL: https://build.opensuse.org/package/show/security/clamav?expand=0&rev=267
This commit is contained in:
parent
adb646ae3c
commit
7c9dfc0617
38
clam.tcl
38
clam.tcl
@ -1,38 +0,0 @@
|
||||
#!/usr/bin/tclsh
|
||||
package require Expect
|
||||
|
||||
proc pne {x} {
|
||||
if {$x != ""} {
|
||||
puts $x
|
||||
}
|
||||
}
|
||||
|
||||
set x 0
|
||||
set L ""
|
||||
set C ""
|
||||
log_user 0
|
||||
spawn clamscan eicar_test_files
|
||||
expect_before -re "((L|C)\[^\r\]*)\r" {
|
||||
set $expect_out(2,string) $expect_out(1,string)
|
||||
exp_continue
|
||||
} eof {
|
||||
pne $L
|
||||
pne $C
|
||||
pne $expect_out(buffer)
|
||||
puts "*** clamscan died! ***"
|
||||
exit 1
|
||||
}
|
||||
expect "\n"; # newline after "Loading: ..."
|
||||
expect "\n"; # newline after "Compiling: ..."
|
||||
expect_before
|
||||
pne $L
|
||||
pne $C
|
||||
puts ""
|
||||
log_user 1
|
||||
expect "FOUND" {
|
||||
incr x
|
||||
exp_continue
|
||||
} eof
|
||||
if {$x ne 3} {
|
||||
exit 1
|
||||
}
|
@ -1,3 +1,8 @@
|
||||
-------------------------------------------------------------------
|
||||
Mon Dec 9 20:21:42 UTC 2024 - Andreas Stieger <andreas.stieger@gmx.de>
|
||||
|
||||
- fix factory submission (clam.tcl)
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Tue Sep 10 13:05:08 UTC 2024 - Reinhard Max <max@suse.com>
|
||||
|
||||
|
@ -2,6 +2,7 @@
|
||||
# spec file for package clamav
|
||||
#
|
||||
# Copyright (c) 2024 SUSE LLC
|
||||
# Copyright (c) 2024 Andreas Stieger <Andreas.Stieger@gmx.de>
|
||||
#
|
||||
# All modifications and additions to the file contributed by third parties
|
||||
# remain the property of their copyright owners, unless otherwise agreed
|
||||
|
Loading…
Reference in New Issue
Block a user