Macintosh-SW/mpw
1
0
Fork 0
mirror of https://github.com/ksherlock/mpw.git synced 2024-11-25 04:31:52 +00:00
Code Issues Projects Releases Wiki Activity

NewHandle/DisposeHandle

Browse Source
This commit is contained in:
Kelvin Sherlock 2013-02-14 23:08:56 -05:00
parent 04d878c300
commit 0bb73b10bd
3 changed files with 123 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

114
toolbox/mm.cpp
View File

@ -24,8 +24,18 @@ namespace
// map of ptr -> size
std::map<uint32_t, uint32_t> PtrMap;
struct HandleInfo
{
uint32_t address;
uint32_t size;
HandleInfo(uint32_t a = 0, uint32_t s = 0) :
address(a), size(s)
{}
};
// map of handle -> size [? just use Ptr map?]
std::map<uint32_t, uint32_t> HandleMap;
std::map<uint32_t, HandleInfo> HandleMap;
inline uint16_t SetMemError(uint16_t error)
{
@ -132,16 +142,50 @@ namespace MM
auto iter = PtrMap.find(mcptr);
if (iter == PtrMap.end()) return memWZErr;
if (iter == PtrMap.end()) return SetMemError(memWZErr);
PtrMap.erase(iter);
uint8_t *ptr = mcptr + Memory;
mplite_free(&pool, ptr);
return 0;
return SetMemError(0);
}
uint16_t DisposeHandle(uint16_t trap)
{
/*
* on entry:
* A0 Handle to be disposed of
*
* on exit:
* D0 Result code
*
*/
uint32_t hh = cpuGetAReg(0);
fprintf(stderr, "%04x DisposeHandle(%08x)\n", trap, hh);
auto iter = HandleMap.find(hh);
if (iter == HandleMap.end()) return SetMemError(memWZErr);
HandleInfo info = iter->second;
HandleMap.erase(iter);
uint8_t *ptr = info.address + Memory;
mplite_free(&pool, ptr);
HandleQueue.push_back(hh);
return SetMemError(0);
}
uint16_t NewPtr(uint16_t trap)
@ -173,7 +217,7 @@ namespace MM
return SetMemError(0);
}
uint8_t *ptr = NULL;
uint8_t *ptr = nullptr;
ptr = (uint8_t *)mplite_malloc(&pool, size);
if (!ptr)
{
@ -192,5 +236,67 @@ namespace MM
return SetMemError(0);
}
uint16_t NewHandle(uint16_t trap)
{
/*
* on entry:
* D0 Number of logical bytes requested
*
* on exit:
* A0 Address of the new handle or NIL
* D0 Result code
*
*/
uint32_t hh = 0;
uint8_t *ptr;
uint32_t mcptr;
bool clear = trap & (1 << 9);
//bool sys = trap & (1 << 10);
uint32_t size = cpuGetDReg(0);
fprintf(stderr, "%04x NewHandle(%08x)\n", trap, size);
if (!HandleQueue.size())
{
if (!alloc_handle_block())
{
cpuSetAReg(0, 0);
return SetMemError(memFullErr);
}
}
hh = HandleQueue.front();
HandleQueue.pop_front();
ptr = nullptr;
mcptr = 0;
if (size)
{
ptr = (uint8_t *)mplite_malloc(&pool, size);
if (!ptr)
{
HandleQueue.push_back(hh);
cpuSetAReg(0, 0);
return SetMemError(memFullErr);
}
mcptr = ptr - Memory;
if (clear)
std::memset(ptr, 0, size);
}
// need a handle -> ptr map?
HandleMap.emplace(std::make_pair(hh, HandleInfo(mcptr, size)));
memoryWriteLong(mcptr, hh);
cpuSetAReg(0, hh);
return SetMemError(0);
}
}

3
toolbox/mm.h
View File

@ -15,7 +15,10 @@ namespace MM
uint16_t BlockMove(uint16_t trap);
uint16_t DisposePtr(uint16_t trap);
uint16_t DisposeHandle(uint16_t trap);
uint16_t NewPtr(uint16_t trap);
uint16_t NewHandle(uint16_t trap);
}
#endif

10
toolbox/toolbox.cpp
View File

@ -49,6 +49,10 @@ namespace ToolBox {
d0 = OS::GetVol(trap);
break;
case 0xA023:
d0 = MM::DisposeHandle(trap);
break;
// BlockMove (sourcePtr,destPtr: Ptr; byteCount: Size);
case 0xa02e:
d0 = MM::BlockMove(trap);
@ -79,6 +83,12 @@ namespace ToolBox {
d0 = MM::DisposePtr(trap);
break;
// NewHandle (logicalSize: Size) : Handle;
case 0xA122:
case 0xa322:
d0 = MM::NewHandle(trap);
break;
// resource manager stuff.
// Get1NamedResource (theType: ResType; name: Str255) : Handle;