polyml/libpolyml/savestate.cpp

152 // File header for a saved state file.  This appears as the first entry
181     unsigned    relocationSize;         // Size of a relocation entry
195     // Each entry indicates a location that has to be set to an address.
229     // Add an entry to the hierarchy table for this file.
311 // Create a relocation entry for an address at a given location.
329    Print a relocation entry for the word and return a value that means
501             memoryTableEntry *entry = &exports.memTable[memTableCount++];
502             entry->mtAddr = space->bottom;
503             entry->mtLength = (space->topPointer-space->bottom)*sizeof(PolyWord);
504             entry->mtIndex = space->index;
505             entry->mtFlags = 0;
508                 entry->mtFlags |= MTF_WRITEABLE;
509                 if (space->noOverwrite) entry->mtFlags |= MTF_NO_OVERWRITE;
510                 if (space->byteOnly) entry->mtFlags |= MTF_BYTES;
513                 entry->mtFlags |= MTF_EXECUTABLE;
521         memoryTableEntry *entry = &exports.memTable[memTableCount++];
523         entry->mtAddr = space->bottom;
524         entry->mtLength = (space->topPointer-space->bottom)*sizeof(PolyWord);
525         entry->mtIndex = space->index;
526         entry->mtFlags = 0;
529             entry->mtFlags |= MTF_WRITEABLE;
530             if (space->noOverwrite) entry->mtFlags |= MTF_NO_OVERWRITE;
531             if (space->byteOnly) entry->mtFlags |= MTF_BYTES;
534             entry->mtFlags |= MTF_EXECUTABLE;
614         saveHeader.parentNameEntry = sizeof(TCHAR); // Always the first entry.
627         memoryTableEntry *entry = &exports.memTable[j];
630         descrs[j].segmentIndex = (unsigned)entry->mtIndex;
631         descrs[j].segmentSize = entry->mtLength; // Set this even if we don't write it.
632         descrs[j].originalAddress = entry->mtAddr;
633         if (entry->mtFlags & MTF_WRITEABLE)
636             if (entry->mtFlags & MTF_NO_OVERWRITE)
638             if (j < permanentEntries && (entry->mtFlags & MTF_NO_OVERWRITE) == 0)
640             if (entry->mtFlags & MTF_BYTES)
643         if (entry->mtFlags & MTF_EXECUTABLE)
653         memoryTableEntry *entry = &exports.memTable[k];
657             (entry->mtFlags & (MTF_WRITEABLE|MTF_NO_OVERWRITE)) == MTF_WRITEABLE)
663             char *start = (char*)entry->mtAddr;
664             char *end = start + entry->mtLength;
681             fwrite(entry->mtAddr, entry->mtLength, 1, exports.exportFile);
703     // Add an entry to the hierarchy table for this file.
869 // Add an entry to the space B-tree.
883     if (r == s) // Wholly within this entry
1051             if (header.parentNameEntry >= header.stringTableSize /* Bad entry */ ||
1129         { // No data - just an entry in the index.
1249     // Add an entry to the hierarchy table for this file.
1352     // At the moment the only entry in the string table is the parent
1417         if (header.parentNameEntry >= header.stringTableSize /* Bad entry */ ||
1532     // We need an entry in the descriptor tables for each segment in the executable because
1537         memoryTableEntry *entry = &this->memTable[j];
1540         thisDescr->segmentIndex = (unsigned)entry->mtIndex;
1541         thisDescr->segmentSize = entry->mtLength; // Set this even if we don't write it.
1542         thisDescr->originalAddress = entry->mtAddr;
1543         if (entry->mtFlags & MTF_WRITEABLE)
1546             if (entry->mtFlags & MTF_NO_OVERWRITE)
1548             if ((entry->mtFlags & MTF_NO_OVERWRITE) == 0)
1550             if (entry->mtFlags & MTF_BYTES)
1553         if (entry->mtFlags & MTF_EXECUTABLE)
1564         memoryTableEntry *entry = &this->memTable[k];
1571             char *start = (char*)entry->mtAddr;
1572             char *end = start + entry->mtLength;
1588             fwrite(entry->mtAddr, entry->mtLength, 1, exportFile);
1693         { // No data - just an entry in the index.