1 /*
2 * Copyright (c) 2014-2019, Juniper Networks, Inc.
3 * All rights reserved.
4 * This SOFTWARE is licensed under the LICENSE provided in the
5 * ../Copyright file. By downloading, installing, copying, or otherwise
6 * using the SOFTWARE, you agree to be bound by the terms of that
7 * LICENSE.
8 * Phil Shafer, July 2014
9 */
10
11 #include <stdlib.h>
12 #include <stdint.h>
13 #include <string.h>
14 #include <unistd.h>
15
16 #include "xo.h"
17 #include "xo_encoder.h"
18
19 int
main(int argc,char ** argv)20 main (int argc, char **argv)
21 {
22 static char base_grocery[] = "GRO";
23 static char base_hardware[] = "HRD";
24 struct item {
25 const char *i_title;
26 int i_sold;
27 int i_instock;
28 int i_onorder;
29 const char *i_sku_base;
30 int i_sku_num;
31 };
32 struct item list[] = {
33 { "gum", 1412, 54, 10, base_grocery, 415 },
34 { "rope", 85, 4, 2, base_hardware, 212 },
35 { "ladder", 0, 2, 1, base_hardware, 517 },
36 { "bolt", 4123, 144, 42, base_hardware, 632 },
37 { "water", 17, 14, 2, base_grocery, 2331 },
38 { NULL, 0, 0, 0, NULL, 0 }
39 };
40 struct item list2[] = {
41 { "fish", 1321, 45, 1, base_grocery, 533 },
42 { NULL, 0, 0, 0, NULL, 0 }
43 };
44 struct item *ip;
45 xo_info_t info[] = {
46 { "in-stock", "number", "Number of items in stock" },
47 { "name", "string", "Name of the item" },
48 { "on-order", "number", "Number of items on order" },
49 { "sku", "string", "Stock Keeping Unit" },
50 { "sold", "number", "Number of items sold" },
51 { XO_INFO_NULL },
52 };
53
54 char name[] = "test_01.test"; /* test trimming of xo_program */
55 argv[0] = name;
56
57 argc = xo_parse_args(argc, argv);
58 if (argc < 0)
59 return 1;
60
61 for (argc = 1; argv[argc]; argc++) {
62 if (xo_streq(argv[argc], "xml"))
63 xo_set_style(NULL, XO_STYLE_XML);
64 else if (xo_streq(argv[argc], "json"))
65 xo_set_style(NULL, XO_STYLE_JSON);
66 else if (xo_streq(argv[argc], "text"))
67 xo_set_style(NULL, XO_STYLE_TEXT);
68 else if (xo_streq(argv[argc], "html"))
69 xo_set_style(NULL, XO_STYLE_HTML);
70 else if (xo_streq(argv[argc], "pretty"))
71 xo_set_flags(NULL, XOF_PRETTY);
72 else if (xo_streq(argv[argc], "xpath"))
73 xo_set_flags(NULL, XOF_XPATH);
74 else if (xo_streq(argv[argc], "info"))
75 xo_set_flags(NULL, XOF_INFO);
76 else if (xo_streq(argv[argc], "error")) {
77 close(-1);
78 xo_err(1, "error detected");
79 }
80 }
81
82 xo_set_info(NULL, info, -1);
83 xo_set_flags(NULL, XOF_KEYS);
84
85 xo_open_container_h(NULL, "top-level");
86
87 xo_emit("static {:type/ethernet} {:type/bridge} {:type/%4du} {:type/%3d}",
88 18, 24);
89
90 xo_emit("anchor {[:/%d}{:address/%p}..{:port/%u}{]:}\n", 18, NULL, 1);
91 xo_emit("anchor {[:18}{:address/%p}..{:port/%u}{]:}\n", NULL, 1);
92 xo_emit("anchor {[:/18}{:address/%p}..{:port/%u}{]:}\n", NULL, 1);
93
94 xo_emit("df {:used-percent/%5.0f}{U:%%}\n", (double) 12);
95
96 xo_emit("{e:kve_start/%#jx}", (uintmax_t) 0xdeadbeef);
97 xo_emit("{e:kve_end/%#jx}", (uintmax_t) 0xcabb1e);
98
99 xo_emit("testing argument modifier {a:}.{a:}...\n",
100 "host", "my-box", "domain", "example.com");
101
102 xo_emit("testing argument modifier with encoding to {ea:}.{a:}...\n",
103 "host", "my-box", "domain", "example.com");
104
105 xo_emit("{La:} {a:}\n", "Label text", "label", "value");
106
107 const char *title = "My Title";
108 xo_emit_field("T", title, "%s\n", NULL, NULL);
109
110 xo_emit_field("Vt", "max-chaos", NULL, NULL, " very ");
111 xo_emit_field("V", "min-chaos", "%d", NULL, 42);
112 xo_emit_field("V", "some-chaos", "%d\n", "[%d]", 42);
113
114 xo_attr("test-attr", "attr-value");
115 xo_emit_field_h(NULL, ",leaf-list,quotes", "sku", "%s-%u", "%s-000-%u",
116 "gum", 1412);
117
118 xo_emit("Connecting to {:host}.{:domain}...\n", "my-box", "example.com");
119
120 xo_attr("test", "value");
121 xo_open_container("data");
122 xo_open_list("item");
123 xo_attr("test2", "value2");
124
125 xo_emit("{T:Item/%-10s}{T:Total Sold/%12s}{T:In Stock/%12s}"
126 "{T:On Order/%12s}{T:SKU/%5s}\n");
127
128 for (ip = list; ip->i_title; ip++) {
129 xo_open_instance("item");
130 xo_attr("test3", "value3");
131
132 xo_emit("{keq:sku/%s-%u/%s-000-%u}"
133 "{k:name/%-10s/%s}{n:sold/%12u/%u}{:in-stock/%12u/%u}"
134 "{:on-order/%12u/%u}{qkd:sku/%5s-000-%u/%s-000-%u}\n",
135 ip->i_sku_base, ip->i_sku_num,
136 ip->i_title, ip->i_sold, ip->i_instock, ip->i_onorder,
137 ip->i_sku_base, ip->i_sku_num);
138
139 xo_close_instance("item");
140 }
141
142 xo_close_list("item");
143 xo_close_container("data");
144
145 xo_emit("\n\n");
146
147 xo_open_container("data2");
148 xo_open_list("item");
149
150 for (ip = list; ip->i_title; ip++) {
151 xo_open_instance("item");
152
153 xo_emit("{keq:sku/%s-%u/%s-000-%u}", ip->i_sku_base, ip->i_sku_num);
154 xo_emit("{L:Item} '{k:name/%s}':\n", ip->i_title);
155 xo_emit("{P: }{L:Total sold}: {n:sold/%u%s}\n",
156 ip->i_sold, ip->i_sold ? ".0" : "");
157 xo_emit("{P: }{Lcw:In stock}{:in-stock/%u}\n", ip->i_instock);
158 xo_emit("{P: }{Lcw:On order}{:on-order/%u}\n", ip->i_onorder);
159 xo_emit("{P: }{L:SKU}: {qkd:sku/%s-000-%u}\n",
160 ip->i_sku_base, ip->i_sku_num);
161
162 xo_close_instance("item");
163 }
164
165 xo_close_list("item");
166 xo_close_container("data2");
167
168 xo_open_container("data3");
169 xo_open_list("item");
170
171 for (ip = list2; ip->i_title; ip++) {
172 xo_open_instance("item");
173
174 xo_emit("{keq:sku/%s-%u/%s-000-%u}", ip->i_sku_base, ip->i_sku_num);
175 xo_emit("{L:Item} '{k:name/%s}':\n", ip->i_title);
176 xo_emit("{P: }{L:Total sold}: {n:sold/%u%s}\n",
177 ip->i_sold, ip->i_sold ? ".0" : "");
178 xo_emit("{P: }{Lcw:In stock}{:in-stock/%u}\n", ip->i_instock);
179 xo_emit("{P: }{Lcw:On order}{:on-order/%u}\n", ip->i_onorder);
180 xo_emit("{P: }{L:SKU}: {qkd:sku/%s-000-%u}\n",
181 ip->i_sku_base, ip->i_sku_num);
182
183 xo_close_instance("item");
184 }
185
186 xo_close_list("item");
187 xo_close_container("data3");
188
189 xo_open_container("data4");
190 xo_open_list("item");
191
192 for (ip = list; ip->i_title; ip++) {
193 xo_attr("test4", "value4");
194 xo_emit("{Lwc:Item}{l:item}\n", ip->i_title);
195 }
196
197 xo_close_list("item");
198 xo_close_container("data4");
199
200 xo_attr("test", "value");
201 xo_open_container("data");
202 xo_open_list("item");
203 xo_attr("test2", "value2");
204
205 xo_emit("{T:Item/%-10s}{T:Total Sold/%12s}{T:In Stock/%12s}"
206 "{T:On Order/%12s}{T:SKU/%5s}\n");
207
208 for (ip = list; ip->i_title; ip++) {
209 xo_open_instance("item");
210 xo_attr("test3", "value3");
211
212 xo_emit("{keq:sku/%s-%u/%s-000-%u}"
213 "{k:name/%-10s/%s}{n:sold/%12u/%u}",
214 ip->i_sku_base, ip->i_sku_num,
215 ip->i_title, ip->i_sold);
216
217 if (ip->i_onorder < 5)
218 xo_emit("Extra: {:extra}", "special");
219
220 if (ip->i_instock & 1)
221 xo_emit("{:in-stock/%12u/%u}", ip->i_instock);
222 xo_emit("{:on-order/%12u/%u}", ip->i_onorder);
223 if (!(ip->i_instock & 1))
224 xo_emit("{:in-stock/%12u/%u}", ip->i_instock);
225
226 xo_emit("{qkd:sku/%5s-000-%u/%s-000-%u}\n",
227 ip->i_sku_base, ip->i_sku_num);
228
229 xo_close_instance("item");
230 }
231
232 xo_close_list("item");
233 xo_close_container("data");
234
235 xo_emit("\n\n");
236
237
238 xo_emit("X{P:}X", "epic fail");
239 xo_emit("X{T:}X", "epic fail");
240 xo_emit("X{N:}X", "epic fail");
241 xo_emit("X{L:}X\n", "epic fail");
242
243 xo_emit("X{P: }X{Lwc:Cost}{:cost/%u}\n", 425);
244 xo_emit("X{P:/%30s}X{Lwc:Cost}{:cost/%u}\n", "", 455);
245
246 xo_emit("{e:mode/%s}{e:mode_octal/%s} {t:links/%s} "
247 "{t:user/%s} {t:group/%s} \n",
248 "mode", "octal", "links",
249 "user", "group", "extra1", "extra2", "extra3");
250
251 xo_emit("{e:pre/%s}{t:links/%-*u}{t:post/%-*s}\n", "that", 8, 3, 8, "this");
252
253 xo_emit("{t:mode/%s}{e:mode_octal/%03o} {t:links/%*u} "
254 "{t:user/%-*s} {t:group/%-*s} \n",
255 "/some/file", (int) 0640, 8, 1,
256 10, "user", 12, "group");
257
258 xo_close_container_h(NULL, "top-level");
259
260 xo_finish();
261
262 return 0;
263 }
264