contrib/libxo/tests/core/test_01.c

   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("anchor {[:/%d}{:address/%p}..{:port/%u}{]:}\n", 18, NULL, 1);
  84     xo_emit("anchor {[:18}{:address/%p}..{:port/%u}{]:}\n", NULL, 1);
  85     xo_emit("anchor {[:/18}{:address/%p}..{:port/%u}{]:}\n", NULL, 1);
  86
  87     xo_emit("df {:used-percent/%5.0f}{U:%%}\n", (double) 12);
  88
  89     xo_emit("{e:kve_start/%#jx}", (uintmax_t) 0xdeadbeef);
  90     xo_emit("{e:kve_end/%#jx}", (uintmax_t) 0xcabb1e);
  91
  92     xo_emit("testing argument modifier {a:}.{a:}...\n",
  93             "host", "my-box", "domain", "example.com");
  94
  95     xo_emit("testing argument modifier with encoding to {ea:}.{a:}...\n",
  96             "host", "my-box", "domain", "example.com");
  97
  98     xo_emit("{La:} {a:}\n", "Label text", "label", "value");
  99
 100     xo_emit_field("Vt", "max-chaos", NULL, NULL, "  very  ");
 101     xo_emit_field("V", "min-chaos", "%d", NULL, 42);
 102     xo_emit_field("V", "some-chaos", "%d\n", "[%d]", 42);
 103
 104     xo_emit("Connecting to {:host}.{:domain}...\n", "my-box", "example.com");
 105
 106     xo_attr("test", "value");
 107     xo_open_container("data");
 108     xo_open_list("item");
 109     xo_attr("test2", "value2");
 110
 111     xo_emit("{T:Item/%-10s}{T:Total Sold/%12s}{T:In Stock/%12s}"
 112             "{T:On Order/%12s}{T:SKU/%5s}\n");
 113
 114     for (ip = list; ip->i_title; ip++) {
 115         xo_open_instance("item");
 116         xo_attr("test3", "value3");
 117
 118         xo_emit("{keq:sku/%s-%u/%s-000-%u}"
 119                 "{k:name/%-10s/%s}{n:sold/%12u/%u}{:in-stock/%12u/%u}"
 120                 "{:on-order/%12u/%u}{qkd:sku/%5s-000-%u/%s-000-%u}\n",
 121                 ip->i_sku_base, ip->i_sku_num,
 122                 ip->i_title, ip->i_sold, ip->i_instock, ip->i_onorder,
 123                 ip->i_sku_base, ip->i_sku_num);
 124
 125         xo_close_instance("item");
 126     }
 127
 128     xo_close_list("item");
 129     xo_close_container("data");
 130
 131     xo_emit("\n\n");
 132
 133     xo_open_container("data2");
 134     xo_open_list("item");
 135
 136     for (ip = list; ip->i_title; ip++) {
 137         xo_open_instance("item");
 138
 139         xo_emit("{keq:sku/%s-%u/%s-000-%u}", ip->i_sku_base, ip->i_sku_num);
 140         xo_emit("{L:Item} '{k:name/%s}':\n", ip->i_title);
 141         xo_emit("{P:   }{L:Total sold}: {n:sold/%u%s}\n",
 142                 ip->i_sold, ip->i_sold ? ".0" : "");
 143         xo_emit("{P:   }{Lcw:In stock}{:in-stock/%u}\n", ip->i_instock);
 144         xo_emit("{P:   }{Lcw:On order}{:on-order/%u}\n", ip->i_onorder);
 145         xo_emit("{P:   }{L:SKU}: {qkd:sku/%s-000-%u}\n",
 146                 ip->i_sku_base, ip->i_sku_num);
 147
 148         xo_close_instance("item");
 149     }
 150
 151     xo_close_list("item");
 152     xo_close_container("data2");
 153
 154     xo_open_container("data3");
 155     xo_open_list("item");
 156
 157     for (ip = list2; ip->i_title; ip++) {
 158         xo_open_instance("item");
 159
 160         xo_emit("{keq:sku/%s-%u/%s-000-%u}", ip->i_sku_base, ip->i_sku_num);
 161         xo_emit("{L:Item} '{k:name/%s}':\n", ip->i_title);
 162         xo_emit("{P:   }{L:Total sold}: {n:sold/%u%s}\n",
 163                 ip->i_sold, ip->i_sold ? ".0" : "");
 164         xo_emit("{P:   }{Lcw:In stock}{:in-stock/%u}\n", ip->i_instock);
 165         xo_emit("{P:   }{Lcw:On order}{:on-order/%u}\n", ip->i_onorder);
 166         xo_emit("{P:   }{L:SKU}: {qkd:sku/%s-000-%u}\n",
 167                 ip->i_sku_base, ip->i_sku_num);
 168
 169         xo_close_instance("item");
 170     }
 171
 172     xo_close_list("item");
 173     xo_close_container("data3");
 174
 175     xo_open_container("data4");
 176     xo_open_list("item");
 177
 178     for (ip = list; ip->i_title; ip++) {
 179         xo_attr("test4", "value4");
 180         xo_emit("{Lwc:Item}{l:item}\n", ip->i_title);
 181     }
 182
 183     xo_close_list("item");
 184     xo_close_container("data4");
 185
 186     xo_emit("X{P:}X", "epic fail");
 187     xo_emit("X{T:}X", "epic fail");
 188     xo_emit("X{N:}X", "epic fail");
 189     xo_emit("X{L:}X\n", "epic fail");
 190
 191     xo_emit("X{P:        }X{Lwc:Cost}{:cost/%u}\n", 425);
 192     xo_emit("X{P:/%30s}X{Lwc:Cost}{:cost/%u}\n", "", 455);
 193
 194     xo_emit("{e:mode/%s}{e:mode_octal/%s} {t:links/%s} "
 195             "{t:user/%s}  {t:group/%s}  \n",
 196             "mode", "octal", "links",
 197             "user", "group", "extra1", "extra2", "extra3");
 198
 199     xo_emit("{e:pre/%s}{t:links/%-*u}{t:post/%-*s}\n", "that", 8, 3, 8, "this");
 200
 201     xo_emit("{t:mode/%s}{e:mode_octal/%03o} {t:links/%*u} "
 202             "{t:user/%-*s}  {t:group/%-*s}  \n",
 203             "/some/file", (int) 0640, 8, 1,
 204             10, "user", 12, "group");
 205
 206     xo_close_container_h(NULL, "top");
 207
 208     xo_finish();
 209
 210     return 0;
 211 }