4
* Copyright © 2003 Keith Packard
6
* Permission to use, copy, modify, distribute, and sell this software and its
7
* documentation for any purpose is hereby granted without fee, provided that
8
* the above copyright notice appear in all copies and that both that
9
* copyright notice and this permission notice appear in supporting
10
* documentation, and that the name of Keith Packard not be used in
11
* advertising or publicity pertaining to distribution of the software without
12
* specific, written prior permission. Keith Packard makes no
13
* representations about the suitability of this software for any purpose. It
14
* is provided "as is" without express or implied warranty.
16
* KEITH PACKARD DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
17
* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
18
* EVENT SHALL KEITH PACKARD BE LIABLE FOR ANY SPECIAL, INDIRECT OR
19
* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
20
* DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
21
* TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
22
* PERFORMANCE OF THIS SOFTWARE.
32
public typedef Client;
35
mutex server_mutex = Mutex::new ();
37
string server_id = Sockets::gethostname();
39
public void set_server_id (string id) { server_id = id; }
41
const int server_version = 1;
44
Mutex::acquire (server_mutex);
45
# File::fprintf (stderr, "lock %v\n", Thread::current());
49
public bool unlock () {
50
# File::fprintf (stderr, "unlock %v\n", Thread::current());
51
Mutex::release (server_mutex);
55
public typedef struct {
60
public typedef union {
65
public typedef union {
70
public typedef struct {
75
public typedef union {
80
public typedef struct {
93
public typedef union {
98
public typedef union {
103
public typedef union {
108
public typedef struct {
111
(&Client)[*] clients;
119
ObjectLoc[*] history;
121
ObjectLoc[*] done_robots;
124
public exception notreached ();