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

Last change on this file since 653 was 637, checked in by alain, 7 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.