Developers of Sympa

[David Verdin <address@concealed>]

Hi, and sorry for this late answer,

Actually, this is a patch introduced in order to resolve an issue with
Gentoo distribution which creates, everywhere in the filesystem, files
starting with a dot. These are probably metadata.
Anyway, these files where found by Sympa in the spools and generated
errors, as they had nothing to do with Sympa functioning.
So, in order to fix your problem without reintroducing the problem with
gentoo, I suggest the following modification:
Replace
my @files =  (grep(!/^\./, readdir DIR ));
by
my @files =  (grep(/(^[^\.]|^\.(remove|rebuild)\.(.*))/, readdir DIR ));

This will include all the files that don't start with a dot plus the
files starting with .rebuild* or .remove*.

Here is the patch for the 5.4.2 :
http://sourcesup.cru.fr/viewvc/viewvc/branches/sympa-5.4-branch/wwsympa/archived.pl?r1=4986&r2=4985&pathrev=4986

Here is the patch for development trunk:
http://sourcesup.cru.fr/viewvc/viewvc/trunk/wwsympa/archived.pl?r1=4985&r2=4984&pathrev=4985

Thanks for reporting this bug!


Mathieu Kretchner a écrit :
> So I think, I resolve the bug with a substitution of code at the line 
> 194 in archived.pl, I replace :
> my @files =  (grep(!/^\./, readdir DIR ));
> by
> my @files =  readdir (DIR);
>
> and now the rebuild operation are well done !
>
> Now I would like to determine if there is no side effects with this 
> change ?
>
> Thanks.
>
>
> Mathieu Kretchner a écrit :
> > Hello all,
> >
> > It seems that the archived.pl can't do this part of code (line 302 of 
> > archived.pl)
> >
> > }elsif ($file  =~ /^\.rebuild\.(.*)$/ ) {
> >            ($Log::log_level >= 1) && do_log('debug',"rebuild found : 
> > $file for list $1");
> >            &rebuild($1);
> >            unless (unlink("$queue/$file")) {
> >                ($Log::log_level >= 0) && do_log ('err',"Ignoring file 
> > $queue/$file because couldn't remove it, archived.pl must use the 
> > same uid as sympa");
> >                next;
> >            }
> >
> > In order to test it, I try to touch some files directly in the 
> > outgoing spool and the results show that all files without a "." at 
> > the beginning  are caught by the daemon, but the command .rebuild or 
> > .remove are not interpreted.
> >
> > Could someone test it for me with the 5.4.2 ?
> >
> > Do you think the line 194 is correct ? Because this regexp list all 
> > the files which aren't beginning with a "." (dot)
> >    my @files =  (grep(!/^\./, readdir DIR ));

--
David Verdin
Comité réseau des universités