1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
|
/****************************************************************
* *
* Copyright 2002, 2014 Fidelity Information Services, Inc *
* *
* This source code contains the intellectual property *
* of its copyright holder(s), and is made available *
* under a license. If you do not know the terms of *
* the license, please stop and do not read further. *
* *
****************************************************************/
#include "mdef.h"
#include "iosp.h"
#include "error.h"
#include <rtnhdr.h>
#include "inst_flush.h"
#include "private_code_copy.h"
#include "stack_frame.h"
#include "gtm_text_alloc.h"
#include "gtm_string.h"
error_def(UNIX_ONLY(ERR_MEMORY) VMS_ONLY(ERR_VMSMEMORY);)
CONDITION_HANDLER(cre_priv_ch)
{
START_CH(TRUE);
if (SIGNAL == UNIX_ONLY(ERR_MEMORY) VMS_ONLY(ERR_VMSMEMORY))
{
UNWIND(NULL, NULL); /* ignore "lack-of-memory" error, rather not set breakpoint than error out in such a case */
}
NEXTCH;
}
uint4 cre_private_code_copy(rhdtyp *rtn)
{
unsigned char *new_ptext;
int code_size;
#ifdef USHBIN_SUPPORTED
assert(NULL != rtn->shared_ptext_adr); /* don't need private copy if not shared */
assert(rtn->shared_ptext_adr == rtn->ptext_adr); /* if already private, we shouldn't be calling this routine */
code_size = (int)(rtn->ptext_end_adr - rtn->ptext_adr) ;
ESTABLISH_RET(cre_priv_ch, UNIX_ONLY(ERR_MEMORY) VMS_ONLY(ERR_VMSMEMORY));
new_ptext = GTM_TEXT_ALLOC(code_size);
REVERT;
memcpy(new_ptext, rtn->ptext_adr, code_size);
adjust_frames(rtn->ptext_adr, rtn->ptext_end_adr, new_ptext);
do
{
rtn->ptext_adr = new_ptext;
rtn->ptext_end_adr = new_ptext + code_size;
rtn = (rhdtyp *)rtn->old_rhead_adr;
} while (NULL != rtn);
inst_flush(new_ptext, code_size);
#endif
return SS_NORMAL;
}
|
