mirror of
https://github.com/reactos/reactos.git
synced 2024-12-27 09:34:43 +00:00
b1adc9e47f
svn path=/trunk/; revision=8046
392 lines
9.2 KiB
C
392 lines
9.2 KiB
C
/* $Id: genntdll.c,v 1.1 2004/02/06 08:21:56 fireball Exp $
|
|
*
|
|
* COPYRIGHT: See COPYING in the top level directory
|
|
* PROJECT: ReactOS version of ntdll
|
|
* FILE: iface/native/genntdll.c
|
|
* PURPOSE: Generates the system call stubs in ntdll
|
|
* CHANGE HISTORY: Added a '@xx' to deal with stdcall [ Ariadne ]
|
|
* 19990616 (ea)
|
|
* Four arguments now required; 4th is the file
|
|
* for ntoskrnl ZwXXX functions (which are merely calls
|
|
* to twin NtXXX calls, via int 0x2e (x86).
|
|
* 19990617 (ea)
|
|
* Fixed a bug in function numbers in kernel ZwXXX stubs.
|
|
*
|
|
*/
|
|
|
|
/* INCLUDE ******************************************************************/
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
|
|
#define PARAMETERIZED_LIBS
|
|
|
|
/* #define VERBOSE */
|
|
|
|
#define INPUT_BUFFER_SIZE 255
|
|
|
|
/* FUNCTIONS ****************************************************************/
|
|
|
|
void write_syscall_stub(FILE* out, FILE* out3, char* name, char* name2,
|
|
char* nr_args, unsigned int sys_call_idx)
|
|
{
|
|
int i;
|
|
int nArgBytes = atoi(nr_args);
|
|
#ifdef PARAMETERIZED_LIBS
|
|
fprintf(out,"__asm__(\"\\n\\t.global _%s@%s\\n\\t\"\n",name,nr_args);
|
|
fprintf(out,"\".global _%s@%s\\n\\t\"\n",name2,nr_args);
|
|
fprintf(out,"\"_%s@%s:\\n\\t\"\n",name,nr_args);
|
|
fprintf(out,"\"_%s@%s:\\n\\t\"\n",name2,nr_args);
|
|
#else
|
|
fprintf(out,"__asm__(\"\\n\\t.global _%s\\n\\t\"\n",name);
|
|
fprintf(out,"\".global _%s\\n\\t\"\n",name2);
|
|
fprintf(out,"\"_%s:\\n\\t\"\n",name);
|
|
fprintf(out,"\"_%s:\\n\\t\"\n",name2);
|
|
#endif
|
|
fprintf(out,"\t\"pushl\t%%ebp\\n\\t\"\n");
|
|
fprintf(out,"\t\"movl\t%%esp, %%ebp\\n\\t\"\n");
|
|
fprintf(out,"\t\"mov\t$%d,%%eax\\n\\t\"\n",sys_call_idx);
|
|
fprintf(out,"\t\"lea\t8(%%ebp),%%edx\\n\\t\"\n");
|
|
fprintf(out,"\t\"int\t$0x2E\\n\\t\"\n");
|
|
fprintf(out,"\t\"popl\t%%ebp\\n\\t\"\n");
|
|
fprintf(out,"\t\"ret\t$%s\\n\\t\");\n\n",nr_args);
|
|
|
|
/*
|
|
* Now write the NTOSKRNL stub for the
|
|
* current system call. ZwXXX does NOT
|
|
* alias the corresponding NtXXX call.
|
|
*/
|
|
#if 0
|
|
fprintf(out3,"__asm__(\n");
|
|
fprintf(out3,"\".global _%s@%s\\n\\t\"\n",name2,nr_args);
|
|
fprintf(out3,"\"_%s@%s:\\n\\t\"\n",name2,nr_args);
|
|
fprintf(out3,"\t\"pushl\t%%ebp\\n\\t\"\n");
|
|
fprintf(out3,"\t\"movl\t%%esp, %%ebp\\n\\t\"\n");
|
|
fprintf(out3,"\t\"mov\t$%d,%%eax\\n\\t\"\n",sys_call_idx);
|
|
fprintf(out3,"\t\"lea\t8(%%ebp),%%edx\\n\\t\"\n");
|
|
fprintf(out3,"\t\"int\t$0x2E\\n\\t\"\n");
|
|
fprintf(out3,"\t\"popl\t%%ebp\\n\\t\"\n");
|
|
fprintf(out3,"\t\"ret\t$%s\\n\\t\");\n\n",nr_args);
|
|
#else
|
|
fprintf(out3,"__declspec(naked) __stdcall\n");
|
|
fprintf(out3,"%s(", name2); // make it emit callconv, reval and full signature too
|
|
for (i=0; i*4 < nArgBytes; ++i) {
|
|
fprintf(out3,"int dummy%d", i);
|
|
if (((i+1)*4) < nArgBytes) fprintf(out3,",");
|
|
}
|
|
fprintf(out3,")\n{\n");
|
|
fprintf(out3,"\t__asm {\n");
|
|
fprintf(out3,"\t\tpush\tebp\n");
|
|
fprintf(out3,"\t\tmov\tebp, esp\n");
|
|
fprintf(out3,"\t\tmov\teax,%d\n",sys_call_idx);
|
|
fprintf(out3,"\t\tlea\tedx, 8[ebp]\n");
|
|
fprintf(out3,"\t\tint\t0x2E\n");
|
|
fprintf(out3,"\t\tpop\tebp\n");
|
|
fprintf(out3,"\t\tret\t%s\n",nr_args);
|
|
fprintf(out3,"\t}\n");
|
|
fprintf(out3,"}\n\n");
|
|
#endif
|
|
}
|
|
|
|
int makeSystemServiceTable(FILE *in, FILE *out)
|
|
{
|
|
char line [INPUT_BUFFER_SIZE];
|
|
char *s;
|
|
char *name;
|
|
char *name2;
|
|
int sys_call_idx;
|
|
char *nr_args;
|
|
char *stmp;
|
|
|
|
/*
|
|
* Main SSDT Header
|
|
*/
|
|
fprintf(out,"// Machine generated, don't edit\n");
|
|
fprintf(out,"\n\n");
|
|
|
|
/*
|
|
* First we build the Main SSDT
|
|
*/
|
|
fprintf(out,"\n\n\n");
|
|
fprintf(out,"SSDT MainSSDT[] = {\n");
|
|
|
|
for ( /* First system call has index zero */
|
|
sys_call_idx = 0;
|
|
/* Go on until EOF or read zero bytes */
|
|
( (!feof(in))
|
|
&& (fgets(line, sizeof line, in) != NULL)
|
|
);
|
|
/* Next system call index */
|
|
sys_call_idx++
|
|
)
|
|
{
|
|
if ((s = (char *) strchr(line,'\r')) != NULL)
|
|
{
|
|
*s = '\0';
|
|
}
|
|
/*
|
|
* Skip comments (#) and empty lines.
|
|
*/
|
|
s = & line[0];
|
|
if ((*s) != '#' && (*s) != '\0')
|
|
{
|
|
/* Extract the NtXXX name */
|
|
name = (char *)strtok(s," \t");
|
|
/* Extract the ZwXXX name */
|
|
name2 = (char *)strtok(NULL," \t");
|
|
//value = strtok(NULL," \t");
|
|
/* Extract the stack size */
|
|
nr_args = (char *)strtok(NULL," \t");
|
|
/*
|
|
* Remove, if present, the trailing LF.
|
|
*/
|
|
if ((stmp = strchr(nr_args, '\n')) != NULL)
|
|
{
|
|
*stmp = '\0';
|
|
}
|
|
#ifdef VERBOSE
|
|
printf("%3d \"%s\"\n",sys_call_idx,name);
|
|
#endif
|
|
|
|
if (sys_call_idx > 0)
|
|
{
|
|
fprintf(out,",\n");
|
|
}
|
|
/*
|
|
* Now write the current system call's name
|
|
* in the service table.
|
|
*/
|
|
fprintf(out,"\t\t{ (ULONG)%s }",name);
|
|
}
|
|
}
|
|
/* Close the service table (C syntax) */
|
|
fprintf(out,"\n};\n");
|
|
|
|
/*
|
|
* Now we build the Main SSPT
|
|
*/
|
|
rewind(in);
|
|
fprintf(out,"\n\n\n");
|
|
fprintf(out,"SSPT MainSSPT[] = {\n");
|
|
|
|
for ( /* First system call has index zero */
|
|
sys_call_idx = 0;
|
|
/* Go on until EOF or read zero bytes */
|
|
( (!feof(in))
|
|
&& (fgets(line, sizeof line, in) != NULL)
|
|
);
|
|
/* Next system call index */
|
|
sys_call_idx++
|
|
)
|
|
{
|
|
if ((s = (char *) strchr(line,'\r')) != NULL)
|
|
{
|
|
*s = '\0';
|
|
}
|
|
/*
|
|
* Skip comments (#) and empty lines.
|
|
*/
|
|
s = & line[0];
|
|
if ((*s) != '#' && (*s) != '\0')
|
|
{
|
|
/* Extract the NtXXX name */
|
|
name = (char *)strtok(s," \t");
|
|
/* Extract the ZwXXX name */
|
|
name2 = (char *)strtok(NULL," \t");
|
|
//value = strtok(NULL," \t");
|
|
/* Extract the stack size */
|
|
nr_args = (char *)strtok(NULL," \t");
|
|
/*
|
|
* Remove, if present, the trailing LF.
|
|
*/
|
|
if ((stmp = strchr(nr_args, '\n')) != NULL)
|
|
{
|
|
*stmp = '\0';
|
|
}
|
|
#ifdef VERBOSE
|
|
printf("%3d \"%s\"\n",sys_call_idx,name);
|
|
#endif
|
|
|
|
if (sys_call_idx > 0)
|
|
{
|
|
fprintf(out,",\n");
|
|
}
|
|
/*
|
|
* Now write the current system call's ID
|
|
* in the service table along with its Parameters Size.
|
|
*/
|
|
fprintf(out,"\t\t{ %s }",nr_args);
|
|
}
|
|
}
|
|
/*
|
|
* Close the service table (C syntax)
|
|
*/
|
|
fprintf(out,"\n};\n");
|
|
|
|
/*
|
|
* We write some useful defines
|
|
*/
|
|
fprintf(out, "\n\n#define MIN_SYSCALL_NUMBER 0\n");
|
|
fprintf(out, "#define MAX_SYSCALL_NUMBER %d\n", sys_call_idx-1);
|
|
fprintf(out, "#define NUMBER_OF_SYSCALLS %d\n", sys_call_idx);
|
|
|
|
return(0);
|
|
}
|
|
|
|
|
|
int
|
|
process(
|
|
FILE * in,
|
|
FILE * out,
|
|
FILE * out2,
|
|
FILE * out3
|
|
)
|
|
{
|
|
char line [INPUT_BUFFER_SIZE];
|
|
char * s;
|
|
char * name; /* NtXXX name */
|
|
char * name2; /* ZwXXX name */
|
|
int sys_call_idx; /* NtXXX index number in the service table */
|
|
char * nr_args; /* stack_size / machine_word_size */
|
|
char * stmp;
|
|
|
|
/*
|
|
* NTDLL stubs file header
|
|
*/
|
|
fprintf(out,"// Machine generated, don't edit\n");
|
|
fprintf(out,"\n\n");
|
|
|
|
/*
|
|
* NTOSKRNL Zw functions stubs header
|
|
*/
|
|
fprintf(out3,"// Machine generated by genntdll, don't edit\n");
|
|
fprintf(out3,"\n\n");
|
|
/*
|
|
* Scan the database. DB is a text file; each line
|
|
* is a record, which contains data for one system
|
|
* function. Each record has three columns:
|
|
*
|
|
* NT_NAME (e.g. NtCreateProcess)
|
|
* ZW_NAME (e.g. ZwCreateProcess)
|
|
* STACK_SIZE (in machine words: for x[3456]86
|
|
* processors a machine word is 4 bytes)
|
|
*/
|
|
for ( /* First system call has index zero */
|
|
sys_call_idx = 0;
|
|
/* Go on until EOF or read zero bytes */
|
|
( (!feof(in))
|
|
&& (fgets(line, sizeof line, in) != NULL)
|
|
);
|
|
/* Next system call index */
|
|
sys_call_idx++
|
|
)
|
|
{
|
|
/*
|
|
* Remove, if present, the trailing CR.
|
|
* (os specific?)
|
|
*/
|
|
if ((s = (char *) strchr(line,'\r')) != NULL)
|
|
{
|
|
*s = '\0';
|
|
}
|
|
/*
|
|
* Skip comments (#) and empty lines.
|
|
*/
|
|
s = & line[0];
|
|
if ((*s) != '#' && (*s) != '\0')
|
|
{
|
|
/* Extract the NtXXX name */
|
|
name = (char *)strtok(s," \t");
|
|
/* Extract the ZwXXX name */
|
|
name2 = (char *)strtok(NULL," \t");
|
|
//value = strtok(NULL," \t");
|
|
/* Extract the stack size */
|
|
nr_args = (char *)strtok(NULL," \t");
|
|
/*
|
|
* Remove, if present, the trailing LF.
|
|
*/
|
|
if ((stmp = strchr(nr_args, '\n')) != NULL)
|
|
{
|
|
*stmp = '\0';
|
|
}
|
|
#ifdef VERBOSE
|
|
printf("%3d \"%s\"\n",sys_call_idx,name);
|
|
#endif
|
|
/*
|
|
* Write the NTDLL stub for the current
|
|
* system call: NtXXX and ZwXXX symbols
|
|
* are aliases.
|
|
*/
|
|
write_syscall_stub(out, out3, name, name2,
|
|
nr_args, sys_call_idx);
|
|
}
|
|
}
|
|
|
|
return(0);
|
|
}
|
|
|
|
void usage(char * argv0)
|
|
{
|
|
printf("Usage: %s sysfuncs.lst napi.c napi.h zw.c\n"
|
|
" sysfuncs.lst system functions database\n"
|
|
" napi.c NTDLL stubs\n"
|
|
" napi.h NTOSKRNL service table\n"
|
|
" zw.c NTOSKRNL Zw stubs\n",
|
|
argv0
|
|
);
|
|
}
|
|
|
|
int main(int argc, char* argv[])
|
|
{
|
|
FILE * in; /* System calls database */
|
|
FILE * out1; /* NTDLL stubs */
|
|
FILE * out2; /* SERVICE_TABLE */
|
|
FILE * out3; /* NTOSKRNL Zw stubs */
|
|
int ret;
|
|
|
|
if (argc != 5)
|
|
{
|
|
usage(argv[0]);
|
|
return(1);
|
|
}
|
|
|
|
in = fopen(argv[1],"rb");
|
|
if (in == NULL)
|
|
{
|
|
perror("Failed to open input file (system calls database)");
|
|
return(1);
|
|
}
|
|
|
|
out1 = fopen(argv[2],"wb");
|
|
if (out1 == NULL)
|
|
{
|
|
perror("Failed to open output file (NTDLL stubs)");
|
|
return(1);
|
|
}
|
|
|
|
out2 = fopen(argv[3],"wb");
|
|
if (out2 == NULL)
|
|
{
|
|
perror("Failed to open output file (NTOSKRNL service table)");
|
|
return(1);
|
|
}
|
|
|
|
out3 = fopen(argv[4],"wb");
|
|
if (out3 == NULL)
|
|
{
|
|
perror("Failed to open output file (NTOSKRNL Zw stubs)");
|
|
return(1);
|
|
}
|
|
|
|
ret = process(in,out1,out2,out3);
|
|
rewind(in);
|
|
ret = makeSystemServiceTable(in, out2);
|
|
|
|
fclose(in);
|
|
fclose(out1);
|
|
fclose(out2);
|
|
fclose(out3);
|
|
|
|
return(ret);
|
|
}
|