--- a/include/dirtree.h

+++ b/include/dirtree.h

   pr_table_t *notes;		/* Private data for passing/retaining between handlers */

   int cmd_id;			/* Index into commands list, for faster comparisons */

+  int error_code;               /* Stores errno of failed file transfer

+                                 * commands. Required for Solaris auditing.

+                                 */

 } cmd_rec;

 struct config_struc {

diff --git a/modules/mod_core.c b/modules/mod_core.c

--- a/modules/mod_core.c

+++ b/modules/mod_core.c

   dir = dir_canonical_path(cmd->tmp_pool, dir);

   if (dir == NULL) {

     int xerrno = EINVAL;

+    cmd->error_code = EINVAL;

     pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));

   if (!dir_check_canon(cmd->tmp_pool, cmd, cmd->group, dir, NULL)) {

     int xerrno = EACCES;

+    cmd->error_code = EACCES;

     pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));

   if (pr_fsio_rmdir(dir) < 0) {

     int xerrno = errno;

+    cmd->error_code = errno;

     (void) pr_trace_msg("fileperms", 1, "%s, user '%s' (UID %lu, GID %lu): "

       "error removing directory '%s': %s", cmd->argv[0], session.user,

   dir = dir_canonical_path(cmd->tmp_pool, dir);

   if (dir == NULL) {

     int xerrno = EINVAL;

+    cmd->error_code = EINVAL;

     pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));

   if (!dir_check_canon(cmd->tmp_pool, cmd, cmd->group, dir, NULL)) {

     int xerrno = EACCES;

+    cmd->error_code = EACCES;

     pr_log_debug(DEBUG8, "%s command denied by <Limit> config", cmd->argv[0]);

     pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));

   if (pr_fsio_smkdir(cmd->tmp_pool, dir, 0777, session.fsuid,

       session.fsgid) < 0) {

     int xerrno = errno;

+    cmd->error_code = errno;

     (void) pr_trace_msg("fileperms", 1, "%s, user '%s' (UID %lu, GID %lu): "

       "error making directory '%s': %s", cmd->argv[0], session.user,

       !dir_check(cmd->tmp_pool, cmd, cmd->group, path, NULL) ||

       pr_fsio_stat(path, &st) == -1) {

     int xerrno = errno;

+    cmd->error_code = errno;

     pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));

   path = dir_canonical_path(cmd->tmp_pool, path);

   if (path == NULL) {

     int xerrno = ENOENT;

     pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));

     int xerrno = errno;

