[5] | 1 | /* |
---|
[657] | 2 | * chdev.c - channel device API implementation. |
---|
[5] | 3 | * |
---|
[657] | 4 | * Authors Alain Greiner (2016,2017,2018,2019,2020) |
---|
[5] | 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 | |
---|
[14] | 24 | #include <kernel_config.h> |
---|
[457] | 25 | #include <hal_kernel_types.h> |
---|
[5] | 26 | #include <hal_special.h> |
---|
[447] | 27 | #include <hal_remote.h> |
---|
[407] | 28 | #include <hal_irqmask.h> |
---|
[16] | 29 | #include <printk.h> |
---|
[5] | 30 | #include <boot_info.h> |
---|
| 31 | #include <xlist.h> |
---|
| 32 | #include <kmem.h> |
---|
[407] | 33 | #include <scheduler.h> |
---|
[5] | 34 | #include <thread.h> |
---|
| 35 | #include <rpc.h> |
---|
| 36 | #include <chdev.h> |
---|
[23] | 37 | #include <devfs.h> |
---|
[5] | 38 | |
---|
[564] | 39 | ////////////////////////////////////////////////////////////////////////////////////// |
---|
| 40 | // Extern global variables |
---|
| 41 | ////////////////////////////////////////////////////////////////////////////////////// |
---|
[317] | 42 | |
---|
[564] | 43 | extern chdev_directory_t chdev_dir; // allocated in kernel_init.c |
---|
[317] | 44 | |
---|
[564] | 45 | |
---|
[438] | 46 | #if (DEBUG_SYS_READ & 1) |
---|
[435] | 47 | extern uint32_t enter_chdev_cmd_read; |
---|
| 48 | extern uint32_t exit_chdev_cmd_read; |
---|
| 49 | extern uint32_t enter_chdev_server_read; |
---|
| 50 | extern uint32_t exit_chdev_server_read; |
---|
[407] | 51 | #endif |
---|
[317] | 52 | |
---|
[438] | 53 | #if (DEBUG_SYS_WRITE & 1) |
---|
[435] | 54 | extern uint32_t enter_chdev_cmd_write; |
---|
| 55 | extern uint32_t exit_chdev_cmd_write; |
---|
| 56 | extern uint32_t enter_chdev_server_write; |
---|
| 57 | extern uint32_t exit_chdev_server_write; |
---|
| 58 | #endif |
---|
| 59 | |
---|
[5] | 60 | //////////////////////////////////////////// |
---|
| 61 | char * chdev_func_str( uint32_t func_type ) |
---|
| 62 | { |
---|
[564] | 63 | switch ( func_type ) |
---|
| 64 | { |
---|
[583] | 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"; |
---|
[527] | 78 | } |
---|
[5] | 79 | } |
---|
| 80 | |
---|
| 81 | ///////////////////////////////////////// |
---|
| 82 | chdev_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 |
---|
[635] | 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 ); |
---|
[5] | 96 | |
---|
| 97 | if( chdev == NULL ) return NULL; |
---|
| 98 | |
---|
[564] | 99 | // initialize lock |
---|
| 100 | remote_busylock_init( XPTR( local_cxy , &chdev->wait_lock ), LOCK_CHDEV_QUEUE ); |
---|
| 101 | |
---|
| 102 | // initialise waiting queue |
---|
[5] | 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 | /////////////////////////////////// |
---|
| 117 | void 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 | |
---|
[407] | 133 | ////////////////////////////////////////////////// |
---|
| 134 | void chdev_register_command( xptr_t chdev_xp ) |
---|
[5] | 135 | { |
---|
[407] | 136 | thread_t * server_ptr; // local pointer on server thread associated to chdev |
---|
[440] | 137 | xptr_t server_xp; // extended pointer on server thread |
---|
[407] | 138 | core_t * core_ptr; // local pointer on core running the server thread |
---|
[457] | 139 | uint32_t server_lid; // core running the server thread local index |
---|
[564] | 140 | xptr_t lock_xp; // extended pointer on lock protecting the chdev state |
---|
[5] | 141 | |
---|
[438] | 142 | #if (DEBUG_SYS_READ & 1) |
---|
[435] | 143 | enter_chdev_cmd_read = (uint32_t)hal_get_cycles(); |
---|
[418] | 144 | #endif |
---|
| 145 | |
---|
[438] | 146 | #if (DEBUG_SYS_WRITE & 1) |
---|
[435] | 147 | enter_chdev_cmd_write = (uint32_t)hal_get_cycles(); |
---|
| 148 | #endif |
---|
| 149 | |
---|
[657] | 150 | thread_t * this = CURRENT_THREAD; |
---|
| 151 | xptr_t client_xp = XPTR( local_cxy , this ); |
---|
[407] | 152 | |
---|
[440] | 153 | // get chdev cluster and local pointer |
---|
[5] | 154 | cxy_t chdev_cxy = GET_CXY( chdev_xp ); |
---|
[440] | 155 | chdev_t * chdev_ptr = GET_PTR( chdev_xp ); |
---|
[5] | 156 | |
---|
[581] | 157 | // check calling thread can yield |
---|
| 158 | thread_assert_can_yield( this , __FUNCTION__ ); |
---|
[564] | 159 | |
---|
[440] | 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 |
---|
[564] | 168 | server_lid = hal_remote_l32( XPTR( chdev_cxy , &core_ptr->lid ) ); |
---|
[440] | 169 | |
---|
[438] | 170 | #if (DEBUG_CHDEV_CMD_RX || DEBUG_CHDEV_CMD_TX) |
---|
[619] | 171 | bool_t is_rx = hal_remote_l32( XPTR( chdev_cxy , &chdev_ptr->is_rx ) ); |
---|
| 172 | trdid_t server_trdid = hal_remote_l32( XPTR( chdev_cxy , &server_ptr->trdid ) ); |
---|
| 173 | process_t * process_ptr = hal_remote_lpt( XPTR( chdev_cxy , &server_ptr->process ) ); |
---|
| 174 | pid_t server_pid = hal_remote_l32( XPTR( chdev_cxy , &process_ptr->pid ) ); |
---|
[437] | 175 | #endif |
---|
| 176 | |
---|
[438] | 177 | #if DEBUG_CHDEV_CMD_RX |
---|
[437] | 178 | uint32_t rx_cycle = (uint32_t)hal_get_cycles(); |
---|
[438] | 179 | if( (is_rx) && (DEBUG_CHDEV_CMD_RX < rx_cycle) ) |
---|
[625] | 180 | printk("\n[%s] client thread[%x,%x] enter for RX / server[%x,%x] / cycle %d\n", |
---|
[619] | 181 | __FUNCTION__, this->process->pid, this->trdid, server_pid, server_trdid, rx_cycle ); |
---|
[437] | 182 | #endif |
---|
| 183 | |
---|
[438] | 184 | #if DEBUG_CHDEV_CMD_TX |
---|
[437] | 185 | uint32_t tx_cycle = (uint32_t)hal_get_cycles(); |
---|
[438] | 186 | if( (is_rx == 0) && (DEBUG_CHDEV_CMD_TX < tx_cycle) ) |
---|
[625] | 187 | printk("\n[%s] client thread[%x,%x] enter for TX / server[%x,%x] / cycle %d\n", |
---|
[619] | 188 | __FUNCTION__, this->process->pid, this->trdid, server_pid, server_trdid, tx_cycle ); |
---|
[437] | 189 | #endif |
---|
| 190 | |
---|
[440] | 191 | // build extended pointer on client thread xlist |
---|
| 192 | xptr_t list_xp = XPTR( local_cxy , &this->wait_list ); |
---|
[5] | 193 | |
---|
[440] | 194 | // build extended pointer on chdev waiting queue root |
---|
| 195 | xptr_t root_xp = XPTR( chdev_cxy , &chdev_ptr->wait_root ); |
---|
[5] | 196 | |
---|
[440] | 197 | // build extended pointer on lock protecting chdev waiting queue |
---|
[564] | 198 | lock_xp = XPTR( chdev_cxy , &chdev_ptr->wait_lock ); |
---|
[407] | 199 | |
---|
[657] | 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 |
---|
[625] | 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 |
---|
[407] | 207 | |
---|
[625] | 208 | // 1. take the lock protecting chdev queue |
---|
[564] | 209 | remote_busylock_acquire( lock_xp ); |
---|
[408] | 210 | |
---|
[625] | 211 | // 2. register client thread in waiting queue |
---|
| 212 | xlist_add_last( root_xp , list_xp ); |
---|
[408] | 213 | |
---|
[450] | 214 | #if (DEBUG_CHDEV_CMD_TX & 1) |
---|
[625] | 215 | if( (is_rx == 0) && (DEBUG_CHDEV_CMD_TX < tx_cycle) ) |
---|
| 216 | printk("\n[%s] client thread[%x,%x] registered write request in chdev\n", |
---|
[601] | 217 | __FUNCTION__, this->process->pid, this->trdid ); |
---|
[450] | 218 | #endif |
---|
[625] | 219 | |
---|
[457] | 220 | #if (DEBUG_CHDEV_CMD_RX & 1) |
---|
[625] | 221 | if( (is_rx) && (DEBUG_CHDEV_CMD_RX < rx_cycle) ) |
---|
| 222 | printk("\n[%s] client thread[%x,%x] registered read request in chdev\n", |
---|
| 223 | __FUNCTION__, this->process->pid, this->trdid ); |
---|
[457] | 224 | #endif |
---|
[625] | 225 | |
---|
| 226 | // 3. client thread unblocks server thread and blocks itself |
---|
[657] | 227 | thread_unblock( server_xp , THREAD_BLOCKED_CLIENT ); |
---|
| 228 | thread_block( client_xp , THREAD_BLOCKED_IO ); |
---|
[440] | 229 | |
---|
[450] | 230 | #if (DEBUG_CHDEV_CMD_TX & 1) |
---|
| 231 | if( (is_rx == 0) && (DEBUG_CHDEV_CMD_TX < tx_cycle) ) |
---|
[625] | 232 | printk("\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 ); |
---|
[450] | 234 | #endif |
---|
| 235 | |
---|
[457] | 236 | #if (DEBUG_CHDEV_CMD_RX & 1) |
---|
| 237 | if( (is_rx) && (DEBUG_CHDEV_CMD_RX < rx_cycle) ) |
---|
[625] | 238 | printk("\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 ); |
---|
[457] | 240 | #endif |
---|
| 241 | |
---|
[625] | 242 | // 4. send IPI to core running the server thread when server core != client core |
---|
[457] | 243 | if( (server_lid != this->core->lid) || (local_cxy != chdev_cxy) ) |
---|
[450] | 244 | { |
---|
[457] | 245 | dev_pic_send_ipi( chdev_cxy , server_lid ); |
---|
| 246 | |
---|
[450] | 247 | #if (DEBUG_CHDEV_CMD_TX & 1) |
---|
| 248 | if( (is_rx == 0) && (DEBUG_CHDEV_CMD_TX < tx_cycle) ) |
---|
[593] | 249 | printk("\n[%s] client thread[%x,%x] sent IPI to TX server thread[%x,%x]\n", |
---|
[619] | 250 | __FUNCTION__, this->process->pid, this->trdid, server_pid, server_trdid ); |
---|
[450] | 251 | #endif |
---|
| 252 | |
---|
[457] | 253 | #if (DEBUG_CHDEV_CMD_RX & 1) |
---|
| 254 | if( (is_rx) && (DEBUG_CHDEV_CMD_RX < rx_cycle) ) |
---|
[593] | 255 | printk("\n[%s] client thread[%x,%x] sent IPI to RX server thread[%x,%x]\n", |
---|
[619] | 256 | __FUNCTION__, this->process->pid, this->trdid, server_pid, server_trdid ); |
---|
[457] | 257 | #endif |
---|
| 258 | |
---|
[450] | 259 | } |
---|
| 260 | |
---|
[625] | 261 | // 5. release lock protecting chdev queue |
---|
[564] | 262 | remote_busylock_release( lock_xp ); |
---|
[440] | 263 | |
---|
[408] | 264 | // deschedule |
---|
| 265 | sched_yield("blocked on I/O"); |
---|
[407] | 266 | |
---|
[438] | 267 | #if DEBUG_CHDEV_CMD_RX |
---|
[437] | 268 | rx_cycle = (uint32_t)hal_get_cycles(); |
---|
[438] | 269 | if( (is_rx) && (DEBUG_CHDEV_CMD_RX < rx_cycle) ) |
---|
[625] | 270 | printk("\n[%s] client thread[%x,%x] exit for RX / cycle %d\n", |
---|
[593] | 271 | __FUNCTION__, this->process->pid, this->trdid, rx_cycle ); |
---|
[433] | 272 | #endif |
---|
| 273 | |
---|
[438] | 274 | #if DEBUG_CHDEV_CMD_TX |
---|
[437] | 275 | tx_cycle = (uint32_t)hal_get_cycles(); |
---|
[438] | 276 | if( (is_rx == 0) && (DEBUG_CHDEV_CMD_TX < tx_cycle) ) |
---|
[625] | 277 | printk("\n[%s] client thread[%x,%x] exit for TX / cycle %d\n", |
---|
[593] | 278 | __FUNCTION__, this->process->pid, this->trdid, tx_cycle ); |
---|
[437] | 279 | #endif |
---|
| 280 | |
---|
[438] | 281 | #if (DEBUG_SYS_READ & 1) |
---|
[435] | 282 | exit_chdev_cmd_read = (uint32_t)hal_get_cycles(); |
---|
[418] | 283 | #endif |
---|
| 284 | |
---|
[438] | 285 | #if (DEBUG_SYS_WRITE & 1) |
---|
[435] | 286 | exit_chdev_cmd_write = (uint32_t)hal_get_cycles(); |
---|
| 287 | #endif |
---|
| 288 | |
---|
[5] | 289 | } // end chdev_register_command() |
---|
| 290 | |
---|
[619] | 291 | ///////////////////////////////////////// |
---|
| 292 | void chdev_server_func( chdev_t * chdev ) |
---|
[5] | 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 |
---|
[407] | 297 | thread_t * server; // local pointer on server thread |
---|
[5] | 298 | xptr_t root_xp; // extended pointer on device waiting queue root |
---|
[407] | 299 | xptr_t lock_xp; // extended pointer on lock ptotecting chdev queue |
---|
[5] | 300 | |
---|
| 301 | server = CURRENT_THREAD; |
---|
| 302 | |
---|
[657] | 303 | // build extended pointer on root & lock of client threads queue |
---|
[5] | 304 | root_xp = XPTR( local_cxy , &chdev->wait_root ); |
---|
[407] | 305 | lock_xp = XPTR( local_cxy , &chdev->wait_lock ); |
---|
[5] | 306 | |
---|
[407] | 307 | // This infinite loop is executed by the DEV thread |
---|
| 308 | // to handle commands registered in the chdev queue. |
---|
[5] | 309 | while( 1 ) |
---|
| 310 | { |
---|
[564] | 311 | |
---|
[619] | 312 | #if( DEBUG_CHDEV_SERVER_RX || DEBUG_CHDEV_SERVER_TX ) |
---|
[564] | 313 | uint32_t rx_cycle = (uint32_t)hal_get_cycles(); |
---|
| 314 | if( (chdev->is_rx) && (DEBUG_CHDEV_SERVER_RX < rx_cycle) ) |
---|
[625] | 315 | printk("\n[%s] server thread[%x,%x] check TXT_RX channel %d / cycle %d\n", |
---|
[619] | 316 | __FUNCTION__ , server->process->pid, server->trdid, chdev->channel, rx_cycle ); |
---|
[564] | 317 | #endif |
---|
| 318 | |
---|
| 319 | #if DEBUG_CHDEV_SERVER_TX |
---|
| 320 | uint32_t tx_cycle = (uint32_t)hal_get_cycles(); |
---|
| 321 | if( (chdev->is_rx == 0) && (DEBUG_CHDEV_SERVER_TX < tx_cycle) ) |
---|
[619] | 322 | printk("\n[%s] thread[%x,%x] check TXT_TX channel %d / cycle %d\n", |
---|
| 323 | __FUNCTION__ , server->process->pid, server->trdid, chdev->channel, tx_cycle ); |
---|
[564] | 324 | #endif |
---|
| 325 | |
---|
[601] | 326 | // check server thread can yield |
---|
| 327 | thread_assert_can_yield( server , __FUNCTION__ ); |
---|
| 328 | |
---|
[407] | 329 | // get the lock protecting the waiting queue |
---|
[564] | 330 | remote_busylock_acquire( lock_xp ); |
---|
[407] | 331 | |
---|
[5] | 332 | // check waiting queue state |
---|
[407] | 333 | if( xlist_is_empty( root_xp ) ) // waiting queue empty |
---|
[5] | 334 | { |
---|
[601] | 335 | // release lock protecting the waiting queue |
---|
| 336 | remote_busylock_release( lock_xp ); |
---|
[564] | 337 | |
---|
| 338 | #if DEBUG_CHDEV_SERVER_RX |
---|
| 339 | rx_cycle = (uint32_t)hal_get_cycles(); |
---|
| 340 | if( (chdev->is_rx) && (DEBUG_CHDEV_SERVER_RX < rx_cycle) ) |
---|
[625] | 341 | printk("\n[%s] server thread[%x,%x] found RX queue empty => blocks / cycle %d\n", |
---|
[593] | 342 | __FUNCTION__ , server->process->pid, server->trdid, rx_cycle ); |
---|
[564] | 343 | #endif |
---|
| 344 | |
---|
| 345 | #if DEBUG_CHDEV_SERVER_TX |
---|
| 346 | tx_cycle = (uint32_t)hal_get_cycles(); |
---|
| 347 | if( (chdev->is_rx == 0) && (DEBUG_CHDEV_SERVER_TX < tx_cycle) ) |
---|
[625] | 348 | printk("\n[%s] server thread[%x,%x] found TX queue empty => blocks / cycle %d\n", |
---|
[593] | 349 | __FUNCTION__ , server->process->pid, server->trdid, tx_cycle ); |
---|
[564] | 350 | #endif |
---|
[440] | 351 | // block |
---|
[657] | 352 | thread_block( XPTR( local_cxy , server ) , THREAD_BLOCKED_CLIENT ); |
---|
[440] | 353 | |
---|
[408] | 354 | // deschedule |
---|
| 355 | sched_yield("I/O queue empty"); |
---|
[5] | 356 | } |
---|
[407] | 357 | else // waiting queue not empty |
---|
[5] | 358 | { |
---|
[657] | 359 | // get pointers on first client thread |
---|
| 360 | client_xp = XLIST_FIRST( root_xp , thread_t , wait_list ); |
---|
| 361 | client_cxy = GET_CXY( client_xp ); |
---|
| 362 | client_ptr = GET_PTR( client_xp ); |
---|
| 363 | |
---|
| 364 | // remove this client thread from chdev waiting queue |
---|
| 365 | xlist_unlink( XPTR( client_cxy , &client_ptr->wait_list ) ); |
---|
| 366 | |
---|
[601] | 367 | // release lock protecting the waiting queue |
---|
| 368 | remote_busylock_release( lock_xp ); |
---|
| 369 | |
---|
[619] | 370 | #if( DEBUG_CHDEV_SERVER_TX || DEBUG_CHDEV_SERVER_RX ) |
---|
[601] | 371 | process_t * process = hal_remote_lpt( XPTR( client_cxy , &client_ptr->process ) ); |
---|
| 372 | pid_t client_pid = hal_remote_l32( XPTR( client_cxy , &process->pid ) ); |
---|
[619] | 373 | trdid_t client_trdid = hal_remote_l32( XPTR( client_cxy , &client_ptr->trdid ) ); |
---|
[601] | 374 | #endif |
---|
[440] | 375 | |
---|
[438] | 376 | #if DEBUG_CHDEV_SERVER_RX |
---|
[564] | 377 | rx_cycle = (uint32_t)hal_get_cycles(); |
---|
[438] | 378 | if( (chdev->is_rx) && (DEBUG_CHDEV_SERVER_RX < rx_cycle) ) |
---|
[625] | 379 | printk("\n[%s] server thread[%x,%x] get command from client thread[%x,%x] / cycle %d\n", |
---|
[619] | 380 | __FUNCTION__, server->process->pid, server->trdid, client_pid, client_trdid, rx_cycle ); |
---|
[437] | 381 | #endif |
---|
| 382 | |
---|
[438] | 383 | #if DEBUG_CHDEV_SERVER_TX |
---|
[564] | 384 | tx_cycle = (uint32_t)hal_get_cycles(); |
---|
[438] | 385 | if( (chdev->is_rx == 0) && (DEBUG_CHDEV_SERVER_TX < tx_cycle) ) |
---|
[625] | 386 | printk("\n[%s] server thread[%x,%x] get command from client thread[%x,%x] / cycle %d\n", |
---|
[619] | 387 | __FUNCTION__, server->process->pid, server->trdid, client_pid, client_trdid, tx_cycle ); |
---|
[437] | 388 | #endif |
---|
| 389 | |
---|
[438] | 390 | #if (DEBUG_SYS_READ & 1) |
---|
[437] | 391 | enter_chdev_server_read = (uint32_t)hal_get_cycles(); |
---|
| 392 | #endif |
---|
| 393 | |
---|
[438] | 394 | #if (DEBUG_SYS_WRITE & 1) |
---|
[437] | 395 | enter_chdev_server_write = (uint32_t)hal_get_cycles(); |
---|
| 396 | #endif |
---|
| 397 | |
---|
[601] | 398 | // call the (blocking) driver command function |
---|
| 399 | // to launch I/O operation AND wait completion |
---|
[407] | 400 | chdev->cmd( client_xp ); |
---|
[5] | 401 | |
---|
[601] | 402 | // unblock client thread when driver returns |
---|
[418] | 403 | thread_unblock( client_xp , THREAD_BLOCKED_IO ); |
---|
| 404 | |
---|
[438] | 405 | #if DEBUG_CHDEV_SERVER_RX |
---|
[437] | 406 | rx_cycle = (uint32_t)hal_get_cycles(); |
---|
[438] | 407 | if( (chdev->is_rx) && (DEBUG_CHDEV_SERVER_RX < rx_cycle) ) |
---|
[625] | 408 | printk("\n[%s] thread[%x,%x] completes command for client thread[%x,%x] / cycle %d\n", |
---|
[619] | 409 | __FUNCTION__, server->process->pid, server->trdid, client_pid, client_trdid, rx_cycle ); |
---|
[433] | 410 | #endif |
---|
[5] | 411 | |
---|
[438] | 412 | #if DEBUG_CHDEV_SERVER_TX |
---|
[437] | 413 | tx_cycle = (uint32_t)hal_get_cycles(); |
---|
[438] | 414 | if( (chdev->is_rx == 0) && (DEBUG_CHDEV_SERVER_TX < tx_cycle) ) |
---|
[625] | 415 | printk("\n[%s] thread[%x,%x] completes command for client thread[%x,%x] / cycle %d\n", |
---|
[619] | 416 | __FUNCTION__, server->process->pid, server->trdid, client_pid, client_trdid, tX_cycle ); |
---|
[437] | 417 | #endif |
---|
| 418 | |
---|
[438] | 419 | #if (DEBUG_SYS_READ & 1) |
---|
[435] | 420 | exit_chdev_server_read = (uint32_t)hal_get_cycles(); |
---|
[407] | 421 | #endif |
---|
| 422 | |
---|
[438] | 423 | #if (DEBUG_SYS_WRITE & 1) |
---|
[435] | 424 | exit_chdev_server_write = (uint32_t)hal_get_cycles(); |
---|
| 425 | #endif |
---|
| 426 | |
---|
[407] | 427 | } |
---|
[5] | 428 | } // end while |
---|
[619] | 429 | } // end chdev_server_func() |
---|
[5] | 430 | |
---|
[428] | 431 | //////////////////////////////////////// |
---|
| 432 | xptr_t chdev_from_file( xptr_t file_xp ) |
---|
| 433 | { |
---|
| 434 | cxy_t file_cxy; |
---|
| 435 | vfs_file_t * file_ptr; |
---|
| 436 | uint32_t inode_type; |
---|
| 437 | vfs_inode_t * inode_ptr; |
---|
| 438 | chdev_t * chdev_ptr; |
---|
| 439 | |
---|
[492] | 440 | assert( (file_xp != XPTR_NULL) , |
---|
[440] | 441 | "file_xp == XPTR_NULL\n" ); |
---|
| 442 | |
---|
[428] | 443 | // get cluster and local pointer on remote file descriptor |
---|
| 444 | // associated inode and chdev are stored in same cluster as the file desc. |
---|
| 445 | file_cxy = GET_CXY( file_xp ); |
---|
| 446 | file_ptr = (vfs_file_t *)GET_PTR( file_xp ); |
---|
| 447 | |
---|
| 448 | // get inode type from file descriptor |
---|
[564] | 449 | inode_type = hal_remote_l32( XPTR( file_cxy , &file_ptr->type ) ); |
---|
[428] | 450 | inode_ptr = (vfs_inode_t *)hal_remote_lpt( XPTR( file_cxy , &file_ptr->inode ) ); |
---|
| 451 | |
---|
[492] | 452 | assert( (inode_type == INODE_TYPE_DEV) , |
---|
[440] | 453 | "inode type %d is not INODE_TYPE_DEV\n", inode_type ); |
---|
[428] | 454 | |
---|
| 455 | // get chdev local pointer from inode extension |
---|
| 456 | chdev_ptr = (chdev_t *)hal_remote_lpt( XPTR( file_cxy , &inode_ptr->extend ) ); |
---|
| 457 | |
---|
| 458 | return XPTR( file_cxy , chdev_ptr ); |
---|
| 459 | |
---|
| 460 | } // end chdev_from_file() |
---|
| 461 | |
---|
[564] | 462 | ////////////////////////////// |
---|
[485] | 463 | void chdev_dir_display( void ) |
---|
[317] | 464 | { |
---|
[428] | 465 | uint32_t i; |
---|
| 466 | cxy_t cxy; |
---|
| 467 | chdev_t * ptr; |
---|
| 468 | uint32_t base; |
---|
[317] | 469 | |
---|
[428] | 470 | // get pointers on TXT0 chdev |
---|
| 471 | xptr_t txt0_xp = chdev_dir.txt_tx[0]; |
---|
| 472 | cxy_t txt0_cxy = GET_CXY( txt0_xp ); |
---|
| 473 | chdev_t * txt0_ptr = GET_PTR( txt0_xp ); |
---|
[317] | 474 | |
---|
[564] | 475 | // get extended pointer on TXT0 lock |
---|
[428] | 476 | xptr_t lock_xp = XPTR( txt0_cxy , &txt0_ptr->wait_lock ); |
---|
[317] | 477 | |
---|
[564] | 478 | // get TXT0 lock |
---|
| 479 | remote_busylock_acquire( lock_xp ); |
---|
[317] | 480 | |
---|
[428] | 481 | // header |
---|
| 482 | nolock_printk("\n***** external chdevs directory *****\n"); |
---|
[317] | 483 | |
---|
[428] | 484 | // IOB |
---|
[564] | 485 | if (chdev_dir.iob != XPTR_NULL ) |
---|
[545] | 486 | { |
---|
| 487 | cxy = GET_CXY( chdev_dir.iob ); |
---|
| 488 | ptr = GET_PTR( chdev_dir.iob ); |
---|
[564] | 489 | base = (uint32_t)hal_remote_l64( XPTR( cxy , &ptr->base ) ); |
---|
[545] | 490 | nolock_printk(" - iob : cxy = %X / ptr = %X / base = %X\n", cxy, ptr, base); |
---|
| 491 | } |
---|
[407] | 492 | |
---|
[428] | 493 | // PIC |
---|
| 494 | cxy = GET_CXY( chdev_dir.pic ); |
---|
| 495 | ptr = GET_PTR( chdev_dir.pic ); |
---|
[564] | 496 | base = (uint32_t)hal_remote_l64( XPTR( cxy , &ptr->base ) ); |
---|
[428] | 497 | nolock_printk(" - pic : cxy = %X / ptr = %X / base = %X\n", cxy, ptr, base); |
---|
[407] | 498 | |
---|
[428] | 499 | // TXT |
---|
| 500 | for( i = 0 ; i < LOCAL_CLUSTER->nb_txt_channels ; i++ ) |
---|
| 501 | { |
---|
| 502 | cxy = GET_CXY( chdev_dir.txt_rx[i] ); |
---|
| 503 | ptr = GET_PTR( chdev_dir.txt_rx[i] ); |
---|
[564] | 504 | base = (uint32_t)hal_remote_l64( XPTR( cxy , &ptr->base ) ); |
---|
[428] | 505 | nolock_printk(" - txt_rx[%d] : cxy = %X / ptr = %X / base = %X\n", i, cxy, ptr, base); |
---|
[407] | 506 | |
---|
[428] | 507 | cxy = GET_CXY( chdev_dir.txt_tx[i] ); |
---|
| 508 | ptr = GET_PTR( chdev_dir.txt_tx[i] ); |
---|
[564] | 509 | base = (uint32_t)hal_remote_l64( XPTR( cxy , &ptr->base ) ); |
---|
[428] | 510 | nolock_printk(" - txt_tx[%d] : cxy = %X / ptr = %X / base = %X\n", i, cxy, ptr, base); |
---|
| 511 | } |
---|
[317] | 512 | |
---|
[428] | 513 | // IOC |
---|
| 514 | for( i = 0 ; i < LOCAL_CLUSTER->nb_ioc_channels ; i++ ) |
---|
| 515 | { |
---|
| 516 | cxy = GET_CXY( chdev_dir.ioc[i] ); |
---|
| 517 | ptr = GET_PTR( chdev_dir.ioc[i] ); |
---|
[564] | 518 | base = (uint32_t)hal_remote_l64( XPTR( cxy , &ptr->base ) ); |
---|
[428] | 519 | nolock_printk(" - ioc[%d] : cxy = %X / ptr = %X / base = %X\n", i, cxy, ptr, base); |
---|
| 520 | } |
---|
[317] | 521 | |
---|
[428] | 522 | // FBF |
---|
| 523 | for( i = 0 ; i < LOCAL_CLUSTER->nb_fbf_channels ; i++ ) |
---|
| 524 | { |
---|
| 525 | cxy = GET_CXY( chdev_dir.fbf[i] ); |
---|
| 526 | ptr = GET_PTR( chdev_dir.fbf[i] ); |
---|
[564] | 527 | base = (uint32_t)hal_remote_l64( XPTR( cxy , &ptr->base ) ); |
---|
[428] | 528 | nolock_printk(" - fbf[%d] : cxy = %X / ptr = %X / base = %X\n", i, cxy, ptr, base); |
---|
| 529 | } |
---|
[317] | 530 | |
---|
[428] | 531 | // NIC |
---|
| 532 | for( i = 0 ; i < LOCAL_CLUSTER->nb_nic_channels ; i++ ) |
---|
| 533 | { |
---|
| 534 | cxy = GET_CXY( chdev_dir.nic_rx[i] ); |
---|
| 535 | ptr = GET_PTR( chdev_dir.nic_rx[i] ); |
---|
[564] | 536 | base = (uint32_t)hal_remote_l64( XPTR( cxy , &ptr->base ) ); |
---|
[428] | 537 | nolock_printk(" - nic_rx[%d] : cxy = %X / ptr = %X / base = %X\n", i, cxy, ptr, base); |
---|
[317] | 538 | |
---|
[428] | 539 | cxy = GET_CXY( chdev_dir.nic_tx[i] ); |
---|
| 540 | ptr = GET_PTR( chdev_dir.nic_tx[i] ); |
---|
[564] | 541 | base = (uint32_t)hal_remote_l64( XPTR( cxy , &ptr->base ) ); |
---|
[428] | 542 | nolock_printk(" - nic_tx[%d] : cxy = %X / ptr = %X / base = %X\n", i, cxy, ptr, base); |
---|
| 543 | } |
---|
[317] | 544 | |
---|
[428] | 545 | // release lock |
---|
[564] | 546 | remote_busylock_release( lock_xp ); |
---|
[428] | 547 | |
---|
[317] | 548 | } // end chdev_dir_display() |
---|
| 549 | |
---|
[447] | 550 | /////////////////////////////////////////// |
---|
| 551 | void chdev_queue_display( xptr_t chdev_xp ) |
---|
| 552 | { |
---|
| 553 | cxy_t chdev_cxy; // chdev cluster |
---|
| 554 | chdev_t * chdev_ptr; // chdev local pointer |
---|
| 555 | xptr_t root_xp; // extended pointer on waiting queuue root |
---|
| 556 | char name[16]; // local copie of chdev name |
---|
| 557 | xptr_t iter_xp; // extended pointer on xlist_t field in waiting thread |
---|
| 558 | xptr_t thread_xp; // extended pointer on thread registered in queue |
---|
| 559 | cxy_t thread_cxy; // cluster identifier for waiting thread |
---|
| 560 | thread_t * thread_ptr; // local pointer on waiting thread |
---|
| 561 | trdid_t trdid; // waiting thread identifier |
---|
| 562 | process_t * process; // waiting thread process descriptor |
---|
| 563 | pid_t pid; // waiting thread process identifier |
---|
| 564 | |
---|
| 565 | // get cluster and local pointer on chdev |
---|
| 566 | chdev_cxy = GET_CXY( chdev_xp ); |
---|
| 567 | chdev_ptr = GET_PTR( chdev_xp ); |
---|
| 568 | |
---|
| 569 | // get extended pointer on root of requests queue |
---|
[450] | 570 | root_xp = XPTR( chdev_cxy , &chdev_ptr->wait_root ); |
---|
[447] | 571 | |
---|
| 572 | // get chdev name |
---|
| 573 | hal_remote_strcpy( XPTR( local_cxy , name ), XPTR( chdev_cxy , chdev_ptr->name ) ); |
---|
| 574 | |
---|
[564] | 575 | // get pointers on TXT0 chdev |
---|
| 576 | xptr_t txt0_xp = chdev_dir.txt_tx[0]; |
---|
| 577 | cxy_t txt0_cxy = GET_CXY( txt0_xp ); |
---|
| 578 | chdev_t * txt0_ptr = GET_PTR( txt0_xp ); |
---|
| 579 | |
---|
| 580 | // get extended pointer on TXT0 lock |
---|
| 581 | xptr_t lock_xp = XPTR( txt0_cxy , &txt0_ptr->wait_lock ); |
---|
| 582 | |
---|
| 583 | // get TXT0 lock |
---|
| 584 | remote_busylock_acquire( lock_xp ); |
---|
| 585 | |
---|
[447] | 586 | // check queue empty |
---|
| 587 | if( xlist_is_empty( root_xp ) ) |
---|
| 588 | { |
---|
[564] | 589 | nolock_printk("\n***** Waiting queue empty for chdev %s\n", name ); |
---|
[447] | 590 | } |
---|
| 591 | else |
---|
| 592 | { |
---|
[564] | 593 | nolock_printk("\n***** Waiting queue for chdev %s\n", name ); |
---|
[447] | 594 | |
---|
| 595 | // scan the waiting queue |
---|
| 596 | XLIST_FOREACH( root_xp , iter_xp ) |
---|
| 597 | { |
---|
| 598 | thread_xp = XLIST_ELEMENT( iter_xp , thread_t , wait_list ); |
---|
| 599 | thread_cxy = GET_CXY( thread_xp ); |
---|
| 600 | thread_ptr = GET_PTR( thread_xp ); |
---|
[564] | 601 | trdid = hal_remote_l32 ( XPTR( thread_cxy , &thread_ptr->trdid ) ); |
---|
[447] | 602 | process = hal_remote_lpt( XPTR( thread_cxy , &thread_ptr->process ) ); |
---|
[564] | 603 | pid = hal_remote_l32 ( XPTR( thread_cxy , &process->pid ) ); |
---|
[447] | 604 | |
---|
[601] | 605 | nolock_printk("- thread[%x,%x]\n", pid, trdid ); |
---|
[447] | 606 | } |
---|
| 607 | } |
---|
[564] | 608 | |
---|
| 609 | // release TXT0 lock |
---|
| 610 | remote_busylock_release( lock_xp ); |
---|
| 611 | |
---|
[447] | 612 | } // end chdev_queue_display() |
---|
| 613 | |
---|