dmcallis
65a0592776
Source code drop for the Actionscript virtual machine in the Adobe Flash Player for December 2013
70 lines
2.3 KiB
C++
70 lines
2.3 KiB
C++
/* -*- 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) */
|
|
/* This Source Code Form is subject to the terms of the Mozilla Public
|
|
* License, v. 2.0. If a copy of the MPL was not distributed with this
|
|
* file, You can obtain one at http://mozilla.org/MPL/2.0/. */
|
|
|
|
#include "avmplus.h"
|
|
|
|
namespace avmplus
|
|
{
|
|
#ifdef SUPERWORD_PROFILING
|
|
// 32-bit only
|
|
|
|
static FILE *swprof_code_fp = NULL;
|
|
static FILE *swprof_sample_fp = NULL;
|
|
#ifdef SUPERWORD_LIMIT
|
|
static unsigned int sample_count = 0;
|
|
#endif
|
|
|
|
void WordcodeTranslator::swprofStart()
|
|
{
|
|
swprof_code_fp = fopen("superwordprof_code.txt", "wb");
|
|
if (swprof_code_fp == NULL)
|
|
AvmLog("SUPERWORD PROFILING: COULD NOT OPEN CODE FILE.\n");
|
|
else
|
|
{
|
|
unsigned int signature = 0xC0DEC0DE;
|
|
fwrite(&signature, sizeof(uint32_t), 1, swprof_code_fp);
|
|
}
|
|
swprof_sample_fp = fopen("superwordprof_sample.txt", "wb");
|
|
if (swprof_sample_fp == NULL)
|
|
AvmLog("SUPERWORD PROFILING: COULD NOT OPEN SAMPLE FILE.\n");
|
|
else
|
|
{
|
|
unsigned int signature = 0xDA1ADA1A;
|
|
fwrite(&signature, sizeof(uint32_t), 1, swprof_sample_fp);
|
|
}
|
|
}
|
|
|
|
void WordcodeTranslator::swprofStop()
|
|
{
|
|
if (swprof_code_fp != NULL) { fclose(swprof_code_fp); swprof_code_fp = NULL; }
|
|
if (swprof_sample_fp != NULL) { fclose(swprof_sample_fp); swprof_sample_fp = NULL; }
|
|
}
|
|
|
|
void WordcodeTranslator::swprofCode(const uint32_t* start, const uint32_t* limit)
|
|
{
|
|
if (swprof_code_fp != NULL) {
|
|
fwrite(&start, sizeof(uint32_t*), 1, swprof_code_fp);
|
|
fwrite(&limit, sizeof(uint32_t*), 1, swprof_code_fp);
|
|
fwrite(start, sizeof(uint32_t), limit-start, swprof_code_fp);
|
|
fflush(swprof_code_fp);
|
|
}
|
|
}
|
|
|
|
void WordcodeTranslator::swprofPC(const uint32_t* pc)
|
|
{
|
|
if (swprof_sample_fp != NULL) {
|
|
fwrite(&pc, sizeof(uint32_t*), 1, swprof_sample_fp);
|
|
#ifdef SUPERWORD_LIMIT
|
|
if (++sample_count == SUPERWORD_LIMIT) {
|
|
swprofStop();
|
|
AvmLog("SAMPLING HALTED.\n");
|
|
}
|
|
#endif
|
|
}
|
|
}
|
|
#endif // SUPERWORD_PROFILING
|
|
}
|