getargs.c 3.0 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798
  1. /**
  2. * @file getargs.c
  3. * @author Ambroz Bizjak <ambrop7@gmail.com>
  4. *
  5. * @section LICENSE
  6. *
  7. * Redistribution and use in source and binary forms, with or without
  8. * modification, are permitted provided that the following conditions are met:
  9. * 1. Redistributions of source code must retain the above copyright
  10. * notice, this list of conditions and the following disclaimer.
  11. * 2. 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. * 3. Neither the name of the author nor the
  15. * names of its contributors may be used to endorse or promote products
  16. * derived from this software without specific prior written permission.
  17. *
  18. * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
  19. * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
  20. * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
  21. * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
  22. * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
  23. * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
  24. * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
  25. * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  26. * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
  27. * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  28. *
  29. * @section DESCRIPTION
  30. *
  31. * Synopsis:
  32. * getargs()
  33. *
  34. * Variables:
  35. * (empty) - list of extra command line arguments that were passed to the intrepreter
  36. */
  37. #include <string.h>
  38. #include <ncd/NCDModule.h>
  39. #include <ncd/static_strings.h>
  40. #include <generated/blog_channel_ncd_getargs.h>
  41. #define ModuleLog(i, ...) NCDModuleInst_Backend_Log((i), BLOG_CURRENT_CHANNEL, __VA_ARGS__)
  42. struct instance {
  43. NCDModuleInst *i;
  44. };
  45. static void func_new (void *vo, NCDModuleInst *i, const struct NCDModuleInst_new_params *params)
  46. {
  47. struct instance *o = vo;
  48. o->i = i;
  49. // check arguments
  50. if (!NCDVal_ListRead(params->args, 0)) {
  51. ModuleLog(i, BLOG_ERROR, "wrong arity");
  52. goto fail0;
  53. }
  54. // signal up
  55. NCDModuleInst_Backend_Up(i);
  56. return;
  57. fail0:
  58. NCDModuleInst_Backend_DeadError(i);
  59. }
  60. static int func_getvar2 (void *vo, NCD_string_id_t name, NCDValMem *mem, NCDValRef *out)
  61. {
  62. struct instance *o = vo;
  63. if (name == NCD_STRING_EMPTY) {
  64. if (!NCDModuleInst_Backend_InterpGetArgs(o->i, mem, out)) {
  65. ModuleLog(o->i, BLOG_ERROR, "NCDModuleInst_Backend_InterpGetArgs failed");
  66. return 0;
  67. }
  68. return 1;
  69. }
  70. return 0;
  71. }
  72. static struct NCDModule modules[] = {
  73. {
  74. .type = "getargs",
  75. .func_new2 = func_new,
  76. .func_getvar2 = func_getvar2,
  77. .alloc_size = sizeof(struct instance)
  78. }, {
  79. .type = NULL
  80. }
  81. };
  82. const struct NCDModuleGroup ncdmodule_getargs = {
  83. .modules = modules
  84. };