FSharp.Data.GraphQL/src/FSharp.Data.GraphQL.Server.Middleware/FilterSuffixConstants.fs at 95c1cbefc13603dfd12979c2aac81aa50b963161 · fsprojects/FSharp.Data.GraphQL · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
/// <summary>
/// String filter suffixes:
///   lowercase (e.g. _ends_with, _ew)   → case-insensitive (OrdinalIgnoreCase)
///   Capitalized (e.g. _Ends_With, _EW) → case-sensitive (Ordinal)
/// <para>
/// The <see cref="CI"/> submodule contains lowercase suffixes that map to case-insensitive string comparisons.
/// The <see cref="CS"/> submodule contains capitalized/uppercase suffixes that map to case-sensitive string comparisons.
/// Numeric and comparison operator suffixes are defined at the module level and are case-insensitive by convention.
/// </para>
/// </summary>
[<RequireQualifiedAccess>]
module FSharp.Data.GraphQL.Server.Middleware.FilterSuffixConstants

// Numeric/comparison operators
[<Literal>]
let GreaterThanOrEqualSuffix = "_greater_than_or_equal"
[<Literal>]
let GTESuffix = "_gte"
[<Literal>]
let GreaterThanSuffix = "_greater_than"
[<Literal>]
let GTSuffix = "_gt"
[<Literal>]
let LessThanOrEqualSuffix = "_less_than_or_equal"
[<Literal>]
let LTESuffix = "_lte"
[<Literal>]
let LessThanSuffix = "_less_than"
[<Literal>]
let LTSuffix = "_lt"
[<Literal>]
let InSuffix = "_in"

/// Case-insensitive string operators (lowercase suffixes → OrdinalIgnoreCase)
module CI =
    // String operators (case-insensitive)
    [<Literal>]
    let EndsWithSuffix = "_ends_with"
    [<Literal>]
    let EWSuffix = "_ew"
    [<Literal>]
    let StartsWithSuffix = "_starts_with"
    [<Literal>]
    let SWSuffix = "_sw"
    [<Literal>]
    let ContainsSuffix = "_contains"
    [<Literal>]
    let EqualsSuffix = "_equals"
    [<Literal>]
    let EQSuffix = "_eq"

/// Case-sensitive string operators
module CS =
    [<Literal>]
    let EndsWithSuffix = "_Ends_With"
    [<Literal>]
    let EWSuffix = "_EW"
    [<Literal>]
    let StartsWithSuffix = "_Starts_With"
    [<Literal>]
    let SWSuffix = "_SW"
    [<Literal>]
    let ContainsSuffix = "_Contains"
    [<Literal>]
    let EqualsSuffix = "_Equals"
    [<Literal>]
    let EQSuffix = "_EQ"