Whamcloud - gitweb
- make HEAD from b_post_cmd3
[fs/lustre-release.git] / lustre / llite / llite_close.c
1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
2  * vim:expandtab:shiftwidth=8:tabstop=8:
3  *
4  * Lustre Lite routines to issue a secondary close after writeback
5  *
6  *  Copyright (c) 2001-2003 Cluster File Systems, Inc.
7  *
8  *   This file is part of Lustre, http://www.lustre.org.
9  *
10  *   Lustre is free software; you can redistribute it and/or
11  *   modify it under the terms of version 2 of the GNU General Public
12  *   License as published by the Free Software Foundation.
13  *
14  *   Lustre is distributed in the hope that it will be useful,
15  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
16  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  *   GNU General Public License for more details.
18  *
19  *   You should have received a copy of the GNU General Public License
20  *   along with Lustre; if not, write to the Free Software
21  *   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22  */
23
24 #include <linux/module.h>
25
26 #define DEBUG_SUBSYSTEM S_LLITE
27
28 //#include <lustre_mdc.h>
29 #include <lustre_lite.h>
30 #include "llite_internal.h"
31
32 /* record that a write is in flight */
33 void llap_write_pending(struct inode *inode, struct ll_async_page *llap)
34 {
35         struct ll_inode_info *lli = ll_i2info(inode);
36         
37         ENTRY;
38         spin_lock(&lli->lli_lock);
39         lli->lli_flags |= LLIF_SOM_DIRTY;
40         if (llap && list_empty(&llap->llap_pending_write))
41                 list_add(&llap->llap_pending_write, 
42                          &lli->lli_pending_write_llaps);
43         spin_unlock(&lli->lli_lock);
44         EXIT;
45 }
46
47 /* record that a write has completed */
48 int llap_write_complete(struct inode *inode, struct ll_async_page *llap)
49 {
50         struct ll_inode_info *lli = ll_i2info(inode);
51         int rc = 0;
52         
53         ENTRY;
54         spin_lock(&lli->lli_lock);
55         if (llap && !list_empty(&llap->llap_pending_write)) {
56                 list_del_init(&llap->llap_pending_write);
57                 rc = 1;
58         }
59         spin_unlock(&lli->lli_lock);
60         RETURN(rc);
61 }
62
63 /* Queue DONE_WRITING if 
64  * - done writing is allowed;
65  * - inode has no no dirty pages; */
66 void ll_queue_done_writing(struct inode *inode, unsigned long flags)
67 {
68         struct ll_inode_info *lli = ll_i2info(inode);
69
70         spin_lock(&lli->lli_lock);
71         lli->lli_flags |= flags;
72
73         if ((lli->lli_flags & LLIF_DONE_WRITING) &&
74             list_empty(&lli->lli_pending_write_llaps)) {
75                 struct ll_close_queue *lcq = ll_i2sbi(inode)->ll_lcq;
76
77                 if (lli->lli_flags & LLIF_MDS_SIZE_LOCK)
78                          CWARN("ino %lu/%u(flags %lu) som valid it just after "
79                                "recovery\n",
80                                inode->i_ino, inode->i_generation, 
81                                lli->lli_flags);
82                 /* DONE_WRITING is allowed and inode has no dirty page. */
83                 spin_lock(&lcq->lcq_lock);
84
85                 LASSERT(list_empty(&lli->lli_close_list));
86                 CDEBUG(D_INODE, "adding inode %lu/%u to close list\n",
87                        inode->i_ino, inode->i_generation);
88                 list_add_tail(&lli->lli_close_list, &lcq->lcq_head);
89
90                 /* Avoid a concurrent insertion into the close thread queue:
91                  * an inode is already in the close thread, open(), write(),
92                  * close() happen, epoch is closed as the inode is marked as
93                  * LLIF_EPOCH_PENDING. When pages are written inode should not
94                  * be inserted into the queue again, clear this flag to avoid
95                  * it. */
96                 lli->lli_flags &= ~LLIF_DONE_WRITING;
97
98                 wake_up(&lcq->lcq_waitq);
99                 spin_unlock(&lcq->lcq_lock);
100         }
101         spin_unlock(&lli->lli_lock);
102 }
103
104 /* Close epoch and send Size-on-MDS attribute update if possible. 
105  * Call this under @lli->lli_lock spinlock. */
106 void ll_epoch_close(struct inode *inode, struct md_op_data *op_data,
107                     struct obd_client_handle **och, unsigned long flags)
108 {
109         struct ll_inode_info *lli = ll_i2info(inode);
110         ENTRY;
111
112         spin_lock(&lli->lli_lock);
113         if (!(list_empty(&lli->lli_pending_write_llaps))) {
114                 if (!(lli->lli_flags & LLIF_EPOCH_PENDING)) {
115                         LASSERT(*och != NULL);
116                         LASSERT(lli->lli_pending_och == NULL);
117                         /* Inode is dirty and there is no pending write done
118                          * request yet, DONE_WRITE is to be sent later. */
119                         lli->lli_flags |= LLIF_EPOCH_PENDING;
120                         lli->lli_pending_och = *och;
121                         spin_unlock(&lli->lli_lock);
122
123                         inode = igrab(inode);
124                         LASSERT(inode);
125                         GOTO(out, 0);
126                 } 
127                 if (flags & LLIF_DONE_WRITING) {
128                         /* Some pages are still dirty, it is early to send
129                          * DONE_WRITE. Wait untill all pages will be flushed
130                          * and try DONE_WRITE again later. */
131                         LASSERT(!(lli->lli_flags & LLIF_DONE_WRITING));
132                         lli->lli_flags |= LLIF_DONE_WRITING;
133                         spin_unlock(&lli->lli_lock);
134
135                         inode = igrab(inode);
136                         LASSERT(inode);
137                         GOTO(out, 0);
138                 }
139         }
140         CDEBUG(D_INODE, "Epoch "LPU64" closed on "DFID"\n",
141                ll_i2info(inode)->lli_ioepoch, PFID(&lli->lli_fid));
142         op_data->op_flags |= MF_EPOCH_CLOSE;
143
144         if (flags & LLIF_DONE_WRITING) {
145                 LASSERT(lli->lli_flags & LLIF_SOM_DIRTY);
146                 LASSERT(!(lli->lli_flags & LLIF_DONE_WRITING));
147                 *och = lli->lli_pending_och;
148                 lli->lli_pending_och = NULL;
149                 lli->lli_flags &= ~LLIF_EPOCH_PENDING;
150         } else {
151                 /* Pack Size-on-MDS inode attributes only if they has changed */
152                 if (!(lli->lli_flags & LLIF_SOM_DIRTY)) {
153                         spin_unlock(&lli->lli_lock);
154                         GOTO(out, 0);
155                 }
156
157                 /* There is a pending DONE_WRITE -- close epoch with no
158                  * attribute change. */
159                 if (lli->lli_flags & LLIF_EPOCH_PENDING) {
160                         spin_unlock(&lli->lli_lock);
161                         GOTO(out, 0);
162                 }
163         }
164
165         LASSERT(list_empty(&lli->lli_pending_write_llaps));
166         lli->lli_flags &= ~LLIF_SOM_DIRTY;
167         spin_unlock(&lli->lli_lock);
168         op_data->op_flags |= MF_SOM_CHANGE;
169
170         /* Check if Size-on-MDS attributes are valid. */
171         if (lli->lli_flags & LLIF_MDS_SIZE_LOCK)
172                 CWARN("ino %lu/%u(flags %lu) som valid it just after "
173                       "recovery\n",
174                       inode->i_ino, inode->i_generation, lli->lli_flags);
175
176         if (!ll_local_size(inode)) {
177                 /* Send Size-on-MDS Attributes if valid. Atime is sent along
178                  * with all the attributes. */
179                 op_data->op_attr.ia_valid |= ATTR_MTIME_SET | ATTR_CTIME_SET |
180                                 ATTR_ATIME_SET | ATTR_SIZE | ATTR_BLOCKS;
181         }
182         EXIT;
183 out:
184         return;
185 }
186
187 int ll_sizeonmds_update(struct inode *inode, struct lustre_handle *fh,
188                         __u64 ioepoch)
189 {
190         struct ll_inode_info *lli = ll_i2info(inode);
191         struct md_op_data *op_data;
192         struct obdo *oa;
193         int rc;
194         ENTRY;
195         
196         /* LASSERT(!(lli->lli_flags & LLIF_MDS_SIZE_LOCK)); */
197         /* After recovery that can be valid. */
198         if (lli->lli_flags & LLIF_MDS_SIZE_LOCK)
199                 CWARN("ino %lu/%u(flags %lu) som valid it just after "
200                       "recovery\n", inode->i_ino, inode->i_generation,
201                       lli->lli_flags);
202         
203         OBDO_ALLOC(oa);
204         OBD_ALLOC_PTR(op_data);
205         if (!oa || !op_data) {
206                 CERROR("can't allocate memory for Size-on-MDS update.\n");
207                 RETURN(-ENOMEM);
208         }
209         rc = ll_inode_getattr(inode, oa);
210         if (rc) {
211                 CERROR("inode_getattr failed (%d): unable to send a "
212                        "Size-on-MDS attribute update for inode %lu/%u\n",
213                        rc, inode->i_ino, inode->i_generation);
214                 GOTO(out, rc);
215         }
216         CDEBUG(D_INODE, "Size-on-MDS update on "DFID"\n", PFID(&lli->lli_fid));
217         
218         md_from_obdo(op_data, oa, oa->o_valid);
219         memcpy(&op_data->op_handle, fh, sizeof(*fh));
220         
221         op_data->op_ioepoch = ioepoch;
222         op_data->op_flags |= MF_SOM_CHANGE;
223         
224         rc = ll_md_setattr(inode, op_data);
225         EXIT;
226 out:
227         if (oa)
228                 OBDO_FREE(oa);
229         if (op_data)
230                 ll_finish_md_op_data(op_data);
231         return rc;
232 }
233
234 /* Send a DONE_WRITING rpc, pack Size-on-MDS attributes into it, if possible */
235 static void ll_done_writing(struct inode *inode)
236 {
237         struct obd_client_handle *och = NULL;
238         struct md_op_data *op_data;
239         int rc;
240         ENTRY;
241
242         LASSERT(ll_i2mdexp(inode)->exp_connect_flags & OBD_CONNECT_SOM);
243         
244         OBD_ALLOC_PTR(op_data);
245         if (op_data == NULL) {
246                 CERROR("can't allocate op_data\n");
247                 EXIT;
248                 return;
249         }
250
251         ll_epoch_close(inode, op_data, &och, LLIF_DONE_WRITING);
252         /* If there is no @och, we do not do D_W yet. */
253         if (och == NULL)
254                 GOTO(out, 0);
255         
256         ll_pack_inode2opdata(inode, op_data, &och->och_fh);
257
258         rc = md_done_writing(ll_i2sbi(inode)->ll_md_exp, op_data, och);
259         if (rc == -EAGAIN) {
260                 /* MDS has instructed us to obtain Size-on-MDS attribute from 
261                  * OSTs and send setattr to back to MDS. */
262                 rc = ll_sizeonmds_update(inode, &och->och_fh,
263                                          op_data->op_ioepoch);
264         } else if (rc) {
265                 CERROR("inode %lu mdc done_writing failed: rc = %d\n",
266                        inode->i_ino, rc);
267         }
268 out:
269         ll_finish_md_op_data(op_data);
270         if (och) {
271                 md_clear_open_replay_data(ll_i2sbi(inode)->ll_md_exp, och);
272                 OBD_FREE_PTR(och);
273         }
274         EXIT;
275 }
276
277 static struct ll_inode_info *ll_close_next_lli(struct ll_close_queue *lcq)
278 {
279         struct ll_inode_info *lli = NULL;
280
281         spin_lock(&lcq->lcq_lock);
282
283         if (!list_empty(&lcq->lcq_head)) {
284                 lli = list_entry(lcq->lcq_head.next, struct ll_inode_info,
285                                  lli_close_list);
286                 list_del_init(&lli->lli_close_list);
287         } else if (atomic_read(&lcq->lcq_stop))
288                 lli = ERR_PTR(-EALREADY);
289
290         spin_unlock(&lcq->lcq_lock);
291         return lli;
292 }
293
294 static int ll_close_thread(void *arg)
295 {
296         struct ll_close_queue *lcq = arg;
297         ENTRY;
298
299         {
300                 char name[CFS_CURPROC_COMM_MAX];
301                 snprintf(name, sizeof(name) - 1, "ll_close");
302                 cfs_daemonize(name);
303         }
304         
305         complete(&lcq->lcq_comp);
306
307         while (1) {
308                 struct l_wait_info lwi = { 0 };
309                 struct ll_inode_info *lli;
310                 struct inode *inode;
311
312                 l_wait_event_exclusive(lcq->lcq_waitq,
313                                        (lli = ll_close_next_lli(lcq)) != NULL,
314                                        &lwi);
315                 if (IS_ERR(lli))
316                         break;
317
318                 inode = ll_info2i(lli);
319                 CDEBUG(D_INFO, "done_writting for inode %lu/%u\n",
320                        inode->i_ino, inode->i_generation);
321                 ll_done_writing(inode);
322                 iput(inode);
323         }
324
325         CDEBUG(D_INFO, "ll_close exiting\n");
326         complete(&lcq->lcq_comp);
327         RETURN(0);
328 }
329
330 int ll_close_thread_start(struct ll_close_queue **lcq_ret)
331 {
332         struct ll_close_queue *lcq;
333         pid_t pid;
334
335         OBD_ALLOC(lcq, sizeof(*lcq));
336         if (lcq == NULL)
337                 return -ENOMEM;
338
339         spin_lock_init(&lcq->lcq_lock);
340         INIT_LIST_HEAD(&lcq->lcq_head);
341         init_waitqueue_head(&lcq->lcq_waitq);
342         init_completion(&lcq->lcq_comp);
343
344         pid = kernel_thread(ll_close_thread, lcq, 0);
345         if (pid < 0) {
346                 OBD_FREE(lcq, sizeof(*lcq));
347                 return pid;
348         }
349
350         wait_for_completion(&lcq->lcq_comp);
351         *lcq_ret = lcq;
352         return 0;
353 }
354
355 void ll_close_thread_shutdown(struct ll_close_queue *lcq)
356 {
357         init_completion(&lcq->lcq_comp);
358         atomic_inc(&lcq->lcq_stop);
359         wake_up(&lcq->lcq_waitq);
360         wait_for_completion(&lcq->lcq_comp);
361         OBD_FREE(lcq, sizeof(*lcq));
362 }
363
364