summaryrefslogtreecommitdiffstats
path: root/build-root/emacs-lisp/elog-4-int-skel.el
diff options
context:
space:
mode:
authorDave Barach <dave@barachs.net>2016-03-28 17:12:19 -0400
committerDave Barach <dave@barachs.net>2016-03-28 17:12:36 -0400
commite5389bb05330a9bd2f24478f996adbcce532ded5 (patch)
tree09243972dbf1e63c3fa746a1fb86221759da719e /build-root/emacs-lisp/elog-4-int-skel.el
parentfb6e59d839001b37bbb70e253627d5b1331ae918 (diff)
event logger skeletons, improve debug CLI
Change-Id: Ieb2e4043fc7bc3b4a5436a7a6aa35f573d8d4506 Signed-off-by: Dave Barach <dave@barachs.net>
Diffstat (limited to 'build-root/emacs-lisp/elog-4-int-skel.el')
-rw-r--r--build-root/emacs-lisp/elog-4-int-skel.el31
1 files changed, 31 insertions, 0 deletions
diff --git a/build-root/emacs-lisp/elog-4-int-skel.el b/build-root/emacs-lisp/elog-4-int-skel.el
new file mode 100644
index 00000000000..fda412a7bb8
--- /dev/null
+++ b/build-root/emacs-lisp/elog-4-int-skel.el
@@ -0,0 +1,31 @@
+;;; elog-4-int-skel.el - 4 integer elog skeleton
+
+(require 'skeleton)
+
+(define-skeleton skel-elog-4-int
+"Insert a skeleton 4-integer event definition"
+nil
+'(setq function-name (skeleton-read "Function: "))
+'(setq label (skeleton-read "Label: "))
+
+"
+
+/* $$$ May or may not be needed */
+#include <vlib/vlib.h>
+#include <vppinfra/elog.h>
+
+static inline void " function-name " (u32 *data)
+{
+ ELOG_TYPE_DECLARE(e) =
+ {
+ .format = \"" label ": first %d second %d third %d fourth %d\",
+ .format_args = \"i4i4i4i4\",
+ };
+ struct { u32 data[4];} * ed;
+ ed = ELOG_DATA (&vlib_global_main.elog_main, e);
+ ed->data[0] = data[0];
+ ed->data[1] = data[1];
+ ed->data[2] = data[2];
+ ed->data[3] = data[3];
+}
+")