浏览代码

gdbinit: Add shared/invalid data state

Samuel Thibault 6 年之前
父节点
当前提交
08997ff74f
共有 1 个文件被更改,包括 18 次插入4 次删除
  1. 18 4
      tools/gdbinit

+ 18 - 4
tools/gdbinit

@@ -715,6 +715,10 @@ define starpu-memusage
     set $normal_b = 0
     set $owner = 0
     set $owner_b = 0
+    set $shared = 0
+    set $shared_b = 0
+    set $invalid = 0
+    set $invalid_b = 0
     set $nodataref = 0
     set $nodataref_b = 0
     set $nosubdataref = 0
@@ -766,6 +770,14 @@ define starpu-memusage
 	  set $owner = $owner + 1
 	  set $owner_b = $owner_b + $size
 	end
+	if $handle->per_node[$node].state == STARPU_SHARED
+	  set $shared = $shared + 1
+	  set $shared_b = $shared_b + $size
+	end
+	if $handle->per_node[$node].state == STARPU_INVALID
+	  set $invalid = $invalid + 1
+	  set $invalid_b = $invalid_b + $size
+	end
         if (may_free_subtree($handle,$node))
 	  set $nosubdataref = $nosubdataref + 1
 	  set $nosubdataref_b = $nosubdataref_b + $size
@@ -786,11 +798,13 @@ define starpu-memusage
     printf "  diduse: %u, %uMiB\n", $diduse, $diduse_b / 1048576
     printf "  redux: %u, %uMiB\n", $redux, $redux_b / 1048576
     printf "  relax: %u, %uMiB\n", $relax, $relax_b / 1048576
-    printf "  noref: %u, %uMiB\n", $noref, $noref_b / 1048576
+    printf "    noref: %u, %uMiB\n", $noref, $noref_b / 1048576
     printf "  normal: %u, %uMiB\n", $normal, $normal_b / 1048576
-    printf "  owner: %u, %uMiB\n", $owner, $owner_b / 1048576
-    printf "  nosubdataref: %u, %uMiB\n", $nosubdataref, $nosubdataref_b / 1048576
-    printf "  nodataref: %u, %uMiB\n", $nodataref, $nodataref_b / 1048576
+    printf "    owner: %u, %uMiB\n", $owner, $owner_b / 1048576
+    printf "    shared: %u, %uMiB\n", $shared, $shared_b / 1048576
+    printf "    invalid: %u, %uMiB\n", $invalid, $invalid_b / 1048576
+    printf "    nosubdataref: %u, %uMiB\n", $nosubdataref, $nosubdataref_b / 1048576
+    printf "    nodataref: %u, %uMiB\n", $nodataref, $nodataref_b / 1048576
     printf "\n  cached: %u, %uMiB\n", mc_cache_nb[$node], mc_cache_size[$node] / 1048576
     set $node = $node + 1
   end