File: find_line_call.c

package info (click to toggle)
fis-gtm 6.2-000-1
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 30,784 kB
  • ctags: 42,554
  • sloc: ansic: 358,483; asm: 4,847; csh: 4,574; sh: 2,261; awk: 200; makefile: 86; sed: 13
file content (85 lines) | stat: -rw-r--r-- 2,708 bytes parent folder | download | duplicates (5)
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
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
/****************************************************************
 *								*
 *	Copyright 2001, 2012 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 "xfer_enum.h"
#include "i386.h"
#include <rtnhdr.h>	/* Needed by zbreak.h */
#include "zbreak.h"

zb_code  *find_line_call(void *addr)
{
	unsigned char *call_addr;
	union
	{
		ModR_M		modrm;
		unsigned char	byte;
	} modrm_byte;

	call_addr = (unsigned char *)addr;
	modrm_byte.byte = *(call_addr + 1);
	if ((I386_INS_Grp5_Prefix == *call_addr) && (I386_INS_CALL_Ev == modrm_byte.modrm.reg_opcode))
	{
		call_addr++;
		assert(I386_REG_EBX == modrm_byte.modrm.r_m);
		call_addr++;
		if (I386_MOD32_BASE_DISP_8 == modrm_byte.modrm.mod)
		{
			if ((xf_linestart * SIZEOF(int4) == *call_addr) ||
			    (xf_zbstart * SIZEOF(int4) == *call_addr))
				return (zb_code *)call_addr;
			call_addr++;
		} else
		{
			assert (I386_MOD32_BASE_DISP_32 == modrm_byte.modrm.mod);
			return (zb_code *)addr;
		}
	}

	modrm_byte.byte = *(call_addr + 1);
	if ((I386_INS_PUSH_Ib == *call_addr) || (I386_INS_PUSH_Iv == *call_addr))
	{
		while ((I386_INS_PUSH_Ib == *call_addr) || (I386_INS_PUSH_Iv == *call_addr))
		{
			if (I386_INS_PUSH_Ib == *call_addr)
				call_addr += 1 + SIZEOF(unsigned char);
			else
			{
				assert(I386_INS_PUSH_Iv == *call_addr);
				call_addr += 1 + SIZEOF(int4);
			}
		}
		modrm_byte.byte = *(call_addr + 1);
		if ((I386_INS_Grp5_Prefix != *call_addr++) || (I386_INS_CALL_Ev != modrm_byte.modrm.reg_opcode))
			return (zb_code *)addr;
		assert((I386_MOD32_BASE_DISP_8 == modrm_byte.modrm.mod) || (I386_MOD32_BASE_DISP_32 == modrm_byte.modrm.mod));
		assert(I386_REG_EBX == modrm_byte.modrm.r_m);
		call_addr++;
		if (I386_MOD32_BASE_DISP_8 == modrm_byte.modrm.mod)
		{
			if ((xf_linefetch * SIZEOF(int4) != *call_addr) && (xf_zbfetch * SIZEOF(int4) != *call_addr))
				return (zb_code *)addr;
		}
	}
	else if ((I386_INS_Grp5_Prefix == *call_addr) && (I386_INS_CALL_Ev != modrm_byte.modrm.reg_opcode))
	{
		call_addr++;
		assert((I386_MOD32_BASE_DISP_8 == modrm_byte.modrm.mod) || (I386_MOD32_BASE_DISP_32 == modrm_byte.modrm.mod));
		assert(I386_REG_EBX == modrm_byte.modrm.r_m);
		call_addr++;
		if (I386_MOD32_BASE_DISP_8 == modrm_byte.modrm.mod)
		{
			if ((xf_linestart * SIZEOF(int4) != *call_addr) && (xf_zbstart * SIZEOF(int4) != *call_addr))
				return (zb_code *)addr;
		}
	}
	return (zb_code *)call_addr;
}