[X2Go-Commits] x2goserver.git - build-main (branch) updated: 3.0.99-2-226-ge42a541

X2Go dev team git-admin at x2go.org
Wed Dec 4 06:17:45 CET 2013


The branch, build-main has been updated
       via  e42a541cbeddb30c86ed5b00ab131a9a380d23da (commit)
      from  4d021c4d43919869c73cc5894ed6d1ca95b75225 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
-----------------------------------------------------------------------

Summary of changes:
 x2goserver/lib/x2gosessionlimit |  105 ---------------------------------------
 1 file changed, 105 deletions(-)
 delete mode 100755 x2goserver/lib/x2gosessionlimit

The diff of changes is:
diff --git a/x2goserver/lib/x2gosessionlimit b/x2goserver/lib/x2gosessionlimit
deleted file mode 100755
index f2fc78c..0000000
--- a/x2goserver/lib/x2gosessionlimit
+++ /dev/null
@@ -1,105 +0,0 @@
-#!/usr/bin/perl
-
-# Copyright (C) 2007-2011 X2go Project - http://wiki.x2go.org
-#
-# This program is free software; you can redistribute it and/or modify
-# it under the terms of the GNU General Public License as published by
-# the Free Software Foundation; either version 2 of the License, or
-# (at your option) any later version.
-#
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-# GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program; if not, write to the
-# Free Software Foundation, Inc.,
-# 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA.
-#
-# Copyright (C) 2007-2011  Oleksandr Shneyder <oleksandr.shneyder at obviously-nice.de>
-# Copyright (C) 2007-2011  Heinz-Markus Graesing <heinz-m.graesing at obviously-nice.de>
-
-use strict;
-use Config::Simple;
-use Sys::Syslog qw( :DEFAULT );
-
-use lib `echo -n \$(x2gobasepath)/lib/x2go`;
-use x2gologlevel;
-
-openlog($0,'cons,pid','user');
-setlogmask( LOG_UPTO(x2gologlevel()) );
-
-
-my $maxlimit=0;
-my $Config = new Config::Simple(syntax=>'ini');
-$Config->read('/etc/x2go/x2goserver.conf' );
-
-sub getGroupLimit
-{
-	my $group=shift;
-	my $strlimit=$Config->param("limit groups.$group");
-	if ($strlimit ne "")
-	{
-		if ($strlimit == 0)
-		{
-			print "0\n";
-			exit 0;
-		}
-		if ($strlimit > $maxlimit)
-		{
-			$maxlimit=$strlimit;
-		}
-	}
-}
-
-my $uname;
-$uname=getpwuid($<);
-
-my $runningsessions=`x2golistsessions --all-servers`;
-my @sessions=split("\n",$runningsessions);
-my $scount=@sessions;
-
-my $strlimit=$Config->param("limit users.$uname");
-
-if($strlimit ne "")
-{
-	if ($strlimit == 0)
-	{
-		print "0\n";
-		exit 0;
-	}
-	if ($strlimit <= $scount)
-	{
-		print "$strlimit\n";
-		exit 0;
-	}
-	print "$strlimit\n";
-	exit 0;
-}
-
-
-my ($name, $pass, $uid, $pgid, $quota, $comment, $gcos, $dir, $shell, $expire) = getpwnam($uname);
-
-while (my ($name, $passwd, $gid, $members)  = getgrent()) 
-{
-	if ( $pgid eq $gid)
-	{
-		getGroupLimit $name;
-	}
-	my @memebers=split(" ",$members);
-	foreach my $member (@memebers) 
-	{
-		if ($uname eq $member  )
-		{
-			getGroupLimit $name;
-		}
-	}
-}
-
-if ($maxlimit <= $scount)
-{
-	print "$maxlimit\n";
-	exit 0;
-}
-print "$maxlimit\n";


hooks/post-receive
-- 
x2goserver.git (X2Go Server)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "x2goserver.git" (X2Go Server).




More information about the x2go-commits mailing list