source: trunk/kernel/kern/chdev.c @ 662

Last change on this file since 662 was 662, checked in by alain, 3 years ago

Introduce the ksocket.h & ksocket.c files in kernel/kern.

File size: 21.9 KB
Line 
1/*
2 * chdev.c - channel device API implementation.
3 *
4 * Authors  Alain Greiner   (2016,2017,2018,2019,2020)
5 *
6 * Copyright (c) UPMC Sorbonne Universites
7 *
8 * This file is part of ALMOS-MKH.
9 *
10 * ALMOS-MKH.is free software; you can redistribute it and/or modify it
11 * under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; version 2.0 of the License.
13 *
14 * ALMOS-MKH.is distributed in the hope that it will be useful, but
15 * WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17 * General Public License for more details.
18 *
19 * You should have received a copy of the GNU General Public License
20 * along with ALMOS-MKH.; if not, write to the Free Software Foundation,
21 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
22 */
23
24#include <kernel_config.h>
25#include <hal_kernel_types.h>
26#include <hal_special.h>
27#include <hal_remote.h>
28#include <hal_irqmask.h>
29#include <printk.h>
30#include <boot_info.h>
31#include <xlist.h>
32#include <kmem.h>
33#include <scheduler.h>
34#include <thread.h>
35#include <rpc.h>
36#include <chdev.h>
37#include <devfs.h>
38
39//////////////////////////////////////////////////////////////////////////////////////
40// Extern global variables
41//////////////////////////////////////////////////////////////////////////////////////
42
43extern chdev_directory_t    chdev_dir;         // allocated in kernel_init.c
44
45
46#if (DEBUG_SYS_READ & 1)
47extern uint32_t enter_chdev_cmd_read;
48extern uint32_t exit_chdev_cmd_read;
49extern uint32_t enter_chdev_server_read;
50extern uint32_t exit_chdev_server_read;
51#endif
52
53#if (DEBUG_SYS_WRITE & 1)
54extern uint32_t enter_chdev_cmd_write;
55extern uint32_t exit_chdev_cmd_write;
56extern uint32_t enter_chdev_server_write;
57extern uint32_t exit_chdev_server_write;
58#endif
59
60////////////////////////////////////////////
61char * chdev_func_str( uint32_t func_type ) 
62{
63    switch ( func_type ) 
64    {
65        case DEV_FUNC_RAM: return "RAM";
66        case DEV_FUNC_ROM: return "ROM";
67        case DEV_FUNC_FBF: return "FBF";
68        case DEV_FUNC_IOB: return "IOB";
69        case DEV_FUNC_IOC: return "IOC";
70        case DEV_FUNC_MMC: return "MMC";
71        case DEV_FUNC_DMA: return "DMA";
72        case DEV_FUNC_NIC: return "NIC";
73        case DEV_FUNC_TIM: return "TIM";
74        case DEV_FUNC_TXT: return "TXT";
75        case DEV_FUNC_ICU: return "ICU";
76        case DEV_FUNC_PIC: return "PIC";
77        default:           return "undefined";
78    }
79}
80
81/////////////////////////////////////////
82chdev_t * chdev_create( uint32_t    func,
83                        uint32_t    impl,
84                        uint32_t    channel,
85                        uint32_t    is_rx,
86                        xptr_t      base )
87{
88    chdev_t    * chdev;
89    kmem_req_t   req;
90
91    // allocate memory for chdev
92    req.type   = KMEM_KCM;
93    req.order  = bits_log2( sizeof(chdev_t) );
94    req.flags  = AF_ZERO | AF_KERNEL;
95    chdev      = kmem_alloc( &req );
96
97    if( chdev == NULL ) return NULL;
98
99    // initialize lock
100    remote_busylock_init( XPTR( local_cxy , &chdev->wait_lock ), LOCK_CHDEV_QUEUE );
101
102    // initialise waiting queue
103    xlist_root_init( XPTR( local_cxy , &chdev->wait_root ) );
104
105    // initialize attributes
106    chdev->func    =  func;
107    chdev->impl    =  impl;
108    chdev->channel =  channel;
109    chdev->is_rx   =  is_rx;
110    chdev->base    =  base; 
111
112    return chdev;
113
114}  // end chdev_create()
115
116///////////////////////////////////
117void chdev_print( chdev_t * chdev )
118{
119    printk("\n - func      = %s"
120           "\n - channel   = %d"
121           "\n - base      = %l"
122           "\n - cmd       = %x"
123           "\n - isr       = %x"
124           "\n - chdev     = %x\n",
125           chdev_func_str(chdev->func),
126           chdev->channel,
127           chdev->base,
128           chdev->cmd,
129           chdev->isr,
130           chdev );
131}
132
133//////////////////////////////////////////////////
134void chdev_register_command( xptr_t     chdev_xp )
135{
136    thread_t * server_ptr;    // local pointer on server thread associated to chdev
137    xptr_t     server_xp;     // extended pointer on server thread
138    core_t   * core_ptr;      // local pointer on core running the server thread
139    uint32_t   server_lid;    // core running the server thread local index
140    xptr_t     lock_xp;       // extended pointer on lock protecting the chdev state
141
142#if (DEBUG_SYS_READ & 1)
143enter_chdev_cmd_read = (uint32_t)hal_get_cycles();
144#endif
145
146#if (DEBUG_SYS_WRITE & 1)
147enter_chdev_cmd_write = (uint32_t)hal_get_cycles();
148#endif
149
150    thread_t * this      = CURRENT_THREAD;
151    xptr_t     client_xp = XPTR( local_cxy , this );
152
153    // get chdev cluster and local pointer
154    cxy_t     chdev_cxy = GET_CXY( chdev_xp );
155    chdev_t * chdev_ptr = GET_PTR( chdev_xp );
156
157    // check calling thread can yield
158    thread_assert_can_yield( this , __FUNCTION__ );
159
160    // get local and extended pointers on server thread
161    server_ptr = (thread_t *)hal_remote_lpt( XPTR( chdev_cxy , &chdev_ptr->server) );
162    server_xp  = XPTR( chdev_cxy , server_ptr );
163
164    // get local pointer on core running the server thread
165    core_ptr   = (core_t *)hal_remote_lpt( XPTR( chdev_cxy , &server_ptr->core ) );
166
167    // get server core local index
168    server_lid = hal_remote_l32( XPTR( chdev_cxy , &core_ptr->lid ) );
169
170#if (DEBUG_CHDEV_CMD_RX || DEBUG_CHDEV_CMD_TX)
171bool_t      is_rx        = hal_remote_l32( XPTR( chdev_cxy , &chdev_ptr->is_rx ) );
172trdid_t     server_trdid = hal_remote_l32( XPTR( chdev_cxy , &server_ptr->trdid ) ); 
173process_t * process_ptr  = hal_remote_lpt( XPTR( chdev_cxy , &server_ptr->process ) );
174pid_t       server_pid   = hal_remote_l32( XPTR( chdev_cxy , &process_ptr->pid ) );
175#endif
176   
177#if DEBUG_CHDEV_CMD_RX
178uint32_t rx_cycle = (uint32_t)hal_get_cycles();
179if( (is_rx) && (DEBUG_CHDEV_CMD_RX < rx_cycle) )
180printk("\n[%s] client thread[%x,%x] enter for RX / server[%x,%x] / cycle %d\n",
181__FUNCTION__, this->process->pid, this->trdid, server_pid, server_trdid, rx_cycle );
182#endif
183
184#if DEBUG_CHDEV_CMD_TX
185uint32_t tx_cycle = (uint32_t)hal_get_cycles();
186if( (is_rx == 0) && (DEBUG_CHDEV_CMD_TX < tx_cycle) )
187printk("\n[%s] client thread[%x,%x] enter for TX / server[%x,%x] / cycle %d\n",
188__FUNCTION__, this->process->pid, this->trdid, server_pid, server_trdid, tx_cycle );
189#endif
190
191    // build extended pointer on client thread xlist
192    xptr_t  list_xp    = XPTR( local_cxy , &this->wait_list );
193
194    // build extended pointer on chdev waiting queue root
195    xptr_t  root_xp    = XPTR( chdev_cxy , &chdev_ptr->wait_root );
196
197    // build extended pointer on lock protecting chdev waiting queue
198    lock_xp            = XPTR( chdev_cxy , &chdev_ptr->wait_lock );
199
200    // The following actions are executed in critical section,
201    // (because the busylock_acquire / busylock_release)
202    // (1) take the lock protecting the waiting queue
203    // (2) register client thread in server queue
204    // (3) unblock the server thread and block client thread
205    // (4) send IPI to force server scheduling
206    // (5) release the lock protecting waiting queue
207
208    // 1. take the lock protecting chdev queue
209    remote_busylock_acquire( lock_xp );
210
211    // 2. register client thread in waiting queue
212    xlist_add_last( root_xp , list_xp );
213
214#if (DEBUG_CHDEV_CMD_TX & 1)
215if( (is_rx == 0)  && (DEBUG_CHDEV_CMD_TX < tx_cycle) )
216printk("\n[%s] client thread[%x,%x] registered write request in chdev\n",
217__FUNCTION__, this->process->pid, this->trdid );
218#endif
219 
220#if (DEBUG_CHDEV_CMD_RX & 1)
221if( (is_rx)  && (DEBUG_CHDEV_CMD_RX < rx_cycle) )
222printk("\n[%s] client thread[%x,%x] registered read request in chdev\n",
223__FUNCTION__, this->process->pid, this->trdid );
224#endif
225 
226    // 3. client thread unblocks server thread and blocks itself
227    thread_unblock( server_xp , THREAD_BLOCKED_CLIENT );
228    thread_block( client_xp , THREAD_BLOCKED_IO );
229
230#if (DEBUG_CHDEV_CMD_TX & 1)
231if( (is_rx == 0) && (DEBUG_CHDEV_CMD_TX < tx_cycle) )
232printk("\n[%s] client thread[%x,%x] unblock server thread[%x,%x] and block itsef\n",
233__FUNCTION__, this->process->pid, this->trdid, server_pid, server_trdid );
234#endif
235
236#if (DEBUG_CHDEV_CMD_RX & 1)
237if( (is_rx) && (DEBUG_CHDEV_CMD_RX < rx_cycle) )
238printk("\n[%s] client thread[%x,%x] unblock server thread[%x,%x] and block itsef\n",
239__FUNCTION__, this->process->pid, this->trdid, server_pid, server_trdid );
240#endif
241
242    // 4. send IPI to core running the server thread when server core != client core
243    if( (server_lid != this->core->lid) || (local_cxy != chdev_cxy) )
244    {
245        dev_pic_send_ipi( chdev_cxy , server_lid ); 
246
247#if (DEBUG_CHDEV_CMD_TX & 1)
248if( (is_rx == 0)  && (DEBUG_CHDEV_CMD_TX < tx_cycle) )
249printk("\n[%s] client thread[%x,%x] sent IPI to TX server thread[%x,%x]\n",
250__FUNCTION__, this->process->pid, this->trdid, server_pid, server_trdid );
251#endif
252
253#if (DEBUG_CHDEV_CMD_RX & 1)
254if( (is_rx)  && (DEBUG_CHDEV_CMD_RX < rx_cycle) )
255printk("\n[%s] client thread[%x,%x] sent IPI to RX server thread[%x,%x]\n",
256__FUNCTION__, this->process->pid, this->trdid, server_pid, server_trdid );
257#endif
258
259    }
260 
261    // 5. release lock protecting chdev queue
262    remote_busylock_release( lock_xp );
263
264    // deschedule
265    sched_yield("blocked on I/O");
266
267#if DEBUG_CHDEV_CMD_RX
268rx_cycle = (uint32_t)hal_get_cycles();
269if( (is_rx) && (DEBUG_CHDEV_CMD_RX < rx_cycle) )
270printk("\n[%s] client thread[%x,%x] exit for RX / cycle %d\n",
271__FUNCTION__, this->process->pid, this->trdid, rx_cycle );
272#endif
273
274#if DEBUG_CHDEV_CMD_TX
275tx_cycle = (uint32_t)hal_get_cycles();
276if( (is_rx == 0) && (DEBUG_CHDEV_CMD_TX < tx_cycle) )
277printk("\n[%s] client thread[%x,%x] exit for TX / cycle %d\n",
278__FUNCTION__, this->process->pid, this->trdid, tx_cycle );
279#endif
280
281#if (DEBUG_SYS_READ & 1)
282exit_chdev_cmd_read = (uint32_t)hal_get_cycles();
283#endif
284
285#if (DEBUG_SYS_WRITE & 1)
286exit_chdev_cmd_write = (uint32_t)hal_get_cycles();
287#endif
288
289}  // end chdev_register_command()
290
291/////////////////////////////////////////
292void chdev_server_func( chdev_t * chdev )
293{
294    xptr_t          client_xp;    // extended pointer on waiting thread
295    cxy_t           client_cxy;   // cluster of client thread
296    thread_t      * client_ptr;   // local pointer on client thread
297    thread_t      * server;       // local pointer on server thread
298    xptr_t          root_xp;      // extended pointer on device waiting queue root
299    xptr_t          lock_xp;      // extended pointer on lock ptotecting chdev queue
300
301    server = CURRENT_THREAD;
302
303#if( DEBUG_CHDEV_SERVER_RX || DEBUG_CHDEV_SERVER_TX )
304uint32_t rx_cycle = (uint32_t)hal_get_cycles();
305if( (chdev->is_rx) && (DEBUG_CHDEV_SERVER_RX < rx_cycle) )
306printk("\n[%s] RX server thread[%x,%x] enter / channel %d / cycle %d\n",
307__FUNCTION__ , server->process->pid, server->trdid, chdev->channel, rx_cycle );
308#endif
309
310#if DEBUG_CHDEV_SERVER_TX
311uint32_t tx_cycle = (uint32_t)hal_get_cycles();
312if( (chdev->is_rx == 0) && (DEBUG_CHDEV_SERVER_TX < tx_cycle) )
313printk("\n[%s] TX server thread[%x,%x] enter / channel %d / cycle %d\n",
314__FUNCTION__ , server->process->pid, server->trdid, chdev->channel, tx_cycle );
315#endif
316
317    // build extended pointer on root & lock of client threads queue
318    root_xp = XPTR( local_cxy , &chdev->wait_root );
319    lock_xp = XPTR( local_cxy , &chdev->wait_lock );
320
321        // This infinite loop is executed by the DEV thread
322    // to handle commands registered in the chdev queue.
323    while( 1 )
324    {
325        // check server thread can yield
326        thread_assert_can_yield( server , __FUNCTION__ );
327
328        // get the lock protecting the waiting queue
329        remote_busylock_acquire( lock_xp );
330
331        // check waiting queue state
332        if( xlist_is_empty( root_xp ) )                      // waiting queue empty
333        {
334            // release lock protecting the waiting queue
335            remote_busylock_release( lock_xp );
336
337#if DEBUG_CHDEV_SERVER_RX
338rx_cycle = (uint32_t)hal_get_cycles();
339if( (chdev->is_rx) && (DEBUG_CHDEV_SERVER_RX < rx_cycle) )
340printk("\n[%s] RX server thread[%x,%x] blocks & deschedules / cycle %d\n",
341__FUNCTION__ , server->process->pid, server->trdid, rx_cycle );
342#endif
343
344#if DEBUG_CHDEV_SERVER_TX
345tx_cycle = (uint32_t)hal_get_cycles();
346if( (chdev->is_rx == 0) && (DEBUG_CHDEV_SERVER_TX < tx_cycle) )
347printk("\n[%s] TX server thread[%x,%x] blocks & deschedules / cycle %d\n",
348__FUNCTION__ , server->process->pid, server->trdid, tx_cycle );
349#endif
350            // block and deschedule
351            thread_block( XPTR( local_cxy , server ) , THREAD_BLOCKED_CLIENT ); 
352            sched_yield("clients queue empty");
353
354#if DEBUG_CHDEV_SERVER_RX
355rx_cycle = (uint32_t)hal_get_cycles();
356if( (chdev->is_rx) && (DEBUG_CHDEV_SERVER_RX < rx_cycle) )
357printk("\n[%s] RX server thread[%x,%x] resumes / cycle %d\n",
358__FUNCTION__ , server->process->pid, server->trdid, rx_cycle );
359#endif
360
361#if DEBUG_CHDEV_SERVER_TX
362tx_cycle = (uint32_t)hal_get_cycles();
363if( (chdev->is_rx == 0) && (DEBUG_CHDEV_SERVER_TX < tx_cycle) )
364printk("\n[%s] TX server thread[%x,%x] resumes / cycle %d\n",
365__FUNCTION__ , server->process->pid, server->trdid, tx_cycle );
366#endif
367
368        } 
369        else                                               // waiting queue not empty
370        {
371            // get pointers on first client thread
372            client_xp  = XLIST_FIRST( root_xp , thread_t , wait_list );
373            client_cxy = GET_CXY( client_xp );
374            client_ptr = GET_PTR( client_xp );
375
376            // remove this client thread from chdev waiting queue
377            xlist_unlink( XPTR( client_cxy , &client_ptr->wait_list ) );
378
379            // release lock protecting the waiting queue
380            remote_busylock_release( lock_xp );
381
382#if( DEBUG_CHDEV_SERVER_TX || DEBUG_CHDEV_SERVER_RX )
383process_t * process      = hal_remote_lpt( XPTR( client_cxy , &client_ptr->process ) );
384pid_t       client_pid   = hal_remote_l32( XPTR( client_cxy , &process->pid ) );
385trdid_t     client_trdid = hal_remote_l32( XPTR( client_cxy , &client_ptr->trdid ) );
386#endif
387
388#if DEBUG_CHDEV_SERVER_RX
389rx_cycle = (uint32_t)hal_get_cycles();
390if( (chdev->is_rx) && (DEBUG_CHDEV_SERVER_RX < rx_cycle) )
391printk("\n[%s] server thread[%x,%x] get command from client thread[%x,%x] / cycle %d\n",
392__FUNCTION__, server->process->pid, server->trdid, client_pid, client_trdid, rx_cycle );
393#endif
394
395#if DEBUG_CHDEV_SERVER_TX
396tx_cycle = (uint32_t)hal_get_cycles();
397if( (chdev->is_rx == 0) && (DEBUG_CHDEV_SERVER_TX < tx_cycle) )
398printk("\n[%s] server thread[%x,%x] get command from client thread[%x,%x] / cycle %d\n",
399__FUNCTION__, server->process->pid, server->trdid, client_pid, client_trdid, tx_cycle );
400#endif
401
402#if (DEBUG_SYS_READ & 1)
403enter_chdev_server_read = (uint32_t)hal_get_cycles();
404#endif
405
406#if (DEBUG_SYS_WRITE & 1)
407enter_chdev_server_write = (uint32_t)hal_get_cycles();
408#endif
409
410            // call the (blocking) driver command function
411            // to launch I/O operation AND wait completion
412            chdev->cmd( client_xp );
413       
414            // unblock client thread when driver returns
415            thread_unblock( client_xp , THREAD_BLOCKED_IO );
416
417#if DEBUG_CHDEV_SERVER_RX
418rx_cycle = (uint32_t)hal_get_cycles();
419if( (chdev->is_rx) && (DEBUG_CHDEV_SERVER_RX < rx_cycle) )
420printk("\n[%s] thread[%x,%x] completes command for client thread[%x,%x] / cycle %d\n",
421__FUNCTION__, server->process->pid, server->trdid, client_pid, client_trdid, rx_cycle );
422#endif
423
424#if DEBUG_CHDEV_SERVER_TX
425tx_cycle = (uint32_t)hal_get_cycles();
426if( (chdev->is_rx == 0) && (DEBUG_CHDEV_SERVER_TX < tx_cycle) )
427printk("\n[%s] thread[%x,%x] completes command for client thread[%x,%x] / cycle %d\n",
428__FUNCTION__, server->process->pid, server->trdid, client_pid, client_trdid, tx_cycle );
429#endif
430
431#if (DEBUG_SYS_READ & 1)
432exit_chdev_server_read = (uint32_t)hal_get_cycles();
433#endif
434
435#if (DEBUG_SYS_WRITE & 1)
436exit_chdev_server_write = (uint32_t)hal_get_cycles();
437#endif
438
439        }
440    }  // end while
441}  // end chdev_server_func()
442
443////////////////////////////////////////
444xptr_t chdev_from_file( xptr_t file_xp )
445{
446    cxy_t         file_cxy;
447    vfs_file_t  * file_ptr;
448    uint32_t      inode_type;
449    vfs_inode_t * inode_ptr;
450    chdev_t     * chdev_ptr;
451
452    assert( (file_xp != XPTR_NULL) ,
453    "file_xp == XPTR_NULL\n" );
454
455    // get cluster and local pointer on remote file descriptor
456    // associated inode and chdev are stored in same cluster as the file desc.
457    file_cxy  = GET_CXY( file_xp );
458    file_ptr  = (vfs_file_t *)GET_PTR( file_xp );
459
460    // get inode type from file descriptor
461    inode_type = hal_remote_l32( XPTR( file_cxy , &file_ptr->type ) );
462    inode_ptr  = (vfs_inode_t *)hal_remote_lpt( XPTR( file_cxy , &file_ptr->inode ) );
463
464    assert( (inode_type == INODE_TYPE_DEV) ,
465    "inode type %d is not INODE_TYPE_DEV\n", inode_type );
466
467    // get chdev local pointer from inode extension
468    chdev_ptr = (chdev_t *)hal_remote_lpt( XPTR( file_cxy , &inode_ptr->extend ) );
469
470    return XPTR( file_cxy , chdev_ptr );
471
472}  // end chdev_from_file()
473
474//////////////////////////////
475void chdev_dir_display( void )
476{
477    uint32_t  i;
478    cxy_t     cxy;
479    chdev_t * ptr;
480    uint32_t  base;
481
482    // get pointers on TXT0 chdev
483    xptr_t    txt0_xp  = chdev_dir.txt_tx[0];
484    cxy_t     txt0_cxy = GET_CXY( txt0_xp );
485    chdev_t * txt0_ptr = GET_PTR( txt0_xp );
486
487    // get extended pointer on TXT0 lock
488    xptr_t  lock_xp = XPTR( txt0_cxy , &txt0_ptr->wait_lock );
489
490    // get TXT0 lock
491    remote_busylock_acquire( lock_xp );
492
493    // header
494    nolock_printk("\n***** external chdevs directory *****\n");
495
496    // IOB
497    if (chdev_dir.iob != XPTR_NULL )
498    {
499        cxy  = GET_CXY( chdev_dir.iob );
500        ptr  = GET_PTR( chdev_dir.iob );
501        base = (uint32_t)hal_remote_l64( XPTR( cxy , &ptr->base ) );
502        nolock_printk("  - iob       : cxy = %X / ptr = %X / base = %X\n", cxy, ptr, base);
503    }
504
505    // PIC
506    cxy  = GET_CXY( chdev_dir.pic );
507    ptr  = GET_PTR( chdev_dir.pic );
508    base = (uint32_t)hal_remote_l64( XPTR( cxy , &ptr->base ) );
509    nolock_printk("  - pic       : cxy = %X / ptr = %X / base = %X\n", cxy, ptr, base);
510
511    // TXT
512    for( i = 0 ; i < LOCAL_CLUSTER->nb_txt_channels ; i++ )
513    {
514        cxy = GET_CXY( chdev_dir.txt_rx[i] );
515        ptr = GET_PTR( chdev_dir.txt_rx[i] );
516        base = (uint32_t)hal_remote_l64( XPTR( cxy , &ptr->base ) );
517        nolock_printk("  - txt_rx[%d] : cxy = %X / ptr = %X / base = %X\n", i, cxy, ptr, base);
518
519        cxy = GET_CXY( chdev_dir.txt_tx[i] );
520        ptr = GET_PTR( chdev_dir.txt_tx[i] );
521        base = (uint32_t)hal_remote_l64( XPTR( cxy , &ptr->base ) );
522        nolock_printk("  - txt_tx[%d] : cxy = %X / ptr = %X / base = %X\n", i, cxy, ptr, base);
523    }
524
525    // IOC
526    for( i = 0 ; i < LOCAL_CLUSTER->nb_ioc_channels ; i++ )
527    {
528        cxy = GET_CXY( chdev_dir.ioc[i] );
529        ptr = GET_PTR( chdev_dir.ioc[i] );
530        base = (uint32_t)hal_remote_l64( XPTR( cxy , &ptr->base ) );
531        nolock_printk("  - ioc[%d]    : cxy = %X / ptr = %X / base = %X\n", i, cxy, ptr, base);
532    }
533
534    // FBF
535    for( i = 0 ; i < LOCAL_CLUSTER->nb_fbf_channels ; i++ )
536    {
537        cxy  = GET_CXY( chdev_dir.fbf[i] );
538        ptr  = GET_PTR( chdev_dir.fbf[i] );
539        base = (uint32_t)hal_remote_l64( XPTR( cxy , &ptr->base ) );
540        nolock_printk("  - fbf[%d]    : cxy = %X / ptr = %X / base = %X\n", i, cxy, ptr, base);
541    }
542
543    // NIC
544    for( i = 0 ; i < LOCAL_CLUSTER->nb_nic_channels ; i++ )
545    {
546        cxy = GET_CXY( chdev_dir.nic_rx[i] );
547        ptr = GET_PTR( chdev_dir.nic_rx[i] );
548        base = (uint32_t)hal_remote_l64( XPTR( cxy , &ptr->base ) );
549        nolock_printk("  - nic_rx[%d] : cxy = %X / ptr = %X / base = %X\n", i, cxy, ptr, base);
550
551        cxy = GET_CXY( chdev_dir.nic_tx[i] );
552        ptr = GET_PTR( chdev_dir.nic_tx[i] );
553        base = (uint32_t)hal_remote_l64( XPTR( cxy , &ptr->base ) );
554        nolock_printk("  - nic_tx[%d] : cxy = %X / ptr = %X / base = %X\n", i, cxy, ptr, base);
555    }
556
557    // release lock
558    remote_busylock_release( lock_xp );
559
560}  // end chdev_dir_display()
561
562///////////////////////////////////////////
563void chdev_queue_display( xptr_t chdev_xp )
564{
565    cxy_t       chdev_cxy;          // chdev cluster
566    chdev_t   * chdev_ptr;          // chdev local pointer
567    xptr_t      root_xp;            // extended pointer on waiting queuue root
568    char        name[16];           // local copie of chdev name
569    xptr_t      iter_xp;            // extended pointer on xlist_t field in waiting thread
570    xptr_t      thread_xp;          // extended pointer on thread registered in queue
571    cxy_t       thread_cxy;         // cluster identifier for waiting thread
572    thread_t  * thread_ptr;         // local pointer on waiting thread
573    trdid_t     trdid;              // waiting thread identifier
574    process_t * process;            // waiting thread process descriptor
575    pid_t       pid;                // waiting thread process identifier
576
577    // get cluster and local pointer on chdev
578    chdev_cxy = GET_CXY( chdev_xp );
579    chdev_ptr = GET_PTR( chdev_xp );
580
581    // get extended pointer on root of requests queue
582    root_xp = XPTR( chdev_cxy , &chdev_ptr->wait_root );
583
584    // get chdev name
585    hal_remote_strcpy( XPTR( local_cxy , name ), XPTR( chdev_cxy , chdev_ptr->name ) );
586
587    // get pointers on TXT0 chdev
588    xptr_t    txt0_xp  = chdev_dir.txt_tx[0];
589    cxy_t     txt0_cxy = GET_CXY( txt0_xp );
590    chdev_t * txt0_ptr = GET_PTR( txt0_xp );
591
592    // get extended pointer on TXT0 lock
593    xptr_t  lock_xp = XPTR( txt0_cxy , &txt0_ptr->wait_lock );
594
595    // get TXT0 lock
596    remote_busylock_acquire( lock_xp );
597
598    // check queue empty
599    if( xlist_is_empty( root_xp ) )
600    {
601        nolock_printk("\n***** Waiting queue empty for chdev %s\n", name ); 
602    }
603    else
604    {
605        nolock_printk("\n***** Waiting queue for chdev %s\n", name ); 
606
607        // scan the waiting queue
608        XLIST_FOREACH( root_xp , iter_xp )
609        {
610            thread_xp  = XLIST_ELEMENT( iter_xp , thread_t , wait_list );
611            thread_cxy = GET_CXY( thread_xp );
612            thread_ptr = GET_PTR( thread_xp );
613            trdid      = hal_remote_l32 ( XPTR( thread_cxy , &thread_ptr->trdid   ) );
614            process    = hal_remote_lpt( XPTR( thread_cxy , &thread_ptr->process ) );
615                        pid        = hal_remote_l32 ( XPTR( thread_cxy , &process->pid        ) );
616
617            nolock_printk("- thread[%x,%x]\n", pid, trdid );
618        }
619    }
620
621    // release TXT0 lock
622    remote_busylock_release( lock_xp );
623
624}  // end chdev_queue_display()
625
Note: See TracBrowser for help on using the repository browser.