source: trunk/kernel/devices/dev_txt.c @ 659

Last change on this file since 659 was 657, checked in by alain, 5 years ago

Introduce remote_buf.c/.h & socket.c/.h files.
Update dev_nic.c/.h files.

File size: 9.6 KB
Line 
1/*
2 * dev_txt.c - TXT (Text Terminal) generic device API implementation.
3 *
4 * Author  Alain Greiner    (2016,2017,2018,2019)
5 *
6 * Copyright (c) UPMC Sorbonne Universites
7 *
8 * This file is part of ALMOS-MK
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-kernel; if not, write to the Free Software Foundation,
21 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
22 */
23
24#include <hal_kernel_types.h>
25#include <hal_special.h>
26#include <hal_remote.h>
27#include <hal_drivers.h>
28#include <thread.h>
29#include <remote_busylock.h>
30#include <chdev.h>
31#include <rpc.h>
32#include <printk.h>
33#include <dev_txt.h>
34
35/////////////////////////////////////////////////////////////////////////////////////////
36// Extern global variables
37/////////////////////////////////////////////////////////////////////////////////////////
38
39extern chdev_directory_t  chdev_dir;         // allocated in kernel_init.c
40
41
42#if (DEBUG_SYS_READ & 1)
43extern uint32_t enter_txt_read;
44extern uint32_t exit_txt_read;
45#endif
46
47#if (DEBUG_SYS_WRITE & 1)
48extern uint32_t enter_txt_write;
49extern uint32_t exit_txt_write;
50#endif
51
52///////////////////////////////////////////////////
53const char * dev_txt_type_str( dev_txt_cmd_t type )
54{
55    switch (type)
56    {
57        case (TXT_SYNC_WRITE): return "TXT_SYNC_WRITE";
58        case (TXT_READ):       return "TXT_READ";
59        case (TXT_WRITE):      return "TXT_WRITE";
60        default:               return "undefined";
61    }
62}
63
64//////////////////////////////////
65void dev_txt_init( chdev_t * txt )
66{
67    // For all TXT channels other than the TXT0 (kernel terminal),
68    // the PIC chdev must be initialized before the TXT chdev, because
69    // the TXT chdev initialization requires the routing of an external IRQ
70
71    xptr_t    pic_xp  = chdev_dir.pic;
72    uint32_t  channel = txt->channel;
73    uint32_t  impl    = txt->impl;
74    bool_t    is_rx   = txt->is_rx;
75
76    assert( (pic_xp != XPTR_NULL) || (channel == 0) ,
77            "PIC not initialised before TXT" );
78
79    // set chdev name
80    if( is_rx ) snprintf( txt->name , 16 , "txt%d_rx" , channel );
81    else        snprintf( txt->name , 16 , "txt%d_tx" , channel );
82
83    // set TXT chdev extension
84    txt->ext.txt.owner_xp = XPTR_NULL;
85    xlist_root_init( XPTR( local_cxy, &txt->ext.txt.root ) );
86    remote_busylock_init( XPTR( local_cxy , &txt->ext.txt.lock ), LOCK_CHDEV_TXTLIST );
87   
88    // call driver init function
89    hal_drivers_txt_init( txt );
90
91    // no server thread and no IRQ routing for TXT0
92    // except for LETI where there MUST be IRQ routing
93    // no server thread for IMPL_TXT_RS2 (multiplexed in software, not hardware)
94    if( channel != 0 && impl != IMPL_TXT_RS2 )
95    {
96        // select a core to execute the server thread
97        lid_t lid = cluster_select_local_core( local_cxy );
98
99        // The unique IRQ from cluster 00's MTTY must be bound to a RX chdev
100        // so that all IRQs are considered as RX IRQs and treated as such
101        // Indeed, IRQs are raised by the MTTY only on user keystroke, so IRQs must
102        // always be considered as RX IRQs.
103        if ( ( impl != IMPL_TXT_MTY ) || ( channel == 1 && is_rx == 1 ) ) 
104        {
105        // bind IRQ to the selected core
106        dev_pic_bind_irq( lid , txt );
107
108        // enable IRQ
109        dev_pic_enable_irq( lid , XPTR( local_cxy , txt ) );
110        }
111
112        // create server thread
113        thread_t * new_thread;
114        error_t    error;
115
116        error = thread_kernel_create( &new_thread,
117                                      THREAD_DEV,
118                                      &chdev_server_func,
119                                      txt,
120                                      lid );
121
122        assert( (error == 0) , "cannot create server thread" );
123
124        // set "server" field in chdev descriptor
125        txt->server = new_thread;
126
127        // set "chdev" field in thread descriptor
128        new_thread->chdev = txt;
129
130        // unblock server thread
131        thread_unblock( XPTR( local_cxy , new_thread ) , THREAD_BLOCKED_GLOBAL );
132    }
133}  // end dev_txt_init()
134
135/////////////////////////////////////////
136error_t dev_txt_write( uint32_t   channel,
137                       char     * buffer,
138                       uint32_t   count )
139{
140    error_t error;
141
142#if (DEBUG_SYS_WRITE & 1)
143enter_txt_write = hal_time_stamp();
144#endif
145
146    thread_t * this = CURRENT_THREAD;
147
148#if DEBUG_DEV_TXT_TX
149uint32_t   cycle = (uint32_t)hal_get_cycles();
150if( DEBUG_DEV_TXT_TX < cycle )
151printk("\n[%s] thread[%x,%x] enters for <%s> / cycle %d\n",
152__FUNCTION__, this->process->pid, this->trdid, buffer, cycle );
153#endif
154
155// check channel argument
156assert( (channel < CONFIG_MAX_TXT_CHANNELS) , "illegal channel index" );
157
158    // get pointers on chdev
159    xptr_t    dev_xp  = chdev_dir.txt_tx[channel];
160    cxy_t     dev_cxy = GET_CXY( dev_xp );
161    chdev_t * dev_ptr = GET_PTR( dev_xp );
162
163// check dev_xp
164assert( (dev_xp != XPTR_NULL) , "undefined TXT chdev descriptor" );
165
166    // If we use MTTY (vci_multi_tty), we do a synchronous write on TXT[0]
167    // If we use TTY  (vci_tty_tsar), we do a standard asynchronous write
168    // TODO this is not very clean ... [AG]
169
170    if( dev_ptr->impl == IMPL_TXT_MTY ) 
171    {
172        // get driver command function
173        dev_aux_t * aux = (dev_aux_t *)hal_remote_lpt( XPTR( dev_cxy , &dev_ptr->aux ) );
174
175        // build arguments structure
176        txt_sync_args_t  args;
177        args.dev_xp = dev_xp;
178        args.buffer = buffer;
179        args.count  = count;
180        args.channel = channel;
181
182        // call directly the driver function
183        aux( &args );
184
185        error = 0;
186    }
187    else
188    {
189        // register command in calling thread descriptor
190        this->txt_cmd.dev_xp  = dev_xp;
191        this->txt_cmd.type    = TXT_WRITE;
192        this->txt_cmd.buf_xp  = XPTR( local_cxy , buffer );
193        this->txt_cmd.count   = count;
194
195        // register client thread in waiting queue, activate server thread
196        // block client thread on THREAD_BLOCKED_IO and deschedule.
197        // it is re-activated by the ISR signaling IO operation completion.
198        chdev_register_command( dev_xp );
199
200        // get I/O operation status from calling thread descriptor
201        error = this->txt_cmd.error;
202
203        if( error )
204        {
205            printk("\n[ERROR] in %s : cannot write string %s / cycle %d\n",
206            __FUNCTION__, buffer, (uint32_t)hal_get_cycles() );
207        }
208    }
209
210#if DEBUG_DEV_TXT_TX
211cycle = (uint32_t)hal_get_cycles();
212if( DEBUG_DEV_TXT_TX < cycle )
213printk("\n[%s] thread[%x,%x] exit /  cycle %d\n",
214__FUNCTION__, this->process->pid, this->trdid, cycle );
215#endif
216
217#if (DEBUG_SYS_WRITE & 1)
218exit_txt_write = hal_time_stamp();
219#endif
220
221    return error;
222
223}  // end dev_txt_write()
224
225/////////////////////////////////////////
226error_t dev_txt_read( uint32_t   channel,
227                      char     * buffer )
228{
229    error_t error;
230
231#if (DEBUG_SYS_READ & 1)
232enter_txt_read = hal_time_stamp();
233#endif
234
235    thread_t * this = CURRENT_THREAD;
236
237#if DEBUG_DEV_TXT_RX
238uint32_t   cycle = (uint32_t)hal_get_cycles();
239if( DEBUG_DEV_TXT_RX < cycle )
240printk("\n[%s] thread[%x,%x] enters / cycle %d\n",
241__FUNCTION__, this->process->pid, this->trdid, cycle );
242#endif
243
244// check channel argument
245assert( (channel < CONFIG_MAX_TXT_CHANNELS) , "illegal channel index" );
246
247    // get pointers on chdev
248    xptr_t    dev_xp  = chdev_dir.txt_rx[channel];
249
250// check dev_xp
251assert( (dev_xp != XPTR_NULL) , "undefined TXT chdev descriptor" );
252
253    // register command in calling thread descriptor
254    this->txt_cmd.dev_xp  = dev_xp;
255    this->txt_cmd.type    = TXT_READ;
256    this->txt_cmd.buf_xp  = XPTR( local_cxy , buffer );
257    this->txt_cmd.count   = 1;
258
259    // register client thread in waiting queue, activate server thread
260    // block client thread on THREAD_BLOCKED_IO and deschedule.
261    // it is re-activated by the ISR signaling IO operation completion.
262    chdev_register_command( dev_xp );
263
264    // get I/O operation status from calling thread descriptor
265    error = this->txt_cmd.error;
266
267    if( error )
268    {
269         printk("\n[ERROR] in %s : cannot write string %s / cycle %d\n",
270         __FUNCTION__, buffer, (uint32_t)hal_get_cycles() );
271    }
272
273#if DEBUG_DEV_TXT_RX
274cycle = (uint32_t)hal_get_cycles();
275if( DEBUG_DEV_TXT_RX < cycle )
276printk("\n[%s] thread[%x,%x] get character <%c> / cycle %d\n",
277__FUNCTION__, this->process->pid, this->trdid, *buffer, cycle );
278#endif
279
280#if (DEBUG_SYS_READ & 1)
281exit_txt_read = hal_time_stamp();
282#endif
283
284    return error;
285
286}  // end dev_txt_read()
287
288////////////////////////////////////////////////
289error_t dev_txt_sync_write( const char * buffer,
290                            uint32_t     count )
291{
292    // get extended pointer on TXT[0] chdev
293    xptr_t  dev_xp = chdev_dir.txt_tx[0];
294
295    assert( (dev_xp != XPTR_NULL) ,
296    "undefined TXT0 chdev descriptor" );
297
298    // get TXTO chdev cluster and local pointer
299    cxy_t    dev_cxy  = GET_CXY( dev_xp );
300    chdev_t * dev_ptr = GET_PTR( dev_xp );
301
302    // get driver command function
303    dev_aux_t * aux = (dev_aux_t *)hal_remote_lpt( XPTR( dev_cxy , &dev_ptr->aux ) );
304
305    // build arguments structure
306    txt_sync_args_t  args;
307    args.dev_xp = dev_xp;
308    args.buffer = buffer;
309    args.count  = count;
310    args.channel = 0;
311
312    // call driver function
313    aux( &args );
314
315    return 0;
316}
317
Note: See TracBrowser for help on using the repository browser.