kvm: Drop kvm_patch_opcode_byte (Jan Kiszka)
[qemu] / slirp / sbuf.c
1 /*
2  * Copyright (c) 1995 Danny Gasparovski.
3  *
4  * Please read the file COPYRIGHT for the
5  * terms and conditions of the copyright.
6  */
7
8 #include <slirp.h>
9
10 static void sbappendsb(struct sbuf *sb, struct mbuf *m);
11
12 /* Done as a macro in socket.h */
13 /* int
14  * sbspace(struct sockbuff *sb)
15  * {
16  *      return SB_DATALEN - sb->sb_cc;
17  * }
18  */
19
20 void
21 sbfree(struct sbuf *sb)
22 {
23         free(sb->sb_data);
24 }
25
26 void
27 sbdrop(struct sbuf *sb, int num)
28 {
29         /*
30          * We can only drop how much we have
31          * This should never succeed
32          */
33         if(num > sb->sb_cc)
34                 num = sb->sb_cc;
35         sb->sb_cc -= num;
36         sb->sb_rptr += num;
37         if(sb->sb_rptr >= sb->sb_data + sb->sb_datalen)
38                 sb->sb_rptr -= sb->sb_datalen;
39
40 }
41
42 void
43 sbreserve(struct sbuf *sb, int size)
44 {
45         if (sb->sb_data) {
46                 /* Already alloced, realloc if necessary */
47                 if (sb->sb_datalen != size) {
48                         sb->sb_wptr = sb->sb_rptr = sb->sb_data = (char *)realloc(sb->sb_data, size);
49                         sb->sb_cc = 0;
50                         if (sb->sb_wptr)
51                            sb->sb_datalen = size;
52                         else
53                            sb->sb_datalen = 0;
54                 }
55         } else {
56                 sb->sb_wptr = sb->sb_rptr = sb->sb_data = (char *)malloc(size);
57                 sb->sb_cc = 0;
58                 if (sb->sb_wptr)
59                    sb->sb_datalen = size;
60                 else
61                    sb->sb_datalen = 0;
62         }
63 }
64
65 /*
66  * Try and write() to the socket, whatever doesn't get written
67  * append to the buffer... for a host with a fast net connection,
68  * this prevents an unnecessary copy of the data
69  * (the socket is non-blocking, so we won't hang)
70  */
71 void
72 sbappend(struct socket *so, struct mbuf *m)
73 {
74         int ret = 0;
75
76         DEBUG_CALL("sbappend");
77         DEBUG_ARG("so = %lx", (long)so);
78         DEBUG_ARG("m = %lx", (long)m);
79         DEBUG_ARG("m->m_len = %d", m->m_len);
80
81         /* Shouldn't happen, but...  e.g. foreign host closes connection */
82         if (m->m_len <= 0) {
83                 m_free(m);
84                 return;
85         }
86
87         /*
88          * If there is urgent data, call sosendoob
89          * if not all was sent, sowrite will take care of the rest
90          * (The rest of this function is just an optimisation)
91          */
92         if (so->so_urgc) {
93                 sbappendsb(&so->so_rcv, m);
94                 m_free(m);
95                 sosendoob(so);
96                 return;
97         }
98
99         /*
100          * We only write if there's nothing in the buffer,
101          * ottherwise it'll arrive out of order, and hence corrupt
102          */
103         if (!so->so_rcv.sb_cc)
104            ret = slirp_send(so, m->m_data, m->m_len, 0);
105
106         if (ret <= 0) {
107                 /*
108                  * Nothing was written
109                  * It's possible that the socket has closed, but
110                  * we don't need to check because if it has closed,
111                  * it will be detected in the normal way by soread()
112                  */
113                 sbappendsb(&so->so_rcv, m);
114         } else if (ret != m->m_len) {
115                 /*
116                  * Something was written, but not everything..
117                  * sbappendsb the rest
118                  */
119                 m->m_len -= ret;
120                 m->m_data += ret;
121                 sbappendsb(&so->so_rcv, m);
122         } /* else */
123         /* Whatever happened, we free the mbuf */
124         m_free(m);
125 }
126
127 /*
128  * Copy the data from m into sb
129  * The caller is responsible to make sure there's enough room
130  */
131 static void
132 sbappendsb(struct sbuf *sb, struct mbuf *m)
133 {
134         int len, n,  nn;
135
136         len = m->m_len;
137
138         if (sb->sb_wptr < sb->sb_rptr) {
139                 n = sb->sb_rptr - sb->sb_wptr;
140                 if (n > len) n = len;
141                 memcpy(sb->sb_wptr, m->m_data, n);
142         } else {
143                 /* Do the right edge first */
144                 n = sb->sb_data + sb->sb_datalen - sb->sb_wptr;
145                 if (n > len) n = len;
146                 memcpy(sb->sb_wptr, m->m_data, n);
147                 len -= n;
148                 if (len) {
149                         /* Now the left edge */
150                         nn = sb->sb_rptr - sb->sb_data;
151                         if (nn > len) nn = len;
152                         memcpy(sb->sb_data,m->m_data+n,nn);
153                         n += nn;
154                 }
155         }
156
157         sb->sb_cc += n;
158         sb->sb_wptr += n;
159         if (sb->sb_wptr >= sb->sb_data + sb->sb_datalen)
160                 sb->sb_wptr -= sb->sb_datalen;
161 }
162
163 /*
164  * Copy data from sbuf to a normal, straight buffer
165  * Don't update the sbuf rptr, this will be
166  * done in sbdrop when the data is acked
167  */
168 void
169 sbcopy(struct sbuf *sb, int off, int len, char *to)
170 {
171         char *from;
172
173         from = sb->sb_rptr + off;
174         if (from >= sb->sb_data + sb->sb_datalen)
175                 from -= sb->sb_datalen;
176
177         if (from < sb->sb_wptr) {
178                 if (len > sb->sb_cc) len = sb->sb_cc;
179                 memcpy(to,from,len);
180         } else {
181                 /* re-use off */
182                 off = (sb->sb_data + sb->sb_datalen) - from;
183                 if (off > len) off = len;
184                 memcpy(to,from,off);
185                 len -= off;
186                 if (len)
187                    memcpy(to+off,sb->sb_data,len);
188         }
189 }