[vhffs-dev] [1114] Fixed some missing license & typos.

[subversion@xxxxxxxxxxxxx]

Revision: 1114
Author:   beuss
Date:     2008-01-07 07:08:18 +0000 (Mon, 07 Jan 2008)

Log Message:
-----------
Fixed some missing license & typos.

Modified Paths:
--------------
    trunk/vhffs-api/src/examples/create_cvs.pl
    trunk/vhffs-api/src/examples/hashhome_example.pl
    trunk/vhffs-api/src/examples/show_mail_conf.pl
    trunk/vhffs-robots/src/group_setquota.pl
    trunk/vhffs-robots/src/repository_setquota.pl


Modified: trunk/vhffs-api/src/examples/create_cvs.pl
===================================================================
--- trunk/vhffs-api/src/examples/create_cvs.pl	2007-12-14 19:30:19 UTC (rev 1113)
+++ trunk/vhffs-api/src/examples/create_cvs.pl	2008-01-07 07:08:18 UTC (rev 1114)
@@ -1,6 +1,34 @@
 #!%PERL% -w
+# Copyright (c) vhffs project and its contributors
+# All rights reserved.
+#
+# Redistribution and use in source and binary forms, with or without 
+# modification, are permitted provided that the following conditions 
+# are met:
+#
+# 1. Redistributions of source code must retain the above copyright 
+#   notice, this list of conditions and the following disclaimer.
+#2. Redistributions in binary form must reproduce the above copyright
+#   notice, this list of conditions and the following disclaimer in 
+#   the documentation and/or other materials provided with the 
+#   distribution.
+#3. Neither the name of vhffs nor the names of its contributors 
+#   may be used to endorse or promote products derived from this 
+#   software without specific prior written permission.
+#
+#THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 
+#"AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 
+#LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS 
+#FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE 
+#COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, 
+#INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, 
+#BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; 
+#LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER 
+#CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 
+# LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN 
+# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 
+# POSSIBILITY OF SUCH DAMAGE.
 
-
 use strict;
 
 use Data::Dumper;

Modified: trunk/vhffs-api/src/examples/hashhome_example.pl
===================================================================
--- trunk/vhffs-api/src/examples/hashhome_example.pl	2007-12-14 19:30:19 UTC (rev 1113)
+++ trunk/vhffs-api/src/examples/hashhome_example.pl	2008-01-07 07:08:18 UTC (rev 1114)
@@ -10,7 +10,7 @@
 my $main = init Vhffs::Main;
 
 
-$username = "soda";
+my $username = "soda";
 
 print Vhffs::Functions::hash_homename( $username , $main );
 

Modified: trunk/vhffs-api/src/examples/show_mail_conf.pl
===================================================================
--- trunk/vhffs-api/src/examples/show_mail_conf.pl	2007-12-14 19:30:19 UTC (rev 1113)
+++ trunk/vhffs-api/src/examples/show_mail_conf.pl	2008-01-07 07:08:18 UTC (rev 1114)
@@ -20,13 +20,13 @@
 my $princ = init Vhffs::Main;
 
 $config = $princ->get_config;
-$cmail = $config->get_service( "dns" );
+my $cmail = $config->get_service( "dns" );
 
 if( defined $cmail->{init} )
 {
-	$init = $cmail->{init};
+	my $init = $cmail->{init};
 	use Data::Dumper;
-	print Dumper %init;
+	print Dumper $init;
 
 	if( defined $init->{a} )
 	{

Modified: trunk/vhffs-robots/src/group_setquota.pl
===================================================================
--- trunk/vhffs-robots/src/group_setquota.pl	2007-12-14 19:30:19 UTC (rev 1113)
+++ trunk/vhffs-robots/src/group_setquota.pl	2008-01-07 07:08:18 UTC (rev 1114)
@@ -55,7 +55,7 @@
 
 	if( Quota::setqlim($dev, $group->get_gid, $blocks, $blocks, $inodes, $inodes, 0, 1) )
 	{
-		printf("Cannot update quota for user %s (gid  %d), reason: %s\n", $group->get_groupname, $group->get_gid, Quota::strerr);
+		printf("Cannot update quota for group %s (gid  %d), reason: %s\n", $group->get_groupname, $group->get_gid, Quota::strerr);
 	}
 }
 

Modified: trunk/vhffs-robots/src/repository_setquota.pl
===================================================================
--- trunk/vhffs-robots/src/repository_setquota.pl	2007-12-14 19:30:19 UTC (rev 1113)
+++ trunk/vhffs-robots/src/repository_setquota.pl	2008-01-07 07:08:18 UTC (rev 1114)
@@ -66,7 +66,7 @@
 		$inodes = 0;
 
 		$repos = Vhffs::Services::Repository::getall_per_group( $vhffs, $group);
-		if( defined $repos )
+		if( scalar(@{$repos}) > 0 )
 		{
 			foreach $repo ( @{$repos} )
 			{