im_is_user_site_wide_or_intranet_admin

im_is_user_site_wide_or_intranet_admin   db   { user_id "" }

Returns 1 if a user is a site-wide administrator or a member of the intranet administrative group

Source code:

    if { [empty_string_p $user_id] } {
	set user_id [ad_verify_and_get_user_id $db]
    }
    if { $user_id == 0 } {
	return 0
    }
    if { [im_user_intranet_admin_p $db $user_id] } {
	# Site-Wide Intranet Administrator
	return 1
    } elseif { [ad_permission_p $db site_wide "" "" $user_id] } {
	# Site-Wide Administrator
	return 1
    } 
    return 0