• Publicity: Public Only All

admin-procs.tcl

Procedures used only in admin pages (mostly the user class stuff).

Location:
packages/acs-tcl/tcl/admin-procs.tcl
Created:
11/18/98
Author:
Multiple
CVS Identification:
$Id: admin-procs.tcl,v 1.33 2024/10/28 16:04:31 gustafn Exp $

Procedures in this file

Detailed information

ad_registration_finite_state_machine_admin_links (public)

 ad_registration_finite_state_machine_admin_links [ -nohtml ] \
    member_state email_verified_p user_id [ return_url ]

Returns the administration links to change the user's state in the user_state finite state machine. If the nohtml switch is set, then a list of lists will be returned (url label).

Switches:
-nohtml (optional, boolean)
Parameters:
member_state (required)
email_verified_p (required)
user_id (required)
return_url (optional)

Partial Call Graph (max 5 caller/called nodes):
%3 packages/acs-admin/www/users/complex-search.tcl packages/acs-admin/ www/users/complex-search.tcl ad_registration_finite_state_machine_admin_links ad_registration_finite_state_machine_admin_links packages/acs-admin/www/users/complex-search.tcl->ad_registration_finite_state_machine_admin_links packages/acs-admin/www/users/one.tcl packages/acs-admin/ www/users/one.tcl packages/acs-admin/www/users/one.tcl->ad_registration_finite_state_machine_admin_links packages/acs-admin/www/users/search.tcl packages/acs-admin/ www/users/search.tcl packages/acs-admin/www/users/search.tcl->ad_registration_finite_state_machine_admin_links packages/chat/www/search-2.tcl packages/chat/ www/search-2.tcl packages/chat/www/search-2.tcl->ad_registration_finite_state_machine_admin_links _ _ (public) ad_registration_finite_state_machine_admin_links->_ export_vars export_vars (public) ad_registration_finite_state_machine_admin_links->export_vars

Testcases:
No testcase defined.

ad_restrict_to_https (public)

 ad_restrict_to_https args why

Redirects user to HTTPS.

Parameters:
args (required)
why (required)
Author:
Allen Pulsifer <pulsifer@mediaone.net>
Created:
2 November 2000

Partial Call Graph (max 5 caller/called nodes):
%3 ad_return_url ad_return_url (public) ad_returnredirect ad_returnredirect (public) security::get_secure_qualified_url security::get_secure_qualified_url (private) security::secure_conn_p security::secure_conn_p (public) ad_restrict_to_https ad_restrict_to_https ad_restrict_to_https->ad_return_url ad_restrict_to_https->ad_returnredirect ad_restrict_to_https->security::get_secure_qualified_url ad_restrict_to_https->security::secure_conn_p

Testcases:
No testcase defined.

ad_user_class_description (public, deprecated)

 ad_user_class_description set_id
Deprecated. Invoking this procedure generates a warning.

Takes an ns_set of key/value pairs and produces a human-readable description of the class of users specified. DEPRECATED: this was a private api, used nowhere in upstream code. I do not delete it for reference.

Parameters:
set_id (required)
See Also:
  • nothing

Partial Call Graph (max 5 caller/called nodes):
%3 ad_log_deprecated ad_log_deprecated (public) ad_ns_set_to_tcl_vars ad_ns_set_to_tcl_vars (public, deprecated) ad_user_class_parameters ad_user_class_parameters (private) db_string db_string (public) parameter::get parameter::get (public) ad_user_class_description ad_user_class_description ad_user_class_description->ad_log_deprecated ad_user_class_description->ad_ns_set_to_tcl_vars ad_user_class_description->ad_user_class_parameters ad_user_class_description->db_string ad_user_class_description->parameter::get

Testcases:
No testcase defined.
[ show source ]