uspace/app/bithenge/test.c

   1 /*
   2  * Copyright (c) 2012 Sean Bartell
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  *
   9  * - Redistributions of source code must retain the above copyright
  10  *   notice, this list of conditions and the following disclaimer.
  11  * - Redistributions in binary form must reproduce the above copyright
  12  *   notice, this list of conditions and the following disclaimer in the
  13  *   documentation and/or other materials provided with the distribution.
  14  * - The name of the author may not be used to endorse or promote products
  15  *   derived from this software without specific prior written permission.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  20  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  27  */
  28
  29 /** @addtogroup bithenge
  30  * @{
  31  */
  32 /**
  33  * @file
  34  * Simple program to test Bithenge.
  35  */
  36
  37 #include <errno.h>
  38 #include <stdio.h>
  39 #include <stdlib.h>
  40 #include <sys/types.h>
  41 #include <bithenge/blob.h>
  42 #include <bithenge/source.h>
  43 #include <bithenge/print.h>
  44 #include <bithenge/script.h>
  45 #include <bithenge/transform.h>
  46 #include <bithenge/tree.h>
  47
  48 int main(int argc, char *argv[])
  49 {
  50         int rc;
  51         if (argc < 3) {
  52                 fprintf(stderr, "Usage: %s <script> <source>\n", argv[0]);
  53                 return 1;
  54         } else {
  55                 bithenge_scope_t *scope = NULL;
  56                 bithenge_transform_t *transform = NULL;
  57                 bithenge_node_t *node = NULL, *node2 = NULL;
  58
  59                 rc = bithenge_scope_new(&scope, NULL);
  60                 if (rc != EOK) {
  61                         printf("Error creating scope: %s\n", str_error(rc));
  62                         scope = NULL;
  63                         goto error;
  64                 }
  65
  66                 rc = bithenge_parse_script(argv[1], &transform);
  67                 if (rc != EOK) {
  68                         printf("Error parsing script: %s\n", str_error(rc));
  69                         transform = NULL;
  70                         goto error;
  71                 }
  72
  73                 rc = bithenge_node_from_source(&node, argv[2]);
  74                 if (rc != EOK) {
  75                         printf("Error creating node from source: %s\n", str_error(rc));
  76                         node = NULL;
  77                         goto error;
  78                 }
  79
  80                 rc = bithenge_transform_apply(transform, scope, node, &node2);
  81                 if (rc != EOK) {
  82                         const char *message = bithenge_scope_get_error(scope);
  83                         printf("Error applying transform: %s\n",
  84                             message ? message : str_error(rc));
  85                         node2 = NULL;
  86                         goto error;
  87                 }
  88
  89                 bithenge_node_dec_ref(node);
  90                 node = NULL;
  91                 bithenge_transform_dec_ref(transform);
  92                 transform = NULL;
  93
  94                 rc = bithenge_print_node(BITHENGE_PRINT_PYTHON, node2);
  95                 if (rc != EOK) {
  96                         const char *message = bithenge_scope_get_error(scope);
  97                         printf("Error printing node: %s\n",
  98                             message ? message : str_error(rc));
  99                         goto error;
 100                 }
 101                 bithenge_node_dec_ref(node2);
 102                 node2 = NULL;
 103                 bithenge_scope_dec_ref(scope);
 104                 scope = NULL;
 105                 printf("\n");
 106
 107                 return 0;
 108
 109 error:
 110                 bithenge_node_dec_ref(node);
 111                 bithenge_node_dec_ref(node2);
 112                 bithenge_transform_dec_ref(transform);
 113                 bithenge_scope_dec_ref(scope);
 114                 return 1;
 115         }
 116
 117         return 0;
 118 }
 119
 120 /** @}
 121  */