/* target operations
* Copyright (C) 2005 Red Hat Inc.
- * Copyright (C) 2005,2006 Intel Corporation.
+ * Copyright (C) 2005, 2006, 2007 Intel Corporation.
*
* This file is part of systemtap, and is free software. You can
* redistribute it and/or modify it under the terms of the GNU General
*_d = '\0'; \
(dst); \
})
+
+
+#if defined __i386__
+
+/* x86 can't do 8-byte put/get_user_asm, so we have to split it */
+
+#define kread(ptr) \
+ ({ \
+ typeof(*(ptr)) _r; \
+ if (sizeof(*(ptr)) == 8) { \
+ union { u64 q; u32 l[2]; } _q; \
+ _q.l[0] = (u32) deref(4, &((u32 *)(ptr))[0]); \
+ _q.l[1] = (u32) deref(4, &((u32 *)(ptr))[1]); \
+ _r = (typeof(*(ptr))) _q.q; \
+ } else \
+ _r = (typeof(*(ptr))) deref(sizeof(*(ptr)), (ptr)); \
+ _r; \
+ })
+
+#define kwrite(ptr, value) \
+ ({ \
+ if (sizeof(*(ptr)) == 8) { \
+ union { u64 q; u32 l[2]; } _q; \
+ _q.q = (u64)(typeof(*(ptr)))(value); \
+ store_deref(4, &((u32 *)(ptr))[0], _q.l[0]); \
+ store_deref(4, &((u32 *)(ptr))[1], _q.l[1]); \
+ } else \
+ store_deref(sizeof(*(ptr)), (ptr), (typeof(*(ptr)))(value)); \
+ })
+
+#else
+
+#define kread(ptr) \
+ ( (typeof(*(ptr))) deref(sizeof(*(ptr)), (ptr)) )
+#define kwrite(ptr, value) \
+ ( store_deref(sizeof(*(ptr)), (ptr), (typeof(*(ptr)))(value)) )
+
+#endif
probe end { log("systemtap ending probe") }
-function call_deref:long(val:long) %{
+function call_kread:long(val:long) %{
if ((uint64_t)THIS->val < 0x100ULL) {
uint8_t local8 = (uint8_t)THIS->val;
- THIS->__retvalue = (uint8_t)deref(sizeof(local8), &local8);
+ THIS->__retvalue = kread(&local8);
} else if ((uint64_t)THIS->val < 0x10000ULL) {
uint16_t local16 = (uint16_t)THIS->val;
- THIS->__retvalue = (uint16_t)deref(sizeof(local16), &local16);
+ THIS->__retvalue = kread(&local16);
} else if ((uint64_t)THIS->val < 0x100000000ULL) {
uint32_t local32 = (uint32_t)THIS->val;
- THIS->__retvalue = (uint32_t)deref(sizeof(local32), &local32);
+ THIS->__retvalue = kread(&local32);
} else {
uint64_t local64 = (uint64_t)THIS->val;
- THIS->__retvalue = (uint64_t)deref(sizeof(local64), &local64);
+ THIS->__retvalue = kread(&local64);
+ }
+ if (0) {
+deref_fault:
+ CONTEXT->last_error = "pointer dereference error";
+ }
+%}
+
+function call_kwrite:long(val:long) %{
+ if ((uint64_t)THIS->val < 0x100ULL) {
+ uint8_t local8;
+ kwrite(&local8, THIS->val);
+ THIS->__retvalue = local8;
+ } else if ((uint64_t)THIS->val < 0x10000ULL) {
+ uint16_t local16;
+ kwrite(&local16, THIS->val);
+ THIS->__retvalue = local16;
+ } else if ((uint64_t)THIS->val < 0x100000000ULL) {
+ uint32_t local32;
+ kwrite(&local32, THIS->val);
+ THIS->__retvalue = local32;
+ } else {
+ uint64_t local64;
+ kwrite(&local64, THIS->val);
+ THIS->__retvalue = local64;
}
if (0) {
deref_fault:
%}
function check_deref(val) {
- deref = call_deref(val)
+ deref = call_kread(val)
+ if (deref == val)
+ log("systemtap test success")
+ else
+ printf("systemtap test failure - kread %#x != %#x\n", deref, val)
+
+ deref = call_kwrite(val)
if (deref == val)
log("systemtap test success")
else
- printf("systemtap test failure - %#x != %#x\n", deref, val)
+ printf("systemtap test failure - kwrite %#x != %#x\n", deref, val)
}
probe end(1) {