1. 1
2. 2
3. 3
4. 4
5. 5
6. 6
7. 7
8. 8
9. 9
10. 10
11. 11
12. 12
13. 13
14. 14
15. 15
16. 16
17. 17
18. 18
19. 19
20. 20
21. 21
22. 22
23. 23
24. 24
25. 25
26. 26
27. 27
28. 28
29. 29
30. 30
31. 31
32. 32
33. 33
34. 34
35. 35
36. 36
37. 37
38. 38
39. 39
40. 40
41. 41
42. 42
43. 43
44. 44
45. 45
46. 46
47. 47
48. 48
49. 49
50. 50
51. 51
52. 52
53. 53
54. 54
55. 55
56. 56
57. 57
58. 58
59. 59
60. 60
61. 61
62. 62
63. 63
64. 64
65. 65
66. 66
67. 67
68. 68
69. 69
70. 70
71. 71
72. 72
73. 73
74. 74
75. 75
76. 76
77. 77
78. 78
79. 79
80. 80
81. 81
82. 82
83. 83
84. 84
85. 85
86. 86
87. 87
88. 88
89. 89
90. 90
91. 91
92. 92
93. 93
94. 94
95. 95
96. 96
97. 97
98. 98

import { Node } from "./types/Node.ts";
import { Parser, ParseText } from "./types/Parser.ts";

export const or = (parsers: Parser[]): Parser => {
  const { length } = parsers;

  return (text, position, rootParser) => {
    for (let i = 0; i < length; i++) {
      const match = parsers[i](text, position, rootParser);

      if (match) {
        return match;
      }
    }

    return null;
  };
};

export const oneOrMore = <A extends Node, B extends Node>(
  parser: Parser<A>,
  andThen: (nodes: readonly A[]) => B,
): Parser<B> => {
  const rec = (
    text: string,
    position: number,
    rootParser: ParseText,
  ): readonly NonNullable<ReturnType<typeof parser>>[] => {
    const match = parser(text, position, rootParser);
    if (!match) {
      return [];
    }

    const [, nextPosition] = match;

    return [match, ...rec(text, nextPosition, rootParser)];
  };

  return (text, position, rootParser) => {
    const ret = rec(text, position, rootParser);

    if (ret.length === 0) {
      return null;
    }

    const [, lastPosition] = ret[ret.length - 1];

    return [andThen(ret.map(([a]) => a)), lastPosition];
  };
};

export const regexp = <T extends Node = Node>(
  pattern: RegExp,
  callback: (
    match: string[],
    text: string,
    position: number,
    parseText: ParseText,
  ) => [T, number] | null,
): Parser<T> =>
(text, position, parseText) => {
  const match = text.substring(position).match(pattern);

  if (!match) {
    return null;
  }

  return callback(match, text, position, parseText);
};

export const explicit = (parser: Parser): Parser =>
(
  text,
  position,
  parseText,
) => {
  const prevChar = text.charAt(position - 1);

  if (prevChar && !prevChar.match(/[\s.,([{!?\-=]/)) {
    return null;
  }

  return parser(text, position, parseText);
};

export const topOfLine =
  <T extends Node = Node>(parser: Parser<T>): Parser<T> =>
  (
    text,
    position,
    parseText,
  ) => {
    if (position > 0 && text.charAt(position - 1) !== "\n") {
      return null;
    }

    return parser(text, position, parseText);
  };