Lets stop shitting everywhere
[catagits/Catalyst-Runtime.git] / t / lib / TestCustomContainer.pm
index 02fb9de..5231b89 100644 (file)
@@ -38,22 +38,64 @@ sub BUILD {
     require Catalyst::Test;
     Catalyst::Test->import($self->app_name);
 
-    is(get('/container_class'), $self->container_class);
-    is(get('/container_isa'), $self->container_class);
+    is(get('/container_class'), $self->container_class, 'config is set properly');
+    is(get('/container_isa'), $self->container_class,   'and container isa our container class');
 
     {
+        # Foo ACCEPT_CONTEXT called - total: 1
         ok(my ($res, $c) = ctx_request('/get_model_baz'), 'request');
         ok($res->is_success, 'request 2xx');
         is($res->content, 'TestAppCustomContainer::Model::Baz', 'content is expected');
 
-        ok(my $baz = $c->container->get_sub_container('component')->resolve(service => 'model_Baz'), 'fetching Baz');
+        ok(my $baz = $c->container->get_sub_container('model')->resolve(service => 'Baz', parameters => { ctx => $c, accept_context_args => [$c] } ), 'fetching Baz');
         isa_ok($baz, 'TestAppCustomContainer::Model::Baz');
         is($baz->accept_context_called, 1, 'ACCEPT_CONTEXT called');
         isa_ok($baz->foo, 'TestAppCustomContainer::Model::Foo', 'Baz got Foo ok');
 
-        ok(my $foo = $c->container->get_sub_container('component')->resolve(service => 'model_Foo'), 'fetching Foo');
-        isa_ok($foo, 'TestAppCustomContainer::Model::Foo');
-        is($foo->baz_got_it, 1, 'Baz accessed Foo once');
+#        ok(my $foo = $c->container->get_sub_container('component')->resolve(service => 'model_Foo'), 'fetching Foo');
+#        isa_ok($foo, 'TestAppCustomContainer::Model::Foo');
+#        is($foo->baz_got_it, 1, 'Baz accessed Foo once');
+
+        # Foo ACCEPT_CONTEXT called - total: 2
+        ok(get('/get_model_baz'), 'another request');
+        is($baz->accept_context_called, 1, 'ACCEPT_CONTEXT not called again (instance per context)');
+#        is($foo->baz_got_it, 2, 'Baz accessed Foo again');
+    }
+
+    {
+        # Foo ACCEPT_CONTEXT called - total: 3
+        ok(my ($res, $c) = ctx_request('/get_model_bar'), 'request');
+        ok($res->is_success, 'request 2xx');
+        is($res->content, 'TestAppCustomContainer::Model::Bar', 'content is expected');
+
+        ok(my $bar = $c->container->get_sub_container('component')->resolve(service => 'model_Bar'), 'fetching Bar');
+        isa_ok($bar, 'TestAppCustomContainer::Model::Bar');
+
+        # FIXME - is this expected behavior?
+        is($bar->accept_context_called, 1, 'ACCEPT_CONTEXT called');
+        isa_ok($bar->foo, 'TestAppCustomContainer::Model::Foo', 'Bar got Foo ok');
+
+#        ok(my $foo = $c->container->get_sub_container('component')->resolve(service => 'model_Foo'), 'fetching Foo');
+#        isa_ok($foo, 'TestAppCustomContainer::Model::Foo');
+#        is($foo->bar_got_it, 1, 'Bar accessed Foo once');
+
+        # Foo ACCEPT_CONTEXT *not* called - total: 3
+        ok(get('/get_model_bar'), 'another request');
+        is($bar->accept_context_called, 1, 'ACCEPT_CONTEXT not called again (lifecycle is Singleton)');
+#        is($foo->bar_got_it, 1, 'Bar didn\'t access Foo again');
+    }
+
+    {
+        # Foo ACCEPT_CONTEXT called - total: 4
+        ok(my ($res, $c) = ctx_request('/get_model_foo'), 'request');
+        ok($res->is_success, 'request 2xx');
+        is($res->content, 'TestAppCustomContainer::Model::Foo', 'content is expected');
+
+#        ok(my $foo = $c->container->get_sub_container('component')->resolve(service => 'model_Foo'), 'fetching Foo');
+#        isa_ok($foo, 'TestAppCustomContainer::Model::Foo');
+#        is($foo->accept_context_called, 4, 'ACCEPT_CONTEXT called');
+#        is($foo->bar_got_it, 1, 'Bar accessed Foo once');
+#        is($foo->baz_got_it, 2, 'Baz accessed Foo twice');
     }
 
     done_testing;