git: 9front

Info  •  Files  •  Log  •  Branches

kernel: sysrfork abortion

when we fail to fork resources for the child due to resource
exhaustion, make the half forked child process call pexit()
to free the resources that where allocated and error out.

--- a/sys/src/9/port/sysproc.c

+++ b/sys/src/9/port/sysproc.c

@@ -21,6 +21,12 @@

 	return 0;

 }

+static void

+abortion(void*)

+{

+	pexit("fork aborted", 1);

+}

+

 long

 sysrfork(ulong *arg)

 {

@@ -101,6 +107,14 @@

 	p->ureg = up->ureg;

 	p->dbgreg = 0;

+	/* Abort the child process on error */

+	if(waserror()){

+		p->kp = 1;

+		kprocchild(p, abortion, 0);

+		ready(p);

+		nexterror();

+	}

+

 	/* Make a new set of memory segments */

 	n = flag & RFMEM;

 	qlock(&p->seglock);

@@ -163,6 +177,8 @@

 	p->procmode = up->procmode;

 	if(up->procctl == Proc_tracesyscall)

 		p->procctl = Proc_tracesyscall;

+

+	poperror();	/* abortion */

 	/* Craft a return frame which will cause the child to pop out of

 	 * the scheduler in user mode with the return register zero

-- 

⑨