package myHive::Controller::Root;
use Moose;
use namespace::autoclean;

BEGIN { extends 'Catalyst::Controller' }

#
# Sets the actions in this controller to be registered with no prefix
# so they function identically to actions created in MyApp.pm
#
__PACKAGE__->config(namespace => '');

=head1 NAME

myHive::Controller::Root - Root Controller for myHive

=head1 DESCRIPTION

[enter your description here]

=head1 METHODS

=head2 index

The root page (/)

=cut

sub index :Path :Args(0) {
    my ( $self, $c ) = @_;
    $c->stash->{template} = 'home.tt';
    return;
}

=head2 default

Standard 404 error page

=cut

sub default :Path {
    my ( $self, $c ) = @_;
    #$c->response->body( 'Page not found' );
    #$c->response->status(404);
    $c->stash->{pageTitle} = 'myHive.co.nz';
    $c->stash->{template} = 'home.tt';

    return;
}

sub home : Local {
	my ( $self, $c ) = @_;
	$c->stash->{pageTitle} = 'myHive.co.nz';
	$c->stash->{page}     = q/home/;
	$c->stash->{template} = q/home.tt/;
	return;
}
sub login : Local {
	my ( $self, $c ) = @_;
	my $params = $c->request->body_parameters;
	if ( keys  %$params ) {
		$c->forward('/admin/login');
		
		#$c->stash->{template} = q/admin.tt/;
		return
	}
	else {
		$c->stash->{pageTitle} = 'myHive.co.nz - Login';
		$c->stash->{page}     = 'login';
		$c->stash->{template} = q/login.tt/;
	}	

return;

}

sub mainmenu : Local {
	my ( $self, $c ) = @_;
	$c->stash->{template} = 'mainmenu.tt';
	return;
}

sub contact : Local : Args() {
	my ( $self, $c ) = @_;
	$c->stash->{pageTitle} = 'myHive.co.nz';
	$c->stash->{page}     = q/contact/;
	$c->stash->{template} = 'home.tt';
	return;

}

sub registration : Local : Args() {
	my ( $self, $c ) = @_;
	#$c->response->redirect( 'http://192.168.3.6:8003/page/admin/registration' );
	my $data = $c->request->body_parameters;
	$c->{authentication} = myHive::Model::Authentication->new;
	if ( $c->{authentication}->register(  %{ $data } ) ) {
		$c->stash->{template} = 'registration.tt';
	}
	else {
		$c->stash->{template} = 'login.tt';
	}
	return;


}

=head2 end

Attempt to render a view, if needed.

=cut

sub end : ActionClass('RenderView') {}

=head1 AUTHOR

root

=head1 LICENSE

This library is free software. You can redistribute it and/or modify
it under the same terms as Perl itself.

=cut

__PACKAGE__->meta->make_immutable;

1;
