3 #include "libthreads.h"
8 /* global "model" object */
11 #define STACK_SIZE (1024 * 1024)
13 static void * stack_allocate(size_t size)
18 static void stack_free(void *stack)
23 Thread * thread_current(void)
25 return model->scheduler->get_current_thread();
28 int Thread::create_context()
32 ret = getcontext(&context);
36 /* start_routine == NULL means this is our initial context */
40 /* Initialize new managed context */
41 stack = stack_allocate(STACK_SIZE);
42 context.uc_stack.ss_sp = stack;
43 context.uc_stack.ss_size = STACK_SIZE;
44 context.uc_stack.ss_flags = 0;
45 context.uc_link = &model->system_thread->context;
46 makecontext(&context, start_routine, 1, arg);
51 int Thread::swap(Thread *t)
53 return swapcontext(&this->context, &t->context);
56 void Thread::complete()
58 if (state != THREAD_COMPLETED) {
59 DEBUG("completed thread %d\n", get_id());
60 state = THREAD_COMPLETED;
66 Thread::Thread(thrd_t *t, void (*func)(), void *a) {
73 /* Initialize state */
74 ret = create_context();
76 printf("Error in create_context\n");
78 state = THREAD_CREATED;
79 id = model->get_next_id();
83 Thread::Thread(thrd_t *t) {
91 state = THREAD_CREATED;
92 id = model->get_next_id();
94 model->add_system_thread(this);
100 model->remove_thread(this);
103 thread_id_t Thread::get_id()
109 * Return 1 if found next thread, 0 otherwise
111 static int thread_system_next(void)
115 curr = thread_current();
116 model->check_current_action();
118 if (curr->get_state() == THREAD_READY)
119 model->scheduler->add_thread(curr);
120 else if (curr->get_state() == THREAD_RUNNING)
121 /* Stopped while running; i.e., completed */
124 DEBUG("ERROR: current thread in unexpected state??\n");
126 next = model->scheduler->next_thread();
128 next->set_state(THREAD_RUNNING);
129 DEBUG("(%d, %d)\n", curr ? curr->get_id() : -1, next ? next->get_id() : -1);
132 return model->system_thread->swap(next);
135 static void thread_wait_finish(void)
140 while (!thread_system_next());
144 * Main system function
148 thrd_t user_thread, main_thread;
151 model = new ModelChecker();
153 th = new Thread(&main_thread);
156 /* Start user program */
157 thrd_create(&user_thread, &user_main, NULL);
159 /* Wait for all threads to complete */
160 thread_wait_finish();
161 } while (model->next_execution());