getargs.c 3.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293
  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. static void func_new (void *unused, NCDModuleInst *i, const struct NCDModuleInst_new_params *params)
  43. {
  44. NCDModuleInst_Backend_SetUser(i, i);
  45. // check arguments
  46. if (!NCDVal_ListRead(params->args, 0)) {
  47. ModuleLog(i, BLOG_ERROR, "wrong arity");
  48. goto fail0;
  49. }
  50. // signal up
  51. NCDModuleInst_Backend_Up(i);
  52. return;
  53. fail0:
  54. NCDModuleInst_Backend_SetError(i);
  55. NCDModuleInst_Backend_Dead(i);
  56. }
  57. static int func_getvar2 (void *vo, NCD_string_id_t name, NCDValMem *mem, NCDValRef *out)
  58. {
  59. NCDModuleInst *i = vo;
  60. if (name == NCD_STRING_EMPTY) {
  61. if (!NCDModuleInst_Backend_InterpGetArgs(i, mem, out)) {
  62. ModuleLog(i, BLOG_ERROR, "NCDModuleInst_Backend_InterpGetArgs failed");
  63. return 0;
  64. }
  65. return 1;
  66. }
  67. return 0;
  68. }
  69. static struct NCDModule modules[] = {
  70. {
  71. .type = "getargs",
  72. .func_new2 = func_new,
  73. .func_getvar2 = func_getvar2
  74. }, {
  75. .type = NULL
  76. }
  77. };
  78. const struct NCDModuleGroup ncdmodule_getargs = {
  79. .modules = modules
  80. };