Merge branches 'ns9x' and 'machtypes' into devel
[linux-2.6] / drivers / isdn / hardware / eicon / um_idi.c
1 /* $Id: um_idi.c,v 1.14 2004/03/21 17:54:37 armin Exp $ */
2
3 #include "platform.h"
4 #include "di_defs.h"
5 #include "pc.h"
6 #include "dqueue.h"
7 #include "adapter.h"
8 #include "entity.h"
9 #include "um_xdi.h"
10 #include "um_idi.h"
11 #include "debuglib.h"
12 #include "divasync.h"
13
14 #define DIVAS_MAX_XDI_ADAPTERS  64
15
16 /* --------------------------------------------------------------------------
17                 IMPORTS
18    -------------------------------------------------------------------------- */
19 extern void diva_os_wakeup_read(void *os_context);
20 extern void diva_os_wakeup_close(void *os_context);
21 /* --------------------------------------------------------------------------
22                 LOCALS
23    -------------------------------------------------------------------------- */
24 static LIST_HEAD(adapter_q);
25 static diva_os_spin_lock_t adapter_lock;
26
27 static diva_um_idi_adapter_t *diva_um_idi_find_adapter(dword nr);
28 static void cleanup_adapter(diva_um_idi_adapter_t * a);
29 static void cleanup_entity(divas_um_idi_entity_t * e);
30 static int diva_user_mode_idi_adapter_features(diva_um_idi_adapter_t * a,
31                                                diva_um_idi_adapter_features_t
32                                                * features);
33 static int process_idi_request(divas_um_idi_entity_t * e,
34                                const diva_um_idi_req_hdr_t * req);
35 static int process_idi_rc(divas_um_idi_entity_t * e, byte rc);
36 static int process_idi_ind(divas_um_idi_entity_t * e, byte ind);
37 static int write_return_code(divas_um_idi_entity_t * e, byte rc);
38
39 /* --------------------------------------------------------------------------
40                 MAIN
41    -------------------------------------------------------------------------- */
42 int diva_user_mode_idi_init(void)
43 {
44         diva_os_initialize_spin_lock(&adapter_lock, "adapter");
45         return (0);
46 }
47
48 /* --------------------------------------------------------------------------
49                 Copy adapter features to user supplied buffer
50    -------------------------------------------------------------------------- */
51 static int
52 diva_user_mode_idi_adapter_features(diva_um_idi_adapter_t * a,
53                                     diva_um_idi_adapter_features_t *
54                                     features)
55 {
56         IDI_SYNC_REQ sync_req;
57
58         if ((a) && (a->d.request)) {
59                 features->type = a->d.type;
60                 features->features = a->d.features;
61                 features->channels = a->d.channels;
62                 memset(features->name, 0, sizeof(features->name));
63
64                 sync_req.GetName.Req = 0;
65                 sync_req.GetName.Rc = IDI_SYNC_REQ_GET_NAME;
66                 (*(a->d.request)) ((ENTITY *) & sync_req);
67                 strlcpy(features->name, sync_req.GetName.name,
68                         sizeof(features->name));
69
70                 sync_req.GetSerial.Req = 0;
71                 sync_req.GetSerial.Rc = IDI_SYNC_REQ_GET_SERIAL;
72                 sync_req.GetSerial.serial = 0;
73                 (*(a->d.request)) ((ENTITY *) & sync_req);
74                 features->serial_number = sync_req.GetSerial.serial;
75         }
76
77         return ((a) ? 0 : -1);
78 }
79
80 /* --------------------------------------------------------------------------
81                 REMOVE ADAPTER
82    -------------------------------------------------------------------------- */
83 void diva_user_mode_idi_remove_adapter(int adapter_nr)
84 {
85         struct list_head *tmp;
86         diva_um_idi_adapter_t *a;
87
88         list_for_each(tmp, &adapter_q) {
89                 a = list_entry(tmp, diva_um_idi_adapter_t, link);
90                 if (a->adapter_nr == adapter_nr) {
91                         list_del(tmp);
92                         cleanup_adapter(a);
93                         DBG_LOG(("DIDD: del adapter(%d)", a->adapter_nr));
94                         diva_os_free(0, a);
95                         break;
96                 }
97         }
98 }
99
100 /* --------------------------------------------------------------------------
101                 CALLED ON DRIVER EXIT (UNLOAD)
102    -------------------------------------------------------------------------- */
103 void diva_user_mode_idi_finit(void)
104 {
105         struct list_head *tmp, *safe;
106         diva_um_idi_adapter_t *a;
107
108         list_for_each_safe(tmp, safe, &adapter_q) {
109                 a = list_entry(tmp, diva_um_idi_adapter_t, link);
110                 list_del(tmp);
111                 cleanup_adapter(a);
112                 DBG_LOG(("DIDD: del adapter(%d)", a->adapter_nr));
113                 diva_os_free(0, a);
114         }
115         diva_os_destroy_spin_lock(&adapter_lock, "adapter");
116 }
117
118 /* -------------------------------------------------------------------------
119                 CREATE AND INIT IDI ADAPTER
120          ------------------------------------------------------------------------- */
121 int diva_user_mode_idi_create_adapter(const DESCRIPTOR * d, int adapter_nr)
122 {
123         diva_os_spin_lock_magic_t old_irql;
124         diva_um_idi_adapter_t *a =
125             (diva_um_idi_adapter_t *) diva_os_malloc(0,
126                                                      sizeof
127                                                      (diva_um_idi_adapter_t));
128
129         if (!a) {
130                 return (-1);
131         }
132         memset(a, 0x00, sizeof(*a));
133         INIT_LIST_HEAD(&a->entity_q);
134
135         a->d = *d;
136         a->adapter_nr = adapter_nr;
137
138         DBG_LOG(("DIDD_ADD A(%d), type:%02x, features:%04x, channels:%d",
139                  adapter_nr, a->d.type, a->d.features, a->d.channels));
140
141         diva_os_enter_spin_lock(&adapter_lock, &old_irql, "create_adapter");
142         list_add_tail(&a->link, &adapter_q);
143         diva_os_leave_spin_lock(&adapter_lock, &old_irql, "create_adapter");
144         return (0);
145 }
146
147 /* ------------------------------------------------------------------------
148                         Find adapter by Adapter number
149    ------------------------------------------------------------------------ */
150 static diva_um_idi_adapter_t *diva_um_idi_find_adapter(dword nr)
151 {
152         diva_um_idi_adapter_t *a = NULL;
153         struct list_head *tmp;
154
155         list_for_each(tmp, &adapter_q) {
156                 a = list_entry(tmp, diva_um_idi_adapter_t, link);
157                 DBG_TRC(("find_adapter: (%d)-(%d)", nr, a->adapter_nr));
158                 if (a->adapter_nr == (int)nr)
159                         break;
160                 a = NULL;
161         }
162         return(a);
163 }
164
165 /* ------------------------------------------------------------------------
166                 Cleanup this adapter and cleanup/delete all entities assigned
167                 to this adapter
168    ------------------------------------------------------------------------ */
169 static void cleanup_adapter(diva_um_idi_adapter_t * a)
170 {
171         struct list_head *tmp, *safe;
172         divas_um_idi_entity_t *e;
173
174         list_for_each_safe(tmp, safe, &a->entity_q) {
175                 e = list_entry(tmp, divas_um_idi_entity_t, link);
176                 list_del(tmp);
177                 cleanup_entity(e);
178                 if (e->os_context) {
179                         diva_os_wakeup_read(e->os_context);
180                         diva_os_wakeup_close(e->os_context);
181                 }
182         }
183         memset(&a->d, 0x00, sizeof(DESCRIPTOR));
184 }
185
186 /* ------------------------------------------------------------------------
187                 Cleanup, but NOT delete this entity
188    ------------------------------------------------------------------------ */
189 static void cleanup_entity(divas_um_idi_entity_t * e)
190 {
191         e->os_ref = NULL;
192         e->status = 0;
193         e->adapter = NULL;
194         e->e.Id = 0;
195         e->rc_count = 0;
196
197         e->status |= DIVA_UM_IDI_REMOVED;
198         e->status |= DIVA_UM_IDI_REMOVE_PENDING;
199
200         diva_data_q_finit(&e->data);
201         diva_data_q_finit(&e->rc);
202 }
203
204
205 /* ------------------------------------------------------------------------
206                 Create ENTITY, link it to the adapter and remove pointer to entity
207    ------------------------------------------------------------------------ */
208 void *divas_um_idi_create_entity(dword adapter_nr, void *file)
209 {
210         divas_um_idi_entity_t *e;
211         diva_um_idi_adapter_t *a;
212         diva_os_spin_lock_magic_t old_irql;
213
214         if ((e = (divas_um_idi_entity_t *) diva_os_malloc(0, sizeof(*e)))) {
215                 memset(e, 0x00, sizeof(*e));
216                 if (!
217                     (e->os_context =
218                      diva_os_malloc(0, diva_os_get_context_size()))) {
219                         DBG_LOG(("E(%08x) no memory for os context", e));
220                         diva_os_free(0, e);
221                         return NULL;
222                 }
223                 memset(e->os_context, 0x00, diva_os_get_context_size());
224
225                 if ((diva_data_q_init(&e->data, 2048 + 512, 16))) {
226                         diva_os_free(0, e->os_context);
227                         diva_os_free(0, e);
228                         return NULL;
229                 }
230                 if ((diva_data_q_init(&e->rc, sizeof(diva_um_idi_ind_hdr_t), 2))) {
231                         diva_data_q_finit(&e->data);
232                         diva_os_free(0, e->os_context);
233                         diva_os_free(0, e);
234                         return NULL;
235                 }
236
237                 diva_os_enter_spin_lock(&adapter_lock, &old_irql, "create_entity");
238                 /*
239                    Look for Adapter requested
240                  */
241                 if (!(a = diva_um_idi_find_adapter(adapter_nr))) {
242                         /*
243                            No adapter was found, or this adapter was removed
244                          */
245                         diva_os_leave_spin_lock(&adapter_lock, &old_irql, "create_entity");
246
247                         DBG_LOG(("A: no adapter(%ld)", adapter_nr));
248
249                         cleanup_entity(e);
250                         diva_os_free(0, e->os_context);
251                         diva_os_free(0, e);
252
253                         return NULL;
254                 }
255
256                 e->os_ref = file;       /* link to os handle */
257                 e->adapter = a; /* link to adapter   */
258
259                 list_add_tail(&e->link, &a->entity_q);  /* link from adapter */
260
261                 diva_os_leave_spin_lock(&adapter_lock, &old_irql, "create_entity");
262
263                 DBG_LOG(("A(%ld), create E(%08x)", adapter_nr, e));
264         }
265
266         return (e);
267 }
268
269 /* ------------------------------------------------------------------------
270                 Unlink entity and free memory 
271    ------------------------------------------------------------------------ */
272 int divas_um_idi_delete_entity(int adapter_nr, void *entity)
273 {
274         divas_um_idi_entity_t *e;
275         diva_um_idi_adapter_t *a;
276         diva_os_spin_lock_magic_t old_irql;
277
278         if (!(e = (divas_um_idi_entity_t *) entity))
279                 return (-1);
280
281         diva_os_enter_spin_lock(&adapter_lock, &old_irql, "delete_entity");
282         if ((a = e->adapter)) {
283                 list_del(&e->link);
284         }
285         diva_os_leave_spin_lock(&adapter_lock, &old_irql, "delete_entity");
286
287         diva_um_idi_stop_wdog(entity);
288         cleanup_entity(e);
289         diva_os_free(0, e->os_context);
290         memset(e, 0x00, sizeof(*e));
291         diva_os_free(0, e);
292
293         DBG_LOG(("A(%d) remove E:%08x", adapter_nr, e));
294
295         return (0);
296 }
297
298 /* --------------------------------------------------------------------------
299                 Called by application to read data from IDI
300          -------------------------------------------------------------------------- */
301 int diva_um_idi_read(void *entity,
302                      void *os_handle,
303                      void *dst,
304                      int max_length, divas_um_idi_copy_to_user_fn_t cp_fn)
305 {
306         divas_um_idi_entity_t *e;
307         diva_um_idi_adapter_t *a;
308         const void *data;
309         int length, ret = 0;
310         diva_um_idi_data_queue_t *q;
311         diva_os_spin_lock_magic_t old_irql;
312
313         diva_os_enter_spin_lock(&adapter_lock, &old_irql, "read");
314
315         e = (divas_um_idi_entity_t *) entity;
316         if (!e || (!(a = e->adapter)) ||
317             (e->status & DIVA_UM_IDI_REMOVE_PENDING) ||
318             (e->status & DIVA_UM_IDI_REMOVED) ||
319             (a->status & DIVA_UM_IDI_ADAPTER_REMOVED)) {
320                 diva_os_leave_spin_lock(&adapter_lock, &old_irql, "read");
321                 DBG_ERR(("E(%08x) read failed - adapter removed", e))
322                 return (-1);
323         }
324
325         DBG_TRC(("A(%d) E(%08x) read(%d)", a->adapter_nr, e, max_length));
326
327         /*
328            Try to read return code first
329          */
330         data = diva_data_q_get_segment4read(&e->rc);
331         q = &e->rc;
332
333         /*
334            No return codes available, read indications now
335          */
336         if (!data) {
337                 if (!(e->status & DIVA_UM_IDI_RC_PENDING)) {
338                         DBG_TRC(("A(%d) E(%08x) read data", a->adapter_nr, e));
339                         data = diva_data_q_get_segment4read(&e->data);
340                         q = &e->data;
341                 }
342         } else {
343                 e->status &= ~DIVA_UM_IDI_RC_PENDING;
344                 DBG_TRC(("A(%d) E(%08x) read rc", a->adapter_nr, e));
345         }
346
347         if (data) {
348                 if ((length = diva_data_q_get_segment_length(q)) >
349                     max_length) {
350                         /*
351                            Not enough space to read message
352                          */
353                         DBG_ERR(("A: A(%d) E(%08x) read small buffer",
354                                  a->adapter_nr, e, ret));
355                         diva_os_leave_spin_lock(&adapter_lock, &old_irql,
356                                                 "read");
357                         return (-2);
358                 }
359                 /*
360                    Copy it to user, this function does access ONLY locked an verified
361                    memory, also we can access it witch spin lock held
362                  */
363
364                 if ((ret = (*cp_fn) (os_handle, dst, data, length)) >= 0) {
365                         /*
366                            Acknowledge only if read was successfull
367                          */
368                         diva_data_q_ack_segment4read(q);
369                 }
370         }
371
372
373         DBG_TRC(("A(%d) E(%08x) read=%d", a->adapter_nr, e, ret));
374
375         diva_os_leave_spin_lock(&adapter_lock, &old_irql, "read");
376
377         return (ret);
378 }
379
380
381 int diva_um_idi_write(void *entity,
382                       void *os_handle,
383                       const void *src,
384                       int length, divas_um_idi_copy_from_user_fn_t cp_fn)
385 {
386         divas_um_idi_entity_t *e;
387         diva_um_idi_adapter_t *a;
388         diva_um_idi_req_hdr_t *req;
389         void *data;
390         int ret = 0;
391         diva_os_spin_lock_magic_t old_irql;
392
393         diva_os_enter_spin_lock(&adapter_lock, &old_irql, "write");
394
395         e = (divas_um_idi_entity_t *) entity;
396         if (!e || (!(a = e->adapter)) ||
397             (e->status & DIVA_UM_IDI_REMOVE_PENDING) ||
398             (e->status & DIVA_UM_IDI_REMOVED) ||
399             (a->status & DIVA_UM_IDI_ADAPTER_REMOVED)) {
400                 diva_os_leave_spin_lock(&adapter_lock, &old_irql, "write");
401                 DBG_ERR(("E(%08x) write failed - adapter removed", e))
402                 return (-1);
403         }
404
405         DBG_TRC(("A(%d) E(%08x) write(%d)", a->adapter_nr, e, length));
406
407         if ((length < sizeof(*req)) || (length > sizeof(e->buffer))) {
408                 diva_os_leave_spin_lock(&adapter_lock, &old_irql, "write");
409                 return (-2);
410         }
411
412         if (e->status & DIVA_UM_IDI_RC_PENDING) {
413                 DBG_ERR(("A: A(%d) E(%08x) rc pending", a->adapter_nr, e));
414                 diva_os_leave_spin_lock(&adapter_lock, &old_irql, "write");
415                 return (-1);    /* should wait for RC code first */
416         }
417
418         /*
419            Copy function does access only locked verified memory,
420            also it can be called with spin lock held
421          */
422         if ((ret = (*cp_fn) (os_handle, e->buffer, src, length)) < 0) {
423                 DBG_TRC(("A: A(%d) E(%08x) write error=%d", a->adapter_nr,
424                          e, ret));
425                 diva_os_leave_spin_lock(&adapter_lock, &old_irql, "write");
426                 return (ret);
427         }
428
429         req = (diva_um_idi_req_hdr_t *) & e->buffer[0];
430
431         switch (req->type) {
432         case DIVA_UM_IDI_GET_FEATURES:{
433                         DBG_LOG(("A(%d) get_features", a->adapter_nr));
434                         if (!(data =
435                              diva_data_q_get_segment4write(&e->data))) {
436                                 DBG_ERR(("A(%d) get_features, no free buffer",
437                                          a->adapter_nr));
438                                 diva_os_leave_spin_lock(&adapter_lock,
439                                                         &old_irql,
440                                                         "write");
441                                 return (0);
442                         }
443                         diva_user_mode_idi_adapter_features(a, &(((diva_um_idi_ind_hdr_t
444                                                                 *) data)->hdr.features));
445                         ((diva_um_idi_ind_hdr_t *) data)->type =
446                             DIVA_UM_IDI_IND_FEATURES;
447                         ((diva_um_idi_ind_hdr_t *) data)->data_length = 0;
448                         diva_data_q_ack_segment4write(&e->data,
449                                                       sizeof(diva_um_idi_ind_hdr_t));
450
451                         diva_os_leave_spin_lock(&adapter_lock, &old_irql, "write");
452
453                         diva_os_wakeup_read(e->os_context);
454                 }
455                 break;
456
457         case DIVA_UM_IDI_REQ:
458         case DIVA_UM_IDI_REQ_MAN:
459         case DIVA_UM_IDI_REQ_SIG:
460         case DIVA_UM_IDI_REQ_NET:
461                 DBG_TRC(("A(%d) REQ(%02d)-(%02d)-(%08x)", a->adapter_nr,
462                          req->Req, req->ReqCh,
463                          req->type & DIVA_UM_IDI_REQ_TYPE_MASK));
464                 switch (process_idi_request(e, req)) {
465                 case -1:
466                         diva_os_leave_spin_lock(&adapter_lock, &old_irql, "write");
467                         return (-1);
468                 case -2:
469                         diva_os_leave_spin_lock(&adapter_lock, &old_irql, "write");
470                         diva_os_wakeup_read(e->os_context);
471                         break;
472                 default:
473                         diva_os_leave_spin_lock(&adapter_lock, &old_irql, "write");
474                         break;
475                 }
476                 break;
477
478         default:
479                 diva_os_leave_spin_lock(&adapter_lock, &old_irql, "write");
480                 return (-1);
481         }
482
483         DBG_TRC(("A(%d) E(%08x) write=%d", a->adapter_nr, e, ret));
484
485         return (ret);
486 }
487
488 /* --------------------------------------------------------------------------
489                         CALLBACK FROM XDI
490          -------------------------------------------------------------------------- */
491 static void diva_um_idi_xdi_callback(ENTITY * entity)
492 {
493         divas_um_idi_entity_t *e = DIVAS_CONTAINING_RECORD(entity,
494                                                            divas_um_idi_entity_t,
495                                                            e);
496         diva_os_spin_lock_magic_t old_irql;
497         int call_wakeup = 0;
498
499         diva_os_enter_spin_lock(&adapter_lock, &old_irql, "xdi_callback");
500
501         if (e->e.complete == 255) {
502                 if (!(e->status & DIVA_UM_IDI_REMOVE_PENDING)) {
503                         diva_um_idi_stop_wdog(e);
504                 }
505                 if ((call_wakeup = process_idi_rc(e, e->e.Rc))) {
506                         if (e->rc_count) {
507                                 e->rc_count--;
508                         }
509                 }
510                 e->e.Rc = 0;
511                 diva_os_leave_spin_lock(&adapter_lock, &old_irql, "xdi_callback");
512
513                 if (call_wakeup) {
514                         diva_os_wakeup_read(e->os_context);
515                         diva_os_wakeup_close(e->os_context);
516                 }
517         } else {
518                 if (e->status & DIVA_UM_IDI_REMOVE_PENDING) {
519                         e->e.RNum = 0;
520                         e->e.RNR = 2;
521                 } else {
522                         call_wakeup = process_idi_ind(e, e->e.Ind);
523                 }
524                 e->e.Ind = 0;
525                 diva_os_leave_spin_lock(&adapter_lock, &old_irql, "xdi_callback");
526                 if (call_wakeup) {
527                         diva_os_wakeup_read(e->os_context);
528                 }
529         }
530 }
531
532 static int process_idi_request(divas_um_idi_entity_t * e,
533                                const diva_um_idi_req_hdr_t * req)
534 {
535         int assign = 0;
536         byte Req = (byte) req->Req;
537         dword type = req->type & DIVA_UM_IDI_REQ_TYPE_MASK;
538
539         if (!e->e.Id || !e->e.callback) {       /* not assigned */
540                 if (Req != ASSIGN) {
541                         DBG_ERR(("A: A(%d) E(%08x) not assigned",
542                                  e->adapter->adapter_nr, e));
543                         return (-1);    /* NOT ASSIGNED */
544                 } else {
545                         switch (type) {
546                         case DIVA_UM_IDI_REQ_TYPE_MAN:
547                                 e->e.Id = MAN_ID;
548                                 DBG_TRC(("A(%d) E(%08x) assign MAN",
549                                          e->adapter->adapter_nr, e));
550                                 break;
551
552                         case DIVA_UM_IDI_REQ_TYPE_SIG:
553                                 e->e.Id = DSIG_ID;
554                                 DBG_TRC(("A(%d) E(%08x) assign SIG",
555                                          e->adapter->adapter_nr, e));
556                                 break;
557
558                         case DIVA_UM_IDI_REQ_TYPE_NET:
559                                 e->e.Id = NL_ID;
560                                 DBG_TRC(("A(%d) E(%08x) assign NET",
561                                          e->adapter->adapter_nr, e));
562                                 break;
563
564                         default:
565                                 DBG_ERR(("A: A(%d) E(%08x) unknown type=%08x",
566                                          e->adapter->adapter_nr, e,
567                                          type));
568                                 return (-1);
569                         }
570                 }
571                 e->e.XNum = 1;
572                 e->e.RNum = 1;
573                 e->e.callback = diva_um_idi_xdi_callback;
574                 e->e.X = &e->XData;
575                 e->e.R = &e->RData;
576                 assign = 1;
577         }
578         e->status |= DIVA_UM_IDI_RC_PENDING;
579         e->e.Req = Req;
580         e->e.ReqCh = (byte) req->ReqCh;
581         e->e.X->PLength = (word) req->data_length;
582         e->e.X->P = (byte *) & req[1];  /* Our buffer is safe */
583
584         DBG_TRC(("A(%d) E(%08x) request(%02x-%02x-%02x (%d))",
585                  e->adapter->adapter_nr, e, e->e.Id, e->e.Req,
586                  e->e.ReqCh, e->e.X->PLength));
587
588         e->rc_count++;
589
590         if (e->adapter && e->adapter->d.request) {
591                 diva_um_idi_start_wdog(e);
592                 (*(e->adapter->d.request)) (&e->e);
593         }
594
595         if (assign) {
596                 if (e->e.Rc == OUT_OF_RESOURCES) {
597                         /*
598                            XDI has no entities more, call was not forwarded to the card,
599                            no callback will be scheduled
600                          */
601                         DBG_ERR(("A: A(%d) E(%08x) XDI out of entities",
602                                  e->adapter->adapter_nr, e));
603
604                         e->e.Id = 0;
605                         e->e.ReqCh = 0;
606                         e->e.RcCh = 0;
607                         e->e.Ind = 0;
608                         e->e.IndCh = 0;
609                         e->e.XNum = 0;
610                         e->e.RNum = 0;
611                         e->e.callback = NULL;
612                         e->e.X = NULL;
613                         e->e.R = NULL;
614                         write_return_code(e, ASSIGN_RC | OUT_OF_RESOURCES);
615                         return (-2);
616                 } else {
617                         e->status |= DIVA_UM_IDI_ASSIGN_PENDING;
618                 }
619         }
620
621         return (0);
622 }
623
624 static int process_idi_rc(divas_um_idi_entity_t * e, byte rc)
625 {
626         DBG_TRC(("A(%d) E(%08x) rc(%02x-%02x-%02x)",
627                  e->adapter->adapter_nr, e, e->e.Id, rc, e->e.RcCh));
628
629         if (e->status & DIVA_UM_IDI_ASSIGN_PENDING) {
630                 e->status &= ~DIVA_UM_IDI_ASSIGN_PENDING;
631                 if (rc != ASSIGN_OK) {
632                         DBG_ERR(("A: A(%d) E(%08x) ASSIGN failed",
633                                  e->adapter->adapter_nr, e));
634                         e->e.callback = NULL;
635                         e->e.Id = 0;
636                         e->e.Req = 0;
637                         e->e.ReqCh = 0;
638                         e->e.Rc = 0;
639                         e->e.RcCh = 0;
640                         e->e.Ind = 0;
641                         e->e.IndCh = 0;
642                         e->e.X = NULL;
643                         e->e.R = NULL;
644                         e->e.XNum = 0;
645                         e->e.RNum = 0;
646                 }
647         }
648         if ((e->e.Req == REMOVE) && e->e.Id && (rc == 0xff)) {
649                 DBG_ERR(("A: A(%d) E(%08x)  discard OK in REMOVE",
650                          e->adapter->adapter_nr, e));
651                 return (0);     /* let us do it in the driver */
652         }
653         if ((e->e.Req == REMOVE) && (!e->e.Id)) {       /* REMOVE COMPLETE */
654                 e->e.callback = NULL;
655                 e->e.Id = 0;
656                 e->e.Req = 0;
657                 e->e.ReqCh = 0;
658                 e->e.Rc = 0;
659                 e->e.RcCh = 0;
660                 e->e.Ind = 0;
661                 e->e.IndCh = 0;
662                 e->e.X = NULL;
663                 e->e.R = NULL;
664                 e->e.XNum = 0;
665                 e->e.RNum = 0;
666                 e->rc_count = 0;
667         }
668         if ((e->e.Req == REMOVE) && (rc != 0xff)) {     /* REMOVE FAILED */
669                 DBG_ERR(("A: A(%d) E(%08x)  REMOVE FAILED",
670                          e->adapter->adapter_nr, e));
671         }
672         write_return_code(e, rc);
673
674         return (1);
675 }
676
677 static int process_idi_ind(divas_um_idi_entity_t * e, byte ind)
678 {
679         int do_wakeup = 0;
680
681         if (e->e.complete != 0x02) {
682                 diva_um_idi_ind_hdr_t *pind =
683                     (diva_um_idi_ind_hdr_t *)
684                     diva_data_q_get_segment4write(&e->data);
685                 if (pind) {
686                         e->e.RNum = 1;
687                         e->e.R->P = (byte *) & pind[1];
688                         e->e.R->PLength =
689                             (word) (diva_data_q_get_max_length(&e->data) -
690                                     sizeof(*pind));
691                         DBG_TRC(("A(%d) E(%08x) ind_1(%02x-%02x-%02x)-[%d-%d]",
692                                  e->adapter->adapter_nr, e, e->e.Id, ind,
693                                  e->e.IndCh, e->e.RLength,
694                                  e->e.R->PLength));
695
696                 } else {
697                         DBG_TRC(("A(%d) E(%08x) ind(%02x-%02x-%02x)-RNR",
698                                  e->adapter->adapter_nr, e, e->e.Id, ind,
699                                  e->e.IndCh));
700                         e->e.RNum = 0;
701                         e->e.RNR = 1;
702                         do_wakeup = 1;
703                 }
704         } else {
705                 diva_um_idi_ind_hdr_t *pind =
706                     (diva_um_idi_ind_hdr_t *) (e->e.R->P);
707
708                 DBG_TRC(("A(%d) E(%08x) ind(%02x-%02x-%02x)-[%d]",
709                          e->adapter->adapter_nr, e, e->e.Id, ind,
710                          e->e.IndCh, e->e.R->PLength));
711
712                 pind--;
713                 pind->type = DIVA_UM_IDI_IND;
714                 pind->hdr.ind.Ind = ind;
715                 pind->hdr.ind.IndCh = e->e.IndCh;
716                 pind->data_length = e->e.R->PLength;
717                 diva_data_q_ack_segment4write(&e->data,
718                                               (int) (sizeof(*pind) +
719                                                      e->e.R->PLength));
720                 do_wakeup = 1;
721         }
722
723         if ((e->status & DIVA_UM_IDI_RC_PENDING) && !e->rc.count) {
724                 do_wakeup = 0;
725         }
726
727         return (do_wakeup);
728 }
729
730 /* --------------------------------------------------------------------------
731                 Write return code to the return code queue of entity
732          -------------------------------------------------------------------------- */
733 static int write_return_code(divas_um_idi_entity_t * e, byte rc)
734 {
735         diva_um_idi_ind_hdr_t *prc;
736
737         if (!(prc =
738              (diva_um_idi_ind_hdr_t *) diva_data_q_get_segment4write(&e->rc)))
739         {
740                 DBG_ERR(("A: A(%d) E(%08x) rc(%02x) lost",
741                          e->adapter->adapter_nr, e, rc));
742                 e->status &= ~DIVA_UM_IDI_RC_PENDING;
743                 return (-1);
744         }
745
746         prc->type = DIVA_UM_IDI_IND_RC;
747         prc->hdr.rc.Rc = rc;
748         prc->hdr.rc.RcCh = e->e.RcCh;
749         prc->data_length = 0;
750         diva_data_q_ack_segment4write(&e->rc, sizeof(*prc));
751
752         return (0);
753 }
754
755 /* --------------------------------------------------------------------------
756                 Return amount of entries that can be bead from this entity or
757                 -1 if adapter was removed
758          -------------------------------------------------------------------------- */
759 int diva_user_mode_idi_ind_ready(void *entity, void *os_handle)
760 {
761         divas_um_idi_entity_t *e;
762         diva_um_idi_adapter_t *a;
763         diva_os_spin_lock_magic_t old_irql;
764         int ret;
765
766         if (!entity)
767                 return (-1);
768         diva_os_enter_spin_lock(&adapter_lock, &old_irql, "ind_ready");
769         e = (divas_um_idi_entity_t *) entity;
770         a = e->adapter;
771
772         if ((!a) || (a->status & DIVA_UM_IDI_ADAPTER_REMOVED)) {
773                 /*
774                    Adapter was unloaded
775                  */
776                 diva_os_leave_spin_lock(&adapter_lock, &old_irql, "ind_ready");
777                 return (-1);    /* adapter was removed */
778         }
779         if (e->status & DIVA_UM_IDI_REMOVED) {
780                 /*
781                    entity was removed as result of adapter removal
782                    user should assign this entity again
783                  */
784                 diva_os_leave_spin_lock(&adapter_lock, &old_irql, "ind_ready");
785                 return (-1);
786         }
787
788         ret = e->rc.count + e->data.count;
789
790         if ((e->status & DIVA_UM_IDI_RC_PENDING) && !e->rc.count) {
791                 ret = 0;
792         }
793
794         diva_os_leave_spin_lock(&adapter_lock, &old_irql, "ind_ready");
795
796         return (ret);
797 }
798
799 void *diva_um_id_get_os_context(void *entity)
800 {
801         return (((divas_um_idi_entity_t *) entity)->os_context);
802 }
803
804 int divas_um_idi_entity_assigned(void *entity)
805 {
806         divas_um_idi_entity_t *e;
807         diva_um_idi_adapter_t *a;
808         int ret;
809         diva_os_spin_lock_magic_t old_irql;
810
811         diva_os_enter_spin_lock(&adapter_lock, &old_irql, "assigned?");
812
813
814         e = (divas_um_idi_entity_t *) entity;
815         if (!e || (!(a = e->adapter)) ||
816             (e->status & DIVA_UM_IDI_REMOVED) ||
817             (a->status & DIVA_UM_IDI_ADAPTER_REMOVED)) {
818                 diva_os_leave_spin_lock(&adapter_lock, &old_irql, "assigned?");
819                 return (0);
820         }
821
822         e->status |= DIVA_UM_IDI_REMOVE_PENDING;
823
824         ret = (e->e.Id || e->rc_count
825                || (e->status & DIVA_UM_IDI_ASSIGN_PENDING));
826
827         DBG_TRC(("Id:%02x, rc_count:%d, status:%08x", e->e.Id, e->rc_count,
828                  e->status))
829
830         diva_os_leave_spin_lock(&adapter_lock, &old_irql, "assigned?");
831
832         return (ret);
833 }
834
835 int divas_um_idi_entity_start_remove(void *entity)
836 {
837         divas_um_idi_entity_t *e;
838         diva_um_idi_adapter_t *a;
839         diva_os_spin_lock_magic_t old_irql;
840
841         diva_os_enter_spin_lock(&adapter_lock, &old_irql, "start_remove");
842
843         e = (divas_um_idi_entity_t *) entity;
844         if (!e || (!(a = e->adapter)) ||
845             (e->status & DIVA_UM_IDI_REMOVED) ||
846             (a->status & DIVA_UM_IDI_ADAPTER_REMOVED)) {
847                 diva_os_leave_spin_lock(&adapter_lock, &old_irql, "start_remove");
848                 return (0);
849         }
850
851         if (e->rc_count) {
852                 /*
853                    Entity BUSY
854                  */
855                 diva_os_leave_spin_lock(&adapter_lock, &old_irql, "start_remove");
856                 return (1);
857         }
858
859         if (!e->e.Id) {
860                 /*
861                    Remove request was already pending, and arrived now
862                  */
863                 diva_os_leave_spin_lock(&adapter_lock, &old_irql, "start_remove");
864                 return (0);     /* REMOVE was pending */
865         }
866
867         /*
868            Now send remove request
869          */
870         e->e.Req = REMOVE;
871         e->e.ReqCh = 0;
872
873         e->rc_count++;
874
875         DBG_TRC(("A(%d) E(%08x) request(%02x-%02x-%02x (%d))",
876                  e->adapter->adapter_nr, e, e->e.Id, e->e.Req,
877                  e->e.ReqCh, e->e.X->PLength));
878
879         if (a->d.request)
880                 (*(a->d.request)) (&e->e);
881
882         diva_os_leave_spin_lock(&adapter_lock, &old_irql, "start_remove");
883
884         return (0);
885 }