diff options
author | Chris Lattner <sabre@nondot.org> | 2002-03-08 22:51:07 +0000 |
---|---|---|
committer | Chris Lattner <sabre@nondot.org> | 2002-03-08 22:51:07 +0000 |
commit | 665ee88504ae8e4440fd1609f3d88c3481cebe12 (patch) | |
tree | 0162fe02fd0a4176d58fc2ebad0601d65995fa9d /lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp | |
parent | e82f1c6cb715cea962b4aa25cf617fa9f9f85fa8 (diff) |
Implement a bunch of new functions to support the SPECINT mcf
benchmark
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@1841 91177308-0d34-0410-b5e6-96231b3b80d8
Diffstat (limited to 'lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp')
-rw-r--r-- | lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp | 84 |
1 files changed, 84 insertions, 0 deletions
diff --git a/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp b/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp index b956ff33f0..485b213536 100644 --- a/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp +++ b/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp @@ -371,6 +371,21 @@ GenericValue lle_X_printf(MethodType *M, const vector<GenericValue> &Args) { return GV; } +// int sscanf(const char *format, ...); +GenericValue lle_X_sscanf(MethodType *M, const vector<GenericValue> &args) { + assert(args.size() < 10 && "Only handle up to 10 args to sscanf right now!"); + + const char *Args[10]; + for (unsigned i = 0; i < args.size(); ++i) + Args[i] = (const char*)args[i].PointerVal; + + GenericValue GV; + GV.IntVal = sscanf(Args[0], Args[1], Args[2], Args[3], Args[4], + Args[5], Args[6], Args[7], Args[8], Args[9]); + return GV; +} + + // int clock(void) - Profiling implementation GenericValue lle_i_clock(MethodType *M, const vector<GenericValue> &Args) { extern int clock(void); @@ -378,6 +393,68 @@ GenericValue lle_i_clock(MethodType *M, const vector<GenericValue> &Args) { return GV; } +//===----------------------------------------------------------------------===// +// IO Functions... +//===----------------------------------------------------------------------===// + +// FILE *fopen(const char *filename, const char *mode); +GenericValue lle_X_fopen(MethodType *M, const vector<GenericValue> &Args) { + assert(Args.size() == 2); + GenericValue GV; + + GV.PointerVal = (PointerTy)fopen((const char *)Args[0].PointerVal, + (const char *)Args[1].PointerVal); + return GV; +} + +// int fclose(FILE *F); +GenericValue lle_X_fclose(MethodType *M, const vector<GenericValue> &Args) { + assert(Args.size() == 1); + GenericValue GV; + + GV.IntVal = fclose((FILE *)Args[0].PointerVal); + return GV; +} + +// size_t fread(void *ptr, size_t size, size_t nitems, FILE *stream); +GenericValue lle_X_fread(MethodType *M, const vector<GenericValue> &Args) { + assert(Args.size() == 4); + GenericValue GV; + + GV.UIntVal = fread((void*)Args[0].PointerVal, Args[1].UIntVal, + Args[2].UIntVal, (FILE*)Args[3].PointerVal); + return GV; +} + +// size_t fwrite(const void *ptr, size_t size, size_t nitems, FILE *stream); +GenericValue lle_X_fwrite(MethodType *M, const vector<GenericValue> &Args) { + assert(Args.size() == 4); + GenericValue GV; + + GV.UIntVal = fwrite((void*)Args[0].PointerVal, Args[1].UIntVal, + Args[2].UIntVal, (FILE*)Args[3].PointerVal); + return GV; +} + +// char *fgets(char *s, int n, FILE *stream); +GenericValue lle_X_fgets(MethodType *M, const vector<GenericValue> &Args) { + assert(Args.size() == 3); + GenericValue GV; + + GV.PointerVal = (PointerTy)fgets((char*)Args[0].PointerVal, Args[1].IntVal, + (FILE*)Args[2].PointerVal); + return GV; +} + +// int fflush(FILE *stream); +GenericValue lle_X_fflush(MethodType *M, const vector<GenericValue> &Args) { + assert(Args.size() == 1); + GenericValue GV; + + GV.IntVal = fflush((FILE*)Args[0].PointerVal); + return GV; +} + } // End extern "C" @@ -416,5 +493,12 @@ void Interpreter::initializeExternalMethods() { FuncNames["lle_X_sqrt"] = lle_X_sqrt; FuncNames["lle_X_printf"] = lle_X_printf; FuncNames["lle_X_sprintf"] = lle_X_sprintf; + FuncNames["lle_X_sscanf"] = lle_X_sscanf; FuncNames["lle_i_clock"] = lle_i_clock; + FuncNames["lle_X_fopen"] = lle_X_fopen; + FuncNames["lle_X_fclose"] = lle_X_fclose; + FuncNames["lle_X_fread"] = lle_X_fread; + FuncNames["lle_X_fwrite"] = lle_X_fwrite; + FuncNames["lle_X_fgets"] = lle_X_fgets; + FuncNames["lle_X_fflush"] = lle_X_fflush; } |