Whamcloud - gitweb
658f339763470144595219e0676f3cc7659d7f2f
[fs/lustre-release.git] / lustre / ptlrpc / import.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) 2003, 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/ptlrpc/import.c
33  *
34  * Author: Mike Shaver <shaver@clusterfs.com>
35  */
36
37 #define DEBUG_SUBSYSTEM S_RPC
38
39 #include <linux/kthread.h>
40 #include <obd_support.h>
41 #include <lustre_ha.h>
42 #include <lustre_net.h>
43 #include <lustre_import.h>
44 #include <lustre_export.h>
45 #include <obd.h>
46 #include <obd_cksum.h>
47 #include <obd_class.h>
48
49 #include "ptlrpc_internal.h"
50
51 struct ptlrpc_connect_async_args {
52          __u64 pcaa_peer_committed;
53         int pcaa_initial_connect;
54 };
55
56 /**
57  * Updates import \a imp current state to provided \a state value
58  * Helper function. Must be called under imp_lock.
59  */
60 static void __import_set_state(struct obd_import *imp,
61                                enum lustre_imp_state state)
62 {
63         switch (state) {
64         case LUSTRE_IMP_CLOSED:
65         case LUSTRE_IMP_NEW:
66         case LUSTRE_IMP_DISCON:
67         case LUSTRE_IMP_CONNECTING:
68                 break;
69         case LUSTRE_IMP_REPLAY_WAIT:
70                 imp->imp_replay_state = LUSTRE_IMP_REPLAY_LOCKS;
71                 break;
72         default:
73                 imp->imp_replay_state = LUSTRE_IMP_REPLAY;
74         }
75         imp->imp_state = state;
76         imp->imp_state_hist[imp->imp_state_hist_idx].ish_state = state;
77         imp->imp_state_hist[imp->imp_state_hist_idx].ish_time =
78                 ktime_get_real_seconds();
79         imp->imp_state_hist_idx = (imp->imp_state_hist_idx + 1) %
80                 IMP_STATE_HIST_LEN;
81 }
82
83 /* A CLOSED import should remain so. */
84 #define IMPORT_SET_STATE_NOLOCK(imp, state)                                    \
85 do {                                                                           \
86         if (imp->imp_state != LUSTRE_IMP_CLOSED) {                             \
87                CDEBUG(D_HA, "%p %s: changing import state from %s to %s\n",    \
88                       imp, obd2cli_tgt(imp->imp_obd),                          \
89                       ptlrpc_import_state_name(imp->imp_state),                \
90                       ptlrpc_import_state_name(state));                        \
91                __import_set_state(imp, state);                                 \
92         }                                                                      \
93 } while(0)
94
95 #define IMPORT_SET_STATE(imp, state)                                    \
96 do {                                                                    \
97         spin_lock(&imp->imp_lock);                                      \
98         IMPORT_SET_STATE_NOLOCK(imp, state);                            \
99         spin_unlock(&imp->imp_lock);                                    \
100 } while(0)
101
102 void ptlrpc_import_enter_resend(struct obd_import *imp)
103 {
104         IMPORT_SET_STATE(imp, LUSTRE_IMP_RECOVER);
105 }
106 EXPORT_SYMBOL(ptlrpc_import_enter_resend);
107
108
109 static int ptlrpc_connect_interpret(const struct lu_env *env,
110                                     struct ptlrpc_request *request,
111                                     void * data, int rc);
112 int ptlrpc_import_recovery_state_machine(struct obd_import *imp);
113
114 /* Only this function is allowed to change the import state when it is
115  * CLOSED. I would rather refcount the import and free it after
116  * disconnection like we do with exports. To do that, the client_obd
117  * will need to save the peer info somewhere other than in the import,
118  * though. */
119 int ptlrpc_init_import(struct obd_import *imp)
120 {
121         spin_lock(&imp->imp_lock);
122
123         imp->imp_generation++;
124         imp->imp_state =  LUSTRE_IMP_NEW;
125
126         spin_unlock(&imp->imp_lock);
127
128         return 0;
129 }
130 EXPORT_SYMBOL(ptlrpc_init_import);
131
132 #define UUID_STR "_UUID"
133 void deuuidify(char *uuid, const char *prefix, char **uuid_start, int *uuid_len)
134 {
135         *uuid_start = !prefix || strncmp(uuid, prefix, strlen(prefix))
136                 ? uuid : uuid + strlen(prefix);
137
138         *uuid_len = strlen(*uuid_start);
139
140         if (*uuid_len < strlen(UUID_STR))
141                 return;
142
143         if (!strncmp(*uuid_start + *uuid_len - strlen(UUID_STR),
144                     UUID_STR, strlen(UUID_STR)))
145                 *uuid_len -= strlen(UUID_STR);
146 }
147
148 /**
149  * Returns true if import was FULL, false if import was already not
150  * connected.
151  * @imp - import to be disconnected
152  * @conn_cnt - connection count (epoch) of the request that timed out
153  *             and caused the disconnection.  In some cases, multiple
154  *             inflight requests can fail to a single target (e.g. OST
155  *             bulk requests) and if one has already caused a reconnection
156  *             (increasing the import->conn_cnt) the older failure should
157  *             not also cause a reconnection.  If zero it forces a reconnect.
158  */
159 int ptlrpc_set_import_discon(struct obd_import *imp, __u32 conn_cnt)
160 {
161         int rc = 0;
162
163         spin_lock(&imp->imp_lock);
164
165         if (imp->imp_state == LUSTRE_IMP_FULL &&
166             (conn_cnt == 0 || conn_cnt == imp->imp_conn_cnt)) {
167                 char *target_start;
168                 int   target_len;
169
170                 deuuidify(obd2cli_tgt(imp->imp_obd), NULL,
171                           &target_start, &target_len);
172
173                 if (imp->imp_replayable) {
174                         LCONSOLE_WARN("%s: Connection to %.*s (at %s) was "
175                                "lost; in progress operations using this "
176                                "service will wait for recovery to complete\n",
177                                imp->imp_obd->obd_name, target_len, target_start,
178                                obd_import_nid2str(imp));
179                 } else {
180                         LCONSOLE_ERROR_MSG(0x166, "%s: Connection to "
181                                "%.*s (at %s) was lost; in progress "
182                                "operations using this service will fail\n",
183                                imp->imp_obd->obd_name, target_len, target_start,
184                                obd_import_nid2str(imp));
185                 }
186                 IMPORT_SET_STATE_NOLOCK(imp, LUSTRE_IMP_DISCON);
187                 spin_unlock(&imp->imp_lock);
188
189                 if (obd_dump_on_timeout)
190                         libcfs_debug_dumplog();
191
192                 obd_import_event(imp->imp_obd, imp, IMP_EVENT_DISCON);
193                 rc = 1;
194         } else {
195                 spin_unlock(&imp->imp_lock);
196                 CDEBUG(D_HA, "%s: import %p already %s (conn %u, was %u): %s\n",
197                        imp->imp_client->cli_name, imp,
198                        (imp->imp_state == LUSTRE_IMP_FULL &&
199                         imp->imp_conn_cnt > conn_cnt) ?
200                        "reconnected" : "not connected", imp->imp_conn_cnt,
201                        conn_cnt, ptlrpc_import_state_name(imp->imp_state));
202         }
203
204         return rc;
205 }
206
207 /* Must be called with imp_lock held! */
208 static void ptlrpc_deactivate_and_unlock_import(struct obd_import *imp)
209 {
210         ENTRY;
211         assert_spin_locked(&imp->imp_lock);
212
213         CDEBUG(D_HA, "setting import %s INVALID\n", obd2cli_tgt(imp->imp_obd));
214         imp->imp_invalid = 1;
215         imp->imp_generation++;
216         spin_unlock(&imp->imp_lock);
217
218         ptlrpc_abort_inflight(imp);
219         obd_import_event(imp->imp_obd, imp, IMP_EVENT_INACTIVE);
220
221         EXIT;
222 }
223
224 /*
225  * This acts as a barrier; all existing requests are rejected, and
226  * no new requests will be accepted until the import is valid again.
227  */
228 void ptlrpc_deactivate_import(struct obd_import *imp)
229 {
230         spin_lock(&imp->imp_lock);
231         ptlrpc_deactivate_and_unlock_import(imp);
232 }
233 EXPORT_SYMBOL(ptlrpc_deactivate_import);
234
235 static time64_t ptlrpc_inflight_deadline(struct ptlrpc_request *req,
236                                          time64_t now)
237 {
238         time64_t dl;
239
240         if (!(((req->rq_phase == RQ_PHASE_RPC) && !req->rq_waiting) ||
241               (req->rq_phase == RQ_PHASE_BULK) ||
242               (req->rq_phase == RQ_PHASE_NEW)))
243                 return 0;
244
245         if (req->rq_timedout)
246                 return 0;
247
248         if (req->rq_phase == RQ_PHASE_NEW)
249                 dl = req->rq_sent;
250         else
251                 dl = req->rq_deadline;
252
253         if (dl <= now)
254                 return 0;
255
256         return dl - now;
257 }
258
259 static time64_t ptlrpc_inflight_timeout(struct obd_import *imp)
260 {
261         time64_t now = ktime_get_real_seconds();
262         struct list_head *tmp, *n;
263         struct ptlrpc_request *req;
264         time64_t timeout = 0;
265
266         spin_lock(&imp->imp_lock);
267         list_for_each_safe(tmp, n, &imp->imp_sending_list) {
268                 req = list_entry(tmp, struct ptlrpc_request, rq_list);
269                 timeout = max(ptlrpc_inflight_deadline(req, now), timeout);
270         }
271         spin_unlock(&imp->imp_lock);
272         return timeout;
273 }
274
275 /**
276  * This function will invalidate the import, if necessary, then block
277  * for all the RPC completions, and finally notify the obd to
278  * invalidate its state (ie cancel locks, clear pending requests,
279  * etc).
280  */
281 void ptlrpc_invalidate_import(struct obd_import *imp)
282 {
283         struct list_head *tmp, *n;
284         struct ptlrpc_request *req;
285         struct l_wait_info lwi;
286         time64_t timeout;
287         int rc;
288
289         atomic_inc(&imp->imp_inval_count);
290
291         if (!imp->imp_invalid || imp->imp_obd->obd_no_recov)
292                 ptlrpc_deactivate_import(imp);
293
294         CFS_FAIL_TIMEOUT(OBD_FAIL_MGS_CONNECT_NET, 3 * cfs_fail_val / 2);
295         LASSERT(imp->imp_invalid);
296
297         /* Wait forever until inflight == 0. We really can't do it another
298          * way because in some cases we need to wait for very long reply
299          * unlink. We can't do anything before that because there is really
300          * no guarantee that some rdma transfer is not in progress right now. */
301         do {
302                 long timeout_jiffies;
303
304                 /* Calculate max timeout for waiting on rpcs to error
305                  * out. Use obd_timeout if calculated value is smaller
306                  * than it.
307                  */
308                 if (!OBD_FAIL_CHECK(OBD_FAIL_PTLRPC_LONG_REPL_UNLINK)) {
309                         timeout = ptlrpc_inflight_timeout(imp);
310                         timeout += div_u64(timeout, 3);
311
312                         if (timeout == 0)
313                                 timeout = obd_timeout;
314                 } else {
315                         /* decrease the interval to increase race condition */
316                         timeout = 1;
317                 }
318
319                 CDEBUG(D_RPCTRACE, "Sleeping %llds for inflight to error out\n",
320                        timeout);
321
322                 /* Wait for all requests to error out and call completion
323                  * callbacks. Cap it at obd_timeout -- these should all
324                  * have been locally cancelled by ptlrpc_abort_inflight.
325                  */
326                 timeout_jiffies = max_t(long, cfs_time_seconds(timeout), 1);
327                 lwi = LWI_TIMEOUT_INTERVAL(timeout_jiffies,
328                                            (timeout > 1) ? cfs_time_seconds(1) :
329                                                            cfs_time_seconds(1) / 2,
330                                                            NULL, NULL);
331                 rc = l_wait_event(imp->imp_recovery_waitq,
332                                   (atomic_read(&imp->imp_inflight) == 0),
333                                   &lwi);
334                 if (rc) {
335                         const char *cli_tgt = obd2cli_tgt(imp->imp_obd);
336
337                         CERROR("%s: rc = %d waiting for callback (%d != 0)\n",
338                                cli_tgt, rc, atomic_read(&imp->imp_inflight));
339
340                         spin_lock(&imp->imp_lock);
341                         if (atomic_read(&imp->imp_inflight) == 0) {
342                                 int count = atomic_read(&imp->imp_unregistering);
343
344                                 /* We know that "unregistering" rpcs only can
345                                  * survive in sending or delaying lists (they
346                                  * maybe waiting for long reply unlink in
347                                  * sluggish nets). Let's check this. If there
348                                  * is no inflight and unregistering != 0, this
349                                  * is bug. */
350                                 LASSERTF(count == 0, "Some RPCs are still "
351                                          "unregistering: %d\n", count);
352
353                                 /* Let's save one loop as soon as inflight have
354                                  * dropped to zero. No new inflights possible at
355                                  * this point. */
356                                 rc = 0;
357                         } else {
358                                 list_for_each_safe(tmp, n,
359                                                    &imp->imp_sending_list) {
360                                         req = list_entry(tmp,
361                                                          struct ptlrpc_request,
362                                                          rq_list);
363                                         DEBUG_REQ(D_ERROR, req,
364                                                   "still on sending list");
365                                 }
366                                 list_for_each_safe(tmp, n,
367                                                    &imp->imp_delayed_list) {
368                                         req = list_entry(tmp,
369                                                          struct ptlrpc_request,
370                                                          rq_list);
371                                         DEBUG_REQ(D_ERROR, req,
372                                                   "still on delayed list");
373                                 }
374
375                                 CERROR("%s: Unregistering RPCs found (%d). "
376                                        "Network is sluggish? Waiting them "
377                                        "to error out.\n", cli_tgt,
378                                        atomic_read(&imp->imp_unregistering));
379                         }
380                         spin_unlock(&imp->imp_lock);
381                 }
382         } while (rc != 0);
383
384         /*
385          * Let's additionally check that no new rpcs added to import in
386          * "invalidate" state.
387          */
388         LASSERT(atomic_read(&imp->imp_inflight) == 0);
389         obd_import_event(imp->imp_obd, imp, IMP_EVENT_INVALIDATE);
390         sptlrpc_import_flush_all_ctx(imp);
391
392         atomic_dec(&imp->imp_inval_count);
393         wake_up_all(&imp->imp_recovery_waitq);
394 }
395 EXPORT_SYMBOL(ptlrpc_invalidate_import);
396
397 /* unset imp_invalid */
398 void ptlrpc_activate_import(struct obd_import *imp)
399 {
400         struct obd_device *obd = imp->imp_obd;
401
402         spin_lock(&imp->imp_lock);
403         if (imp->imp_deactive != 0) {
404                 spin_unlock(&imp->imp_lock);
405                 return;
406         }
407
408         imp->imp_invalid = 0;
409         spin_unlock(&imp->imp_lock);
410         obd_import_event(obd, imp, IMP_EVENT_ACTIVE);
411 }
412 EXPORT_SYMBOL(ptlrpc_activate_import);
413
414 void ptlrpc_pinger_force(struct obd_import *imp)
415 {
416         CDEBUG(D_HA, "%s: waking up pinger s:%s\n", obd2cli_tgt(imp->imp_obd),
417                ptlrpc_import_state_name(imp->imp_state));
418
419         spin_lock(&imp->imp_lock);
420         imp->imp_force_verify = 1;
421         spin_unlock(&imp->imp_lock);
422
423         if (imp->imp_state != LUSTRE_IMP_CONNECTING)
424                 ptlrpc_pinger_wake_up();
425 }
426 EXPORT_SYMBOL(ptlrpc_pinger_force);
427
428 void ptlrpc_fail_import(struct obd_import *imp, __u32 conn_cnt)
429 {
430         ENTRY;
431
432         LASSERT(!imp->imp_dlm_fake);
433
434         if (ptlrpc_set_import_discon(imp, conn_cnt)) {
435                 if (!imp->imp_replayable) {
436                         CDEBUG(D_HA, "import %s@%s for %s not replayable, "
437                                "auto-deactivating\n",
438                                obd2cli_tgt(imp->imp_obd),
439                                imp->imp_connection->c_remote_uuid.uuid,
440                                imp->imp_obd->obd_name);
441                         ptlrpc_deactivate_import(imp);
442                 }
443
444                 ptlrpc_pinger_force(imp);
445         }
446         EXIT;
447 }
448
449 int ptlrpc_reconnect_import(struct obd_import *imp)
450 {
451 #ifdef ENABLE_PINGER
452         long timeout_jiffies = cfs_time_seconds(obd_timeout);
453         struct l_wait_info lwi;
454         int rc;
455
456         ptlrpc_pinger_force(imp);
457
458         CDEBUG(D_HA, "%s: recovery started, waiting %u seconds\n",
459                obd2cli_tgt(imp->imp_obd), obd_timeout);
460
461         lwi = LWI_TIMEOUT(timeout_jiffies, NULL, NULL);
462         rc = l_wait_event(imp->imp_recovery_waitq,
463                           !ptlrpc_import_in_recovery(imp), &lwi);
464         CDEBUG(D_HA, "%s: recovery finished s:%s\n", obd2cli_tgt(imp->imp_obd),
465                ptlrpc_import_state_name(imp->imp_state));
466         return rc;
467 #else
468         ptlrpc_set_import_discon(imp, 0);
469         /* Force a new connect attempt */
470         ptlrpc_invalidate_import(imp);
471         /* Do a fresh connect next time by zeroing the handle */
472         ptlrpc_disconnect_import(imp, 1);
473         /* Wait for all invalidate calls to finish */
474         if (atomic_read(&imp->imp_inval_count) > 0) {
475                 struct l_wait_info lwi = LWI_INTR(LWI_ON_SIGNAL_NOOP, NULL);
476                 int rc;
477
478                 rc = l_wait_event(imp->imp_recovery_waitq,
479                                   (atomic_read(&imp->imp_inval_count) == 0),
480                                   &lwi);
481                 if (rc)
482                         CERROR("Interrupted, inval=%d\n",
483                                atomic_read(&imp->imp_inval_count));
484         }
485
486         /* Allow reconnect attempts */
487         imp->imp_obd->obd_no_recov = 0;
488         /* Remove 'invalid' flag */
489         ptlrpc_activate_import(imp);
490         /* Attempt a new connect */
491         ptlrpc_recover_import(imp, NULL, 0);
492         return 0;
493 #endif
494 }
495 EXPORT_SYMBOL(ptlrpc_reconnect_import);
496
497 /**
498  * Connection on import \a imp is changed to another one (if more than one is
499  * present). We typically chose connection that we have not tried to connect to
500  * the longest
501  */
502 static int import_select_connection(struct obd_import *imp)
503 {
504         struct obd_import_conn *imp_conn = NULL, *conn;
505         struct obd_export *dlmexp;
506         char *target_start;
507         int target_len, tried_all = 1;
508         ENTRY;
509
510         spin_lock(&imp->imp_lock);
511
512         if (list_empty(&imp->imp_conn_list)) {
513                 CERROR("%s: no connections available\n",
514                        imp->imp_obd->obd_name);
515                 spin_unlock(&imp->imp_lock);
516                 RETURN(-EINVAL);
517         }
518
519         list_for_each_entry(conn, &imp->imp_conn_list, oic_item) {
520                 CDEBUG(D_HA, "%s: connect to NID %s last attempt %lld\n",
521                        imp->imp_obd->obd_name,
522                        libcfs_nid2str(conn->oic_conn->c_peer.nid),
523                        conn->oic_last_attempt);
524
525                 /* If we have not tried this connection since
526                    the last successful attempt, go with this one */
527                 if ((conn->oic_last_attempt == 0) ||
528                     conn->oic_last_attempt <= imp->imp_last_success_conn) {
529                         imp_conn = conn;
530                         tried_all = 0;
531                         break;
532                 }
533
534                 /* If all of the connections have already been tried
535                    since the last successful connection; just choose the
536                    least recently used */
537                 if (!imp_conn)
538                         imp_conn = conn;
539                 else if (imp_conn->oic_last_attempt > conn->oic_last_attempt)
540                         imp_conn = conn;
541         }
542
543         /* if not found, simply choose the current one */
544         if (!imp_conn || imp->imp_force_reconnect) {
545                 LASSERT(imp->imp_conn_current);
546                 imp_conn = imp->imp_conn_current;
547                 tried_all = 0;
548         }
549         LASSERT(imp_conn->oic_conn);
550
551         /* If we've tried everything, and we're back to the beginning of the
552            list, increase our timeout and try again. It will be reset when
553            we do finally connect. (FIXME: really we should wait for all network
554            state associated with the last connection attempt to drain before
555            trying to reconnect on it.) */
556         if (tried_all && (imp->imp_conn_list.next == &imp_conn->oic_item)) {
557                 struct adaptive_timeout *at = &imp->imp_at.iat_net_latency;
558                 if (at_get(at) < CONNECTION_SWITCH_MAX) {
559                         at_measured(at, at_get(at) + CONNECTION_SWITCH_INC);
560                         if (at_get(at) > CONNECTION_SWITCH_MAX)
561                                 at_reset(at, CONNECTION_SWITCH_MAX);
562                 }
563                 LASSERT(imp_conn->oic_last_attempt);
564                 CDEBUG(D_HA, "%s: tried all connections, increasing latency "
565                         "to %ds\n", imp->imp_obd->obd_name, at_get(at));
566         }
567
568         imp_conn->oic_last_attempt = ktime_get_seconds();
569
570         /* switch connection, don't mind if it's same as the current one */
571         if (imp->imp_connection)
572                 ptlrpc_connection_put(imp->imp_connection);
573         imp->imp_connection = ptlrpc_connection_addref(imp_conn->oic_conn);
574
575         dlmexp =  class_conn2export(&imp->imp_dlm_handle);
576         LASSERT(dlmexp != NULL);
577         if (dlmexp->exp_connection)
578                 ptlrpc_connection_put(dlmexp->exp_connection);
579         dlmexp->exp_connection = ptlrpc_connection_addref(imp_conn->oic_conn);
580         class_export_put(dlmexp);
581
582         if (imp->imp_conn_current != imp_conn) {
583                 if (imp->imp_conn_current) {
584                         deuuidify(obd2cli_tgt(imp->imp_obd), NULL,
585                                   &target_start, &target_len);
586
587                         CDEBUG(D_HA, "%s: Connection changing to"
588                                " %.*s (at %s)\n",
589                                imp->imp_obd->obd_name,
590                                target_len, target_start,
591                                libcfs_nid2str(imp_conn->oic_conn->c_peer.nid));
592                 }
593
594                 imp->imp_conn_current = imp_conn;
595         }
596
597         CDEBUG(D_HA, "%s: import %p using connection %s/%s\n",
598                imp->imp_obd->obd_name, imp, imp_conn->oic_uuid.uuid,
599                libcfs_nid2str(imp_conn->oic_conn->c_peer.nid));
600
601         spin_unlock(&imp->imp_lock);
602
603         RETURN(0);
604 }
605
606 /*
607  * must be called under imp_lock
608  */
609 static int ptlrpc_first_transno(struct obd_import *imp, __u64 *transno)
610 {
611         struct ptlrpc_request   *req;
612         struct list_head        *tmp;
613
614         /* The requests in committed_list always have smaller transnos than
615          * the requests in replay_list */
616         if (!list_empty(&imp->imp_committed_list)) {
617                 tmp = imp->imp_committed_list.next;
618                 req = list_entry(tmp, struct ptlrpc_request, rq_replay_list);
619                 *transno = req->rq_transno;
620                 if (req->rq_transno == 0) {
621                         DEBUG_REQ(D_ERROR, req, "zero transno in committed_list");
622                         LBUG();
623                 }
624                 return 1;
625         }
626         if (!list_empty(&imp->imp_replay_list)) {
627                 tmp = imp->imp_replay_list.next;
628                 req = list_entry(tmp, struct ptlrpc_request, rq_replay_list);
629                 *transno = req->rq_transno;
630                 if (req->rq_transno == 0) {
631                         DEBUG_REQ(D_ERROR, req, "zero transno in replay_list");
632                         LBUG();
633                 }
634                 return 1;
635         }
636         return 0;
637 }
638
639 /**
640  * Attempt to (re)connect import \a imp. This includes all preparations,
641  * initializing CONNECT RPC request and passing it to ptlrpcd for
642  * actual sending.
643  * Returns 0 on success or error code.
644  */
645 int ptlrpc_connect_import(struct obd_import *imp)
646 {
647         struct obd_device *obd = imp->imp_obd;
648         int initial_connect = 0;
649         int set_transno = 0;
650         __u64 committed_before_reconnect = 0;
651         struct ptlrpc_request *request;
652         char *bufs[] = { NULL,
653                          obd2cli_tgt(imp->imp_obd),
654                          obd->obd_uuid.uuid,
655                          (char *)&imp->imp_dlm_handle,
656                          (char *)&imp->imp_connect_data };
657         struct ptlrpc_connect_async_args *aa;
658         int rc;
659         ENTRY;
660
661         spin_lock(&imp->imp_lock);
662         if (imp->imp_state == LUSTRE_IMP_CLOSED) {
663                 spin_unlock(&imp->imp_lock);
664                 CERROR("can't connect to a closed import\n");
665                 RETURN(-EINVAL);
666         } else if (imp->imp_state == LUSTRE_IMP_FULL) {
667                 spin_unlock(&imp->imp_lock);
668                 CERROR("already connected\n");
669                 RETURN(0);
670         } else if (imp->imp_state == LUSTRE_IMP_CONNECTING ||
671                    imp->imp_connected) {
672                 spin_unlock(&imp->imp_lock);
673                 CERROR("already connecting\n");
674                 RETURN(-EALREADY);
675         }
676
677         IMPORT_SET_STATE_NOLOCK(imp, LUSTRE_IMP_CONNECTING);
678
679         imp->imp_conn_cnt++;
680         imp->imp_resend_replay = 0;
681
682         if (!lustre_handle_is_used(&imp->imp_remote_handle))
683                 initial_connect = 1;
684         else
685                 committed_before_reconnect = imp->imp_peer_committed_transno;
686
687         set_transno = ptlrpc_first_transno(imp,
688                                            &imp->imp_connect_data.ocd_transno);
689         spin_unlock(&imp->imp_lock);
690
691         rc = import_select_connection(imp);
692         if (rc)
693                 GOTO(out, rc);
694
695         rc = sptlrpc_import_sec_adapt(imp, NULL, NULL);
696         if (rc)
697                 GOTO(out, rc);
698
699         /* Reset connect flags to the originally requested flags, in case
700          * the server is updated on-the-fly we will get the new features. */
701         imp->imp_connect_data.ocd_connect_flags = imp->imp_connect_flags_orig;
702         imp->imp_connect_data.ocd_connect_flags2 = imp->imp_connect_flags2_orig;
703         /* Reset ocd_version each time so the server knows the exact versions */
704         imp->imp_connect_data.ocd_version = LUSTRE_VERSION_CODE;
705         imp->imp_msghdr_flags &= ~MSGHDR_AT_SUPPORT;
706         imp->imp_msghdr_flags &= ~MSGHDR_CKSUM_INCOMPAT18;
707
708         rc = obd_reconnect(NULL, imp->imp_obd->obd_self_export, obd,
709                            &obd->obd_uuid, &imp->imp_connect_data, NULL);
710         if (rc)
711                 GOTO(out, rc);
712
713         request = ptlrpc_request_alloc(imp, &RQF_MDS_CONNECT);
714         if (request == NULL)
715                 GOTO(out, rc = -ENOMEM);
716
717         rc = ptlrpc_request_bufs_pack(request, LUSTRE_OBD_VERSION,
718                                       imp->imp_connect_op, bufs, NULL);
719         if (rc) {
720                 ptlrpc_request_free(request);
721                 GOTO(out, rc);
722         }
723
724         /* Report the rpc service time to the server so that it knows how long
725          * to wait for clients to join recovery */
726         lustre_msg_set_service_time(request->rq_reqmsg,
727                                     at_timeout2est(request->rq_timeout));
728
729         /* The amount of time we give the server to process the connect req.
730          * import_select_connection will increase the net latency on
731          * repeated reconnect attempts to cover slow networks.
732          * We override/ignore the server rpc completion estimate here,
733          * which may be large if this is a reconnect attempt */
734         request->rq_timeout = INITIAL_CONNECT_TIMEOUT;
735         lustre_msg_set_timeout(request->rq_reqmsg, request->rq_timeout);
736
737         request->rq_no_resend = request->rq_no_delay = 1;
738         request->rq_send_state = LUSTRE_IMP_CONNECTING;
739         /* Allow a slightly larger reply for future growth compatibility */
740         req_capsule_set_size(&request->rq_pill, &RMF_CONNECT_DATA, RCL_SERVER,
741                              sizeof(struct obd_connect_data)+16*sizeof(__u64));
742         ptlrpc_request_set_replen(request);
743         request->rq_interpret_reply = ptlrpc_connect_interpret;
744
745         CLASSERT(sizeof(*aa) <= sizeof(request->rq_async_args));
746         aa = ptlrpc_req_async_args(request);
747         memset(aa, 0, sizeof *aa);
748
749         aa->pcaa_peer_committed = committed_before_reconnect;
750         aa->pcaa_initial_connect = initial_connect;
751
752         if (aa->pcaa_initial_connect) {
753                 spin_lock(&imp->imp_lock);
754                 imp->imp_replayable = 1;
755                 spin_unlock(&imp->imp_lock);
756                 lustre_msg_add_op_flags(request->rq_reqmsg,
757                                         MSG_CONNECT_INITIAL);
758         }
759
760         if (set_transno)
761                 lustre_msg_add_op_flags(request->rq_reqmsg,
762                                         MSG_CONNECT_TRANSNO);
763
764         DEBUG_REQ(D_RPCTRACE, request, "(re)connect request (timeout %ld)",
765                   request->rq_timeout);
766         ptlrpcd_add_req(request);
767         rc = 0;
768 out:
769         if (rc != 0)
770                 IMPORT_SET_STATE(imp, LUSTRE_IMP_DISCON);
771
772         RETURN(rc);
773 }
774 EXPORT_SYMBOL(ptlrpc_connect_import);
775
776 static void ptlrpc_maybe_ping_import_soon(struct obd_import *imp)
777 {
778         int force_verify;
779
780         spin_lock(&imp->imp_lock);
781         force_verify = imp->imp_force_verify != 0;
782         spin_unlock(&imp->imp_lock);
783
784         if (force_verify)
785                 ptlrpc_pinger_wake_up();
786 }
787
788 static int ptlrpc_busy_reconnect(int rc)
789 {
790         return (rc == -EBUSY) || (rc == -EAGAIN);
791 }
792
793 static int ptlrpc_connect_set_flags(struct obd_import *imp,
794                                     struct obd_connect_data *ocd,
795                                     __u64 old_connect_flags,
796                                     struct obd_export *exp, int init_connect)
797 {
798         static bool warned;
799         struct client_obd *cli = &imp->imp_obd->u.cli;
800
801         spin_lock(&imp->imp_lock);
802         list_del(&imp->imp_conn_current->oic_item);
803         list_add(&imp->imp_conn_current->oic_item,
804                  &imp->imp_conn_list);
805         imp->imp_last_success_conn =
806                 imp->imp_conn_current->oic_last_attempt;
807
808         spin_unlock(&imp->imp_lock);
809
810         if (!warned && (ocd->ocd_connect_flags & OBD_CONNECT_VERSION) &&
811             (ocd->ocd_version > LUSTRE_VERSION_CODE +
812                                 LUSTRE_VERSION_OFFSET_WARN ||
813              ocd->ocd_version < LUSTRE_VERSION_CODE -
814                                 LUSTRE_VERSION_OFFSET_WARN)) {
815                 /* Sigh, some compilers do not like #ifdef in the middle
816                    of macro arguments */
817                 const char *older = "older than client. "
818                                     "Consider upgrading server";
819                 const char *newer = "newer than client. "
820                                     "Consider upgrading client";
821
822                 LCONSOLE_WARN("Server %s version (%d.%d.%d.%d) "
823                               "is much %s (%s)\n",
824                               obd2cli_tgt(imp->imp_obd),
825                               OBD_OCD_VERSION_MAJOR(ocd->ocd_version),
826                               OBD_OCD_VERSION_MINOR(ocd->ocd_version),
827                               OBD_OCD_VERSION_PATCH(ocd->ocd_version),
828                               OBD_OCD_VERSION_FIX(ocd->ocd_version),
829                               ocd->ocd_version > LUSTRE_VERSION_CODE ?
830                               newer : older, LUSTRE_VERSION_STRING);
831                 warned = true;
832         }
833
834         if (ocd->ocd_connect_flags & OBD_CONNECT_CKSUM) {
835                 /* We sent to the server ocd_cksum_types with bits set
836                  * for algorithms we understand. The server masked off
837                  * the checksum types it doesn't support */
838                 if ((ocd->ocd_cksum_types &
839                      obd_cksum_types_supported_client()) == 0) {
840                         LCONSOLE_ERROR("The negotiation of the checksum "
841                                        "alogrithm to use with server %s "
842                                        "failed (%x/%x)\n",
843                                        obd2cli_tgt(imp->imp_obd),
844                                        ocd->ocd_cksum_types,
845                                        obd_cksum_types_supported_client());
846                         return -EPROTO;
847                 } else {
848                         cli->cl_supp_cksum_types = ocd->ocd_cksum_types;
849                 }
850         } else {
851                 /* The server does not support OBD_CONNECT_CKSUM.
852                  * Enforce ADLER for backward compatibility*/
853                 cli->cl_supp_cksum_types = OBD_CKSUM_ADLER;
854         }
855         cli->cl_cksum_type = obd_cksum_type_select(imp->imp_obd->obd_name,
856                                                    cli->cl_supp_cksum_types);
857
858         if (ocd->ocd_connect_flags & OBD_CONNECT_BRW_SIZE)
859                 cli->cl_max_pages_per_rpc =
860                         min(ocd->ocd_brw_size >> PAGE_SHIFT,
861                             cli->cl_max_pages_per_rpc);
862         else if (imp->imp_connect_op == MDS_CONNECT ||
863                  imp->imp_connect_op == MGS_CONNECT)
864                 cli->cl_max_pages_per_rpc = 1;
865
866         LASSERT((cli->cl_max_pages_per_rpc <= PTLRPC_MAX_BRW_PAGES) &&
867                 (cli->cl_max_pages_per_rpc > 0));
868
869         client_adjust_max_dirty(cli);
870
871         /* Update client max modify RPCs in flight with value returned
872          * by the server */
873         if (ocd->ocd_connect_flags & OBD_CONNECT_MULTIMODRPCS)
874                 cli->cl_max_mod_rpcs_in_flight = min(
875                                         cli->cl_max_mod_rpcs_in_flight,
876                                         ocd->ocd_maxmodrpcs);
877         else
878                 cli->cl_max_mod_rpcs_in_flight = 1;
879
880         /* Reset ns_connect_flags only for initial connect. It might be
881          * changed in while using FS and if we reset it in reconnect
882          * this leads to losing user settings done before such as
883          * disable lru_resize, etc. */
884         if (old_connect_flags != exp_connect_flags(exp) || init_connect) {
885                 CDEBUG(D_HA, "%s: Resetting ns_connect_flags to server "
886                              "flags: %#llx\n", imp->imp_obd->obd_name,
887                              ocd->ocd_connect_flags);
888                 imp->imp_obd->obd_namespace->ns_connect_flags =
889                         ocd->ocd_connect_flags;
890                 imp->imp_obd->obd_namespace->ns_orig_connect_flags =
891                         ocd->ocd_connect_flags;
892         }
893
894         if (ocd->ocd_connect_flags & OBD_CONNECT_AT)
895                 /* We need a per-message support flag, because
896                  * a. we don't know if the incoming connect reply
897                  *    supports AT or not (in reply_in_callback)
898                  *    until we unpack it.
899                  * b. failovered server means export and flags are gone
900                  *    (in ptlrpc_send_reply).
901                  *    Can only be set when we know AT is supported at
902                  *    both ends */
903                 imp->imp_msghdr_flags |= MSGHDR_AT_SUPPORT;
904         else
905                 imp->imp_msghdr_flags &= ~MSGHDR_AT_SUPPORT;
906
907         imp->imp_msghdr_flags |= MSGHDR_CKSUM_INCOMPAT18;
908
909         return 0;
910 }
911
912 /**
913  * Add all replay requests back to unreplied list before start replay,
914  * so that we can make sure the known replied XID is always increased
915  * only even if when replaying requests.
916  */
917 static void ptlrpc_prepare_replay(struct obd_import *imp)
918 {
919         struct ptlrpc_request *req;
920
921         if (imp->imp_state != LUSTRE_IMP_REPLAY ||
922             imp->imp_resend_replay)
923                 return;
924
925         /* If the server was restart during repaly, the requests may
926          * have been added to the unreplied list in former replay. */
927         spin_lock(&imp->imp_lock);
928
929         list_for_each_entry(req, &imp->imp_committed_list, rq_replay_list) {
930                 if (list_empty(&req->rq_unreplied_list))
931                         ptlrpc_add_unreplied(req);
932         }
933
934         list_for_each_entry(req, &imp->imp_replay_list, rq_replay_list) {
935                 if (list_empty(&req->rq_unreplied_list))
936                         ptlrpc_add_unreplied(req);
937         }
938
939         imp->imp_known_replied_xid = ptlrpc_known_replied_xid(imp);
940         spin_unlock(&imp->imp_lock);
941 }
942
943 /**
944  * interpret_reply callback for connect RPCs.
945  * Looks into returned status of connect operation and decides
946  * what to do with the import - i.e enter recovery, promote it to
947  * full state for normal operations of disconnect it due to an error.
948  */
949 static int ptlrpc_connect_interpret(const struct lu_env *env,
950                                     struct ptlrpc_request *request,
951                                     void *data, int rc)
952 {
953         struct ptlrpc_connect_async_args *aa = data;
954         struct obd_import *imp = request->rq_import;
955         struct lustre_handle old_hdl;
956         __u64 old_connect_flags;
957         int msg_flags;
958         struct obd_connect_data *ocd;
959         struct obd_export *exp = NULL;
960         int ret;
961         ENTRY;
962
963         spin_lock(&imp->imp_lock);
964         if (imp->imp_state == LUSTRE_IMP_CLOSED) {
965                 imp->imp_connect_tried = 1;
966                 spin_unlock(&imp->imp_lock);
967                 RETURN(0);
968         }
969
970         if (rc) {
971                 /* if this reconnect to busy export - not need select new target
972                  * for connecting*/
973                 imp->imp_force_reconnect = ptlrpc_busy_reconnect(rc);
974                 spin_unlock(&imp->imp_lock);
975                 ptlrpc_maybe_ping_import_soon(imp);
976                 GOTO(out, rc);
977         }
978
979         /* LU-7558: indicate that we are interpretting connect reply,
980          * pltrpc_connect_import() will not try to reconnect until
981          * interpret will finish. */
982         imp->imp_connected = 1;
983         spin_unlock(&imp->imp_lock);
984
985         LASSERT(imp->imp_conn_current);
986
987         msg_flags = lustre_msg_get_op_flags(request->rq_repmsg);
988
989         ret = req_capsule_get_size(&request->rq_pill, &RMF_CONNECT_DATA,
990                                    RCL_SERVER);
991         /* server replied obd_connect_data is always bigger */
992         ocd = req_capsule_server_sized_get(&request->rq_pill,
993                                            &RMF_CONNECT_DATA, ret);
994
995         if (ocd == NULL) {
996                 CERROR("%s: no connect data from server\n",
997                        imp->imp_obd->obd_name);
998                 rc = -EPROTO;
999                 GOTO(out, rc);
1000         }
1001
1002         spin_lock(&imp->imp_lock);
1003
1004         /* All imports are pingable */
1005         imp->imp_pingable = 1;
1006         imp->imp_force_reconnect = 0;
1007         imp->imp_force_verify = 0;
1008
1009         imp->imp_connect_data = *ocd;
1010
1011         CDEBUG(D_HA, "%s: connect to target with instance %u\n",
1012                imp->imp_obd->obd_name, ocd->ocd_instance);
1013         exp = class_conn2export(&imp->imp_dlm_handle);
1014
1015         spin_unlock(&imp->imp_lock);
1016
1017         if (!exp) {
1018                 /* This could happen if export is cleaned during the
1019                    connect attempt */
1020                 CERROR("%s: missing export after connect\n",
1021                        imp->imp_obd->obd_name);
1022                 GOTO(out, rc = -ENODEV);
1023         }
1024
1025         /* check that server granted subset of flags we asked for. */
1026         if ((ocd->ocd_connect_flags & imp->imp_connect_flags_orig) !=
1027             ocd->ocd_connect_flags) {
1028                 CERROR("%s: Server didn't grant requested subset of flags: "
1029                        "asked=%#llx granted=%#llx\n",
1030                        imp->imp_obd->obd_name, imp->imp_connect_flags_orig,
1031                        ocd->ocd_connect_flags);
1032                 GOTO(out, rc = -EPROTO);
1033         }
1034
1035         if ((ocd->ocd_connect_flags2 & imp->imp_connect_flags2_orig) !=
1036             ocd->ocd_connect_flags2) {
1037                 CERROR("%s: Server didn't grant requested subset of flags2: "
1038                        "asked=%#llx granted=%#llx\n",
1039                        imp->imp_obd->obd_name, imp->imp_connect_flags2_orig,
1040                        ocd->ocd_connect_flags2);
1041                 GOTO(out, rc = -EPROTO);
1042         }
1043
1044         if (!(imp->imp_connect_flags_orig & OBD_CONNECT_LIGHTWEIGHT) &&
1045             (imp->imp_connect_flags_orig & OBD_CONNECT_MDS_MDS) &&
1046             (imp->imp_connect_flags_orig & OBD_CONNECT_FID) &&
1047             (ocd->ocd_connect_flags & OBD_CONNECT_VERSION)) {
1048                 __u32 major = OBD_OCD_VERSION_MAJOR(ocd->ocd_version);
1049                 __u32 minor = OBD_OCD_VERSION_MINOR(ocd->ocd_version);
1050                 __u32 patch = OBD_OCD_VERSION_PATCH(ocd->ocd_version);
1051
1052                 /* We do not support the MDT-MDT interoperations with
1053                  * different version MDT because of protocol changes. */
1054                 if (unlikely(major != LUSTRE_MAJOR ||
1055                              minor != LUSTRE_MINOR ||
1056                              abs(patch - LUSTRE_PATCH) > 3)) {
1057                         LCONSOLE_WARN("%s: import %p (%u.%u.%u.%u) tried the "
1058                                       "connection to different version MDT "
1059                                       "(%d.%d.%d.%d) %s\n",
1060                                       imp->imp_obd->obd_name, imp, LUSTRE_MAJOR,
1061                                       LUSTRE_MINOR, LUSTRE_PATCH, LUSTRE_FIX,
1062                                       major, minor, patch,
1063                                       OBD_OCD_VERSION_FIX(ocd->ocd_version),
1064                                       imp->imp_connection->c_remote_uuid.uuid);
1065
1066                         GOTO(out, rc = -EPROTO);
1067                 }
1068         }
1069
1070         old_connect_flags = exp_connect_flags(exp);
1071         exp->exp_connect_data = *ocd;
1072         imp->imp_obd->obd_self_export->exp_connect_data = *ocd;
1073
1074         /* The net statistics after (re-)connect is not valid anymore,
1075          * because may reflect other routing, etc. */
1076         at_reinit(&imp->imp_at.iat_net_latency, 0, 0);
1077         ptlrpc_at_adj_net_latency(request,
1078                         lustre_msg_get_service_time(request->rq_repmsg));
1079
1080         /* Import flags should be updated before waking import at FULL state */
1081         rc = ptlrpc_connect_set_flags(imp, ocd, old_connect_flags, exp,
1082                                       aa->pcaa_initial_connect);
1083         class_export_put(exp);
1084         exp = NULL;
1085
1086         if (rc != 0)
1087                 GOTO(out, rc);
1088
1089         obd_import_event(imp->imp_obd, imp, IMP_EVENT_OCD);
1090
1091         if (aa->pcaa_initial_connect) {
1092                 spin_lock(&imp->imp_lock);
1093                 if (msg_flags & MSG_CONNECT_REPLAYABLE) {
1094                         imp->imp_replayable = 1;
1095                         spin_unlock(&imp->imp_lock);
1096                         CDEBUG(D_HA, "connected to replayable target: %s\n",
1097                                obd2cli_tgt(imp->imp_obd));
1098                 } else {
1099                         imp->imp_replayable = 0;
1100                         spin_unlock(&imp->imp_lock);
1101                 }
1102
1103                 /* if applies, adjust the imp->imp_msg_magic here
1104                  * according to reply flags */
1105
1106                 imp->imp_remote_handle =
1107                                 *lustre_msg_get_handle(request->rq_repmsg);
1108
1109                 /* Initial connects are allowed for clients with non-random
1110                  * uuids when servers are in recovery.  Simply signal the
1111                  * servers replay is complete and wait in REPLAY_WAIT. */
1112                 if (msg_flags & MSG_CONNECT_RECOVERING) {
1113                         CDEBUG(D_HA, "connect to %s during recovery\n",
1114                                obd2cli_tgt(imp->imp_obd));
1115                         IMPORT_SET_STATE(imp, LUSTRE_IMP_REPLAY_LOCKS);
1116                 } else {
1117                         IMPORT_SET_STATE(imp, LUSTRE_IMP_FULL);
1118                         ptlrpc_activate_import(imp);
1119                 }
1120
1121                 GOTO(finish, rc = 0);
1122         }
1123
1124         /* Determine what recovery state to move the import to. */
1125         if (MSG_CONNECT_RECONNECT & msg_flags) {
1126                 memset(&old_hdl, 0, sizeof(old_hdl));
1127                 if (!memcmp(&old_hdl, lustre_msg_get_handle(request->rq_repmsg),
1128                             sizeof (old_hdl))) {
1129                         LCONSOLE_WARN("Reconnect to %s (at @%s) failed due "
1130                                       "bad handle %#llx\n",
1131                                       obd2cli_tgt(imp->imp_obd),
1132                                       imp->imp_connection->c_remote_uuid.uuid,
1133                                       imp->imp_dlm_handle.cookie);
1134                         GOTO(out, rc = -ENOTCONN);
1135                 }
1136
1137                 if (memcmp(&imp->imp_remote_handle,
1138                            lustre_msg_get_handle(request->rq_repmsg),
1139                            sizeof(imp->imp_remote_handle))) {
1140                         int level = msg_flags & MSG_CONNECT_RECOVERING ?
1141                                 D_HA : D_WARNING;
1142
1143                         /* Bug 16611/14775: if server handle have changed,
1144                          * that means some sort of disconnection happened.
1145                          * If the server is not in recovery, that also means it
1146                          * already erased all of our state because of previous
1147                          * eviction. If it is in recovery - we are safe to
1148                          * participate since we can reestablish all of our state
1149                          * with server again */
1150                         if ((MSG_CONNECT_RECOVERING & msg_flags)) {
1151                                 CDEBUG(level,"%s@%s changed server handle from "
1152                                        "%#llx to %#llx"
1153                                        " but is still in recovery\n",
1154                                        obd2cli_tgt(imp->imp_obd),
1155                                        imp->imp_connection->c_remote_uuid.uuid,
1156                                        imp->imp_remote_handle.cookie,
1157                                        lustre_msg_get_handle(
1158                                        request->rq_repmsg)->cookie);
1159                         } else {
1160                                 LCONSOLE_WARN("Evicted from %s (at %s) "
1161                                               "after server handle changed from "
1162                                               "%#llx to %#llx\n",
1163                                               obd2cli_tgt(imp->imp_obd),
1164                                               imp->imp_connection-> \
1165                                               c_remote_uuid.uuid,
1166                                               imp->imp_remote_handle.cookie,
1167                                               lustre_msg_get_handle(
1168                                               request->rq_repmsg)->cookie);
1169                         }
1170
1171
1172                         imp->imp_remote_handle =
1173                                      *lustre_msg_get_handle(request->rq_repmsg);
1174
1175                         if (!(MSG_CONNECT_RECOVERING & msg_flags)) {
1176                                 IMPORT_SET_STATE(imp, LUSTRE_IMP_EVICTED);
1177                                 GOTO(finish, rc = 0);
1178                         }
1179
1180                 } else {
1181                         CDEBUG(D_HA, "reconnected to %s@%s after partition\n",
1182                                obd2cli_tgt(imp->imp_obd),
1183                                imp->imp_connection->c_remote_uuid.uuid);
1184                 }
1185
1186                 if (imp->imp_invalid) {
1187                         CDEBUG(D_HA, "%s: reconnected but import is invalid; "
1188                                "marking evicted\n", imp->imp_obd->obd_name);
1189                         IMPORT_SET_STATE(imp, LUSTRE_IMP_EVICTED);
1190                 } else if (MSG_CONNECT_RECOVERING & msg_flags) {
1191                         CDEBUG(D_HA, "%s: reconnected to %s during replay\n",
1192                                imp->imp_obd->obd_name,
1193                                obd2cli_tgt(imp->imp_obd));
1194
1195                         spin_lock(&imp->imp_lock);
1196                         imp->imp_resend_replay = 1;
1197                         spin_unlock(&imp->imp_lock);
1198
1199                         IMPORT_SET_STATE(imp, imp->imp_replay_state);
1200                 } else {
1201                         IMPORT_SET_STATE(imp, LUSTRE_IMP_RECOVER);
1202                 }
1203         } else if ((MSG_CONNECT_RECOVERING & msg_flags) && !imp->imp_invalid) {
1204                 LASSERT(imp->imp_replayable);
1205                 imp->imp_remote_handle =
1206                                 *lustre_msg_get_handle(request->rq_repmsg);
1207                 imp->imp_last_replay_transno = 0;
1208                 imp->imp_replay_cursor = &imp->imp_committed_list;
1209                 IMPORT_SET_STATE(imp, LUSTRE_IMP_REPLAY);
1210         } else {
1211                 DEBUG_REQ(D_HA, request, "%s: evicting (reconnect/recover flags"
1212                           " not set: %x)", imp->imp_obd->obd_name, msg_flags);
1213                 imp->imp_remote_handle =
1214                                 *lustre_msg_get_handle(request->rq_repmsg);
1215                 IMPORT_SET_STATE(imp, LUSTRE_IMP_EVICTED);
1216         }
1217
1218         /* Sanity checks for a reconnected import. */
1219         if (!(imp->imp_replayable) != !(msg_flags & MSG_CONNECT_REPLAYABLE)) {
1220                 CERROR("imp_replayable flag does not match server "
1221                        "after reconnect. We should LBUG right here.\n");
1222         }
1223
1224         if (lustre_msg_get_last_committed(request->rq_repmsg) > 0 &&
1225             lustre_msg_get_last_committed(request->rq_repmsg) <
1226             aa->pcaa_peer_committed) {
1227                 CERROR("%s went back in time (transno %lld"
1228                        " was previously committed, server now claims %lld"
1229                        ")!  See https://bugzilla.lustre.org/show_bug.cgi?"
1230                        "id=9646\n",
1231                        obd2cli_tgt(imp->imp_obd), aa->pcaa_peer_committed,
1232                        lustre_msg_get_last_committed(request->rq_repmsg));
1233         }
1234
1235 finish:
1236         ptlrpc_prepare_replay(imp);
1237         rc = ptlrpc_import_recovery_state_machine(imp);
1238         if (rc == -ENOTCONN) {
1239                 CDEBUG(D_HA, "evicted/aborted by %s@%s during recovery;"
1240                        "invalidating and reconnecting\n",
1241                        obd2cli_tgt(imp->imp_obd),
1242                        imp->imp_connection->c_remote_uuid.uuid);
1243                 ptlrpc_connect_import(imp);
1244                 spin_lock(&imp->imp_lock);
1245                 imp->imp_connected = 0;
1246                 imp->imp_connect_tried = 1;
1247                 spin_unlock(&imp->imp_lock);
1248                 RETURN(0);
1249         }
1250
1251 out:
1252         spin_lock(&imp->imp_lock);
1253         imp->imp_connected = 0;
1254         imp->imp_connect_tried = 1;
1255         spin_unlock(&imp->imp_lock);
1256
1257         if (exp != NULL)
1258                 class_export_put(exp);
1259
1260         if (rc != 0) {
1261                 IMPORT_SET_STATE(imp, LUSTRE_IMP_DISCON);
1262                 if (rc == -EACCES) {
1263                         /*
1264                          * Give up trying to reconnect
1265                          * EACCES means client has no permission for connection
1266                          */
1267                         imp->imp_obd->obd_no_recov = 1;
1268                         ptlrpc_deactivate_import(imp);
1269                 }
1270
1271                 if (rc == -EPROTO) {
1272                         struct obd_connect_data *ocd;
1273
1274                         /* reply message might not be ready */
1275                         if (request->rq_repmsg == NULL)
1276                                 RETURN(-EPROTO);
1277
1278                         ocd = req_capsule_server_get(&request->rq_pill,
1279                                                      &RMF_CONNECT_DATA);
1280                         /* Servers are not supposed to refuse connections from
1281                          * clients based on version, only connection feature
1282                          * flags.  We should never see this from llite, but it
1283                          * may be useful for debugging in the future. */
1284                         if (ocd &&
1285                             (ocd->ocd_connect_flags & OBD_CONNECT_VERSION) &&
1286                             (ocd->ocd_version != LUSTRE_VERSION_CODE)) {
1287                                 LCONSOLE_ERROR_MSG(0x16a, "Server %s version "
1288                                         "(%d.%d.%d.%d)"
1289                                         " refused connection from this client "
1290                                         "with an incompatible version (%s).  "
1291                                         "Client must be recompiled\n",
1292                                         obd2cli_tgt(imp->imp_obd),
1293                                         OBD_OCD_VERSION_MAJOR(ocd->ocd_version),
1294                                         OBD_OCD_VERSION_MINOR(ocd->ocd_version),
1295                                         OBD_OCD_VERSION_PATCH(ocd->ocd_version),
1296                                         OBD_OCD_VERSION_FIX(ocd->ocd_version),
1297                                         LUSTRE_VERSION_STRING);
1298                                 ptlrpc_deactivate_import(imp);
1299                                 IMPORT_SET_STATE(imp, LUSTRE_IMP_CLOSED);
1300                         }
1301                         RETURN(-EPROTO);
1302                 }
1303
1304                 ptlrpc_maybe_ping_import_soon(imp);
1305
1306                 CDEBUG(D_HA, "recovery of %s on %s failed (%d)\n",
1307                        obd2cli_tgt(imp->imp_obd),
1308                        (char *)imp->imp_connection->c_remote_uuid.uuid, rc);
1309         }
1310
1311         wake_up_all(&imp->imp_recovery_waitq);
1312         RETURN(rc);
1313 }
1314
1315 /**
1316  * interpret callback for "completed replay" RPCs.
1317  * \see signal_completed_replay
1318  */
1319 static int completed_replay_interpret(const struct lu_env *env,
1320                                       struct ptlrpc_request *req,
1321                                       void * data, int rc)
1322 {
1323         ENTRY;
1324         atomic_dec(&req->rq_import->imp_replay_inflight);
1325         if (req->rq_status == 0 &&
1326             !req->rq_import->imp_vbr_failed) {
1327                 ptlrpc_import_recovery_state_machine(req->rq_import);
1328         } else {
1329                 if (req->rq_import->imp_vbr_failed) {
1330                         CDEBUG(D_WARNING,
1331                                "%s: version recovery fails, reconnecting\n",
1332                                req->rq_import->imp_obd->obd_name);
1333                 } else {
1334                         CDEBUG(D_HA, "%s: LAST_REPLAY message error: %d, "
1335                                      "reconnecting\n",
1336                                req->rq_import->imp_obd->obd_name,
1337                                req->rq_status);
1338                 }
1339                 ptlrpc_connect_import(req->rq_import);
1340         }
1341
1342         RETURN(0);
1343 }
1344
1345 /**
1346  * Let server know that we have no requests to replay anymore.
1347  * Achieved by just sending a PING request
1348  */
1349 static int signal_completed_replay(struct obd_import *imp)
1350 {
1351         struct ptlrpc_request *req;
1352         ENTRY;
1353
1354         if (unlikely(OBD_FAIL_CHECK(OBD_FAIL_PTLRPC_FINISH_REPLAY)))
1355                 RETURN(0);
1356
1357         LASSERT(atomic_read(&imp->imp_replay_inflight) == 0);
1358         atomic_inc(&imp->imp_replay_inflight);
1359
1360         req = ptlrpc_request_alloc_pack(imp, &RQF_OBD_PING, LUSTRE_OBD_VERSION,
1361                                         OBD_PING);
1362         if (req == NULL) {
1363                 atomic_dec(&imp->imp_replay_inflight);
1364                 RETURN(-ENOMEM);
1365         }
1366
1367         ptlrpc_request_set_replen(req);
1368         req->rq_send_state = LUSTRE_IMP_REPLAY_WAIT;
1369         lustre_msg_add_flags(req->rq_reqmsg,
1370                              MSG_LOCK_REPLAY_DONE | MSG_REQ_REPLAY_DONE);
1371         if (AT_OFF)
1372                 req->rq_timeout *= 3;
1373         req->rq_interpret_reply = completed_replay_interpret;
1374
1375         ptlrpcd_add_req(req);
1376         RETURN(0);
1377 }
1378
1379 /**
1380  * In kernel code all import invalidation happens in its own
1381  * separate thread, so that whatever application happened to encounter
1382  * a problem could still be killed or otherwise continue
1383  */
1384 static int ptlrpc_invalidate_import_thread(void *data)
1385 {
1386         struct obd_import *imp = data;
1387
1388         ENTRY;
1389
1390         unshare_fs_struct();
1391
1392         CDEBUG(D_HA, "thread invalidate import %s to %s@%s\n",
1393                imp->imp_obd->obd_name, obd2cli_tgt(imp->imp_obd),
1394                imp->imp_connection->c_remote_uuid.uuid);
1395
1396         ptlrpc_invalidate_import(imp);
1397
1398         if (obd_dump_on_eviction) {
1399                 CERROR("dump the log upon eviction\n");
1400                 libcfs_debug_dumplog();
1401         }
1402
1403         IMPORT_SET_STATE(imp, LUSTRE_IMP_RECOVER);
1404         ptlrpc_import_recovery_state_machine(imp);
1405
1406         class_import_put(imp);
1407         RETURN(0);
1408 }
1409
1410 /**
1411  * This is the state machine for client-side recovery on import.
1412  *
1413  * Typicaly we have two possibly paths. If we came to server and it is not
1414  * in recovery, we just enter IMP_EVICTED state, invalidate our import
1415  * state and reconnect from scratch.
1416  * If we came to server that is in recovery, we enter IMP_REPLAY import state.
1417  * We go through our list of requests to replay and send them to server one by
1418  * one.
1419  * After sending all request from the list we change import state to
1420  * IMP_REPLAY_LOCKS and re-request all the locks we believe we have from server
1421  * and also all the locks we don't yet have and wait for server to grant us.
1422  * After that we send a special "replay completed" request and change import
1423  * state to IMP_REPLAY_WAIT.
1424  * Upon receiving reply to that "replay completed" RPC we enter IMP_RECOVER
1425  * state and resend all requests from sending list.
1426  * After that we promote import to FULL state and send all delayed requests
1427  * and import is fully operational after that.
1428  *
1429  */
1430 int ptlrpc_import_recovery_state_machine(struct obd_import *imp)
1431 {
1432         int rc = 0;
1433         int inflight;
1434         char *target_start;
1435         int target_len;
1436
1437         ENTRY;
1438         if (imp->imp_state == LUSTRE_IMP_EVICTED) {
1439                 deuuidify(obd2cli_tgt(imp->imp_obd), NULL,
1440                           &target_start, &target_len);
1441                 /* Don't care about MGC eviction */
1442                 if (strcmp(imp->imp_obd->obd_type->typ_name,
1443                            LUSTRE_MGC_NAME) != 0) {
1444                         LCONSOLE_ERROR_MSG(0x167, "%s: This client was evicted "
1445                                            "by %.*s; in progress operations "
1446                                            "using this service will fail.\n",
1447                                            imp->imp_obd->obd_name, target_len,
1448                                            target_start);
1449                 }
1450                 CDEBUG(D_HA, "evicted from %s@%s; invalidating\n",
1451                        obd2cli_tgt(imp->imp_obd),
1452                        imp->imp_connection->c_remote_uuid.uuid);
1453                 /* reset vbr_failed flag upon eviction */
1454                 spin_lock(&imp->imp_lock);
1455                 imp->imp_vbr_failed = 0;
1456                 spin_unlock(&imp->imp_lock);
1457
1458                 {
1459                 struct task_struct *task;
1460                 /* bug 17802:  XXX client_disconnect_export vs connect request
1461                  * race. if client is evicted at this time then we start
1462                  * invalidate thread without reference to import and import can
1463                  * be freed at same time. */
1464                 class_import_get(imp);
1465                 task = kthread_run(ptlrpc_invalidate_import_thread, imp,
1466                                      "ll_imp_inval");
1467                 if (IS_ERR(task)) {
1468                         class_import_put(imp);
1469                         CERROR("error starting invalidate thread: %d\n", rc);
1470                         rc = PTR_ERR(task);
1471                 } else {
1472                         rc = 0;
1473                 }
1474                 RETURN(rc);
1475                 }
1476         }
1477
1478         if (imp->imp_state == LUSTRE_IMP_REPLAY) {
1479                 CDEBUG(D_HA, "replay requested by %s\n",
1480                        obd2cli_tgt(imp->imp_obd));
1481                 rc = ptlrpc_replay_next(imp, &inflight);
1482                 if (inflight == 0 &&
1483                     atomic_read(&imp->imp_replay_inflight) == 0) {
1484                         IMPORT_SET_STATE(imp, LUSTRE_IMP_REPLAY_LOCKS);
1485                         rc = ldlm_replay_locks(imp);
1486                         if (rc)
1487                                 GOTO(out, rc);
1488                 }
1489                 rc = 0;
1490         }
1491
1492         if (imp->imp_state == LUSTRE_IMP_REPLAY_LOCKS) {
1493                 if (atomic_read(&imp->imp_replay_inflight) == 0) {
1494                         IMPORT_SET_STATE(imp, LUSTRE_IMP_REPLAY_WAIT);
1495                         rc = signal_completed_replay(imp);
1496                         if (rc)
1497                                 GOTO(out, rc);
1498                 }
1499         }
1500
1501         if (imp->imp_state == LUSTRE_IMP_REPLAY_WAIT) {
1502                 if (atomic_read(&imp->imp_replay_inflight) == 0) {
1503                         IMPORT_SET_STATE(imp, LUSTRE_IMP_RECOVER);
1504                 }
1505         }
1506
1507         if (imp->imp_state == LUSTRE_IMP_RECOVER) {
1508                 struct ptlrpc_connection *conn = imp->imp_connection;
1509
1510                 rc = ptlrpc_resend(imp);
1511                 if (rc)
1512                         GOTO(out, rc);
1513                 IMPORT_SET_STATE(imp, LUSTRE_IMP_FULL);
1514                 ptlrpc_activate_import(imp);
1515
1516                 LCONSOLE_INFO("%s: Connection restored to %s (at %s)\n",
1517                               imp->imp_obd->obd_name,
1518                               obd_uuid2str(&conn->c_remote_uuid),
1519                               obd_import_nid2str(imp));
1520         }
1521
1522         if (imp->imp_state == LUSTRE_IMP_FULL) {
1523                 wake_up_all(&imp->imp_recovery_waitq);
1524                 ptlrpc_wake_delayed(imp);
1525         }
1526
1527 out:
1528         RETURN(rc);
1529 }
1530
1531 int ptlrpc_disconnect_import(struct obd_import *imp, int noclose)
1532 {
1533         struct ptlrpc_request *req;
1534         int rq_opc, rc = 0;
1535         ENTRY;
1536
1537         if (imp->imp_obd->obd_force)
1538                 GOTO(set_state, rc);
1539
1540         switch (imp->imp_connect_op) {
1541         case OST_CONNECT:
1542                 rq_opc = OST_DISCONNECT;
1543                 break;
1544         case MDS_CONNECT:
1545                 rq_opc = MDS_DISCONNECT;
1546                 break;
1547         case MGS_CONNECT:
1548                 rq_opc = MGS_DISCONNECT;
1549                 break;
1550         default:
1551                 rc = -EINVAL;
1552                 CERROR("%s: don't know how to disconnect from %s "
1553                        "(connect_op %d): rc = %d\n",
1554                        imp->imp_obd->obd_name, obd2cli_tgt(imp->imp_obd),
1555                        imp->imp_connect_op, rc);
1556                 RETURN(rc);
1557         }
1558
1559         if (ptlrpc_import_in_recovery(imp)) {
1560                 struct l_wait_info lwi;
1561                 long timeout_jiffies;
1562                 time64_t timeout;
1563
1564                 if (AT_OFF) {
1565                         if (imp->imp_server_timeout)
1566                                 timeout = obd_timeout >> 1;
1567                         else
1568                                 timeout = obd_timeout;
1569                 } else {
1570                         u32 req_portal;
1571                         int idx;
1572
1573                         req_portal = imp->imp_client->cli_request_portal;
1574                         idx = import_at_get_index(imp, req_portal);
1575                         timeout = at_get(&imp->imp_at.iat_service_estimate[idx]);
1576                 }
1577
1578                 timeout_jiffies = cfs_time_seconds(timeout);
1579                 lwi = LWI_TIMEOUT_INTR(max_t(long, timeout_jiffies, 1),
1580                                        back_to_sleep, LWI_ON_SIGNAL_NOOP, NULL);
1581                 rc = l_wait_event(imp->imp_recovery_waitq,
1582                                   !ptlrpc_import_in_recovery(imp), &lwi);
1583
1584         }
1585
1586         spin_lock(&imp->imp_lock);
1587         if (imp->imp_state != LUSTRE_IMP_FULL)
1588                 GOTO(out, rc);
1589         spin_unlock(&imp->imp_lock);
1590
1591         req = ptlrpc_request_alloc_pack(imp, &RQF_MDS_DISCONNECT,
1592                                         LUSTRE_OBD_VERSION, rq_opc);
1593         if (req) {
1594                 /* We are disconnecting, do not retry a failed DISCONNECT rpc if
1595                  * it fails.  We can get through the above with a down server
1596                  * if the client doesn't know the server is gone yet. */
1597                 req->rq_no_resend = 1;
1598
1599                 /* We want client umounts to happen quickly, no matter the
1600                    server state... */
1601                 req->rq_timeout = min_t(int, req->rq_timeout,
1602                                         INITIAL_CONNECT_TIMEOUT);
1603
1604                 IMPORT_SET_STATE(imp, LUSTRE_IMP_CONNECTING);
1605                 req->rq_send_state =  LUSTRE_IMP_CONNECTING;
1606                 ptlrpc_request_set_replen(req);
1607                 rc = ptlrpc_queue_wait(req);
1608                 ptlrpc_req_finished(req);
1609         }
1610
1611 set_state:
1612         spin_lock(&imp->imp_lock);
1613 out:
1614         if (noclose)
1615                 IMPORT_SET_STATE_NOLOCK(imp, LUSTRE_IMP_DISCON);
1616         else
1617                 IMPORT_SET_STATE_NOLOCK(imp, LUSTRE_IMP_CLOSED);
1618         memset(&imp->imp_remote_handle, 0, sizeof(imp->imp_remote_handle));
1619         spin_unlock(&imp->imp_lock);
1620
1621         if (rc == -ETIMEDOUT || rc == -ENOTCONN || rc == -ESHUTDOWN)
1622                 rc = 0;
1623         RETURN(rc);
1624 }
1625 EXPORT_SYMBOL(ptlrpc_disconnect_import);
1626
1627 void ptlrpc_cleanup_imp(struct obd_import *imp)
1628 {
1629         ENTRY;
1630
1631         spin_lock(&imp->imp_lock);
1632         IMPORT_SET_STATE_NOLOCK(imp, LUSTRE_IMP_CLOSED);
1633         imp->imp_generation++;
1634         spin_unlock(&imp->imp_lock);
1635         ptlrpc_abort_inflight(imp);
1636
1637         EXIT;
1638 }
1639
1640 /* Adaptive Timeout utils */
1641 extern unsigned int at_min, at_max, at_history;
1642
1643 /* Update at_current with the specified value (bounded by at_min and at_max),
1644  * as well as the AT history "bins".
1645  *  - Bin into timeslices using AT_BINS bins.
1646  *  - This gives us a max of the last at_history seconds without the storage,
1647  *    but still smoothing out a return to normalcy from a slow response.
1648  *  - (E.g. remember the maximum latency in each minute of the last 4 minutes.)
1649  */
1650 int at_measured(struct adaptive_timeout *at, unsigned int val)
1651 {
1652         unsigned int old = at->at_current;
1653         time64_t now = ktime_get_real_seconds();
1654         long binlimit = max_t(long, at_history / AT_BINS, 1);
1655
1656         LASSERT(at);
1657         CDEBUG(D_OTHER, "add %u to %p time=%lu v=%u (%u %u %u %u)\n",
1658                val, at, (long)(now - at->at_binstart), at->at_current,
1659                at->at_hist[0], at->at_hist[1], at->at_hist[2], at->at_hist[3]);
1660
1661         if (val == 0)
1662                 /* 0's don't count, because we never want our timeout to
1663                    drop to 0, and because 0 could mean an error */
1664                 return 0;
1665
1666         spin_lock(&at->at_lock);
1667
1668         if (unlikely(at->at_binstart == 0)) {
1669                 /* Special case to remove default from history */
1670                 at->at_current = val;
1671                 at->at_worst_ever = val;
1672                 at->at_worst_time = now;
1673                 at->at_hist[0] = val;
1674                 at->at_binstart = now;
1675         } else if (now - at->at_binstart < binlimit ) {
1676                 /* in bin 0 */
1677                 at->at_hist[0] = max(val, at->at_hist[0]);
1678                 at->at_current = max(val, at->at_current);
1679         } else {
1680                 int i, shift;
1681                 unsigned int maxv = val;
1682
1683                 /* move bins over */
1684                 shift = (u32)(now - at->at_binstart) / binlimit;
1685                 LASSERT(shift > 0);
1686                 for(i = AT_BINS - 1; i >= 0; i--) {
1687                         if (i >= shift) {
1688                                 at->at_hist[i] = at->at_hist[i - shift];
1689                                 maxv = max(maxv, at->at_hist[i]);
1690                         } else {
1691                                 at->at_hist[i] = 0;
1692                         }
1693                 }
1694                 at->at_hist[0] = val;
1695                 at->at_current = maxv;
1696                 at->at_binstart += shift * binlimit;
1697         }
1698
1699         if (at->at_current > at->at_worst_ever) {
1700                 at->at_worst_ever = at->at_current;
1701                 at->at_worst_time = now;
1702         }
1703
1704         if (at->at_flags & AT_FLG_NOHIST)
1705                 /* Only keep last reported val; keeping the rest of the history
1706                    for proc only */
1707                 at->at_current = val;
1708
1709         if (at_max > 0)
1710                 at->at_current =  min(at->at_current, at_max);
1711         at->at_current =  max(at->at_current, at_min);
1712
1713         if (at->at_current != old)
1714                 CDEBUG(D_OTHER, "AT %p change: old=%u new=%u delta=%d "
1715                        "(val=%u) hist %u %u %u %u\n", at,
1716                        old, at->at_current, at->at_current - old, val,
1717                        at->at_hist[0], at->at_hist[1], at->at_hist[2],
1718                        at->at_hist[3]);
1719
1720         /* if we changed, report the old value */
1721         old = (at->at_current != old) ? old : 0;
1722
1723         spin_unlock(&at->at_lock);
1724         return old;
1725 }
1726
1727 /* Find the imp_at index for a given portal; assign if space available */
1728 int import_at_get_index(struct obd_import *imp, int portal)
1729 {
1730         struct imp_at *at = &imp->imp_at;
1731         int i;
1732
1733         for (i = 0; i < IMP_AT_MAX_PORTALS; i++) {
1734                 if (at->iat_portal[i] == portal)
1735                         return i;
1736                 if (at->iat_portal[i] == 0)
1737                         /* unused */
1738                         break;
1739         }
1740
1741         /* Not found in list, add it under a lock */
1742         spin_lock(&imp->imp_lock);
1743
1744         /* Check unused under lock */
1745         for (; i < IMP_AT_MAX_PORTALS; i++) {
1746                 if (at->iat_portal[i] == portal)
1747                         goto out;
1748                 if (at->iat_portal[i] == 0)
1749                         /* unused */
1750                         break;
1751         }
1752
1753         /* Not enough portals? */
1754         LASSERT(i < IMP_AT_MAX_PORTALS);
1755
1756         at->iat_portal[i] = portal;
1757 out:
1758         spin_unlock(&imp->imp_lock);
1759         return i;
1760 }