Du kan inte välja fler än 25 ämnen Ämnen måste starta med en bokstav eller siffra, kan innehålla bindestreck ('-') och vara max 35 tecken långa.

93 rader
2.6 KiB

  1. // This file is part of Jiffy released under the MIT license.
  2. // See the LICENSE file for more information.
  3. #include "jiffy.h"
  4. static int
  5. load(ErlNifEnv* env, void** priv, ERL_NIF_TERM info)
  6. {
  7. jiffy_st* st = enif_alloc(sizeof(jiffy_st));
  8. if(st == NULL) {
  9. return 1;
  10. }
  11. st->atom_ok = make_atom(env, "ok");
  12. st->atom_error = make_atom(env, "error");
  13. st->atom_null = make_atom(env, "null");
  14. st->atom_true = make_atom(env, "true");
  15. st->atom_false = make_atom(env, "false");
  16. st->atom_bignum = make_atom(env, "bignum");
  17. st->atom_bignum_e = make_atom(env, "bignum_e");
  18. st->atom_bigdbl = make_atom(env, "bigdbl");
  19. st->atom_partial = make_atom(env, "partial");
  20. st->atom_uescape = make_atom(env, "uescape");
  21. st->atom_pretty = make_atom(env, "pretty");
  22. st->atom_force_utf8 = make_atom(env, "force_utf8");
  23. st->atom_iter = make_atom(env, "iter");
  24. st->atom_bytes_per_iter = make_atom(env, "bytes_per_iter");
  25. st->atom_bytes_per_red = make_atom(env, "bytes_per_red");
  26. st->atom_return_maps = make_atom(env, "return_maps");
  27. st->atom_return_trailer = make_atom(env, "return_trailer");
  28. st->atom_has_trailer = make_atom(env, "has_trailer");
  29. st->atom_nil = make_atom(env, "nil");
  30. st->atom_use_nil = make_atom(env, "use_nil");
  31. st->atom_null_term = make_atom(env, "null_term");
  32. st->atom_escape_forward_slashes = make_atom(env, "escape_forward_slashes");
  33. st->atom_dedupe_keys = make_atom(env, "dedupe_keys");
  34. st->atom_copy_strings = make_atom(env, "copy_strings");
  35. // Markers used in encoding
  36. st->ref_object = make_atom(env, "$object_ref$");
  37. st->ref_array = make_atom(env, "$array_ref$");
  38. st->res_dec = enif_open_resource_type(
  39. env,
  40. NULL,
  41. "decoder",
  42. dec_destroy,
  43. ERL_NIF_RT_CREATE | ERL_NIF_RT_TAKEOVER,
  44. NULL
  45. );
  46. st->res_enc = enif_open_resource_type(
  47. env,
  48. NULL,
  49. "encoder",
  50. enc_destroy,
  51. ERL_NIF_RT_CREATE | ERL_NIF_RT_TAKEOVER,
  52. NULL
  53. );
  54. *priv = (void*) st;
  55. return 0;
  56. }
  57. static int
  58. reload(ErlNifEnv* env, void** priv, ERL_NIF_TERM info)
  59. {
  60. return 0;
  61. }
  62. static int
  63. upgrade(ErlNifEnv* env, void** priv, void** old_priv, ERL_NIF_TERM info)
  64. {
  65. return load(env, priv, info);
  66. }
  67. static void
  68. unload(ErlNifEnv* env, void* priv)
  69. {
  70. enif_free(priv);
  71. return;
  72. }
  73. static ErlNifFunc funcs[] =
  74. {
  75. {"nif_decode_init", 2, decode_init},
  76. {"nif_decode_iter", 5, decode_iter},
  77. {"nif_encode_init", 2, encode_init},
  78. {"nif_encode_iter", 3, encode_iter}
  79. };
  80. ERL_NIF_INIT(jiffy, funcs, &load, &reload, &upgrade, &unload);