Intravision/reactos
1
0
Fork 0
mirror of https://github.com/reactos/reactos.git synced 2024-12-26 17:14:41 +00:00
Code Issues Projects Releases Packages Wiki Activity

PSX: The tool to build internal system calls tables and auxiliary C files.

Browse source 
svn path=/trunk/; revision=2825
This commit is contained in:
Emanuele Aliberti 2002-04-06 16:07:34 +00:00
parent 0c3dba541d
commit 3cbf8c1de6
3 changed files with 547 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

39
posix/tools/Makefile Normal file
View file

@ -0,0 +1,39 @@
# $Id: Makefile,v 1.1 2002/04/06 16:07:34 ea Exp $
#
# Tool to generate the POSIX+ server system calls table
# and other auxiliary C files.
#
PATH_TO_TOP=../../..
PATH_TO_PSX_TOP=..
TARGET_NAME=mksystab
SYSCALL_DB=syscall.db
SYSTAB_C=$(PATH_TO_PSX_TOP)/server/call/syscall.c
SYSTAB_H=$(PATH_TO_PSX_TOP)/server/include/syscall.h
SYSCALL_H=$(PATH_TO_PSX_TOP)/include/psx/syscall.h
STUBS_C=$(PATH_TO_PSX_TOP)/server/call/stubs.c
all: systab
$(TARGET_NAME)$(EXE_POSTFIX): $(TARGET_NAME).c
$(CC) $(CFLAGS) -o $(TARGET_NAME)$(EXE_POSTFIX) $(TARGET_NAME).c
systab: $(TARGET_NAME)$(EXE_POSTFIX)
$(TARGET_NAME)$(EXE_POSTFIX) \
$(SYSCALL_DB) \
$(SYSTAB_C) \
$(SYSTAB_H) \
$(SYSCALL_H) \
$(STUBS_C)
clean:
- $(RM) $(TARGET_NAME)$(EXE_POSTFIX)
- $(RM) *.o
- $(RM) $(SYSTAB_C)
- $(RM) $(SYSTAB_H)
- $(RM) $(SYSCALL_H)
- $(RM) $(STUBS_C)
include $(PATH_TO_TOP)/rules.mak
# EOF

378
posix/tools/mksystab.c Normal file
View file

