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
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
|
#include "u.h"
#include "../port/lib.h"
#include "mem.h"
#include "dat.h"
#include "fns.h"
#include "../port/error.h"
#include "ip.h"
enum
{
Maxtu= 16*1024,
};
typedef struct LB LB;
struct LB
{
Proc *readp;
Queue *q;
Fs *f;
};
static void loopbackread(void *a);
static void
loopbackbind(Ipifc *ifc, int, char**)
{
LB *lb;
lb = smalloc(sizeof(*lb));
lb->f = ifc->conv->p->f;
lb->q = qopen(1024*1024, Qmsg, nil, nil);
ifc->arg = lb;
ifc->mbps = 1000;
kproc("loopbackread", loopbackread, ifc);
}
static void
loopbackunbind(Ipifc *ifc)
{
LB *lb = ifc->arg;
if(lb->readp)
postnote(lb->readp, 1, "unbind", 0);
/* wait for reader to die */
while(lb->readp != 0)
tsleep(&up->sleep, return0, 0, 300);
/* clean up */
qfree(lb->q);
free(lb);
}
static void
loopbackbwrite(Ipifc *ifc, Block *bp, int, uchar*)
{
LB *lb;
lb = ifc->arg;
if(qpass(lb->q, bp) < 0)
ifc->outerr++;
ifc->out++;
}
static void
loopbackread(void *a)
{
Ipifc *ifc;
Block *bp;
LB *lb;
ifc = a;
lb = ifc->arg;
lb->readp = up; /* hide identity under a rock for unbind */
if(waserror()){
lb->readp = 0;
pexit("hangup", 1);
}
for(;;){
bp = qbread(lb->q, Maxtu);
if(bp == nil)
continue;
ifc->in++;
if(!canrlock(ifc)){
freeb(bp);
continue;
}
if(waserror()){
runlock(ifc);
nexterror();
}
if(ifc->lifc == nil)
freeb(bp);
else
ipiput4(lb->f, ifc, bp);
runlock(ifc);
poperror();
}
}
Medium loopbackmedium =
{
.hsize= 0,
.mintu= 0,
.maxtu= Maxtu,
.maclen= 0,
.name= "loopback",
.bind= loopbackbind,
.unbind= loopbackunbind,
.bwrite= loopbackbwrite,
};
void
loopbackmediumlink(void)
{
addipmedium(&loopbackmedium);
}
|
