API refactoring : policer
[vpp.git] / src / vpp / api / api_main.c
1 #include "vat.h"
2
3 vat_main_t vat_main;
4
5 void
6 vat_suspend (vlib_main_t * vm, f64 interval)
7 {
8   vlib_process_suspend (vm, interval);
9 }
10
11 static u8 *
12 format_api_error (u8 * s, va_list * args)
13 {
14   vat_main_t *vam = va_arg (*args, vat_main_t *);
15   i32 error = va_arg (*args, u32);
16   uword *p;
17
18   p = hash_get (vam->error_string_by_error_number, -error);
19
20   if (p)
21     s = format (s, "%s", p[0]);
22   else
23     s = format (s, "%d", error);
24   return s;
25 }
26
27
28 static void
29 init_error_string_table (vat_main_t * vam)
30 {
31
32   vam->error_string_by_error_number = hash_create (0, sizeof (uword));
33
34 #define _(n,v,s) hash_set (vam->error_string_by_error_number, -v, s);
35   foreach_vnet_api_error;
36 #undef _
37
38   hash_set (vam->error_string_by_error_number, 99, "Misc");
39 }
40
41 static clib_error_t *
42 api_main_init (vlib_main_t * vm)
43 {
44   vat_main_t *vam = &vat_main;
45   int rv;
46   int vat_plugin_init (vat_main_t * vam);
47
48   vam->vlib_main = vm;
49   vam->my_client_index = (u32) ~ 0;
50   init_error_string_table (vam);
51   vat_api_hookup (vam);
52   clib_warning ("vam %llx", vam);
53   rv = vat_plugin_init (vam);
54   if (rv)
55     clib_warning ("vat_plugin_init returned %d", rv);
56   return 0;
57 }
58
59 VLIB_INIT_FUNCTION (api_main_init);
60
61 static clib_error_t *
62 api_command_fn (vlib_main_t * vm,
63                 unformat_input_t * input, vlib_cli_command_t * cmd)
64 {
65   vat_main_t *vam = &vat_main;
66   unformat_input_t _input;
67   uword c;
68   u8 *cmdp, *argsp, *this_cmd;
69   uword *p;
70   u32 arg_len;
71   int rv;
72   int (*fp) (vat_main_t *);
73   api_main_t *am = &api_main;
74
75   vam->vl_input_queue = am->shmem_hdr->vl_input_queue;
76
77   vec_reset_length (vam->inbuf);
78   vam->input = &_input;
79
80   while (((c = unformat_get_input (input)) != '\n') &&
81          (c != UNFORMAT_END_OF_INPUT))
82     vec_add1 (vam->inbuf, c);
83
84   /* Add 1 octet's worth of extra space in case there are no args... */
85   vec_add1 (vam->inbuf, 0);
86
87   /*$$$$ reinstall macro evaluator */
88
89   /* Split input into cmd + args */
90   this_cmd = cmdp = vam->inbuf;
91
92   while (cmdp < (this_cmd + vec_len (this_cmd)))
93     {
94       if (*cmdp == ' ' || *cmdp == '\t' || *cmdp == '\n')
95         {
96           cmdp++;
97         }
98       else
99         break;
100     }
101
102   argsp = cmdp;
103   while (argsp < (this_cmd + vec_len (this_cmd)))
104     {
105       if (*argsp != ' ' && *argsp != '\t' && *argsp != '\n')
106         {
107           argsp++;
108         }
109       else
110         break;
111     }
112   *argsp++ = 0;
113
114   while (argsp < (this_cmd + vec_len (this_cmd)))
115     {
116       if (*argsp == ' ' || *argsp == '\t' || *argsp == '\n')
117         {
118           argsp++;
119         }
120       else
121         break;
122     }
123
124   /* Blank input line? */
125   if (*cmdp == 0)
126     return 0;
127
128   p = hash_get_mem (vam->function_by_name, cmdp);
129   if (p == 0)
130     {
131       return clib_error_return (0, "'%s': function not found\n", cmdp);
132     }
133
134   arg_len = strlen ((char *) argsp);
135
136   unformat_init_string (vam->input, (char *) argsp, arg_len);
137   fp = (void *) p[0];
138
139   rv = (*fp) (vam);
140
141   if (rv < 0)
142     {
143       unformat_free (vam->input);
144       return clib_error_return (0,
145                                 "%s error: %U\n", cmdp,
146                                 format_api_error, vam, rv);
147
148     }
149   if (vam->regenerate_interface_table)
150     {
151       vam->regenerate_interface_table = 0;
152       api_sw_interface_dump (vam);
153     }
154   unformat_free (vam->input);
155   return 0;
156 }
157
158 /* *INDENT-OFF* */
159 VLIB_CLI_COMMAND (api_command, static) =
160 {
161   .path = "binary-api",
162   .short_help = "binary-api <name> [<args>]",
163   .function = api_command_fn,
164 };
165 /* *INDENT-ON* */
166
167 void
168 api_cli_output (void *notused, const char *fmt, ...)
169 {
170   va_list va;
171   vat_main_t *vam = &vat_main;
172   vlib_main_t *vm = vam->vlib_main;
173   vlib_process_t *cp = vlib_get_current_process (vm);
174   u8 *s;
175
176   va_start (va, fmt);
177   s = va_format (0, fmt, &va);
178   va_end (va);
179
180   /* Terminate with \n if not present. */
181   if (vec_len (s) > 0 && s[vec_len (s) - 1] != '\n')
182     vec_add1 (s, '\n');
183
184   if ((!cp) || (!cp->output_function))
185     fformat (stdout, "%v", s);
186   else
187     cp->output_function (cp->output_function_arg, s, vec_len (s));
188
189   vec_free (s);
190 }
191
192 u16
193 vl_client_get_first_plugin_msg_id (char *plugin_name)
194 {
195   api_main_t *am = &api_main;
196   vl_api_msg_range_t *rp;
197   uword *p;
198
199   p = hash_get_mem (am->msg_range_by_name, plugin_name);
200   if (p == 0)
201     return ~0;
202
203   rp = vec_elt_at_index (am->msg_ranges, p[0]);
204
205   return (rp->first_msg_id);
206 }
207
208 uword
209 unformat_sw_if_index (unformat_input_t * input, va_list * args)
210 {
211   u32 *result = va_arg (*args, u32 *);
212   vnet_main_t *vnm = vnet_get_main ();
213   u32 sw_if_index = ~0;
214   u8 *if_name;
215   uword *p;
216
217   if (unformat (input, "%U", unformat_vnet_sw_interface, vnm, &sw_if_index))
218     {
219       *result = sw_if_index;
220       return 1;
221     }
222   return 0;
223 }
224
225 /*
226  * fd.io coding-style-patch-verification: ON
227  *
228  * Local Variables:
229  * eval: (c-set-style "gnu")
230  * End:
231  */