@ -0,0 +1,378 @@
/* $Id: mksystab.c,v 1.1 2002/04/06 16:07:34 ea Exp $
*
* PROJECT : ReactOS / POSIX+ Subsystem
* DESCRIPTION: Build the system calls table for
* DESCRIPTION: the POSIX+ LPC server process.
* NOTE : this code is supposed to be portable.
* AUTHOR : Emanuele Aliberti
* DATE : 2001-05-26
* REVISIONS
* 2002-03-19 EA added stub file generation
* 2002-04-02 EA added to the CVS repository
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <errno.h>
#define PARSER_CONTEXT_LINE_SIZE 1024
#define PARSER_CONTEXT_INTERFACE_SIZE 64
const char * myname = "mksystab";
const char * syscall_name_prefix = "syscall_";
const char * proxy_name_prefix = "psxss_";
typedef enum {
METHOD_SUCCESS,
METHOD_EOF,
METHOD_FAILURE
} METHOD_TYPE;
typedef struct _PARSER_CONTEXT
{
int line_number;
int id;
char line [PARSER_CONTEXT_LINE_SIZE];
char status;
char interface [PARSER_CONTEXT_INTERFACE_SIZE];
int argc;
} PARSER_CONTEXT, * PPARSER_CONTEXT;
typedef struct _MFILE
{
char * name;
FILE * fp;
char * fopen_mode;
METHOD_TYPE (*prologue)(int,PPARSER_CONTEXT);
METHOD_TYPE (*iter)(int,PPARSER_CONTEXT);
METHOD_TYPE (*epilog)(int,PPARSER_CONTEXT);
} MFILE, * PMFILE;
/* MFILE file table */
METHOD_TYPE db_prologue (int self, PPARSER_CONTEXT context);
METHOD_TYPE db_iter (int self, PPARSER_CONTEXT context);
METHOD_TYPE db_epilog (int self, PPARSER_CONTEXT context);
METHOD_TYPE systab_prologue (int self, PPARSER_CONTEXT context);
METHOD_TYPE systab_iter (int self, PPARSER_CONTEXT context);
METHOD_TYPE systab_epilog (int self, PPARSER_CONTEXT context);
METHOD_TYPE psx_include_prologue (int self, PPARSER_CONTEXT context);
METHOD_TYPE psx_include_iter (int self, PPARSER_CONTEXT context);
METHOD_TYPE psx_include_epilog (int self, PPARSER_CONTEXT context);
METHOD_TYPE server_include_prologue (int self, PPARSER_CONTEXT context);
METHOD_TYPE server_include_iter (int self, PPARSER_CONTEXT context);
METHOD_TYPE server_include_epilog (int self, PPARSER_CONTEXT context);
METHOD_TYPE stubs_prologue (int self, PPARSER_CONTEXT context);
METHOD_TYPE stubs_iter (int self, PPARSER_CONTEXT context);
METHOD_TYPE stubs_epilog (int self, PPARSER_CONTEXT context);
MFILE mf [] =
{
{ NULL, NULL, "r", db_prologue, db_iter, db_epilog }, /* it must be 1st */
{ NULL, NULL, "w", systab_prologue, systab_iter, systab_epilog },
{ NULL, NULL, "w", server_include_prologue, server_include_iter, server_include_epilog },
{ NULL, NULL, "w", psx_include_prologue, psx_include_iter, psx_include_epilog },
{ NULL, NULL, "w", stubs_prologue, stubs_iter, stubs_epilog }
};
/* mf objects methods */
int mf_open (int index)
{
mf [index].fp = fopen (mf [index].name, mf [index].fopen_mode);
if (NULL == mf [index].fp)
{
fprintf (stderr, "%s: error %d while opening \"%s\".", myname, errno, mf [index].name);
return METHOD_FAILURE;
}
return METHOD_SUCCESS;
}
void mf_close (int index)
{
fclose (mf[index].fp);
}
/* db file methods */
METHOD_TYPE db_prologue (int self, PPARSER_CONTEXT context)
{
if (METHOD_FAILURE == mf_open (self))
{
return METHOD_FAILURE;
}
fprintf (stderr, "Processing \"%s\"...\n", mf [self].name);
return METHOD_SUCCESS;
}
METHOD_TYPE db_iter (int self, PPARSER_CONTEXT context)
{
char * eol;
do
{
if (feof(mf [self].fp))
{
return METHOD_EOF;
}
if (NULL == fgets (context->line, PARSER_CONTEXT_LINE_SIZE, mf [self].fp))
{
return METHOD_EOF;
}
++ context->line_number;
eol = strchr(context->line, '\n');
if (eol)
{
*eol = '\0';
}
/* Is line empty or a comment? */
} while (0 == strlen (context->line) || context->line[0] == '#');
/* Line is not a comment nor an empty line */
if (3 != sscanf (context->line, "%c%s%d", & context->status, context->interface, & context->argc))
{
fprintf (stderr, "Syntax error at line %d.\n", context->line_number);
return METHOD_FAILURE;
}
return METHOD_SUCCESS;
}
METHOD_TYPE db_epilog (int self, PPARSER_CONTEXT context)
{
mf_close (self);
return METHOD_SUCCESS;
}
/* systab file methods */
METHOD_TYPE systab_prologue (int self, PPARSER_CONTEXT context)
{
if (METHOD_FAILURE == mf_open (self))
{
return METHOD_FAILURE;
}
fprintf (mf[self].fp, "/* POSIX+ system calls (machine generated: do not edit!) */\n");
fprintf (mf[self].fp, "#include <psxss.h>\n");
fprintf (mf[self].fp, "#include <syscall.h>\n");
fprintf (mf[self].fp, "PSX_SYSTEM_CALL SystemCall [] =\n");
fprintf (mf[self].fp, "{\n");
return METHOD_SUCCESS;
}
METHOD_TYPE systab_iter (int self, PPARSER_CONTEXT context)
{
switch (context->status)
{
case '+':
case '-': /* unimplemented interface */
fprintf (mf[self].fp, "(void*)%s%s,\n", syscall_name_prefix, context->interface);
break;
default:
fprintf (stderr, "%s: unknown interface status \"%c\" at line %d.\n",
myname, context->status, context->line_number);
return METHOD_FAILURE;
}
return METHOD_SUCCESS;
}
METHOD_TYPE systab_epilog (int self, PPARSER_CONTEXT context)
{
fprintf (mf[self].fp, "0\n};\n");
fputs ("/* EOF */", mf[self].fp);
return METHOD_SUCCESS;
}
/* server/include file methods */
METHOD_TYPE server_include_prologue (int self, PPARSER_CONTEXT context)
{
if (METHOD_FAILURE == mf_open (self))
{
return METHOD_FAILURE;
}
fprintf (mf[self].fp, "/* POSIX+ system calls (machine generated: do not edit!) */\n");
fprintf (mf[self].fp, "#ifndef _SERVER_SYSCALL_H\n");
fprintf (mf[self].fp, "#define _SERVER_SYSCALL_H\n");
return METHOD_SUCCESS;
}
METHOD_TYPE server_include_iter (int self, PPARSER_CONTEXT context)
{
char interface [PARSER_CONTEXT_INTERFACE_SIZE*2];
sprintf (interface, "%s%s", syscall_name_prefix, context->interface);
fprintf (mf[self].fp, "NTSTATUS STDCALL %s (PPSX_MAX_MESSAGE);\n", interface);
return METHOD_SUCCESS;
}
METHOD_TYPE server_include_epilog (int self, PPARSER_CONTEXT context)
{
fprintf (mf[self].fp, "#endif /* ndef _SERVER_SYSCALL_H */\n");
fputs ("/* EOF */", mf[self].fp);
return METHOD_SUCCESS;
}
/* psx/include file methods */
METHOD_TYPE psx_include_prologue (int self, PPARSER_CONTEXT context)
{
if (METHOD_FAILURE == mf_open (self))
{
return METHOD_FAILURE;
}
fprintf (mf[self].fp, "/* POSIX+ system calls (machine generated: do not edit!) */\n");
fprintf (mf[self].fp, "#ifndef _PSX_SYSCALL_H\n");
fprintf (mf[self].fp, "#define _PSX_SYSCALL_H\n");
return METHOD_SUCCESS;
}
METHOD_TYPE psx_include_iter (int self, PPARSER_CONTEXT context)
{
char interface [PARSER_CONTEXT_INTERFACE_SIZE*2];
sprintf (interface, "%s%s", proxy_name_prefix, context->interface);
fprintf (mf[self].fp, "#define %s %d\n", strupr(interface), context->id ++);
return METHOD_SUCCESS;
}
METHOD_TYPE psx_include_epilog (int self, PPARSER_CONTEXT context)
{
fprintf (mf[self].fp, "#endif /* ndef _PSX_SYSCALL_H */\n");
fputs ("/* EOF */", mf[self].fp);
return METHOD_SUCCESS;
}
/* stubs file methods */
METHOD_TYPE stubs_prologue (int self, PPARSER_CONTEXT context)
{
if (METHOD_FAILURE == mf_open (self))
{
return METHOD_FAILURE;
}
fprintf( mf[self].fp,
"/* POSIX+ system calls not yet implemented */\n"
"/* (machine generated: do not edit!) */\n"
"#include <psxss.h>\n");
return METHOD_SUCCESS;
}
METHOD_TYPE stubs_iter (int self, PPARSER_CONTEXT context)
{
if ('-' == context->status)
{
fprintf (
mf[self].fp,
"NTSTATUS STDCALL %s%s(PPSX_MAX_MESSAGE Msg){Msg->PsxHeader.Status=STATUS_NOT_IMPLEMENTED;return(STATUS_SUCCESS);}\n",
syscall_name_prefix,
context->interface
);
}
return METHOD_SUCCESS;
}
METHOD_TYPE stubs_epilog (int self, PPARSER_CONTEXT context)
{
fputs ("/* EOF */", mf[self].fp);
return METHOD_SUCCESS;
}
/* main loop */
METHOD_TYPE mksystab ()
{
int index;
int index_top = (sizeof mf / sizeof mf[0]);
int iterate = 1;
PARSER_CONTEXT context;
METHOD_TYPE mt;
/* initialize the parser's context */
context.line_number = 0;
context.id = 0;
/* prologue */
for (index = 0; index < index_top; index ++)
{
if (METHOD_FAILURE == mf[index].prologue (index, & context))
{
return METHOD_FAILURE;
}
}
/* iter */
while (iterate)
{
for (index = 0; index < index_top; index ++)
{
mt = mf[index].iter (index, & context);
if (METHOD_EOF == mt)
{
if (0 == index) /* input MUST be 1st MFILE */
{
iterate = 0;
break; /* input reached EOF */
}
return METHOD_FAILURE;
}
else if (METHOD_FAILURE == mt)
{
return METHOD_FAILURE;
}
}
}
/* epilog */
for (index = 0; index < index_top; index ++)
{
if (METHOD_FAILURE == mf[index].epilog (index, & context))
{
return METHOD_FAILURE;
}
}
/* done */
return METHOD_SUCCESS;
}
/* entry point */
int main (int argc, char **argv)
{
int status = 0;
int index;
/* Check user parameters */
if ((1 + (sizeof mf / sizeof (MFILE))) != argc)
{
printf ("ReactOS Operating System - POSIX+ Environment Subsystem\n");
printf ("Build the system calls table of the POSIX+ server.\n\n");
printf ("usage: %s syscall.db syscall.c syscall.h syscall.h stubs.c\n", argv[0]);
exit (METHOD_FAILURE);
}
/* initialize descriptors */
for (index = 0; index < (sizeof mf / sizeof mf[0]); index ++)
{
mf [index].name = argv [index + 1];
}
/* do process them */
status = mksystab ();
return (status);
}
/* EOF */