+    cmd->error_code = errno;

     pr_log_debug(DEBUG7, "deleting '%s' denied by <Limit> configuration", path);

     pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));

   pr_fs_clear_cache();

   if (pr_fsio_lstat(path, &st) < 0) {

     int xerrno = errno;

+    cmd->error_code = errno;

     pr_log_debug(DEBUG3, "unable to lstat '%s': %s", path, strerror(xerrno));

     pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));

    */

   if (S_ISDIR(st.st_mode)) {

     int xerrno = EISDIR;

+    cmd->error_code = EISDIR;

     (void) pr_trace_msg("fileperms", 1, "%s, user '%s' (UID %lu, GID %lu): "

       "error deleting '%s': %s", cmd->argv[0], session.user,

   if (pr_fsio_unlink(path) < 0) {

     int xerrno = errno;

+    cmd->error_code = errno;

     (void) pr_trace_msg("fileperms", 1, "%s, user '%s' (UID %lu, GID %lu): "

       "error deleting '%s': %s", cmd->argv[0], session.user,

       !dir_check_canon(cmd->tmp_pool, cmd, cmd->group, path, NULL) ||

       pr_fsio_rename(session.xfer.path, path) == -1) {

     int xerrno = errno;

+    cmd->error_code = errno;

     if (xerrno != EXDEV) {

       (void) pr_trace_msg("fileperms", 1, "%s, user '%s' (UID %lu, GID %lu): "

      */

     if (pr_fs_copy_file(session.xfer.path, path) < 0) {

       xerrno = errno;

+      cmd->error_code = errno;

       (void) pr_trace_msg("fileperms", 1, "%s, user '%s' (UID %lu, GID %lu): "

         "error copying '%s' to '%s': %s", cmd->argv[0], session.user,

     /* Once copied, unlink the original file. */

     if (pr_fsio_unlink(session.xfer.path) < 0) {

+      cmd->error_code = errno;

+

       pr_log_debug(DEBUG0, "error unlinking '%s': %s", session.xfer.path,

         strerror(errno));

     }

       !exists(path)) {

     int xerrno = errno;

+    cmd->error_code = errno;

     pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));

diff --git a/modules/mod_xfer.c b/modules/mod_xfer.c

--- a/modules/mod_xfer.c

+++ b/modules/mod_xfer.c

   if (cmd->argc < 2) {

+    cmd->error_code = EINVAL;

     errno = EINVAL;

     return PR_ERROR(cmd);

   }

   if (!path ||

       !dir_check(cmd->tmp_pool, cmd, cmd->group, path, NULL)) {

     int xerrno = errno;

+    cmd->error_code = errno;

     pr_log_debug(DEBUG8, "%s %s denied by <Limit> configuration", cmd->argv[0],

       cmd->arg);

   if (xfer_check_limit(cmd) < 0) {

     pr_response_add_err(R_451, _("%s: Too many transfers"), cmd->arg);

     errno = EPERM;

+    cmd->error_code = EPERM;

     return PR_ERROR(cmd);

   }

     pr_log_debug(DEBUG6, "AllowOverwrite denied permission for %s", cmd->arg);

     pr_response_add_err(R_550, _("%s: Overwrite permission denied"), cmd->arg);

     errno = EACCES;

+    cmd->error_code = EACCES;

     return PR_ERROR(cmd);

   }

       /* Deliberately use EISDIR for anything non-file (e.g. directories). */

       errno = EISDIR;

+      cmd->error_code = EISDIR;

       return PR_ERROR(cmd);

     }

   }

     session.restart_pos = 0L;

     session.xfer.xfer_type = STOR_DEFAULT;

     errno = EPERM;

+    cmd->error_code = EPERM;

     return PR_ERROR(cmd);

   }

   /* Otherwise everthing is good */

   if (pr_table_add(cmd->notes, "mod_xfer.store-path",

+    cmd->error_code = errno;

       pr_response_add_err(R_501,

         _("REST not compatible with server configuration"));

       errno = EINVAL;

+      cmd->error_code = EINVAL;

       return PR_ERROR(cmd);

     }

       pr_response_add_err(R_550,

         _("APPE not compatible with server configuration"));

       errno = EINVAL;

+      cmd->error_code = EINVAL;

       return PR_ERROR(cmd);

     }

   tmpfd = mkstemp(filename);

   if (tmpfd < 0) {

+    cmd->error_code = errno;

   if (!filename ||

       !dir_check(cmd->tmp_pool, cmd, cmd->group, filename, NULL)) {

     int xerrno = errno;

+    cmd->error_code = errno;

     /* Do not forget to delete the file created by mkstemp(3) if there is

      * an error.

   if (xfer_check_limit(cmd) < 0) {

     pr_response_add_err(R_451, _("%s: Too many transfers"), cmd->arg);

     errno = EPERM;

+    cmd->error_code = EPERM;

     return PR_ERROR(cmd);

   }

     if (stor_fh) {

       if (pr_fsio_lseek(stor_fh, 0, SEEK_END) == (off_t) -1) {

+        cmd->error_code = errno;

         pr_log_debug(DEBUG4, "unable to seek to end of '%s' for appending: %s",

           cmd->arg, strerror(errno));

         (void) pr_fsio_close(stor_fh);

     } else {

       ferrno = errno;

+      cmd->error_code = errno;

       (void) pr_trace_msg("fileperms", 1, "%s, user '%s' (UID %lu, GID %lu): "

         "error opening '%s': %s", cmd->argv[0], session.user,

         O_WRONLY|(session.restart_pos ? 0 : O_TRUNC|O_CREAT));

     if (stor_fh == NULL) {

       ferrno = errno;

+      cmd->error_code = errno;

       (void) pr_trace_msg("fileperms", 1, "%s, user '%s' (UID %lu, GID %lu): "

         "error opening '%s': %s", cmd->argv[0], session.user,

     int xerrno = 0;

     if (pr_fsio_lseek(stor_fh, session.restart_pos, SEEK_SET) == -1) {

+      cmd->error_code = errno;

       pr_log_debug(DEBUG4, "unable to seek to position %" PR_LU " of '%s': %s",

         (pr_off_t) session.restart_pos, cmd->arg, strerror(errno));

       xerrno = errno;

     } else if (pr_fsio_stat(path, &st) == -1) {

+      cmd->error_code = errno;

       pr_log_debug(DEBUG4, "unable to stat '%s': %s", cmd->arg,

         strerror(errno));

       xerrno = errno;

     res = pr_fsio_write(stor_fh, lbuf, len);

     if (res != len) {

       int xerrno = EIO;

+      cmd->error_code = errno;

       if (res < 0)

         xerrno = errno;

       if (xerrno == EDQUOT) {

         pr_response_add_err(R_552, "%s: %s", cmd->arg, strerror(xerrno));

         errno = xerrno;

         return PR_ERROR(cmd);

       }

 #elif defined(EFBIG)

       if (xerrno == EFBIG) {

         pr_response_add_err(R_552, "%s: %s", cmd->arg, strerror(xerrno));

         errno = xerrno;

         return PR_ERROR(cmd);

       }

 #endif

         session.xfer.path_hidden) {

       if (pr_fsio_rename(session.xfer.path_hidden, session.xfer.path) != 0) {

+        cmd->error_code = errno;

         /* This should only fail on a race condition with a chmod/chown

          * or if STOR_APPEND is on and the permissions are squirrely.

     errno = EINVAL;

+    cmd->error_code = EINVAL;

     return PR_ERROR(cmd);

   }

   if (!dir ||

       !dir_check(cmd->tmp_pool, cmd, cmd->group, dir, NULL)) {

     int xerrno = errno;

     pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));

   if (xfer_check_limit(cmd) < 0) {

     pr_response_add_err(R_451, _("%s: Too many transfers"), cmd->arg);

     errno = EPERM;

+    cmd->error_code = EPERM;

     return PR_ERROR(cmd);

   }

     /* Deliberately use EISDIR for anything non-file (e.g. directories). */

     errno = EISDIR;

+    cmd->error_code = EISDIR;

     return PR_ERROR(cmd);

   }

       cmd->arg);

     session.restart_pos = 0L;

     errno = EPERM;

+    cmd->error_code = EPERM;

     return PR_ERROR(cmd);

   }

   retr_fh = pr_fsio_open(dir, O_RDONLY);

   if (retr_fh == NULL) {

     int xerrno = errno;

+    cmd->error_code = errno;

     (void) pr_trace_msg("fileperms", 1, "%s, user '%s' (UID %lu, GID %lu): "

       "error opening '%s': %s", cmd->argv[0], session.user,

   if (pr_fsio_stat(dir, &st) < 0) {

     /* Error stat'ing the file. */

     int xerrno = errno;

+    cmd->error_code = errno;

     pr_fsio_close(retr_fh);

     errno = xerrno;

     if (pr_fsio_lseek(retr_fh, session.restart_pos,

         SEEK_SET) == (off_t) -1) {

       int xerrno = errno;

+      cmd->error_code = errno;

       pr_fsio_close(retr_fh);

       errno = xerrno;

       retr_fh = NULL;

     retr_abort();

     /* Set errno to EPERM ("Operation not permitted") */

+    cmd->error_code = EPERM;

     pr_data_abort(EPERM, FALSE);

     return PR_ERROR(cmd);

   }

        * is preserved; errno itself might be overwritten in retr_abort().

        */

       int xerrno = errno;

+      cmd->error_code = errno;

       retr_abort();