X-Git-Url: https://codewiz.org/gitweb?a=blobdiff_plain;f=bertos%2Fkern%2Fproc.c;h=6bd5fdf417ed1469a989aa8ac0539ec8c70373d2;hb=ecc3d927e252b3fa278b5320f16364fc14d61220;hp=0e3edbea37e368bfac54003ee9667d1cc0c7f042;hpb=0cd2e04de03f9c793a9dd9a564124a5b699455ba;p=bertos.git

diff --git a/bertos/kern/proc.c b/bertos/kern/proc.c
index 0e3edbea..6bd5fdf4 100644
--- a/bertos/kern/proc.c
+++ b/bertos/kern/proc.c
@@ -44,6 +44,7 @@
 #include "cfg/cfg_arch.h"  /* ARCH_EMUL */
 #include "cfg/cfg_kern.h"
 #include <cfg/module.h>
+#include <cfg/depend.h>    // CONFIG_DEPEND()
 
 #include <cpu/irq.h>
 #include <cpu/types.h>
@@ -52,6 +53,11 @@
 
 #include <string.h>           /* memset() */
 
+// Check config dependencies
+CONFIG_DEPEND(CONFIG_KERN_SIGNALS,    CONFIG_KERN_SCHED);
+CONFIG_DEPEND(CONFIG_KERN_SEMAPHORES, CONFIG_KERN_SIGNALS);
+CONFIG_DEPEND(CONFIG_KERN_MONITOR,    CONFIG_KERN_SCHED);
+
 
 /*
  * The scheduer tracks ready processes by enqueuing them in the
@@ -70,11 +76,16 @@ REGISTER Process *CurrentProcess;
 
 #if (ARCH & ARCH_EMUL)
 /*
- * In hosted environments, we must emulate the stack on the real process stack.
+ * In some hosted environments, we must emulate the stack on the real
+ * process stack to satisfy consistency checks in system libraries and
+ * because some ABIs place trampolines on the stack.
  *
  * Access to this list must be protected by PROC_ATOMIC().
  */
-extern List StackFreeList;
+List StackFreeList;
+
+#define NPROC 8
+cpustack_t proc_stacks[NPROC][(64 * 1024) / sizeof(cpustack_t)];
 #endif
 
 /** The main process (the one that executes main()). */
@@ -93,6 +104,10 @@ static void proc_init_struct(Process *proc)
 #if CONFIG_KERN_HEAP
 	proc->flags = 0;
 #endif
+
+#if CONFIG_KERN_PRI
+	proc->link.pri = 0;
+#endif
 }
 
 MOD_DEFINE(proc);
@@ -101,6 +116,12 @@ void proc_init(void)
 {
 	LIST_INIT(&ProcReadyList);
 
+#if ARCH & ARCH_EMUL
+	LIST_INIT(&StackFreeList);
+	for (int i = 0; i < NPROC; i++)
+		ADDTAIL(&StackFreeList, (Node *)proc_stacks[i]);
+#endif
+
 	/*
 	 * We "promote" the current context into a real process. The only thing we have
 	 * to do is create a PCB and make it current. We don't need to setup the stack
@@ -121,7 +142,6 @@ void proc_init(void)
 	MOD_INIT(proc);
 }
 
-
 /**
  * Create a new process, starting at the provided entry point.
  *
@@ -261,6 +281,43 @@ void proc_rename(struct Process *proc, const char *name)
 #endif
 }
 
+
+#if CONFIG_KERN_PRI
+/**
+ * Change the scheduling priority of a process.
+ *
+ * Process piorities are signed ints, whereas a larger integer value means
+ * higher scheduling priority.  The default priority for new processes is 0.
+ * The idle process runs with the lowest possible priority: INT_MIN.
+ *
+ * A process with a higher priority always preempts lower priority processes.
+ * Processes of equal priority share the CPU time according to a simple
+ * round-robin policy.
+ *
+ * As a general rule to maximize responsiveness, compute-bound processes
+ * should be assigned negative priorities and tight, interactive processes
+ * should be assigned positive priorities.
+ *
+ * To avoid interfering with system background activities such as input
+ * processing, application processes should remain within the range -10
+ * and +10.
+ */
+void proc_setPri(struct Process *proc, int pri)
+{
+		if (proc->link.pri == pri)
+			return;
+
+		proc->link.pri = pri;
+
+		if (proc != CurrentProcess)
+		{
+				//proc_forbid();
+				//TODO: re-enqueue process
+				//pric_permit();
+		}
+}
+#endif // CONFIG_KERN_PRI
+
 /**
  * Terminate the current process
  */
@@ -286,10 +343,8 @@ void proc_exit(void)
 #endif
 
 #if (ARCH & ARCH_EMUL)
-#warning This is wrong
 	/* Reinsert process stack in free list */
-	PROC_ATOMIC(ADDHEAD(&StackFreeList, (Node *)(CurrentProcess->stack
-		- (CONFIG_PROC_DEFSTACKSIZE / sizeof(cpustack_t)))));
+	PROC_ATOMIC(ADDHEAD(&StackFreeList, (Node *)CurrentProcess->stack_base));
 
 	/*
 	 * NOTE: At this point the first two words of what used