1 c4940a90 2021-08-07 op include "consts.9ps"
 2 be123ad0 2021-08-02 op 
 3 be123ad0 2021-08-02 op # 9p protocol
 4 be123ad0 2021-08-02 op 
 5 f0544688 2021-08-02 op proc version(msize, version) {
 6 f0544688 2021-08-02 op 	send(Tversion, notag, msize:u32, version:str)
 7 f0544688 2021-08-02 op }
 8 f0544688 2021-08-02 op 
 9 f0544688 2021-08-02 op proc attach(fid, afid, uname, aname) {
10 3d720116 2021-08-07 op 	send(Tattach, iota(), fid:u32, afid:u32, uname:str, aname:str)
11 f0544688 2021-08-02 op }
12 f0544688 2021-08-02 op 
13 f0544688 2021-08-02 op proc walk(fid, newfid, ...) {
14 3d720116 2021-08-07 op 	send(Twalk, iota(), fid:u32, newfid:u32, vargs:u16, ...)
15 f0544688 2021-08-02 op }
16 f0544688 2021-08-02 op 
17 f0544688 2021-08-02 op 
18 f0544688 2021-08-02 op 
19 be123ad0 2021-08-02 op # useful functions
20 be123ad0 2021-08-02 op 
21 f0544688 2021-08-02 op proc mount(fid, path) {
22 f0544688 2021-08-02 op 	version(msize, np2000)
23 f0544688 2021-08-02 op 
24 f0544688 2021-08-02 op 	m = recv()
25 71a40aa0 2021-08-05 op 	assert (
26 c4940a90 2021-08-07 op 		m.type == Rversion
27 71a40aa0 2021-08-05 op 		m.tag == notag
28 71a40aa0 2021-08-05 op 		m.msize == msize
29 3d720116 2021-08-07 op 		# m.version == version
30 f0544688 2021-08-02 op 	)
31 f0544688 2021-08-02 op 
32 3d720116 2021-08-07 op 	attach(fid, nofid, "op", path)
33 f0544688 2021-08-02 op 
34 f0544688 2021-08-02 op 	m = recv()
35 f0544688 2021-08-02 op 	assert (
36 f0544688 2021-08-02 op 		m.type == Rattach
37 f0544688 2021-08-02 op 		m.qid.type == QTDIR
38 f0544688 2021-08-02 op 	)
39 f0544688 2021-08-02 op }
40 f0544688 2021-08-02 op 
41 c4940a90 2021-08-07 op proc expect-error() {
42 f0544688 2021-08-02 op 	m = recv()
43 f0544688 2021-08-02 op 	assert m.type == Rerror
44 977482da 2021-08-05 op 	debug("got expected error", m)
45 f0544688 2021-08-02 op }