components/proftpd/patches/proftpd-error_code.patch
branchs11u2-sru
changeset 3234 1de12229da80
parent 2724 90c18e89db60
--- a/components/proftpd/patches/proftpd-error_code.patch	Fri Jul 25 13:25:28 2014 -0700
+++ b/components/proftpd/patches/proftpd-error_code.patch	Mon Jul 28 03:27:16 2014 -0700
@@ -1,9 +1,12 @@
+diff --git a/include/dirtree.h b/include/dirtree.h
+index 0f41986..fe7b14b 100644
 --- a/include/dirtree.h
 +++ b/include/dirtree.h
-@@ -113,6 +113,9 @@ typedef struct cmd_struc {
+@@ -126,6 +126,10 @@ typedef struct cmd_struc {
    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.
 +                                 */
@@ -11,10 +14,10 @@
  
  struct config_struc {
 diff --git a/modules/mod_core.c b/modules/mod_core.c
-index ff400f6..18a47c2 100644
+index e33ee11..f680748 100644
 --- a/modules/mod_core.c
 +++ b/modules/mod_core.c
-@@ -4554,6 +4554,7 @@ MODRET core_rmd(cmd_rec *cmd) {
+@@ -4775,6 +4775,7 @@ MODRET core_rmd(cmd_rec *cmd) {
    dir = dir_canonical_path(cmd->tmp_pool, dir);
    if (dir == NULL) {
      int xerrno = EINVAL;
@@ -22,7 +25,7 @@
  
      pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));
  
-@@ -4563,6 +4564,7 @@ MODRET core_rmd(cmd_rec *cmd) {
+@@ -4784,6 +4785,7 @@ MODRET core_rmd(cmd_rec *cmd) {
  
    if (!dir_check_canon(cmd->tmp_pool, cmd, cmd->group, dir, NULL)) {
      int xerrno = EACCES;
@@ -30,7 +33,7 @@
  
      pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));
  
-@@ -4572,6 +4574,7 @@ MODRET core_rmd(cmd_rec *cmd) {
+@@ -4793,6 +4795,7 @@ MODRET core_rmd(cmd_rec *cmd) {
  
    if (pr_fsio_rmdir(dir) < 0) {
      int xerrno = errno;
@@ -38,7 +41,7 @@
  
      (void) pr_trace_msg("fileperms", 1, "%s, user '%s' (UID %lu, GID %lu): "
        "error removing directory '%s': %s", cmd->argv[0], session.user,
-@@ -4628,6 +4631,7 @@ MODRET core_mkd(cmd_rec *cmd) {
+@@ -4849,6 +4852,7 @@ MODRET core_mkd(cmd_rec *cmd) {
    dir = dir_canonical_path(cmd->tmp_pool, dir);
    if (dir == NULL) {
      int xerrno = EINVAL;
@@ -46,7 +49,7 @@
  
      pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));
  
-@@ -4637,6 +4641,7 @@ MODRET core_mkd(cmd_rec *cmd) {
+@@ -4858,6 +4862,7 @@ MODRET core_mkd(cmd_rec *cmd) {
  
    if (!dir_check_canon(cmd->tmp_pool, cmd, cmd->group, dir, NULL)) {
      int xerrno = EACCES;
@@ -54,7 +57,7 @@
  
      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));
-@@ -4648,6 +4653,7 @@ MODRET core_mkd(cmd_rec *cmd) {
+@@ -4869,6 +4874,7 @@ MODRET core_mkd(cmd_rec *cmd) {
    if (pr_fsio_smkdir(cmd->tmp_pool, dir, 0777, session.fsuid,
        session.fsgid) < 0) {
      int xerrno = errno;
@@ -62,7 +65,7 @@
  
      (void) pr_trace_msg("fileperms", 1, "%s, user '%s' (UID %lu, GID %lu): "
        "error making directory '%s': %s", cmd->argv[0], session.user,
-@@ -4694,6 +4700,7 @@ MODRET core_mdtm(cmd_rec *cmd) {
+@@ -4915,6 +4921,7 @@ MODRET core_mdtm(cmd_rec *cmd) {
        !dir_check(cmd->tmp_pool, cmd, cmd->group, path, NULL) ||
        pr_fsio_stat(path, &st) == -1) {
      int xerrno = errno;
@@ -70,23 +73,23 @@
  
      pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));
  
-@@ -4805,6 +4812,7 @@ MODRET core_dele(cmd_rec *cmd) {
+@@ -5026,6 +5033,7 @@ MODRET core_dele(cmd_rec *cmd) {
    path = dir_canonical_path(cmd->tmp_pool, path);
    if (path == NULL) {
      int xerrno = ENOENT;
-+    cmd->error_code = ENONET;
++    cmd->error_code = ENOENT;
  
      pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));
  
-@@ -4814,6 +4822,7 @@ MODRET core_dele(cmd_rec *cmd) {
+@@ -5035,6 +5043,7 @@ MODRET core_dele(cmd_rec *cmd) {
  
-   if (!dir_check_canon(cmd->tmp_pool, cmd, cmd->group, path, NULL)) {
+   if (!dir_check(cmd->tmp_pool, cmd, cmd->group, path, NULL)) {
      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));
-@@ -4830,6 +4839,7 @@ MODRET core_dele(cmd_rec *cmd) {
+@@ -5051,6 +5060,7 @@ MODRET core_dele(cmd_rec *cmd) {
    pr_fs_clear_cache();
    if (pr_fsio_lstat(path, &st) < 0) {
      int xerrno = errno;
@@ -94,7 +97,7 @@
  
      pr_log_debug(DEBUG3, "unable to lstat '%s': %s", path, strerror(xerrno));
      pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));
-@@ -4844,6 +4854,7 @@ MODRET core_dele(cmd_rec *cmd) {
+@@ -5065,6 +5075,7 @@ MODRET core_dele(cmd_rec *cmd) {
     */
    if (S_ISDIR(st.st_mode)) {
      int xerrno = EISDIR;
@@ -102,7 +105,7 @@
  
      (void) pr_trace_msg("fileperms", 1, "%s, user '%s' (UID %lu, GID %lu): "
        "error deleting '%s': %s", cmd->argv[0], session.user,
-@@ -4860,6 +4871,7 @@ MODRET core_dele(cmd_rec *cmd) {
+@@ -5081,6 +5092,7 @@ MODRET core_dele(cmd_rec *cmd) {
   
    if (pr_fsio_unlink(path) < 0) {
      int xerrno = errno;
@@ -110,7 +113,15 @@
  
      (void) pr_trace_msg("fileperms", 1, "%s, user '%s' (UID %lu, GID %lu): "
        "error deleting '%s': %s", cmd->argv[0], session.user,
-@@ -4951,6 +4963,7 @@ MODRET core_rnto(cmd_rec *cmd) {
+@@ -5165,6 +5177,7 @@ MODRET core_rnto(cmd_rec *cmd) {
+     pr_log_debug(DEBUG6, "AllowOverwrite denied permission for %s", path);
+     pr_response_add_err(R_550, _("%s: Rename permission denied"), cmd->arg);
+     errno = EACCES;
++    cmd->error_code = EACCES;
+     return PR_ERROR(cmd);
+   }
+ 
+@@ -5172,6 +5185,7 @@ MODRET core_rnto(cmd_rec *cmd) {
        !dir_check_canon(cmd->tmp_pool, cmd, cmd->group, path, NULL) ||
        pr_fsio_rename(session.xfer.path, path) == -1) {
      int xerrno = errno;
@@ -118,7 +129,7 @@
  
      if (xerrno != EXDEV) {
        (void) pr_trace_msg("fileperms", 1, "%s, user '%s' (UID %lu, GID %lu): "
-@@ -4997,6 +5010,7 @@ MODRET core_rnto(cmd_rec *cmd) {
+@@ -5223,6 +5237,7 @@ MODRET core_rnto(cmd_rec *cmd) {
       */
      if (pr_fs_copy_file(session.xfer.path, path) < 0) {
        xerrno = errno;
@@ -126,7 +137,7 @@
  
        (void) pr_trace_msg("fileperms", 1, "%s, user '%s' (UID %lu, GID %lu): "
          "error copying '%s' to '%s': %s", cmd->argv[0], session.user,
-@@ -5012,6 +5026,8 @@ MODRET core_rnto(cmd_rec *cmd) {
+@@ -5238,6 +5253,8 @@ MODRET core_rnto(cmd_rec *cmd) {
  
      /* Once copied, unlink the original file. */
      if (pr_fsio_unlink(session.xfer.path) < 0) {
@@ -135,8 +146,8 @@
        pr_log_debug(DEBUG0, "error unlinking '%s': %s", session.xfer.path,
          strerror(errno));
      }
-@@ -5069,6 +5085,7 @@ MODRET core_rnfr(cmd_rec *cmd) {
-       !dir_check_canon(cmd->tmp_pool, cmd, cmd->group, path, NULL) ||
+@@ -5295,6 +5312,7 @@ MODRET core_rnfr(cmd_rec *cmd) {
+       !dir_check(cmd->tmp_pool, cmd, cmd->group, path, NULL) ||
        !exists(path)) {
      int xerrno = errno;
 +    cmd->error_code = errno;
@@ -144,18 +155,18 @@
      pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));
  
 diff --git a/modules/mod_xfer.c b/modules/mod_xfer.c
-index c153bb3..762b542 100644
+index bcfb487..41c597e 100644
 --- a/modules/mod_xfer.c
 +++ b/modules/mod_xfer.c
-@@ -1211,6 +1211,7 @@ MODRET xfer_pre_stor(cmd_rec *cmd) {
- 
+@@ -1190,6 +1190,7 @@ MODRET xfer_pre_stor(cmd_rec *cmd) {
    if (cmd->argc < 2) {
-     pr_response_add_err(R_500, _("'%s' not understood"), get_full_cmd(cmd));
+     pr_response_add_err(R_500, _("'%s' not understood"),
+       pr_cmd_get_displayable_str(cmd, NULL));
 +    cmd->error_code = EINVAL;
      errno = EINVAL;
      return PR_ERROR(cmd);
    }
-@@ -1221,6 +1222,7 @@ MODRET xfer_pre_stor(cmd_rec *cmd) {
+@@ -1200,6 +1201,7 @@ MODRET xfer_pre_stor(cmd_rec *cmd) {
    if (!path ||
        !dir_check(cmd->tmp_pool, cmd, cmd->group, path, NULL)) {
      int xerrno = errno;
@@ -163,7 +174,7 @@
  
      pr_log_debug(DEBUG8, "%s %s denied by <Limit> configuration", cmd->argv[0],
        cmd->arg);
-@@ -1233,6 +1235,7 @@ MODRET xfer_pre_stor(cmd_rec *cmd) {
+@@ -1232,6 +1234,7 @@ MODRET xfer_pre_stor(cmd_rec *cmd) {
    if (xfer_check_limit(cmd) < 0) {
      pr_response_add_err(R_451, _("%s: Too many transfers"), cmd->arg);
      errno = EPERM;
@@ -171,7 +182,7 @@
      return PR_ERROR(cmd);
    }
  
-@@ -1245,6 +1248,7 @@ MODRET xfer_pre_stor(cmd_rec *cmd) {
+@@ -1244,6 +1247,7 @@ MODRET xfer_pre_stor(cmd_rec *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;
@@ -179,16 +190,15 @@
      return PR_ERROR(cmd);
    }
  
-@@ -1268,6 +1272,8 @@ MODRET xfer_pre_stor(cmd_rec *cmd) {
+@@ -1267,6 +1271,7 @@ MODRET xfer_pre_stor(cmd_rec *cmd) {
  
        /* Deliberately use EISDIR for anything non-file (e.g. directories). */
        errno = EISDIR;
 +      cmd->error_code = EISDIR;
-+
        return PR_ERROR(cmd);
      }
    }
-@@ -1286,6 +1292,7 @@ MODRET xfer_pre_stor(cmd_rec *cmd) {
+@@ -1285,6 +1290,7 @@ MODRET xfer_pre_stor(cmd_rec *cmd) {
      session.restart_pos = 0L;
      session.xfer.xfer_type = STOR_DEFAULT;
      errno = EPERM;
@@ -196,20 +206,15 @@
      return PR_ERROR(cmd);
    }
  
-@@ -1304,9 +1311,11 @@ MODRET xfer_pre_stor(cmd_rec *cmd) {
- 
+@@ -1306,6 +1312,7 @@ MODRET xfer_pre_stor(cmd_rec *cmd) {
    /* Otherwise everthing is good */
    if (pr_table_add(cmd->notes, "mod_xfer.store-path",
--      pstrdup(cmd->pool, path), 0) < 0)
-+      pstrdup(cmd->pool, path), 0) < 0) {
+       pstrdup(cmd->pool, path), 0) < 0) {
 +    cmd->error_code = errno;
-     pr_log_pri(PR_LOG_NOTICE, "notice: error adding 'mod_xfer.store-path': %s",
-       strerror(errno));
-+  }
- 
-   c = find_config(CURRENT_CONF, CONF_PARAM, "HiddenStores", FALSE);
-   if (c &&
-@@ -1319,6 +1328,7 @@ MODRET xfer_pre_stor(cmd_rec *cmd) {
+     if (errno != EEXIST) {
+       pr_log_pri(PR_LOG_NOTICE,
+         "notice: error adding 'mod_xfer.store-path': %s", strerror(errno));
+@@ -1326,6 +1333,7 @@ MODRET xfer_pre_stor(cmd_rec *cmd) {
        pr_response_add_err(R_501,
          _("REST not compatible with server configuration"));
        errno = EINVAL;
@@ -217,7 +222,7 @@
        return PR_ERROR(cmd);
      }
  
-@@ -1328,6 +1338,7 @@ MODRET xfer_pre_stor(cmd_rec *cmd) {
+@@ -1335,6 +1343,7 @@ MODRET xfer_pre_stor(cmd_rec *cmd) {
        pr_response_add_err(R_550,
          _("APPE not compatible with server configuration"));
        errno = EINVAL;
@@ -225,15 +230,15 @@
        return PR_ERROR(cmd);
      }
  
-@@ -1391,6 +1402,7 @@ MODRET xfer_pre_stou(cmd_rec *cmd) {
- 
+@@ -1400,6 +1409,7 @@ MODRET xfer_pre_stou(cmd_rec *cmd) {
    tmpfd = mkstemp(filename);
    if (tmpfd < 0) {
+     int xerrno = errno;
 +    cmd->error_code = errno;
-     pr_log_pri(PR_LOG_ERR, "error: unable to use mkstemp(): %s",
-       strerror(errno));
  
-@@ -1416,6 +1428,7 @@ MODRET xfer_pre_stou(cmd_rec *cmd) {
+     pr_log_pri(PR_LOG_WARNING, "error: unable to use mkstemp(): %s",
+       strerror(xerrno));
+@@ -1428,6 +1438,7 @@ MODRET xfer_pre_stou(cmd_rec *cmd) {
    if (!filename ||
        !dir_check(cmd->tmp_pool, cmd, cmd->group, filename, NULL)) {
      int xerrno = errno;
@@ -241,7 +246,30 @@
  
      /* Do not forget to delete the file created by mkstemp(3) if there is
       * an error.
-@@ -1495,6 +1508,7 @@ MODRET xfer_pre_appe(cmd_rec *cmd) {
+@@ -1461,12 +1472,14 @@ MODRET xfer_pre_stou(cmd_rec *cmd) {
+ 
+     /* Deliberately use EISDIR for anything non-file (e.g. directories). */
+     errno = EISDIR;
++    cmd->error_code = errno;
+     return PR_ERROR(cmd);
+   }
+ 
+   /* Otherwise everthing is good */
+   if (pr_table_add(cmd->notes, "mod_xfer.store-path",
+       pstrdup(cmd->pool, filename), 0) < 0) {
++    cmd->error_code = errno;
+     if (errno != EEXIST) {
+       pr_log_pri(PR_LOG_NOTICE,
+         "notice: error adding 'mod_xfer.store-path': %s", strerror(errno));
+@@ -1492,6 +1505,7 @@ MODRET xfer_post_stou(cmd_rec *cmd) {
+   mode_t mode = 0666;
+ 
+   if (pr_fsio_chmod(cmd->arg, mode) < 0) {
++    cmd->error_code = errno;
+ 
+     /* Not much to do but log the error. */
+     pr_log_pri(PR_LOG_NOTICE, "error: unable to chmod '%s' to %04o: %s",
+@@ -1510,6 +1524,7 @@ MODRET xfer_pre_appe(cmd_rec *cmd) {
    if (xfer_check_limit(cmd) < 0) {
      pr_response_add_err(R_451, _("%s: Too many transfers"), cmd->arg);
      errno = EPERM;
@@ -249,15 +277,7 @@
      return PR_ERROR(cmd);
    }
  
-@@ -1550,6 +1564,7 @@ MODRET xfer_stor(cmd_rec *cmd) {
-       O_WRONLY|(session.restart_pos ? 0 : O_CREAT|O_EXCL));
-     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,
-@@ -1562,6 +1577,7 @@ MODRET xfer_stor(cmd_rec *cmd) {
+@@ -1580,6 +1595,7 @@ MODRET xfer_stor(cmd_rec *cmd) {
  
      if (stor_fh) {
        if (pr_fsio_lseek(stor_fh, 0, SEEK_END) == (off_t) -1) {
@@ -265,7 +285,7 @@
          pr_log_debug(DEBUG4, "unable to seek to end of '%s' for appending: %s",
            cmd->arg, strerror(errno));
          (void) pr_fsio_close(stor_fh);
-@@ -1570,6 +1586,7 @@ MODRET xfer_stor(cmd_rec *cmd) {
+@@ -1588,6 +1604,7 @@ MODRET xfer_stor(cmd_rec *cmd) {
  
      } else {
        ferrno = errno;
@@ -273,7 +293,7 @@
  
        (void) pr_trace_msg("fileperms", 1, "%s, user '%s' (UID %lu, GID %lu): "
          "error opening '%s': %s", cmd->argv[0], session.user,
-@@ -1583,6 +1600,7 @@ MODRET xfer_stor(cmd_rec *cmd) {
+@@ -1601,6 +1618,7 @@ MODRET xfer_stor(cmd_rec *cmd) {
          O_WRONLY|(session.restart_pos ? 0 : O_TRUNC|O_CREAT));
      if (stor_fh == NULL) {
        ferrno = errno;
@@ -281,7 +301,7 @@
  
        (void) pr_trace_msg("fileperms", 1, "%s, user '%s' (UID %lu, GID %lu): "
          "error opening '%s': %s", cmd->argv[0], session.user,
-@@ -1596,11 +1614,13 @@ MODRET xfer_stor(cmd_rec *cmd) {
+@@ -1614,11 +1632,13 @@ MODRET xfer_stor(cmd_rec *cmd) {
      int xerrno = 0;
  
      if (pr_fsio_lseek(stor_fh, session.restart_pos, SEEK_SET) == -1) {
@@ -295,7 +315,15 @@
        pr_log_debug(DEBUG4, "unable to stat '%s': %s", cmd->arg,
          strerror(errno));
        xerrno = errno;
-@@ -1748,6 +1768,7 @@ MODRET xfer_stor(cmd_rec *cmd) {
+@@ -1755,6 +1775,7 @@ MODRET xfer_stor(cmd_rec *cmd) {
+       pr_data_abort(EPERM, FALSE);
+       errno = EPERM;
+ #endif
++      cmd->error_code = errno;
+       return PR_ERROR(cmd);
+     }
+ 
+@@ -1766,6 +1787,7 @@ MODRET xfer_stor(cmd_rec *cmd) {
      res = pr_fsio_write(stor_fh, lbuf, len);
      if (res != len) {
        int xerrno = EIO;
@@ -303,53 +331,62 @@
  
        if (res < 0)
          xerrno = errno;
-@@ -1806,18 +1827,21 @@ MODRET xfer_stor(cmd_rec *cmd) {
-        */
- #if defined(EDQUOT)
+@@ -1795,6 +1817,7 @@ MODRET xfer_stor(cmd_rec *cmd) {
+ 
+     /* default abort errno, in case session.d et al has already gone away */
+     int xerrno = ECONNABORTED;
++    cmd->error_code = ECONNABORTED;
+ 
+     stor_abort();
+ 
+@@ -1814,6 +1837,7 @@ MODRET xfer_stor(cmd_rec *cmd) {
+ 
+     if (stor_complete() < 0) {
+       int xerrno = errno;
++      cmd->error_code = errno;
+ 
+       _log_transfer('i', 'i');
+ 
+@@ -1826,12 +1850,14 @@ MODRET xfer_stor(cmd_rec *cmd) {
        if (xerrno == EDQUOT) {
-+        cmd->error_code = EDQUOT;
          pr_response_add_err(R_552, "%s: %s", cmd->arg, strerror(xerrno));
          errno = xerrno;
++        cmd->error_code = errno;
          return PR_ERROR(cmd);
        }
  #elif defined(EFBIG)
        if (xerrno == EFBIG) {
-+        cmd->error_code = EFBIG;
          pr_response_add_err(R_552, "%s: %s", cmd->arg, strerror(xerrno));
          errno = xerrno;
++        cmd->error_code = errno;
          return PR_ERROR(cmd);
        }
  #endif
- 
-+      cmd->error_code = EFBIG;
-       pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));
-       errno = xerrno;
-       return PR_ERROR(cmd);
-@@ -1826,6 +1850,7 @@ MODRET xfer_stor(cmd_rec *cmd) {
-     if (session.xfer.path &&
+@@ -1845,6 +1871,7 @@ MODRET xfer_stor(cmd_rec *cmd) {
          session.xfer.path_hidden) {
        if (pr_fsio_rename(session.xfer.path_hidden, session.xfer.path) != 0) {
+         int xerrno = errno;
 +        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.
-@@ -1924,6 +1949,7 @@ MODRET xfer_pre_retr(cmd_rec *cmd) {
-   if (cmd->argc < 2) {
-     pr_response_add_err(R_500, _("'%s' not understood"), get_full_cmd(cmd));
+@@ -1947,6 +1974,7 @@ MODRET xfer_pre_retr(cmd_rec *cmd) {
+     pr_response_add_err(R_500, _("'%s' not understood"),
+       pr_cmd_get_displayable_str(cmd, NULL));
      errno = EINVAL;
 +    cmd->error_code = EINVAL;
      return PR_ERROR(cmd);
    }
  
-@@ -1933,6 +1959,7 @@ MODRET xfer_pre_retr(cmd_rec *cmd) {
+@@ -1956,6 +1984,7 @@ MODRET xfer_pre_retr(cmd_rec *cmd) {
    if (!dir ||
        !dir_check(cmd->tmp_pool, cmd, cmd->group, dir, NULL)) {
      int xerrno = errno;
-+    cmd->error_code = EINVAL;
++    cmd->error_code;
  
      pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));
  
-@@ -1955,6 +1982,7 @@ MODRET xfer_pre_retr(cmd_rec *cmd) {
+@@ -1978,12 +2007,14 @@ MODRET xfer_pre_retr(cmd_rec *cmd) {
    if (xfer_check_limit(cmd) < 0) {
      pr_response_add_err(R_451, _("%s: Too many transfers"), cmd->arg);
      errno = EPERM;
@@ -357,7 +394,14 @@
      return PR_ERROR(cmd);
    }
  
-@@ -1977,6 +2005,7 @@ MODRET xfer_pre_retr(cmd_rec *cmd) {
+   fmode = file_mode(dir);
+   if (fmode == 0) {
+     int xerrno = errno;
++    cmd->error_code = errno;
+ 
+     pr_response_add_err(R_550, "%s: %s", cmd->arg, strerror(xerrno));
+ 
+@@ -2000,6 +2031,7 @@ MODRET xfer_pre_retr(cmd_rec *cmd) {
  
      /* Deliberately use EISDIR for anything non-file (e.g. directories). */
      errno = EISDIR;
@@ -365,7 +409,7 @@
      return PR_ERROR(cmd);
    }
  
-@@ -1991,6 +2020,7 @@ MODRET xfer_pre_retr(cmd_rec *cmd) {
+@@ -2014,12 +2046,14 @@ MODRET xfer_pre_retr(cmd_rec *cmd) {
        cmd->arg);
      session.restart_pos = 0L;
      errno = EPERM;
@@ -373,7 +417,14 @@
      return PR_ERROR(cmd);
    }
  
-@@ -2020,6 +2050,7 @@ MODRET xfer_retr(cmd_rec *cmd) {
+   /* Otherwise everthing is good */
+   if (pr_table_add(cmd->notes, "mod_xfer.retr-path",
+       pstrdup(cmd->pool, dir), 0) < 0) {
++    cmd->error_code = errno;
+     if (errno != EEXIST) {
+       pr_log_pri(PR_LOG_NOTICE, "notice: error adding 'mod_xfer.retr-path': %s",
+         strerror(errno));
+@@ -2046,6 +2080,7 @@ MODRET xfer_retr(cmd_rec *cmd) {
    retr_fh = pr_fsio_open(dir, O_RDONLY);
    if (retr_fh == NULL) {
      int xerrno = errno;
@@ -381,25 +432,23 @@
  
      (void) pr_trace_msg("fileperms", 1, "%s, user '%s' (UID %lu, GID %lu): "
        "error opening '%s': %s", cmd->argv[0], session.user,
-@@ -2033,6 +2064,8 @@ MODRET xfer_retr(cmd_rec *cmd) {
+@@ -2059,6 +2094,7 @@ MODRET xfer_retr(cmd_rec *cmd) {
    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;
  
-@@ -2057,6 +2090,8 @@ MODRET xfer_retr(cmd_rec *cmd) {
+@@ -2083,6 +2119,7 @@ MODRET xfer_retr(cmd_rec *cmd) {
      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;
-@@ -2115,6 +2150,7 @@ MODRET xfer_retr(cmd_rec *cmd) {
+@@ -2143,6 +2180,7 @@ MODRET xfer_retr(cmd_rec *cmd) {
      retr_abort();
  
      /* Set errno to EPERM ("Operation not permitted") */
@@ -407,12 +456,11 @@
      pr_data_abort(EPERM, FALSE);
      return PR_ERROR(cmd);
    }
-@@ -2146,6 +2182,7 @@ MODRET xfer_retr(cmd_rec *cmd) {
+@@ -2174,6 +2212,7 @@ MODRET xfer_retr(cmd_rec *cmd) {
         * is preserved; errno itself might be overwritten in retr_abort().
         */
        int xerrno = errno;
 +      cmd->error_code = errno;
  
        retr_abort();
- 
-
+       pr_data_abort(xerrno, FALSE);