The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Kelp::Manual::Controllers - Making your app use controllers

DESCRIPTION

This document describes the technical aspect of implementing controllers in your app. By default, Kelp has no controllers - it resolves all your routes in the context of the main app. In other words, all routes take a instance of the web application as a first parameter - even if those routes live in another class.

Controllers lets you separate some of the route handling logic to other classes and have your subs take the object of the correct class as the first argument. In Kelp, there is no special base class for controllers - all controllers must be subclasses of Kelp.

Reblessing details

Reblessing will happen after request is matched to a route. Route handler has to be specified as class and method string, and class must be a subclass of class configured for "base" in Kelp::Routes. "rebless" in Kelp::Routes must albo be enabled for that to occur.

The default value of base field is the application class, so your application class is by default your main controller class. All other controllers must (directly or indirectly) inherit from your application class.

These methods will be automatically run on your controller object for each request:

  • route handler method

  • before_dispatch

  • before_finalize

No other methods will be called from your controller unless you call them explicitly yourself. Application will be reblessed into a given controller only once per request. If a bridge route exists which uses the same controller as the regular route, the regular route will reuse the controller reblessed for the bridge. After the request ends, the reblessed controllers will be cleared.

Configuring controllers

Step 1: Configure the controller

It is a good practice to set up a different base, so that you separate general app code from request-handling code.

    # config.pl
    {
        modules_init => {
            Routes => {
                rebless => 1, # the app instance will be reblessed
                base => 'MyApp::Controller',
            }
        }
    }

Step 2: Create a main controller class

This step is only required if you've changed the base.

    # lib/MyApp/Controller.pm
    package MyApp::Controller;
    use Kelp::Base 'MyApp';

    # Now $self is an instance of 'MyApp::Controller';
    sub service_method {
        my $self = shift;
        ...;
    }

    1;

Step 3: Create any number of controller classes

They all must inherit from your main controller class.

    # lib/MyApp/Controller/Users.pm
    package MyApp::Controller::Users;
    use Kelp::Base 'MyApp::Controller';

    # Now $self is an instance of 'MyApp::Controller::Users'
    sub authenticate {
        my $self = shift;
        ...;
    }

    1;

Step 4: Add routes with shorter class names

You no longer have to prefix destinations with the base controller class name.

    # lib/MyApp.pm

    ...

    sub build {
        my $self = shift;

        # if 'base' was not changed, this would have to be written as:
        # => 'Controller::Users::authenticate'
        $self->add_route('/login' => 'Users::authenticate');

    }

CAVEATS

There are some controller gotchas which come from a fact that they are not constructed like a regular object:

Controller's constructor is never called

Controllers are never actually constructed, but instead the main app object is cloned and reblessed into the correct class. Don't expect your override of new or build to work.

Main application object is shallow-cloned before rebless

Reblessed controllers are only temporary. Setting top-level attributes in a controller, for example "charset" in Kelp, will work until the request is fully handled. After that, the controller copy will be destroyed and the changes will not propagate back to main application.

Getting a controller copy in build

No automatic controller initialization happens in Kelp. If you'd like to access a controller in other context than route handling - for example in build method, allowing you to move route definitions to the controller - you may use context tracking object:

    # in MyApp.pm
    sub build {
        my $self = shift;

        # get a temporary rebless of the app and call its bulid method
        # will return MyApp::Controller::Special, if route base is MyApp::Controller
        my $controller_special = $self->context->controller('Special');
        $controller_special->build;

        # will return the main controller (MyApp::Controller)
        my $controller = $self->context->controller;
        $controller->build;

    }

Note that you will still have to use the controller name in routes even though they live in the same class:

    # in MyApp/Controller/Special.pm
    sub build {
        my $self = shift;

        # need to add special, even though this is controller special
        $self->add_route('/my_route' => 'special#handler');
    }

    sub handler { ... }

NOTE: Take extra care not to call build again if it wasn't overridden in a controller, as the controller will try to re-initialize the app, which will surely result in a loop! In addition, make sure to never call $self->SUPER::build in a controller.

Getting a main application object in a controller

This may be done by similarly using context:

    sub handler {
        my $controller = shift;

        # this will always be the main app object
        my $app = $controller->context->app;
    }

SEE ALSO

Kelp::Manual

SUPPORT