X-Git-Url: http://git.tuebingen.mpg.de/?p=paraslash.git;a=blobdiff_plain;f=close_on_fork.c;h=28c5eabb1ae9a4821b60b638be559e837dc54f36;hp=7e0c8e6474b48a932ca0c107862391466415ec96;hb=ac1f19d550a81c8408c8fce2e237996c950253ab;hpb=2031b9cab9304b02c0372f73eef54d9501277031

diff --git a/close_on_fork.c b/close_on_fork.c
index 7e0c8e64..28c5eabb 100644
--- a/close_on_fork.c
+++ b/close_on_fork.c
@@ -62,13 +62,7 @@ void del_close_on_fork_list(int fd)
 	}
 }
 
-/**
- * Close all fds in the list and destroy all list entries.
- *
- * This function calls close(3) for each fd in the close-on-fork list
- * and empties the list afterwards.
- */
-void close_listed_fds(void)
+static void deplete_cof_list(bool close_fds)
 {
 	struct close_on_fork *cof, *tmp;
 
@@ -76,8 +70,32 @@ void close_listed_fds(void)
 		return;
 	list_for_each_entry_safe(cof, tmp, &close_on_fork_list, node) {
 		PARA_DEBUG_LOG("closing fd %d\n", cof->fd);
-		close(cof->fd);
+		if (close_fds)
+			close(cof->fd);
 		list_del(&cof->node);
 		free(cof);
 	}
 }
+
+/**
+ * Close all fds in the list and destroy all list entries.
+ *
+ * This function calls close(3) for each fd in the close-on-fork list
+ * and empties the list afterwards.
+ *
+ * \sa \ref deplete_close_on_fork_list().
+ */
+void close_listed_fds(void)
+{
+	deplete_cof_list(true);
+}
+
+/**
+ * Remove all listed fds from the close on fork list.
+ *
+ * This is like \ref close_listed_fds() but does not close the fds.
+ */
+void deplete_close_on_fork_list(void)
+{
+	deplete_cof_list(false);
+}