[SCSI] zfcp: clear adapter status flags during adapter shutdown
[linux-3.10.git] / drivers / s390 / scsi / zfcp_erp.c
1 /* 
2  * This file is part of the zfcp device driver for
3  * FCP adapters for IBM System z9 and zSeries.
4  *
5  * (C) Copyright IBM Corp. 2002, 2006
6  * 
7  * This program is free software; you can redistribute it and/or modify 
8  * it under the terms of the GNU General Public License as published by 
9  * the Free Software Foundation; either version 2, or (at your option) 
10  * any later version. 
11  * 
12  * This program is distributed in the hope that it will be useful, 
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of 
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the 
15  * GNU General Public License for more details. 
16  * 
17  * You should have received a copy of the GNU General Public License 
18  * along with this program; if not, write to the Free Software 
19  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 
20  */
21
22 #define ZFCP_LOG_AREA                   ZFCP_LOG_AREA_ERP
23
24 #include "zfcp_ext.h"
25
26 static int zfcp_erp_adisc(struct zfcp_port *);
27 static void zfcp_erp_adisc_handler(unsigned long);
28
29 static int zfcp_erp_adapter_reopen_internal(struct zfcp_adapter *, int);
30 static int zfcp_erp_port_forced_reopen_internal(struct zfcp_port *, int);
31 static int zfcp_erp_port_reopen_internal(struct zfcp_port *, int);
32 static int zfcp_erp_unit_reopen_internal(struct zfcp_unit *, int);
33
34 static int zfcp_erp_port_reopen_all_internal(struct zfcp_adapter *, int);
35 static int zfcp_erp_unit_reopen_all_internal(struct zfcp_port *, int);
36
37 static void zfcp_erp_adapter_block(struct zfcp_adapter *, int);
38 static void zfcp_erp_adapter_unblock(struct zfcp_adapter *);
39 static void zfcp_erp_port_block(struct zfcp_port *, int);
40 static void zfcp_erp_port_unblock(struct zfcp_port *);
41 static void zfcp_erp_unit_block(struct zfcp_unit *, int);
42 static void zfcp_erp_unit_unblock(struct zfcp_unit *);
43
44 static int zfcp_erp_thread(void *);
45
46 static int zfcp_erp_strategy(struct zfcp_erp_action *);
47
48 static int zfcp_erp_strategy_do_action(struct zfcp_erp_action *);
49 static int zfcp_erp_strategy_memwait(struct zfcp_erp_action *);
50 static int zfcp_erp_strategy_check_target(struct zfcp_erp_action *, int);
51 static int zfcp_erp_strategy_check_unit(struct zfcp_unit *, int);
52 static int zfcp_erp_strategy_check_port(struct zfcp_port *, int);
53 static int zfcp_erp_strategy_check_adapter(struct zfcp_adapter *, int);
54 static int zfcp_erp_strategy_statechange(int, u32, struct zfcp_adapter *,
55                                          struct zfcp_port *,
56                                          struct zfcp_unit *, int);
57 static inline int zfcp_erp_strategy_statechange_detected(atomic_t *, u32);
58 static int zfcp_erp_strategy_followup_actions(int, struct zfcp_adapter *,
59                                               struct zfcp_port *,
60                                               struct zfcp_unit *, int);
61 static int zfcp_erp_strategy_check_queues(struct zfcp_adapter *);
62 static int zfcp_erp_strategy_check_action(struct zfcp_erp_action *, int);
63
64 static int zfcp_erp_adapter_strategy(struct zfcp_erp_action *);
65 static int zfcp_erp_adapter_strategy_generic(struct zfcp_erp_action *, int);
66 static int zfcp_erp_adapter_strategy_close(struct zfcp_erp_action *);
67 static int zfcp_erp_adapter_strategy_open(struct zfcp_erp_action *);
68 static int zfcp_erp_adapter_strategy_open_qdio(struct zfcp_erp_action *);
69 static int zfcp_erp_adapter_strategy_open_fsf(struct zfcp_erp_action *);
70 static int zfcp_erp_adapter_strategy_open_fsf_xconfig(struct zfcp_erp_action *);
71 static int zfcp_erp_adapter_strategy_open_fsf_xport(struct zfcp_erp_action *);
72 static int zfcp_erp_adapter_strategy_open_fsf_statusread(
73         struct zfcp_erp_action *);
74
75 static int zfcp_erp_port_forced_strategy(struct zfcp_erp_action *);
76 static int zfcp_erp_port_forced_strategy_close(struct zfcp_erp_action *);
77
78 static int zfcp_erp_port_strategy(struct zfcp_erp_action *);
79 static int zfcp_erp_port_strategy_clearstati(struct zfcp_port *);
80 static int zfcp_erp_port_strategy_close(struct zfcp_erp_action *);
81 static int zfcp_erp_port_strategy_open(struct zfcp_erp_action *);
82 static int zfcp_erp_port_strategy_open_nameserver(struct zfcp_erp_action *);
83 static int zfcp_erp_port_strategy_open_nameserver_wakeup(
84         struct zfcp_erp_action *);
85 static int zfcp_erp_port_strategy_open_common(struct zfcp_erp_action *);
86 static int zfcp_erp_port_strategy_open_common_lookup(struct zfcp_erp_action *);
87 static int zfcp_erp_port_strategy_open_port(struct zfcp_erp_action *);
88
89 static int zfcp_erp_unit_strategy(struct zfcp_erp_action *);
90 static int zfcp_erp_unit_strategy_clearstati(struct zfcp_unit *);
91 static int zfcp_erp_unit_strategy_close(struct zfcp_erp_action *);
92 static int zfcp_erp_unit_strategy_open(struct zfcp_erp_action *);
93
94 static void zfcp_erp_action_dismiss_adapter(struct zfcp_adapter *);
95 static void zfcp_erp_action_dismiss_port(struct zfcp_port *);
96 static void zfcp_erp_action_dismiss_unit(struct zfcp_unit *);
97 static void zfcp_erp_action_dismiss(struct zfcp_erp_action *);
98
99 static int zfcp_erp_action_enqueue(int, struct zfcp_adapter *,
100                                    struct zfcp_port *, struct zfcp_unit *);
101 static int zfcp_erp_action_dequeue(struct zfcp_erp_action *);
102 static void zfcp_erp_action_cleanup(int, struct zfcp_adapter *,
103                                     struct zfcp_port *, struct zfcp_unit *,
104                                     int);
105
106 static void zfcp_erp_action_ready(struct zfcp_erp_action *);
107 static int  zfcp_erp_action_exists(struct zfcp_erp_action *);
108
109 static inline void zfcp_erp_action_to_ready(struct zfcp_erp_action *);
110 static inline void zfcp_erp_action_to_running(struct zfcp_erp_action *);
111
112 static void zfcp_erp_memwait_handler(unsigned long);
113
114 /**
115  * zfcp_close_qdio - close qdio queues for an adapter
116  */
117 static void zfcp_close_qdio(struct zfcp_adapter *adapter)
118 {
119         struct zfcp_qdio_queue *req_queue;
120         int first, count;
121
122         if (!atomic_test_mask(ZFCP_STATUS_ADAPTER_QDIOUP, &adapter->status))
123                 return;
124
125         /* clear QDIOUP flag, thus do_QDIO is not called during qdio_shutdown */
126         req_queue = &adapter->request_queue;
127         write_lock_irq(&req_queue->queue_lock);
128         atomic_clear_mask(ZFCP_STATUS_ADAPTER_QDIOUP, &adapter->status);
129         write_unlock_irq(&req_queue->queue_lock);
130
131         debug_text_event(adapter->erp_dbf, 3, "qdio_down2a");
132         while (qdio_shutdown(adapter->ccw_device,
133                              QDIO_FLAG_CLEANUP_USING_CLEAR) == -EINPROGRESS)
134                 msleep(1000);
135         debug_text_event(adapter->erp_dbf, 3, "qdio_down2b");
136
137         /* cleanup used outbound sbals */
138         count = atomic_read(&req_queue->free_count);
139         if (count < QDIO_MAX_BUFFERS_PER_Q) {
140                 first = (req_queue->free_index+count) % QDIO_MAX_BUFFERS_PER_Q;
141                 count = QDIO_MAX_BUFFERS_PER_Q - count;
142                 zfcp_qdio_zero_sbals(req_queue->buffer, first, count);
143         }
144         req_queue->free_index = 0;
145         atomic_set(&req_queue->free_count, 0);
146         req_queue->distance_from_int = 0;
147         adapter->response_queue.free_index = 0;
148         atomic_set(&adapter->response_queue.free_count, 0);
149 }
150
151 /**
152  * zfcp_close_fsf - stop FSF operations for an adapter
153  *
154  * Dismiss and cleanup all pending fsf_reqs (this wakes up all initiators of
155  * requests waiting for completion; especially this returns SCSI commands
156  * with error state).
157  */
158 static void zfcp_close_fsf(struct zfcp_adapter *adapter)
159 {
160         /* close queues to ensure that buffers are not accessed by adapter */
161         zfcp_close_qdio(adapter);
162         zfcp_fsf_req_dismiss_all(adapter);
163         /* reset FSF request sequence number */
164         adapter->fsf_req_seq_no = 0;
165         /* all ports and units are closed */
166         zfcp_erp_modify_adapter_status(adapter,
167                                        ZFCP_STATUS_COMMON_OPEN, ZFCP_CLEAR);
168 }
169
170 /**
171  * zfcp_fsf_request_timeout_handler - called if a request timed out
172  * @data: pointer to adapter for handler function
173  *
174  * This function needs to be called if requests (ELS, Generic Service,
175  * or SCSI commands) exceed a certain time limit. The assumption is
176  * that after the time limit the adapter get stuck. So we trigger a reopen of
177  * the adapter.
178  */
179 static void zfcp_fsf_request_timeout_handler(unsigned long data)
180 {
181         struct zfcp_adapter *adapter = (struct zfcp_adapter *) data;
182         zfcp_erp_adapter_reopen(adapter, ZFCP_STATUS_COMMON_ERP_FAILED);
183 }
184
185 void zfcp_fsf_start_timer(struct zfcp_fsf_req *fsf_req, unsigned long timeout)
186 {
187         fsf_req->timer.function = zfcp_fsf_request_timeout_handler;
188         fsf_req->timer.data = (unsigned long) fsf_req->adapter;
189         fsf_req->timer.expires = jiffies + timeout;
190         add_timer(&fsf_req->timer);
191 }
192
193 /*
194  * function:    
195  *
196  * purpose:     called if an adapter failed,
197  *              initiates adapter recovery which is done
198  *              asynchronously
199  *
200  * returns:     0       - initiated action successfully
201  *              <0      - failed to initiate action
202  */
203 static int
204 zfcp_erp_adapter_reopen_internal(struct zfcp_adapter *adapter, int clear_mask)
205 {
206         int retval;
207
208         debug_text_event(adapter->erp_dbf, 5, "a_ro");
209         ZFCP_LOG_DEBUG("reopen adapter %s\n",
210                        zfcp_get_busid_by_adapter(adapter));
211
212         zfcp_erp_adapter_block(adapter, clear_mask);
213
214         if (atomic_test_mask(ZFCP_STATUS_COMMON_ERP_FAILED, &adapter->status)) {
215                 ZFCP_LOG_DEBUG("skipped reopen of failed adapter %s\n",
216                                zfcp_get_busid_by_adapter(adapter));
217                 debug_text_event(adapter->erp_dbf, 5, "a_ro_f");
218                 /* ensure propagation of failed status to new devices */
219                 zfcp_erp_adapter_failed(adapter);
220                 retval = -EIO;
221                 goto out;
222         }
223         retval = zfcp_erp_action_enqueue(ZFCP_ERP_ACTION_REOPEN_ADAPTER,
224                                          adapter, NULL, NULL);
225
226  out:
227         return retval;
228 }
229
230 /*
231  * function:    
232  *
233  * purpose:     Wrappper for zfcp_erp_adapter_reopen_internal
234  *              used to ensure the correct locking
235  *
236  * returns:     0       - initiated action successfully
237  *              <0      - failed to initiate action
238  */
239 int
240 zfcp_erp_adapter_reopen(struct zfcp_adapter *adapter, int clear_mask)
241 {
242         int retval;
243         unsigned long flags;
244
245         read_lock_irqsave(&zfcp_data.config_lock, flags);
246         write_lock(&adapter->erp_lock);
247         retval = zfcp_erp_adapter_reopen_internal(adapter, clear_mask);
248         write_unlock(&adapter->erp_lock);
249         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
250
251         return retval;
252 }
253
254 int
255 zfcp_erp_adapter_shutdown(struct zfcp_adapter *adapter, int clear_mask)
256 {
257         int retval;
258
259         retval = zfcp_erp_adapter_reopen(adapter,
260                                          ZFCP_STATUS_COMMON_RUNNING |
261                                          ZFCP_STATUS_COMMON_ERP_FAILED |
262                                          clear_mask);
263
264         return retval;
265 }
266
267 int
268 zfcp_erp_port_shutdown(struct zfcp_port *port, int clear_mask)
269 {
270         int retval;
271
272         retval = zfcp_erp_port_reopen(port,
273                                       ZFCP_STATUS_COMMON_RUNNING |
274                                       ZFCP_STATUS_COMMON_ERP_FAILED |
275                                       clear_mask);
276
277         return retval;
278 }
279
280 int
281 zfcp_erp_unit_shutdown(struct zfcp_unit *unit, int clear_mask)
282 {
283         int retval;
284
285         retval = zfcp_erp_unit_reopen(unit,
286                                       ZFCP_STATUS_COMMON_RUNNING |
287                                       ZFCP_STATUS_COMMON_ERP_FAILED |
288                                       clear_mask);
289
290         return retval;
291 }
292
293
294 /**
295  * zfcp_erp_adisc - send ADISC ELS command
296  * @port: port structure
297  */
298 static int
299 zfcp_erp_adisc(struct zfcp_port *port)
300 {
301         struct zfcp_adapter *adapter = port->adapter;
302         struct zfcp_send_els *send_els;
303         struct zfcp_ls_adisc *adisc;
304         void *address = NULL;
305         int retval = 0;
306
307         send_els = kzalloc(sizeof(struct zfcp_send_els), GFP_ATOMIC);
308         if (send_els == NULL)
309                 goto nomem;
310
311         send_els->req = kzalloc(sizeof(struct scatterlist), GFP_ATOMIC);
312         if (send_els->req == NULL)
313                 goto nomem;
314
315         send_els->resp = kzalloc(sizeof(struct scatterlist), GFP_ATOMIC);
316         if (send_els->resp == NULL)
317                 goto nomem;
318
319         address = (void *) get_zeroed_page(GFP_ATOMIC);
320         if (address == NULL)
321                 goto nomem;
322
323         zfcp_address_to_sg(address, send_els->req);
324         address += PAGE_SIZE >> 1;
325         zfcp_address_to_sg(address, send_els->resp);
326         send_els->req_count = send_els->resp_count = 1;
327
328         send_els->adapter = adapter;
329         send_els->port = port;
330         send_els->d_id = port->d_id;
331         send_els->handler = zfcp_erp_adisc_handler;
332         send_els->handler_data = (unsigned long) send_els;
333
334         adisc = zfcp_sg_to_address(send_els->req);
335         send_els->ls_code = adisc->code = ZFCP_LS_ADISC;
336
337         send_els->req->length = sizeof(struct zfcp_ls_adisc);
338         send_els->resp->length = sizeof(struct zfcp_ls_adisc_acc);
339
340         /* acc. to FC-FS, hard_nport_id in ADISC should not be set for ports
341            without FC-AL-2 capability, so we don't set it */
342         adisc->wwpn = fc_host_port_name(adapter->scsi_host);
343         adisc->wwnn = fc_host_node_name(adapter->scsi_host);
344         adisc->nport_id = fc_host_port_id(adapter->scsi_host);
345         ZFCP_LOG_INFO("ADISC request from s_id 0x%06x to d_id 0x%06x "
346                       "(wwpn=0x%016Lx, wwnn=0x%016Lx, "
347                       "hard_nport_id=0x%06x, nport_id=0x%06x)\n",
348                       adisc->nport_id, send_els->d_id, (wwn_t) adisc->wwpn,
349                       (wwn_t) adisc->wwnn, adisc->hard_nport_id,
350                       adisc->nport_id);
351
352         retval = zfcp_fsf_send_els(send_els);
353         if (retval != 0) {
354                 ZFCP_LOG_NORMAL("error: initiation of Send ELS failed for port "
355                                 "0x%06x on adapter %s\n", send_els->d_id,
356                                 zfcp_get_busid_by_adapter(adapter));
357                 goto freemem;
358         }
359
360         goto out;
361
362  nomem:
363         retval = -ENOMEM;
364  freemem:
365         if (address != NULL)
366                 __free_pages(send_els->req->page, 0);
367         if (send_els != NULL) {
368                 kfree(send_els->req);
369                 kfree(send_els->resp);
370                 kfree(send_els);
371         }
372  out:
373         return retval;
374 }
375
376
377 /**
378  * zfcp_erp_adisc_handler - handler for ADISC ELS command
379  * @data: pointer to struct zfcp_send_els
380  *
381  * If ADISC failed (LS_RJT or timed out) forced reopen of the port is triggered.
382  */
383 static void
384 zfcp_erp_adisc_handler(unsigned long data)
385 {
386         struct zfcp_send_els *send_els;
387         struct zfcp_port *port;
388         struct zfcp_adapter *adapter;
389         u32 d_id;
390         struct zfcp_ls_adisc_acc *adisc;
391
392         send_els = (struct zfcp_send_els *) data;
393         adapter = send_els->adapter;
394         port = send_els->port;
395         d_id = send_els->d_id;
396
397         /* request rejected or timed out */
398         if (send_els->status != 0) {
399                 ZFCP_LOG_NORMAL("ELS request rejected/timed out, "
400                                 "force physical port reopen "
401                                 "(adapter %s, port d_id=0x%06x)\n",
402                                 zfcp_get_busid_by_adapter(adapter), d_id);
403                 debug_text_event(adapter->erp_dbf, 3, "forcreop");
404                 if (zfcp_erp_port_forced_reopen(port, 0))
405                         ZFCP_LOG_NORMAL("failed reopen of port "
406                                         "(adapter %s, wwpn=0x%016Lx)\n",
407                                         zfcp_get_busid_by_port(port),
408                                         port->wwpn);
409                 goto out;
410         }
411
412         adisc = zfcp_sg_to_address(send_els->resp);
413
414         ZFCP_LOG_INFO("ADISC response from d_id 0x%06x to s_id "
415                       "0x%06x (wwpn=0x%016Lx, wwnn=0x%016Lx, "
416                       "hard_nport_id=0x%06x, nport_id=0x%06x)\n",
417                       d_id, fc_host_port_id(adapter->scsi_host),
418                       (wwn_t) adisc->wwpn, (wwn_t) adisc->wwnn,
419                       adisc->hard_nport_id, adisc->nport_id);
420
421         /* set wwnn for port */
422         if (port->wwnn == 0)
423                 port->wwnn = adisc->wwnn;
424
425         if (port->wwpn != adisc->wwpn) {
426                 ZFCP_LOG_NORMAL("d_id assignment changed, reopening "
427                                 "port (adapter %s, wwpn=0x%016Lx, "
428                                 "adisc_resp_wwpn=0x%016Lx)\n",
429                                 zfcp_get_busid_by_port(port),
430                                 port->wwpn, (wwn_t) adisc->wwpn);
431                 if (zfcp_erp_port_reopen(port, 0))
432                         ZFCP_LOG_NORMAL("failed reopen of port "
433                                         "(adapter %s, wwpn=0x%016Lx)\n",
434                                         zfcp_get_busid_by_port(port),
435                                         port->wwpn);
436         }
437
438  out:
439         zfcp_port_put(port);
440         __free_pages(send_els->req->page, 0);
441         kfree(send_els->req);
442         kfree(send_els->resp);
443         kfree(send_els);
444 }
445
446
447 /**
448  * zfcp_test_link - lightweight link test procedure
449  * @port: port to be tested
450  *
451  * Test status of a link to a remote port using the ELS command ADISC.
452  */
453 int
454 zfcp_test_link(struct zfcp_port *port)
455 {
456         int retval;
457
458         zfcp_port_get(port);
459         retval = zfcp_erp_adisc(port);
460         if (retval != 0) {
461                 zfcp_port_put(port);
462                 ZFCP_LOG_NORMAL("reopen needed for port 0x%016Lx "
463                                 "on adapter %s\n ", port->wwpn,
464                                 zfcp_get_busid_by_port(port));
465                 retval = zfcp_erp_port_forced_reopen(port, 0);
466                 if (retval != 0) {
467                         ZFCP_LOG_NORMAL("reopen of remote port 0x%016Lx "
468                                         "on adapter %s failed\n", port->wwpn,
469                                         zfcp_get_busid_by_port(port));
470                         retval = -EPERM;
471                 }
472         }
473
474         return retval;
475 }
476
477
478 /*
479  * function:    
480  *
481  * purpose:     called if a port failed to be opened normally
482  *              initiates Forced Reopen recovery which is done
483  *              asynchronously
484  *
485  * returns:     0       - initiated action successfully
486  *              <0      - failed to initiate action
487  */
488 static int
489 zfcp_erp_port_forced_reopen_internal(struct zfcp_port *port, int clear_mask)
490 {
491         int retval;
492         struct zfcp_adapter *adapter = port->adapter;
493
494         debug_text_event(adapter->erp_dbf, 5, "pf_ro");
495         debug_event(adapter->erp_dbf, 5, &port->wwpn, sizeof (wwn_t));
496
497         ZFCP_LOG_DEBUG("forced reopen of port 0x%016Lx on adapter %s\n",
498                        port->wwpn, zfcp_get_busid_by_port(port));
499
500         zfcp_erp_port_block(port, clear_mask);
501
502         if (atomic_test_mask(ZFCP_STATUS_COMMON_ERP_FAILED, &port->status)) {
503                 ZFCP_LOG_DEBUG("skipped forced reopen of failed port 0x%016Lx "
504                                "on adapter %s\n", port->wwpn,
505                                zfcp_get_busid_by_port(port));
506                 debug_text_event(adapter->erp_dbf, 5, "pf_ro_f");
507                 debug_event(adapter->erp_dbf, 5, &port->wwpn, sizeof (wwn_t));
508                 retval = -EIO;
509                 goto out;
510         }
511
512         retval = zfcp_erp_action_enqueue(ZFCP_ERP_ACTION_REOPEN_PORT_FORCED,
513                                          port->adapter, port, NULL);
514
515  out:
516         return retval;
517 }
518
519 /*
520  * function:    
521  *
522  * purpose:     Wrappper for zfcp_erp_port_forced_reopen_internal
523  *              used to ensure the correct locking
524  *
525  * returns:     0       - initiated action successfully
526  *              <0      - failed to initiate action
527  */
528 int
529 zfcp_erp_port_forced_reopen(struct zfcp_port *port, int clear_mask)
530 {
531         int retval;
532         unsigned long flags;
533         struct zfcp_adapter *adapter;
534
535         adapter = port->adapter;
536         read_lock_irqsave(&zfcp_data.config_lock, flags);
537         write_lock(&adapter->erp_lock);
538         retval = zfcp_erp_port_forced_reopen_internal(port, clear_mask);
539         write_unlock(&adapter->erp_lock);
540         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
541
542         return retval;
543 }
544
545 /*
546  * function:    
547  *
548  * purpose:     called if a port is to be opened
549  *              initiates Reopen recovery which is done
550  *              asynchronously
551  *
552  * returns:     0       - initiated action successfully
553  *              <0      - failed to initiate action
554  */
555 static int
556 zfcp_erp_port_reopen_internal(struct zfcp_port *port, int clear_mask)
557 {
558         int retval;
559         struct zfcp_adapter *adapter = port->adapter;
560
561         debug_text_event(adapter->erp_dbf, 5, "p_ro");
562         debug_event(adapter->erp_dbf, 5, &port->wwpn, sizeof (wwn_t));
563
564         ZFCP_LOG_DEBUG("reopen of port 0x%016Lx on adapter %s\n",
565                        port->wwpn, zfcp_get_busid_by_port(port));
566
567         zfcp_erp_port_block(port, clear_mask);
568
569         if (atomic_test_mask(ZFCP_STATUS_COMMON_ERP_FAILED, &port->status)) {
570                 ZFCP_LOG_DEBUG("skipped reopen of failed port 0x%016Lx "
571                                "on adapter %s\n", port->wwpn,
572                                zfcp_get_busid_by_port(port));
573                 debug_text_event(adapter->erp_dbf, 5, "p_ro_f");
574                 debug_event(adapter->erp_dbf, 5, &port->wwpn, sizeof (wwn_t));
575                 /* ensure propagation of failed status to new devices */
576                 zfcp_erp_port_failed(port);
577                 retval = -EIO;
578                 goto out;
579         }
580
581         retval = zfcp_erp_action_enqueue(ZFCP_ERP_ACTION_REOPEN_PORT,
582                                          port->adapter, port, NULL);
583
584  out:
585         return retval;
586 }
587
588 /**
589  * zfcp_erp_port_reopen - initiate reopen of a remote port
590  * @port: port to be reopened
591  * @clear_mask: specifies flags in port status to be cleared
592  * Return: 0 on success, < 0 on error
593  *
594  * This is a wrappper function for zfcp_erp_port_reopen_internal. It ensures
595  * correct locking. An error recovery task is initiated to do the reopen.
596  * To wait for the completion of the reopen zfcp_erp_wait should be used.
597  */
598 int
599 zfcp_erp_port_reopen(struct zfcp_port *port, int clear_mask)
600 {
601         int retval;
602         unsigned long flags;
603         struct zfcp_adapter *adapter = port->adapter;
604
605         read_lock_irqsave(&zfcp_data.config_lock, flags);
606         write_lock(&adapter->erp_lock);
607         retval = zfcp_erp_port_reopen_internal(port, clear_mask);
608         write_unlock(&adapter->erp_lock);
609         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
610
611         return retval;
612 }
613
614 /*
615  * function:    
616  *
617  * purpose:     called if a unit is to be opened
618  *              initiates Reopen recovery which is done
619  *              asynchronously
620  *
621  * returns:     0       - initiated action successfully
622  *              <0      - failed to initiate action
623  */
624 static int
625 zfcp_erp_unit_reopen_internal(struct zfcp_unit *unit, int clear_mask)
626 {
627         int retval;
628         struct zfcp_adapter *adapter = unit->port->adapter;
629
630         debug_text_event(adapter->erp_dbf, 5, "u_ro");
631         debug_event(adapter->erp_dbf, 5, &unit->fcp_lun, sizeof (fcp_lun_t));
632         ZFCP_LOG_DEBUG("reopen of unit 0x%016Lx on port 0x%016Lx "
633                        "on adapter %s\n", unit->fcp_lun,
634                        unit->port->wwpn, zfcp_get_busid_by_unit(unit));
635
636         zfcp_erp_unit_block(unit, clear_mask);
637
638         if (atomic_test_mask(ZFCP_STATUS_COMMON_ERP_FAILED, &unit->status)) {
639                 ZFCP_LOG_DEBUG("skipped reopen of failed unit 0x%016Lx "
640                                "on port 0x%016Lx on adapter %s\n",
641                                unit->fcp_lun, unit->port->wwpn,
642                                zfcp_get_busid_by_unit(unit));
643                 debug_text_event(adapter->erp_dbf, 5, "u_ro_f");
644                 debug_event(adapter->erp_dbf, 5, &unit->fcp_lun,
645                             sizeof (fcp_lun_t));
646                 retval = -EIO;
647                 goto out;
648         }
649
650         retval = zfcp_erp_action_enqueue(ZFCP_ERP_ACTION_REOPEN_UNIT,
651                                          unit->port->adapter, unit->port, unit);
652  out:
653         return retval;
654 }
655
656 /**
657  * zfcp_erp_unit_reopen - initiate reopen of a unit
658  * @unit: unit to be reopened
659  * @clear_mask: specifies flags in unit status to be cleared
660  * Return: 0 on success, < 0 on error
661  *
662  * This is a wrappper for zfcp_erp_unit_reopen_internal. It ensures correct
663  * locking. An error recovery task is initiated to do the reopen.
664  * To wait for the completion of the reopen zfcp_erp_wait should be used.
665  */
666 int
667 zfcp_erp_unit_reopen(struct zfcp_unit *unit, int clear_mask)
668 {
669         int retval;
670         unsigned long flags;
671         struct zfcp_adapter *adapter;
672         struct zfcp_port *port;
673
674         port = unit->port;
675         adapter = port->adapter;
676
677         read_lock_irqsave(&zfcp_data.config_lock, flags);
678         write_lock(&adapter->erp_lock);
679         retval = zfcp_erp_unit_reopen_internal(unit, clear_mask);
680         write_unlock(&adapter->erp_lock);
681         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
682
683         return retval;
684 }
685
686 /**
687  * zfcp_erp_adapter_block - mark adapter as blocked, block scsi requests
688  */
689 static void zfcp_erp_adapter_block(struct zfcp_adapter *adapter, int clear_mask)
690 {
691         debug_text_event(adapter->erp_dbf, 6, "a_bl");
692         zfcp_erp_modify_adapter_status(adapter,
693                                        ZFCP_STATUS_COMMON_UNBLOCKED |
694                                        clear_mask, ZFCP_CLEAR);
695 }
696
697 /**
698  * zfcp_erp_adapter_unblock - mark adapter as unblocked, allow scsi requests
699  */
700 static void zfcp_erp_adapter_unblock(struct zfcp_adapter *adapter)
701 {
702         debug_text_event(adapter->erp_dbf, 6, "a_ubl");
703         atomic_set_mask(ZFCP_STATUS_COMMON_UNBLOCKED, &adapter->status);
704 }
705
706 /*
707  * function:    
708  *
709  * purpose:     disable I/O,
710  *              return any open requests and clean them up,
711  *              aim: no pending and incoming I/O
712  *
713  * returns:
714  */
715 static void
716 zfcp_erp_port_block(struct zfcp_port *port, int clear_mask)
717 {
718         struct zfcp_adapter *adapter = port->adapter;
719
720         debug_text_event(adapter->erp_dbf, 6, "p_bl");
721         debug_event(adapter->erp_dbf, 6, &port->wwpn, sizeof (wwn_t));
722         zfcp_erp_modify_port_status(port,
723                                     ZFCP_STATUS_COMMON_UNBLOCKED | clear_mask,
724                                     ZFCP_CLEAR);
725 }
726
727 /*
728  * function:    
729  *
730  * purpose:     enable I/O
731  *
732  * returns:
733  */
734 static void
735 zfcp_erp_port_unblock(struct zfcp_port *port)
736 {
737         struct zfcp_adapter *adapter = port->adapter;
738
739         debug_text_event(adapter->erp_dbf, 6, "p_ubl");
740         debug_event(adapter->erp_dbf, 6, &port->wwpn, sizeof (wwn_t));
741         atomic_set_mask(ZFCP_STATUS_COMMON_UNBLOCKED, &port->status);
742 }
743
744 /*
745  * function:    
746  *
747  * purpose:     disable I/O,
748  *              return any open requests and clean them up,
749  *              aim: no pending and incoming I/O
750  *
751  * returns:
752  */
753 static void
754 zfcp_erp_unit_block(struct zfcp_unit *unit, int clear_mask)
755 {
756         struct zfcp_adapter *adapter = unit->port->adapter;
757
758         debug_text_event(adapter->erp_dbf, 6, "u_bl");
759         debug_event(adapter->erp_dbf, 6, &unit->fcp_lun, sizeof (fcp_lun_t));
760         zfcp_erp_modify_unit_status(unit,
761                                     ZFCP_STATUS_COMMON_UNBLOCKED | clear_mask,
762                                     ZFCP_CLEAR);
763 }
764
765 /*
766  * function:    
767  *
768  * purpose:     enable I/O
769  *
770  * returns:
771  */
772 static void
773 zfcp_erp_unit_unblock(struct zfcp_unit *unit)
774 {
775         struct zfcp_adapter *adapter = unit->port->adapter;
776
777         debug_text_event(adapter->erp_dbf, 6, "u_ubl");
778         debug_event(adapter->erp_dbf, 6, &unit->fcp_lun, sizeof (fcp_lun_t));
779         atomic_set_mask(ZFCP_STATUS_COMMON_UNBLOCKED, &unit->status);
780 }
781
782 static void
783 zfcp_erp_action_ready(struct zfcp_erp_action *erp_action)
784 {
785         struct zfcp_adapter *adapter = erp_action->adapter;
786
787         debug_text_event(adapter->erp_dbf, 4, "a_ar");
788         debug_event(adapter->erp_dbf, 4, &erp_action->action, sizeof (int));
789
790         zfcp_erp_action_to_ready(erp_action);
791         up(&adapter->erp_ready_sem);
792 }
793
794 /*
795  * function:    
796  *
797  * purpose:
798  *
799  * returns:     <0                      erp_action not found in any list
800  *              ZFCP_ERP_ACTION_READY   erp_action is in ready list
801  *              ZFCP_ERP_ACTION_RUNNING erp_action is in running list
802  *
803  * locks:       erp_lock must be held
804  */
805 static int
806 zfcp_erp_action_exists(struct zfcp_erp_action *erp_action)
807 {
808         int retval = -EINVAL;
809         struct list_head *entry;
810         struct zfcp_erp_action *entry_erp_action;
811         struct zfcp_adapter *adapter = erp_action->adapter;
812
813         /* search in running list */
814         list_for_each(entry, &adapter->erp_running_head) {
815                 entry_erp_action =
816                     list_entry(entry, struct zfcp_erp_action, list);
817                 if (entry_erp_action == erp_action) {
818                         retval = ZFCP_ERP_ACTION_RUNNING;
819                         goto out;
820                 }
821         }
822         /* search in ready list */
823         list_for_each(entry, &adapter->erp_ready_head) {
824                 entry_erp_action =
825                     list_entry(entry, struct zfcp_erp_action, list);
826                 if (entry_erp_action == erp_action) {
827                         retval = ZFCP_ERP_ACTION_READY;
828                         goto out;
829                 }
830         }
831
832  out:
833         return retval;
834 }
835
836 /*
837  * purpose:     checks current status of action (timed out, dismissed, ...)
838  *              and does appropriate preparations (dismiss fsf request, ...)
839  *
840  * locks:       called under erp_lock (disabled interrupts)
841  */
842 static void
843 zfcp_erp_strategy_check_fsfreq(struct zfcp_erp_action *erp_action)
844 {
845         struct zfcp_adapter *adapter = erp_action->adapter;
846
847         if (erp_action->fsf_req) {
848                 /* take lock to ensure that request is not deleted meanwhile */
849                 spin_lock(&adapter->req_list_lock);
850                 if (zfcp_reqlist_find(adapter, erp_action->fsf_req->req_id)) {
851                         /* fsf_req still exists */
852                         debug_text_event(adapter->erp_dbf, 3, "a_ca_req");
853                         debug_event(adapter->erp_dbf, 3, &erp_action->fsf_req,
854                                     sizeof (unsigned long));
855                         /* dismiss fsf_req of timed out/dismissed erp_action */
856                         if (erp_action->status & (ZFCP_STATUS_ERP_DISMISSED |
857                                                   ZFCP_STATUS_ERP_TIMEDOUT)) {
858                                 debug_text_event(adapter->erp_dbf, 3,
859                                                  "a_ca_disreq");
860                                 erp_action->fsf_req->status |=
861                                         ZFCP_STATUS_FSFREQ_DISMISSED;
862                         }
863                         if (erp_action->status & ZFCP_STATUS_ERP_TIMEDOUT) {
864                                 ZFCP_LOG_NORMAL("error: erp step timed out "
865                                                 "(action=%d, fsf_req=%p)\n ",
866                                                 erp_action->action,
867                                                 erp_action->fsf_req);
868                         }
869                         /*
870                          * If fsf_req is neither dismissed nor completed
871                          * then keep it running asynchronously and don't mess
872                          * with the association of erp_action and fsf_req.
873                          */
874                         if (erp_action->fsf_req->status &
875                                         (ZFCP_STATUS_FSFREQ_COMPLETED |
876                                                ZFCP_STATUS_FSFREQ_DISMISSED)) {
877                                 /* forget about association between fsf_req
878                                    and erp_action */
879                                 erp_action->fsf_req = NULL;
880                         }
881                 } else {
882                         debug_text_event(adapter->erp_dbf, 3, "a_ca_gonereq");
883                         /*
884                          * even if this fsf_req has gone, forget about
885                          * association between erp_action and fsf_req
886                          */
887                         erp_action->fsf_req = NULL;
888                 }
889                 spin_unlock(&adapter->req_list_lock);
890         } else
891                 debug_text_event(adapter->erp_dbf, 3, "a_ca_noreq");
892 }
893
894 /**
895  * zfcp_erp_async_handler_nolock - complete erp_action
896  *
897  * Used for normal completion, time-out, dismissal and failure after
898  * low memory condition.
899  */
900 static void zfcp_erp_async_handler_nolock(struct zfcp_erp_action *erp_action,
901                                           unsigned long set_mask)
902 {
903         struct zfcp_adapter *adapter = erp_action->adapter;
904
905         if (zfcp_erp_action_exists(erp_action) == ZFCP_ERP_ACTION_RUNNING) {
906                 debug_text_event(adapter->erp_dbf, 2, "a_asyh_ex");
907                 debug_event(adapter->erp_dbf, 2, &erp_action->action,
908                             sizeof (int));
909                 erp_action->status |= set_mask;
910                 zfcp_erp_action_ready(erp_action);
911         } else {
912                 /* action is ready or gone - nothing to do */
913                 debug_text_event(adapter->erp_dbf, 3, "a_asyh_gone");
914                 debug_event(adapter->erp_dbf, 3, &erp_action->action,
915                             sizeof (int));
916         }
917 }
918
919 /**
920  * zfcp_erp_async_handler - wrapper for erp_async_handler_nolock w/ locking
921  */
922 void zfcp_erp_async_handler(struct zfcp_erp_action *erp_action,
923                             unsigned long set_mask)
924 {
925         struct zfcp_adapter *adapter = erp_action->adapter;
926         unsigned long flags;
927
928         write_lock_irqsave(&adapter->erp_lock, flags);
929         zfcp_erp_async_handler_nolock(erp_action, set_mask);
930         write_unlock_irqrestore(&adapter->erp_lock, flags);
931 }
932
933 /*
934  * purpose:     is called for erp_action which was slept waiting for
935  *              memory becoming avaliable,
936  *              will trigger that this action will be continued
937  */
938 static void
939 zfcp_erp_memwait_handler(unsigned long data)
940 {
941         struct zfcp_erp_action *erp_action = (struct zfcp_erp_action *) data;
942         struct zfcp_adapter *adapter = erp_action->adapter;
943
944         debug_text_event(adapter->erp_dbf, 2, "a_mwh");
945         debug_event(adapter->erp_dbf, 2, &erp_action->action, sizeof (int));
946
947         zfcp_erp_async_handler(erp_action, 0);
948 }
949
950 /*
951  * purpose:     is called if an asynchronous erp step timed out,
952  *              action gets an appropriate flag and will be processed
953  *              accordingly
954  */
955 void zfcp_erp_timeout_handler(unsigned long data)
956 {
957         struct zfcp_erp_action *erp_action = (struct zfcp_erp_action *) data;
958         struct zfcp_adapter *adapter = erp_action->adapter;
959
960         debug_text_event(adapter->erp_dbf, 2, "a_th");
961         debug_event(adapter->erp_dbf, 2, &erp_action->action, sizeof (int));
962
963         zfcp_erp_async_handler(erp_action, ZFCP_STATUS_ERP_TIMEDOUT);
964 }
965
966 /**
967  * zfcp_erp_action_dismiss - dismiss an erp_action
968  *
969  * adapter->erp_lock must be held
970  * 
971  * Dismissal of an erp_action is usually required if an erp_action of
972  * higher priority is generated.
973  */
974 static void zfcp_erp_action_dismiss(struct zfcp_erp_action *erp_action)
975 {
976         struct zfcp_adapter *adapter = erp_action->adapter;
977
978         debug_text_event(adapter->erp_dbf, 2, "a_adis");
979         debug_event(adapter->erp_dbf, 2, &erp_action->action, sizeof (int));
980
981         zfcp_erp_async_handler_nolock(erp_action, ZFCP_STATUS_ERP_DISMISSED);
982 }
983
984 int
985 zfcp_erp_thread_setup(struct zfcp_adapter *adapter)
986 {
987         int retval = 0;
988
989         atomic_clear_mask(ZFCP_STATUS_ADAPTER_ERP_THREAD_UP, &adapter->status);
990
991         retval = kernel_thread(zfcp_erp_thread, adapter, SIGCHLD);
992         if (retval < 0) {
993                 ZFCP_LOG_NORMAL("error: creation of erp thread failed for "
994                                 "adapter %s\n",
995                                 zfcp_get_busid_by_adapter(adapter));
996                 debug_text_event(adapter->erp_dbf, 5, "a_thset_fail");
997         } else {
998                 wait_event(adapter->erp_thread_wqh,
999                            atomic_test_mask(ZFCP_STATUS_ADAPTER_ERP_THREAD_UP,
1000                                             &adapter->status));
1001                 debug_text_event(adapter->erp_dbf, 5, "a_thset_ok");
1002         }
1003
1004         return (retval < 0);
1005 }
1006
1007 /*
1008  * function:    
1009  *
1010  * purpose:     
1011  *
1012  * returns:
1013  *
1014  * context:     process (i.e. proc-fs or rmmod/insmod)
1015  *
1016  * note:        The caller of this routine ensures that the specified
1017  *              adapter has been shut down and that this operation
1018  *              has been completed. Thus, there are no pending erp_actions
1019  *              which would need to be handled here.
1020  */
1021 int
1022 zfcp_erp_thread_kill(struct zfcp_adapter *adapter)
1023 {
1024         int retval = 0;
1025
1026         atomic_set_mask(ZFCP_STATUS_ADAPTER_ERP_THREAD_KILL, &adapter->status);
1027         up(&adapter->erp_ready_sem);
1028
1029         wait_event(adapter->erp_thread_wqh,
1030                    !atomic_test_mask(ZFCP_STATUS_ADAPTER_ERP_THREAD_UP,
1031                                      &adapter->status));
1032
1033         atomic_clear_mask(ZFCP_STATUS_ADAPTER_ERP_THREAD_KILL,
1034                           &adapter->status);
1035
1036         debug_text_event(adapter->erp_dbf, 5, "a_thki_ok");
1037
1038         return retval;
1039 }
1040
1041 /*
1042  * purpose:     is run as a kernel thread,
1043  *              goes through list of error recovery actions of associated adapter
1044  *              and delegates single action to execution
1045  *
1046  * returns:     0
1047  */
1048 static int
1049 zfcp_erp_thread(void *data)
1050 {
1051         struct zfcp_adapter *adapter = (struct zfcp_adapter *) data;
1052         struct list_head *next;
1053         struct zfcp_erp_action *erp_action;
1054         unsigned long flags;
1055
1056         daemonize("zfcperp%s", zfcp_get_busid_by_adapter(adapter));
1057         /* Block all signals */
1058         siginitsetinv(&current->blocked, 0);
1059         atomic_set_mask(ZFCP_STATUS_ADAPTER_ERP_THREAD_UP, &adapter->status);
1060         debug_text_event(adapter->erp_dbf, 5, "a_th_run");
1061         wake_up(&adapter->erp_thread_wqh);
1062
1063         while (!atomic_test_mask(ZFCP_STATUS_ADAPTER_ERP_THREAD_KILL,
1064                                  &adapter->status)) {
1065
1066                 write_lock_irqsave(&adapter->erp_lock, flags);
1067                 next = adapter->erp_ready_head.prev;
1068                 write_unlock_irqrestore(&adapter->erp_lock, flags);
1069
1070                 if (next != &adapter->erp_ready_head) {
1071                         erp_action =
1072                             list_entry(next, struct zfcp_erp_action, list);
1073                         /*
1074                          * process action (incl. [re]moving it
1075                          * from 'ready' queue)
1076                          */
1077                         zfcp_erp_strategy(erp_action);
1078                 }
1079
1080                 /*
1081                  * sleep as long as there is nothing to do, i.e.
1082                  * no action in 'ready' queue to be processed and
1083                  * thread is not to be killed
1084                  */
1085                 down_interruptible(&adapter->erp_ready_sem);
1086                 debug_text_event(adapter->erp_dbf, 5, "a_th_woken");
1087         }
1088
1089         atomic_clear_mask(ZFCP_STATUS_ADAPTER_ERP_THREAD_UP, &adapter->status);
1090         debug_text_event(adapter->erp_dbf, 5, "a_th_stop");
1091         wake_up(&adapter->erp_thread_wqh);
1092
1093         return 0;
1094 }
1095
1096 /*
1097  * function:    
1098  *
1099  * purpose:     drives single error recovery action and schedules higher and
1100  *              subordinate actions, if necessary
1101  *
1102  * returns:     ZFCP_ERP_CONTINUES      - action continues (asynchronously)
1103  *              ZFCP_ERP_SUCCEEDED      - action finished successfully (deqd)
1104  *              ZFCP_ERP_FAILED         - action finished unsuccessfully (deqd)
1105  *              ZFCP_ERP_EXIT           - action finished (dequeued), offline
1106  *              ZFCP_ERP_DISMISSED      - action canceled (dequeued)
1107  */
1108 static int
1109 zfcp_erp_strategy(struct zfcp_erp_action *erp_action)
1110 {
1111         int retval = 0;
1112         struct zfcp_adapter *adapter = erp_action->adapter;
1113         struct zfcp_port *port = erp_action->port;
1114         struct zfcp_unit *unit = erp_action->unit;
1115         int action = erp_action->action;
1116         u32 status = erp_action->status;
1117         unsigned long flags;
1118
1119         /* serialise dismissing, timing out, moving, enqueueing */
1120         read_lock_irqsave(&zfcp_data.config_lock, flags);
1121         write_lock(&adapter->erp_lock);
1122
1123         /* dequeue dismissed action and leave, if required */
1124         retval = zfcp_erp_strategy_check_action(erp_action, retval);
1125         if (retval == ZFCP_ERP_DISMISSED) {
1126                 debug_text_event(adapter->erp_dbf, 4, "a_st_dis1");
1127                 goto unlock;
1128         }
1129
1130         /*
1131          * move action to 'running' queue before processing it
1132          * (to avoid a race condition regarding moving the
1133          * action to the 'running' queue and back)
1134          */
1135         zfcp_erp_action_to_running(erp_action);
1136
1137         /*
1138          * try to process action as far as possible,
1139          * no lock to allow for blocking operations (kmalloc, qdio, ...),
1140          * afterwards the lock is required again for the following reasons:
1141          * - dequeueing of finished action and enqueueing of
1142          *   follow-up actions must be atomic so that any other
1143          *   reopen-routine does not believe there is nothing to do
1144          *   and that it is safe to enqueue something else,
1145          * - we want to force any control thread which is dismissing
1146          *   actions to finish this before we decide about
1147          *   necessary steps to be taken here further
1148          */
1149         write_unlock(&adapter->erp_lock);
1150         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
1151         retval = zfcp_erp_strategy_do_action(erp_action);
1152         read_lock_irqsave(&zfcp_data.config_lock, flags);
1153         write_lock(&adapter->erp_lock);
1154
1155         /*
1156          * check for dismissed status again to avoid follow-up actions,
1157          * failing of targets and so on for dismissed actions
1158          */
1159         retval = zfcp_erp_strategy_check_action(erp_action, retval);
1160
1161         switch (retval) {
1162         case ZFCP_ERP_DISMISSED:
1163                 /* leave since this action has ridden to its ancestors */
1164                 debug_text_event(adapter->erp_dbf, 6, "a_st_dis2");
1165                 goto unlock;
1166         case ZFCP_ERP_NOMEM:
1167                 /* no memory to continue immediately, let it sleep */
1168                 if (!(erp_action->status & ZFCP_STATUS_ERP_LOWMEM)) {
1169                         ++adapter->erp_low_mem_count;
1170                         erp_action->status |= ZFCP_STATUS_ERP_LOWMEM;
1171                 }
1172                 /* This condition is true if there is no memory available
1173                    for any erp_action on this adapter. This implies that there
1174                    are no elements in the memory pool(s) left for erp_actions.
1175                    This might happen if an erp_action that used a memory pool
1176                    element was timed out.
1177                  */
1178                 if (adapter->erp_total_count == adapter->erp_low_mem_count) {
1179                         debug_text_event(adapter->erp_dbf, 3, "a_st_lowmem");
1180                         ZFCP_LOG_NORMAL("error: no mempool elements available, "
1181                                         "restarting I/O on adapter %s "
1182                                         "to free mempool\n",
1183                                         zfcp_get_busid_by_adapter(adapter));
1184                         zfcp_erp_adapter_reopen_internal(adapter, 0);
1185                 } else {
1186                 debug_text_event(adapter->erp_dbf, 2, "a_st_memw");
1187                 retval = zfcp_erp_strategy_memwait(erp_action);
1188                 }
1189                 goto unlock;
1190         case ZFCP_ERP_CONTINUES:
1191                 /* leave since this action runs asynchronously */
1192                 debug_text_event(adapter->erp_dbf, 6, "a_st_cont");
1193                 if (erp_action->status & ZFCP_STATUS_ERP_LOWMEM) {
1194                         --adapter->erp_low_mem_count;
1195                         erp_action->status &= ~ZFCP_STATUS_ERP_LOWMEM;
1196                 }
1197                 goto unlock;
1198         }
1199         /* ok, finished action (whatever its result is) */
1200
1201         /* check for unrecoverable targets */
1202         retval = zfcp_erp_strategy_check_target(erp_action, retval);
1203
1204         /* action must be dequeued (here to allow for further ones) */
1205         zfcp_erp_action_dequeue(erp_action);
1206
1207         /*
1208          * put this target through the erp mill again if someone has
1209          * requested to change the status of a target being online 
1210          * to offline or the other way around
1211          * (old retval is preserved if nothing has to be done here)
1212          */
1213         retval = zfcp_erp_strategy_statechange(action, status, adapter,
1214                                                port, unit, retval);
1215
1216         /*
1217          * leave if target is in permanent error state or if
1218          * action is repeated in order to process state change
1219          */
1220         if (retval == ZFCP_ERP_EXIT) {
1221                 debug_text_event(adapter->erp_dbf, 2, "a_st_exit");
1222                 goto unlock;
1223         }
1224
1225         /* trigger follow up actions */
1226         zfcp_erp_strategy_followup_actions(action, adapter, port, unit, retval);
1227
1228  unlock:
1229         write_unlock(&adapter->erp_lock);
1230         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
1231         
1232         if (retval != ZFCP_ERP_CONTINUES)
1233                 zfcp_erp_action_cleanup(action, adapter, port, unit, retval);
1234
1235         /*
1236          * a few tasks remain when the erp queues are empty
1237          * (don't do that if the last action evaluated was dismissed
1238          * since this clearly indicates that there is more to come) :
1239          * - close the name server port if it is open yet
1240          *   (enqueues another [probably] final action)
1241          * - otherwise, wake up whoever wants to be woken when we are
1242          *   done with erp
1243          */
1244         if (retval != ZFCP_ERP_DISMISSED)
1245                 zfcp_erp_strategy_check_queues(adapter);
1246
1247         debug_text_event(adapter->erp_dbf, 6, "a_st_done");
1248
1249         return retval;
1250 }
1251
1252 /*
1253  * function:    
1254  *
1255  * purpose:     
1256  *
1257  * returns:     ZFCP_ERP_DISMISSED      - if action has been dismissed
1258  *              retval                  - otherwise
1259  */
1260 static int
1261 zfcp_erp_strategy_check_action(struct zfcp_erp_action *erp_action, int retval)
1262 {
1263         struct zfcp_adapter *adapter = erp_action->adapter;
1264
1265         zfcp_erp_strategy_check_fsfreq(erp_action);
1266
1267         debug_event(adapter->erp_dbf, 5, &erp_action->action, sizeof (int));
1268         if (erp_action->status & ZFCP_STATUS_ERP_DISMISSED) {
1269                 debug_text_event(adapter->erp_dbf, 3, "a_stcd_dis");
1270                 zfcp_erp_action_dequeue(erp_action);
1271                 retval = ZFCP_ERP_DISMISSED;
1272         } else
1273                 debug_text_event(adapter->erp_dbf, 5, "a_stcd_nodis");
1274
1275         return retval;
1276 }
1277
1278 static int
1279 zfcp_erp_strategy_do_action(struct zfcp_erp_action *erp_action)
1280 {
1281         int retval = ZFCP_ERP_FAILED;
1282         struct zfcp_adapter *adapter = erp_action->adapter;
1283
1284         /*
1285          * try to execute/continue action as far as possible,
1286          * note: no lock in subsequent strategy routines
1287          * (this allows these routine to call schedule, e.g.
1288          * kmalloc with such flags or qdio_initialize & friends)
1289          * Note: in case of timeout, the seperate strategies will fail
1290          * anyhow. No need for a special action. Even worse, a nameserver
1291          * failure would not wake up waiting ports without the call.
1292          */
1293         switch (erp_action->action) {
1294
1295         case ZFCP_ERP_ACTION_REOPEN_ADAPTER:
1296                 retval = zfcp_erp_adapter_strategy(erp_action);
1297                 break;
1298
1299         case ZFCP_ERP_ACTION_REOPEN_PORT_FORCED:
1300                 retval = zfcp_erp_port_forced_strategy(erp_action);
1301                 break;
1302
1303         case ZFCP_ERP_ACTION_REOPEN_PORT:
1304                 retval = zfcp_erp_port_strategy(erp_action);
1305                 break;
1306
1307         case ZFCP_ERP_ACTION_REOPEN_UNIT:
1308                 retval = zfcp_erp_unit_strategy(erp_action);
1309                 break;
1310
1311         default:
1312                 debug_text_exception(adapter->erp_dbf, 1, "a_stda_bug");
1313                 debug_event(adapter->erp_dbf, 1, &erp_action->action,
1314                             sizeof (int));
1315                 ZFCP_LOG_NORMAL("bug: unknown erp action requested on "
1316                                 "adapter %s (action=%d)\n",
1317                                 zfcp_get_busid_by_adapter(erp_action->adapter),
1318                                 erp_action->action);
1319         }
1320
1321         return retval;
1322 }
1323
1324 /*
1325  * function:    
1326  *
1327  * purpose:     triggers retry of this action after a certain amount of time
1328  *              by means of timer provided by erp_action
1329  *
1330  * returns:     ZFCP_ERP_CONTINUES - erp_action sleeps in erp running queue
1331  */
1332 static int
1333 zfcp_erp_strategy_memwait(struct zfcp_erp_action *erp_action)
1334 {
1335         int retval = ZFCP_ERP_CONTINUES;
1336         struct zfcp_adapter *adapter = erp_action->adapter;
1337
1338         debug_text_event(adapter->erp_dbf, 6, "a_mwinit");
1339         debug_event(adapter->erp_dbf, 6, &erp_action->action, sizeof (int));
1340         init_timer(&erp_action->timer);
1341         erp_action->timer.function = zfcp_erp_memwait_handler;
1342         erp_action->timer.data = (unsigned long) erp_action;
1343         erp_action->timer.expires = jiffies + ZFCP_ERP_MEMWAIT_TIMEOUT;
1344         add_timer(&erp_action->timer);
1345
1346         return retval;
1347 }
1348
1349 /* 
1350  * function:    zfcp_erp_adapter_failed
1351  *
1352  * purpose:     sets the adapter and all underlying devices to ERP_FAILED
1353  *
1354  */
1355 void
1356 zfcp_erp_adapter_failed(struct zfcp_adapter *adapter)
1357 {
1358         zfcp_erp_modify_adapter_status(adapter,
1359                                        ZFCP_STATUS_COMMON_ERP_FAILED, ZFCP_SET);
1360         ZFCP_LOG_NORMAL("adapter erp failed on adapter %s\n",
1361                         zfcp_get_busid_by_adapter(adapter));
1362         debug_text_event(adapter->erp_dbf, 2, "a_afail");
1363 }
1364
1365 /* 
1366  * function:    zfcp_erp_port_failed
1367  *
1368  * purpose:     sets the port and all underlying devices to ERP_FAILED
1369  *
1370  */
1371 void
1372 zfcp_erp_port_failed(struct zfcp_port *port)
1373 {
1374         zfcp_erp_modify_port_status(port,
1375                                     ZFCP_STATUS_COMMON_ERP_FAILED, ZFCP_SET);
1376
1377         if (atomic_test_mask(ZFCP_STATUS_PORT_WKA, &port->status))
1378                 ZFCP_LOG_NORMAL("port erp failed (adapter %s, "
1379                                 "port d_id=0x%06x)\n",
1380                                 zfcp_get_busid_by_port(port), port->d_id);
1381         else
1382                 ZFCP_LOG_NORMAL("port erp failed (adapter %s, wwpn=0x%016Lx)\n",
1383                                 zfcp_get_busid_by_port(port), port->wwpn);
1384
1385         debug_text_event(port->adapter->erp_dbf, 2, "p_pfail");
1386         debug_event(port->adapter->erp_dbf, 2, &port->wwpn, sizeof (wwn_t));
1387 }
1388
1389 /* 
1390  * function:    zfcp_erp_unit_failed
1391  *
1392  * purpose:     sets the unit to ERP_FAILED
1393  *
1394  */
1395 void
1396 zfcp_erp_unit_failed(struct zfcp_unit *unit)
1397 {
1398         zfcp_erp_modify_unit_status(unit,
1399                                     ZFCP_STATUS_COMMON_ERP_FAILED, ZFCP_SET);
1400
1401         ZFCP_LOG_NORMAL("unit erp failed on unit 0x%016Lx on port 0x%016Lx "
1402                         " on adapter %s\n", unit->fcp_lun,
1403                         unit->port->wwpn, zfcp_get_busid_by_unit(unit));
1404         debug_text_event(unit->port->adapter->erp_dbf, 2, "u_ufail");
1405         debug_event(unit->port->adapter->erp_dbf, 2,
1406                     &unit->fcp_lun, sizeof (fcp_lun_t));
1407 }
1408
1409 /*
1410  * function:    zfcp_erp_strategy_check_target
1411  *
1412  * purpose:     increments the erp action count on the device currently in
1413  *              recovery if the action failed or resets the count in case of
1414  *              success. If a maximum count is exceeded the device is marked
1415  *              as ERP_FAILED.
1416  *              The 'blocked' state of a target which has been recovered
1417  *              successfully is reset.
1418  *
1419  * returns:     ZFCP_ERP_CONTINUES      - action continues (not considered)
1420  *              ZFCP_ERP_SUCCEEDED      - action finished successfully 
1421  *              ZFCP_ERP_EXIT           - action failed and will not continue
1422  */
1423 static int
1424 zfcp_erp_strategy_check_target(struct zfcp_erp_action *erp_action, int result)
1425 {
1426         struct zfcp_adapter *adapter = erp_action->adapter;
1427         struct zfcp_port *port = erp_action->port;
1428         struct zfcp_unit *unit = erp_action->unit;
1429
1430         debug_text_event(adapter->erp_dbf, 5, "a_stct_norm");
1431         debug_event(adapter->erp_dbf, 5, &erp_action->action, sizeof (int));
1432         debug_event(adapter->erp_dbf, 5, &result, sizeof (int));
1433
1434         switch (erp_action->action) {
1435
1436         case ZFCP_ERP_ACTION_REOPEN_UNIT:
1437                 result = zfcp_erp_strategy_check_unit(unit, result);
1438                 break;
1439
1440         case ZFCP_ERP_ACTION_REOPEN_PORT_FORCED:
1441         case ZFCP_ERP_ACTION_REOPEN_PORT:
1442                 result = zfcp_erp_strategy_check_port(port, result);
1443                 break;
1444
1445         case ZFCP_ERP_ACTION_REOPEN_ADAPTER:
1446                 result = zfcp_erp_strategy_check_adapter(adapter, result);
1447                 break;
1448         }
1449
1450         return result;
1451 }
1452
1453 static int
1454 zfcp_erp_strategy_statechange(int action,
1455                               u32 status,
1456                               struct zfcp_adapter *adapter,
1457                               struct zfcp_port *port,
1458                               struct zfcp_unit *unit, int retval)
1459 {
1460         debug_text_event(adapter->erp_dbf, 3, "a_stsc");
1461         debug_event(adapter->erp_dbf, 3, &action, sizeof (int));
1462
1463         switch (action) {
1464
1465         case ZFCP_ERP_ACTION_REOPEN_ADAPTER:
1466                 if (zfcp_erp_strategy_statechange_detected(&adapter->status,
1467                                                            status)) {
1468                         zfcp_erp_adapter_reopen_internal(adapter, ZFCP_STATUS_COMMON_ERP_FAILED);
1469                         retval = ZFCP_ERP_EXIT;
1470                 }
1471                 break;
1472
1473         case ZFCP_ERP_ACTION_REOPEN_PORT_FORCED:
1474         case ZFCP_ERP_ACTION_REOPEN_PORT:
1475                 if (zfcp_erp_strategy_statechange_detected(&port->status,
1476                                                            status)) {
1477                         zfcp_erp_port_reopen_internal(port, ZFCP_STATUS_COMMON_ERP_FAILED);
1478                         retval = ZFCP_ERP_EXIT;
1479                 }
1480                 break;
1481
1482         case ZFCP_ERP_ACTION_REOPEN_UNIT:
1483                 if (zfcp_erp_strategy_statechange_detected(&unit->status,
1484                                                            status)) {
1485                         zfcp_erp_unit_reopen_internal(unit, ZFCP_STATUS_COMMON_ERP_FAILED);
1486                         retval = ZFCP_ERP_EXIT;
1487                 }
1488                 break;
1489         }
1490
1491         return retval;
1492 }
1493
1494 static inline int
1495 zfcp_erp_strategy_statechange_detected(atomic_t * target_status, u32 erp_status)
1496 {
1497         return
1498             /* take it online */
1499             (atomic_test_mask(ZFCP_STATUS_COMMON_RUNNING, target_status) &&
1500              (ZFCP_STATUS_ERP_CLOSE_ONLY & erp_status)) ||
1501             /* take it offline */
1502             (!atomic_test_mask(ZFCP_STATUS_COMMON_RUNNING, target_status) &&
1503              !(ZFCP_STATUS_ERP_CLOSE_ONLY & erp_status));
1504 }
1505
1506 static int
1507 zfcp_erp_strategy_check_unit(struct zfcp_unit *unit, int result)
1508 {
1509         debug_text_event(unit->port->adapter->erp_dbf, 5, "u_stct");
1510         debug_event(unit->port->adapter->erp_dbf, 5, &unit->fcp_lun,
1511                     sizeof (fcp_lun_t));
1512
1513         switch (result) {
1514         case ZFCP_ERP_SUCCEEDED :
1515                 atomic_set(&unit->erp_counter, 0);
1516                 zfcp_erp_unit_unblock(unit);
1517                 break;
1518         case ZFCP_ERP_FAILED :
1519                 atomic_inc(&unit->erp_counter);
1520                 if (atomic_read(&unit->erp_counter) > ZFCP_MAX_ERPS)
1521                         zfcp_erp_unit_failed(unit);
1522                 break;
1523         case ZFCP_ERP_EXIT :
1524                 /* nothing */
1525                 break;
1526         }
1527
1528         if (atomic_test_mask(ZFCP_STATUS_COMMON_ERP_FAILED, &unit->status)) {
1529                 zfcp_erp_unit_block(unit, 0); /* for ZFCP_ERP_SUCCEEDED */
1530                 result = ZFCP_ERP_EXIT;
1531         }
1532
1533         return result;
1534 }
1535
1536 static int
1537 zfcp_erp_strategy_check_port(struct zfcp_port *port, int result)
1538 {
1539         debug_text_event(port->adapter->erp_dbf, 5, "p_stct");
1540         debug_event(port->adapter->erp_dbf, 5, &port->wwpn, sizeof (wwn_t));
1541
1542         switch (result) {
1543         case ZFCP_ERP_SUCCEEDED :
1544                 atomic_set(&port->erp_counter, 0);
1545                 zfcp_erp_port_unblock(port);
1546                 break;
1547         case ZFCP_ERP_FAILED :
1548                 atomic_inc(&port->erp_counter);
1549                 if (atomic_read(&port->erp_counter) > ZFCP_MAX_ERPS)
1550                         zfcp_erp_port_failed(port);
1551                 break;
1552         case ZFCP_ERP_EXIT :
1553                 /* nothing */
1554                 break;
1555         }
1556
1557         if (atomic_test_mask(ZFCP_STATUS_COMMON_ERP_FAILED, &port->status)) {
1558                 zfcp_erp_port_block(port, 0); /* for ZFCP_ERP_SUCCEEDED */
1559                 result = ZFCP_ERP_EXIT;
1560         }
1561
1562         return result;
1563 }
1564
1565 static int
1566 zfcp_erp_strategy_check_adapter(struct zfcp_adapter *adapter, int result)
1567 {
1568         debug_text_event(adapter->erp_dbf, 5, "a_stct");
1569
1570         switch (result) {
1571         case ZFCP_ERP_SUCCEEDED :
1572                 atomic_set(&adapter->erp_counter, 0);
1573                 zfcp_erp_adapter_unblock(adapter);
1574                 break;
1575         case ZFCP_ERP_FAILED :
1576                 atomic_inc(&adapter->erp_counter);
1577                 if (atomic_read(&adapter->erp_counter) > ZFCP_MAX_ERPS)
1578                         zfcp_erp_adapter_failed(adapter);
1579                 break;
1580         case ZFCP_ERP_EXIT :
1581                 /* nothing */
1582                 break;
1583         }
1584
1585         if (atomic_test_mask(ZFCP_STATUS_COMMON_ERP_FAILED, &adapter->status)) {
1586                 zfcp_erp_adapter_block(adapter, 0); /* for ZFCP_ERP_SUCCEEDED */
1587                 result = ZFCP_ERP_EXIT;
1588         }
1589
1590         return result;
1591 }
1592
1593 struct zfcp_erp_add_work {
1594         struct zfcp_unit  *unit;
1595         struct work_struct work;
1596 };
1597
1598 /**
1599  * zfcp_erp_scsi_scan
1600  * @data: pointer to a struct zfcp_erp_add_work
1601  *
1602  * Registers a logical unit with the SCSI stack.
1603  */
1604 static void zfcp_erp_scsi_scan(struct work_struct *work)
1605 {
1606         struct zfcp_erp_add_work *p =
1607                 container_of(work, struct zfcp_erp_add_work, work);
1608         struct zfcp_unit *unit = p->unit;
1609         struct fc_rport *rport = unit->port->rport;
1610         scsi_scan_target(&rport->dev, 0, rport->scsi_target_id,
1611                          unit->scsi_lun, 0);
1612         atomic_clear_mask(ZFCP_STATUS_UNIT_SCSI_WORK_PENDING, &unit->status);
1613         wake_up(&unit->scsi_scan_wq);
1614         zfcp_unit_put(unit);
1615         kfree(p);
1616 }
1617
1618 /**
1619  * zfcp_erp_schedule_work
1620  * @unit: pointer to unit which should be registered with SCSI stack
1621  *
1622  * Schedules work which registers a unit with the SCSI stack
1623  */
1624 static void
1625 zfcp_erp_schedule_work(struct zfcp_unit *unit)
1626 {
1627         struct zfcp_erp_add_work *p;
1628
1629         p = kmalloc(sizeof(*p), GFP_KERNEL);
1630         if (!p) {
1631                 ZFCP_LOG_NORMAL("error: Out of resources. Could not register "
1632                                 "the FCP-LUN 0x%Lx connected to "
1633                                 "the port with WWPN 0x%Lx connected to "
1634                                 "the adapter %s with the SCSI stack.\n",
1635                                 unit->fcp_lun,
1636                                 unit->port->wwpn,
1637                                 zfcp_get_busid_by_unit(unit));
1638                 return;
1639         }
1640
1641         zfcp_unit_get(unit);
1642         memset(p, 0, sizeof(*p));
1643         atomic_set_mask(ZFCP_STATUS_UNIT_SCSI_WORK_PENDING, &unit->status);
1644         INIT_WORK(&p->work, zfcp_erp_scsi_scan);
1645         p->unit = unit;
1646         schedule_work(&p->work);
1647 }
1648
1649 /*
1650  * function:    
1651  *
1652  * purpose:     remaining things in good cases,
1653  *              escalation in bad cases
1654  *
1655  * returns:
1656  */
1657 static int
1658 zfcp_erp_strategy_followup_actions(int action,
1659                                    struct zfcp_adapter *adapter,
1660                                    struct zfcp_port *port,
1661                                    struct zfcp_unit *unit, int status)
1662 {
1663         debug_text_event(adapter->erp_dbf, 5, "a_stfol");
1664         debug_event(adapter->erp_dbf, 5, &action, sizeof (int));
1665
1666         /* initiate follow-up actions depending on success of finished action */
1667         switch (action) {
1668
1669         case ZFCP_ERP_ACTION_REOPEN_ADAPTER:
1670                 if (status == ZFCP_ERP_SUCCEEDED)
1671                         zfcp_erp_port_reopen_all_internal(adapter, 0);
1672                 else
1673                         zfcp_erp_adapter_reopen_internal(adapter, 0);
1674                 break;
1675
1676         case ZFCP_ERP_ACTION_REOPEN_PORT_FORCED:
1677                 if (status == ZFCP_ERP_SUCCEEDED)
1678                         zfcp_erp_port_reopen_internal(port, 0);
1679                 else
1680                         zfcp_erp_adapter_reopen_internal(adapter, 0);
1681                 break;
1682
1683         case ZFCP_ERP_ACTION_REOPEN_PORT:
1684                 if (status == ZFCP_ERP_SUCCEEDED)
1685                         zfcp_erp_unit_reopen_all_internal(port, 0);
1686                 else
1687                         zfcp_erp_port_forced_reopen_internal(port, 0);
1688                 break;
1689
1690         case ZFCP_ERP_ACTION_REOPEN_UNIT:
1691                 if (status == ZFCP_ERP_SUCCEEDED) ;     /* no further action */
1692                 else
1693                         zfcp_erp_port_reopen_internal(unit->port, 0);
1694                 break;
1695         }
1696
1697         return 0;
1698 }
1699
1700 static int
1701 zfcp_erp_strategy_check_queues(struct zfcp_adapter *adapter)
1702 {
1703         unsigned long flags;
1704
1705         read_lock_irqsave(&zfcp_data.config_lock, flags);
1706         read_lock(&adapter->erp_lock);
1707         if (list_empty(&adapter->erp_ready_head) &&
1708             list_empty(&adapter->erp_running_head)) {
1709                         debug_text_event(adapter->erp_dbf, 4, "a_cq_wake");
1710                         atomic_clear_mask(ZFCP_STATUS_ADAPTER_ERP_PENDING,
1711                                           &adapter->status);
1712                         wake_up(&adapter->erp_done_wqh);
1713         } else
1714                 debug_text_event(adapter->erp_dbf, 5, "a_cq_notempty");
1715         read_unlock(&adapter->erp_lock);
1716         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
1717
1718         return 0;
1719 }
1720
1721 /**
1722  * zfcp_erp_wait - wait for completion of error recovery on an adapter
1723  * @adapter: adapter for which to wait for completion of its error recovery
1724  * Return: 0
1725  */
1726 int
1727 zfcp_erp_wait(struct zfcp_adapter *adapter)
1728 {
1729         int retval = 0;
1730
1731         wait_event(adapter->erp_done_wqh,
1732                    !atomic_test_mask(ZFCP_STATUS_ADAPTER_ERP_PENDING,
1733                                      &adapter->status));
1734
1735         return retval;
1736 }
1737
1738 void
1739 zfcp_erp_modify_adapter_status(struct zfcp_adapter *adapter,
1740                                u32 mask, int set_or_clear)
1741 {
1742         struct zfcp_port *port;
1743         u32 common_mask = mask & ZFCP_COMMON_FLAGS;
1744
1745         if (set_or_clear == ZFCP_SET) {
1746                 atomic_set_mask(mask, &adapter->status);
1747                 debug_text_event(adapter->erp_dbf, 3, "a_mod_as_s");
1748         } else {
1749                 atomic_clear_mask(mask, &adapter->status);
1750                 if (mask & ZFCP_STATUS_COMMON_ERP_FAILED)
1751                         atomic_set(&adapter->erp_counter, 0);
1752                 debug_text_event(adapter->erp_dbf, 3, "a_mod_as_c");
1753         }
1754         debug_event(adapter->erp_dbf, 3, &mask, sizeof (u32));
1755
1756         /* Deal with all underlying devices, only pass common_mask */
1757         if (common_mask)
1758                 list_for_each_entry(port, &adapter->port_list_head, list)
1759                     zfcp_erp_modify_port_status(port, common_mask,
1760                                                 set_or_clear);
1761 }
1762
1763 /*
1764  * function:    zfcp_erp_modify_port_status
1765  *
1766  * purpose:     sets the port and all underlying devices to ERP_FAILED
1767  *
1768  */
1769 void
1770 zfcp_erp_modify_port_status(struct zfcp_port *port, u32 mask, int set_or_clear)
1771 {
1772         struct zfcp_unit *unit;
1773         u32 common_mask = mask & ZFCP_COMMON_FLAGS;
1774
1775         if (set_or_clear == ZFCP_SET) {
1776                 atomic_set_mask(mask, &port->status);
1777                 debug_text_event(port->adapter->erp_dbf, 3, "p_mod_ps_s");
1778         } else {
1779                 atomic_clear_mask(mask, &port->status);
1780                 if (mask & ZFCP_STATUS_COMMON_ERP_FAILED)
1781                         atomic_set(&port->erp_counter, 0);
1782                 debug_text_event(port->adapter->erp_dbf, 3, "p_mod_ps_c");
1783         }
1784         debug_event(port->adapter->erp_dbf, 3, &port->wwpn, sizeof (wwn_t));
1785         debug_event(port->adapter->erp_dbf, 3, &mask, sizeof (u32));
1786
1787         /* Modify status of all underlying devices, only pass common mask */
1788         if (common_mask)
1789                 list_for_each_entry(unit, &port->unit_list_head, list)
1790                     zfcp_erp_modify_unit_status(unit, common_mask,
1791                                                 set_or_clear);
1792 }
1793
1794 /*
1795  * function:    zfcp_erp_modify_unit_status
1796  *
1797  * purpose:     sets the unit to ERP_FAILED
1798  *
1799  */
1800 void
1801 zfcp_erp_modify_unit_status(struct zfcp_unit *unit, u32 mask, int set_or_clear)
1802 {
1803         if (set_or_clear == ZFCP_SET) {
1804                 atomic_set_mask(mask, &unit->status);
1805                 debug_text_event(unit->port->adapter->erp_dbf, 3, "u_mod_us_s");
1806         } else {
1807                 atomic_clear_mask(mask, &unit->status);
1808                 if (mask & ZFCP_STATUS_COMMON_ERP_FAILED) {
1809                         atomic_set(&unit->erp_counter, 0);
1810                 }
1811                 debug_text_event(unit->port->adapter->erp_dbf, 3, "u_mod_us_c");
1812         }
1813         debug_event(unit->port->adapter->erp_dbf, 3, &unit->fcp_lun,
1814                     sizeof (fcp_lun_t));
1815         debug_event(unit->port->adapter->erp_dbf, 3, &mask, sizeof (u32));
1816 }
1817
1818 /*
1819  * function:    
1820  *
1821  * purpose:     Wrappper for zfcp_erp_port_reopen_all_internal
1822  *              used to ensure the correct locking
1823  *
1824  * returns:     0       - initiated action successfully
1825  *              <0      - failed to initiate action
1826  */
1827 int
1828 zfcp_erp_port_reopen_all(struct zfcp_adapter *adapter, int clear_mask)
1829 {
1830         int retval;
1831         unsigned long flags;
1832
1833         read_lock_irqsave(&zfcp_data.config_lock, flags);
1834         write_lock(&adapter->erp_lock);
1835         retval = zfcp_erp_port_reopen_all_internal(adapter, clear_mask);
1836         write_unlock(&adapter->erp_lock);
1837         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
1838
1839         return retval;
1840 }
1841
1842 static int
1843 zfcp_erp_port_reopen_all_internal(struct zfcp_adapter *adapter, int clear_mask)
1844 {
1845         int retval = 0;
1846         struct zfcp_port *port;
1847
1848         list_for_each_entry(port, &adapter->port_list_head, list)
1849                 if (!atomic_test_mask(ZFCP_STATUS_PORT_WKA, &port->status))
1850                         zfcp_erp_port_reopen_internal(port, clear_mask);
1851
1852         return retval;
1853 }
1854
1855 /*
1856  * function:    
1857  *
1858  * purpose:     
1859  *
1860  * returns:     FIXME
1861  */
1862 static int
1863 zfcp_erp_unit_reopen_all_internal(struct zfcp_port *port, int clear_mask)
1864 {
1865         int retval = 0;
1866         struct zfcp_unit *unit;
1867
1868         list_for_each_entry(unit, &port->unit_list_head, list)
1869             zfcp_erp_unit_reopen_internal(unit, clear_mask);
1870
1871         return retval;
1872 }
1873
1874 /*
1875  * function:    
1876  *
1877  * purpose:     this routine executes the 'Reopen Adapter' action
1878  *              (the entire action is processed synchronously, since
1879  *              there are no actions which might be run concurrently
1880  *              per definition)
1881  *
1882  * returns:     ZFCP_ERP_SUCCEEDED      - action finished successfully
1883  *              ZFCP_ERP_FAILED         - action finished unsuccessfully
1884  */
1885 static int
1886 zfcp_erp_adapter_strategy(struct zfcp_erp_action *erp_action)
1887 {
1888         int retval;
1889         struct zfcp_adapter *adapter = erp_action->adapter;
1890
1891         retval = zfcp_erp_adapter_strategy_close(erp_action);
1892         if (erp_action->status & ZFCP_STATUS_ERP_CLOSE_ONLY)
1893                 retval = ZFCP_ERP_EXIT;
1894         else
1895                 retval = zfcp_erp_adapter_strategy_open(erp_action);
1896
1897         debug_text_event(adapter->erp_dbf, 3, "a_ast/ret");
1898         debug_event(adapter->erp_dbf, 3, &erp_action->action, sizeof (int));
1899         debug_event(adapter->erp_dbf, 3, &retval, sizeof (int));
1900
1901         if (retval == ZFCP_ERP_FAILED) {
1902                 ZFCP_LOG_INFO("Waiting to allow the adapter %s "
1903                               "to recover itself\n",
1904                               zfcp_get_busid_by_adapter(adapter));
1905                 msleep(jiffies_to_msecs(ZFCP_TYPE2_RECOVERY_TIME));
1906         }
1907
1908         return retval;
1909 }
1910
1911 /*
1912  * function:    
1913  *
1914  * purpose:     
1915  *
1916  * returns:     ZFCP_ERP_SUCCEEDED      - action finished successfully
1917  *              ZFCP_ERP_FAILED         - action finished unsuccessfully
1918  */
1919 static int
1920 zfcp_erp_adapter_strategy_close(struct zfcp_erp_action *erp_action)
1921 {
1922         int retval;
1923
1924         atomic_set_mask(ZFCP_STATUS_COMMON_CLOSING,
1925                         &erp_action->adapter->status);
1926         retval = zfcp_erp_adapter_strategy_generic(erp_action, 1);
1927         atomic_clear_mask(ZFCP_STATUS_COMMON_CLOSING,
1928                           &erp_action->adapter->status);
1929
1930         return retval;
1931 }
1932
1933 /*
1934  * function:    
1935  *
1936  * purpose:     
1937  *
1938  * returns:     ZFCP_ERP_SUCCEEDED      - action finished successfully
1939  *              ZFCP_ERP_FAILED         - action finished unsuccessfully
1940  */
1941 static int
1942 zfcp_erp_adapter_strategy_open(struct zfcp_erp_action *erp_action)
1943 {
1944         int retval;
1945
1946         atomic_set_mask(ZFCP_STATUS_COMMON_OPENING,
1947                         &erp_action->adapter->status);
1948         retval = zfcp_erp_adapter_strategy_generic(erp_action, 0);
1949         atomic_clear_mask(ZFCP_STATUS_COMMON_OPENING,
1950                           &erp_action->adapter->status);
1951
1952         return retval;
1953 }
1954
1955 /*
1956  * function:    zfcp_register_adapter
1957  *
1958  * purpose:     allocate the irq associated with this devno and register
1959  *              the FSF adapter with the SCSI stack
1960  *
1961  * returns:     
1962  */
1963 static int
1964 zfcp_erp_adapter_strategy_generic(struct zfcp_erp_action *erp_action, int close)
1965 {
1966         int retval = ZFCP_ERP_SUCCEEDED;
1967
1968         if (close)
1969                 goto close_only;
1970
1971         retval = zfcp_erp_adapter_strategy_open_qdio(erp_action);
1972         if (retval != ZFCP_ERP_SUCCEEDED)
1973                 goto failed_qdio;
1974
1975         retval = zfcp_erp_adapter_strategy_open_fsf(erp_action);
1976         if (retval != ZFCP_ERP_SUCCEEDED)
1977                 goto failed_openfcp;
1978
1979         atomic_set_mask(ZFCP_STATUS_COMMON_OPEN, &erp_action->adapter->status);
1980         goto out;
1981
1982  close_only:
1983         atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN,
1984                           &erp_action->adapter->status);
1985
1986  failed_openfcp:
1987         zfcp_close_fsf(erp_action->adapter);
1988  failed_qdio:
1989         atomic_clear_mask(ZFCP_STATUS_ADAPTER_XCONFIG_OK |
1990                           ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED |
1991                           ZFCP_STATUS_ADAPTER_XPORT_OK,
1992                           &erp_action->adapter->status);
1993  out:
1994         return retval;
1995 }
1996
1997 /*
1998  * function:    zfcp_qdio_init
1999  *
2000  * purpose:     setup QDIO operation for specified adapter
2001  *
2002  * returns:     0 - successful setup
2003  *              !0 - failed setup
2004  */
2005 int
2006 zfcp_erp_adapter_strategy_open_qdio(struct zfcp_erp_action *erp_action)
2007 {
2008         int retval;
2009         int i;
2010         volatile struct qdio_buffer_element *sbale;
2011         struct zfcp_adapter *adapter = erp_action->adapter;
2012
2013         if (atomic_test_mask(ZFCP_STATUS_ADAPTER_QDIOUP, &adapter->status)) {
2014                 ZFCP_LOG_NORMAL("bug: second attempt to set up QDIO on "
2015                                 "adapter %s\n",
2016                                 zfcp_get_busid_by_adapter(adapter));
2017                 goto failed_sanity;
2018         }
2019
2020         if (qdio_establish(&adapter->qdio_init_data) != 0) {
2021                 ZFCP_LOG_INFO("error: establishment of QDIO queues failed "
2022                               "on adapter %s\n",
2023                               zfcp_get_busid_by_adapter(adapter));
2024                 goto failed_qdio_establish;
2025         }
2026         debug_text_event(adapter->erp_dbf, 3, "qdio_est");
2027
2028         if (qdio_activate(adapter->ccw_device, 0) != 0) {
2029                 ZFCP_LOG_INFO("error: activation of QDIO queues failed "
2030                               "on adapter %s\n",
2031                               zfcp_get_busid_by_adapter(adapter));
2032                 goto failed_qdio_activate;
2033         }
2034         debug_text_event(adapter->erp_dbf, 3, "qdio_act");
2035
2036         /*
2037          * put buffers into response queue,
2038          */
2039         for (i = 0; i < QDIO_MAX_BUFFERS_PER_Q; i++) {
2040                 sbale = &(adapter->response_queue.buffer[i]->element[0]);
2041                 sbale->length = 0;
2042                 sbale->flags = SBAL_FLAGS_LAST_ENTRY;
2043                 sbale->addr = NULL;
2044         }
2045
2046         ZFCP_LOG_TRACE("calling do_QDIO on adapter %s (flags=0x%x, "
2047                        "queue_no=%i, index_in_queue=%i, count=%i)\n",
2048                        zfcp_get_busid_by_adapter(adapter),
2049                        QDIO_FLAG_SYNC_INPUT, 0, 0, QDIO_MAX_BUFFERS_PER_Q);
2050
2051         retval = do_QDIO(adapter->ccw_device,
2052                          QDIO_FLAG_SYNC_INPUT,
2053                          0, 0, QDIO_MAX_BUFFERS_PER_Q, NULL);
2054
2055         if (retval) {
2056                 ZFCP_LOG_NORMAL("bug: setup of QDIO failed (retval=%d)\n",
2057                                 retval);
2058                 goto failed_do_qdio;
2059         } else {
2060                 adapter->response_queue.free_index = 0;
2061                 atomic_set(&adapter->response_queue.free_count, 0);
2062                 ZFCP_LOG_DEBUG("%i buffers successfully enqueued to "
2063                                "response queue\n", QDIO_MAX_BUFFERS_PER_Q);
2064         }
2065         /* set index of first avalable SBALS / number of available SBALS */
2066         adapter->request_queue.free_index = 0;
2067         atomic_set(&adapter->request_queue.free_count, QDIO_MAX_BUFFERS_PER_Q);
2068         adapter->request_queue.distance_from_int = 0;
2069
2070         /* initialize waitqueue used to wait for free SBALs in requests queue */
2071         init_waitqueue_head(&adapter->request_wq);
2072
2073         /* ok, we did it - skip all cleanups for different failures */
2074         atomic_set_mask(ZFCP_STATUS_ADAPTER_QDIOUP, &adapter->status);
2075         retval = ZFCP_ERP_SUCCEEDED;
2076         goto out;
2077
2078  failed_do_qdio:
2079         /* NOP */
2080
2081  failed_qdio_activate:
2082         debug_text_event(adapter->erp_dbf, 3, "qdio_down1a");
2083         while (qdio_shutdown(adapter->ccw_device,
2084                              QDIO_FLAG_CLEANUP_USING_CLEAR) == -EINPROGRESS)
2085                 msleep(1000);
2086         debug_text_event(adapter->erp_dbf, 3, "qdio_down1b");
2087
2088  failed_qdio_establish:
2089  failed_sanity:
2090         retval = ZFCP_ERP_FAILED;
2091
2092  out:
2093         return retval;
2094 }
2095
2096
2097 static int
2098 zfcp_erp_adapter_strategy_open_fsf(struct zfcp_erp_action *erp_action)
2099 {
2100         int retval;
2101
2102         retval = zfcp_erp_adapter_strategy_open_fsf_xconfig(erp_action);
2103         if (retval == ZFCP_ERP_FAILED)
2104                 return ZFCP_ERP_FAILED;
2105
2106         retval = zfcp_erp_adapter_strategy_open_fsf_xport(erp_action);
2107         if (retval == ZFCP_ERP_FAILED)
2108                 return ZFCP_ERP_FAILED;
2109
2110         return zfcp_erp_adapter_strategy_open_fsf_statusread(erp_action);
2111 }
2112
2113 static int
2114 zfcp_erp_adapter_strategy_open_fsf_xconfig(struct zfcp_erp_action *erp_action)
2115 {
2116         int retval = ZFCP_ERP_SUCCEEDED;
2117         int retries;
2118         int sleep = ZFCP_EXCHANGE_CONFIG_DATA_FIRST_SLEEP;
2119         struct zfcp_adapter *adapter = erp_action->adapter;
2120
2121         atomic_clear_mask(ZFCP_STATUS_ADAPTER_XCONFIG_OK, &adapter->status);
2122
2123         for (retries = ZFCP_EXCHANGE_CONFIG_DATA_RETRIES; retries; retries--) {
2124                 atomic_clear_mask(ZFCP_STATUS_ADAPTER_HOST_CON_INIT,
2125                                   &adapter->status);
2126                 ZFCP_LOG_DEBUG("Doing exchange config data\n");
2127                 write_lock_irq(&adapter->erp_lock);
2128                 zfcp_erp_action_to_running(erp_action);
2129                 write_unlock_irq(&adapter->erp_lock);
2130                 if (zfcp_fsf_exchange_config_data(erp_action)) {
2131                         retval = ZFCP_ERP_FAILED;
2132                         debug_text_event(adapter->erp_dbf, 5, "a_fstx_xf");
2133                         ZFCP_LOG_INFO("error:  initiation of exchange of "
2134                                       "configuration data failed for "
2135                                       "adapter %s\n",
2136                                       zfcp_get_busid_by_adapter(adapter));
2137                         break;
2138                 }
2139                 debug_text_event(adapter->erp_dbf, 6, "a_fstx_xok");
2140                 ZFCP_LOG_DEBUG("Xchange underway\n");
2141
2142                 /*
2143                  * Why this works:
2144                  * Both the normal completion handler as well as the timeout
2145                  * handler will do an 'up' when the 'exchange config data'
2146                  * request completes or times out. Thus, the signal to go on
2147                  * won't be lost utilizing this semaphore.
2148                  * Furthermore, this 'adapter_reopen' action is
2149                  * guaranteed to be the only action being there (highest action
2150                  * which prevents other actions from being created).
2151                  * Resulting from that, the wake signal recognized here
2152                  * _must_ be the one belonging to the 'exchange config
2153                  * data' request.
2154                  */
2155                 down(&adapter->erp_ready_sem);
2156                 if (erp_action->status & ZFCP_STATUS_ERP_TIMEDOUT) {
2157                         ZFCP_LOG_INFO("error: exchange of configuration data "
2158                                       "for adapter %s timed out\n",
2159                                       zfcp_get_busid_by_adapter(adapter));
2160                         break;
2161                 }
2162
2163                 if (!atomic_test_mask(ZFCP_STATUS_ADAPTER_HOST_CON_INIT,
2164                                      &adapter->status))
2165                         break;
2166
2167                 ZFCP_LOG_DEBUG("host connection still initialising... "
2168                                "waiting and retrying...\n");
2169                 /* sleep a little bit before retry */
2170                 msleep(jiffies_to_msecs(sleep));
2171                 sleep *= 2;
2172         }
2173
2174         atomic_clear_mask(ZFCP_STATUS_ADAPTER_HOST_CON_INIT,
2175                           &adapter->status);
2176
2177         if (!atomic_test_mask(ZFCP_STATUS_ADAPTER_XCONFIG_OK,
2178                               &adapter->status)) {
2179                 ZFCP_LOG_INFO("error: exchange of configuration data for "
2180                               "adapter %s failed\n",
2181                               zfcp_get_busid_by_adapter(adapter));
2182                 retval = ZFCP_ERP_FAILED;
2183         }
2184
2185         return retval;
2186 }
2187
2188 static int
2189 zfcp_erp_adapter_strategy_open_fsf_xport(struct zfcp_erp_action *erp_action)
2190 {
2191         int ret;
2192         struct zfcp_adapter *adapter;
2193
2194         adapter = erp_action->adapter;
2195         atomic_clear_mask(ZFCP_STATUS_ADAPTER_XPORT_OK, &adapter->status);
2196
2197         write_lock_irq(&adapter->erp_lock);
2198         zfcp_erp_action_to_running(erp_action);
2199         write_unlock_irq(&adapter->erp_lock);
2200
2201         ret = zfcp_fsf_exchange_port_data(erp_action, adapter, NULL);
2202         if (ret == -EOPNOTSUPP) {
2203                 debug_text_event(adapter->erp_dbf, 3, "a_xport_notsupp");
2204                 return ZFCP_ERP_SUCCEEDED;
2205         } else if (ret) {
2206                 debug_text_event(adapter->erp_dbf, 3, "a_xport_failed");
2207                 return ZFCP_ERP_FAILED;
2208         }
2209         debug_text_event(adapter->erp_dbf, 6, "a_xport_ok");
2210
2211         ret = ZFCP_ERP_SUCCEEDED;
2212         down(&adapter->erp_ready_sem);
2213         if (erp_action->status & ZFCP_STATUS_ERP_TIMEDOUT) {
2214                 ZFCP_LOG_INFO("error: exchange port data timed out (adapter "
2215                               "%s)\n", zfcp_get_busid_by_adapter(adapter));
2216                 ret = ZFCP_ERP_FAILED;
2217         }
2218
2219         /* don't treat as error for the sake of compatibility */
2220         if (!atomic_test_mask(ZFCP_STATUS_ADAPTER_XPORT_OK, &adapter->status))
2221                 ZFCP_LOG_INFO("warning: exchange port data failed (adapter "
2222                               "%s\n", zfcp_get_busid_by_adapter(adapter));
2223
2224         return ret;
2225 }
2226
2227 static int
2228 zfcp_erp_adapter_strategy_open_fsf_statusread(struct zfcp_erp_action
2229                                               *erp_action)
2230 {
2231         int retval = ZFCP_ERP_SUCCEEDED;
2232         int temp_ret;
2233         struct zfcp_adapter *adapter = erp_action->adapter;
2234         int i;
2235
2236         adapter->status_read_failed = 0;
2237         for (i = 0; i < ZFCP_STATUS_READS_RECOM; i++) {
2238                 temp_ret = zfcp_fsf_status_read(adapter, ZFCP_WAIT_FOR_SBAL);
2239                 if (temp_ret < 0) {
2240                         ZFCP_LOG_INFO("error: set-up of unsolicited status "
2241                                       "notification failed on adapter %s\n",
2242                                       zfcp_get_busid_by_adapter(adapter));
2243                         retval = ZFCP_ERP_FAILED;
2244                         i--;
2245                         break;
2246                 }
2247         }
2248
2249         return retval;
2250 }
2251
2252 /*
2253  * function:    
2254  *
2255  * purpose:     this routine executes the 'Reopen Physical Port' action
2256  *
2257  * returns:     ZFCP_ERP_CONTINUES      - action continues (asynchronously)
2258  *              ZFCP_ERP_SUCCEEDED      - action finished successfully
2259  *              ZFCP_ERP_FAILED         - action finished unsuccessfully
2260  */
2261 static int
2262 zfcp_erp_port_forced_strategy(struct zfcp_erp_action *erp_action)
2263 {
2264         int retval = ZFCP_ERP_FAILED;
2265         struct zfcp_port *port = erp_action->port;
2266         struct zfcp_adapter *adapter = erp_action->adapter;
2267
2268         switch (erp_action->step) {
2269
2270                 /*
2271                  * FIXME:
2272                  * the ULP spec. begs for waiting for oustanding commands
2273                  */
2274         case ZFCP_ERP_STEP_UNINITIALIZED:
2275                 zfcp_erp_port_strategy_clearstati(port);
2276                 /*
2277                  * it would be sufficient to test only the normal open flag
2278                  * since the phys. open flag cannot be set if the normal
2279                  * open flag is unset - however, this is for readabilty ...
2280                  */
2281                 if (atomic_test_mask((ZFCP_STATUS_PORT_PHYS_OPEN |
2282                                       ZFCP_STATUS_COMMON_OPEN),
2283                                      &port->status)) {
2284                         ZFCP_LOG_DEBUG("port 0x%016Lx is open -> trying "
2285                                        "close physical\n", port->wwpn);
2286                         retval =
2287                             zfcp_erp_port_forced_strategy_close(erp_action);
2288                 } else
2289                         retval = ZFCP_ERP_FAILED;
2290                 break;
2291
2292         case ZFCP_ERP_STEP_PHYS_PORT_CLOSING:
2293                 if (atomic_test_mask(ZFCP_STATUS_PORT_PHYS_OPEN,
2294                                      &port->status)) {
2295                         ZFCP_LOG_DEBUG("close physical failed for port "
2296                                        "0x%016Lx\n", port->wwpn);
2297                         retval = ZFCP_ERP_FAILED;
2298                 } else
2299                         retval = ZFCP_ERP_SUCCEEDED;
2300                 break;
2301         }
2302
2303         debug_text_event(adapter->erp_dbf, 3, "p_pfst/ret");
2304         debug_event(adapter->erp_dbf, 3, &port->wwpn, sizeof (wwn_t));
2305         debug_event(adapter->erp_dbf, 3, &erp_action->action, sizeof (int));
2306         debug_event(adapter->erp_dbf, 3, &retval, sizeof (int));
2307
2308         return retval;
2309 }
2310
2311 /*
2312  * function:    
2313  *
2314  * purpose:     this routine executes the 'Reopen Port' action
2315  *
2316  * returns:     ZFCP_ERP_CONTINUES      - action continues (asynchronously)
2317  *              ZFCP_ERP_SUCCEEDED      - action finished successfully
2318  *              ZFCP_ERP_FAILED         - action finished unsuccessfully
2319  */
2320 static int
2321 zfcp_erp_port_strategy(struct zfcp_erp_action *erp_action)
2322 {
2323         int retval = ZFCP_ERP_FAILED;
2324         struct zfcp_port *port = erp_action->port;
2325         struct zfcp_adapter *adapter = erp_action->adapter;
2326
2327         switch (erp_action->step) {
2328
2329                 /*
2330                  * FIXME:
2331                  * the ULP spec. begs for waiting for oustanding commands
2332                  */
2333         case ZFCP_ERP_STEP_UNINITIALIZED:
2334                 zfcp_erp_port_strategy_clearstati(port);
2335                 if (atomic_test_mask(ZFCP_STATUS_COMMON_OPEN, &port->status)) {
2336                         ZFCP_LOG_DEBUG("port 0x%016Lx is open -> trying "
2337                                        "close\n", port->wwpn);
2338                         retval = zfcp_erp_port_strategy_close(erp_action);
2339                         goto out;
2340                 }               /* else it's already closed, open it */
2341                 break;
2342
2343         case ZFCP_ERP_STEP_PORT_CLOSING:
2344                 if (atomic_test_mask(ZFCP_STATUS_COMMON_OPEN, &port->status)) {
2345                         ZFCP_LOG_DEBUG("close failed for port 0x%016Lx\n",
2346                                        port->wwpn);
2347                         retval = ZFCP_ERP_FAILED;
2348                         goto out;
2349                 }               /* else it's closed now, open it */
2350                 break;
2351         }
2352         if (erp_action->status & ZFCP_STATUS_ERP_CLOSE_ONLY)
2353                 retval = ZFCP_ERP_EXIT;
2354         else
2355                 retval = zfcp_erp_port_strategy_open(erp_action);
2356
2357  out:
2358         debug_text_event(adapter->erp_dbf, 3, "p_pst/ret");
2359         debug_event(adapter->erp_dbf, 3, &port->wwpn, sizeof (wwn_t));
2360         debug_event(adapter->erp_dbf, 3, &erp_action->action, sizeof (int));
2361         debug_event(adapter->erp_dbf, 3, &retval, sizeof (int));
2362
2363         return retval;
2364 }
2365
2366 static int
2367 zfcp_erp_port_strategy_open(struct zfcp_erp_action *erp_action)
2368 {
2369         int retval;
2370
2371         if (atomic_test_mask(ZFCP_STATUS_PORT_WKA,
2372                              &erp_action->port->status))
2373                 retval = zfcp_erp_port_strategy_open_nameserver(erp_action);
2374         else
2375                 retval = zfcp_erp_port_strategy_open_common(erp_action);
2376
2377         return retval;
2378 }
2379
2380 static int
2381 zfcp_erp_port_strategy_open_common(struct zfcp_erp_action *erp_action)
2382 {
2383         int retval = 0;
2384         struct zfcp_adapter *adapter = erp_action->adapter;
2385         struct zfcp_port *port = erp_action->port;
2386
2387         switch (erp_action->step) {
2388
2389         case ZFCP_ERP_STEP_UNINITIALIZED:
2390         case ZFCP_ERP_STEP_PHYS_PORT_CLOSING:
2391         case ZFCP_ERP_STEP_PORT_CLOSING:
2392                 if (fc_host_port_type(adapter->scsi_host) == FC_PORTTYPE_PTP) {
2393                         if (port->wwpn != adapter->peer_wwpn) {
2394                                 ZFCP_LOG_NORMAL("Failed to open port 0x%016Lx "
2395                                                 "on adapter %s.\nPeer WWPN "
2396                                                 "0x%016Lx does not match\n",
2397                                                 port->wwpn,
2398                                                 zfcp_get_busid_by_adapter(adapter),
2399                                                 adapter->peer_wwpn);
2400                                 zfcp_erp_port_failed(port);
2401                                 retval = ZFCP_ERP_FAILED;
2402                                 break;
2403                         }
2404                         port->d_id = adapter->peer_d_id;
2405                         atomic_set_mask(ZFCP_STATUS_PORT_DID_DID, &port->status);
2406                         retval = zfcp_erp_port_strategy_open_port(erp_action);
2407                         break;
2408                 }
2409                 if (!(adapter->nameserver_port)) {
2410                         retval = zfcp_nameserver_enqueue(adapter);
2411                         if (retval != 0) {
2412                                 ZFCP_LOG_NORMAL("error: nameserver port "
2413                                                 "unavailable for adapter %s\n",
2414                                                 zfcp_get_busid_by_adapter(adapter));
2415                                 retval = ZFCP_ERP_FAILED;
2416                                 break;
2417                         }
2418                 }
2419                 if (!atomic_test_mask(ZFCP_STATUS_COMMON_UNBLOCKED,
2420                                       &adapter->nameserver_port->status)) {
2421                         ZFCP_LOG_DEBUG("nameserver port is not open -> open "
2422                                        "nameserver port\n");
2423                         /* nameserver port may live again */
2424                         atomic_set_mask(ZFCP_STATUS_COMMON_RUNNING,
2425                                         &adapter->nameserver_port->status);
2426                         if (zfcp_erp_port_reopen(adapter->nameserver_port, 0)
2427                             >= 0) {
2428                                 erp_action->step =
2429                                         ZFCP_ERP_STEP_NAMESERVER_OPEN;
2430                                 retval = ZFCP_ERP_CONTINUES;
2431                         } else
2432                                 retval = ZFCP_ERP_FAILED;
2433                         break;
2434                 }
2435                 /* else nameserver port is already open, fall through */
2436         case ZFCP_ERP_STEP_NAMESERVER_OPEN:
2437                 if (!atomic_test_mask(ZFCP_STATUS_COMMON_OPEN,
2438                                       &adapter->nameserver_port->status)) {
2439                         ZFCP_LOG_DEBUG("open failed for nameserver port\n");
2440                         retval = ZFCP_ERP_FAILED;
2441                 } else {
2442                         ZFCP_LOG_DEBUG("nameserver port is open -> "
2443                                        "nameserver look-up for port 0x%016Lx\n",
2444                                        port->wwpn);
2445                         retval = zfcp_erp_port_strategy_open_common_lookup
2446                                 (erp_action);
2447                 }
2448                 break;
2449
2450         case ZFCP_ERP_STEP_NAMESERVER_LOOKUP:
2451                 if (!atomic_test_mask(ZFCP_STATUS_PORT_DID_DID, &port->status)) {
2452                         if (atomic_test_mask
2453                             (ZFCP_STATUS_PORT_INVALID_WWPN, &port->status)) {
2454                                 ZFCP_LOG_DEBUG("nameserver look-up failed "
2455                                                "for port 0x%016Lx "
2456                                                "(misconfigured WWPN?)\n",
2457                                                port->wwpn);
2458                                 zfcp_erp_port_failed(port);
2459                                 retval = ZFCP_ERP_EXIT;
2460                         } else {
2461                                 ZFCP_LOG_DEBUG("nameserver look-up failed for "
2462                                                "port 0x%016Lx\n", port->wwpn);
2463                                 retval = ZFCP_ERP_FAILED;
2464                         }
2465                 } else {
2466                         ZFCP_LOG_DEBUG("port 0x%016Lx has d_id=0x%06x -> "
2467                                        "trying open\n", port->wwpn, port->d_id);
2468                         retval = zfcp_erp_port_strategy_open_port(erp_action);
2469                 }
2470                 break;
2471
2472         case ZFCP_ERP_STEP_PORT_OPENING:
2473                 /* D_ID might have changed during open */
2474                 if (atomic_test_mask((ZFCP_STATUS_COMMON_OPEN |
2475                                       ZFCP_STATUS_PORT_DID_DID),
2476                                      &port->status)) {
2477                         ZFCP_LOG_DEBUG("port 0x%016Lx is open\n", port->wwpn);
2478                         retval = ZFCP_ERP_SUCCEEDED;
2479                 } else {
2480                         ZFCP_LOG_DEBUG("open failed for port 0x%016Lx\n",
2481                                        port->wwpn);
2482                         retval = ZFCP_ERP_FAILED;
2483                 }
2484                 break;
2485
2486         default:
2487                 ZFCP_LOG_NORMAL("bug: unknown erp step 0x%08x\n",
2488                                 erp_action->step);
2489                 retval = ZFCP_ERP_FAILED;
2490         }
2491
2492         return retval;
2493 }
2494
2495 static int
2496 zfcp_erp_port_strategy_open_nameserver(struct zfcp_erp_action *erp_action)
2497 {
2498         int retval;
2499         struct zfcp_port *port = erp_action->port;
2500
2501         switch (erp_action->step) {
2502
2503         case ZFCP_ERP_STEP_UNINITIALIZED:
2504         case ZFCP_ERP_STEP_PHYS_PORT_CLOSING:
2505         case ZFCP_ERP_STEP_PORT_CLOSING:
2506                 ZFCP_LOG_DEBUG("port 0x%016Lx has d_id=0x%06x -> trying open\n",
2507                                port->wwpn, port->d_id);
2508                 retval = zfcp_erp_port_strategy_open_port(erp_action);
2509                 break;
2510
2511         case ZFCP_ERP_STEP_PORT_OPENING:
2512                 if (atomic_test_mask(ZFCP_STATUS_COMMON_OPEN, &port->status)) {
2513                         ZFCP_LOG_DEBUG("WKA port is open\n");
2514                         retval = ZFCP_ERP_SUCCEEDED;
2515                 } else {
2516                         ZFCP_LOG_DEBUG("open failed for WKA port\n");
2517                         retval = ZFCP_ERP_FAILED;
2518                 }
2519                 /* this is needed anyway (dont care for retval of wakeup) */
2520                 ZFCP_LOG_DEBUG("continue other open port operations\n");
2521                 zfcp_erp_port_strategy_open_nameserver_wakeup(erp_action);
2522                 break;
2523
2524         default:
2525                 ZFCP_LOG_NORMAL("bug: unknown erp step 0x%08x\n",
2526                                 erp_action->step);
2527                 retval = ZFCP_ERP_FAILED;
2528         }
2529
2530         return retval;
2531 }
2532
2533 /*
2534  * function:    
2535  *
2536  * purpose:     makes the erp thread continue with reopen (physical) port
2537  *              actions which have been paused until the name server port
2538  *              is opened (or failed)
2539  *
2540  * returns:     0       (a kind of void retval, its not used)
2541  */
2542 static int
2543 zfcp_erp_port_strategy_open_nameserver_wakeup(struct zfcp_erp_action
2544                                               *ns_erp_action)
2545 {
2546         int retval = 0;
2547         unsigned long flags;
2548         struct zfcp_adapter *adapter = ns_erp_action->adapter;
2549         struct zfcp_erp_action *erp_action, *tmp;
2550
2551         read_lock_irqsave(&adapter->erp_lock, flags);
2552         list_for_each_entry_safe(erp_action, tmp, &adapter->erp_running_head,
2553                                  list) {
2554                 debug_text_event(adapter->erp_dbf, 4, "p_pstnsw_n");
2555                 debug_event(adapter->erp_dbf, 4, &erp_action->port->wwpn,
2556                             sizeof (wwn_t));
2557                 if (erp_action->step == ZFCP_ERP_STEP_NAMESERVER_OPEN) {
2558                         debug_text_event(adapter->erp_dbf, 3, "p_pstnsw_w");
2559                         debug_event(adapter->erp_dbf, 3,
2560                                     &erp_action->port->wwpn, sizeof (wwn_t));
2561                         if (atomic_test_mask(
2562                                     ZFCP_STATUS_COMMON_ERP_FAILED,
2563                                     &adapter->nameserver_port->status))
2564                                 zfcp_erp_port_failed(erp_action->port);
2565                         zfcp_erp_action_ready(erp_action);
2566                 }
2567         }
2568         read_unlock_irqrestore(&adapter->erp_lock, flags);
2569
2570         return retval;
2571 }
2572
2573 /*
2574  * function:    
2575  *
2576  * purpose:     
2577  *
2578  * returns:     ZFCP_ERP_CONTINUES      - action continues (asynchronously)
2579  *              ZFCP_ERP_FAILED         - action finished unsuccessfully
2580  */
2581 static int
2582 zfcp_erp_port_forced_strategy_close(struct zfcp_erp_action *erp_action)
2583 {
2584         int retval;
2585         struct zfcp_adapter *adapter = erp_action->adapter;
2586         struct zfcp_port *port = erp_action->port;
2587
2588         retval = zfcp_fsf_close_physical_port(erp_action);
2589         if (retval == -ENOMEM) {
2590                 debug_text_event(adapter->erp_dbf, 5, "o_pfstc_nomem");
2591                 debug_event(adapter->erp_dbf, 5, &port->wwpn, sizeof (wwn_t));
2592                 retval = ZFCP_ERP_NOMEM;
2593                 goto out;
2594         }
2595         erp_action->step = ZFCP_ERP_STEP_PHYS_PORT_CLOSING;
2596         if (retval != 0) {
2597                 debug_text_event(adapter->erp_dbf, 5, "o_pfstc_cpf");
2598                 debug_event(adapter->erp_dbf, 5, &port->wwpn, sizeof (wwn_t));
2599                 /* could not send 'open', fail */
2600                 retval = ZFCP_ERP_FAILED;
2601                 goto out;
2602         }
2603         debug_text_event(adapter->erp_dbf, 6, "o_pfstc_cpok");
2604         debug_event(adapter->erp_dbf, 6, &port->wwpn, sizeof (wwn_t));
2605         retval = ZFCP_ERP_CONTINUES;
2606  out:
2607         return retval;
2608 }
2609
2610 static int
2611 zfcp_erp_port_strategy_clearstati(struct zfcp_port *port)
2612 {
2613         int retval = 0;
2614         struct zfcp_adapter *adapter = port->adapter;
2615
2616         debug_text_event(adapter->erp_dbf, 5, "p_pstclst");
2617         debug_event(adapter->erp_dbf, 5, &port->wwpn, sizeof (wwn_t));
2618
2619         atomic_clear_mask(ZFCP_STATUS_COMMON_OPENING |
2620                           ZFCP_STATUS_COMMON_CLOSING |
2621                           ZFCP_STATUS_COMMON_ACCESS_DENIED |
2622                           ZFCP_STATUS_PORT_DID_DID |
2623                           ZFCP_STATUS_PORT_PHYS_CLOSING |
2624                           ZFCP_STATUS_PORT_INVALID_WWPN,
2625                           &port->status);
2626         return retval;
2627 }
2628
2629 /*
2630  * function:    
2631  *
2632  * purpose:     
2633  *
2634  * returns:     ZFCP_ERP_CONTINUES      - action continues (asynchronously)
2635  *              ZFCP_ERP_FAILED         - action finished unsuccessfully
2636  */
2637 static int
2638 zfcp_erp_port_strategy_close(struct zfcp_erp_action *erp_action)
2639 {
2640         int retval;
2641         struct zfcp_adapter *adapter = erp_action->adapter;
2642         struct zfcp_port *port = erp_action->port;
2643
2644         retval = zfcp_fsf_close_port(erp_action);
2645         if (retval == -ENOMEM) {
2646                 debug_text_event(adapter->erp_dbf, 5, "p_pstc_nomem");
2647                 debug_event(adapter->erp_dbf, 5, &port->wwpn, sizeof (wwn_t));
2648                 retval = ZFCP_ERP_NOMEM;
2649                 goto out;
2650         }
2651         erp_action->step = ZFCP_ERP_STEP_PORT_CLOSING;
2652         if (retval != 0) {
2653                 debug_text_event(adapter->erp_dbf, 5, "p_pstc_cpf");
2654                 debug_event(adapter->erp_dbf, 5, &port->wwpn, sizeof (wwn_t));
2655                 /* could not send 'close', fail */
2656                 retval = ZFCP_ERP_FAILED;
2657                 goto out;
2658         }
2659         debug_text_event(adapter->erp_dbf, 6, "p_pstc_cpok");
2660         debug_event(adapter->erp_dbf, 6, &port->wwpn, sizeof (wwn_t));
2661         retval = ZFCP_ERP_CONTINUES;
2662  out:
2663         return retval;
2664 }
2665
2666 /*
2667  * function:    
2668  *
2669  * purpose:     
2670  *
2671  * returns:     ZFCP_ERP_CONTINUES      - action continues (asynchronously)
2672  *              ZFCP_ERP_FAILED         - action finished unsuccessfully
2673  */
2674 static int
2675 zfcp_erp_port_strategy_open_port(struct zfcp_erp_action *erp_action)
2676 {
2677         int retval;
2678         struct zfcp_adapter *adapter = erp_action->adapter;
2679         struct zfcp_port *port = erp_action->port;
2680
2681         retval = zfcp_fsf_open_port(erp_action);
2682         if (retval == -ENOMEM) {
2683                 debug_text_event(adapter->erp_dbf, 5, "p_psto_nomem");
2684                 debug_event(adapter->erp_dbf, 5, &port->wwpn, sizeof (wwn_t));
2685                 retval = ZFCP_ERP_NOMEM;
2686                 goto out;
2687         }
2688         erp_action->step = ZFCP_ERP_STEP_PORT_OPENING;
2689         if (retval != 0) {
2690                 debug_text_event(adapter->erp_dbf, 5, "p_psto_opf");
2691                 debug_event(adapter->erp_dbf, 5, &port->wwpn, sizeof (wwn_t));
2692                 /* could not send 'open', fail */
2693                 retval = ZFCP_ERP_FAILED;
2694                 goto out;
2695         }
2696         debug_text_event(adapter->erp_dbf, 6, "p_psto_opok");
2697         debug_event(adapter->erp_dbf, 6, &port->wwpn, sizeof (wwn_t));
2698         retval = ZFCP_ERP_CONTINUES;
2699  out:
2700         return retval;
2701 }
2702
2703 /*
2704  * function:    
2705  *
2706  * purpose:     
2707  *
2708  * returns:     ZFCP_ERP_CONTINUES      - action continues (asynchronously)
2709  *              ZFCP_ERP_FAILED         - action finished unsuccessfully
2710  */
2711 static int
2712 zfcp_erp_port_strategy_open_common_lookup(struct zfcp_erp_action *erp_action)
2713 {
2714         int retval;
2715         struct zfcp_adapter *adapter = erp_action->adapter;
2716         struct zfcp_port *port = erp_action->port;
2717
2718         retval = zfcp_ns_gid_pn_request(erp_action);
2719         if (retval == -ENOMEM) {
2720                 debug_text_event(adapter->erp_dbf, 5, "p_pstn_nomem");
2721                 debug_event(adapter->erp_dbf, 5, &port->wwpn, sizeof (wwn_t));
2722                 retval = ZFCP_ERP_NOMEM;
2723                 goto out;
2724         }
2725         erp_action->step = ZFCP_ERP_STEP_NAMESERVER_LOOKUP;
2726         if (retval != 0) {
2727                 debug_text_event(adapter->erp_dbf, 5, "p_pstn_ref");
2728                 debug_event(adapter->erp_dbf, 5, &port->wwpn, sizeof (wwn_t));
2729                 /* could not send nameserver request, fail */
2730                 retval = ZFCP_ERP_FAILED;
2731                 goto out;
2732         }
2733         debug_text_event(adapter->erp_dbf, 6, "p_pstn_reok");
2734         debug_event(adapter->erp_dbf, 6, &port->wwpn, sizeof (wwn_t));
2735         retval = ZFCP_ERP_CONTINUES;
2736  out:
2737         return retval;
2738 }
2739
2740 /*
2741  * function:    
2742  *
2743  * purpose:     this routine executes the 'Reopen Unit' action
2744  *              currently no retries
2745  *
2746  * returns:     ZFCP_ERP_CONTINUES      - action continues (asynchronously)
2747  *              ZFCP_ERP_SUCCEEDED      - action finished successfully
2748  *              ZFCP_ERP_FAILED         - action finished unsuccessfully
2749  */
2750 static int
2751 zfcp_erp_unit_strategy(struct zfcp_erp_action *erp_action)
2752 {
2753         int retval = ZFCP_ERP_FAILED;
2754         struct zfcp_unit *unit = erp_action->unit;
2755         struct zfcp_adapter *adapter = erp_action->adapter;
2756
2757         switch (erp_action->step) {
2758
2759                 /*
2760                  * FIXME:
2761                  * the ULP spec. begs for waiting for oustanding commands
2762                  */
2763         case ZFCP_ERP_STEP_UNINITIALIZED:
2764                 zfcp_erp_unit_strategy_clearstati(unit);
2765                 if (atomic_test_mask(ZFCP_STATUS_COMMON_OPEN, &unit->status)) {
2766                         ZFCP_LOG_DEBUG("unit 0x%016Lx is open -> "
2767                                        "trying close\n", unit->fcp_lun);
2768                         retval = zfcp_erp_unit_strategy_close(erp_action);
2769                         break;
2770                 }
2771                 /* else it's already closed, fall through */
2772         case ZFCP_ERP_STEP_UNIT_CLOSING:
2773                 if (atomic_test_mask(ZFCP_STATUS_COMMON_OPEN, &unit->status)) {
2774                         ZFCP_LOG_DEBUG("close failed for unit 0x%016Lx\n",
2775                                        unit->fcp_lun);
2776                         retval = ZFCP_ERP_FAILED;
2777                 } else {
2778                         if (erp_action->status & ZFCP_STATUS_ERP_CLOSE_ONLY)
2779                                 retval = ZFCP_ERP_EXIT;
2780                         else {
2781                                 ZFCP_LOG_DEBUG("unit 0x%016Lx is not open -> "
2782                                                "trying open\n", unit->fcp_lun);
2783                                 retval =
2784                                     zfcp_erp_unit_strategy_open(erp_action);
2785                         }
2786                 }
2787                 break;
2788
2789         case ZFCP_ERP_STEP_UNIT_OPENING:
2790                 if (atomic_test_mask(ZFCP_STATUS_COMMON_OPEN, &unit->status)) {
2791                         ZFCP_LOG_DEBUG("unit 0x%016Lx is open\n",
2792                                        unit->fcp_lun);
2793                         retval = ZFCP_ERP_SUCCEEDED;
2794                 } else {
2795                         ZFCP_LOG_DEBUG("open failed for unit 0x%016Lx\n",
2796                                        unit->fcp_lun);
2797                         retval = ZFCP_ERP_FAILED;
2798                 }
2799                 break;
2800         }
2801
2802         debug_text_event(adapter->erp_dbf, 3, "u_ust/ret");
2803         debug_event(adapter->erp_dbf, 3, &unit->fcp_lun, sizeof (fcp_lun_t));
2804         debug_event(adapter->erp_dbf, 3, &erp_action->action, sizeof (int));
2805         debug_event(adapter->erp_dbf, 3, &retval, sizeof (int));
2806         return retval;
2807 }
2808
2809 static int
2810 zfcp_erp_unit_strategy_clearstati(struct zfcp_unit *unit)
2811 {
2812         int retval = 0;
2813         struct zfcp_adapter *adapter = unit->port->adapter;
2814
2815         debug_text_event(adapter->erp_dbf, 5, "u_ustclst");
2816         debug_event(adapter->erp_dbf, 5, &unit->fcp_lun, sizeof (fcp_lun_t));
2817
2818         atomic_clear_mask(ZFCP_STATUS_COMMON_OPENING |
2819                           ZFCP_STATUS_COMMON_CLOSING |
2820                           ZFCP_STATUS_COMMON_ACCESS_DENIED |
2821                           ZFCP_STATUS_UNIT_SHARED |
2822                           ZFCP_STATUS_UNIT_READONLY,
2823                           &unit->status);
2824
2825         return retval;
2826 }
2827
2828 /*
2829  * function:    
2830  *
2831  * purpose:     
2832  *
2833  * returns:     ZFCP_ERP_CONTINUES      - action continues (asynchronously)
2834  *              ZFCP_ERP_FAILED         - action finished unsuccessfully
2835  */
2836 static int
2837 zfcp_erp_unit_strategy_close(struct zfcp_erp_action *erp_action)
2838 {
2839         int retval;
2840         struct zfcp_adapter *adapter = erp_action->adapter;
2841         struct zfcp_unit *unit = erp_action->unit;
2842
2843         retval = zfcp_fsf_close_unit(erp_action);
2844         if (retval == -ENOMEM) {
2845                 debug_text_event(adapter->erp_dbf, 5, "u_ustc_nomem");
2846                 debug_event(adapter->erp_dbf, 5, &unit->fcp_lun,
2847                             sizeof (fcp_lun_t));
2848                 retval = ZFCP_ERP_NOMEM;
2849                 goto out;
2850         }
2851         erp_action->step = ZFCP_ERP_STEP_UNIT_CLOSING;
2852         if (retval != 0) {
2853                 debug_text_event(adapter->erp_dbf, 5, "u_ustc_cuf");
2854                 debug_event(adapter->erp_dbf, 5, &unit->fcp_lun,
2855                             sizeof (fcp_lun_t));
2856                 /* could not send 'close', fail */
2857                 retval = ZFCP_ERP_FAILED;
2858                 goto out;
2859         }
2860         debug_text_event(adapter->erp_dbf, 6, "u_ustc_cuok");
2861         debug_event(adapter->erp_dbf, 6, &unit->fcp_lun, sizeof (fcp_lun_t));
2862         retval = ZFCP_ERP_CONTINUES;
2863
2864  out:
2865         return retval;
2866 }
2867
2868 /*
2869  * function:    
2870  *
2871  * purpose:     
2872  *
2873  * returns:     ZFCP_ERP_CONTINUES      - action continues (asynchronously)
2874  *              ZFCP_ERP_FAILED         - action finished unsuccessfully
2875  */
2876 static int
2877 zfcp_erp_unit_strategy_open(struct zfcp_erp_action *erp_action)
2878 {
2879         int retval;
2880         struct zfcp_adapter *adapter = erp_action->adapter;
2881         struct zfcp_unit *unit = erp_action->unit;
2882
2883         retval = zfcp_fsf_open_unit(erp_action);
2884         if (retval == -ENOMEM) {
2885                 debug_text_event(adapter->erp_dbf, 5, "u_usto_nomem");
2886                 debug_event(adapter->erp_dbf, 5, &unit->fcp_lun,
2887                             sizeof (fcp_lun_t));
2888                 retval = ZFCP_ERP_NOMEM;
2889                 goto out;
2890         }
2891         erp_action->step = ZFCP_ERP_STEP_UNIT_OPENING;
2892         if (retval != 0) {
2893                 debug_text_event(adapter->erp_dbf, 5, "u_usto_ouf");
2894                 debug_event(adapter->erp_dbf, 5, &unit->fcp_lun,
2895                             sizeof (fcp_lun_t));
2896                 /* could not send 'open', fail */
2897                 retval = ZFCP_ERP_FAILED;
2898                 goto out;
2899         }
2900         debug_text_event(adapter->erp_dbf, 6, "u_usto_ouok");
2901         debug_event(adapter->erp_dbf, 6, &unit->fcp_lun, sizeof (fcp_lun_t));
2902         retval = ZFCP_ERP_CONTINUES;
2903  out:
2904         return retval;
2905 }
2906
2907 void zfcp_erp_start_timer(struct zfcp_fsf_req *fsf_req)
2908 {
2909         BUG_ON(!fsf_req->erp_action);
2910         fsf_req->timer.function = zfcp_erp_timeout_handler;
2911         fsf_req->timer.data = (unsigned long) fsf_req->erp_action;
2912         fsf_req->timer.expires = jiffies + ZFCP_ERP_FSFREQ_TIMEOUT;
2913         add_timer(&fsf_req->timer);
2914 }
2915
2916 /*
2917  * function:    
2918  *
2919  * purpose:     enqueue the specified error recovery action, if needed
2920  *
2921  * returns:
2922  */
2923 static int
2924 zfcp_erp_action_enqueue(int action,
2925                         struct zfcp_adapter *adapter,
2926                         struct zfcp_port *port, struct zfcp_unit *unit)
2927 {
2928         int retval = 1;
2929         struct zfcp_erp_action *erp_action = NULL;
2930         int stronger_action = 0;
2931         u32 status = 0;
2932
2933         /*
2934          * We need some rules here which check whether we really need
2935          * this action or whether we should just drop it.
2936          * E.g. if there is a unfinished 'Reopen Port' request then we drop a
2937          * 'Reopen Unit' request for an associated unit since we can't
2938          * satisfy this request now. A 'Reopen Port' action will trigger
2939          * 'Reopen Unit' actions when it completes.
2940          * Thus, there are only actions in the queue which can immediately be
2941          * executed. This makes the processing of the action queue more
2942          * efficient.
2943          */
2944
2945         if (!atomic_test_mask(ZFCP_STATUS_ADAPTER_ERP_THREAD_UP,
2946                               &adapter->status))
2947                 return -EIO;
2948
2949         debug_event(adapter->erp_dbf, 4, &action, sizeof (int));
2950         /* check whether we really need this */
2951         switch (action) {
2952         case ZFCP_ERP_ACTION_REOPEN_UNIT:
2953                 if (atomic_test_mask
2954                     (ZFCP_STATUS_COMMON_ERP_INUSE, &unit->status)) {
2955                         debug_text_event(adapter->erp_dbf, 4, "u_actenq_drp");
2956                         debug_event(adapter->erp_dbf, 4, &port->wwpn,
2957                                     sizeof (wwn_t));
2958                         debug_event(adapter->erp_dbf, 4, &unit->fcp_lun,
2959                                     sizeof (fcp_lun_t));
2960                         goto out;
2961                 }
2962                 if (!atomic_test_mask
2963                     (ZFCP_STATUS_COMMON_RUNNING, &port->status) ||
2964                     atomic_test_mask
2965                     (ZFCP_STATUS_COMMON_ERP_FAILED, &port->status)) {
2966                         goto out;
2967                 }
2968                 if (!atomic_test_mask
2969                     (ZFCP_STATUS_COMMON_UNBLOCKED, &port->status)) {
2970                         stronger_action = ZFCP_ERP_ACTION_REOPEN_PORT;
2971                         unit = NULL;
2972                 }
2973                 /* fall through !!! */
2974
2975         case ZFCP_ERP_ACTION_REOPEN_PORT:
2976                 if (atomic_test_mask
2977                     (ZFCP_STATUS_COMMON_ERP_INUSE, &port->status)) {
2978                         debug_text_event(adapter->erp_dbf, 4, "p_actenq_drp");
2979                         debug_event(adapter->erp_dbf, 4, &port->wwpn,
2980                                     sizeof (wwn_t));
2981                         goto out;
2982                 }
2983                 /* fall through !!! */
2984
2985         case ZFCP_ERP_ACTION_REOPEN_PORT_FORCED:
2986                 if (atomic_test_mask(ZFCP_STATUS_COMMON_ERP_INUSE,
2987                                      &port->status)) {
2988                         if (port->erp_action.action !=
2989                             ZFCP_ERP_ACTION_REOPEN_PORT_FORCED) {
2990                                 ZFCP_LOG_INFO("dropped erp action %i (port "
2991                                               "0x%016Lx, action in use: %i)\n",
2992                                               action, port->wwpn,
2993                                               port->erp_action.action);
2994                                 debug_text_event(adapter->erp_dbf, 4,
2995                                                  "pf_actenq_drp");
2996                         } else 
2997                                 debug_text_event(adapter->erp_dbf, 4,
2998                                                  "pf_actenq_drpcp");
2999                         debug_event(adapter->erp_dbf, 4, &port->wwpn,
3000                                     sizeof (wwn_t));
3001                         goto out;
3002                 }
3003                 if (!atomic_test_mask
3004                     (ZFCP_STATUS_COMMON_RUNNING, &adapter->status) ||
3005                     atomic_test_mask
3006                     (ZFCP_STATUS_COMMON_ERP_FAILED, &adapter->status)) {
3007                         goto out;
3008                 }
3009                 if (!atomic_test_mask
3010                     (ZFCP_STATUS_COMMON_UNBLOCKED, &adapter->status)) {
3011                         stronger_action = ZFCP_ERP_ACTION_REOPEN_ADAPTER;
3012                         port = NULL;
3013                 }
3014                 /* fall through !!! */
3015
3016         case ZFCP_ERP_ACTION_REOPEN_ADAPTER:
3017                 if (atomic_test_mask
3018                     (ZFCP_STATUS_COMMON_ERP_INUSE, &adapter->status)) {
3019                         debug_text_event(adapter->erp_dbf, 4, "a_actenq_drp");
3020                         goto out;
3021                 }
3022                 break;
3023
3024         default:
3025                 debug_text_exception(adapter->erp_dbf, 1, "a_actenq_bug");
3026                 debug_event(adapter->erp_dbf, 1, &action, sizeof (int));
3027                 ZFCP_LOG_NORMAL("bug: unknown erp action requested "
3028                                 "on adapter %s (action=%d)\n",
3029                                 zfcp_get_busid_by_adapter(adapter), action);
3030                 goto out;
3031         }
3032
3033         /* check whether we need something stronger first */
3034         if (stronger_action) {
3035                 debug_text_event(adapter->erp_dbf, 4, "a_actenq_str");
3036                 debug_event(adapter->erp_dbf, 4, &stronger_action,
3037                             sizeof (int));
3038                 ZFCP_LOG_DEBUG("stronger erp action %d needed before "
3039                                "erp action %d on adapter %s\n",
3040                                stronger_action, action,
3041                                zfcp_get_busid_by_adapter(adapter));
3042                 action = stronger_action;
3043         }
3044
3045         /* mark adapter to have some error recovery pending */
3046         atomic_set_mask(ZFCP_STATUS_ADAPTER_ERP_PENDING, &adapter->status);
3047
3048         /* setup error recovery action */
3049         switch (action) {
3050
3051         case ZFCP_ERP_ACTION_REOPEN_UNIT:
3052                 zfcp_unit_get(unit);
3053                 atomic_set_mask(ZFCP_STATUS_COMMON_ERP_INUSE, &unit->status);
3054                 erp_action = &unit->erp_action;
3055                 if (!atomic_test_mask
3056                     (ZFCP_STATUS_COMMON_RUNNING, &unit->status))
3057                         status = ZFCP_STATUS_ERP_CLOSE_ONLY;
3058                 break;
3059
3060         case ZFCP_ERP_ACTION_REOPEN_PORT:
3061         case ZFCP_ERP_ACTION_REOPEN_PORT_FORCED:
3062                 zfcp_port_get(port);
3063                 zfcp_erp_action_dismiss_port(port);
3064                 atomic_set_mask(ZFCP_STATUS_COMMON_ERP_INUSE, &port->status);
3065                 erp_action = &port->erp_action;
3066                 if (!atomic_test_mask
3067                     (ZFCP_STATUS_COMMON_RUNNING, &port->status))
3068                         status = ZFCP_STATUS_ERP_CLOSE_ONLY;
3069                 break;
3070
3071         case ZFCP_ERP_ACTION_REOPEN_ADAPTER:
3072                 zfcp_adapter_get(adapter);
3073                 zfcp_erp_action_dismiss_adapter(adapter);
3074                 atomic_set_mask(ZFCP_STATUS_COMMON_ERP_INUSE, &adapter->status);
3075                 erp_action = &adapter->erp_action;
3076                 if (!atomic_test_mask
3077                     (ZFCP_STATUS_COMMON_RUNNING, &adapter->status))
3078                         status = ZFCP_STATUS_ERP_CLOSE_ONLY;
3079                 break;
3080         }
3081
3082         debug_text_event(adapter->erp_dbf, 4, "a_actenq");
3083
3084         memset(erp_action, 0, sizeof (struct zfcp_erp_action));
3085         erp_action->adapter = adapter;
3086         erp_action->port = port;
3087         erp_action->unit = unit;
3088         erp_action->action = action;
3089         erp_action->status = status;
3090
3091         ++adapter->erp_total_count;
3092
3093         /* finally put it into 'ready' queue and kick erp thread */
3094         list_add(&erp_action->list, &adapter->erp_ready_head);
3095         up(&adapter->erp_ready_sem);
3096         retval = 0;
3097  out:
3098         return retval;
3099 }
3100
3101 static int
3102 zfcp_erp_action_dequeue(struct zfcp_erp_action *erp_action)
3103 {
3104         int retval = 0;
3105         struct zfcp_adapter *adapter = erp_action->adapter;
3106
3107         --adapter->erp_total_count;
3108         if (erp_action->status & ZFCP_STATUS_ERP_LOWMEM) {
3109                 --adapter->erp_low_mem_count;
3110                 erp_action->status &= ~ZFCP_STATUS_ERP_LOWMEM;
3111         }
3112
3113         debug_text_event(adapter->erp_dbf, 4, "a_actdeq");
3114         debug_event(adapter->erp_dbf, 4, &erp_action->action, sizeof (int));
3115         list_del(&erp_action->list);
3116         switch (erp_action->action) {
3117         case ZFCP_ERP_ACTION_REOPEN_UNIT:
3118                 atomic_clear_mask(ZFCP_STATUS_COMMON_ERP_INUSE,
3119                                   &erp_action->unit->status);
3120                 break;
3121         case ZFCP_ERP_ACTION_REOPEN_PORT_FORCED:
3122         case ZFCP_ERP_ACTION_REOPEN_PORT:
3123                 atomic_clear_mask(ZFCP_STATUS_COMMON_ERP_INUSE,
3124                                   &erp_action->port->status);
3125                 break;
3126         case ZFCP_ERP_ACTION_REOPEN_ADAPTER:
3127                 atomic_clear_mask(ZFCP_STATUS_COMMON_ERP_INUSE,
3128                                   &erp_action->adapter->status);
3129                 break;
3130         default:
3131                 /* bug */
3132                 break;
3133         }
3134         return retval;
3135 }
3136
3137 /**
3138  * zfcp_erp_action_cleanup
3139  *
3140  * Register unit with scsi stack if appropriate and fix reference counts.
3141  * Note: Temporary units are not registered with scsi stack.
3142  */
3143 static void
3144 zfcp_erp_action_cleanup(int action, struct zfcp_adapter *adapter,
3145                         struct zfcp_port *port, struct zfcp_unit *unit,
3146                         int result)
3147 {
3148         switch (action) {
3149         case ZFCP_ERP_ACTION_REOPEN_UNIT:
3150                 if ((result == ZFCP_ERP_SUCCEEDED)
3151                     && (!atomic_test_mask(ZFCP_STATUS_UNIT_TEMPORARY,
3152                                           &unit->status))
3153                     && !unit->device
3154                     && port->rport) {
3155                         atomic_set_mask(ZFCP_STATUS_UNIT_REGISTERED,
3156                                         &unit->status);
3157                         if (atomic_test_mask(ZFCP_STATUS_UNIT_SCSI_WORK_PENDING,
3158                                              &unit->status) == 0)
3159                                 zfcp_erp_schedule_work(unit);
3160                 }
3161                 zfcp_unit_put(unit);
3162                 break;
3163         case ZFCP_ERP_ACTION_REOPEN_PORT_FORCED:
3164         case ZFCP_ERP_ACTION_REOPEN_PORT:
3165                 if (atomic_test_mask(ZFCP_STATUS_PORT_NO_WWPN,
3166                                      &port->status)) {
3167                         zfcp_port_put(port);
3168                         break;
3169                 }
3170
3171                 if ((result == ZFCP_ERP_SUCCEEDED)
3172                     && !port->rport) {
3173                         struct fc_rport_identifiers ids;
3174                         ids.node_name = port->wwnn;
3175                         ids.port_name = port->wwpn;
3176                         ids.port_id = port->d_id;
3177                         ids.roles = FC_RPORT_ROLE_FCP_TARGET;
3178                         port->rport =
3179                                 fc_remote_port_add(adapter->scsi_host, 0, &ids);
3180                         if (!port->rport)
3181                                 ZFCP_LOG_NORMAL("failed registration of rport"
3182                                                 "(adapter %s, wwpn=0x%016Lx)\n",
3183                                                 zfcp_get_busid_by_port(port),
3184                                                 port->wwpn);
3185                         else {
3186                                 scsi_target_unblock(&port->rport->dev);
3187                                 port->rport->maxframe_size = port->maxframe_size;
3188                                 port->rport->supported_classes =
3189                                         port->supported_classes;
3190                         }
3191                 }
3192                 if ((result != ZFCP_ERP_SUCCEEDED) && port->rport) {
3193                         fc_remote_port_delete(port->rport);
3194                         port->rport = NULL;
3195                 }
3196                 zfcp_port_put(port);
3197                 break;
3198         case ZFCP_ERP_ACTION_REOPEN_ADAPTER:
3199                 if (result != ZFCP_ERP_SUCCEEDED) {
3200                         list_for_each_entry(port, &adapter->port_list_head, list)
3201                                 if (port->rport &&
3202                                     !atomic_test_mask(ZFCP_STATUS_PORT_WKA,
3203                                                       &port->status)) {
3204                                         fc_remote_port_delete(port->rport);
3205                                         port->rport = NULL;
3206                                 }
3207                 }
3208                 zfcp_adapter_put(adapter);
3209                 break;
3210         default:
3211                 break;
3212         }
3213 }
3214
3215
3216 static void zfcp_erp_action_dismiss_adapter(struct zfcp_adapter *adapter)
3217 {
3218         struct zfcp_port *port;
3219
3220         debug_text_event(adapter->erp_dbf, 5, "a_actab");
3221         if (atomic_test_mask(ZFCP_STATUS_COMMON_ERP_INUSE, &adapter->status))
3222                 zfcp_erp_action_dismiss(&adapter->erp_action);
3223         else
3224                 list_for_each_entry(port, &adapter->port_list_head, list)
3225                     zfcp_erp_action_dismiss_port(port);
3226 }
3227
3228 static void zfcp_erp_action_dismiss_port(struct zfcp_port *port)
3229 {
3230         struct zfcp_unit *unit;
3231         struct zfcp_adapter *adapter = port->adapter;
3232
3233         debug_text_event(adapter->erp_dbf, 5, "p_actab");
3234         debug_event(adapter->erp_dbf, 5, &port->wwpn, sizeof (wwn_t));
3235         if (atomic_test_mask(ZFCP_STATUS_COMMON_ERP_INUSE, &port->status))
3236                 zfcp_erp_action_dismiss(&port->erp_action);
3237         else
3238                 list_for_each_entry(unit, &port->unit_list_head, list)
3239                     zfcp_erp_action_dismiss_unit(unit);
3240 }
3241
3242 static void zfcp_erp_action_dismiss_unit(struct zfcp_unit *unit)
3243 {
3244         struct zfcp_adapter *adapter = unit->port->adapter;
3245
3246         debug_text_event(adapter->erp_dbf, 5, "u_actab");
3247         debug_event(adapter->erp_dbf, 5, &unit->fcp_lun, sizeof (fcp_lun_t));
3248         if (atomic_test_mask(ZFCP_STATUS_COMMON_ERP_INUSE, &unit->status))
3249                 zfcp_erp_action_dismiss(&unit->erp_action);
3250 }
3251
3252 static inline void
3253 zfcp_erp_action_to_running(struct zfcp_erp_action *erp_action)
3254 {
3255         struct zfcp_adapter *adapter = erp_action->adapter;
3256
3257         debug_text_event(adapter->erp_dbf, 6, "a_toru");
3258         debug_event(adapter->erp_dbf, 6, &erp_action->action, sizeof (int));
3259         list_move(&erp_action->list, &erp_action->adapter->erp_running_head);
3260 }
3261
3262 static inline void
3263 zfcp_erp_action_to_ready(struct zfcp_erp_action *erp_action)
3264 {
3265         struct zfcp_adapter *adapter = erp_action->adapter;
3266
3267         debug_text_event(adapter->erp_dbf, 6, "a_tore");
3268         debug_event(adapter->erp_dbf, 6, &erp_action->action, sizeof (int));
3269         list_move(&erp_action->list, &erp_action->adapter->erp_ready_head);
3270 }
3271
3272 void
3273 zfcp_erp_port_boxed(struct zfcp_port *port)
3274 {
3275         struct zfcp_adapter *adapter = port->adapter;
3276         unsigned long flags;
3277
3278         debug_text_event(adapter->erp_dbf, 3, "p_access_boxed");
3279         debug_event(adapter->erp_dbf, 3, &port->wwpn, sizeof(wwn_t));
3280         read_lock_irqsave(&zfcp_data.config_lock, flags);
3281         zfcp_erp_modify_port_status(port,
3282                         ZFCP_STATUS_COMMON_ACCESS_BOXED,
3283                         ZFCP_SET);
3284         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
3285         zfcp_erp_port_reopen(port, ZFCP_STATUS_COMMON_ERP_FAILED);
3286 }
3287
3288 void
3289 zfcp_erp_unit_boxed(struct zfcp_unit *unit)
3290 {
3291         struct zfcp_adapter *adapter = unit->port->adapter;
3292
3293         debug_text_event(adapter->erp_dbf, 3, "u_access_boxed");
3294         debug_event(adapter->erp_dbf, 3, &unit->fcp_lun, sizeof(fcp_lun_t));
3295         zfcp_erp_modify_unit_status(unit,
3296                         ZFCP_STATUS_COMMON_ACCESS_BOXED,
3297                         ZFCP_SET);
3298         zfcp_erp_unit_reopen(unit, ZFCP_STATUS_COMMON_ERP_FAILED);
3299 }
3300
3301 void
3302 zfcp_erp_port_access_denied(struct zfcp_port *port)
3303 {
3304         struct zfcp_adapter *adapter = port->adapter;
3305         unsigned long flags;
3306
3307         debug_text_event(adapter->erp_dbf, 3, "p_access_denied");
3308         debug_event(adapter->erp_dbf, 3, &port->wwpn, sizeof(wwn_t));
3309         read_lock_irqsave(&zfcp_data.config_lock, flags);
3310         zfcp_erp_modify_port_status(port,
3311                         ZFCP_STATUS_COMMON_ERP_FAILED |
3312                         ZFCP_STATUS_COMMON_ACCESS_DENIED,
3313                         ZFCP_SET);
3314         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
3315 }
3316
3317 void
3318 zfcp_erp_unit_access_denied(struct zfcp_unit *unit)
3319 {
3320         struct zfcp_adapter *adapter = unit->port->adapter;
3321
3322         debug_text_event(adapter->erp_dbf, 3, "u_access_denied");
3323         debug_event(adapter->erp_dbf, 3, &unit->fcp_lun, sizeof(fcp_lun_t));
3324         zfcp_erp_modify_unit_status(unit,
3325                         ZFCP_STATUS_COMMON_ERP_FAILED |
3326                         ZFCP_STATUS_COMMON_ACCESS_DENIED,
3327                         ZFCP_SET);
3328 }
3329
3330 void
3331 zfcp_erp_adapter_access_changed(struct zfcp_adapter *adapter)
3332 {
3333         struct zfcp_port *port;
3334         unsigned long flags;
3335
3336         if (adapter->connection_features & FSF_FEATURE_NPIV_MODE)
3337                 return;
3338
3339         debug_text_event(adapter->erp_dbf, 3, "a_access_recover");
3340         debug_event(adapter->erp_dbf, 3, zfcp_get_busid_by_adapter(adapter), 8);
3341
3342         read_lock_irqsave(&zfcp_data.config_lock, flags);
3343         if (adapter->nameserver_port)
3344                 zfcp_erp_port_access_changed(adapter->nameserver_port);
3345         list_for_each_entry(port, &adapter->port_list_head, list)
3346                 if (port != adapter->nameserver_port)
3347                         zfcp_erp_port_access_changed(port);
3348         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
3349 }
3350
3351 void
3352 zfcp_erp_port_access_changed(struct zfcp_port *port)
3353 {
3354         struct zfcp_adapter *adapter = port->adapter;
3355         struct zfcp_unit *unit;
3356
3357         debug_text_event(adapter->erp_dbf, 3, "p_access_recover");
3358         debug_event(adapter->erp_dbf, 3, &port->wwpn, sizeof(wwn_t));
3359
3360         if (!atomic_test_mask(ZFCP_STATUS_COMMON_ACCESS_DENIED,
3361                               &port->status) &&
3362             !atomic_test_mask(ZFCP_STATUS_COMMON_ACCESS_BOXED,
3363                               &port->status)) {
3364                 if (!atomic_test_mask(ZFCP_STATUS_PORT_WKA, &port->status))
3365                         list_for_each_entry(unit, &port->unit_list_head, list)
3366                                 zfcp_erp_unit_access_changed(unit);
3367                 return;
3368         }
3369
3370         ZFCP_LOG_NORMAL("reopen of port 0x%016Lx on adapter %s "
3371                         "(due to ACT update)\n",
3372                         port->wwpn, zfcp_get_busid_by_adapter(adapter));
3373         if (zfcp_erp_port_reopen(port, ZFCP_STATUS_COMMON_ERP_FAILED) != 0)
3374                 ZFCP_LOG_NORMAL("failed reopen of port"
3375                                 "(adapter %s, wwpn=0x%016Lx)\n",
3376                                 zfcp_get_busid_by_adapter(adapter), port->wwpn);
3377 }
3378
3379 void
3380 zfcp_erp_unit_access_changed(struct zfcp_unit *unit)
3381 {
3382         struct zfcp_adapter *adapter = unit->port->adapter;
3383
3384         debug_text_event(adapter->erp_dbf, 3, "u_access_recover");
3385         debug_event(adapter->erp_dbf, 3, &unit->fcp_lun, sizeof(fcp_lun_t));
3386
3387         if (!atomic_test_mask(ZFCP_STATUS_COMMON_ACCESS_DENIED,
3388                               &unit->status) &&
3389             !atomic_test_mask(ZFCP_STATUS_COMMON_ACCESS_BOXED,
3390                               &unit->status))
3391                 return;
3392
3393         ZFCP_LOG_NORMAL("reopen of unit 0x%016Lx on port 0x%016Lx "
3394                         " on adapter %s (due to ACT update)\n",
3395                         unit->fcp_lun, unit->port->wwpn,
3396                         zfcp_get_busid_by_adapter(adapter));
3397         if (zfcp_erp_unit_reopen(unit, ZFCP_STATUS_COMMON_ERP_FAILED) != 0)
3398                 ZFCP_LOG_NORMAL("failed reopen of unit (adapter %s, "
3399                                 "wwpn=0x%016Lx, fcp_lun=0x%016Lx)\n",
3400                                 zfcp_get_busid_by_adapter(adapter),
3401                                 unit->port->wwpn, unit->fcp_lun);
3402 }
3403
3404 #undef ZFCP_LOG_AREA