28 require_once(
"DataUpdate.php");
30 if ( !function_exists(
'auth_functions_deprecated') ) {
34 function auth_functions_deprecated( $method, $message = null ) {
35 $stack = debug_backtrace();
37 dbg_error_log(
"ERROR",
" auth-functions: Call to deprecated routine '%s'%s", $method, (isset($message)?
': '.$message:
'') );
38 foreach( $stack AS $k => $v ) {
39 dbg_error_log(
'ERROR',
' auth-functions: Deprecated call from line %4d of %s', $v[
'line'], $v[
'file']);
47 function getUserByName( $username, $use_cache=
true ) {
48 auth_functions_deprecated(
'getUserByName',
'replaced by Principal class');
49 return new Principal(
'username', $username, $use_cache);
55 function getUserByEMail( $email, $use_cache =
true ) {
56 auth_functions_deprecated(
'getUserByEMail',
'replaced by Principal class');
57 return new Principal(
'email', $email, $use_cache);
63 function getUserByID( $user_no, $use_cache =
true ) {
64 auth_functions_deprecated(
'getUserByID',
'replaced by Principal class');
65 return new Principal(
'user_no', $user_no, $use_cache);
71 function getPrincipalByID( $principal_id, $use_cache =
true ) {
72 auth_functions_deprecated(
'getPrincipalByID',
'replaced by Principal class');
73 return new Principal(
'principal_id', $principal_id, $use_cache);
81 function CreateHomeCollections( $username, $defult_timezone = null ) {
84 if ( !isset($c->default_collections) )
86 $c->default_collections = array();
88 if( !empty($c->home_calendar_name) )
89 $c->default_collections[] = array(
'type' =>
'calendar',
'name' => $c->home_calendar_name );
90 if( !empty($c->home_addressbook_name) )
91 $c->default_collections[] = array(
'type' =>
'addressbook',
'name' => $c->home_addressbook_name );
94 if ( !is_array($c->default_collections) || !count($c->default_collections) )
return true;
96 $principal =
new Principal(
'username',$username);
98 $user_fullname = $principal->fullname;
99 $user_rfullname = implode(
' ', array_reverse(explode(
' ', $principal->fullname)));
101 $sql =
'INSERT INTO collection (user_no, parent_container, dav_name, dav_etag, dav_displayname, is_calendar, is_addressbook, default_privileges, created, modified, resourcetypes) ';
102 $sql .=
'VALUES( :user_no, :parent_container, :collection_path, :dav_etag, :displayname, :is_calendar, :is_addressbook, :privileges::BIT(24), current_timestamp, current_timestamp, :resourcetypes );';
104 foreach( $c->default_collections as $v ) {
105 if ( $v[
'type'] ==
'calendar' || $v[
'type']==
'addressbook' ) {
106 if ( !empty($v[
'name']) ) {
107 $qry =
new AwlQuery(
'SELECT 1 FROM collection WHERE dav_name = :dav_name', array(
':dav_name' => $principal->dav_name().$v[
'name'].
'/') );
108 if ( !$qry->Exec() ) {
109 $c->messages[] = i18n(
'There was an error reading from the database.');
112 if ( $qry->rows() > 0 ) {
113 $c->messages[] = i18n(
'Home '.( $v[
'type']==
'calendar' ?
'calendar' :
'addressbook' ).
' already exists.');
117 $params[
':user_no'] = $principal->user_no();
118 $params[
':parent_container'] = $principal->dav_name();
119 $params[
':dav_etag'] =
'-1';
120 $params[
':collection_path'] = $principal->dav_name().$v[
'name'].
'/';
121 $params[
':displayname'] = ( !isset($v[
'displayname']) || empty($v[
'displayname']) ? $user_fullname.( $v[
'type']==
'calendar' ?
' calendar' :
' addressbook' ) : str_replace(array(
'%fn',
'%rfn'), array($user_fullname, $user_rfullname), $v[
'displayname']) );
122 $params[
':resourcetypes'] = ( $v[
'type']==
'calendar' ?
'<DAV::collection/><urn:ietf:params:xml:ns:caldav:calendar/>' :
'<DAV::collection/><urn:ietf:params:xml:ns:carddav:addressbook/>' );
123 $params[
':is_calendar'] = ( $v[
'type']==
'calendar' ? true : false );
124 $params[
':is_addressbook'] = ( $v[
'type']==
'addressbook' ? true : false );
125 $params[
':privileges'] = ( !isset($v[
'privileges']) || $v[
'privileges']===null ? null : privilege_to_bits($v[
'privileges']) );
127 $qry =
new AwlQuery( $sql, $params );
128 if ( $qry->Exec() ) {
129 $c->messages[] = i18n(
'Home '.( $v[
'type']==
'calendar' ?
'calendar' :
'addressbook' ).
' added.');
130 dbg_error_log(
"User",
":Write: Created user's home ".( $v[
'type']==
'calendar' ?
'calendar' :
'addressbook' ).
" at '%s'", $params[
':collection_path'] );
133 if($v[
'type'] ==
'calendar' && isset($v[
'calendar_components']) && $v[
'calendar_components'] != null && is_array($v[
'calendar_components']) && count($v[
'calendar_components'])) {
135 $components_clean=array_intersect(array_map(
"strtoupper", $v[
'calendar_components']), array(
'VEVENT',
'VTODO',
'VJOURNAL',
'VTIMEZONE',
'VFREEBUSY',
'VPOLL',
'VAVAILABILITY'));
139 foreach($components_clean as $curr)
140 $result_xml.=sprintf(
'<comp name="%s" xmlns="urn:ietf:params:xml:ns:caldav"/>', $curr);
144 $v[
'default_properties'][
'urn:ietf:params:xml:ns:caldav:supported-calendar-component-set']=$result_xml;
148 if(isset($v[
'default_properties']) && $v[
'default_properties'] != null && is_array($v[
'default_properties']) && count($v[
'default_properties'])) {
149 $sql2=
'INSERT INTO property (dav_name, property_name, property_value, changed_on, changed_by) ';
150 $sql2.=
'VALUES (:collection_path, :property_name, :property_value, current_timestamp, :user_no);';
151 $params2[
':user_no'] = $principal->user_no();
152 $params2[
':collection_path'] = $principal->dav_name().$v[
'name'].
'/';
154 foreach( $v[
'default_properties'] AS $key => $val ) {
155 $params2[
':property_name'] = $key;
156 $params2[
':property_value'] = $val;
158 $qry2 =
new AwlQuery( $sql2, $params2 );
159 if ( $qry2->Exec() ) {
160 dbg_error_log(
"User",
":Write: Created property '%s' for ".( $v[
'type']==
'calendar' ?
'calendar' :
'addressbook' ).
" at '%s'", $params2[
':property_name'], $params2[
':collection_path'] );
163 $c->messages[] = i18n(
"There was an error writing to the database.");
170 $c->messages[] = i18n(
"There was an error writing to the database.");
184 function CreateHomeCalendar($username) {
185 auth_functions_deprecated(
'CreateHomeCalendar',
'renamed to CreateHomeCollections');
186 return CreateHomeCollections($username);
193 function CreateDefaultRelationships( $username ) {
195 if(! isset($c->default_relationships) || count($c->default_relationships) == 0)
return true;
198 $principal =
new Principal(
'username', $username,
true);
199 foreach($c->default_relationships as $group => $relationships)
201 $sql =
'INSERT INTO grants (by_principal, to_principal, privileges) VALUES(:by_principal, :to_principal, :privileges::INT::BIT(24))';
203 ':by_principal' => $principal->principal_id,
204 ':to_principal' => $group,
205 ':privileges' => privilege_to_bits($relationships)
207 $qry =
new AwlQuery($sql, $params);
209 if ( $qry->Exec() ) {
211 dbg_error_log(
"User",
":Write: Created user's default relationship by:'%s', to:'%s', privileges:'%s'",$params[
':by_principal'],$params[
':to_principal'],$params[
':privileges']);
214 $c->messages[] = i18n(
"There was an error writing to the database.");
220 $c->messages[] = i18n(
"Default relationships added.");
230 function UpdateCollectionTimezones( $username, $new_timezone=null ) {
231 if ( empty($new_timezone) )
return;
232 $qry =
new AwlQuery(
'UPDATE collection SET timezone=? WHERE dav_name LIKE ? AND is_calendar',
'/'.$username.
'/%', $new_timezone);
240 function UpdateUserFromExternal( &$usr ) {
243 auth_functions_deprecated(
'UpdateUserFromExternal',
'refactor to use the "Principal" class');
247 if ( !isset($usr->user_no) || intval($usr->user_no) == 0 ) {
248 $qry =
new AwlQuery(
"SELECT nextval('usr_user_no_seq');" );
249 $qry->Exec(
'Login',__LINE__,__FILE__);
250 $sequence_value = $qry->Fetch(
true);
251 $usr->user_no = $sequence_value[0];
254 $qry =
new AwlQuery(
'SELECT * FROM usr WHERE user_no = :user_no', array(
':user_no' => $usr->user_no) );
255 if ( $qry->Exec(
'Login',__LINE__,__FILE__) && $qry->rows() == 1 ) {
257 if ( $old = $qry->Fetch() ) {
259 foreach( $usr AS $k => $v ) {
260 if ( $old->{$k} != $v ) {
262 dbg_error_log(
"Login",
"User '%s' field '%s' changed from '%s' to '%s'", $usr->username, $k, $old->{$k}, $v );
267 dbg_error_log(
"Login",
"No changes to user record for '%s' - leaving as-is.", $usr->username );
268 if ( isset($usr->active) && $usr->active ==
'f' )
return false;
272 dbg_error_log(
"Login",
"Changes to user record for '%s' - updating.", $usr->username );
280 if ( $type !=
'INSERT' ) $params[
':user_no'] = $usr->user_no;
281 $qry =
new AwlQuery( sql_from_object( $usr, $type,
'usr',
'WHERE user_no= :user_no' ), $params );
282 $qry->Exec(
'Login',__LINE__,__FILE__);
287 if ( isset($usr->active) && ($usr->active ===
'f' || $usr->active ===
false) )
return false;
289 if ( $type ==
'INSERT' ) {
290 $qry =
new AwlQuery(
'INSERT INTO principal( type_id, user_no, displayname, default_privileges) SELECT 1, user_no, fullname, :privs::INT::BIT(24) FROM usr WHERE username=(text(:username))',
291 array(
':privs' => privilege_to_bits($c->default_privileges),
':username' => $usr->username) );
292 $qry->Exec(
'Login',__LINE__,__FILE__);
293 CreateHomeCalendar($usr->username);
294 CreateDefaultRelationships($usr->username);
296 else if ( $usr->fullname != $old->{
'fullname'} ) {
298 $qry->QDo(
'UPDATE principal SET displayname=:new_display WHERE user_no=:user_no',
299 array(
':new_display' => $usr->fullname,
':user_no' => $usr->user_no)
325 function AuthExternalAWL( $username, $password ) {
328 $persistent = isset($c->authenticate_hook[
'config'][
'use_persistent']) && $c->authenticate_hook[
'config'][
'use_persistent'];
330 if ( isset($c->authenticate_hook[
'config'][
'columns']) )
331 $cols = $c->authenticate_hook[
'config'][
'columns'];
335 if ( isset($c->authenticate_hook[
'config'][
'where']) )
336 $andwhere =
' AND '.$c->authenticate_hook[
'config'][
'where'];
340 $qry =
new AwlQuery(
'SELECT '.$cols.
' FROM usr WHERE lower(username) = :username '. $andwhere, array(
':username' => strtolower($username) ));
341 $authconn = $qry->SetConnection($c->authenticate_hook[
'config'][
'connection'], ($persistent ? array(PDO::ATTR_PERSISTENT =>
true) : null));
344 <html><head><title>Database Connection Failure</title></head><body>
345 <h1>Database Error</h1>
346 <h3>Could not connect to PostgreSQL database</h3>
350 @ob_flush(); exit(1);
353 if ( $qry->Exec(
'Login',__LINE__,__FILE__) && $qry->rows() == 1 ) {
354 $usr = $qry->Fetch();
355 if ( session_validate_password( $password, $usr->password ) ) {
356 $principal =
new Principal(
'username',$username);
357 if ( $principal->Exists() ) {
358 if ( $principal->modified <= $usr->updated )
359 $principal->Update($usr);
362 $principal->Create($usr);
363 CreateHomeCollections($username);
364 CreateDefaultRelationships($username);
370 if ( isset($usr->active) && $usr->active ==
'f' )
return false;