kolan
/
CMake
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

bindexplib: Drop code that CMake does not need

This commit is contained in:
Bill Hoffman 2015-06-19 16:12:43 -04:00 committed by Brad King
parent 7de8276ca9
commit 4ff0989323
1 changed files with 8 additions and 425 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

433
Source/bindexplib.cxx
View File

@ -71,289 +71,11 @@
*----------------------------------------------------------------------
*/
static char sccsid[] = "@(#) winDumpExts.c 1.2 95/10/03 15:27:34";
#include <windows.h>
#include <stdio.h>
#include <string>
#include <fstream>
/*
*----------------------------------------------------------------------
* GetArgcArgv --
*
* Break up a line into argc argv
*----------------------------------------------------------------------
*/
int
GetArgcArgv(std::string &s, char **argv)
{
int quote = 0;
int argc = 0;
std::string::iterator bp = s.begin();
while (1) {
while (isspace(*bp)) {
bp++;
}
if (*bp == '\n' || *bp == '\0') {
*bp = '\0';
return argc;
}
if (*bp == '\"') {
quote = 1;
bp++;
}
argv[argc++] = &(*bp);
while (*bp != '\0') {
if (quote) {
if (*bp == '\"') {
quote = 0;
*bp = '\0';
bp++;
break;
}
bp++;
continue;
}
if (isspace(*bp)) {
*bp = '\0';
bp++;
break;
}
bp++;
}
}
}
/*
* The names of the first group of possible symbol table storage classes
*/
char * SzStorageClass1[] = {
"NULL","AUTOMATIC","EXTERNAL","STATIC","REGISTER","EXTERNAL_DEF","LABEL",
"UNDEFINED_LABEL","MEMBER_OF_STRUCT","ARGUMENT","STRUCT_TAG",
"MEMBER_OF_UNION","UNION_TAG","TYPE_DEFINITION","UNDEFINED_STATIC",
"ENUM_TAG","MEMBER_OF_ENUM","REGISTER_PARAM","BIT_FIELD"
};
/*
* The names of the second group of possible symbol table storage classes
*/
char * SzStorageClass2[] = {
"BLOCK","FUNCTION","END_OF_STRUCT","FILE","SECTION","WEAK_EXTERNAL"
};
/*
*----------------------------------------------------------------------
* GetSZStorageClass --
*
* Given a symbol storage class value, return a descriptive
* ASCII string
*----------------------------------------------------------------------
*/
PSTR
GetSZStorageClass(BYTE storageClass)
{
if ( storageClass <= IMAGE_SYM_CLASS_BIT_FIELD )
return SzStorageClass1[storageClass];
else if ( (storageClass >= IMAGE_SYM_CLASS_BLOCK)
&& (storageClass <= IMAGE_SYM_CLASS_WEAK_EXTERNAL) )
return SzStorageClass2[storageClass-IMAGE_SYM_CLASS_BLOCK];
else
return "???";
}
void AddHex(std::string& buf, long val, bool caps=false)
{
buf += "0x";
size_t len=buf.length();
while (val) {
char hex = (char)(val & 16);
val = val >> 4;
if (hex<10) hex+='0';
else if (caps) hex+='A'-10;
else hex+='a'-10;
buf.insert(len, hex, 1);
}
}
/*
*----------------------------------------------------------------------
* GetSectionName --
*
* Used by DumpSymbolTable, it gives meaningful names to
* the non-normal section number.
*
* Results:
* A name is returned in buffer
*----------------------------------------------------------------------
*/
void
GetSectionName(PIMAGE_SYMBOL pSymbolTable, std::string& buffer)
{
DWORD section;
section = pSymbolTable->SectionNumber;
switch ( (SHORT)section )
{
case IMAGE_SYM_UNDEFINED: if (pSymbolTable->Value) buffer += "COMM"; else buffer += "UNDEF"; break;
case IMAGE_SYM_ABSOLUTE: buffer += "ABS "; break;
case IMAGE_SYM_DEBUG: buffer += "DEBUG"; break;
default: AddHex(buffer, section, true);
}
}
/*
*----------------------------------------------------------------------
* GetSectionCharacteristics --
*
* Converts the Characteristics field of IMAGE_SECTION_HEADER
* to print.
*
* Results:
* A definiton of the section symbol type
*----------------------------------------------------------------------
*/
void
GetSectionCharacteristics(PIMAGE_SECTION_HEADER pSectionHeaders, int nSectNum, std::string &buffer)
{
DWORD SectChar;
std::string TempBuf;
buffer.clear();
if (nSectNum > 0) {
SectChar = pSectionHeaders[nSectNum-1].Characteristics;
buffer = " ";
AddHex(buffer, SectChar);
if (SectChar & IMAGE_SCN_CNT_CODE) buffer += " Code";
else if (SectChar & IMAGE_SCN_CNT_INITIALIZED_DATA) buffer += " Init. data";
else if (SectChar & IMAGE_SCN_CNT_UNINITIALIZED_DATA ) buffer += " UnInit data";
else buffer += " Unknow type";
if (SectChar & IMAGE_SCN_MEM_READ) {
buffer += " Read";
if (SectChar & IMAGE_SCN_MEM_WRITE)
buffer += " and Write";
else buffer += " only";
}
else if (SectChar & IMAGE_SCN_MEM_WRITE)
buffer +=" Write only";
}
}
/*
*----------------------------------------------------------------------
* DumpSymbolTable --
*
* Dumps a COFF symbol table from an EXE or OBJ. We only use
* it to dump tables from OBJs.
*----------------------------------------------------------------------
*/
void
DumpSymbolTable(PIMAGE_SYMBOL pSymbolTable, PIMAGE_SECTION_HEADER pSectionHeaders, FILE *fout, unsigned cSymbols)
{
unsigned i;
PSTR stringTable;
std::string sectionName;
std::string sectionCharacter;
int iSectNum;
fprintf(fout, "Symbol Table - %X entries (* = auxillary symbol)\n",
cSymbols);
fprintf(fout,
"Indx Name Value Section cAux Type Storage Character\n"
"---- -------------------- -------- ---------- ----- ------- -------- ---------\n");
/*
* The string table apparently starts right after the symbol table
*/
stringTable = (PSTR)&pSymbolTable[cSymbols];
for ( i=0; i < cSymbols; i++ ) {
fprintf(fout, "%04X ", i);
if ( pSymbolTable->N.Name.Short != 0 )
fprintf(fout, "%-20.8s", pSymbolTable->N.ShortName);
else
fprintf(fout, "%-20s", stringTable + pSymbolTable->N.Name.Long);
fprintf(fout, " %08X", pSymbolTable->Value);
iSectNum = pSymbolTable->SectionNumber;
GetSectionName(pSymbolTable, sectionName);
fprintf(fout, " sect:%s aux:%X type:%02X st:%s",
sectionName.c_str(),
pSymbolTable->NumberOfAuxSymbols,
pSymbolTable->Type,
GetSZStorageClass(pSymbolTable->StorageClass) );
GetSectionCharacteristics(pSectionHeaders,iSectNum,sectionCharacter);
fprintf(fout," hc: %s \n",sectionCharacter.c_str());
#if 0
if ( pSymbolTable->NumberOfAuxSymbols )
DumpAuxSymbols(pSymbolTable);
#endif
/*
* Take into account any aux symbols
*/
i += pSymbolTable->NumberOfAuxSymbols;
pSymbolTable += pSymbolTable->NumberOfAuxSymbols;
pSymbolTable++;
}
}
/*
*----------------------------------------------------------------------
* DumpExternals --
*
* Dumps a COFF symbol table from an EXE or OBJ. We only use
* it to dump tables from OBJs.
*----------------------------------------------------------------------
*/
void
DumpExternals(PIMAGE_SYMBOL pSymbolTable, FILE *fout, unsigned cSymbols)
{
unsigned i;
PSTR stringTable;
std::string symbol;
/*
* The string table apparently starts right after the symbol table
*/
stringTable = (PSTR)&pSymbolTable[cSymbols];
for ( i=0; i < cSymbols; i++ ) {
if (pSymbolTable->SectionNumber > 0 && pSymbolTable->Type == 0x20) {
if (pSymbolTable->StorageClass == IMAGE_SYM_CLASS_EXTERNAL) {
if (pSymbolTable->N.Name.Short != 0) {
symbol = "";
symbol.insert(0, (const char *)(pSymbolTable->N.ShortName), 8);
} else {
symbol = stringTable + pSymbolTable->N.Name.Long;
}
std::string::size_type posAt = symbol.find('@');
if (posAt != std::string::npos) symbol.erase(posAt);
#ifndef _MSC_VER
fprintf(fout, "\t%s\n", symbol.c_str());
#else
fprintf(fout, "\t%s\n", symbol.c_str()+1);
#endif
}
}
/*
* Take into account any aux symbols
*/
i += pSymbolTable->NumberOfAuxSymbols;
pSymbolTable += pSymbolTable->NumberOfAuxSymbols;
pSymbolTable++;
}
}
/*
+ * Utility func, strstr with size
+ */
@ -387,7 +109,7 @@ const char* StrNStr(const char* start, const char* find, size_t &size) {
*----------------------------------------------------------------------
*/
int
HaveExportedObjects(PIMAGE_FILE_HEADER pImageFileHeader, PIMAGE_SECTION_HEADER pSectionHeaders, FILE *fout)
HaveExportedObjects(PIMAGE_FILE_HEADER pImageFileHeader, PIMAGE_SECTION_HEADER pSectionHeaders)
{
static int fImportFlag = 0; /* The status is nor defined yet */
WORD i;
@ -443,7 +165,7 @@ HaveExportedObjects(PIMAGE_FILE_HEADER pImageFileHeader, PIMAGE_SECTION_HEADER p
*/
void
DumpExternalsObjects(PIMAGE_SYMBOL pSymbolTable, PIMAGE_SECTION_HEADER pSectionHeaders,
FILE *fout, unsigned cSymbols, int fort)
FILE *fout, unsigned cSymbols)
{
unsigned i;
PSTR stringTable;
@ -470,13 +192,7 @@ DumpExternalsObjects(PIMAGE_SYMBOL pSymbolTable, PIMAGE_SECTION_HEADER pSectionH
}
while (isspace(symbol[0])) symbol.erase(0,1);
#ifdef _MSC_VER
if (symbol[0] == '_') symbol.erase(0,1);
if (fort) {
std::string::size_type posAt = symbol.find('@');
if (posAt != std::string::npos) symbol.erase(posAt);
}
#endif
if (fImportFlag) {
fImportFlag = 0;
fprintf(fout,"EXPORTS \n");
@ -485,11 +201,6 @@ DumpExternalsObjects(PIMAGE_SYMBOL pSymbolTable, PIMAGE_SECTION_HEADER pSectionH
Check whether it is "Scalar deleting destructor" and
"Vector deleting destructor"
*/
/*
if (!strstr(s,"@@UAEPAXI@Z") && !strstr(s,"@@QAEPAXI@Z") &&
!strstr(s,"@AEPAXI@Z") && !strstr(s,"AEPAXI@Z") &&
!strstr(s,"real@"))
*/
const char *scalarPrefix = "??_G";
const char *vectorPrefix = "??_E";
if (symbol.compare(0, 4, scalarPrefix) &&
@ -544,7 +255,7 @@ DumpExternalsObjects(PIMAGE_SYMBOL pSymbolTable, PIMAGE_SECTION_HEADER pSectionH
*----------------------------------------------------------------------
*/
void
DumpObjFile(PIMAGE_FILE_HEADER pImageFileHeader, FILE *fout, int full, int fort)
DumpObjFile(PIMAGE_FILE_HEADER pImageFileHeader, FILE *fout)
{
PIMAGE_SYMBOL PCOFFSymbolTable;
PIMAGE_SECTION_HEADER PCOFFSectionHeaders;
@ -560,13 +271,9 @@ DumpObjFile(PIMAGE_FILE_HEADER pImageFileHeader, FILE *fout, int full, int fort)
pImageFileHeader->SizeOfOptionalHeader);
if (full) {
DumpSymbolTable(PCOFFSymbolTable, PCOFFSectionHeaders, fout, COFFSymbolCount);
} else {
int haveExports = HaveExportedObjects(pImageFileHeader, PCOFFSectionHeaders, fout);
if (!haveExports)
DumpExternalsObjects(PCOFFSymbolTable, PCOFFSectionHeaders, fout, COFFSymbolCount, fort);
}
int haveExports = HaveExportedObjects(pImageFileHeader, PCOFFSectionHeaders);
if (!haveExports)
DumpExternalsObjects(PCOFFSymbolTable, PCOFFSectionHeaders, fout, COFFSymbolCount);
}
/*
@ -578,7 +285,7 @@ DumpObjFile(PIMAGE_FILE_HEADER pImageFileHeader, FILE *fout, int full, int fort)
*----------------------------------------------------------------------
*/
void
DumpFile(LPSTR filename, FILE *fout, int full, int fort)
DumpFile(LPSTR filename, FILE *fout)
{
HANDLE hFile;
HANDLE hFileMapping;
@ -610,12 +317,8 @@ DumpFile(LPSTR filename, FILE *fout, int full, int fort)
dosHeader = (PIMAGE_DOS_HEADER)lpFileBase;
if (dosHeader->e_magic == IMAGE_DOS_SIGNATURE) {
#if 0
DumpExeFile( dosHeader );
#else
fprintf(stderr, "File is an executable. I don't dump those.\n");
return;
#endif
}
/* Does it look like a i386 COFF OBJ file??? */
else if (
@ -627,7 +330,7 @@ DumpFile(LPSTR filename, FILE *fout, int full, int fort)
* really checking for IMAGE_FILE_HEADER.Machine == i386 (0x14C)
* and IMAGE_FILE_HEADER.SizeOfOptionalHeader == 0;
*/
DumpObjFile((PIMAGE_FILE_HEADER) lpFileBase, fout, full, fort);
DumpObjFile((PIMAGE_FILE_HEADER) lpFileBase, fout);
} else {
printf("unrecognized file format\n");
}
@ -635,123 +338,3 @@ DumpFile(LPSTR filename, FILE *fout, int full, int fort)
CloseHandle(hFileMapping);
CloseHandle(hFile);
}
void
main(int argc, char **argv)
{
std::string cmdline;
int i, arg;
FILE *fout;
int full = 0;
int fort = 0;
char *dllname = "";
char *outfile = NULL;
if (argc < 3) {
Usage:
fprintf(stderr, "Usage: %s ?-o outfile? ?-f(ull)? <dllname> <object filenames> ..\n", argv[0]);
exit(1);
}
arg = 1;
while (argv[arg][0] == '-') {
if (strcmp(argv[arg], "--") == 0) {
arg++;
break;
} else if (strcmp(argv[arg], "-f") == 0) {
full = 1;
} else if (strcmp(argv[arg], "-x") == 0) {
fort = 1;
} else if (strcmp(argv[arg], "-o") == 0) {
arg++;
if (arg == argc) {
goto Usage;
}
outfile = argv[arg];
}
arg++;
}
if (arg == argc) {
goto Usage;
}
if (outfile) {
fout = fopen(outfile, "w+");
if (fout == NULL) {
fprintf(stderr, "Unable to open \'%s\' for writing:\n",
argv[arg]);
perror("");
exit(1);
}
} else {
fout = stdout;
}
if (! full) {
dllname = argv[arg];
arg++;
if (arg == argc) {
goto Usage;
}
fprintf(fout, "LIBRARY %s\n", dllname);
#ifndef _X86_
fprintf(fout, "CODE PRELOAD MOVEABLE DISCARDABLE\n");
fprintf(fout, "DATA PRELOAD MOVEABLE MULTIPLE\n\n");
#endif
}
for (; arg < argc; arg++) {
WIN32_FIND_DATA FindFileData;
HANDLE SearchFile;
if (argv[arg][0] == '@') {
std::ifstream fargs(&argv[arg][1]);
if (!fargs) {
fprintf(stderr, "Unable to open \'%s\' for reading:\n",
argv[arg]);
perror("");
exit(1);
}
char *fargv[1000];
for (i = 0; i < arg; i++) {
cmdline += argv[i];
fargv[i] = argv[i];
}
std::string line;
std::getline(fargs, line);
cmdline += line;
fprintf(stderr, "%s\n", line.c_str());
i += GetArgcArgv(line, &fargv[i]);
argc = i;
argv = fargv;
}
/*
* Argument can contain the wildcard names
*/
SearchFile = FindFirstFile(argv[arg],&FindFileData);
if (SearchFile == INVALID_HANDLE_VALUE){
fprintf(stderr, "Unable to find \'%s\' for reading:\n",
argv[arg]);
exit(1);
}
else {
/*
* Since WIN32_FIND_DATA has no path information one has to extract it himself.
*/
TCHAR *filename = argv[arg];
TCHAR path[2048];
size_t i = strlen(filename);
i--;
while( filename[i] != '\\' && filename[i] != '/' && i >=0) i--;
do
{
if (i >= 0) strncpy( path, filename, i+1); /* Generate the 'path' info */
path[i+1] = '\0';
DumpFile(strcat(path, FindFileData.cFileName), fout, full, fort);
} while (FindNextFile(SearchFile,&FindFileData));
FindClose(SearchFile);
}
}
exit(0);
}