logon action module

Called from PIE login screen, checks authentication and presents correct initial
PIE screen for new session

action routine

Input: CGI data from UIG (which contains username, password)
Output: Prints http location to return user to appropriate page

PDL

Require access package
Call access routine to check username/password against authentication broker
Unless success
    Call onerror routine (this exits)
Set email from auth broker response
Calculate time/date in useable format
Get information about user from userdata table (this sets user default page id
if it exists)
Make email address lower case
If userdata has entry about this user
    Update userdata lastaction info
Else
    Call copy_page routine to create default page for user (as copy of system
    default)
    Insert basic user data into userdata table
    Set user default to user's default page id
If email != ""
    Add email address to list of groups returned by auth broker
    Foreach group
    	Print group name to log file
	Get data from groups table to see if group already listed
	Unless group listed
	    Insert data into groups table
Get list of children of default item from item table
Update viewitem table set expanded=1 for resources owned by user not in new
items list
Print data to log entry
If continue parameter set
    Set next="action=".continue."&".lastactiondata
Else
    If session parameter = "continue" and lastaction defined
    	Set next=lastaction
	If next is one of logon, exit or execute
	    Set next=action string to present user default page
	Else
	    Set next=action string to present user default page
Print http location command with URL of CGI . next
Exit 0