X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=installcheck%2Famadmin.pl;h=2e4cdd133d106a283bdf0781958d77d128a6e7ed;hb=691567b16c13087b31ee4c2b6d038e57872fae82;hp=84d364ba07d8103ba09583bee894e1699cdf7926;hpb=fd48f3e498442f0cbff5f3606c7c403d0566150e;p=debian%2Famanda diff --git a/installcheck/amadmin.pl b/installcheck/amadmin.pl index 84d364b..2e4cdd1 100644 --- a/installcheck/amadmin.pl +++ b/installcheck/amadmin.pl @@ -1,8 +1,9 @@ -# Copyright (c) 2009 Zmanda, Inc. All Rights Reserved. +# Copyright (c) 2009-2012 Zmanda, Inc. All Rights Reserved. # -# This program is free software; you can redistribute it and/or modify it -# under the terms of the GNU General Public License version 2 as published -# by the Free Software Foundation. +# 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 @@ -16,7 +17,9 @@ # Contact information: Zmanda Inc, 465 S Mathilda Ave, Suite 300 # Sunnyvale, CA 94086, USA, or: http://www.zmanda.com -use Test::More tests => 16; +use Test::More tests => 23; +use strict; +use warnings; use lib "@amperldir@"; use Installcheck::Config; @@ -115,3 +118,31 @@ like(run_get('amadmin TESTCONF force localhost share-\*'), amadmin: localhost:\\\\windows\\share-b is set to a forced level 0 at next run.$/, "shell 12"); +like(run_get('amadmin TESTCONF force localhost share-a share-a'), + qr/^amadmin: localhost:\\\\windows\\share-a is set to a forced level 0 at next run.$/, + "shell 13"); + +like(run_get('amadmin TESTCONF balance --days 12'), + qr/No data to report on yet.$/, + "shell 14"); + +like(run_get('amadmin TESTCONF force =localhost share-a'), + qr/^amadmin: localhost:\\\\windows\\share-a is set to a forced level 0 at next run.$/, + "shell 15"); + +like(run_get('amadmin TESTCONF force =localhost =share-a'), + qr/^Argument '=share-a' matches neither a host nor a disk.$/, + "shell 16"); + +like(run_get('amadmin --exact-match TESTCONF force localhost share-a'), + qr/^Argument '=share-a' matches neither a host nor a disk.$/, + "shell 17"); + +like(run_get('amadmin TESTCONF force =localhost \'=\\\\windows\\share-a\''), + qr/^amadmin: localhost:\\\\windows\\share-a is set to a forced level 0 at next run.$/, + "shell 18"); + +like(run_get('amadmin --exact-match TESTCONF force localhost \'\\\\windows\\share-a\''), + qr/^amadmin: localhost:\\\\windows\\share-a is set to a forced level 0 at next run.$/, + "shell 19"); +