getargs.c 3.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899
  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_SetError(i);
  59. NCDModuleInst_Backend_Dead(i);
  60. }
  61. static int func_getvar2 (void *vo, NCD_string_id_t name, NCDValMem *mem, NCDValRef *out)
  62. {
  63. struct instance *o = vo;
  64. if (name == NCD_STRING_EMPTY) {
  65. if (!NCDModuleInst_Backend_InterpGetArgs(o->i, mem, out)) {
  66. ModuleLog(o->i, BLOG_ERROR, "NCDModuleInst_Backend_InterpGetArgs failed");
  67. return 0;
  68. }
  69. return 1;
  70. }
  71. return 0;
  72. }
  73. static struct NCDModule modules[] = {
  74. {
  75. .type = "getargs",
  76. .func_new2 = func_new,
  77. .func_getvar2 = func_getvar2,
  78. .alloc_size = sizeof(struct instance)
  79. }, {
  80. .type = NULL
  81. }
  82. };
  83. const struct NCDModuleGroup ncdmodule_getargs = {
  84. .modules = modules
  85. };