source: trunk/kernel/syscalls/sys_mkfifo.c @ 640

Last change on this file since 640 was 637, checked in by alain, 5 years ago

Introduce the non-standard pthread_parallel_create() system call
and re-write the <fft> and <sort> applications to improve the
intrinsic paralelism in applications.

File size: 2.8 KB
Line 
1/*
2 * sys_mkfifo.c - creates a named FIFO file.
3 *
4 * Author    Alain Greiner (2016,2017,2018,2019)
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 <hal_kernel_types.h>
25#include <hal_uspace.h>
26#include <printk.h>
27#include <vfs.h>
28#include <process.h>
29#include <thread.h>
30
31////////////////////////////////////
32int sys_mkfifo ( char    * pathname,
33                 uint32_t  mode __attribute__((unused)) )
34{
35    char           kbuf[CONFIG_VFS_MAX_PATH_LENGTH];
36
37    thread_t  * this    = CURRENT_THREAD;
38    process_t * process = this->process;
39
40#if (DEBUG_SYS_MKFIFO || CONFIG_INSTRUMENTATION_SYSCALLS)
41uint64_t     tm_start = hal_get_cycles();
42#endif
43
44#if DEBUG_SYS_MKFIFO
45if( DEBUG_SYS_MKFIFO < tm_end )
46printk("\n[%s] thread[%x,%x] enter for <%s> / cycle %d\n",
47__FUNCTION__, process->pid, this->trdid, pathname, (uint32_t)tm_end );
48#endif
49 
50    // check fd_array not full
51    if( process_fd_array_full() )
52    {
53
54#if DEBUG_SYSCALLS_ERROR
55printk("\n[ERROR] in %s : file descriptor array full for process %x\n",
56__FUNCTION__ , process->pid );
57#endif
58        this->errno = ENFILE;
59        return -1;
60    }
61
62    // check pathname length
63    if( hal_strlen_from_uspace( pathname ) >= CONFIG_VFS_MAX_PATH_LENGTH )
64    {
65
66#if DEBUG_SYSCALLS_ERROR
67printk("\n[ERROR] in %s : pathname too long\n", __FUNCTION__ );
68#endif
69        this->errno = ENFILE;
70        return -1;
71    }
72
73    // copy pathname in kernel space
74    hal_strcpy_from_uspace( XPTR( local_cxy , kbuf ),
75                            pathname,
76                            CONFIG_VFS_MAX_PATH_LENGTH );
77
78    printk("\n[ERROR] in %s : not implemented yet\n", __FUNCTION__ );
79    return -1;
80
81#if (DEBUG_SYS_MKFIFO || CONFIG_INSTRUMENTATION_SYSCALLS)
82uint64_t     tm_end = hal_get_cycles();
83#endif
84
85#if DEBUG_SYS_MKFIFO
86if( DEBUG_SYS_MKFIFO < tm_end )
87printk("\n[%s] thread[%x,%x] exit for <%s> / cycle %d\n",
88__FUNCTION__, process->pid, this->trdid, pathname, (uint32_t)tm_end );
89#endif
90 
91#if CONFIG_INSTRUMENTATION_SYSCALLS
92hal_atomic_add( &syscalls_cumul_cost[SYS_MKFIFO] , tm_end - tm_start );
93hal_atomic_add( &syscalls_occurences[SYS_MKFIFO] , 1 );
94#endif
95
96} // end sys_mkfifo()
Note: See TracBrowser for help on using the repository browser.