130
posix/tools/syscall.db Normal file
View file

@ -0,0 +1,130 @@
# $Id: syscall.db,v 1.1 2002/04/06 16:07:34 ea Exp $
#
# ReactOS - Operating System
# Symbolic system calls table for the POSIX+ server.
#
# NOTE: the PSXSS server implements only the system calls
# that can NOT be implemented in full/correctly in the
# PSXDLL library.
#
# ENTRY SYNTAX
# status interface_name argc
#
# status = + | -
#
# LEGENDA
# + means the system call is implemented in the server;
# - means "{errno=ENOSYS;return -1;}".
#
+ null 0
- fork 0
- authenticateuser 0
- waitpid 3
+ _exit 1
- kill 2
- sigaction 3
- sigprocmask 3
- sigpending 1
- sigsuspend 1
- alarm 1
- getpsids 0
- syscall12 0
- syscall13 0
- getgroups 2
- syscall15 0
- syscall16 0
- setsid 0
- setpgid 2
- syscall19 0
- syscall20 0
- times 1
- ttyname 3
- isatty 1
- sysconf 1
- open 2
- umask 1
- link 2
- mkdir 2
- mkfifo 2
- rmdir 1
- rename 2
- stat 2
- fstat 2
- access 2
- chmod 2
- chown 3
- utime 2
- pathconf 2
- fpathconf 2
- pipe 1
- syscall41 0
- dup2 2
- close 1
- read 3
- write 3
- fcntl 3
- lseek 3
- tcgetattr 2
- tcsetattr 3
- tcsendbreak 2
- tcdrain 1
- tcflush 2
- tcflow 2
- tcgetpgrp 1
- tcsetpgrp 2
- getpwuid 1
- getpwnam 1
- getgrgid 1
- getgrnam 1
- unlink 1
- readdir 1
- ftruncate 2
- syscall63 0
- semctl 4
- semget 3
- semop 3
- shmat 3
- shmctl 3
- shmdt 1
- shmget 3
- msgctl 3
- msgget 2
- msgrcv 5
- msgsnd 4
- socket 3
- accept 3
- bind 3
- connect 3
- getpeername 3
- getsockname 3
- getsockopt 5
- listen 2
- recv 4
- recvfrom 6
- send 4
- sendto 6
- setsockopt 5
- shutdown 2
- gethostbyname 1
- gethostbyaddr 3
- getprotobyname 1
- getprotobynumber 1
- getservbyname 2
- getservbyport 2
- select 5
- statvfs 2
- fstatvfs 2
- ptsname 1
- _fdptcheck 0
- ioctl 2
- mmap 6
- syscall102 0
- uidtontsid 1
- gettzenv 0
- pututxline 1
- renamewtmpx 0
- fsync 1
- setgetitimer 0
- setuser 0
- ipcs 0
# EOF