Merge /spare/repo/linux-2.6/
[linux-2.6] / net / core / stream.c
1 /*
2  *     SUCS NET3:
3  *
4  *     Generic stream handling routines. These are generic for most
5  *     protocols. Even IP. Tonight 8-).
6  *     This is used because TCP, LLC (others too) layer all have mostly
7  *     identical sendmsg() and recvmsg() code.
8  *     So we (will) share it here.
9  *
10  *     Authors:        Arnaldo Carvalho de Melo <acme@conectiva.com.br>
11  *                     (from old tcp.c code)
12  *                     Alan Cox <alan@redhat.com> (Borrowed comments 8-))
13  */
14
15 #include <linux/module.h>
16 #include <linux/net.h>
17 #include <linux/signal.h>
18 #include <linux/tcp.h>
19 #include <linux/wait.h>
20 #include <net/sock.h>
21
22 /**
23  * sk_stream_write_space - stream socket write_space callback.
24  * @sk: socket
25  *
26  * FIXME: write proper description
27  */
28 void sk_stream_write_space(struct sock *sk)
29 {
30         struct socket *sock = sk->sk_socket;
31
32         if (sk_stream_wspace(sk) >= sk_stream_min_wspace(sk) && sock) {
33                 clear_bit(SOCK_NOSPACE, &sock->flags);
34
35                 if (sk->sk_sleep && waitqueue_active(sk->sk_sleep))
36                         wake_up_interruptible(sk->sk_sleep);
37                 if (sock->fasync_list && !(sk->sk_shutdown & SEND_SHUTDOWN))
38                         sock_wake_async(sock, 2, POLL_OUT);
39         }
40 }
41
42 EXPORT_SYMBOL(sk_stream_write_space);
43
44 /**
45  * sk_stream_wait_connect - Wait for a socket to get into the connected state
46  * @sk: sock to wait on
47  * @timeo_p: for how long to wait
48  *
49  * Must be called with the socket locked.
50  */
51 int sk_stream_wait_connect(struct sock *sk, long *timeo_p)
52 {
53         struct task_struct *tsk = current;
54         DEFINE_WAIT(wait);
55
56         while (1) {
57                 if (sk->sk_err)
58                         return sock_error(sk);
59                 if ((1 << sk->sk_state) & ~(TCPF_SYN_SENT | TCPF_SYN_RECV))
60                         return -EPIPE;
61                 if (!*timeo_p)
62                         return -EAGAIN;
63                 if (signal_pending(tsk))
64                         return sock_intr_errno(*timeo_p);
65
66                 prepare_to_wait(sk->sk_sleep, &wait, TASK_INTERRUPTIBLE);
67                 sk->sk_write_pending++;
68                 if (sk_wait_event(sk, timeo_p,
69                                   !((1 << sk->sk_state) & 
70                                     ~(TCPF_ESTABLISHED | TCPF_CLOSE_WAIT))))
71                         break;
72                 finish_wait(sk->sk_sleep, &wait);
73                 sk->sk_write_pending--;
74         }
75         return 0;
76 }
77
78 EXPORT_SYMBOL(sk_stream_wait_connect);
79
80 /**
81  * sk_stream_closing - Return 1 if we still have things to send in our buffers.
82  * @sk: socket to verify
83  */
84 static inline int sk_stream_closing(struct sock *sk)
85 {
86         return (1 << sk->sk_state) &
87                (TCPF_FIN_WAIT1 | TCPF_CLOSING | TCPF_LAST_ACK);
88 }
89
90 void sk_stream_wait_close(struct sock *sk, long timeout)
91 {
92         if (timeout) {
93                 DEFINE_WAIT(wait);
94
95                 do {
96                         prepare_to_wait(sk->sk_sleep, &wait,
97                                         TASK_INTERRUPTIBLE);
98                         if (sk_wait_event(sk, &timeout, !sk_stream_closing(sk)))
99                                 break;
100                 } while (!signal_pending(current) && timeout);
101
102                 finish_wait(sk->sk_sleep, &wait);
103         }
104 }
105
106 EXPORT_SYMBOL(sk_stream_wait_close);
107
108 /**
109  * sk_stream_wait_memory - Wait for more memory for a socket
110  * @sk: socket to wait for memory
111  * @timeo_p: for how long
112  */
113 int sk_stream_wait_memory(struct sock *sk, long *timeo_p)
114 {
115         int err = 0;
116         long vm_wait = 0;
117         long current_timeo = *timeo_p;
118         DEFINE_WAIT(wait);
119
120         if (sk_stream_memory_free(sk))
121                 current_timeo = vm_wait = (net_random() % (HZ / 5)) + 2;
122
123         while (1) {
124                 set_bit(SOCK_ASYNC_NOSPACE, &sk->sk_socket->flags);
125
126                 prepare_to_wait(sk->sk_sleep, &wait, TASK_INTERRUPTIBLE);
127
128                 if (sk->sk_err || (sk->sk_shutdown & SEND_SHUTDOWN))
129                         goto do_error;
130                 if (!*timeo_p)
131                         goto do_nonblock;
132                 if (signal_pending(current))
133                         goto do_interrupted;
134                 clear_bit(SOCK_ASYNC_NOSPACE, &sk->sk_socket->flags);
135                 if (sk_stream_memory_free(sk) && !vm_wait)
136                         break;
137
138                 set_bit(SOCK_NOSPACE, &sk->sk_socket->flags);
139                 sk->sk_write_pending++;
140                 sk_wait_event(sk, &current_timeo, sk_stream_memory_free(sk) &&
141                                                   vm_wait);
142                 sk->sk_write_pending--;
143
144                 if (vm_wait) {
145                         vm_wait -= current_timeo;
146                         current_timeo = *timeo_p;
147                         if (current_timeo != MAX_SCHEDULE_TIMEOUT &&
148                             (current_timeo -= vm_wait) < 0)
149                                 current_timeo = 0;
150                         vm_wait = 0;
151                 }
152                 *timeo_p = current_timeo;
153         }
154 out:
155         finish_wait(sk->sk_sleep, &wait);
156         return err;
157
158 do_error:
159         err = -EPIPE;
160         goto out;
161 do_nonblock:
162         err = -EAGAIN;
163         goto out;
164 do_interrupted:
165         err = sock_intr_errno(*timeo_p);
166         goto out;
167 }
168
169 EXPORT_SYMBOL(sk_stream_wait_memory);
170
171 void sk_stream_rfree(struct sk_buff *skb)
172 {
173         struct sock *sk = skb->sk;
174
175         atomic_sub(skb->truesize, &sk->sk_rmem_alloc);
176         sk->sk_forward_alloc += skb->truesize;
177 }
178
179 EXPORT_SYMBOL(sk_stream_rfree);
180
181 int sk_stream_error(struct sock *sk, int flags, int err)
182 {
183         if (err == -EPIPE)
184                 err = sock_error(sk) ? : -EPIPE;
185         if (err == -EPIPE && !(flags & MSG_NOSIGNAL))
186                 send_sig(SIGPIPE, current, 0);
187         return err;
188 }
189
190 EXPORT_SYMBOL(sk_stream_error);
191
192 void __sk_stream_mem_reclaim(struct sock *sk)
193 {
194         if (sk->sk_forward_alloc >= SK_STREAM_MEM_QUANTUM) {
195                 atomic_sub(sk->sk_forward_alloc / SK_STREAM_MEM_QUANTUM,
196                            sk->sk_prot->memory_allocated);
197                 sk->sk_forward_alloc &= SK_STREAM_MEM_QUANTUM - 1;
198                 if (*sk->sk_prot->memory_pressure &&
199                     (atomic_read(sk->sk_prot->memory_allocated) <
200                      sk->sk_prot->sysctl_mem[0]))
201                         *sk->sk_prot->memory_pressure = 0;
202         }
203 }
204
205 EXPORT_SYMBOL(__sk_stream_mem_reclaim);
206
207 int sk_stream_mem_schedule(struct sock *sk, int size, int kind)
208 {
209         int amt = sk_stream_pages(size);
210
211         sk->sk_forward_alloc += amt * SK_STREAM_MEM_QUANTUM;
212         atomic_add(amt, sk->sk_prot->memory_allocated);
213
214         /* Under limit. */
215         if (atomic_read(sk->sk_prot->memory_allocated) < sk->sk_prot->sysctl_mem[0]) {
216                 if (*sk->sk_prot->memory_pressure)
217                         *sk->sk_prot->memory_pressure = 0;
218                 return 1;
219         }
220
221         /* Over hard limit. */
222         if (atomic_read(sk->sk_prot->memory_allocated) > sk->sk_prot->sysctl_mem[2]) {
223                 sk->sk_prot->enter_memory_pressure();
224                 goto suppress_allocation;
225         }
226
227         /* Under pressure. */
228         if (atomic_read(sk->sk_prot->memory_allocated) > sk->sk_prot->sysctl_mem[1])
229                 sk->sk_prot->enter_memory_pressure();
230
231         if (kind) {
232                 if (atomic_read(&sk->sk_rmem_alloc) < sk->sk_prot->sysctl_rmem[0])
233                         return 1;
234         } else if (sk->sk_wmem_queued < sk->sk_prot->sysctl_wmem[0])
235                 return 1;
236
237         if (!*sk->sk_prot->memory_pressure ||
238             sk->sk_prot->sysctl_mem[2] > atomic_read(sk->sk_prot->sockets_allocated) *
239                                 sk_stream_pages(sk->sk_wmem_queued +
240                                                 atomic_read(&sk->sk_rmem_alloc) +
241                                                 sk->sk_forward_alloc))
242                 return 1;
243
244 suppress_allocation:
245
246         if (!kind) {
247                 sk_stream_moderate_sndbuf(sk);
248
249                 /* Fail only if socket is _under_ its sndbuf.
250                  * In this case we cannot block, so that we have to fail.
251                  */
252                 if (sk->sk_wmem_queued + size >= sk->sk_sndbuf)
253                         return 1;
254         }
255
256         /* Alas. Undo changes. */
257         sk->sk_forward_alloc -= amt * SK_STREAM_MEM_QUANTUM;
258         atomic_sub(amt, sk->sk_prot->memory_allocated);
259         return 0;
260 }
261
262 EXPORT_SYMBOL(sk_stream_mem_schedule);
263
264 void sk_stream_kill_queues(struct sock *sk)
265 {
266         /* First the read buffer. */
267         __skb_queue_purge(&sk->sk_receive_queue);
268
269         /* Next, the error queue. */
270         __skb_queue_purge(&sk->sk_error_queue);
271
272         /* Next, the write queue. */
273         BUG_TRAP(skb_queue_empty(&sk->sk_write_queue));
274
275         /* Account for returned memory. */
276         sk_stream_mem_reclaim(sk);
277
278         BUG_TRAP(!sk->sk_wmem_queued);
279         BUG_TRAP(!sk->sk_forward_alloc);
280
281         /* It is _impossible_ for the backlog to contain anything
282          * when we get here.  All user references to this socket
283          * have gone away, only the net layer knows can touch it.
284          */
285 }
286
287 EXPORT_SYMBOL(sk_stream_kill_queues);