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

Gantry::Control::C::Pages - Page based control adminstration.

SYNOPSIS

use Gantry::Control::C::Pages;

DESCRIPTION

This module is the frontend for the Gantry::Control::Authz::PageBased authentication handler. One would specify pages as well as the permissions with this frontend module.

APACHE

Sample Apache configuration.

<Location /admin/pages >
  SetHandler  perl-script

  PerlSetVar  title   "Page Accesst: "

  PerlSetVar  dbconn  "dbi:Pg:dbname=..."
  PerlSetVar  dbuser  "<database_username>"
  PerlSetVar  dbpass  "<database_password>"
  PerlSetVar  dbcommit  off

  PerlHandler Gantry::Control::C::Pages
</Location>

DATABASE

This is the auth_pages table that is used by this module. It also uses the auth_users and auth_groups tables for reference.

create table "auth_pages" (
  "id"            int4 default nextval('auth_pages_seq'::text) NOT NULL,
  "user_perm"     int4,
  "group_perm"    int4,
  "world_perm"    int4,
  "owner_id"      int4,
  "group_id"      int4,
  "uri"           varchar,
  "title"         varchar
);

METHODS

add_page

Gantry::Plugins::CRUD callback.

delete_page

Gantry::Plugins::CRUD callback.

do_add

Called by Gantry handler.

do_delete

Called by Gantry handler.

do_edit

Called by Gantry handler.

do_main

Called by Gantry handler.

edit_page

Gantry::Plugins::CRUD callback.

page_form

The form description.

redirect_to_main

Gantry::Plugins::CRUD callback.

There is also one method designed to be called by template wrappers.

Returns site nav links and their text.

SEE ALSO

Gantry::Control(3), Gantry::Control::C::Users(3), Gantry::Control::C::Groups(3), Gantry::Control::C::Authz::PageBased(3)

LIMITATIONS

AUTHOR

Tim Keefer <tkeefer@gmail.com> Nicholas Studt <nstudt@angrydwarf.org>

COPYRIGHT

Copyright (c) 2005-6, Tim Keefer.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.6 or, at your option, any later version of Perl 5 you may have available.