(imap4d_login): Call imap4d_check_home_dir before switching to user's

privileges. Bail out if it returns with an error. Use util_chdir
instead of chdir to change to user's home directory.

 /* GNU Mailutils -- a suite of utilities for electronic mail
 /* GNU Mailutils -- a suite of utilities for electronic mail
-   Copyright (C) 1999, 2001, 2002 Free Software Foundation, Inc.
+   Copyright (C) 1999, 2001, 2002, 2006 Free Software Foundation, Inc.
 
 
    GNU Mailutils is free software; you can redistribute it and/or modify
    GNU Mailutils is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    it under the terms of the GNU General Public License as published by
@@ -54,12 +54,17 @@ imap4d_login (struct imap4d_command *command, char *arg)
       syslog (LOG_INFO, _("Login failed: %s"), username);
       syslog (LOG_INFO, _("Login failed: %s"), username);
       return util_finish (command, RESP_NO, "User name or passwd rejected");
       return util_finish (command, RESP_NO, "User name or passwd rejected");
     }
     }
-  
+
+  homedir = mu_normalize_path (strdup (auth_data->dir), "/");
+  if (imap4d_check_home_dir (homedir, auth_data->uid, auth_data->gid))
+    return util_finish (command, RESP_NO,
+			"User name or passwd rejected");
+        
   if (auth_data->change_uid)
   if (auth_data->change_uid)
     setuid (auth_data->uid);
     setuid (auth_data->uid);
 
 
-  homedir = mu_normalize_path (strdup (auth_data->dir), "/");
-  chdir (homedir);
+  util_chdir (homedir);
+    
   namespace_init (homedir);
   namespace_init (homedir);
   syslog (LOG_INFO, _("User `%s' logged in"), username);
   syslog (LOG_INFO, _("User `%s' logged in"), username);
   return util_finish (command, RESP_OK, "Completed");
   return util_finish (command, RESP_OK, "Completed");