Re: [Xen-devel] [OSSTEST PATCH 15/16] mg-schema-test-database: Safety catch in JobDB database open

2015-12-08 Thread Ian Campbell
On Mon, 2015-12-07 at 17:27 +, Ian Jackson wrote:
> When we open the `osstest' database, see whether this is a parent DB
> (main DB) from which a test DB has been spawned by this user.
> 
> If it has, bomb out, unless the user has specified a suitable regexp
> matching the DB name in the env var
>   OSSTEST_DB_USEREAL_IGNORETEST
> 
> This means that when a test database is in play, the user who created
> it cannot accidentally operate on the real DB.
> 
> The safety catch does not affect Tcl programs, which get the DB config
> directly, but in general that just means sg-execute-flight and
> sg-run-job which already have a fair amount of safety catch because
> they demand flight numbers.
> 
> mg-schema-test-database hits this feature over the head.  We assume
> that the caller of mg-schema-test-database knows what they are doing;
> particularly, that if they create nested test DBs (!), they do not
> need the assitance of this feature to stop themselves operating
> mg-schema-test-database incorrectly.  Anyone who creates nested test
> DBs will hopefully recognise the potential for confusion!
> 
> Signed-off-by: Ian Jackson 
> ---
>  Osstest/JobDB/Executive.pm |   33 -
>  mg-schema-test-database|2 ++
>  2 files changed, 34 insertions(+), 1 deletion(-)
> 
> diff --git a/Osstest/JobDB/Executive.pm b/Osstest/JobDB/Executive.pm
> index 2572f5f..29dbc6f 100644
> --- a/Osstest/JobDB/Executive.pm
> +++ b/Osstest/JobDB/Executive.pm
> @@ -51,8 +51,39 @@ sub current_flight ($) { #method
>  return $ENV{'OSSTEST_FLIGHT'};
>  }
>  
> +sub _check_testdbs ($) {
> +my ($dbh) = @_;
> +
> +my $re = $ENV{OSSTEST_DB_USEREAL_IGNORETEST} // '';
> +return if $re eq '.*'; # needed by mg-schema-test-database during
> setup
> +
> +# mg-schema-test-database creates a task
> +#   xdbref/DBNAME with username ${Username}@

Was there intended to be a wildcard or pattern of some sort after the @ in
this comment?

> +my $sth = $dbh->prepare(< +SELECT refkey AS dbname,
> +   username, comment
> +FROM tasks
> + WHERE type = 'xdbref'
> +   AND live
> +   AND username LIKE (? || '@%')

Nice of them to pick "||" as the string concatenation operator. It's almost
like they hate us C programmers...

Other than the comment thing above:
Acked-by: Ian Campbell 


___
Xen-devel mailing list
Xen-devel@lists.xen.org
http://lists.xen.org/xen-devel


Re: [Xen-devel] [OSSTEST PATCH 15/16] mg-schema-test-database: Safety catch in JobDB database open

2015-12-08 Thread Ian Jackson
Ian Campbell writes ("Re: [OSSTEST PATCH 15/16] mg-schema-test-database: Safety 
catch in JobDB database open"):
> On Mon, 2015-12-07 at 17:27 +, Ian Jackson wrote:
> > +# mg-schema-test-database creates a task
> > +#   xdbref/DBNAME with username ${Username}@
> 
> Was there intended to be a wildcard or pattern of some sort after the @ in
> this comment?

Yes.  I have changed this to read:

#   xdbref/DBNAME with username ${Username}@NODENAME

> Other than the comment thing above:
> Acked-by: Ian Campbell 

Thanks,
Ian.

___
Xen-devel mailing list
Xen-devel@lists.xen.org
http://lists.xen.org/xen-devel