2014-06-08 10:13:29 +04:00
|
|
|
/* This file is part of ToaruOS and is released under the terms
|
|
|
|
* of the NCSA / University of Illinois License - see LICENSE.md
|
|
|
|
* Copyright (C) 2013-2014 Kevin Lange
|
|
|
|
*/
|
2012-07-07 08:08:28 +04:00
|
|
|
/*
|
|
|
|
* threadtest
|
|
|
|
*
|
|
|
|
* A class concurreny failure demonstration.
|
|
|
|
* Append -l to use locks.
|
|
|
|
*/
|
2012-02-16 11:06:44 +04:00
|
|
|
#include <stdio.h>
|
|
|
|
#include <unistd.h>
|
|
|
|
#include <syscall.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <stdint.h>
|
2012-02-16 11:48:51 +04:00
|
|
|
#include <string.h>
|
2014-04-27 12:37:33 +04:00
|
|
|
#include <sys/wait.h>
|
2012-09-05 07:27:49 +04:00
|
|
|
#include "lib/pthread.h"
|
2014-05-19 06:34:49 +04:00
|
|
|
#include "lib/spinlock.h"
|
2012-02-16 11:06:44 +04:00
|
|
|
|
|
|
|
#define NUM_THREADS 5
|
2012-02-16 11:34:12 +04:00
|
|
|
#define VALUE 0x1000000
|
|
|
|
#define CHECKPOINT 0x03FFFFF
|
2012-02-16 11:06:44 +04:00
|
|
|
|
|
|
|
volatile uint32_t result = 0;
|
2012-02-16 11:48:51 +04:00
|
|
|
int8_t use_locks = 0;
|
|
|
|
|
2014-05-19 06:34:49 +04:00
|
|
|
volatile int the_lock = 0;
|
2012-02-16 11:06:44 +04:00
|
|
|
|
|
|
|
void *print_pid(void * garbage) {
|
2012-02-17 00:31:40 +04:00
|
|
|
int i;
|
|
|
|
printf("I am a thread and my pid is %d but my tid is %d and my stack is at %p\n", getpid(), gettid(), &i);
|
2012-02-16 11:06:44 +04:00
|
|
|
|
|
|
|
for (uint32_t i = 0; i < VALUE; ++i) {
|
2012-02-16 11:48:51 +04:00
|
|
|
if (use_locks) {
|
|
|
|
spin_lock(&the_lock);
|
|
|
|
}
|
2012-02-16 11:34:12 +04:00
|
|
|
if (!(result & CHECKPOINT)) {
|
|
|
|
printf("[%d] Checkpoint: %x\n", gettid(), result);
|
|
|
|
}
|
2012-02-16 11:06:44 +04:00
|
|
|
result++;
|
2012-02-16 11:48:51 +04:00
|
|
|
if (use_locks) {
|
|
|
|
spin_unlock(&the_lock);
|
|
|
|
}
|
2012-02-16 11:06:44 +04:00
|
|
|
}
|
|
|
|
|
|
|
|
pthread_exit(garbage);
|
|
|
|
}
|
|
|
|
|
|
|
|
int main(int argc, char * argv[]) {
|
2012-02-16 11:48:51 +04:00
|
|
|
if (argc > 1) {
|
|
|
|
if (!strcmp(argv[1], "-l")) {
|
|
|
|
use_locks = 1;
|
|
|
|
}
|
|
|
|
}
|
2012-02-16 11:06:44 +04:00
|
|
|
pthread_t thread[NUM_THREADS];
|
|
|
|
printf("I am the main process and my pid is %d and my tid is also %d\n", getpid(), gettid());
|
|
|
|
|
2012-02-16 11:48:51 +04:00
|
|
|
printf("Attempting to %s calculate %d!\n",
|
|
|
|
(use_locks) ? "(safely)" : "(unsafely)",
|
|
|
|
NUM_THREADS * VALUE);
|
2012-02-16 11:34:12 +04:00
|
|
|
|
2012-02-16 11:06:44 +04:00
|
|
|
for (int i = 0; i < NUM_THREADS; ++i) {
|
|
|
|
pthread_create(&thread[i], NULL, print_pid, NULL);
|
|
|
|
}
|
|
|
|
|
|
|
|
for (int i = 0; i < NUM_THREADS; ++i) {
|
2014-04-27 12:37:33 +04:00
|
|
|
waitpid(thread[i].id, NULL, 0);
|
2012-02-16 11:06:44 +04:00
|
|
|
}
|
|
|
|
|
2012-02-16 11:48:51 +04:00
|
|
|
printf("Done. Result of %scomputation was %d %s!!\n",
|
|
|
|
(use_locks) ? "" : "(definitely unsafe) ",
|
|
|
|
result,
|
2012-02-16 11:06:44 +04:00
|
|
|
(result == NUM_THREADS * VALUE) ? "(yay, that's right!)" : "(boo, that's wrong!)");
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
}
|