xref: /freebsd/contrib/libxo/tests/core/test_01.c (revision 76f2606181eabc8ab20aa7297bbddc6e78bb549d)
1 /*
2  * Copyright (c) 2014, 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 
18 int
19 main (int argc, char **argv)
20 {
21     static char base_grocery[] = "GRO";
22     static char base_hardware[] = "HRD";
23     struct item {
24 	const char *i_title;
25 	int i_sold;
26 	int i_instock;
27 	int i_onorder;
28 	const char *i_sku_base;
29 	int i_sku_num;
30     };
31     struct item list[] = {
32 	{ "gum", 1412, 54, 10, base_grocery, 415 },
33 	{ "rope", 85, 4, 2, base_hardware, 212 },
34 	{ "ladder", 0, 2, 1, base_hardware, 517 },
35 	{ "bolt", 4123, 144, 42, base_hardware, 632 },
36 	{ "water", 17, 14, 2, base_grocery, 2331 },
37 	{ NULL, 0, 0, 0, NULL, 0 }
38     };
39     struct item list2[] = {
40 	{ "fish", 1321, 45, 1, base_grocery, 533 },
41 	{ NULL, 0, 0, 0, NULL, 0 }
42     };
43     struct item *ip;
44     xo_info_t info[] = {
45 	{ "in-stock", "number", "Number of items in stock" },
46 	{ "name", "string", "Name of the item" },
47 	{ "on-order", "number", "Number of items on order" },
48 	{ "sku", "string", "Stock Keeping Unit" },
49 	{ "sold", "number", "Number of items sold" },
50 	{ XO_INFO_NULL },
51     };
52 
53     argc = xo_parse_args(argc, argv);
54     if (argc < 0)
55 	return 1;
56 
57     for (argc = 1; argv[argc]; argc++) {
58 	if (strcmp(argv[argc], "xml") == 0)
59 	    xo_set_style(NULL, XO_STYLE_XML);
60 	else if (strcmp(argv[argc], "json") == 0)
61 	    xo_set_style(NULL, XO_STYLE_JSON);
62 	else if (strcmp(argv[argc], "text") == 0)
63 	    xo_set_style(NULL, XO_STYLE_TEXT);
64 	else if (strcmp(argv[argc], "html") == 0)
65 	    xo_set_style(NULL, XO_STYLE_HTML);
66 	else if (strcmp(argv[argc], "pretty") == 0)
67 	    xo_set_flags(NULL, XOF_PRETTY);
68 	else if (strcmp(argv[argc], "xpath") == 0)
69 	    xo_set_flags(NULL, XOF_XPATH);
70 	else if (strcmp(argv[argc], "info") == 0)
71 	    xo_set_flags(NULL, XOF_INFO);
72         else if (strcmp(argv[argc], "error") == 0) {
73             close(-1);
74             xo_err(1, "error detected");
75         }
76     }
77 
78     xo_set_info(NULL, info, -1);
79     xo_set_flags(NULL, XOF_KEYS);
80 
81     xo_open_container_h(NULL, "top");
82 
83     xo_emit("static {:type/ethernet} {:type/bridge} {:type/%4du} {:type/%3d}",
84 	    18, 24);
85 
86     xo_emit("anchor {[:/%d}{:address/%p}..{:port/%u}{]:}\n", 18, NULL, 1);
87     xo_emit("anchor {[:18}{:address/%p}..{:port/%u}{]:}\n", NULL, 1);
88     xo_emit("anchor {[:/18}{:address/%p}..{:port/%u}{]:}\n", NULL, 1);
89 
90     xo_emit("df {:used-percent/%5.0f}{U:%%}\n", (double) 12);
91 
92     xo_emit("{e:kve_start/%#jx}", (uintmax_t) 0xdeadbeef);
93     xo_emit("{e:kve_end/%#jx}", (uintmax_t) 0xcabb1e);
94 
95     xo_emit("testing argument modifier {a:}.{a:}...\n",
96 	    "host", "my-box", "domain", "example.com");
97 
98     xo_emit("testing argument modifier with encoding to {ea:}.{a:}...\n",
99 	    "host", "my-box", "domain", "example.com");
100 
101     xo_emit("{La:} {a:}\n", "Label text", "label", "value");
102 
103     xo_emit_field("Vt", "max-chaos", NULL, NULL, "  very  ");
104     xo_emit_field("V", "min-chaos", "%d", NULL, 42);
105     xo_emit_field("V", "some-chaos", "%d\n", "[%d]", 42);
106 
107     xo_emit("Connecting to {:host}.{:domain}...\n", "my-box", "example.com");
108 
109     xo_attr("test", "value");
110     xo_open_container("data");
111     xo_open_list("item");
112     xo_attr("test2", "value2");
113 
114     xo_emit("{T:Item/%-10s}{T:Total Sold/%12s}{T:In Stock/%12s}"
115 	    "{T:On Order/%12s}{T:SKU/%5s}\n");
116 
117     for (ip = list; ip->i_title; ip++) {
118 	xo_open_instance("item");
119 	xo_attr("test3", "value3");
120 
121 	xo_emit("{keq:sku/%s-%u/%s-000-%u}"
122 		"{k:name/%-10s/%s}{n:sold/%12u/%u}{:in-stock/%12u/%u}"
123 		"{:on-order/%12u/%u}{qkd:sku/%5s-000-%u/%s-000-%u}\n",
124 		ip->i_sku_base, ip->i_sku_num,
125 		ip->i_title, ip->i_sold, ip->i_instock, ip->i_onorder,
126 		ip->i_sku_base, ip->i_sku_num);
127 
128 	xo_close_instance("item");
129     }
130 
131     xo_close_list("item");
132     xo_close_container("data");
133 
134     xo_emit("\n\n");
135 
136     xo_open_container("data2");
137     xo_open_list("item");
138 
139     for (ip = list; ip->i_title; ip++) {
140 	xo_open_instance("item");
141 
142 	xo_emit("{keq:sku/%s-%u/%s-000-%u}", ip->i_sku_base, ip->i_sku_num);
143 	xo_emit("{L:Item} '{k:name/%s}':\n", ip->i_title);
144 	xo_emit("{P:   }{L:Total sold}: {n:sold/%u%s}\n",
145 		ip->i_sold, ip->i_sold ? ".0" : "");
146 	xo_emit("{P:   }{Lcw:In stock}{:in-stock/%u}\n", ip->i_instock);
147 	xo_emit("{P:   }{Lcw:On order}{:on-order/%u}\n", ip->i_onorder);
148 	xo_emit("{P:   }{L:SKU}: {qkd:sku/%s-000-%u}\n",
149 		ip->i_sku_base, ip->i_sku_num);
150 
151 	xo_close_instance("item");
152     }
153 
154     xo_close_list("item");
155     xo_close_container("data2");
156 
157     xo_open_container("data3");
158     xo_open_list("item");
159 
160     for (ip = list2; ip->i_title; ip++) {
161 	xo_open_instance("item");
162 
163 	xo_emit("{keq:sku/%s-%u/%s-000-%u}", ip->i_sku_base, ip->i_sku_num);
164 	xo_emit("{L:Item} '{k:name/%s}':\n", ip->i_title);
165 	xo_emit("{P:   }{L:Total sold}: {n:sold/%u%s}\n",
166 		ip->i_sold, ip->i_sold ? ".0" : "");
167 	xo_emit("{P:   }{Lcw:In stock}{:in-stock/%u}\n", ip->i_instock);
168 	xo_emit("{P:   }{Lcw:On order}{:on-order/%u}\n", ip->i_onorder);
169 	xo_emit("{P:   }{L:SKU}: {qkd:sku/%s-000-%u}\n",
170 		ip->i_sku_base, ip->i_sku_num);
171 
172 	xo_close_instance("item");
173     }
174 
175     xo_close_list("item");
176     xo_close_container("data3");
177 
178     xo_open_container("data4");
179     xo_open_list("item");
180 
181     for (ip = list; ip->i_title; ip++) {
182 	xo_attr("test4", "value4");
183 	xo_emit("{Lwc:Item}{l:item}\n", ip->i_title);
184     }
185 
186     xo_close_list("item");
187     xo_close_container("data4");
188 
189     xo_emit("X{P:}X", "epic fail");
190     xo_emit("X{T:}X", "epic fail");
191     xo_emit("X{N:}X", "epic fail");
192     xo_emit("X{L:}X\n", "epic fail");
193 
194     xo_emit("X{P:        }X{Lwc:Cost}{:cost/%u}\n", 425);
195     xo_emit("X{P:/%30s}X{Lwc:Cost}{:cost/%u}\n", "", 455);
196 
197     xo_emit("{e:mode/%s}{e:mode_octal/%s} {t:links/%s} "
198 	    "{t:user/%s}  {t:group/%s}  \n",
199 	    "mode", "octal", "links",
200 	    "user", "group", "extra1", "extra2", "extra3");
201 
202     xo_emit("{e:pre/%s}{t:links/%-*u}{t:post/%-*s}\n", "that", 8, 3, 8, "this");
203 
204     xo_emit("{t:mode/%s}{e:mode_octal/%03o} {t:links/%*u} "
205 	    "{t:user/%-*s}  {t:group/%-*s}  \n",
206 	    "/some/file", (int) 0640, 8, 1,
207 	    10, "user", 12, "group");
208 
209     xo_close_container_h(NULL, "top");
210 
211     xo_finish();
212 
213     return 0;
214 }
215