mpw/toolbox/rm.cpp

172 lines
2.6 KiB
C++
Raw Normal View History

2013-02-07 04:44:12 +00:00
#include "rm.h"
2013-02-14 04:07:33 +00:00
#include "toolbox.h"
2013-02-19 23:28:58 +00:00
#include "mm.h"
2013-02-07 04:44:12 +00:00
#include <cpu/defs.h>
#include <cpu/CpuModule.h>
#include <cpu/fmem.h>
#include <string>
2013-02-16 01:42:20 +00:00
#include "stackframe.h"
2013-02-07 04:44:12 +00:00
2013-02-16 23:51:28 +00:00
using ToolBox::Log;
2013-02-19 23:28:58 +00:00
namespace
{
std::string TypeToString(uint32_t type)
{
char tmp[5] = { 0, 0, 0, 0, 0};
for (unsigned i = 0; i < 4; ++i)
{
char c = type & 0xff;
type >>= 8;
c = isprint(c) ? c : '.';
tmp[3 - i] = c;
}
return std::string(tmp);
}
}
2013-02-07 04:44:12 +00:00
namespace RM
{
2013-02-08 03:12:30 +00:00
uint16_t Get1NamedResource(uint16_t trap)
2013-02-07 04:44:12 +00:00
{
// Get1NamedResource (theType: ResType; name: Str255) : Handle;
/*
* -----------
* +8 outHandle
* ------------
* +4 theType
* ------------
* +0 name
* ------------
*
*/
// nb - return address is not on the stack.
uint32_t sp;
uint32_t theType;
uint32_t name;
2013-02-16 01:42:20 +00:00
sp = StackFrame<8>(theType, name);
2013-02-07 04:44:12 +00:00
2013-02-14 04:07:33 +00:00
std::string sname = ToolBox::ReadPString(name);
2013-02-07 04:44:12 +00:00
2013-02-16 23:51:28 +00:00
Log("%04x Get1NamedResource(%08x, %s)\n", trap, theType, sname.c_str());
2013-02-07 04:44:12 +00:00
2013-02-16 01:42:20 +00:00
ToolReturn<4>(sp, 0);
2013-02-08 00:21:47 +00:00
return -192;
2013-02-07 04:44:12 +00:00
}
2013-02-14 04:07:33 +00:00
2013-02-19 23:28:58 +00:00
2013-02-14 04:07:33 +00:00
uint16_t GetResource(uint16_t trap)
{
// GetResource (theType: ResType; theID: Integer): Handle;
/*
* -----------
* +6 outHandle
* ------------
* +2 theType
* ------------
* +0 theID
* ------------
*
*/
// nb - return address is not on the stack.
uint32_t sp;
uint32_t theType;
uint16_t theID;
2013-02-16 01:42:20 +00:00
sp = StackFrame<6>(theType, theID);
2013-02-14 04:07:33 +00:00
2013-02-19 23:28:58 +00:00
Log("%04x GetResource(%08x ('%s'), %04x)\n", trap, theType, TypeToString(theType).c_str(), theID);
ToolReturn<4>(sp, 0);
return -192;
}
uint16_t Get1Resource(uint16_t trap)
{
// Get1Resource (theType: ResType; theID: Integer): Handle;
/*
* -----------
* +6 outHandle
* ------------
* +2 theType
* ------------
* +0 theID
* ------------
*
*/
// nb - return address is not on the stack.
uint32_t sp;
uint32_t theType;
uint16_t theID;
sp = StackFrame<6>(theType, theID);
Log("%04x Get1Resource(%08x ('%s'), %04x)\n", trap, theType, TypeToString(theType).c_str(), theID);
2013-02-14 04:07:33 +00:00
2013-02-16 01:42:20 +00:00
ToolReturn<4>(sp, 0);
2013-02-14 04:07:33 +00:00
return -192;
}
2013-02-19 23:28:58 +00:00
uint16_t ReleaseResource(uint16_t trap)
{
// ReleaseResource (theResource: Handle);
/*
* ------------
* +0 theResource
* ------------
*
*/
uint32_t sp;
uint32_t theResource;
sp = StackFrame<4>(theResource);
Log("%04x ReleaseResource(%08x)\n", trap, theResource);
return 0;
}
2013-02-16 01:42:20 +00:00
uint16_t UnloadSeg(uint16_t trap)
{
// UnloadSeg (routineAddr: Ptr);
/*
* ------------
* +0 routineAddr
* ------------
*
*/
uint32_t sp;
uint32_t routineAddr;
sp = StackFrame<4>(routineAddr);
2013-02-16 23:51:28 +00:00
Log("%04x UnloadSeg(%08x)\n", trap, routineAddr);
2013-02-16 01:42:20 +00:00
return 0;
}
2013-02-07 04:44:12 +00:00
}