VFS: mounts KFS, shell functions
[akaros.git] / kern / src / manager.c
index 6a813d5..2cfeea5 100644 (file)
  * See LICENSE for details.
  */
 
-#ifdef __DEPUTY__
-#pragma nodeputy
+
+#ifdef __SHARC__
+#pragma nosharc
 #endif
 
-#include <arch/types.h>
+#include <ros/common.h>
 #include <smp.h>
+#include <arch/init.h>
+#include <mm.h>
+#include <elf.h>
+#include <frontend.h>
 
+#include <kmalloc.h>
 #include <assert.h>
 #include <manager.h>
 #include <process.h>
-#include <workqueue.h>
+#include <schedule.h>
 #include <syscall.h>
 #include <testing.h>
 #include <kfs.h>
+#include <stdio.h>
+#include <timing.h>
+#include <resource.h>
+#include <monitor.h>
+#include <colored_caches.h>
+#include <string.h>
+#include <pmap.h>
+#include <ros/timer.h>
+#include <ros/arch/membar.h>
 
 /*
- * Currently, if you leave this function by way of env_run (process_workqueue
- * that env_runs), you will never come back to where you left off, and the
+ * Currently, if you leave this function by way of proc_run (process_workqueue
+ * that proc_runs), you will never come back to where you left off, and the
  * function will start from the top.  Hence the hack 'progress'.
  */
 void manager(void)
 {
-       static uint8_t progress = 0;
-       env_t *envs[256];
+       #ifndef DEVELOPER_NAME
+               #define DEVELOPER_NAME brho
+       #endif
+
+       // LoL
+       #define PASTE(s1,s2) s1 ## s2
+       #define MANAGER_FUNC(dev) PASTE(manager_,dev)
+
+       void MANAGER_FUNC(DEVELOPER_NAME)(void);
+       MANAGER_FUNC(DEVELOPER_NAME)();
+}
+
+/* Helper macro for quickly running something out of KFS.  Pass it a string and
+ * a proc pointer. */
+#define quick_proc_run(x, p)                                                     \
+       (p) = kfs_proc_create(kfs_lookup_path((x)));                                 \
+       spin_lock(&(p)->proc_lock);                                                  \
+       __proc_set_state((p), PROC_RUNNABLE_S);                                      \
+       spin_unlock(&(p)->proc_lock);                                                \
+       proc_run((p));                                                               \
+       proc_decref((p), 1);
+
+#define quick_proc_create(x, p)                                                  \
+       (p) = kfs_proc_create(kfs_lookup_path((x)));                                 \
+       spin_lock(&(p)->proc_lock);                                                  \
+       __proc_set_state((p), PROC_RUNNABLE_S);                                      \
+       spin_unlock(&(p)->proc_lock);
+
+#define quick_proc_color_run(x, p, c)                                            \
+       (p) = kfs_proc_create(kfs_lookup_path((x)));                                 \
+       spin_lock(&(p)->proc_lock);                                                  \
+       __proc_set_state((p), PROC_RUNNABLE_S);                                      \
+       spin_unlock(&(p)->proc_lock);                                                \
+       p->cache_colors_map = cache_colors_map_alloc();                              \
+       for (int i = 0; i < (c); i++)                                                \
+               cache_color_alloc(llc_cache, p->cache_colors_map);                       \
+       proc_run((p));                                                               \
+       proc_decref((p), 1);
+
+#define quick_proc_color_create(x, p, c)                                         \
+       (p) = kfs_proc_create(kfs_lookup_path((x)));                                 \
+       spin_lock(&(p)->proc_lock);                                                  \
+       __proc_set_state((p), PROC_RUNNABLE_S);                                      \
+       spin_unlock(&(p)->proc_lock);                                                \
+       p->cache_colors_map = cache_colors_map_alloc();                              \
+       for (int i = 0; i < (c); i++)                                                \
+               cache_color_alloc(llc_cache, p->cache_colors_map);
+
+void manager_brho(void)
+{
+       static uint8_t RACY progress = 0;
+       static struct proc *p;
+
+       // for testing taking cores, check in case 1 for usage
+       uint32_t corelist[MAX_NUM_CPUS];
+       uint32_t num = 3;
 
        switch (progress++) {
                case 0:
-                       envs[0] = kfs_proc_create(kfs_lookup_path("roslib_hello"));
-                       proc_set_state(envs[0], PROC_RUNNABLE_S);
-                       env_run(envs[0]);
-                       break;
-               case 1:
-                       panic("Do not panic");
-                       envs[0] = ENV_CREATE(roslib_proctests);
-                       envs[1] = ENV_CREATE(roslib_proctests);
-                       envs[2] = ENV_CREATE(roslib_proctests);
-                       envs[3] = ENV_CREATE(roslib_fptest);
-                       envs[4] = ENV_CREATE(roslib_fptest);
-                       envs[4] = ENV_CREATE(roslib_fptest);
-                       envs[5] = ENV_CREATE(roslib_hello);
-                       envs[6] = ENV_CREATE(roslib_null);
-                       //envs[6] = ENV_CREATE(roslib_measurements);
-                       env_run(envs[0]);
-                       break;
-                       #if 0
-                       #endif
-               case 2:
+                       monitor(0);
+                       /* 124 is half of the available boxboro colors (with the kernel
+                        * getting 8) */
+                       //quick_proc_color_run("msr_dumb_while", p, 124);
+                       quick_proc_run("mhello", p);
                        #if 0
-                       // reminder of how to spawn remotely
-                       for (int i = 0; i < 8; i++) {
-                               envs[i] = kfs_proc_create(kfs_lookup_path("roslib_hello"));
-                               proc_set_state(envs[i], PROC_RUNNABLE_S);
-                               smp_call_function_single(i, run_env_handler, envs[i], 0);
-                       }
-                       process_workqueue();
+                       // this is how you can transition to a parallel process manually
+                       // make sure you don't proc run first
+                       __proc_set_state(p, PROC_RUNNING_S);
+                       __proc_set_state(p, PROC_RUNNABLE_M);
+                       p->resources[RES_CORES].amt_wanted = 5;
+                       spin_unlock(&p->proc_lock);
+                       core_request(p);
+                       panic("This is okay");
                        #endif
-               case 3:
-               #if 0
-               case 0:
-                       printk("Beginning Tests\n");
-                       test_run_measurements(progress-1);  // should never return
                        break;
                case 1:
-                       envs[0] = ENV_CREATE(parlib_channel_test_client);
-                       envs[1] = ENV_CREATE(parlib_channel_test_server);
-                       smp_call_function_single(1, run_env_handler, envs[0], 0);
-                       smp_call_function_single(2, run_env_handler, envs[1], 0);
-               case 2:
-               case 3:
-               case 4:
-               case 5:
-               case 6:
-               case 7:
-               case 8:
-               case 9:
-               case 10:
-               case 11:
-               case 12:
-               case 13:
-               case 14:
-                       test_run_measurements(progress-1);
+                       #if 0
+                       udelay(10000000);
+                       // this is a ghetto way to test restarting an _M
+                               printk("\nattempting to ghetto preempt...\n");
+                               spin_lock(&p->proc_lock);
+                               proc_take_allcores(p, __death);
+                               __proc_set_state(p, PROC_RUNNABLE_M);
+                               spin_unlock(&p->proc_lock);
+                               udelay(5000000);
+                               printk("\nattempting to restart...\n");
+                               core_request(p); // proc still wants the cores
+                       panic("This is okay");
+                       // this tests taking some cores, and later killing an _M
+                               printk("taking 3 cores from p\n");
+                               for (int i = 0; i < num; i++)
+                                       corelist[i] = 7-i; // 7, 6, and 5
+                               spin_lock(&p->proc_lock);
+                               proc_take_cores(p, corelist, &num, __death);
+                               spin_unlock(&p->proc_lock);
+                               udelay(5000000);
+                               printk("Killing p\n");
+                               proc_destroy(p);
+                               printk("Killed p\n");
+                       panic("This is okay");
+
+                       envs[0] = kfs_proc_create(kfs_lookup_path("roslib_hello"));
+                       __proc_set_state(envs[0], PROC_RUNNABLE_S);
+                       proc_run(envs[0]);
                        break;
-               #endif
+                       #endif
+               case 2:
+                       /*
+                       test_smp_call_functions();
+                       test_checklists();
+                       test_barrier();
+                       test_print_info();
+                       test_lapic_status_bit();
+                       test_ipi_sending();
+                       test_pit();
+                       */
                default:
-                       printk("Manager Progress: %d\n", progress);
+                       printd("Manager Progress: %d\n", progress);
+                       // delay if you want to test rescheduling an MCP that yielded
+                       //udelay(15000000);
                        schedule();
        }
        panic("If you see me, then you probably screwed up");
+       monitor(0);
 
        /*
        printk("Servicing syscalls from Core 0:\n\n");
@@ -103,3 +176,119 @@ void manager(void)
        return;
 }
 
+void manager_klueska()
+{
+       static struct proc *envs[256];
+       static volatile uint8_t progress = 0;
+
+       if (progress == 0) {
+               progress++;
+               envs[0] = kfs_proc_create(kfs_lookup_path("fillmeup"));
+               __proc_set_state(envs[0], PROC_RUNNABLE_S);
+               proc_run(envs[0]);
+       }
+       schedule();
+
+       panic("DON'T PANIC");
+}
+
+struct elf_info
+{
+       long entry;
+       long phdr;
+       int phnum;
+       int dynamic;
+       char interp[256];
+};
+
+void manager_waterman()
+{
+       static int init = 0;
+       if(!init)
+       {
+               init = 1;
+               struct proc* p = proc_create(NULL,0);
+
+               char* argv[] = {"/bin/sh","-l",0};
+               char* envp[] = {"LD_LIBRARY_PATH=/lib",0};
+               procinfo_pack_args(p->procinfo,argv,envp);
+
+               struct file* f = file_open("/bin/busybox",0,0);
+               assert(f != NULL);
+               assert(load_elf(p,f) == 0);
+               file_decref(f);
+
+               __proc_set_state(p, PROC_RUNNABLE_S);
+               proc_run(p);
+       }
+       schedule();
+}
+
+void manager_pearce()
+{
+       static struct proc *envs[256];
+       static volatile uint8_t progress = 0;
+
+       if (progress == 0) {
+               progress++;
+               envs[0] = kfs_proc_create(kfs_lookup_path("parlib_httpserver_integrated"));
+               //envs[0] = kfs_proc_create(kfs_lookup_path("parlib_lock_test"));
+               __proc_set_state(envs[0], PROC_RUNNABLE_S);
+               proc_run(envs[0]);
+       }
+       schedule();
+
+       panic("DON'T PANIC");
+
+}
+
+#ifdef __sparc_v8__
+
+static char*
+itoa(int num, char* buf0, size_t base)
+{
+       if(base > 16)
+               return NULL;
+
+       char* buf = buf0;
+       int len = 0, i;
+
+       if(num < 0)
+       {
+               *buf++ = '-';
+               num = -num;
+       }
+
+       do {
+               buf[len++] = "0123456789abcdef"[num%base];
+               num /= base;
+       } while(num);
+
+       for(i = 0; i < len/2; i++)
+       {
+               char temp = buf[i];
+               buf[i] = buf[len-i-1];
+               buf[len-i-1] = temp;
+       }
+       buf[len] = 0;
+
+       return buf0;
+}
+
+void gsf_set_frame_cycles(int cycles)
+{
+       store_alternate(26*4,2,cycles);
+}
+
+void gsf_set_partition_credits(int partition, int credits)
+{
+       store_alternate((32+partition)*4,2,credits);
+}
+
+void gsf_set_core_partition(int core, int partition)
+{
+       store_alternate((64+core)*4,2,partition);
+}
+
+#endif
+