epita-std/ACU
Archived
1
0
Fork 0
Code Releases Activity

gl-pre-git: display IP only if not authorized

Browse Source
This commit is contained in:
Mercier Pierre-Olivier 2013-10-12 02:47:57 +02:00
parent b3acb0ba54
commit 4979456cd0
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
hooks/gl-pre-git
View File

@ -22,7 +22,10 @@ exit 0 if ($ENV{GL_REPO} !~ /^2[0-9]{3}\/.+\/.+/);
my $read = ($ARGV[0] =~ /R/); my $read = ($ARGV[0] =~ /R/);
my $write = ($ARGV[0] =~ /W/); my $write = ($ARGV[0] =~ /W/);
say "Votre IP est : $ip."; my $promo = $1 if ($ENV{'GL_REPO'} =~ m/([0-9]{4}).*/);
my $id_project = $1 if ($ENV{'GL_REPO'} =~ m/.*\/(.*)\//);
my $repo_login = $1 if ($ENV{'GL_REPO'} =~ m/.*\/.*\/(.*)/);
$ip = Net::IP->new($ip) or die ("IP invalide"); $ip = Net::IP->new($ip) or die ("IP invalide");
@ -30,6 +33,8 @@ my $schoolnetwork = Net::IP->new('10.41.0.0/16');
if ($ip->overlaps($schoolnetwork) != $IP_A_IN_B_OVERLAP) if ($ip->overlaps($schoolnetwork) != $IP_A_IN_B_OVERLAP)
{ {
say "Votre IP est : $ip.";
log ERROR, "Vous n'êtes pas autorisé à envoyer vos modifications depuis cette IP." if ($write); log ERROR, "Vous n'êtes pas autorisé à envoyer vos modifications depuis cette IP." if ($write);
log ERROR, "Vous n'êtes pas autorisé à accéder à ce dépôt depuis cette IP." if ($read); log ERROR, "Vous n'êtes pas autorisé à accéder à ce dépôt depuis cette IP." if ($read);
exit 1; exit 1;
@ -39,6 +44,8 @@ my $sshnetwork = Net::IP->new('10.41.253.0/24');
if ($ip->overlaps($sshnetwork) == $IP_A_IN_B_OVERLAP) if ($ip->overlaps($sshnetwork) == $IP_A_IN_B_OVERLAP)
{ {
say "Votre IP est : $ip.";
log ERROR, "Vous n'êtes pas autorisé à envoyer vos modifications depuis cette IP." if ($write); log ERROR, "Vous n'êtes pas autorisé à envoyer vos modifications depuis cette IP." if ($write);
log ERROR, "Vous n'êtes pas autorisé à accéder à ce dépôt depuis cette IP." if ($read); log ERROR, "Vous n'êtes pas autorisé à accéder à ce dépôt depuis cette IP." if ($read);
exit 1; exit 1;