[cvsnt] Re: cvsnt server: Pre-tag check failed

[sandy]

Hi,

I tried by giving the physical path to the .pl file in taginfo. 
Now it is deleteing for the whole group.

Let me clear the requirement fisrt.

I am running cvsnt on Redhat Linux 9.0
1.  I created a group called SCMUSER
     which contains sandeep, pradeeep, x as users.
2.  SCMUSER group and users have RWX permisson to CVSROOT.

3  CVSROOT/admin file contains user  sandeep.
4. Taginfo contains

   DEFAULT /usr/local/cvsnt/CVSROOT/verifytag.pl

5. verifytag.pl contains

#!/usr/bin/perl -w

use strict;

my $admin ="sandeep";

my $go_flag = 0;
my $tag = shift @ARGV;
my $operation = shift @ARGV;
my $repository = shift @ARGV;


                if ($admin eq $ENV {USER})
                {
                        print "Deleting tag";
                        $go_flag = 1;
                        last;
                }

if (not $go_flag)
{
        if($operation eq "-d" or $operation eq "-F")
        {
                print "$0: ERROR: Deleting or moving tags is not
allowed!\n";
                exit 1;
        }
}

exit 0;

6. when running the
      cvs tag -d tagname filename 

The command is deleting the tag for admin user sandeep as well as
others in SCMUSER group.
I want only admin to delete the tag.

Can you help please? Its urgent.

Regards
Sandeep



Quoting Glen Starrett <glen at starretthome.net>:

> sandy wrote:
> > 2. Taginfo contains
> > 
> >    DEFAULT $CVSROOT/CVSROOT/verifytag.pl
> 
> Assuming you're running this on a Win32 server, try using this
> instead:
> 
> DEFAULT c:/path/to/perl.exe $CVSROOT/CVSROOT/verifytag.pl
> 
> I'm not sure if that will work though -- if it doesn't help try 
> replacing the $CVSROOT with the physical path to the pl file (as a
> test 
> -- the env variable should work AFAIK).
> 
> Regards,
> 
> -- 
> Glen Starrett
> _______________________________________________
> cvsnt mailing list
> cvsnt at cvsnt.org
> http://www.cvsnt.org/cgi-bin/mailman/listinfo/cvsnt
>