Whamcloud - gitweb
LU-17705 ptlrpc: replace synchronize_rcu() with rcu_barrier()
[fs/lustre-release.git] / lustre / target / tgt_lastrcvd.c
1 /*
2  * GPL HEADER START
3  *
4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2 only,
8  * as published by the Free Software Foundation.
9  *
10  * This program is distributed in the hope that it will be useful, but
11  * WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * General Public License version 2 for more details (a copy is included
14  * in the LICENSE file that accompanied this code).
15  *
16  * You should have received a copy of the GNU General Public License
17  * version 2 along with this program; If not, see
18  * http://www.gnu.org/licenses/gpl-2.0.html
19  *
20  * GPL HEADER END
21  */
22 /*
23  * Copyright (c) 2009, 2010, Oracle and/or its affiliates. All rights reserved.
24  * Use is subject to license terms.
25  *
26  * Copyright (c) 2011, 2017, Intel Corporation.
27  */
28 /*
29  * This file is part of Lustre, http://www.lustre.org/
30  * Lustre is a trademark of Sun Microsystems, Inc.
31  *
32  * Lustre Unified Target
33  * These are common function to work with last_received file
34  *
35  * Author: Mikhail Pershin <mike.pershin@intel.com>
36  */
37 #include <obd.h>
38 #include <obd_class.h>
39 #include <lustre_fid.h>
40
41 #include "tgt_internal.h"
42
43 /** version recovery epoch */
44 #define LR_EPOCH_BITS   32
45
46 /* Allocate a bitmap for a chunk of reply data slots */
47 static int tgt_bitmap_chunk_alloc(struct lu_target *lut, int chunk)
48 {
49         unsigned long *bm;
50
51         OBD_ALLOC_LARGE(bm, BITS_TO_LONGS(LUT_REPLY_SLOTS_PER_CHUNK) *
52                         sizeof(long));
53         if (bm == NULL)
54                 return -ENOMEM;
55
56         spin_lock(&lut->lut_client_bitmap_lock);
57
58         if (lut->lut_reply_bitmap[chunk] != NULL) {
59                 /* someone else already allocated the bitmap for this chunk */
60                 spin_unlock(&lut->lut_client_bitmap_lock);
61                 OBD_FREE_LARGE(bm, BITS_TO_LONGS(LUT_REPLY_SLOTS_PER_CHUNK) *
62                          sizeof(long));
63                 return 0;
64         }
65
66         lut->lut_reply_bitmap[chunk] = bm;
67
68         spin_unlock(&lut->lut_client_bitmap_lock);
69
70         return 0;
71 }
72
73 /* Look for an available reply data slot in the bitmap
74  * of the target @lut
75  * Allocate bitmap chunk when first used
76  * XXX algo could be improved if this routine limits performance
77  */
78 static int tgt_find_free_reply_slot(struct lu_target *lut)
79 {
80         unsigned long *bmp;
81         int chunk = 0;
82         int rc;
83         int b;
84
85         for (chunk = 0; chunk < LUT_REPLY_SLOTS_MAX_CHUNKS; chunk++) {
86                 /* allocate the bitmap chunk if necessary */
87                 if (unlikely(lut->lut_reply_bitmap[chunk] == NULL)) {
88                         rc = tgt_bitmap_chunk_alloc(lut, chunk);
89                         if (rc != 0)
90                                 return rc;
91                 }
92                 bmp = lut->lut_reply_bitmap[chunk];
93
94                 /* look for an available slot in this chunk */
95                 do {
96                         b = find_first_zero_bit(bmp, LUT_REPLY_SLOTS_PER_CHUNK);
97                         if (b >= LUT_REPLY_SLOTS_PER_CHUNK)
98                                 break;
99
100                         /* found one */
101                         if (test_and_set_bit(b, bmp) == 0)
102                                 return chunk * LUT_REPLY_SLOTS_PER_CHUNK + b;
103                 } while (true);
104         }
105
106         return -ENOSPC;
107 }
108
109 /* Mark the reply data slot @idx 'used' in the corresponding bitmap chunk
110  * of the target @lut
111  * Allocate the bitmap chunk if necessary
112  */
113 static int tgt_set_reply_slot(struct lu_target *lut, int idx)
114 {
115         int chunk;
116         int b;
117         int rc;
118
119         chunk = idx / LUT_REPLY_SLOTS_PER_CHUNK;
120         b = idx % LUT_REPLY_SLOTS_PER_CHUNK;
121
122         LASSERT(chunk < LUT_REPLY_SLOTS_MAX_CHUNKS);
123         LASSERT(b < LUT_REPLY_SLOTS_PER_CHUNK);
124
125         /* allocate the bitmap chunk if necessary */
126         if (unlikely(lut->lut_reply_bitmap[chunk] == NULL)) {
127                 rc = tgt_bitmap_chunk_alloc(lut, chunk);
128                 if (rc != 0)
129                         return rc;
130         }
131
132         /* mark the slot 'used' in this chunk */
133         if (test_and_set_bit(b, lut->lut_reply_bitmap[chunk]) != 0) {
134                 CERROR("%s: slot %d already set in bitmap\n",
135                        tgt_name(lut), idx);
136                 return -EALREADY;
137         }
138
139         return 0;
140 }
141
142
143 /* Mark the reply data slot @idx 'unused' in the corresponding bitmap chunk
144  * of the target @lut
145  */
146 static int tgt_clear_reply_slot(struct lu_target *lut, int idx)
147 {
148         int chunk;
149         int b;
150
151         if (lut->lut_obd->obd_stopping)
152                 /*
153                  * in case of failover keep the bit set in order to
154                  * avoid overwriting slots in reply_data which might
155                  * be required by resent rpcs
156                  */
157                 return 0;
158         chunk = idx / LUT_REPLY_SLOTS_PER_CHUNK;
159         b = idx % LUT_REPLY_SLOTS_PER_CHUNK;
160
161         LASSERT(chunk < LUT_REPLY_SLOTS_MAX_CHUNKS);
162         LASSERT(b < LUT_REPLY_SLOTS_PER_CHUNK);
163
164         if (lut->lut_reply_bitmap[chunk] == NULL) {
165                 CERROR("%s: slot %d not allocated\n",
166                        tgt_name(lut), idx);
167                 return -ENOENT;
168         }
169
170         if (test_and_clear_bit(b, lut->lut_reply_bitmap[chunk]) == 0) {
171                 CERROR("%s: slot %d already clear in bitmap\n",
172                        tgt_name(lut), idx);
173                 return -EALREADY;
174         }
175
176         return 0;
177 }
178
179
180 /* Read header of reply_data file of target @tgt into structure @lrh */
181 static int tgt_reply_header_read(const struct lu_env *env,
182                                  struct lu_target *tgt,
183                                  struct lsd_reply_header *lrh)
184 {
185         int                      rc;
186         struct lsd_reply_header  buf;
187         struct tgt_thread_info  *tti = tgt_th_info(env);
188
189         tti->tti_off = 0;
190         tti->tti_buf.lb_buf = &buf;
191         tti->tti_buf.lb_len = sizeof(buf);
192
193         rc = dt_record_read(env, tgt->lut_reply_data, &tti->tti_buf,
194                             &tti->tti_off);
195         if (rc != 0)
196                 return rc;
197
198         lrh->lrh_magic = le32_to_cpu(buf.lrh_magic);
199         lrh->lrh_header_size = le32_to_cpu(buf.lrh_header_size);
200         lrh->lrh_reply_size = le32_to_cpu(buf.lrh_reply_size);
201
202         CDEBUG(D_HA, "%s: read %s header. magic=0x%08x "
203                "header_size=%d reply_size=%d\n",
204                 tgt->lut_obd->obd_name, REPLY_DATA,
205                 lrh->lrh_magic, lrh->lrh_header_size, lrh->lrh_reply_size);
206
207         return 0;
208 }
209
210 /* Write header into replay_data file of target @tgt from structure @lrh */
211 static int tgt_reply_header_write(const struct lu_env *env,
212                                   struct lu_target *tgt,
213                                   struct lsd_reply_header *lrh)
214 {
215         int                      rc;
216         struct lsd_reply_header  buf;
217         struct tgt_thread_info  *tti = tgt_th_info(env);
218         struct thandle          *th;
219         struct dt_object        *dto;
220
221         CDEBUG(D_HA, "%s: write %s header. magic=0x%08x "
222                "header_size=%d reply_size=%d\n",
223                 tgt->lut_obd->obd_name, REPLY_DATA,
224                 lrh->lrh_magic, lrh->lrh_header_size, lrh->lrh_reply_size);
225
226         if (tgt->lut_bottom->dd_rdonly)
227                 RETURN(0);
228
229         buf.lrh_magic = cpu_to_le32(lrh->lrh_magic);
230         buf.lrh_header_size = cpu_to_le32(lrh->lrh_header_size);
231         buf.lrh_reply_size = cpu_to_le32(lrh->lrh_reply_size);
232
233         th = dt_trans_create(env, tgt->lut_bottom);
234         if (IS_ERR(th))
235                 return PTR_ERR(th);
236         th->th_sync = 1;
237
238         tti->tti_off = 0;
239         tti->tti_buf.lb_buf = &buf;
240         tti->tti_buf.lb_len = sizeof(buf);
241
242         rc = dt_declare_record_write(env, tgt->lut_reply_data,
243                                      &tti->tti_buf, tti->tti_off, th);
244         if (rc)
245                 GOTO(out, rc);
246
247         rc = dt_trans_start(env, tgt->lut_bottom, th);
248         if (rc)
249                 GOTO(out, rc);
250
251         dto = dt_object_locate(tgt->lut_reply_data, th->th_dev);
252         rc = dt_record_write(env, dto, &tti->tti_buf, &tti->tti_off, th);
253 out:
254         dt_trans_stop(env, tgt->lut_bottom, th);
255         return rc;
256 }
257
258 /* Write the reply data @lrd into reply_data file of target @tgt
259  * at offset @off
260  */
261 static int tgt_reply_data_write(const struct lu_env *env, struct lu_target *tgt,
262                                 struct lsd_reply_data *lrd, loff_t off,
263                                 struct thandle *th)
264 {
265         struct tgt_thread_info  *tti = tgt_th_info(env);
266         struct dt_object        *dto;
267         struct lsd_reply_data   *buf = &tti->tti_lrd;
268
269         lrd->lrd_result = ptlrpc_status_hton(lrd->lrd_result);
270
271         buf->lrd_transno         = cpu_to_le64(lrd->lrd_transno);
272         buf->lrd_xid             = cpu_to_le64(lrd->lrd_xid);
273         buf->lrd_data            = cpu_to_le64(lrd->lrd_data);
274         buf->lrd_result          = cpu_to_le32(lrd->lrd_result);
275         buf->lrd_client_gen      = cpu_to_le32(lrd->lrd_client_gen);
276
277         lrd->lrd_result = ptlrpc_status_ntoh(lrd->lrd_result);
278
279         tti->tti_off = off;
280         tti->tti_buf.lb_buf = buf;
281         tti->tti_buf.lb_len = sizeof(*buf);
282
283         dto = dt_object_locate(tgt->lut_reply_data, th->th_dev);
284         return dt_record_write(env, dto, &tti->tti_buf, &tti->tti_off, th);
285 }
286
287 /* Read the reply data from reply_data file of target @tgt at offset @off
288  * into structure @lrd
289  */
290 static int tgt_reply_data_read(const struct lu_env *env, struct lu_target *tgt,
291                                struct lsd_reply_data *lrd, loff_t off)
292 {
293         int                      rc;
294         struct tgt_thread_info  *tti = tgt_th_info(env);
295         struct lsd_reply_data   *buf = &tti->tti_lrd;
296
297         tti->tti_off = off;
298         tti->tti_buf.lb_buf = buf;
299         tti->tti_buf.lb_len = sizeof(*buf);
300
301         rc = dt_record_read(env, tgt->lut_reply_data, &tti->tti_buf,
302                             &tti->tti_off);
303         if (rc != 0)
304                 return rc;
305
306         lrd->lrd_transno         = le64_to_cpu(buf->lrd_transno);
307         lrd->lrd_xid             = le64_to_cpu(buf->lrd_xid);
308         lrd->lrd_data            = le64_to_cpu(buf->lrd_data);
309         lrd->lrd_result          = le32_to_cpu(buf->lrd_result);
310         lrd->lrd_client_gen      = le32_to_cpu(buf->lrd_client_gen);
311
312         return 0;
313 }
314
315
316 /* Free the in-memory reply data structure @trd and release
317  * the corresponding slot in the reply_data file of target @lut
318  * Called with ted_lcd_lock held
319  */
320 static void tgt_free_reply_data(struct lu_target *lut,
321                                 struct tg_export_data *ted,
322                                 struct tg_reply_data *trd)
323 {
324         CDEBUG(D_TRACE, "%s: free reply data %p: xid %llu, transno %llu, "
325                "client gen %u, slot idx %d\n",
326                lut == NULL ? "" : tgt_name(lut), trd, trd->trd_reply.lrd_xid,
327                trd->trd_reply.lrd_transno, trd->trd_reply.lrd_client_gen,
328                trd->trd_index);
329
330         LASSERT(mutex_is_locked(&ted->ted_lcd_lock));
331
332         list_del(&trd->trd_list);
333         ted->ted_reply_cnt--;
334         if (lut != NULL && trd->trd_index != TRD_INDEX_MEMORY)
335                 tgt_clear_reply_slot(lut, trd->trd_index);
336         OBD_FREE_PTR(trd);
337 }
338
339 /* Release the reply data @trd from target @lut
340  * The reply data with the highest transno for this export
341  * is retained to ensure correctness of target recovery
342  * Called with ted_lcd_lock held
343  */
344 static void tgt_release_reply_data(struct lu_target *lut,
345                                    struct tg_export_data *ted,
346                                    struct tg_reply_data *trd)
347 {
348         CDEBUG(D_TRACE, "%s: release reply data %p: xid %llu, transno %llu, "
349                "client gen %u, slot idx %d\n",
350                lut == NULL ? "" : tgt_name(lut), trd, trd->trd_reply.lrd_xid,
351                trd->trd_reply.lrd_transno, trd->trd_reply.lrd_client_gen,
352                trd->trd_index);
353
354         LASSERT(mutex_is_locked(&ted->ted_lcd_lock));
355
356         /* Do not free the reply data corresponding to the
357          * highest transno of this export.
358          * This ensures on-disk reply data is kept and
359          * last committed transno can be restored from disk in case
360          * of target recovery
361          */
362         if (trd->trd_reply.lrd_transno == ted->ted_lcd->lcd_last_transno) {
363                 /* free previous retained reply */
364                 if (ted->ted_reply_last != NULL)
365                         tgt_free_reply_data(lut, ted, ted->ted_reply_last);
366                 /* retain the reply */
367                 list_del_init(&trd->trd_list);
368                 ted->ted_reply_last = trd;
369         } else {
370                 tgt_free_reply_data(lut, ted, trd);
371         }
372 }
373
374 static inline struct lu_buf *tti_buf_lsd(struct tgt_thread_info *tti)
375 {
376         tti->tti_buf.lb_buf = &tti->tti_lsd;
377         tti->tti_buf.lb_len = sizeof(tti->tti_lsd);
378         return &tti->tti_buf;
379 }
380
381 static inline struct lu_buf *tti_buf_lcd(struct tgt_thread_info *tti)
382 {
383         tti->tti_buf.lb_buf = &tti->tti_lcd;
384         tti->tti_buf.lb_len = sizeof(tti->tti_lcd);
385         return &tti->tti_buf;
386 }
387
388 /**
389  * Allocate in-memory data for client slot related to export.
390  */
391 int tgt_client_alloc(struct obd_export *exp)
392 {
393         ENTRY;
394         LASSERT(exp != exp->exp_obd->obd_self_export);
395
396         spin_lock_init(&exp->exp_target_data.ted_nodemap_lock);
397         INIT_LIST_HEAD(&exp->exp_target_data.ted_nodemap_member);
398         spin_lock_init(&exp->exp_target_data.ted_fmd_lock);
399         INIT_LIST_HEAD(&exp->exp_target_data.ted_fmd_list);
400
401         OBD_ALLOC_PTR(exp->exp_target_data.ted_lcd);
402         if (exp->exp_target_data.ted_lcd == NULL)
403                 RETURN(-ENOMEM);
404         /* Mark that slot is not yet valid, 0 doesn't work here */
405         exp->exp_target_data.ted_lr_idx = -1;
406         INIT_LIST_HEAD(&exp->exp_target_data.ted_reply_list);
407         mutex_init(&exp->exp_target_data.ted_lcd_lock);
408         RETURN(0);
409 }
410 EXPORT_SYMBOL(tgt_client_alloc);
411
412 /**
413  * Free in-memory data for client slot related to export.
414  */
415 void tgt_client_free(struct obd_export *exp)
416 {
417         struct tg_export_data   *ted = &exp->exp_target_data;
418         struct lu_target        *lut = class_exp2tgt(exp);
419         struct tg_reply_data    *trd, *tmp;
420
421         LASSERT(exp != exp->exp_obd->obd_self_export);
422
423         tgt_fmd_cleanup(exp);
424
425         /* free reply data */
426         mutex_lock(&ted->ted_lcd_lock);
427         list_for_each_entry_safe(trd, tmp, &ted->ted_reply_list, trd_list) {
428                 tgt_release_reply_data(lut, ted, trd);
429         }
430         if (ted->ted_reply_last != NULL) {
431                 tgt_free_reply_data(lut, ted, ted->ted_reply_last);
432                 ted->ted_reply_last = NULL;
433         }
434         mutex_unlock(&ted->ted_lcd_lock);
435
436         if (!hlist_unhashed(&exp->exp_gen_hash))
437                 cfs_hash_del(exp->exp_obd->obd_gen_hash,
438                              &ted->ted_lcd->lcd_generation,
439                              &exp->exp_gen_hash);
440
441         OBD_FREE_PTR(ted->ted_lcd);
442         ted->ted_lcd = NULL;
443
444         /* Target may have been freed (see LU-7430)
445          * Slot may be not yet assigned */
446         if (exp->exp_obd->u.obt.obt_magic != OBT_MAGIC ||
447             ted->ted_lr_idx < 0)
448                 return;
449
450         /* Clear bit when lcd is freed */
451         LASSERT(lut && lut->lut_client_bitmap);
452         if (!test_and_clear_bit(ted->ted_lr_idx, lut->lut_client_bitmap)) {
453                 CERROR("%s: client %u bit already clear in bitmap\n",
454                        exp->exp_obd->obd_name, ted->ted_lr_idx);
455                 LBUG();
456         }
457
458         if (tgt_is_multimodrpcs_client(exp) && !exp->exp_obd->obd_stopping)
459                 atomic_dec(&lut->lut_num_clients);
460 }
461 EXPORT_SYMBOL(tgt_client_free);
462
463 static inline void tgt_check_lcd(const char *obd_name, int index,
464                                  struct lsd_client_data *lcd)
465 {
466         size_t uuid_size = sizeof(lcd->lcd_uuid);
467
468         if (strnlen((char*)lcd->lcd_uuid, uuid_size) == uuid_size) {
469                 lcd->lcd_uuid[uuid_size - 1] = '\0';
470
471                 LCONSOLE_ERROR("the client UUID (%s) on %s for exports stored in last_rcvd(index = %d) is bad!\n",
472                                lcd->lcd_uuid, obd_name, index);
473         }
474 }
475
476 static int tgt_client_data_read(const struct lu_env *env, struct lu_target *tgt,
477                                 struct lsd_client_data *lcd,
478                                 loff_t *off, int index)
479 {
480         struct tgt_thread_info  *tti = tgt_th_info(env);
481         int                      rc;
482
483         tti_buf_lcd(tti);
484         rc = dt_record_read(env, tgt->lut_last_rcvd, &tti->tti_buf, off);
485         if (rc == 0) {
486                 tgt_check_lcd(tgt->lut_obd->obd_name, index, &tti->tti_lcd);
487                 lcd_le_to_cpu(&tti->tti_lcd, lcd);
488                 lcd->lcd_last_result = ptlrpc_status_ntoh(lcd->lcd_last_result);
489                 lcd->lcd_last_close_result =
490                         ptlrpc_status_ntoh(lcd->lcd_last_close_result);
491         }
492
493         CDEBUG(D_INFO, "%s: read lcd @%lld uuid = %s, last_transno = %llu"
494                ", last_xid = %llu, last_result = %u, last_data = %u, "
495                "last_close_transno = %llu, last_close_xid = %llu, "
496                "last_close_result = %u, rc = %d\n", tgt->lut_obd->obd_name,
497                *off, lcd->lcd_uuid, lcd->lcd_last_transno, lcd->lcd_last_xid,
498                lcd->lcd_last_result, lcd->lcd_last_data,
499                lcd->lcd_last_close_transno, lcd->lcd_last_close_xid,
500                lcd->lcd_last_close_result, rc);
501         return rc;
502 }
503
504 static int tgt_client_data_write(const struct lu_env *env,
505                                  struct lu_target *tgt,
506                                  struct lsd_client_data *lcd,
507                                  loff_t *off, struct thandle *th)
508 {
509         struct tgt_thread_info *tti = tgt_th_info(env);
510         struct dt_object        *dto;
511
512         lcd->lcd_last_result = ptlrpc_status_hton(lcd->lcd_last_result);
513         lcd->lcd_last_close_result =
514                 ptlrpc_status_hton(lcd->lcd_last_close_result);
515         lcd_cpu_to_le(lcd, &tti->tti_lcd);
516         tti_buf_lcd(tti);
517
518         dto = dt_object_locate(tgt->lut_last_rcvd, th->th_dev);
519         return dt_record_write(env, dto, &tti->tti_buf, off, th);
520 }
521
522 struct tgt_new_client_callback {
523         struct dt_txn_commit_cb  lncc_cb;
524         struct obd_export       *lncc_exp;
525 };
526
527 static void tgt_cb_new_client(struct lu_env *env, struct thandle *th,
528                               struct dt_txn_commit_cb *cb, int err)
529 {
530         struct tgt_new_client_callback *ccb;
531
532         ccb = container_of(cb, struct tgt_new_client_callback, lncc_cb);
533
534         LASSERT(ccb->lncc_exp->exp_obd);
535
536         CDEBUG(D_RPCTRACE, "%s: committing for initial connect of %s\n",
537                ccb->lncc_exp->exp_obd->obd_name,
538                ccb->lncc_exp->exp_client_uuid.uuid);
539
540         spin_lock(&ccb->lncc_exp->exp_lock);
541
542         ccb->lncc_exp->exp_need_sync = 0;
543
544         spin_unlock(&ccb->lncc_exp->exp_lock);
545         class_export_cb_put(ccb->lncc_exp);
546
547         OBD_FREE_PTR(ccb);
548 }
549
550 int tgt_new_client_cb_add(struct thandle *th, struct obd_export *exp)
551 {
552         struct tgt_new_client_callback  *ccb;
553         struct dt_txn_commit_cb         *dcb;
554         int                              rc;
555
556         OBD_ALLOC_PTR(ccb);
557         if (ccb == NULL)
558                 return -ENOMEM;
559
560         ccb->lncc_exp = class_export_cb_get(exp);
561
562         dcb = &ccb->lncc_cb;
563         dcb->dcb_func = tgt_cb_new_client;
564         INIT_LIST_HEAD(&dcb->dcb_linkage);
565         strlcpy(dcb->dcb_name, "tgt_cb_new_client", sizeof(dcb->dcb_name));
566
567         rc = dt_trans_cb_add(th, dcb);
568         if (rc) {
569                 class_export_cb_put(exp);
570                 OBD_FREE_PTR(ccb);
571         }
572         return rc;
573 }
574
575 /**
576  * Update client data in last_rcvd
577  */
578 static int tgt_client_data_update(const struct lu_env *env,
579                                   struct obd_export *exp)
580 {
581         struct tg_export_data   *ted = &exp->exp_target_data;
582         struct lu_target        *tgt = class_exp2tgt(exp);
583         struct tgt_thread_info  *tti = tgt_th_info(env);
584         struct thandle          *th;
585         int                      rc = 0;
586
587         ENTRY;
588
589         if (unlikely(tgt == NULL)) {
590                 CDEBUG(D_ERROR, "%s: No target for connected export\n",
591                           class_exp2obd(exp)->obd_name);
592                 RETURN(-EINVAL);
593         }
594
595         if (tgt->lut_bottom->dd_rdonly)
596                 RETURN(0);
597
598         th = dt_trans_create(env, tgt->lut_bottom);
599         if (IS_ERR(th))
600                 RETURN(PTR_ERR(th));
601
602         tti_buf_lcd(tti);
603         rc = dt_declare_record_write(env, tgt->lut_last_rcvd,
604                                      &tti->tti_buf,
605                                      ted->ted_lr_off, th);
606         if (rc)
607                 GOTO(out, rc);
608
609         rc = dt_trans_start_local(env, tgt->lut_bottom, th);
610         if (rc)
611                 GOTO(out, rc);
612
613         mutex_lock(&ted->ted_lcd_lock);
614
615         /*
616          * Until this operations will be committed the sync is needed
617          * for this export. This should be done _after_ starting the
618          * transaction so that many connecting clients will not bring
619          * server down with lots of sync writes.
620          */
621         rc = tgt_new_client_cb_add(th, exp);
622         if (rc) {
623                 /* can't add callback, do sync now */
624                 th->th_sync = 1;
625         } else {
626                 spin_lock(&exp->exp_lock);
627                 exp->exp_need_sync = 1;
628                 spin_unlock(&exp->exp_lock);
629         }
630
631         tti->tti_off = ted->ted_lr_off;
632         rc = tgt_client_data_write(env, tgt, ted->ted_lcd, &tti->tti_off, th);
633
634         mutex_unlock(&ted->ted_lcd_lock);
635
636         EXIT;
637 out:
638         dt_trans_stop(env, tgt->lut_bottom, th);
639         CDEBUG(D_INFO, "%s: update last_rcvd client data for UUID = %s, "
640                "last_transno = %llu: rc = %d\n", tgt->lut_obd->obd_name,
641                tgt->lut_lsd.lsd_uuid, tgt->lut_lsd.lsd_last_transno, rc);
642
643         return rc;
644 }
645
646 static int tgt_server_data_read(const struct lu_env *env, struct lu_target *tgt)
647 {
648         struct tgt_thread_info  *tti = tgt_th_info(env);
649         int                      rc;
650
651         tti->tti_off = 0;
652         tti_buf_lsd(tti);
653         rc = dt_record_read(env, tgt->lut_last_rcvd, &tti->tti_buf,
654                             &tti->tti_off);
655         if (rc == 0)
656                 lsd_le_to_cpu(&tti->tti_lsd, &tgt->lut_lsd);
657
658         CDEBUG(D_INFO, "%s: read last_rcvd server data for UUID = %s, "
659                "last_transno = %llu: rc = %d\n", tgt->lut_obd->obd_name,
660                tgt->lut_lsd.lsd_uuid, tgt->lut_lsd.lsd_last_transno, rc);
661         return rc;
662 }
663
664 static int tgt_server_data_write(const struct lu_env *env,
665                                  struct lu_target *tgt, struct thandle *th)
666 {
667         struct tgt_thread_info  *tti = tgt_th_info(env);
668         struct dt_object        *dto;
669         int                      rc;
670
671         ENTRY;
672
673         tti->tti_off = 0;
674         tti_buf_lsd(tti);
675         lsd_cpu_to_le(&tgt->lut_lsd, &tti->tti_lsd);
676
677         dto = dt_object_locate(tgt->lut_last_rcvd, th->th_dev);
678         rc = dt_record_write(env, dto, &tti->tti_buf, &tti->tti_off, th);
679
680         CDEBUG(D_INFO, "%s: write last_rcvd server data for UUID = %s, "
681                "last_transno = %llu: rc = %d\n", tgt->lut_obd->obd_name,
682                tgt->lut_lsd.lsd_uuid, tgt->lut_lsd.lsd_last_transno, rc);
683
684         RETURN(rc);
685 }
686
687 /**
688  * Update server data in last_rcvd
689  */
690 int tgt_server_data_update(const struct lu_env *env, struct lu_target *tgt,
691                            int sync)
692 {
693         struct tgt_thread_info  *tti = tgt_th_info(env);
694         struct thandle          *th;
695         int                      rc = 0;
696
697         ENTRY;
698
699         CDEBUG(D_SUPER,
700                "%s: mount_count is %llu, last_transno is %llu\n",
701                tgt->lut_lsd.lsd_uuid, tgt->lut_obd->u.obt.obt_mount_count,
702                tgt->lut_last_transno);
703
704         /* Always save latest transno to keep it fresh */
705         spin_lock(&tgt->lut_translock);
706         tgt->lut_lsd.lsd_last_transno = tgt->lut_last_transno;
707         spin_unlock(&tgt->lut_translock);
708
709         if (tgt->lut_bottom->dd_rdonly)
710                 RETURN(0);
711
712         th = dt_trans_create(env, tgt->lut_bottom);
713         if (IS_ERR(th))
714                 RETURN(PTR_ERR(th));
715
716         th->th_sync = sync;
717
718         tti_buf_lsd(tti);
719         rc = dt_declare_record_write(env, tgt->lut_last_rcvd,
720                                      &tti->tti_buf, tti->tti_off, th);
721         if (rc)
722                 GOTO(out, rc);
723
724         rc = dt_trans_start(env, tgt->lut_bottom, th);
725         if (rc)
726                 GOTO(out, rc);
727
728         rc = tgt_server_data_write(env, tgt, th);
729 out:
730         dt_trans_stop(env, tgt->lut_bottom, th);
731
732         CDEBUG(D_INFO, "%s: update last_rcvd server data for UUID = %s, "
733                "last_transno = %llu: rc = %d\n", tgt->lut_obd->obd_name,
734                tgt->lut_lsd.lsd_uuid, tgt->lut_lsd.lsd_last_transno, rc);
735         RETURN(rc);
736 }
737 EXPORT_SYMBOL(tgt_server_data_update);
738
739 static int tgt_truncate_last_rcvd(const struct lu_env *env,
740                                   struct lu_target *tgt, loff_t size)
741 {
742         struct dt_object *dt = tgt->lut_last_rcvd;
743         struct thandle   *th;
744         struct lu_attr    attr;
745         int               rc;
746
747         ENTRY;
748
749         if (tgt->lut_bottom->dd_rdonly)
750                 RETURN(0);
751
752         attr.la_size = size;
753         attr.la_valid = LA_SIZE;
754
755         th = dt_trans_create(env, tgt->lut_bottom);
756         if (IS_ERR(th))
757                 RETURN(PTR_ERR(th));
758         rc = dt_declare_punch(env, dt, size, OBD_OBJECT_EOF, th);
759         if (rc)
760                 GOTO(cleanup, rc);
761         rc = dt_declare_attr_set(env, dt, &attr, th);
762         if (rc)
763                 GOTO(cleanup, rc);
764         rc = dt_trans_start_local(env, tgt->lut_bottom, th);
765         if (rc)
766                 GOTO(cleanup, rc);
767
768         rc = dt_punch(env, dt, size, OBD_OBJECT_EOF, th);
769         if (rc == 0)
770                 rc = dt_attr_set(env, dt, &attr, th);
771
772 cleanup:
773         dt_trans_stop(env, tgt->lut_bottom, th);
774
775         RETURN(rc);
776 }
777
778 static void tgt_client_epoch_update(const struct lu_env *env,
779                                     struct obd_export *exp)
780 {
781         struct lsd_client_data  *lcd = exp->exp_target_data.ted_lcd;
782         struct lu_target        *tgt = class_exp2tgt(exp);
783
784         LASSERT(tgt && tgt->lut_bottom);
785         /** VBR: set client last_epoch to current epoch */
786         if (lcd->lcd_last_epoch >= tgt->lut_lsd.lsd_start_epoch)
787                 return;
788         lcd->lcd_last_epoch = tgt->lut_lsd.lsd_start_epoch;
789         tgt_client_data_update(env, exp);
790 }
791
792 /**
793  * Update boot epoch when recovery ends
794  */
795 void tgt_boot_epoch_update(struct lu_target *tgt)
796 {
797         struct lu_env            env;
798         struct ptlrpc_request   *req;
799         __u32                    start_epoch;
800         LIST_HEAD(client_list);
801         int                      rc;
802
803         if (tgt->lut_obd->obd_stopping)
804                 return;
805
806         rc = lu_env_init(&env, LCT_DT_THREAD);
807         if (rc) {
808                 CERROR("%s: can't initialize environment: rc = %d\n",
809                         tgt->lut_obd->obd_name, rc);
810                 return;
811         }
812
813         spin_lock(&tgt->lut_translock);
814         start_epoch = (tgt->lut_last_transno >> LR_EPOCH_BITS) + 1;
815         tgt->lut_last_transno = (__u64)start_epoch << LR_EPOCH_BITS;
816         tgt->lut_lsd.lsd_start_epoch = start_epoch;
817         spin_unlock(&tgt->lut_translock);
818
819         /**
820          * The recovery is not yet finished and final queue can still be updated
821          * with resend requests. Move final list to separate one for processing
822          */
823         spin_lock(&tgt->lut_obd->obd_recovery_task_lock);
824         list_splice_init(&tgt->lut_obd->obd_final_req_queue, &client_list);
825         spin_unlock(&tgt->lut_obd->obd_recovery_task_lock);
826
827         /**
828          * go through list of exports participated in recovery and
829          * set new epoch for them
830          */
831         list_for_each_entry(req, &client_list, rq_list) {
832                 LASSERT(!req->rq_export->exp_delayed);
833                 if (!req->rq_export->exp_vbr_failed)
834                         tgt_client_epoch_update(&env, req->rq_export);
835         }
836         /** return list back at once */
837         spin_lock(&tgt->lut_obd->obd_recovery_task_lock);
838         list_splice_init(&client_list, &tgt->lut_obd->obd_final_req_queue);
839         spin_unlock(&tgt->lut_obd->obd_recovery_task_lock);
840
841         /** Clear MULTI RPCS incompatibility flag if
842          * - target is MDT and
843          * - there is no client to recover or the recovery was aborted
844          */
845         if (!strncmp(tgt->lut_obd->obd_type->typ_name, LUSTRE_MDT_NAME, 3) &&
846             (atomic_read(&tgt->lut_obd->obd_max_recoverable_clients) == 0 ||
847             tgt->lut_obd->obd_abort_recovery))
848                 tgt->lut_lsd.lsd_feature_incompat &= ~OBD_INCOMPAT_MULTI_RPCS;
849
850         /** update server epoch */
851         tgt_server_data_update(&env, tgt, 1);
852         lu_env_fini(&env);
853 }
854
855 /**
856  * commit callback, need to update last_committed value
857  */
858 struct tgt_last_committed_callback {
859         struct dt_txn_commit_cb  llcc_cb;
860         struct lu_target        *llcc_tgt;
861         struct obd_export       *llcc_exp;
862         __u64                    llcc_transno;
863 };
864
865 static void tgt_cb_last_committed(struct lu_env *env, struct thandle *th,
866                                   struct dt_txn_commit_cb *cb, int err)
867 {
868         struct tgt_last_committed_callback *ccb;
869
870         ccb = container_of(cb, struct tgt_last_committed_callback, llcc_cb);
871
872         LASSERT(ccb->llcc_exp);
873         LASSERT(ccb->llcc_tgt != NULL);
874         LASSERT(ccb->llcc_exp->exp_obd == ccb->llcc_tgt->lut_obd);
875
876         /* error hit, don't update last committed to provide chance to
877          * replay data after fail */
878         if (err != 0)
879                 goto out;
880
881         /* Fast path w/o spinlock, if exp_last_committed was updated
882          * with higher transno, no need to take spinlock and check,
883          * also no need to update obd_last_committed. */
884         if (ccb->llcc_transno <= ccb->llcc_exp->exp_last_committed)
885                 goto out;
886         spin_lock(&ccb->llcc_tgt->lut_translock);
887         if (ccb->llcc_transno > ccb->llcc_tgt->lut_obd->obd_last_committed)
888                 ccb->llcc_tgt->lut_obd->obd_last_committed = ccb->llcc_transno;
889
890         if (ccb->llcc_transno > ccb->llcc_exp->exp_last_committed) {
891                 ccb->llcc_exp->exp_last_committed = ccb->llcc_transno;
892                 spin_unlock(&ccb->llcc_tgt->lut_translock);
893
894                 ptlrpc_commit_replies(ccb->llcc_exp);
895                 tgt_cancel_slc_locks(ccb->llcc_tgt, ccb->llcc_transno);
896         } else {
897                 spin_unlock(&ccb->llcc_tgt->lut_translock);
898         }
899
900         CDEBUG(D_HA, "%s: transno %lld is committed\n",
901                ccb->llcc_tgt->lut_obd->obd_name, ccb->llcc_transno);
902
903 out:
904         class_export_cb_put(ccb->llcc_exp);
905         OBD_FREE_PTR(ccb);
906 }
907
908 /**
909  * Add commit callback function, it returns a non-zero value to inform
910  * caller to use sync transaction if necessary.
911  */
912 static int tgt_last_commit_cb_add(struct thandle *th, struct lu_target *tgt,
913                                   struct obd_export *exp, __u64 transno)
914 {
915         struct tgt_last_committed_callback      *ccb;
916         struct dt_txn_commit_cb                 *dcb;
917         int                                      rc;
918
919         OBD_ALLOC_PTR(ccb);
920         if (ccb == NULL)
921                 return -ENOMEM;
922
923         ccb->llcc_tgt = tgt;
924         ccb->llcc_exp = class_export_cb_get(exp);
925         ccb->llcc_transno = transno;
926
927         dcb = &ccb->llcc_cb;
928         dcb->dcb_func = tgt_cb_last_committed;
929         INIT_LIST_HEAD(&dcb->dcb_linkage);
930         strlcpy(dcb->dcb_name, "tgt_cb_last_committed", sizeof(dcb->dcb_name));
931
932         rc = dt_trans_cb_add(th, dcb);
933         if (rc) {
934                 class_export_cb_put(exp);
935                 OBD_FREE_PTR(ccb);
936         }
937
938         if (exp_connect_flags(exp) & OBD_CONNECT_LIGHTWEIGHT)
939                 /* report failure to force synchronous operation */
940                 return -EPERM;
941
942         /* if exp_need_sync is set, return non-zero value to force
943          * a sync transaction. */
944         return rc ? rc : exp->exp_need_sync;
945 }
946
947 static int tgt_is_local_client(const struct lu_env *env,
948                                       struct obd_export *exp)
949 {
950         struct lu_target        *tgt = class_exp2tgt(exp);
951         struct tgt_session_info *tsi = tgt_ses_info(env);
952         struct ptlrpc_request   *req = tgt_ses_req(tsi);
953
954         if (exp_connect_flags(exp) & OBD_CONNECT_MDS ||
955             exp_connect_flags(exp) & OBD_CONNECT_MDS_MDS)
956                 return 0;
957         if (tgt->lut_local_recovery)
958                 return 0;
959         if (!req)
960                 return 0;
961         if (!LNetIsPeerLocal(req->rq_peer.nid))
962                 return 0;
963
964         return 1;
965 }
966
967 /**
968  * Add new client to the last_rcvd upon new connection.
969  *
970  * We use a bitmap to locate a free space in the last_rcvd file and initialize
971  * tg_export_data.
972  */
973 int tgt_client_new(const struct lu_env *env, struct obd_export *exp)
974 {
975         struct tg_export_data   *ted = &exp->exp_target_data;
976         struct lu_target        *tgt = class_exp2tgt(exp);
977         int                      rc = 0, idx;
978
979         ENTRY;
980
981         LASSERT(tgt && tgt->lut_client_bitmap != NULL);
982         if (!strcmp(ted->ted_lcd->lcd_uuid, tgt->lut_obd->obd_uuid.uuid))
983                 RETURN(0);
984
985         if (exp_connect_flags(exp) & OBD_CONNECT_LIGHTWEIGHT)
986                 RETURN(0);
987
988         if (tgt_is_local_client(env, exp)) {
989                 LCONSOLE_WARN("%s: local client %s w/o recovery\n",
990                               exp->exp_obd->obd_name, ted->ted_lcd->lcd_uuid);
991                 exp->exp_no_recovery = 1;
992                 RETURN(0);
993         }
994
995         /* the bitmap operations can handle cl_idx > sizeof(long) * 8, so
996          * there's no need for extra complication here
997          */
998         idx = find_first_zero_bit(tgt->lut_client_bitmap, LR_MAX_CLIENTS);
999 repeat:
1000         if (idx >= LR_MAX_CLIENTS ||
1001             OBD_FAIL_CHECK(OBD_FAIL_MDS_CLIENT_ADD)) {
1002                 CERROR("%s: no room for %u clients - fix LR_MAX_CLIENTS\n",
1003                        tgt->lut_obd->obd_name,  idx);
1004                 RETURN(-EOVERFLOW);
1005         }
1006         if (test_and_set_bit(idx, tgt->lut_client_bitmap)) {
1007                 idx = find_next_zero_bit(tgt->lut_client_bitmap,
1008                                              LR_MAX_CLIENTS, idx);
1009                 goto repeat;
1010         }
1011
1012         ted->ted_lr_idx = idx;
1013         ted->ted_lr_off = tgt->lut_lsd.lsd_client_start +
1014                           idx * tgt->lut_lsd.lsd_client_size;
1015
1016         LASSERTF(ted->ted_lr_off > 0, "ted_lr_off = %llu\n", ted->ted_lr_off);
1017
1018         if (tgt_is_multimodrpcs_client(exp)) {
1019                 /* Set MULTI RPCS incompatibility flag to prevent previous
1020                  * Lustre versions to mount a target with reply_data file */
1021                 atomic_inc(&tgt->lut_num_clients);
1022                 if (!(tgt->lut_lsd.lsd_feature_incompat &
1023                       OBD_INCOMPAT_MULTI_RPCS)) {
1024                         tgt->lut_lsd.lsd_feature_incompat |=
1025                                                         OBD_INCOMPAT_MULTI_RPCS;
1026                         rc = tgt_server_data_update(env, tgt, 1);
1027                         if (rc < 0) {
1028                                 CERROR("%s: unable to set MULTI RPCS "
1029                                        "incompatibility flag\n",
1030                                        exp->exp_obd->obd_name);
1031                                 RETURN(rc);
1032                         }
1033                 }
1034
1035                 /* assign client slot generation */
1036                 ted->ted_lcd->lcd_generation =
1037                                 atomic_inc_return(&tgt->lut_client_generation);
1038         } else {
1039                 ted->ted_lcd->lcd_generation = 0;
1040         }
1041
1042         CDEBUG(D_INFO, "%s: new client at index %d (%llu) with UUID '%s' "
1043                "generation %d\n",
1044                tgt->lut_obd->obd_name, ted->ted_lr_idx, ted->ted_lr_off,
1045                ted->ted_lcd->lcd_uuid, ted->ted_lcd->lcd_generation);
1046
1047         if (OBD_FAIL_CHECK(OBD_FAIL_TGT_CLIENT_ADD))
1048                 RETURN(-ENOSPC);
1049
1050         rc = tgt_client_data_update(env, exp);
1051         if (rc)
1052                 CERROR("%s: Failed to write client lcd at idx %d, rc %d\n",
1053                        tgt->lut_obd->obd_name, idx, rc);
1054
1055         RETURN(rc);
1056 }
1057 EXPORT_SYMBOL(tgt_client_new);
1058
1059 /* Add an existing client to the MDS in-memory state based on
1060  * a client that was previously found in the last_rcvd file and
1061  * already has an assigned slot (idx >= 0).
1062  *
1063  * It should not be possible to fail adding an existing client - otherwise
1064  * mdt_init_server_data() callsite needs to be fixed.
1065  */
1066 int tgt_client_add(const struct lu_env *env,  struct obd_export *exp, int idx)
1067 {
1068         struct tg_export_data   *ted = &exp->exp_target_data;
1069         struct lu_target        *tgt = class_exp2tgt(exp);
1070
1071         ENTRY;
1072
1073         LASSERT(tgt && tgt->lut_client_bitmap != NULL);
1074         LASSERTF(idx >= 0, "%d\n", idx);
1075
1076         if (!strcmp(ted->ted_lcd->lcd_uuid, tgt->lut_obd->obd_uuid.uuid) ||
1077             exp_connect_flags(exp) & OBD_CONNECT_LIGHTWEIGHT)
1078                 RETURN(0);
1079
1080         if (test_and_set_bit(idx, tgt->lut_client_bitmap)) {
1081                 CERROR("%s: client %d: bit already set in bitmap!!\n",
1082                        tgt->lut_obd->obd_name,  idx);
1083                 LBUG();
1084         }
1085         atomic_inc(&tgt->lut_num_clients);
1086
1087         CDEBUG(D_INFO, "%s: client at idx %d with UUID '%s' added, "
1088                "generation %d\n",
1089                tgt->lut_obd->obd_name, idx, ted->ted_lcd->lcd_uuid,
1090                ted->ted_lcd->lcd_generation);
1091
1092         ted->ted_lr_idx = idx;
1093         ted->ted_lr_off = tgt->lut_lsd.lsd_client_start +
1094                           idx * tgt->lut_lsd.lsd_client_size;
1095
1096         mutex_init(&ted->ted_lcd_lock);
1097
1098         LASSERTF(ted->ted_lr_off > 0, "ted_lr_off = %llu\n", ted->ted_lr_off);
1099
1100         RETURN(0);
1101 }
1102
1103 int tgt_client_del(const struct lu_env *env, struct obd_export *exp)
1104 {
1105         struct tg_export_data   *ted = &exp->exp_target_data;
1106         struct lu_target        *tgt = class_exp2tgt(exp);
1107         int                      rc;
1108
1109         ENTRY;
1110
1111         LASSERT(ted->ted_lcd);
1112
1113         if (unlikely(tgt == NULL)) {
1114                 CDEBUG(D_ERROR, "%s: No target for connected export\n",
1115                        class_exp2obd(exp)->obd_name);
1116                 RETURN(-EINVAL);
1117         }
1118
1119         /* XXX if lcd_uuid were a real obd_uuid, I could use obd_uuid_equals */
1120         if (!strcmp((char *)ted->ted_lcd->lcd_uuid,
1121                     (char *)tgt->lut_obd->obd_uuid.uuid) ||
1122             exp_connect_flags(exp) & OBD_CONNECT_LIGHTWEIGHT ||
1123             exp->exp_no_recovery)
1124                 RETURN(0);
1125
1126         /* Slot may be not yet assigned, use case is race between Client
1127          * reconnect and forced eviction */
1128         if (ted->ted_lr_idx < 0) {
1129                 CWARN("%s: client with UUID '%s' not in bitmap\n",
1130                       tgt->lut_obd->obd_name, ted->ted_lcd->lcd_uuid);
1131                 RETURN(0);
1132         }
1133
1134         CDEBUG(D_INFO, "%s: del client at idx %u, off %lld, UUID '%s'\n",
1135                tgt->lut_obd->obd_name, ted->ted_lr_idx, ted->ted_lr_off,
1136                ted->ted_lcd->lcd_uuid);
1137
1138         /* Clear the bit _after_ zeroing out the client so we don't
1139            race with filter_client_add and zero out new clients.*/
1140         if (!test_bit(ted->ted_lr_idx, tgt->lut_client_bitmap)) {
1141                 CERROR("%s: client %u: bit already clear in bitmap!!\n",
1142                        tgt->lut_obd->obd_name, ted->ted_lr_idx);
1143                 LBUG();
1144         }
1145
1146         /* Do not erase record for recoverable client. */
1147         if (exp->exp_flags & OBD_OPT_FAILOVER)
1148                 RETURN(0);
1149
1150         if (OBD_FAIL_CHECK(OBD_FAIL_TGT_CLIENT_DEL))
1151                 RETURN(0);
1152
1153         /* Make sure the server's last_transno is up to date.
1154          * This should be done before zeroing client slot so last_transno will
1155          * be in server data or in client data in case of failure */
1156         rc = tgt_server_data_update(env, tgt, 0);
1157         if (rc != 0) {
1158                 CERROR("%s: failed to update server data, skip client %s "
1159                        "zeroing, rc %d\n", tgt->lut_obd->obd_name,
1160                        ted->ted_lcd->lcd_uuid, rc);
1161                 RETURN(rc);
1162         }
1163
1164         memset(ted->ted_lcd->lcd_uuid, 0, sizeof ted->ted_lcd->lcd_uuid);
1165         rc = tgt_client_data_update(env, exp);
1166
1167         CDEBUG(rc == 0 ? D_INFO : D_ERROR,
1168                "%s: zeroing out client %s at idx %u (%llu), rc %d\n",
1169                tgt->lut_obd->obd_name, ted->ted_lcd->lcd_uuid,
1170                ted->ted_lr_idx, ted->ted_lr_off, rc);
1171         RETURN(rc);
1172 }
1173 EXPORT_SYMBOL(tgt_client_del);
1174
1175 static void tgt_clean_by_tag(struct obd_export *exp, __u64 xid, __u16 tag)
1176 {
1177         struct tg_export_data   *ted = &exp->exp_target_data;
1178         struct lu_target        *lut = class_exp2tgt(exp);
1179         struct tg_reply_data    *trd, *tmp;
1180
1181         if (tag == 0)
1182                 return;
1183
1184         list_for_each_entry_safe(trd, tmp, &ted->ted_reply_list, trd_list) {
1185                 if (trd->trd_tag != tag)
1186                         continue;
1187
1188                 LASSERT(ergo(tgt_is_increasing_xid_client(exp),
1189                              trd->trd_reply.lrd_xid <= xid));
1190
1191                 ted->ted_release_tag++;
1192                 tgt_release_reply_data(lut, ted, trd);
1193         }
1194 }
1195
1196 static int tgt_add_reply_data(const struct lu_env *env, struct lu_target *tgt,
1197                        struct tg_export_data *ted, struct tg_reply_data *trd,
1198                        struct ptlrpc_request *req,
1199                        struct thandle *th, bool update_lrd_file)
1200 {
1201         struct lsd_reply_data   *lrd;
1202         int     i;
1203         int     rc;
1204
1205         lrd = &trd->trd_reply;
1206         /* update export last transno */
1207         mutex_lock(&ted->ted_lcd_lock);
1208         if (lrd->lrd_transno > ted->ted_lcd->lcd_last_transno)
1209                 ted->ted_lcd->lcd_last_transno = lrd->lrd_transno;
1210         mutex_unlock(&ted->ted_lcd_lock);
1211
1212         if (tgt != NULL) {
1213                 /* find a empty slot */
1214                 i = tgt_find_free_reply_slot(tgt);
1215                 if (unlikely(i < 0)) {
1216                         CERROR("%s: couldn't find a slot for reply data: "
1217                                "rc = %d\n", tgt_name(tgt), i);
1218                         RETURN(i);
1219                 }
1220                 trd->trd_index = i;
1221
1222                 if (update_lrd_file) {
1223                         loff_t  off;
1224
1225                         /* write reply data to disk */
1226                         off = sizeof(struct lsd_reply_header) + sizeof(*lrd) * i;
1227                         rc = tgt_reply_data_write(env, tgt, lrd, off, th);
1228                         if (unlikely(rc != 0)) {
1229                                 CERROR("%s: can't update %s file: rc = %d\n",
1230                                        tgt_name(tgt), REPLY_DATA, rc);
1231                                 GOTO(free_slot, rc);
1232                         }
1233                 }
1234         } else {
1235                 trd->trd_index = TRD_INDEX_MEMORY;
1236         }
1237
1238         /* add reply data to target export's reply list */
1239         mutex_lock(&ted->ted_lcd_lock);
1240         if (req != NULL) {
1241                 int exclude = tgt_is_increasing_xid_client(req->rq_export) ?
1242                               MSG_REPLAY : MSG_REPLAY|MSG_RESENT;
1243
1244                 if (req->rq_obsolete) {
1245                         CDEBUG(D_INFO,
1246                                "drop reply data update for obsolete req xid=%llu,"
1247                                "transno=%llu, tag=%hu\n", req->rq_xid,
1248                                lrd->lrd_transno, trd->trd_tag);
1249                         mutex_unlock(&ted->ted_lcd_lock);
1250                         GOTO(free_slot, rc = -EBADR);
1251                 }
1252
1253                 if (!(lustre_msg_get_flags(req->rq_reqmsg) & exclude))
1254                         tgt_clean_by_tag(req->rq_export, req->rq_xid,
1255                                          trd->trd_tag);
1256         }
1257         list_add(&trd->trd_list, &ted->ted_reply_list);
1258         ted->ted_reply_cnt++;
1259         if (ted->ted_reply_cnt > ted->ted_reply_max)
1260                 ted->ted_reply_max = ted->ted_reply_cnt;
1261         mutex_unlock(&ted->ted_lcd_lock);
1262
1263         CDEBUG(D_TRACE, "add reply %p: xid %llu, transno %llu, "
1264                "tag %hu, client gen %u, slot idx %d\n",
1265                trd, lrd->lrd_xid, lrd->lrd_transno,
1266                trd->trd_tag, lrd->lrd_client_gen, trd->trd_index);
1267
1268         RETURN(0);
1269
1270 free_slot:
1271         if (tgt != NULL)
1272                 tgt_clear_reply_slot(tgt, trd->trd_index);
1273         return rc;
1274 }
1275
1276 int tgt_mk_reply_data(const struct lu_env *env,
1277                       struct lu_target *tgt,
1278                       struct tg_export_data *ted,
1279                       struct ptlrpc_request *req,
1280                       __u64 opdata,
1281                       struct thandle *th,
1282                       bool write_update,
1283                       __u64 transno)
1284 {
1285         struct tg_reply_data    *trd;
1286         struct lsd_reply_data   *lrd;
1287         __u64                   *pre_versions = NULL;
1288         int                     rc;
1289
1290         OBD_ALLOC_PTR(trd);
1291         if (unlikely(trd == NULL))
1292                 RETURN(-ENOMEM);
1293
1294         /* fill reply data information */
1295         lrd = &trd->trd_reply;
1296         lrd->lrd_transno = transno;
1297         if (req != NULL) {
1298                 lrd->lrd_xid = req->rq_xid;
1299                 trd->trd_tag = lustre_msg_get_tag(req->rq_reqmsg);
1300                 lrd->lrd_client_gen = ted->ted_lcd->lcd_generation;
1301                 if (write_update) {
1302                         pre_versions = lustre_msg_get_versions(req->rq_repmsg);
1303                         lrd->lrd_result = th->th_result;
1304                 }
1305         } else {
1306                 struct tgt_session_info *tsi;
1307
1308                 LASSERT(env != NULL);
1309                 tsi = tgt_ses_info(env);
1310                 LASSERT(tsi->tsi_xid != 0);
1311
1312                 lrd->lrd_xid = tsi->tsi_xid;
1313                 lrd->lrd_result = tsi->tsi_result;
1314                 lrd->lrd_client_gen = tsi->tsi_client_gen;
1315         }
1316
1317         lrd->lrd_data = opdata;
1318         if (pre_versions) {
1319                 trd->trd_pre_versions[0] = pre_versions[0];
1320                 trd->trd_pre_versions[1] = pre_versions[1];
1321                 trd->trd_pre_versions[2] = pre_versions[2];
1322                 trd->trd_pre_versions[3] = pre_versions[3];
1323         }
1324
1325         rc = tgt_add_reply_data(env, tgt, ted, trd, req,
1326                                 th, write_update);
1327         if (rc < 0) {
1328                 OBD_FREE_PTR(trd);
1329                 if (rc == -EBADR)
1330                         rc = 0;
1331         }
1332         return rc;
1333
1334 }
1335 EXPORT_SYMBOL(tgt_mk_reply_data);
1336
1337 /*
1338  * last_rcvd & last_committed update callbacks
1339  */
1340 static int tgt_last_rcvd_update(const struct lu_env *env, struct lu_target *tgt,
1341                                 struct dt_object *obj, __u64 opdata,
1342                                 struct thandle *th, struct ptlrpc_request *req)
1343 {
1344         struct tgt_thread_info  *tti = tgt_th_info(env);
1345         struct tgt_session_info *tsi = tgt_ses_info(env);
1346         struct obd_export *exp = tsi->tsi_exp;
1347         struct tg_export_data *ted;
1348         __u64 *transno_p;
1349         bool nolcd = false;
1350         int rc = 0;
1351
1352         ENTRY;
1353
1354
1355         LASSERT(exp != NULL);
1356         ted = &exp->exp_target_data;
1357
1358         /* Some clients don't support recovery, and they don't have last_rcvd
1359          * client data:
1360          * 1. lightweight clients.
1361          * 2. local clients on MDS which doesn't enable "localrecov".
1362          * 3. OFD connect may cause transaction before export has last_rcvd
1363          *    slot.
1364          */
1365         if (ted->ted_lr_idx < 0)
1366                 nolcd = true;
1367
1368         if (req != NULL)
1369                 tti->tti_transno = lustre_msg_get_transno(req->rq_reqmsg);
1370         else
1371                 /* From update replay, tti_transno should be set already */
1372                 LASSERT(tti->tti_transno != 0);
1373
1374         spin_lock(&tgt->lut_translock);
1375         if (th->th_result != 0) {
1376                 if (tti->tti_transno != 0) {
1377                         CERROR("%s: replay transno %llu failed: rc = %d\n",
1378                                tgt_name(tgt), tti->tti_transno, th->th_result);
1379                 }
1380         } else if (tti->tti_transno == 0) {
1381                 tti->tti_transno = ++tgt->lut_last_transno;
1382         } else {
1383                 /* should be replay */
1384                 if (tti->tti_transno > tgt->lut_last_transno)
1385                         tgt->lut_last_transno = tti->tti_transno;
1386         }
1387         spin_unlock(&tgt->lut_translock);
1388
1389         /** VBR: set new versions */
1390         if (th->th_result == 0 && obj != NULL) {
1391                 struct dt_object *dto = dt_object_locate(obj, th->th_dev);
1392                 dt_version_set(env, dto, tti->tti_transno, th);
1393         }
1394
1395         /* filling reply data */
1396         CDEBUG(D_INODE, "transno = %llu, last_committed = %llu\n",
1397                tti->tti_transno, tgt->lut_obd->obd_last_committed);
1398
1399         if (req != NULL) {
1400                 req->rq_transno = tti->tti_transno;
1401                 lustre_msg_set_transno(req->rq_repmsg, tti->tti_transno);
1402         }
1403
1404         /* if can't add callback, do sync write */
1405         th->th_sync |= !!tgt_last_commit_cb_add(th, tgt, exp, tti->tti_transno);
1406
1407         if (nolcd) {
1408                 /* store transno in the last_rcvd header */
1409                 spin_lock(&tgt->lut_translock);
1410                 if (tti->tti_transno > tgt->lut_lsd.lsd_last_transno) {
1411                         tgt->lut_lsd.lsd_last_transno = tti->tti_transno;
1412                         spin_unlock(&tgt->lut_translock);
1413                         /* Although current connection doesn't have slot
1414                          * in the last_rcvd, we still want to maintain
1415                          * the in-memory lsd_client_data structure in order to
1416                          * properly handle reply reconstruction. */
1417                         rc = tgt_server_data_write(env, tgt, th);
1418                 } else {
1419                         spin_unlock(&tgt->lut_translock);
1420                 }
1421         } else if (ted->ted_lr_off == 0) {
1422                 CERROR("%s: client idx %d has offset %lld\n",
1423                        tgt_name(tgt), ted->ted_lr_idx, ted->ted_lr_off);
1424                 RETURN(-EINVAL);
1425         }
1426
1427         /* Target that supports multiple reply data */
1428         if (tgt_is_multimodrpcs_client(exp)) {
1429                 return tgt_mk_reply_data(env, tgt, ted, req, opdata, th,
1430                                          !!(req != NULL), tti->tti_transno);
1431         }
1432
1433         /* Enough for update replay, let's return */
1434         if (req == NULL)
1435                 RETURN(rc);
1436
1437         mutex_lock(&ted->ted_lcd_lock);
1438         LASSERT(ergo(tti->tti_transno == 0, th->th_result != 0));
1439         if (lustre_msg_get_opc(req->rq_reqmsg) == MDS_CLOSE) {
1440                 transno_p = &ted->ted_lcd->lcd_last_close_transno;
1441                 ted->ted_lcd->lcd_last_close_xid = req->rq_xid;
1442                 ted->ted_lcd->lcd_last_close_result = th->th_result;
1443         } else {
1444                 /* VBR: save versions in last_rcvd for reconstruct. */
1445                 __u64 *pre_versions = lustre_msg_get_versions(req->rq_repmsg);
1446
1447                 if (pre_versions) {
1448                         ted->ted_lcd->lcd_pre_versions[0] = pre_versions[0];
1449                         ted->ted_lcd->lcd_pre_versions[1] = pre_versions[1];
1450                         ted->ted_lcd->lcd_pre_versions[2] = pre_versions[2];
1451                         ted->ted_lcd->lcd_pre_versions[3] = pre_versions[3];
1452                 }
1453                 transno_p = &ted->ted_lcd->lcd_last_transno;
1454                 ted->ted_lcd->lcd_last_xid = req->rq_xid;
1455                 ted->ted_lcd->lcd_last_result = th->th_result;
1456                 /* XXX: lcd_last_data is __u32 but intent_dispostion is __u64,
1457                  * see struct ldlm_reply->lock_policy_res1; */
1458                 ted->ted_lcd->lcd_last_data = opdata;
1459         }
1460
1461         /* Update transno in slot only if non-zero number, i.e. no errors */
1462         if (likely(tti->tti_transno != 0)) {
1463                 /* Don't overwrite bigger transaction number with lower one.
1464                  * That is not sign of problem in all cases, but in any case
1465                  * this value should be monotonically increased only. */
1466                 if (*transno_p > tti->tti_transno) {
1467                         if (!tgt->lut_no_reconstruct) {
1468                                 CERROR("%s: trying to overwrite bigger transno:"
1469                                        "on-disk: %llu, new: %llu replay: "
1470                                        "%d. See LU-617.\n", tgt_name(tgt),
1471                                        *transno_p, tti->tti_transno,
1472                                        req_is_replay(req));
1473                                 if (req_is_replay(req)) {
1474                                         spin_lock(&req->rq_export->exp_lock);
1475                                         req->rq_export->exp_vbr_failed = 1;
1476                                         spin_unlock(&req->rq_export->exp_lock);
1477                                 }
1478                                 mutex_unlock(&ted->ted_lcd_lock);
1479                                 RETURN(req_is_replay(req) ? -EOVERFLOW : 0);
1480                         }
1481                 } else {
1482                         *transno_p = tti->tti_transno;
1483                 }
1484         }
1485
1486         if (!nolcd) {
1487                 tti->tti_off = ted->ted_lr_off;
1488                 if (CFS_FAIL_CHECK(OBD_FAIL_TGT_RCVD_EIO))
1489                         rc = -EIO;
1490                 else
1491                         rc = tgt_client_data_write(env, tgt, ted->ted_lcd,
1492                                                    &tti->tti_off, th);
1493                 if (rc < 0) {
1494                         mutex_unlock(&ted->ted_lcd_lock);
1495                         RETURN(rc);
1496                 }
1497         }
1498         mutex_unlock(&ted->ted_lcd_lock);
1499         RETURN(rc);
1500 }
1501
1502 /*
1503  * last_rcvd update for echo client simulation.
1504  * It updates last_rcvd client slot and version of object in
1505  * simple way but with all locks to simulate all drawbacks
1506  */
1507 static int tgt_last_rcvd_update_echo(const struct lu_env *env,
1508                                      struct lu_target *tgt,
1509                                      struct dt_object *obj,
1510                                      struct thandle *th,
1511                                      struct obd_export *exp)
1512 {
1513         struct tgt_thread_info  *tti = tgt_th_info(env);
1514         struct tg_export_data   *ted = &exp->exp_target_data;
1515         int                      rc = 0;
1516
1517         ENTRY;
1518
1519         tti->tti_transno = 0;
1520
1521         spin_lock(&tgt->lut_translock);
1522         if (th->th_result == 0)
1523                 tti->tti_transno = ++tgt->lut_last_transno;
1524         spin_unlock(&tgt->lut_translock);
1525
1526         /** VBR: set new versions */
1527         if (th->th_result == 0 && obj != NULL)
1528                 dt_version_set(env, obj, tti->tti_transno, th);
1529
1530         /* if can't add callback, do sync write */
1531         th->th_sync |= !!tgt_last_commit_cb_add(th, tgt, exp,
1532                                                 tti->tti_transno);
1533
1534         LASSERT(ted->ted_lr_off > 0);
1535
1536         mutex_lock(&ted->ted_lcd_lock);
1537         LASSERT(ergo(tti->tti_transno == 0, th->th_result != 0));
1538         ted->ted_lcd->lcd_last_transno = tti->tti_transno;
1539         ted->ted_lcd->lcd_last_result = th->th_result;
1540
1541         tti->tti_off = ted->ted_lr_off;
1542         rc = tgt_client_data_write(env, tgt, ted->ted_lcd, &tti->tti_off, th);
1543         mutex_unlock(&ted->ted_lcd_lock);
1544         RETURN(rc);
1545 }
1546
1547 static int tgt_clients_data_init(const struct lu_env *env,
1548                                  struct lu_target *tgt,
1549                                  unsigned long last_size)
1550 {
1551         struct obd_device       *obd = tgt->lut_obd;
1552         struct lr_server_data   *lsd = &tgt->lut_lsd;
1553         struct lsd_client_data  *lcd = NULL;
1554         struct tg_export_data   *ted;
1555         int                      cl_idx;
1556         int                      rc = 0;
1557         loff_t                   off = lsd->lsd_client_start;
1558         __u32                    generation = 0;
1559         struct cfs_hash         *hash = NULL;
1560
1561         ENTRY;
1562
1563         if (tgt->lut_bottom->dd_rdonly)
1564                 RETURN(0);
1565
1566         BUILD_BUG_ON(offsetof(struct lsd_client_data, lcd_padding) +
1567                      sizeof(lcd->lcd_padding) != LR_CLIENT_SIZE);
1568
1569         OBD_ALLOC_PTR(lcd);
1570         if (lcd == NULL)
1571                 RETURN(-ENOMEM);
1572
1573         hash = cfs_hash_getref(tgt->lut_obd->obd_gen_hash);
1574         if (hash == NULL)
1575                 GOTO(err_out, rc = -ENODEV);
1576
1577         for (cl_idx = 0; off < last_size; cl_idx++) {
1578                 struct obd_export       *exp;
1579                 __u64                    last_transno;
1580
1581                 /* Don't assume off is incremented properly by
1582                  * read_record(), in case sizeof(*lcd)
1583                  * isn't the same as fsd->lsd_client_size.  */
1584                 off = lsd->lsd_client_start + cl_idx * lsd->lsd_client_size;
1585                 rc = tgt_client_data_read(env, tgt, lcd, &off, cl_idx);
1586                 if (rc) {
1587                         CERROR("%s: error reading last_rcvd %s idx %d off "
1588                                "%llu: rc = %d\n", tgt_name(tgt), LAST_RCVD,
1589                                cl_idx, off, rc);
1590                         rc = 0;
1591                         break; /* read error shouldn't cause startup to fail */
1592                 }
1593
1594                 if (lcd->lcd_uuid[0] == '\0') {
1595                         CDEBUG(D_INFO, "skipping zeroed client at offset %d\n",
1596                                cl_idx);
1597                         continue;
1598                 }
1599
1600                 last_transno = lcd_last_transno(lcd);
1601
1602                 /* These exports are cleaned up by disconnect, so they
1603                  * need to be set up like real exports as connect does.
1604                  */
1605                 CDEBUG(D_HA, "RCVRNG CLIENT uuid: %s idx: %d lr: %llu"
1606                        " srv lr: %llu lx: %llu gen %u\n", lcd->lcd_uuid,
1607                        cl_idx, last_transno, lsd->lsd_last_transno,
1608                        lcd_last_xid(lcd), lcd->lcd_generation);
1609
1610                 exp = class_new_export(obd, (struct obd_uuid *)lcd->lcd_uuid);
1611                 if (IS_ERR(exp)) {
1612                         if (PTR_ERR(exp) == -EALREADY) {
1613                                 /* export already exists, zero out this one */
1614                                 CERROR("%s: Duplicate export %s!\n",
1615                                        tgt_name(tgt), lcd->lcd_uuid);
1616                                 continue;
1617                         }
1618                         GOTO(err_out, rc = PTR_ERR(exp));
1619                 }
1620
1621                 ted = &exp->exp_target_data;
1622                 *ted->ted_lcd = *lcd;
1623
1624                 rc = tgt_client_add(env, exp, cl_idx);
1625                 LASSERTF(rc == 0, "rc = %d\n", rc); /* can't fail existing */
1626                 /* VBR: set export last committed version */
1627                 exp->exp_last_committed = last_transno;
1628                 spin_lock(&exp->exp_lock);
1629                 exp->exp_connecting = 0;
1630                 exp->exp_in_recovery = 0;
1631                 spin_unlock(&exp->exp_lock);
1632                 atomic_inc(&obd->obd_max_recoverable_clients);
1633
1634                 if (tgt->lut_lsd.lsd_feature_incompat &
1635                     OBD_INCOMPAT_MULTI_RPCS &&
1636                     lcd->lcd_generation != 0) {
1637                         /* compute the highest valid client generation */
1638                         generation = max(generation, lcd->lcd_generation);
1639                         /* fill client_generation <-> export hash table */
1640                         rc = cfs_hash_add_unique(hash, &lcd->lcd_generation,
1641                                                  &exp->exp_gen_hash);
1642                         if (rc != 0) {
1643                                 CERROR("%s: duplicate export for client "
1644                                        "generation %u\n",
1645                                        tgt_name(tgt), lcd->lcd_generation);
1646                                 class_export_put(exp);
1647                                 GOTO(err_out, rc);
1648                         }
1649                 }
1650
1651                 class_export_put(exp);
1652
1653                 rc = rev_import_init(exp);
1654                 if (rc != 0) {
1655                         class_unlink_export(exp);
1656                         GOTO(err_out, rc);
1657                 }
1658
1659                 /* Need to check last_rcvd even for duplicated exports. */
1660                 CDEBUG(D_OTHER, "client at idx %d has last_transno = %llu\n",
1661                        cl_idx, last_transno);
1662
1663                 spin_lock(&tgt->lut_translock);
1664                 tgt->lut_last_transno = max(last_transno,
1665                                             tgt->lut_last_transno);
1666                 spin_unlock(&tgt->lut_translock);
1667         }
1668
1669         /* record highest valid client generation */
1670         atomic_set(&tgt->lut_client_generation, generation);
1671
1672 err_out:
1673         if (hash != NULL)
1674                 cfs_hash_putref(hash);
1675         OBD_FREE_PTR(lcd);
1676         RETURN(rc);
1677 }
1678
1679 struct server_compat_data {
1680         __u32 rocompat;
1681         __u32 incompat;
1682         __u32 rocinit;
1683         __u32 incinit;
1684 };
1685
1686 static struct server_compat_data tgt_scd[] = {
1687         [LDD_F_SV_TYPE_MDT] = {
1688                 .rocompat = OBD_ROCOMPAT_LOVOBJID,
1689                 .incompat = OBD_INCOMPAT_MDT | OBD_INCOMPAT_COMMON_LR |
1690                             OBD_INCOMPAT_FID | OBD_INCOMPAT_IAM_DIR |
1691                             OBD_INCOMPAT_LMM_VER | OBD_INCOMPAT_MULTI_OI |
1692                             OBD_INCOMPAT_MULTI_RPCS,
1693                 .rocinit = OBD_ROCOMPAT_LOVOBJID,
1694                 .incinit = OBD_INCOMPAT_MDT | OBD_INCOMPAT_COMMON_LR |
1695                            OBD_INCOMPAT_MULTI_OI,
1696         },
1697         [LDD_F_SV_TYPE_OST] = {
1698                 .rocompat = OBD_ROCOMPAT_IDX_IN_IDIF,
1699                 .incompat = OBD_INCOMPAT_OST | OBD_INCOMPAT_COMMON_LR |
1700                             OBD_INCOMPAT_FID,
1701                 .rocinit = OBD_ROCOMPAT_IDX_IN_IDIF,
1702                 .incinit = OBD_INCOMPAT_OST | OBD_INCOMPAT_COMMON_LR,
1703         }
1704 };
1705
1706 int tgt_server_data_init(const struct lu_env *env, struct lu_target *tgt)
1707 {
1708         struct tgt_thread_info          *tti = tgt_th_info(env);
1709         struct lr_server_data           *lsd = &tgt->lut_lsd;
1710         unsigned long                    last_rcvd_size;
1711         __u32                            index;
1712         int                              rc, type;
1713
1714         rc = dt_attr_get(env, tgt->lut_last_rcvd, &tti->tti_attr);
1715         if (rc)
1716                 RETURN(rc);
1717
1718         last_rcvd_size = (unsigned long)tti->tti_attr.la_size;
1719
1720         /* ensure padding in the struct is the correct size */
1721         BUILD_BUG_ON(offsetof(struct lr_server_data, lsd_padding) +
1722                      sizeof(lsd->lsd_padding) != LR_SERVER_SIZE);
1723
1724         rc = server_name2index(tgt_name(tgt), &index, NULL);
1725         if (rc < 0) {
1726                 CERROR("%s: Can not get index from name: rc = %d\n",
1727                        tgt_name(tgt), rc);
1728                 RETURN(rc);
1729         }
1730         /* server_name2index() returns type */
1731         type = rc;
1732         if (type != LDD_F_SV_TYPE_MDT && type != LDD_F_SV_TYPE_OST) {
1733                 CERROR("%s: unknown target type %x\n", tgt_name(tgt), type);
1734                 RETURN(-EINVAL);
1735         }
1736
1737         /* last_rcvd on OST doesn't provide reconstruct support because there
1738          * may be up to 8 in-flight write requests per single slot in
1739          * last_rcvd client data
1740          */
1741         tgt->lut_no_reconstruct = (type == LDD_F_SV_TYPE_OST);
1742
1743         if (last_rcvd_size == 0) {
1744                 LCONSOLE_WARN("%s: new disk, initializing\n", tgt_name(tgt));
1745
1746                 memcpy(lsd->lsd_uuid, tgt->lut_obd->obd_uuid.uuid,
1747                        sizeof(lsd->lsd_uuid));
1748                 lsd->lsd_last_transno = 0;
1749                 lsd->lsd_mount_count = 0;
1750                 lsd->lsd_server_size = LR_SERVER_SIZE;
1751                 lsd->lsd_client_start = LR_CLIENT_START;
1752                 lsd->lsd_client_size = LR_CLIENT_SIZE;
1753                 lsd->lsd_subdir_count = OBJ_SUBDIR_COUNT;
1754                 lsd->lsd_osd_index = index;
1755                 lsd->lsd_feature_rocompat = tgt_scd[type].rocinit;
1756                 lsd->lsd_feature_incompat = tgt_scd[type].incinit;
1757         } else {
1758                 rc = tgt_server_data_read(env, tgt);
1759                 if (rc) {
1760                         CERROR("%s: error reading LAST_RCVD: rc= %d\n",
1761                                tgt_name(tgt), rc);
1762                         RETURN(rc);
1763                 }
1764                 if (strcmp(lsd->lsd_uuid, tgt->lut_obd->obd_uuid.uuid)) {
1765                         if (tgt->lut_bottom->dd_rdonly) {
1766                                 /* Such difference may be caused by mounting
1767                                  * up snapshot with new fsname under rd_only
1768                                  * mode. But even if it was NOT, it will not
1769                                  * damage the system because of "rd_only". */
1770                                 memcpy(lsd->lsd_uuid,
1771                                        tgt->lut_obd->obd_uuid.uuid,
1772                                        sizeof(lsd->lsd_uuid));
1773                         } else {
1774                                 LCONSOLE_ERROR_MSG(0x157, "Trying to start "
1775                                                    "OBD %s using the wrong "
1776                                                    "disk %s. Were the /dev/ "
1777                                                    "assignments rearranged?\n",
1778                                                    tgt->lut_obd->obd_uuid.uuid,
1779                                                    lsd->lsd_uuid);
1780                                 RETURN(-EINVAL);
1781                         }
1782                 }
1783
1784                 if (lsd->lsd_osd_index != index) {
1785                         LCONSOLE_ERROR_MSG(0x157,
1786                                            "%s: index %d in last rcvd is different with the index %d in config log, It might be disk corruption!\n",
1787                                            tgt_name(tgt),
1788                                            lsd->lsd_osd_index, index);
1789                         RETURN(-EINVAL);
1790                 }
1791         }
1792
1793         if (lsd->lsd_feature_incompat & ~tgt_scd[type].incompat) {
1794                 CERROR("%s: unsupported incompat filesystem feature(s) %x\n",
1795                        tgt_name(tgt),
1796                        lsd->lsd_feature_incompat & ~tgt_scd[type].incompat);
1797                 RETURN(-EINVAL);
1798         }
1799
1800         if (type == LDD_F_SV_TYPE_MDT)
1801                 lsd->lsd_feature_incompat |= OBD_INCOMPAT_FID;
1802
1803         if (lsd->lsd_feature_rocompat & ~tgt_scd[type].rocompat) {
1804                 CERROR("%s: unsupported read-only filesystem feature(s) %x\n",
1805                        tgt_name(tgt),
1806                        lsd->lsd_feature_rocompat & ~tgt_scd[type].rocompat);
1807                 RETURN(-EINVAL);
1808         }
1809         /** Interop: evict all clients at first boot with 1.8 last_rcvd */
1810         if (type == LDD_F_SV_TYPE_MDT &&
1811             !(lsd->lsd_feature_compat & OBD_COMPAT_20)) {
1812                 if (last_rcvd_size > lsd->lsd_client_start) {
1813                         LCONSOLE_WARN("%s: mounting at first time on 1.8 FS, "
1814                                       "remove all clients for interop needs\n",
1815                                       tgt_name(tgt));
1816                         rc = tgt_truncate_last_rcvd(env, tgt,
1817                                                     lsd->lsd_client_start);
1818                         if (rc)
1819                                 RETURN(rc);
1820                         last_rcvd_size = lsd->lsd_client_start;
1821                 }
1822                 /** set 2.0 flag to upgrade/downgrade between 1.8 and 2.0 */
1823                 lsd->lsd_feature_compat |= OBD_COMPAT_20;
1824         }
1825
1826         spin_lock(&tgt->lut_translock);
1827         tgt->lut_last_transno = lsd->lsd_last_transno;
1828         spin_unlock(&tgt->lut_translock);
1829
1830         lsd->lsd_mount_count++;
1831
1832         CDEBUG(D_INODE, "=======,=BEGIN DUMPING LAST_RCVD========\n");
1833         CDEBUG(D_INODE, "%s: server last_transno: %llu\n",
1834                tgt_name(tgt), tgt->lut_last_transno);
1835         CDEBUG(D_INODE, "%s: server mount_count: %llu\n",
1836                tgt_name(tgt), lsd->lsd_mount_count);
1837         CDEBUG(D_INODE, "%s: server data size: %u\n",
1838                tgt_name(tgt), lsd->lsd_server_size);
1839         CDEBUG(D_INODE, "%s: per-client data start: %u\n",
1840                tgt_name(tgt), lsd->lsd_client_start);
1841         CDEBUG(D_INODE, "%s: per-client data size: %u\n",
1842                tgt_name(tgt), lsd->lsd_client_size);
1843         CDEBUG(D_INODE, "%s: last_rcvd size: %lu\n",
1844                tgt_name(tgt), last_rcvd_size);
1845         CDEBUG(D_INODE, "%s: server subdir_count: %u\n",
1846                tgt_name(tgt), lsd->lsd_subdir_count);
1847         CDEBUG(D_INODE, "%s: last_rcvd clients: %lu\n", tgt_name(tgt),
1848                last_rcvd_size <= lsd->lsd_client_start ? 0 :
1849                (last_rcvd_size - lsd->lsd_client_start) /
1850                 lsd->lsd_client_size);
1851         CDEBUG(D_INODE, "========END DUMPING LAST_RCVD========\n");
1852
1853         if (lsd->lsd_server_size == 0 || lsd->lsd_client_start == 0 ||
1854             lsd->lsd_client_size == 0) {
1855                 CERROR("%s: bad last_rcvd contents!\n", tgt_name(tgt));
1856                 RETURN(-EINVAL);
1857         }
1858
1859         if (!tgt->lut_obd->obd_replayable)
1860                 CWARN("%s: recovery support OFF\n", tgt_name(tgt));
1861
1862         rc = tgt_clients_data_init(env, tgt, last_rcvd_size);
1863         if (rc < 0)
1864                 GOTO(err_client, rc);
1865
1866         spin_lock(&tgt->lut_translock);
1867         /* obd_last_committed is used for compatibility
1868          * with other lustre recovery code */
1869         tgt->lut_obd->obd_last_committed = tgt->lut_last_transno;
1870         spin_unlock(&tgt->lut_translock);
1871
1872         tgt->lut_obd->u.obt.obt_mount_count = lsd->lsd_mount_count;
1873         tgt->lut_obd->u.obt.obt_instance = (__u32)lsd->lsd_mount_count;
1874
1875         /* save it, so mount count and last_transno is current */
1876         rc = tgt_server_data_update(env, tgt, 0);
1877         if (rc < 0)
1878                 GOTO(err_client, rc);
1879
1880         RETURN(0);
1881
1882 err_client:
1883         class_disconnect_exports(tgt->lut_obd);
1884         return rc;
1885 }
1886
1887 /* add credits for last_rcvd update */
1888 int tgt_txn_start_cb(const struct lu_env *env, struct thandle *th,
1889                      void *cookie)
1890 {
1891         struct lu_target        *tgt = cookie;
1892         struct tgt_session_info *tsi;
1893         struct tgt_thread_info  *tti = tgt_th_info(env);
1894         struct dt_object        *dto;
1895         int                      rc;
1896
1897         /* For readonly case, the caller should have got failure
1898          * when start the transaction. If the logic comes here,
1899          * there must be something wrong. */
1900         if (unlikely(tgt->lut_bottom->dd_rdonly)) {
1901                 dump_stack();
1902                 LBUG();
1903         }
1904
1905         /* if there is no session, then this transaction is not result of
1906          * request processing but some local operation */
1907         if (env->le_ses == NULL)
1908                 return 0;
1909
1910         LASSERT(tgt->lut_last_rcvd);
1911         tsi = tgt_ses_info(env);
1912         /* OFD may start transaction without export assigned */
1913         if (tsi->tsi_exp == NULL)
1914                 return 0;
1915
1916         if (tgt_is_multimodrpcs_client(tsi->tsi_exp)) {
1917                 /*
1918                  * Use maximum possible file offset for declaration to ensure
1919                  * ZFS will reserve enough credits for a write anywhere in this
1920                  * file, since we don't know where in the file the write will be
1921                  * because a replay slot has not been assigned.  This should be
1922                  * replaced by dmu_tx_hold_append() when available.
1923                  */
1924                 tti->tti_buf.lb_buf = NULL;
1925                 tti->tti_buf.lb_len = sizeof(struct lsd_reply_data);
1926                 dto = dt_object_locate(tgt->lut_reply_data, th->th_dev);
1927                 rc = dt_declare_record_write(env, dto, &tti->tti_buf, -1, th);
1928                 if (rc)
1929                         return rc;
1930         } else {
1931                 dto = dt_object_locate(tgt->lut_last_rcvd, th->th_dev);
1932                 tti_buf_lcd(tti);
1933                 tti->tti_off = tsi->tsi_exp->exp_target_data.ted_lr_off;
1934                 rc = dt_declare_record_write(env, dto, &tti->tti_buf,
1935                                              tti->tti_off, th);
1936                 if (rc)
1937                         return rc;
1938         }
1939
1940         if (tsi->tsi_vbr_obj != NULL &&
1941             !lu_object_remote(&tsi->tsi_vbr_obj->do_lu)) {
1942                 dto = dt_object_locate(tsi->tsi_vbr_obj, th->th_dev);
1943                 rc = dt_declare_version_set(env, dto, th);
1944         }
1945
1946         return rc;
1947 }
1948
1949 /* Update last_rcvd records with latests transaction data */
1950 int tgt_txn_stop_cb(const struct lu_env *env, struct thandle *th,
1951                     void *cookie)
1952 {
1953         struct lu_target        *tgt = cookie;
1954         struct tgt_session_info *tsi;
1955         struct tgt_thread_info  *tti = tgt_th_info(env);
1956         struct dt_object        *obj = NULL;
1957         int                      rc;
1958         bool                     echo_client;
1959
1960         if (env->le_ses == NULL)
1961                 return 0;
1962
1963         tsi = tgt_ses_info(env);
1964         /* OFD may start transaction without export assigned */
1965         if (tsi->tsi_exp == NULL)
1966                 return 0;
1967
1968         echo_client = (tgt_ses_req(tsi) == NULL && tsi->tsi_xid == 0);
1969
1970         if (tti->tti_has_trans && !echo_client) {
1971                 if (tti->tti_mult_trans == 0) {
1972                         CDEBUG(D_HA, "More than one transaction %llu\n",
1973                                tti->tti_transno);
1974                         RETURN(0);
1975                 }
1976                 /* we need another transno to be assigned */
1977                 tti->tti_transno = 0;
1978         } else if (th->th_result == 0) {
1979                 tti->tti_has_trans = 1;
1980         }
1981
1982         if (tsi->tsi_vbr_obj != NULL &&
1983             !lu_object_remote(&tsi->tsi_vbr_obj->do_lu)) {
1984                 obj = tsi->tsi_vbr_obj;
1985         }
1986
1987         if (unlikely(echo_client)) /* echo client special case */
1988                 rc = tgt_last_rcvd_update_echo(env, tgt, obj, th,
1989                                                tsi->tsi_exp);
1990         else
1991                 rc = tgt_last_rcvd_update(env, tgt, obj, tsi->tsi_opdata, th,
1992                                           tgt_ses_req(tsi));
1993         return rc;
1994 }
1995
1996 int tgt_reply_data_init(const struct lu_env *env, struct lu_target *tgt)
1997 {
1998         struct tgt_thread_info  *tti = tgt_th_info(env);
1999         struct lsd_reply_data   *lrd = &tti->tti_lrd;
2000         unsigned long            reply_data_size;
2001         int                      rc;
2002         struct lsd_reply_header *lrh = NULL;
2003         struct tg_reply_data    *trd = NULL;
2004         int                      idx;
2005         loff_t                   off;
2006         struct cfs_hash         *hash = NULL;
2007         struct obd_export       *exp;
2008         struct tg_export_data   *ted;
2009         int                      reply_data_recovered = 0;
2010
2011         rc = dt_attr_get(env, tgt->lut_reply_data, &tti->tti_attr);
2012         if (rc)
2013                 GOTO(out, rc);
2014         reply_data_size = (unsigned long)tti->tti_attr.la_size;
2015
2016         OBD_ALLOC_PTR(lrh);
2017         if (lrh == NULL)
2018                 GOTO(out, rc = -ENOMEM);
2019
2020         if (reply_data_size == 0) {
2021                 CDEBUG(D_INFO, "%s: new reply_data file, initializing\n",
2022                        tgt_name(tgt));
2023                 lrh->lrh_magic = LRH_MAGIC;
2024                 lrh->lrh_header_size = sizeof(struct lsd_reply_header);
2025                 lrh->lrh_reply_size = sizeof(struct lsd_reply_data);
2026                 rc = tgt_reply_header_write(env, tgt, lrh);
2027                 if (rc) {
2028                         CERROR("%s: error writing %s: rc = %d\n",
2029                                tgt_name(tgt), REPLY_DATA, rc);
2030                         GOTO(out, rc);
2031                 }
2032         } else {
2033                 rc = tgt_reply_header_read(env, tgt, lrh);
2034                 if (rc) {
2035                         CERROR("%s: error reading %s: rc = %d\n",
2036                                tgt_name(tgt), REPLY_DATA, rc);
2037                         GOTO(out, rc);
2038                 }
2039                 if (lrh->lrh_magic != LRH_MAGIC ||
2040                     lrh->lrh_header_size != sizeof(struct lsd_reply_header) ||
2041                     lrh->lrh_reply_size != sizeof(struct lsd_reply_data)) {
2042                         CERROR("%s: invalid header in %s\n",
2043                                tgt_name(tgt), REPLY_DATA);
2044                         GOTO(out, rc = -EINVAL);
2045                 }
2046
2047                 hash = cfs_hash_getref(tgt->lut_obd->obd_gen_hash);
2048                 if (hash == NULL)
2049                         GOTO(out, rc = -ENODEV);
2050
2051                 OBD_ALLOC_PTR(trd);
2052                 if (trd == NULL)
2053                         GOTO(out, rc = -ENOMEM);
2054
2055                 /* Load reply_data from disk */
2056                 for (idx = 0, off = sizeof(struct lsd_reply_header);
2057                      off < reply_data_size;
2058                      idx++, off += sizeof(struct lsd_reply_data)) {
2059                         rc = tgt_reply_data_read(env, tgt, lrd, off);
2060                         if (rc) {
2061                                 CERROR("%s: error reading %s: rc = %d\n",
2062                                        tgt_name(tgt), REPLY_DATA, rc);
2063                                 GOTO(out, rc);
2064                         }
2065
2066                         exp = cfs_hash_lookup(hash, &lrd->lrd_client_gen);
2067                         if (exp == NULL) {
2068                                 /* old reply data from a disconnected client */
2069                                 continue;
2070                         }
2071                         ted = &exp->exp_target_data;
2072                         mutex_lock(&ted->ted_lcd_lock);
2073
2074                         /* create in-memory reply_data and link it to
2075                          * target export's reply list */
2076                         rc = tgt_set_reply_slot(tgt, idx);
2077                         if (rc != 0) {
2078                                 mutex_unlock(&ted->ted_lcd_lock);
2079                                 GOTO(out, rc);
2080                         }
2081                         trd->trd_reply = *lrd;
2082                         trd->trd_pre_versions[0] = 0;
2083                         trd->trd_pre_versions[1] = 0;
2084                         trd->trd_pre_versions[2] = 0;
2085                         trd->trd_pre_versions[3] = 0;
2086                         trd->trd_index = idx;
2087                         trd->trd_tag = 0;
2088                         list_add(&trd->trd_list, &ted->ted_reply_list);
2089                         ted->ted_reply_cnt++;
2090                         if (ted->ted_reply_cnt > ted->ted_reply_max)
2091                                 ted->ted_reply_max = ted->ted_reply_cnt;
2092
2093                         CDEBUG(D_HA, "%s: restore reply %p: xid %llu, "
2094                                "transno %llu, client gen %u, slot idx %d\n",
2095                                tgt_name(tgt), trd, lrd->lrd_xid,
2096                                lrd->lrd_transno, lrd->lrd_client_gen,
2097                                trd->trd_index);
2098
2099                         /* update export last committed transation */
2100                         exp->exp_last_committed = max(exp->exp_last_committed,
2101                                                       lrd->lrd_transno);
2102                         /* Update lcd_last_transno as well for check in
2103                          * tgt_release_reply_data() or the latest client
2104                          * transno can be lost.
2105                          */
2106                         ted->ted_lcd->lcd_last_transno =
2107                                 max(ted->ted_lcd->lcd_last_transno,
2108                                     exp->exp_last_committed);
2109
2110                         mutex_unlock(&ted->ted_lcd_lock);
2111                         class_export_put(exp);
2112
2113                         /* update target last committed transaction */
2114                         spin_lock(&tgt->lut_translock);
2115                         tgt->lut_last_transno = max(tgt->lut_last_transno,
2116                                                     lrd->lrd_transno);
2117                         spin_unlock(&tgt->lut_translock);
2118
2119                         reply_data_recovered++;
2120
2121                         OBD_ALLOC_PTR(trd);
2122                         if (trd == NULL)
2123                                 GOTO(out, rc = -ENOMEM);
2124                 }
2125                 CDEBUG(D_INFO, "%s: %d reply data have been recovered\n",
2126                        tgt_name(tgt), reply_data_recovered);
2127         }
2128
2129         spin_lock(&tgt->lut_translock);
2130         /* obd_last_committed is used for compatibility
2131          * with other lustre recovery code */
2132         tgt->lut_obd->obd_last_committed = tgt->lut_last_transno;
2133         spin_unlock(&tgt->lut_translock);
2134
2135         rc = 0;
2136
2137 out:
2138         if (hash != NULL)
2139                 cfs_hash_putref(hash);
2140         if (trd != NULL)
2141                 OBD_FREE_PTR(trd);
2142         if (lrh != NULL)
2143                 OBD_FREE_PTR(lrh);
2144         return rc;
2145 }
2146
2147 static int tgt_check_lookup_req(struct ptlrpc_request *req, int lookup,
2148                                 struct tg_reply_data *trd)
2149 {
2150         struct tg_export_data *ted = &req->rq_export->exp_target_data;
2151         struct lu_target *lut = class_exp2tgt(req->rq_export);
2152         __u16 tag = lustre_msg_get_tag(req->rq_reqmsg);
2153         int rc = 0;
2154         struct tg_reply_data *reply;
2155         bool check_increasing;
2156
2157         if (tag == 0)
2158                 return 0;
2159
2160         check_increasing = tgt_is_increasing_xid_client(req->rq_export) &&
2161                            !(lustre_msg_get_flags(req->rq_reqmsg) & MSG_REPLAY);
2162         if (!lookup && !check_increasing)
2163                 return 0;
2164
2165         list_for_each_entry(reply, &ted->ted_reply_list, trd_list) {
2166                 if (lookup && reply->trd_reply.lrd_xid == req->rq_xid) {
2167                         rc = 1;
2168                         if (trd != NULL)
2169                                 *trd = *reply;
2170                         break;
2171                 } else if (check_increasing && reply->trd_tag == tag &&
2172                            reply->trd_reply.lrd_xid > req->rq_xid) {
2173                         rc = -EPROTO;
2174                         CERROR("%s: busy tag=%u req_xid=%llu, trd=%p: xid=%llu transno=%llu client_gen=%u slot_idx=%d: rc = %d\n",
2175                                tgt_name(lut), tag, req->rq_xid, trd,
2176                                reply->trd_reply.lrd_xid,
2177                                reply->trd_reply.lrd_transno,
2178                                reply->trd_reply.lrd_client_gen,
2179                                reply->trd_index, rc);
2180                         break;
2181                 }
2182         }
2183
2184         return rc;
2185 }
2186
2187 /* Look for a reply data matching specified request @req
2188  * A copy is returned in @trd if the pointer is not NULL
2189  */
2190 int tgt_lookup_reply(struct ptlrpc_request *req, struct tg_reply_data *trd)
2191 {
2192         struct tg_export_data *ted = &req->rq_export->exp_target_data;
2193         int found = 0;
2194         bool not_replay = !(lustre_msg_get_flags(req->rq_reqmsg) & MSG_REPLAY);
2195
2196         mutex_lock(&ted->ted_lcd_lock);
2197         if (not_replay && req->rq_xid <= req->rq_export->exp_last_xid) {
2198                 /* A check for the last_xid is needed here in case there is
2199                  * no reply data is left in the list. It may happen if another
2200                  * RPC on another slot increased the last_xid between our
2201                  * process_req_last_xid & tgt_lookup_reply calls */
2202                 found = -EPROTO;
2203         } else {
2204                 found = tgt_check_lookup_req(req, 1, trd);
2205         }
2206         mutex_unlock(&ted->ted_lcd_lock);
2207
2208         CDEBUG(D_TRACE, "%s: lookup reply xid %llu, found %d last_xid %llu\n",
2209                tgt_name(class_exp2tgt(req->rq_export)), req->rq_xid, found,
2210                req->rq_export->exp_last_xid);
2211
2212         return found;
2213 }
2214 EXPORT_SYMBOL(tgt_lookup_reply);
2215
2216 int tgt_handle_received_xid(struct obd_export *exp, __u64 rcvd_xid)
2217 {
2218         struct tg_export_data   *ted = &exp->exp_target_data;
2219         struct lu_target        *lut = class_exp2tgt(exp);
2220         struct tg_reply_data    *trd, *tmp;
2221
2222
2223         list_for_each_entry_safe(trd, tmp, &ted->ted_reply_list, trd_list) {
2224                 if (trd->trd_reply.lrd_xid > rcvd_xid)
2225                         continue;
2226                 ted->ted_release_xid++;
2227                 tgt_release_reply_data(lut, ted, trd);
2228         }
2229
2230         return 0;
2231 }
2232
2233 int tgt_handle_tag(struct ptlrpc_request *req)
2234 {
2235         return tgt_check_lookup_req(req, 0, NULL);
2236 }
2237