extras/emacs/config-skel.el

   1 ;;; Copyright (c) 2016 Cisco and/or its affiliates.
   2 ;;; Licensed under the Apache License, Version 2.0 (the "License");
   3 ;;; you may not use this file except in compliance with the License.
   4 ;;; You may obtain a copy of the License at:
   5 ;;;
   6 ;;;     http://www.apache.org/licenses/LICENSE-2.0
   7 ;;;
   8 ;;; Unless required by applicable law or agreed to in writing, software
   9 ;;; distributed under the License is distributed on an "AS IS" BASIS,
  10 ;;; WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  11 ;;; See the License for the specific language governing permissions and
  12 ;;; limitations under the License.
  13
  14 ;;; config-skel.el - config function command skeleton
  15
  16 (require 'skeleton)
  17
  18 (define-skeleton skel-config
  19 "Insert a vlib config skeleton "
  20 nil
  21 '(setq cfg-name (skeleton-read "Config Class Name: "))
  22
  23 "
  24 static clib_error_t *
  25 " cfg-name "_config (vlib_main_t * vm, unformat_input_t * input)
  26 {
  27     u32 whatever;
  28
  29     while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT) {
  30         if (unformat (input, \"whatever %d\", &whatever))
  31             ;
  32         else
  33             return clib_error_return (0, \"unknown input `%U'\",
  34                                       format_unformat_error, input);
  35     }
  36
  37     return 0;
  38 }
  39
  40 VLIB_CONFIG_FUNCTION (" cfg-name "_config, \"" cfg-name "\");
  41 ")