1 files changed, 31 insertions, 0 deletions
diff --git a/ports/unix/guts/fchmod.c b/ports/unix/guts/fchmod.c
new file mode 100644
index 0000000..40f62ba
--- /dev/null
+++ b/ports/unix/guts/fchmod.c
@@ -0,0 +1,31 @@
+/* 
+ * Copyright (c) 2008-2010 Wind River Systems; see
+ * guts/COPYRIGHT for information.
+ *
+ * static int
+ * wrap_fchmod(int fd, mode_t mode) {
+ *	int rc = -1;
+ */
+ 	pseudo_msg_t *msg;
+	struct stat buf;
+	int save_errno = errno;
+
+	if (real_fstat(fd, &buf) == -1) {
+		/* can't stat it, can't chmod it */
+		return -1;
+	}
+	buf.st_mode = (buf.st_mode & ~07777) | (mode & 07777);
+	msg = pseudo_client_op_plain(OP_FCHMOD, 0, fd, -1, 0, &buf);
+	real_fchmod(fd, PSEUDO_FS_MODE(mode));
+	if (msg && msg->result != RESULT_SUCCEED) {
+		errno = EPERM;
+		rc = -1;
+	} else {
+		/* just pretend we worked */
+		errno = save_errno;
+		rc = 0;
+	}
+
+/*	return rc;
+ * }
+ */