root/veekun/trunk/t/shoutbox.t

use strict;
use warnings;

use HTTP::Request::Common;
use Test::More 'no_plan';

BEGIN { $ENV{CATALYST_DEBUG} = 0; }
BEGIN { $ENV{VEEKUN_USE_TEMP_DB} = 1; }
BEGIN { use_ok 'Catalyst::Test', 'Vee' }
BEGIN { use_ok 'Vee::Controller::Shoutbox' }

# TODO put this stuff in Veekun::Test somewhere, create_fake_user
# FIXME I can't seem to get this to create a cookie and stay cookied!
#my $password = random_string( '.' x (6 + int rand 6) );
#my $user = Vee->model('DBIC::Users')->create( {
#    name => 'testuser',
#    password => sha1_hex($password),
#} );


my $posted_res = request( POST '/shoutbox/post' => {
    name    => 'Tester',
    content => 'Test message',
} );
ok $posted_res->is_redirect, 'Shoutbox post results in redirect';

my $shout = Vee->model('DBIC::Shoutbox')->search( undef, {
    order_by => 'id DESC',
} )->first;

ok defined $shout, 'Shoutbox table contains a shout';
is $shout->name, 'Tester', 'Shout name is correct';
is $shout->content, 'Test message', 'Shout message is correct';
ok !defined $shout->user_id, 'Shout user is NULL';
ok abs($shout->time - time) < 3, 'Shout time is reasonably close to now';



my $shoutbox = request('/shoutbox');
ok $shoutbox->is_success, 'Shoutbox history request';