[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Savannah-help-public] Re: [Savannah-cvs] administration/infra/bin sv_cv
From: |
manish popli |
Subject: |
[Savannah-help-public] Re: [Savannah-cvs] administration/infra/bin sv_cvstarballs.cron |
Date: |
Wed, 10 Aug 2005 23:28:47 -0700 (PDT) |
Hi,
How can i impliment replication between two CVS
servers
Pls help me in this regard......
Thanks
Manish Popli
--- Sylvain Beucler <address@hidden> wrote:
> CVSROOT: /cvsroot/administration
> Module name: administration
> Branch:
> Changes by: Sylvain Beucler <address@hidden>
> 05/08/09 18:45:17
>
> Modified files:
> infra/bin : sv_cvstarballs.cron
>
> Log message:
> Fixed perl security warnings
>
> CVSWeb URLs:
>
http://savannah.gnu.org/cgi-bin/viewcvs/administration/administration/infra/bin/sv_cvstarballs.cron.diff?tr1=1.1&tr2=1.2&r1=text&r2=text
>
> Patches:
> Index: administration/infra/bin/sv_cvstarballs.cron
> diff -u
> administration/infra/bin/sv_cvstarballs.cron:1.1
> administration/infra/bin/sv_cvstarballs.cron:1.2
> --- administration/infra/bin/sv_cvstarballs.cron:1.1
> Fri Sep 17 11:04:54 2004
> +++ administration/infra/bin/sv_cvstarballs.cron Tue
> Aug 9 18:45:16 2005
> @@ -34,6 +34,10 @@
> use strict;
> use Savannah;
>
> +# Classical perlsec(1) init
> +$ENV{'PATH'} = '/bin:/usr/bin';
> +delete @ENV{'IFS', 'CDPATH', 'ENV', 'BASH_ENV'};
> +
> my $archives_dir = '/savannah/cvs-backup';
>
> my @projects = GetDB("groups", "status='A' AND
> is_public='1'", "unix_group_name");
> @@ -51,6 +55,13 @@
> # Process active public projects
> for my $project_name (sort @projects) {
> chomp($project_name);
> +
> + # Untaint variable (needed?)
> + if ($project_name =~ /^([-_A-Za-z0-9]+)$/) {
> + $project_name = $1;
> + } else {
> + next;
> + }
>
> my $source_dir =
> "/savannah/cvsroot/$project_name/cvsroot";
> my $repos_mtime =
>
(stat("$source_dir/$project_name/CVSROOT/history"))[9];
>
>
> _______________________________________________
> Savannah-cvs mailing list
> address@hidden
> http://lists.gnu.org/mailman/listinfo/savannah-cvs
>
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
- [Savannah-help-public] Re: [Savannah-cvs] administration/infra/bin sv_cvstarballs.cron,
manish popli <=