Sean McBride
4 years ago
parent
91c429cd8f
commit
0f0d0fcb18
@ -1,42 +0,0 @@
|
|||||||
#pragma once
|
|
||||||
|
|
||||||
#include <assert.h>
|
|
||||||
#include <stddef.h>
|
|
||||||
|
|
||||||
#include "current_sandbox.h"
|
|
||||||
#include "current_sandbox_yield.h"
|
|
||||||
#include "generic_thread.h"
|
|
||||||
#include "local_runqueue.h"
|
|
||||||
#include "sandbox_set_as_blocked.h"
|
|
||||||
#include "software_interrupt.h"
|
|
||||||
|
|
||||||
/**
|
|
||||||
* Mark the currently executing sandbox as blocked, remove it from the local runqueue,
|
|
||||||
* and switch to base context
|
|
||||||
*/
|
|
||||||
static inline void
|
|
||||||
current_sandbox_block(void)
|
|
||||||
{
|
|
||||||
/* Remove the sandbox we were just executing from the runqueue and mark as blocked */
|
|
||||||
struct sandbox *current_sandbox = current_sandbox_get();
|
|
||||||
|
|
||||||
/* We might either have blocked in start reading the request or while executing within the WebAssembly
|
|
||||||
* entrypoint. The preemptable flag on the context is used to differentiate. In either case, we should
|
|
||||||
* have disabled interrupts.
|
|
||||||
*/
|
|
||||||
if (current_sandbox->ctxt.preemptable) software_interrupt_disable();
|
|
||||||
assert(!software_interrupt_is_enabled());
|
|
||||||
|
|
||||||
assert(current_sandbox->state == SANDBOX_RUNNING);
|
|
||||||
sandbox_set_as_blocked(current_sandbox, SANDBOX_RUNNING);
|
|
||||||
generic_thread_dump_lock_overhead();
|
|
||||||
|
|
||||||
/* The worker thread seems to "spin" on a blocked sandbox, so try to execute another sandbox for one quantum
|
|
||||||
* after blocking to give time for the action to resolve */
|
|
||||||
struct sandbox *next_sandbox = local_runqueue_get_next();
|
|
||||||
if (next_sandbox != NULL) {
|
|
||||||
sandbox_switch_to(next_sandbox);
|
|
||||||
} else {
|
|
||||||
current_sandbox_yield();
|
|
||||||
};
|
|
||||||
}
|
|
||||||
@ -1,45 +0,0 @@
|
|||||||
#pragma once
|
|
||||||
|
|
||||||
#include <assert.h>
|
|
||||||
#include <stddef.h>
|
|
||||||
#include <stdint.h>
|
|
||||||
|
|
||||||
#include "arch/context.h"
|
|
||||||
#include "current_sandbox.h"
|
|
||||||
#include "sandbox_types.h"
|
|
||||||
#include "sandbox_exit.h"
|
|
||||||
#include "software_interrupt.h"
|
|
||||||
|
|
||||||
/**
|
|
||||||
* @brief Switches to the base context, placing the current sandbox on the completion queue if in RETURNED state
|
|
||||||
*/
|
|
||||||
static inline void
|
|
||||||
current_sandbox_yield()
|
|
||||||
{
|
|
||||||
assert(!software_interrupt_is_enabled());
|
|
||||||
|
|
||||||
struct sandbox *current_sandbox = current_sandbox_get();
|
|
||||||
#ifndef NDEBUG
|
|
||||||
if (current_sandbox != NULL) {
|
|
||||||
assert(current_sandbox->state < SANDBOX_STATE_COUNT);
|
|
||||||
assert(current_sandbox->stack_size == current_sandbox->module->stack_size);
|
|
||||||
}
|
|
||||||
#endif
|
|
||||||
|
|
||||||
/* Assumption: Base Context should never switch to Base Context */
|
|
||||||
assert(current_sandbox != NULL);
|
|
||||||
struct arch_context *current_context = ¤t_sandbox->ctxt;
|
|
||||||
assert(current_context != &worker_thread_base_context);
|
|
||||||
|
|
||||||
#ifdef LOG_CONTEXT_SWITCHES
|
|
||||||
debuglog("Sandbox %lu (@%p) (%s) > Base Context (@%p) (%s)\n", current_sandbox->id, current_context,
|
|
||||||
arch_context_variant_print(current_sandbox->ctxt.variant), &worker_thread_base_context,
|
|
||||||
arch_context_variant_print(worker_thread_base_context.variant));
|
|
||||||
#endif
|
|
||||||
|
|
||||||
sandbox_exit(current_sandbox);
|
|
||||||
current_sandbox_set(NULL);
|
|
||||||
assert(worker_thread_base_context.variant == ARCH_CONTEXT_VARIANT_FAST);
|
|
||||||
runtime_worker_threads_deadline[worker_thread_idx] = UINT64_MAX;
|
|
||||||
arch_context_switch(current_context, &worker_thread_base_context);
|
|
||||||
}
|
|
||||||
@ -0,0 +1,198 @@
|
|||||||
|
#pragma once
|
||||||
|
|
||||||
|
#include <assert.h>
|
||||||
|
#include <errno.h>
|
||||||
|
#include <stdint.h>
|
||||||
|
|
||||||
|
#include "client_socket.h"
|
||||||
|
#include "global_request_scheduler.h"
|
||||||
|
#include "local_runqueue.h"
|
||||||
|
#include "sandbox_request.h"
|
||||||
|
#include "sandbox_exit.h"
|
||||||
|
#include "sandbox_functions.h"
|
||||||
|
#include "sandbox_types.h"
|
||||||
|
#include "sandbox_set_as_blocked.h"
|
||||||
|
#include "sandbox_set_as_preempted.h"
|
||||||
|
#include "sandbox_set_as_runnable.h"
|
||||||
|
#include "sandbox_set_as_running.h"
|
||||||
|
#include "worker_thread_execute_epoll_loop.h"
|
||||||
|
|
||||||
|
static inline struct sandbox *
|
||||||
|
scheduler_get_next()
|
||||||
|
{
|
||||||
|
assert(!software_interrupt_is_enabled());
|
||||||
|
|
||||||
|
/* Get the deadline of the sandbox at the head of the local request queue */
|
||||||
|
struct sandbox *local = local_runqueue_get_next();
|
||||||
|
uint64_t local_deadline = local == NULL ? UINT64_MAX : local->absolute_deadline;
|
||||||
|
|
||||||
|
uint64_t global_deadline = global_request_scheduler_peek();
|
||||||
|
|
||||||
|
/* Try to pull and allocate from the global queue if earlier
|
||||||
|
* This will be placed at the head of the local runqueue */
|
||||||
|
if (global_deadline < local_deadline) {
|
||||||
|
struct sandbox_request *request = NULL;
|
||||||
|
int return_code = global_request_scheduler_remove_if_earlier(&request, local_deadline);
|
||||||
|
if (return_code == 0) {
|
||||||
|
assert(request != NULL);
|
||||||
|
assert(request->absolute_deadline < local_deadline);
|
||||||
|
struct sandbox *global = sandbox_allocate(request);
|
||||||
|
if (!global) {
|
||||||
|
client_socket_send(request->socket_descriptor, 503);
|
||||||
|
client_socket_close(request->socket_descriptor, &request->socket_address);
|
||||||
|
free(request);
|
||||||
|
debuglog("scheduler failed to allocate sandbox\n");
|
||||||
|
} else {
|
||||||
|
assert(global->state == SANDBOX_INITIALIZED);
|
||||||
|
sandbox_set_as_runnable(global, SANDBOX_INITIALIZED);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Return what is at the head of the local runqueue or NULL if empty */
|
||||||
|
return local_runqueue_get_next();
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Called by the SIGALRM handler after a quantum
|
||||||
|
* Assumes the caller validates that there is something to preempt
|
||||||
|
* @param user_context - The context of our user-level Worker thread
|
||||||
|
*/
|
||||||
|
static inline void
|
||||||
|
scheduler_preempt(ucontext_t *user_context)
|
||||||
|
{
|
||||||
|
assert(user_context != NULL);
|
||||||
|
assert(!software_interrupt_is_enabled());
|
||||||
|
|
||||||
|
/* Process epoll to make sure that all runnable jobs are considered for execution */
|
||||||
|
worker_thread_execute_epoll_loop();
|
||||||
|
|
||||||
|
struct sandbox *current = current_sandbox_get();
|
||||||
|
assert(current != NULL);
|
||||||
|
assert(current->state == SANDBOX_RUNNING);
|
||||||
|
|
||||||
|
struct sandbox *next = scheduler_get_next();
|
||||||
|
assert(next != NULL);
|
||||||
|
|
||||||
|
/* If current equals return, we are already running earliest deadline, so resume execution */
|
||||||
|
if (current == next) return;
|
||||||
|
|
||||||
|
/* Save the context of the currently executing sandbox before switching from it */
|
||||||
|
sandbox_set_as_preempted(current, SANDBOX_RUNNING);
|
||||||
|
arch_mcontext_save(¤t->ctxt, &user_context->uc_mcontext);
|
||||||
|
|
||||||
|
/* Update current_sandbox to the next sandbox */
|
||||||
|
assert(next->state == SANDBOX_RUNNABLE);
|
||||||
|
sandbox_set_as_running(next, SANDBOX_RUNNABLE);
|
||||||
|
|
||||||
|
/* Update the current deadline of the worker thread */
|
||||||
|
runtime_worker_threads_deadline[worker_thread_idx] = next->absolute_deadline;
|
||||||
|
|
||||||
|
/* Restore the context of this sandbox */
|
||||||
|
arch_context_restore_new(&user_context->uc_mcontext, &next->ctxt);
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Switches to the next sandbox, placing the current sandbox on the completion queue if in SANDBOX_RETURNED state
|
||||||
|
* @param next_sandbox The Sandbox Context to switch to
|
||||||
|
*/
|
||||||
|
static inline void
|
||||||
|
scheduler_switch_to(struct sandbox *next_sandbox)
|
||||||
|
{
|
||||||
|
/* Assumption: The caller disables interrupts */
|
||||||
|
assert(!software_interrupt_is_enabled());
|
||||||
|
|
||||||
|
assert(next_sandbox != NULL);
|
||||||
|
struct arch_context *next_context = &next_sandbox->ctxt;
|
||||||
|
|
||||||
|
/* Get the old sandbox we're switching from.
|
||||||
|
* This is null if switching from base context
|
||||||
|
*/
|
||||||
|
struct sandbox * current_sandbox = current_sandbox_get();
|
||||||
|
struct arch_context *current_context = NULL;
|
||||||
|
if (current_sandbox != NULL) current_context = ¤t_sandbox->ctxt;
|
||||||
|
|
||||||
|
assert(next_sandbox != current_sandbox);
|
||||||
|
|
||||||
|
/* Update the worker's absolute deadline */
|
||||||
|
runtime_worker_threads_deadline[worker_thread_idx] = next_sandbox->absolute_deadline;
|
||||||
|
|
||||||
|
if (current_sandbox == NULL) {
|
||||||
|
/* Switching from "Base Context" */
|
||||||
|
#ifdef LOG_CONTEXT_SWITCHES
|
||||||
|
debuglog("Base Context (@%p) (%s) > Sandbox %lu (@%p) (%s)\n", &worker_thread_base_context,
|
||||||
|
arch_context_variant_print(worker_thread_base_context.variant), next_sandbox->id, next_context,
|
||||||
|
arch_context_variant_print(next_context->variant));
|
||||||
|
#endif
|
||||||
|
} else {
|
||||||
|
#ifdef LOG_CONTEXT_SWITCHES
|
||||||
|
debuglog("Sandbox %lu (@%p) (%s) > Sandbox %lu (@%p) (%s)\n", current_sandbox->id,
|
||||||
|
¤t_sandbox->ctxt, arch_context_variant_print(current_sandbox->ctxt.variant),
|
||||||
|
next_sandbox->id, &next_sandbox->ctxt, arch_context_variant_print(next_context->variant));
|
||||||
|
#endif
|
||||||
|
|
||||||
|
sandbox_exit(current_sandbox);
|
||||||
|
}
|
||||||
|
|
||||||
|
sandbox_set_as_running(next_sandbox, next_sandbox->state);
|
||||||
|
arch_context_switch(current_context, next_context);
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Switches to the base context, placing the current sandbox on the completion queue if in RETURNED state
|
||||||
|
*/
|
||||||
|
static inline void
|
||||||
|
scheduler_yield()
|
||||||
|
{
|
||||||
|
assert(!software_interrupt_is_enabled());
|
||||||
|
|
||||||
|
struct sandbox *current_sandbox = current_sandbox_get();
|
||||||
|
#ifndef NDEBUG
|
||||||
|
if (current_sandbox != NULL) {
|
||||||
|
assert(current_sandbox->state < SANDBOX_STATE_COUNT);
|
||||||
|
assert(current_sandbox->stack_size == current_sandbox->module->stack_size);
|
||||||
|
}
|
||||||
|
#endif
|
||||||
|
|
||||||
|
/* Assumption: Base Context should never switch to Base Context */
|
||||||
|
assert(current_sandbox != NULL);
|
||||||
|
struct arch_context *current_context = ¤t_sandbox->ctxt;
|
||||||
|
assert(current_context != &worker_thread_base_context);
|
||||||
|
|
||||||
|
#ifdef LOG_CONTEXT_SWITCHES
|
||||||
|
debuglog("Sandbox %lu (@%p) (%s) > Base Context (@%p) (%s)\n", current_sandbox->id, current_context,
|
||||||
|
arch_context_variant_print(current_sandbox->ctxt.variant), &worker_thread_base_context,
|
||||||
|
arch_context_variant_print(worker_thread_base_context.variant));
|
||||||
|
#endif
|
||||||
|
|
||||||
|
sandbox_exit(current_sandbox);
|
||||||
|
current_sandbox_set(NULL);
|
||||||
|
assert(worker_thread_base_context.variant == ARCH_CONTEXT_VARIANT_FAST);
|
||||||
|
runtime_worker_threads_deadline[worker_thread_idx] = UINT64_MAX;
|
||||||
|
arch_context_switch(current_context, &worker_thread_base_context);
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Mark the currently executing sandbox as blocked, remove it from the local runqueue,
|
||||||
|
* and switch to base context
|
||||||
|
*/
|
||||||
|
static inline void
|
||||||
|
scheduler_block(void)
|
||||||
|
{
|
||||||
|
/* Remove the sandbox we were just executing from the runqueue and mark as blocked */
|
||||||
|
struct sandbox *current_sandbox = current_sandbox_get();
|
||||||
|
|
||||||
|
/* We might either have blocked in start reading the request or while executing within the WebAssembly
|
||||||
|
* entrypoint. The preemptable flag on the context is used to differentiate. In either case, we should
|
||||||
|
* have disabled interrupts.
|
||||||
|
*/
|
||||||
|
if (current_sandbox->ctxt.preemptable) software_interrupt_disable();
|
||||||
|
assert(!software_interrupt_is_enabled());
|
||||||
|
|
||||||
|
assert(current_sandbox->state == SANDBOX_RUNNING);
|
||||||
|
sandbox_set_as_blocked(current_sandbox, SANDBOX_RUNNING);
|
||||||
|
generic_thread_dump_lock_overhead();
|
||||||
|
|
||||||
|
scheduler_yield();
|
||||||
|
}
|
||||||
@ -0,0 +1,82 @@
|
|||||||
|
#pragma once
|
||||||
|
|
||||||
|
#include <assert.h>
|
||||||
|
#include <errno.h>
|
||||||
|
|
||||||
|
#include "client_socket.h"
|
||||||
|
#include "panic.h"
|
||||||
|
#include "runtime.h"
|
||||||
|
#include "sandbox_functions.h"
|
||||||
|
#include "sandbox_set_as_error.h"
|
||||||
|
#include "sandbox_set_as_runnable.h"
|
||||||
|
#include "sandbox_state.h"
|
||||||
|
#include "sandbox_types.h"
|
||||||
|
#include "software_interrupt.h"
|
||||||
|
#include "worker_thread.h"
|
||||||
|
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Run all outstanding events in the local thread's epoll loop
|
||||||
|
*/
|
||||||
|
static inline void
|
||||||
|
worker_thread_execute_epoll_loop(void)
|
||||||
|
{
|
||||||
|
assert(!software_interrupt_is_enabled());
|
||||||
|
while (true) {
|
||||||
|
struct epoll_event epoll_events[RUNTIME_MAX_EPOLL_EVENTS];
|
||||||
|
int descriptor_count = epoll_wait(worker_thread_epoll_file_descriptor, epoll_events,
|
||||||
|
RUNTIME_MAX_EPOLL_EVENTS, 0);
|
||||||
|
|
||||||
|
if (descriptor_count < 0) {
|
||||||
|
if (errno == EINTR) continue;
|
||||||
|
|
||||||
|
panic_err();
|
||||||
|
}
|
||||||
|
|
||||||
|
if (descriptor_count == 0) break;
|
||||||
|
|
||||||
|
for (int i = 0; i < descriptor_count; i++) {
|
||||||
|
if (epoll_events[i].events & (EPOLLIN | EPOLLOUT)) {
|
||||||
|
/* Re-add to runqueue if blocked */
|
||||||
|
struct sandbox *sandbox = (struct sandbox *)epoll_events[i].data.ptr;
|
||||||
|
assert(sandbox);
|
||||||
|
|
||||||
|
if (sandbox->state == SANDBOX_BLOCKED) {
|
||||||
|
sandbox_set_as_runnable(sandbox, SANDBOX_BLOCKED);
|
||||||
|
}
|
||||||
|
} else if (epoll_events[i].events & (EPOLLERR | EPOLLHUP)) {
|
||||||
|
/* Mystery: This seems to never fire. Why? Issue #130 */
|
||||||
|
|
||||||
|
/* Close socket and set as error on socket error or unexpected client hangup */
|
||||||
|
struct sandbox *sandbox = (struct sandbox *)epoll_events[i].data.ptr;
|
||||||
|
int error = 0;
|
||||||
|
socklen_t errlen = sizeof(error);
|
||||||
|
getsockopt(epoll_events[i].data.fd, SOL_SOCKET, SO_ERROR, (void *)&error, &errlen);
|
||||||
|
|
||||||
|
if (error > 0) {
|
||||||
|
debuglog("Socket error: %s", strerror(error));
|
||||||
|
} else if (epoll_events[i].events & EPOLLHUP) {
|
||||||
|
debuglog("Client Hungup");
|
||||||
|
} else {
|
||||||
|
debuglog("Unknown Socket error");
|
||||||
|
}
|
||||||
|
|
||||||
|
switch (sandbox->state) {
|
||||||
|
case SANDBOX_SET_AS_RETURNED:
|
||||||
|
case SANDBOX_RETURNED:
|
||||||
|
case SANDBOX_SET_AS_COMPLETE:
|
||||||
|
case SANDBOX_COMPLETE:
|
||||||
|
case SANDBOX_SET_AS_ERROR:
|
||||||
|
case SANDBOX_ERROR:
|
||||||
|
panic("Expected to have closed socket");
|
||||||
|
default:
|
||||||
|
client_socket_send(sandbox->client_socket_descriptor, 503);
|
||||||
|
sandbox_close_http(sandbox);
|
||||||
|
sandbox_set_as_error(sandbox, sandbox->state);
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
panic("Mystery epoll event!\n");
|
||||||
|
};
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
Loading…
Reference in new issue