vieter-v
/
v
2
0
Fork 0
Code Issues Pull Requests Releases Activity

builtin: fix Windows panic message (#10952)

pull/10962/head
Uwe Krüger 2021-07-25 14:34:48 +02:00 committed by GitHub
parent 5359c56c77
commit a6245a56d8
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 10 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
vlib/builtin/builtin_windows.c.v
View File

@ -54,8 +54,6 @@ fn C.SymFromAddr(h_process voidptr, address u64, p_displacement voidptr, p_symbo
fn C.SymGetLineFromAddr64(h_process voidptr, address u64, p_displacement voidptr, p_line &Line64) int fn C.SymGetLineFromAddr64(h_process voidptr, address u64, p_displacement voidptr, p_line &Line64) int
fn C.FormatMessage(dwFlags u32, lpSource voidptr, dwMessageId u32, dwLanguageId u32, lpBuffer &voidptr, nSize u32, Arguments voidptr) u32
// Ref - https://docs.microsoft.com/en-us/windows/win32/api/dbghelp/nf-dbghelp-symsetoptions // Ref - https://docs.microsoft.com/en-us/windows/win32/api/dbghelp/nf-dbghelp-symsetoptions
const ( const (
symopt_undname = 0x00000002 symopt_undname = 0x00000002
@ -282,17 +280,19 @@ fn break_if_debugger_attached() {
// return an error message generated from WinAPI's `LastError` // return an error message generated from WinAPI's `LastError`
pub fn winapi_lasterr_str() string { pub fn winapi_lasterr_str() string {
mut msgbuf := &byte(0)
err_msg_id := C.GetLastError() err_msg_id := C.GetLastError()
res := C.FormatMessage(C.FORMAT_MESSAGE_ALLOCATE_BUFFER | C.FORMAT_MESSAGE_FROM_SYSTEM, if err_msg_id == 8 {
C.NULL, err_msg_id, 0, &msgbuf, 0, C.NULL) // handle this case special since `FormatMessage()` might not work anymore
err_msg := if res == 0 { return 'insufficient memory'
'unknown error $err_msg_id'
} else {
string{
str: msgbuf
len: int(res)
} }
mut msgbuf := &u16(0)
res := C.FormatMessage(C.FORMAT_MESSAGE_ALLOCATE_BUFFER | C.FORMAT_MESSAGE_FROM_SYSTEM | C.FORMAT_MESSAGE_IGNORE_INSERTS,
C.NULL, err_msg_id, C.MAKELANGID(C.LANG_NEUTRAL, C.SUBLANG_DEFAULT), &msgbuf,
0, C.NULL)
err_msg := if res == 0 {
'Win-API error $err_msg_id'
} else {
unsafe { string_from_wide(msgbuf) }
} }
return err_msg return err_msg
} }