msvcrt/tests: Avoid size_t in a trace.
[wine] / dlls / dbghelp / cpu_x86_64.c
1 /*
2  * File cpu_x86_64.c
3  *
4  * Copyright (C) 2009-2009, Eric Pouech.
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19  */
20
21 #include <assert.h>
22
23 #include "ntstatus.h"
24 #define WIN32_NO_STATUS
25 #include "dbghelp_private.h"
26 #include "winternl.h"
27 #include "wine/debug.h"
28
29 WINE_DEFAULT_DEBUG_CHANNEL(dbghelp);
30
31 static unsigned x86_64_get_addr(HANDLE hThread, const CONTEXT* ctx,
32                                 enum cpu_addr ca, ADDRESS64* addr)
33 {
34     addr->Mode = AddrModeFlat;
35     switch (ca)
36     {
37 #ifdef __x86_64__
38     case cpu_addr_pc:    addr->Segment = ctx->SegCs; addr->Offset = ctx->Rip; return TRUE;
39     case cpu_addr_stack: addr->Segment = ctx->SegSs; addr->Offset = ctx->Rsp; return TRUE;
40     case cpu_addr_frame: addr->Segment = ctx->SegSs; addr->Offset = ctx->Rbp; return TRUE;
41 #endif
42     default: addr->Mode = -1;
43         return FALSE;
44     }
45 }
46
47 enum st_mode {stm_start, stm_64bit, stm_done};
48
49 /* indexes in Reserved array */
50 #define __CurrentMode     0
51 #define __CurrentSwitch   1
52 #define __NextSwitch      2
53
54 #define curr_mode   (frame->Reserved[__CurrentMode])
55 #define curr_switch (frame->Reserved[__CurrentSwitch])
56 #define next_switch (frame->Reserved[__NextSwitch])
57
58 static BOOL x86_64_stack_walk(struct cpu_stack_walk* csw, LPSTACKFRAME64 frame)
59 {
60     /* sanity check */
61     if (curr_mode >= stm_done) return FALSE;
62     assert(!csw->is32);
63
64     TRACE("Enter: PC=%s Frame=%s Return=%s Stack=%s Mode=%s\n",
65           wine_dbgstr_addr(&frame->AddrPC),
66           wine_dbgstr_addr(&frame->AddrFrame),
67           wine_dbgstr_addr(&frame->AddrReturn),
68           wine_dbgstr_addr(&frame->AddrStack),
69           curr_mode == stm_start ? "start" : "64bit");
70
71     if (curr_mode == stm_start)
72     {
73         if ((frame->AddrPC.Mode == AddrModeFlat) &&
74             (frame->AddrFrame.Mode != AddrModeFlat))
75         {
76             WARN("Bad AddrPC.Mode / AddrFrame.Mode combination\n");
77             goto done_err;
78         }
79
80         /* Init done */
81         curr_mode = stm_64bit;
82         curr_switch = 0;
83         frame->AddrReturn.Mode = frame->AddrStack.Mode = AddrModeFlat;
84         /* don't set up AddrStack on first call. Either the caller has set it up, or
85          * we will get it in the next frame
86          */
87         memset(&frame->AddrBStore, 0, sizeof(frame->AddrBStore));
88     }
89     else
90     {
91         if (frame->AddrReturn.Offset == 0) goto done_err;
92         frame->AddrPC = frame->AddrReturn;
93     }
94
95     if (!sw_read_mem(csw, frame->AddrStack.Offset,
96                      &frame->AddrReturn.Offset, sizeof(DWORD64)))
97     {
98         WARN("Cannot read new frame offset %s\n",
99              wine_dbgstr_longlong(frame->AddrFrame.Offset + sizeof(DWORD64)));
100         goto done_err;
101     }
102     /* FIXME: simplistic stuff... need to handle both dwarf & PE stack information */
103     frame->AddrStack.Offset += sizeof(DWORD64);
104     memset(&frame->Params, 0, sizeof(frame->Params));
105
106     frame->Far = TRUE;
107     frame->Virtual = TRUE;
108     if (frame->AddrPC.Offset && sw_module_base(csw, frame->AddrPC.Offset))
109         frame->FuncTableEntry = sw_table_access(csw, frame->AddrPC.Offset);
110     else
111         frame->FuncTableEntry = NULL;
112
113     TRACE("Leave: PC=%s Frame=%s Return=%s Stack=%s Mode=%s FuncTable=%p\n",
114           wine_dbgstr_addr(&frame->AddrPC),
115           wine_dbgstr_addr(&frame->AddrFrame),
116           wine_dbgstr_addr(&frame->AddrReturn),
117           wine_dbgstr_addr(&frame->AddrStack),
118           curr_mode == stm_start ? "start" : "64bit",
119           frame->FuncTableEntry);
120
121     return TRUE;
122 done_err:
123     curr_mode = stm_done;
124     return FALSE;
125 }
126
127 struct cpu cpu_x86_64 = {
128     IMAGE_FILE_MACHINE_AMD64,
129     8,
130     x86_64_get_addr,
131     x86_64_stack_walk,
132 };