~kris/9p

9hist

ref: 6df3aec7a369c6beae1e6399eb7cc41c2db8a014 9hist/port/taslock.c -rw-r--r-- 377 bytes
6df3aec7 — David du Colombier Plan 9 from Bell Labs 1993-09-10 33 years ago
                                                                                
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
#include "u.h"
#include "../port/lib.h"
#include "mem.h"
#include "dat.h"
#include "fns.h"
#include "../port/error.h"

void
lock(Lock *l)
{
	for(;;){
		while(l->key)
			;
		if(tas(&l->key) == 0)
			return;
	}
}

int
canlock(Lock *l)
{
	if(tas(&l->key))
		return 0;
	l->pc = getcallerpc(((uchar*)&l) - sizeof(l));
	return 1;
}

void
unlock(Lock *l)
{
	l->pc = 0;
	l->key = 0;
}