IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 16281


Ignore:
Timestamp:
Feb 1, 2008, 3:51:29 PM (18 years ago)
Author:
jhoblitt
Message:

centralize test DB dsn/user/pass into Test::Nebulous

Location:
trunk
Files:
29 edited

Legend:

Unmodified
Added
Removed

  • trunk/Nebulous-Server/t/02_server_setup.t

    r10546 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 02_server_setup.t,v 1.5 2006-12-08 03:29:19 jhoblitt Exp $
     5# $Id: 02_server_setup.t,v 1.6 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1919isa_ok(
    2020    Nebulous::Server->new(
    21         dsn         => "DBI:mysql:database=test:host=localhost",
    22         dbuser      => "test",
    23         dbpasswd    => "",
     21        dsn         => $NEB_DB,
     22        dbuser      => $NEB_USER,
     23        dbpasswd    => $NEB_PASS,
    2424    ),
    2525    "Nebulous::Server"

  • trunk/Nebulous-Server/t/03_server_create_object.t

    r16265 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 03_server_create_object.t,v 1.23 2008-01-31 02:26:33 jhoblitt Exp $
     5# $Id: 03_server_create_object.t,v 1.24 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    2222
    2323my $neb = Nebulous::Server->new(
    24     dsn         => "DBI:mysql:database=test:host=localhost",
    25     dbuser      => "test",
    26     dbpasswd    => "",
     24    dsn         => $NEB_DB,
     25    dbuser      => $NEB_USER,
     26    dbpasswd    => $NEB_PASS,
    2727);
    2828

  • trunk/Nebulous-Server/t/04_server_replicate_object.t

    r13302 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 04_server_replicate_object.t,v 1.10 2007-05-08 02:27:42 jhoblitt Exp $
     5# $Id: 04_server_replicate_object.t,v 1.11 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    2222
    2323my $neb = Nebulous::Server->new(
    24     dsn         => "DBI:mysql:database=test:host=localhost",
    25     dbuser      => "test",
    26     dbpasswd    => "",
     24    dsn         => $NEB_DB,
     25    dbuser      => $NEB_USER,
     26    dbpasswd    => $NEB_PASS,
    2727);
    2828

  • trunk/Nebulous-Server/t/05_server_lock_object.t

    r13203 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 05_server_lock_object.t,v 1.8 2007-05-03 22:10:14 jhoblitt Exp $
     5# $Id: 05_server_lock_object.t,v 1.9 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1717
    1818my $neb = Nebulous::Server->new(
    19     dsn         => "DBI:mysql:database=test:host=localhost",
    20     dbuser      => "test",
    21     dbpasswd    => "",
     19    dsn         => $NEB_DB,
     20    dbuser      => $NEB_USER,
     21    dbpasswd    => $NEB_PASS,
    2222);
    2323

  • trunk/Nebulous-Server/t/06_server_unlock_object.t

    r13203 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 06_server_unlock_object.t,v 1.8 2007-05-03 22:10:14 jhoblitt Exp $
     5# $Id: 06_server_unlock_object.t,v 1.9 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1717
    1818my $neb = Nebulous::Server->new(
    19     dsn         => "DBI:mysql:database=test:host=localhost",
    20     dbuser      => "test",
    21     dbpasswd    => "",
     19    dsn         => $NEB_DB,
     20    dbuser      => $NEB_USER,
     21    dbpasswd    => $NEB_PASS,
    2222);
    2323

  • trunk/Nebulous-Server/t/07_server_find_instances.t

    r13173 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 07_server_find_instances.t,v 1.8 2007-05-03 01:44:24 jhoblitt Exp $
     5# $Id: 07_server_find_instances.t,v 1.9 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1818
    1919my $neb = Nebulous::Server->new(
    20     dsn         => "DBI:mysql:database=test:host=localhost",
    21     dbuser      => "test",
    22     dbpasswd    => "",
     20    dsn         => $NEB_DB,
     21    dbuser      => $NEB_USER,
     22    dbpasswd    => $NEB_PASS,
    2323);
    2424

  • trunk/Nebulous-Server/t/08_server_delete_instance.t

    r13173 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 08_server_delete_instance.t,v 1.8 2007-05-03 01:44:24 jhoblitt Exp $
     5# $Id: 08_server_delete_instance.t,v 1.9 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1717
    1818my $neb = Nebulous::Server->new(
    19     dsn         => "DBI:mysql:database=test:host=localhost",
    20     dbuser      => "test",
    21     dbpasswd    => "",
     19    dsn         => $NEB_DB,
     20    dbuser      => $NEB_USER,
     21    dbpasswd    => $NEB_PASS,
    2222);
    2323

  • trunk/Nebulous-Server/t/09_server_stat_object.t

    r13180 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 09_server_stat_object.t,v 1.11 2007-05-03 03:21:28 jhoblitt Exp $
     5# $Id: 09_server_stat_object.t,v 1.12 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1717
    1818my $neb = Nebulous::Server->new(
    19     dsn         => "DBI:mysql:database=test:host=localhost",
    20     dbuser      => "test",
    21     dbpasswd    => "",
     19    dsn         => $NEB_DB,
     20    dbuser      => $NEB_USER,
     21    dbpasswd    => $NEB_PASS,
    2222);
    2323

  • trunk/Nebulous-Server/t/10_server_is_valid_volume_name.t

    r12646 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 10_server_is_valid_volume_name.t,v 1.3 2007-03-28 22:02:11 jhoblitt Exp $
     5# $Id: 10_server_is_valid_volume_name.t,v 1.4 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1717
    1818my $neb = Nebulous::Server->new(
    19     dsn         => "DBI:mysql:database=test:host=localhost",
    20     dbuser      => "test",
    21     dbpasswd    => "",
     19    dsn         => $NEB_DB,
     20    dbuser      => $NEB_USER,
     21    dbpasswd    => $NEB_PASS,
    2222);
    2323

  • trunk/Nebulous-Server/t/11_server_is_valid_object_key.t

    r13173 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 11_server_is_valid_object_key.t,v 1.1 2007-05-03 01:44:24 jhoblitt Exp $
     5# $Id: 11_server_is_valid_object_key.t,v 1.2 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1717
    1818my $neb = Nebulous::Server->new(
    19     dsn         => "DBI:mysql:database=test:host=localhost",
    20     dbuser      => "test",
    21     dbpasswd    => "",
     19    dsn         => $NEB_DB,
     20    dbuser      => $NEB_USER,
     21    dbpasswd    => $NEB_PASS,
    2222);
    2323

  • trunk/Nebulous-Server/t/12_server_find_objects.t

    r13047 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 12_server_find_objects.t,v 1.1 2007-04-26 23:45:03 jhoblitt Exp $
     5# $Id: 12_server_find_objects.t,v 1.2 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1717
    1818my $neb = Nebulous::Server->new(
    19     dsn         => "DBI:mysql:database=test:host=localhost",
    20     dbuser      => "test",
    21     dbpasswd    => "",
     19    dsn         => $NEB_DB,
     20    dbuser      => $NEB_USER,
     21    dbpasswd    => $NEB_PASS,
    2222);
    2323

  • trunk/Nebulous-Server/t/13_server_rename_object.t

    r13203 r16281  
    33# Copryight (C) 2007  Joshua Hoblitt
    44#
    5 # $Id: 13_server_rename_object.t,v 1.2 2007-05-03 22:10:14 jhoblitt Exp $
     5# $Id: 13_server_rename_object.t,v 1.3 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1717
    1818my $neb = Nebulous::Server->new(
    19     dsn         => "DBI:mysql:database=test:host=localhost",
    20     dbuser      => "test",
    21     dbpasswd    => "",
     19    dsn         => $NEB_DB,
     20    dbuser      => $NEB_USER,
     21    dbpasswd    => $NEB_PASS,
    2222);
    2323

  • trunk/Nebulous-Server/t/14_server_xattr.t

    r13203 r16281  
    33# Copryight (C) 2007  Joshua Hoblitt
    44#
    5 # $Id: 14_server_xattr.t,v 1.2 2007-05-03 22:10:14 jhoblitt Exp $
     5# $Id: 14_server_xattr.t,v 1.3 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1717
    1818my $neb = Nebulous::Server->new(
    19     dsn         => "DBI:mysql:database=test:host=localhost",
    20     dbuser      => "test",
    21     dbpasswd    => "",
     19    dsn         => $NEB_DB,
     20    dbuser      => $NEB_USER,
     21    dbpasswd    => $NEB_PASS,
    2222);
    2323

  • trunk/Nebulous/t/02_server_setup.t

    r10546 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 02_server_setup.t,v 1.5 2006-12-08 03:29:19 jhoblitt Exp $
     5# $Id: 02_server_setup.t,v 1.6 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1919isa_ok(
    2020    Nebulous::Server->new(
    21         dsn         => "DBI:mysql:database=test:host=localhost",
    22         dbuser      => "test",
    23         dbpasswd    => "",
     21        dsn         => $NEB_DB,
     22        dbuser      => $NEB_USER,
     23        dbpasswd    => $NEB_PASS,
    2424    ),
    2525    "Nebulous::Server"

  • trunk/Nebulous/t/03_server_create_object.t

    r16265 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 03_server_create_object.t,v 1.23 2008-01-31 02:26:33 jhoblitt Exp $
     5# $Id: 03_server_create_object.t,v 1.24 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    2222
    2323my $neb = Nebulous::Server->new(
    24     dsn         => "DBI:mysql:database=test:host=localhost",
    25     dbuser      => "test",
    26     dbpasswd    => "",
     24    dsn         => $NEB_DB,
     25    dbuser      => $NEB_USER,
     26    dbpasswd    => $NEB_PASS,
    2727);
    2828

  • trunk/Nebulous/t/04_server_replicate_object.t

    r13302 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 04_server_replicate_object.t,v 1.10 2007-05-08 02:27:42 jhoblitt Exp $
     5# $Id: 04_server_replicate_object.t,v 1.11 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    2222
    2323my $neb = Nebulous::Server->new(
    24     dsn         => "DBI:mysql:database=test:host=localhost",
    25     dbuser      => "test",
    26     dbpasswd    => "",
     24    dsn         => $NEB_DB,
     25    dbuser      => $NEB_USER,
     26    dbpasswd    => $NEB_PASS,
    2727);
    2828

  • trunk/Nebulous/t/05_server_lock_object.t

    r13203 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 05_server_lock_object.t,v 1.8 2007-05-03 22:10:14 jhoblitt Exp $
     5# $Id: 05_server_lock_object.t,v 1.9 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1717
    1818my $neb = Nebulous::Server->new(
    19     dsn         => "DBI:mysql:database=test:host=localhost",
    20     dbuser      => "test",
    21     dbpasswd    => "",
     19    dsn         => $NEB_DB,
     20    dbuser      => $NEB_USER,
     21    dbpasswd    => $NEB_PASS,
    2222);
    2323

  • trunk/Nebulous/t/06_server_unlock_object.t

    r13203 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 06_server_unlock_object.t,v 1.8 2007-05-03 22:10:14 jhoblitt Exp $
     5# $Id: 06_server_unlock_object.t,v 1.9 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1717
    1818my $neb = Nebulous::Server->new(
    19     dsn         => "DBI:mysql:database=test:host=localhost",
    20     dbuser      => "test",
    21     dbpasswd    => "",
     19    dsn         => $NEB_DB,
     20    dbuser      => $NEB_USER,
     21    dbpasswd    => $NEB_PASS,
    2222);
    2323

  • trunk/Nebulous/t/07_server_find_instances.t

    r13173 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 07_server_find_instances.t,v 1.8 2007-05-03 01:44:24 jhoblitt Exp $
     5# $Id: 07_server_find_instances.t,v 1.9 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1818
    1919my $neb = Nebulous::Server->new(
    20     dsn         => "DBI:mysql:database=test:host=localhost",
    21     dbuser      => "test",
    22     dbpasswd    => "",
     20    dsn         => $NEB_DB,
     21    dbuser      => $NEB_USER,
     22    dbpasswd    => $NEB_PASS,
    2323);
    2424

  • trunk/Nebulous/t/08_server_delete_instance.t

    r13173 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 08_server_delete_instance.t,v 1.8 2007-05-03 01:44:24 jhoblitt Exp $
     5# $Id: 08_server_delete_instance.t,v 1.9 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1717
    1818my $neb = Nebulous::Server->new(
    19     dsn         => "DBI:mysql:database=test:host=localhost",
    20     dbuser      => "test",
    21     dbpasswd    => "",
     19    dsn         => $NEB_DB,
     20    dbuser      => $NEB_USER,
     21    dbpasswd    => $NEB_PASS,
    2222);
    2323

  • trunk/Nebulous/t/09_server_stat_object.t

    r13180 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 09_server_stat_object.t,v 1.11 2007-05-03 03:21:28 jhoblitt Exp $
     5# $Id: 09_server_stat_object.t,v 1.12 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1717
    1818my $neb = Nebulous::Server->new(
    19     dsn         => "DBI:mysql:database=test:host=localhost",
    20     dbuser      => "test",
    21     dbpasswd    => "",
     19    dsn         => $NEB_DB,
     20    dbuser      => $NEB_USER,
     21    dbpasswd    => $NEB_PASS,
    2222);
    2323

  • trunk/Nebulous/t/10_server_is_valid_volume_name.t

    r12646 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 10_server_is_valid_volume_name.t,v 1.3 2007-03-28 22:02:11 jhoblitt Exp $
     5# $Id: 10_server_is_valid_volume_name.t,v 1.4 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1717
    1818my $neb = Nebulous::Server->new(
    19     dsn         => "DBI:mysql:database=test:host=localhost",
    20     dbuser      => "test",
    21     dbpasswd    => "",
     19    dsn         => $NEB_DB,
     20    dbuser      => $NEB_USER,
     21    dbpasswd    => $NEB_PASS,
    2222);
    2323

  • trunk/Nebulous/t/11_server_is_valid_object_key.t

    r13173 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 11_server_is_valid_object_key.t,v 1.1 2007-05-03 01:44:24 jhoblitt Exp $
     5# $Id: 11_server_is_valid_object_key.t,v 1.2 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1717
    1818my $neb = Nebulous::Server->new(
    19     dsn         => "DBI:mysql:database=test:host=localhost",
    20     dbuser      => "test",
    21     dbpasswd    => "",
     19    dsn         => $NEB_DB,
     20    dbuser      => $NEB_USER,
     21    dbpasswd    => $NEB_PASS,
    2222);
    2323

  • trunk/Nebulous/t/12_server_find_objects.t

    r13047 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 12_server_find_objects.t,v 1.1 2007-04-26 23:45:03 jhoblitt Exp $
     5# $Id: 12_server_find_objects.t,v 1.2 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1717
    1818my $neb = Nebulous::Server->new(
    19     dsn         => "DBI:mysql:database=test:host=localhost",
    20     dbuser      => "test",
    21     dbpasswd    => "",
     19    dsn         => $NEB_DB,
     20    dbuser      => $NEB_USER,
     21    dbpasswd    => $NEB_PASS,
    2222);
    2323

  • trunk/Nebulous/t/13_server_rename_object.t

    r13203 r16281  
    33# Copryight (C) 2007  Joshua Hoblitt
    44#
    5 # $Id: 13_server_rename_object.t,v 1.2 2007-05-03 22:10:14 jhoblitt Exp $
     5# $Id: 13_server_rename_object.t,v 1.3 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1717
    1818my $neb = Nebulous::Server->new(
    19     dsn         => "DBI:mysql:database=test:host=localhost",
    20     dbuser      => "test",
    21     dbpasswd    => "",
     19    dsn         => $NEB_DB,
     20    dbuser      => $NEB_USER,
     21    dbpasswd    => $NEB_PASS,
    2222);
    2323

  • trunk/Nebulous/t/14_server_xattr.t

    r13203 r16281  
    33# Copryight (C) 2007  Joshua Hoblitt
    44#
    5 # $Id: 14_server_xattr.t,v 1.2 2007-05-03 22:10:14 jhoblitt Exp $
     5# $Id: 14_server_xattr.t,v 1.3 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1717
    1818my $neb = Nebulous::Server->new(
    19     dsn         => "DBI:mysql:database=test:host=localhost",
    20     dbuser      => "test",
    21     dbpasswd    => "",
     19    dsn         => $NEB_DB,
     20    dbuser      => $NEB_USER,
     21    dbpasswd    => $NEB_PASS,
    2222);
    2323

  • trunk/Nebulous/t/51_client_create.t

    r13092 r16281  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 51_client_create.t,v 1.3 2007-05-01 02:52:04 jhoblitt Exp $
     5# $Id: 51_client_create.t,v 1.4 2008-02-02 01:51:29 jhoblitt Exp $
    66
    77use strict;
    … …  
    1414use lib qw( ./t ./lib );
    1515
    16 #use Nebulous::Client trace => 'debug';
    17 use Nebulous::Client;
     16use Nebulous::Client trace => 'debug';
     17#use Nebulous::Client;
    1818use Test::Nebulous;
    1919use Test::URI;
    … …  
    3131
    3232    my $uri = $neb->create("foo");
    33 
    3433    my ($scheme, $auth, $path, $query, $frag) = uri_split($uri);
    3534    ok(-e $path, "good filename");

  • trunk/Nebulous/t/Test/Nebulous.pm

    r13251 r16281  
    11# Copyright (C) 2004  Joshua Hoblitt
    22#
    3 # $Id: Nebulous.pm,v 1.15 2007-05-04 23:36:46 jhoblitt Exp $
     3# $Id: Nebulous.pm,v 1.16 2008-02-02 01:51:29 jhoblitt Exp $
    44
    55package Test::Nebulous;
    66
    77use strict;
     8
     9our $VERSION = '0.01';
     10
     11use base qw( Exporter );
    812
    913use DBI;
    … …  
    1216use Nebulous::Server::SQL;
    1317
    14 my $dsn     = "DBI:mysql:database=test:host=localhost";
    15 my $user    = "test";
    16 my $passwd  = "";
     18our @EXPORT = qw( $NEB_DB $NEB_USER $NEB_PASS );
    1719
    18 my $dbh = DBI->connect( $dsn, $user, $passwd );
     20our $NEB_DB   = "DBI:mysql:database=nebulous:host=localhost";
     21our $NEB_USER = "nebulous";
     22our $NEB_PASS = '@neb@';
     23
     24my $dbh = DBI->connect( $NEB_DB, $NEB_USER, $NEB_PASS );
    1925my $sql = Nebulous::Server::SQL->new;
    2026

  • trunk/Nebulous/t/conf/startup.pl.in

    r10581 r16281  
    33
    44use lib qw( @ServerRoot@/../lib );
     5use lib qw( @ServerRoot@ );
    56
    67use Apache::DBI;
    … …  
    910use Nebulous::Server::Apache;
    1011use Nebulous::Server;
     12use Test::Nebulous;
    1113
    12 my $dsn         = "DBI:mysql:database=test:host=localhost";
    13 my $dbuser      = "test";
    14 my $dbpasswd    = "";
    15 
    16 Apache::DBI->connect_on_init( $dsn, $dbuser, $dbpasswd );
     14Apache::DBI->connect_on_init( $NEB_DB, $NEB_USER, $NEB_PASS );
    1715Nebulous::Server::SOAP->new_on_init(
    18     dsn         => $dsn,
    19     dbuser      => $dbuser,
    20     dbpasswd    => $dbpasswd,
     16    dsn         => $NEB_DB,
     17    dbuser      => $NEB_USER,
     18    dbpasswd    => $NEB_PASS,
    2119    log_level   => 'all',
    2220);
Note: See TracChangeset for help on using the changeset viewer.