close file descriptors before exec'ing the dcm

diff --git a/server/mr_scall.c b/server/mr_scall.c
index c2da9c59e72794a20059c32b5d7abd6e5d6e898a..db42bdc8aba2e47683b24fb6400831a006243aa2 100644 (file)
--- a/server/mr_scall.c
+++ b/server/mr_scall.c
@@ -292,6 +292,8 @@ trigger_dcm(dummy0, dummy1, cl)
        pid = vfork();
        switch (pid) {
        case 0:
+               for (dummy0 = getdtablesize() - 1; dummy0 > 2; dummy0--)
+                 close(dummy0);
                execl("/u1/sms/bin/startdcm", "startdcm", 0);
                exit(1);