|
NAMEGantry::Control - The Core for User Management and Administration SYNOPSIS use Gantry::Control;
dec2bin
( $one, $two, $three ) = dec2bin( $bits );
encrypt
$encrypted = encrypt( $unencripted );
get_grnam
$gid = get_grnam( $dbh, $group_name );
get_grgid
$group_name = get_grgid( $dbh, $gid );
get_pwnam
( $user_id, $active, $passwd, $first, $last, $email ) =
get_pwnam( $dbh, $user_name );
get_pwuid
( $user_name, $active, $passwd, $first, $last, $email ) =
get_pwuid( $dbh, $user_id );
get_usergrp
$grp = get_usrgrp( $dbh, $uid );
DESCRIPTIONThis module is a library of useful access functions that would be used in other handlers, it also details the other modules that belong to the Control tree. FUNCTIONS
MODULES
SCHEMA FOR AUTH TABLES create sequence "auth_users";
create table "auth_users" (
"id" int4 default nextval('auth_users_seq'::text) NOT NULL,
"user_id" int4 default currval('auth_users_seq') NOT NULL,
"active" bool,
"user_name" varchar,
"passwd" varchar,
"crypt" varchar,
"first_name" varchar,
"last_name" varchar,
"email" varchar,
CONSTRAINT auth_users_pk PRIMARY KEY (user_id)
);
create sequence "auth_groups_seq";
create table "auth_groups" (
"id" int4 default nextval('auth_groups_seq'::text) NOT NULL,
"name" varchar,
"ident" varchar,
"description" text
);
create sequence "auth_pages_seq";
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
);
create sequence "auth_group_members_seq";
create table "auth_group_members" (
"id" int4 default nextval('auth_group_members_seq'::text) NOT NULL,
"user_id" int4,
"group_id" int4
);
SEE ALSOGantry(3) AUTHORTim Keefer <tkeefer@gmail.com> Nick Studt COPYRIGHTCopyright (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.
|