100 lines
3.1 KiB
C
100 lines
3.1 KiB
C
/*
|
|
* Copyright (c) 1987 Fujitsu
|
|
*
|
|
* Permission is hereby granted, free of charge, to any person obtaining a copy
|
|
* of this software and associated documentation files (the "Software"), to deal
|
|
* in the Software without restriction, including without limitation the rights
|
|
* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
|
* copies of the Software, and to permit persons to whom the Software is
|
|
* furnished to do so, subject to the following conditions:
|
|
*
|
|
* The above copyright notice and this permission notice shall be included in
|
|
* all copies or substantial portions of the Software.
|
|
*
|
|
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
|
* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
|
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
|
* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
|
* THE SOFTWARE.
|
|
*/
|
|
/*
|
|
map.c -- Routines to print out load map for the Slinky linker.
|
|
|
|
Chip Morningstar -- Lucasfilm Ltd.
|
|
|
|
26-March-1985
|
|
|
|
*/
|
|
|
|
#include "slinkyTypes.h"
|
|
#include "slinkyGlobals.h"
|
|
#include "map.h"
|
|
#include "debugPrint.h"
|
|
#include "link.h"
|
|
|
|
int
|
|
compareLoadMapEntries(loadMapTableEntryType *entry1, loadMapTableEntryType *entry2)
|
|
{
|
|
int result;
|
|
|
|
if ((result = strcmplc(entry1->symbol->symbolName, entry2->
|
|
symbol->symbolName)) != 0)
|
|
return(result);
|
|
else if (entry1->symbol->symbolValue < entry2->symbol->symbolValue)
|
|
return(-1);
|
|
else if (entry1->symbol->symbolValue > entry2->symbol->symbolValue)
|
|
return(1);
|
|
else
|
|
return(strcmplc(entry1->fileName, entry2->fileName));
|
|
}
|
|
|
|
void
|
|
outputLoadMap(void)
|
|
{
|
|
loadMapTableEntryType *loadMapTable;
|
|
loadMapTableEntryType *loadMapPtr;
|
|
objectFileListType *inputFileList;
|
|
int symbolCount;
|
|
int i;
|
|
|
|
loadMapPtr = loadMapTable = typeAllocBlock(loadMapTableEntryType,
|
|
totalSymbolCount);
|
|
for (inputFileList = objectFileList; inputFileList != NULL;
|
|
inputFileList = inputFileList->nextObjectFile) {
|
|
if (inputFileList->name != NULL) {
|
|
for (symbolCount=0; symbolCount < inputFileList->symbolCount;
|
|
symbolCount++) {
|
|
loadMapPtr->symbol = inputFileList->symbolTable[
|
|
symbolCount];
|
|
loadMapPtr->fileName = inputFileList->name;
|
|
loadMapPtr++;
|
|
}
|
|
}
|
|
}
|
|
qsort(loadMapTable, totalSymbolCount, sizeof(loadMapTableEntryType),
|
|
compareLoadMapEntries);
|
|
loadMapPtr = loadMapTable;
|
|
for (i=0; i<totalSymbolCount; i++) {
|
|
if (i!=0 && strcmplc(loadMapPtr->symbol->symbolName,
|
|
(loadMapPtr-1)->symbol->symbolName)==0 &&
|
|
loadMapPtr->symbol->symbolValue==(loadMapPtr-
|
|
1)->symbol->symbolValue && loadMapPtr->
|
|
symbol->symbolClass==(loadMapPtr-1)->symbol->
|
|
symbolClass) {
|
|
if (!leaveOffLoadFiles)
|
|
fprintf(mapFileOutput, ", %s", loadMapPtr->
|
|
fileName);
|
|
} else {
|
|
fprintf(mapFileOutput, "\n");
|
|
printLoadMapSymbol(loadMapPtr->symbol);
|
|
if (!leaveOffLoadFiles)
|
|
fprintf(mapFileOutput, " %s", loadMapPtr->
|
|
fileName);
|
|
}
|
|
loadMapPtr++;
|
|
}
|
|
fprintf(mapFileOutput, "\n");
|
|
}
|