2009-07-10 12:58:34 -07:00
|
|
|
/* -*- Mode: C++; c-basic-offset: 4; indent-tabs-mode: nil; tab-width: 4 -*- */
|
|
|
|
/* vi: set ts=4 sw=4 expandtab: (add to ~/.vimrc: set modeline modelines=5) */
|
|
|
|
/* ***** BEGIN LICENSE BLOCK *****
|
|
|
|
* Version: MPL 1.1/GPL 2.0/LGPL 2.1
|
|
|
|
*
|
|
|
|
* The contents of this file are subject to the Mozilla Public License Version 1.1 (the
|
|
|
|
* "License"); you may not use this file except in compliance with the License. You may obtain
|
|
|
|
* a copy of the License at http://www.mozilla.org/MPL/
|
|
|
|
*
|
|
|
|
* Software distributed under the License is distributed on an "AS IS" basis, WITHOUT
|
|
|
|
* WARRANTY OF ANY KIND, either express or implied. See the License for the specific
|
|
|
|
* language governing rights and limitations under the License.
|
|
|
|
*
|
|
|
|
* The Original Code is [Open Source Virtual Machine.]
|
|
|
|
*
|
|
|
|
* The Initial Developer of the Original Code is Adobe System Incorporated. Portions created
|
|
|
|
* by the Initial Developer are Copyright (C)[ 2004-2006 ] Adobe Systems Incorporated. All Rights
|
|
|
|
* Reserved.
|
2008-06-19 10:47:58 -07:00
|
|
|
*
|
|
|
|
* Contributor(s): Adobe AS3 Team
|
2008-06-28 09:58:15 -07:00
|
|
|
* Andreas Gal <gal@mozilla.com>
|
2009-07-10 12:58:34 -07:00
|
|
|
*
|
|
|
|
* Alternatively, the contents of this file may be used under the terms of either the GNU
|
|
|
|
* General Public License Version 2 or later (the "GPL"), or the GNU Lesser General Public
|
|
|
|
* License Version 2.1 or later (the "LGPL"), in which case the provisions of the GPL or the
|
|
|
|
* LGPL are applicable instead of those above. If you wish to allow use of your version of this
|
|
|
|
* file only under the terms of either the GPL or the LGPL, and not to allow others to use your
|
|
|
|
* version of this file under the terms of the MPL, indicate your decision by deleting provisions
|
|
|
|
* above and replace them with the notice and other provisions required by the GPL or the
|
|
|
|
* LGPL. If you do not delete the provisions above, a recipient may use your version of this file
|
|
|
|
* under the terms of any one of the MPL, the GPL or the LGPL.
|
|
|
|
*
|
2008-06-19 10:47:58 -07:00
|
|
|
***** END LICENSE BLOCK ***** */
|
|
|
|
|
2009-07-15 16:50:01 -07:00
|
|
|
#include "nanojit.h"
|
|
|
|
|
|
|
|
#ifdef SOLARIS
|
|
|
|
#include <ucontext.h>
|
|
|
|
#include <dlfcn.h>
|
|
|
|
#include <procfs.h>
|
|
|
|
#include <sys/stat.h>
|
|
|
|
extern "C" caddr_t _getfp(void);
|
|
|
|
typedef caddr_t maddr_ptr;
|
|
|
|
#else
|
|
|
|
typedef void *maddr_ptr;
|
|
|
|
#endif
|
2008-06-19 10:47:58 -07:00
|
|
|
|
|
|
|
using namespace avmplus;
|
|
|
|
|
2008-12-10 17:19:40 -08:00
|
|
|
Config AvmCore::config;
|
2008-06-19 10:47:58 -07:00
|
|
|
static GC _gc;
|
|
|
|
GC* AvmCore::gc = &_gc;
|
|
|
|
GCHeap GC::heap;
|
2008-06-19 15:32:40 -07:00
|
|
|
String* AvmCore::k_str[] = { (String*)"" };
|
2008-08-22 12:21:27 -07:00
|
|
|
|
2009-07-15 16:50:01 -07:00
|
|
|
void
|
|
|
|
avmplus::AvmLog(char const *msg, ...) {
|
|
|
|
}
|
|
|
|
|
2008-08-28 19:07:49 -07:00
|
|
|
#ifdef _DEBUG
|
|
|
|
// NanoAssertFail matches JS_Assert in jsutil.cpp.
|
|
|
|
void NanoAssertFail()
|
|
|
|
{
|
|
|
|
#if defined(WIN32)
|
|
|
|
DebugBreak();
|
|
|
|
exit(3);
|
|
|
|
#elif defined(XP_OS2) || (defined(__GNUC__) && defined(__i386))
|
|
|
|
asm("int $3");
|
|
|
|
#endif
|
|
|
|
|
|
|
|
abort();
|
|
|
|
}
|
|
|
|
#endif
|
2009-07-15 16:50:01 -07:00
|
|
|
|
|
|
|
#ifdef WIN32
|
|
|
|
void
|
|
|
|
VMPI_setPageProtection(void *address,
|
|
|
|
size_t size,
|
|
|
|
bool executableFlag,
|
|
|
|
bool writeableFlag)
|
|
|
|
{
|
|
|
|
DWORD oldProtectFlags = 0;
|
|
|
|
DWORD newProtectFlags = 0;
|
|
|
|
if ( executableFlag && writeableFlag ) {
|
|
|
|
newProtectFlags = PAGE_EXECUTE_READWRITE;
|
|
|
|
} else if ( executableFlag ) {
|
|
|
|
newProtectFlags = PAGE_EXECUTE_READ;
|
|
|
|
} else if ( writeableFlag ) {
|
|
|
|
newProtectFlags = PAGE_READWRITE;
|
|
|
|
} else {
|
|
|
|
newProtectFlags = PAGE_READONLY;
|
|
|
|
}
|
|
|
|
|
|
|
|
BOOL retval;
|
|
|
|
MEMORY_BASIC_INFORMATION mbi;
|
|
|
|
do {
|
|
|
|
VirtualQuery(address, &mbi, sizeof(MEMORY_BASIC_INFORMATION));
|
|
|
|
size_t markSize = size > mbi.RegionSize ? mbi.RegionSize : size;
|
|
|
|
|
|
|
|
retval = VirtualProtect(address, markSize, newProtectFlags, &oldProtectFlags);
|
|
|
|
NanoAssert(retval);
|
|
|
|
|
|
|
|
address = (char*) address + markSize;
|
|
|
|
size -= markSize;
|
|
|
|
} while(size > 0 && retval);
|
|
|
|
|
|
|
|
// We should not be clobbering PAGE_GUARD protections
|
|
|
|
NanoAssert((oldProtectFlags & PAGE_GUARD) == 0);
|
|
|
|
}
|
|
|
|
|
|
|
|
#else // !WIN32
|
|
|
|
|
|
|
|
void VMPI_setPageProtection(void *address,
|
|
|
|
size_t size,
|
|
|
|
bool executableFlag,
|
|
|
|
bool writeableFlag)
|
|
|
|
{
|
|
|
|
int bitmask = sysconf(_SC_PAGESIZE) - 1;
|
|
|
|
// mprotect requires that the addresses be aligned on page boundaries
|
|
|
|
void *endAddress = (void*) ((char*)address + size);
|
|
|
|
void *beginPage = (void*) ((size_t)address & ~bitmask);
|
|
|
|
void *endPage = (void*) (((size_t)endAddress + bitmask) & ~bitmask);
|
|
|
|
size_t sizePaged = (size_t)endPage - (size_t)beginPage;
|
|
|
|
|
|
|
|
int flags = PROT_READ;
|
|
|
|
if (executableFlag) {
|
|
|
|
flags |= PROT_EXEC;
|
|
|
|
}
|
|
|
|
if (writeableFlag) {
|
|
|
|
flags |= PROT_WRITE;
|
|
|
|
}
|
|
|
|
int retval = mprotect((maddr_ptr)beginPage, (unsigned int)sizePaged, flags);
|
|
|
|
AvmAssert(retval == 0);
|
|
|
|
(void)retval;
|
|
|
|
}
|
|
|
|
|
|
|
|
#endif // WIN32
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
#ifdef WIN32
|
|
|
|
void*
|
|
|
|
nanojit::CodeAlloc::allocCodeChunk(size_t nbytes) {
|
|
|
|
return VirtualAlloc(NULL,
|
|
|
|
nbytes,
|
|
|
|
MEM_COMMIT | MEM_RESERVE,
|
|
|
|
PAGE_EXECUTE_READWRITE);
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
nanojit::CodeAlloc::freeCodeChunk(void *p, size_t nbytes) {
|
|
|
|
VirtualFree(p, 0, MEM_RELEASE);
|
|
|
|
}
|
|
|
|
|
|
|
|
#elif defined(AVMPLUS_UNIX)
|
|
|
|
|
|
|
|
void*
|
|
|
|
nanojit::CodeAlloc::allocCodeChunk(size_t nbytes) {
|
|
|
|
return mmap(NULL,
|
|
|
|
nbytes,
|
|
|
|
PROT_READ | PROT_WRITE | PROT_EXEC,
|
|
|
|
MAP_PRIVATE | MAP_ANON,
|
|
|
|
-1,
|
|
|
|
0);
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
nanojit::CodeAlloc::freeCodeChunk(void *p, size_t nbytes) {
|
|
|
|
munmap(p, nbytes);
|
|
|
|
}
|
|
|
|
|
|
|
|
#else // !WIN32 && !AVMPLUS_UNIX
|
|
|
|
|
|
|
|
void*
|
|
|
|
nanojit::CodeAlloc::allocCodeChunk(size_t nbytes) {
|
|
|
|
return valloc(nbytes);
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
nanojit::CodeAlloc::freeCodeChunk(void *p, size_t nbytes) {
|
|
|
|
free(p);
|
|
|
|
}
|
|
|
|
|
|
|
|
#endif // WIN32
|
|
|
|
|