Changeset 641 for trunk/kernel/kern/thread.c

Timestamp:

Oct 10, 2019, 1:42:04 PM (5 years ago)

Author:

alain

Message:

• Fix several bugs.
• Introduce the "stat" command in KSH.

This almos-mkh version sucessfully executed the FFT application
(65536 complex points) on the TSAR architecture from 1 to 64 cores.

File:

• trunk/kernel/kern/thread.c (modified) (4 diffs)

trunk/kernel/kern/thread.c

@@ -183 +183 @@
     dqdt_increment_threads();
 
+#if CONFIG_INSTRUMENTATION_PGFAULTS
+    thread->info.false_pgfault_nr    = 0;
+    thread->info.false_pgfault_cost  = 0;
+    thread->info.false_pgfault_max   = 0;
+    thread->info.local_pgfault_nr    = 0;
+    thread->info.local_pgfault_cost  = 0;
+    thread->info.local_pgfault_max   = 0;
+    thread->info.global_pgfault_nr   = 0;
+    thread->info.global_pgfault_cost = 0;
+    thread->info.global_pgfault_max  = 0;
+#endif
+
 #if DEBUG_THREAD_INIT
 cycle = (uint32_t)hal_get_cycles();
@@ -890 +902 @@
     core_t        * core    = thread->core;
 
-
-#if DEBUG_THREAD_DESTROY || CONFIG_INSTRUMENTATION_PGFAULTS
+#if DEBUG_THREAD_DESTROY 
 uint32_t   cycle;
 thread_t * this  = CURRENT_THREAD;
@@ -908 +919 @@
 #if CONFIG_INSTRUMENTATION_PGFAULTS
 process->vmm.false_pgfault_nr    += thread->info.false_pgfault_nr;
+process->vmm.false_pgfault_cost  += thread->info.false_pgfault_cost;
 process->vmm.local_pgfault_nr    += thread->info.local_pgfault_nr;
+process->vmm.local_pgfault_cost  += thread->info.local_pgfault_cost;
 process->vmm.global_pgfault_nr   += thread->info.global_pgfault_nr;
-process->vmm.false_pgfault_cost  += thread->info.false_pgfault_cost;
-process->vmm.local_pgfault_cost  += thread->info.local_pgfault_cost;
 process->vmm.global_pgfault_cost += thread->info.global_pgfault_cost;
 #endif
@@ -917 +928 @@
 #if (CONFIG_INSTRUMENTATION_PGFAULTS & 1)
 uint32_t false_nr    = thread->info.false_pgfault_nr;
+uint32_t false_cost  = thread->info.false_pgfault_cost;
+uint32_t false_max   = thread->info.false_pgfault_max;
+uint32_t false_one   = false_nr  ? (false_cost  / false_nr ) : 0;
+
 uint32_t local_nr    = thread->info.local_pgfault_nr;
+uint32_t local_cost  = thread->info.local_pgfault_cost;
+uint32_t local_max   = thread->info.local_pgfault_max;
+uint32_t local_one   = local_nr  ? (local_cost  / local_nr ) : 0;
+
 uint32_t global_nr   = thread->info.global_pgfault_nr;
-uint32_t false_cost  = thread->info.false_pgfault_cost;
-uint32_t local_cost  = thread->info.local_pgfault_cost;
 uint32_t global_cost = thread->info.global_pgfault_cost;
-printk("***** thread[%x,%x] page-faults\n"
-       " - false    %d ( %d cycles )\n"
-       " - local    %d ( %d cycles )\n"
-       " - global   %d ( %d cycles )\n",
-       this->process->pid, this->trdid,
-       false_nr , false_cost / false_nr,
-       local_nr , local_cost / local_nr,
-       global_nr, global_cost / global_nr );
+uint32_t global_max  = thread->info.global_pgfault_max;
+uint32_t global_one  = global_nr ? (global_cost / global_nr) : 0;
+
+printk("\n***** thread[%x,%x] page-faults\n"
+       " - false  : %d events / cost %d cycles / max %d cycles\n"
+       " - local  : %d events / cost %d cycles / max %d cycles\n"
+       " - global : %d events / cost %d cycles / max %d cycles\n",
+       thread->process->pid, thread->trdid,
+       false_nr , false_one , false_max,
+       local_nr , local_one , local_max,
+       global_nr, global_one, global_max );
 #endif