X-Git-Url: https://gerrit.fd.io/r/gitweb?a=blobdiff_plain;f=extras%2Femacs%2Fplugin.el;h=42591c4b6f5608cbf1af44be5d05d4b83854b112;hb=8a10c7351b35ab8405c2a9b030dba74a4da28f30;hp=47bffb693c7310bdcdbea21df8f835cd53346508;hpb=8d0f2f0031589513833ab726a7bad5d9e19ff898;p=vpp.git diff --git a/extras/emacs/plugin.el b/extras/emacs/plugin.el index 47bffb693c7..42591c4b6f5 100644 --- a/extras/emacs/plugin.el +++ b/extras/emacs/plugin.el @@ -19,27 +19,30 @@ (setq start-dir default-directory) (makunbound 'plugin-name) (makunbound 'PLUGIN-NAME) + (makunbound 'plugin-flavor) (setq plugin-name (read-string "Plugin name: ")) + (setq plugin-flavor + (read-string "Dispatch type [dual or qs]: ")) (setq PLUGIN-NAME (upcase plugin-name)) - (find-file (concat plugin-name ".am")) - (skel-plugin-makefile-am-fragment) (setq cmd-args (concat "mkdir -p " plugin-name)) (shell-command cmd-args) (setq cd-args (concat start-dir "/" plugin-name)) (setq default-directory cd-args) + (find-file "CMakeLists.txt") + (skel-plugin-cmakelists-text-fragment) (find-file (concat plugin-name ".api")) (skel-plugin-api) - (find-file (concat plugin-name "_all_api_h.h")) - (skel-plugin-all-apih) (find-file (concat plugin-name ".h")) (skel-plugin-h) (find-file (concat plugin-name ".c")) (skel-plugin-main) - (find-file (concat plugin-name "_msg_enum.h")) - (skel-plugin-msg-enum) (find-file "node.c") - (skel-plugin-node) + (if (string= plugin-flavor "qs") + (skel-plugin-qsnode) (skel-plugin-node)) (find-file (concat plugin-name "_test.c")) (skel-plugin-test) + (find-file (concat plugin-name "_periodic.c")) + (skel-plugin-periodic) + (find-file "setup.pg") + (skel-plugin-setup) (cd start-dir)))) -