|
| 1 | +package interpreter |
| 2 | + |
| 3 | +import ( |
| 4 | + "math/big" |
| 5 | + |
| 6 | + "github.com/formancehq/numscript/internal/flags" |
| 7 | + "github.com/formancehq/numscript/internal/parser" |
| 8 | +) |
| 9 | + |
| 10 | +func overdraft( |
| 11 | + s *programState, |
| 12 | + r parser.Range, |
| 13 | + args []Value, |
| 14 | +) (*Monetary, InterpreterError) { |
| 15 | + err := s.checkFeatureFlag(flags.ExperimentalOverdraftFunctionFeatureFlag) |
| 16 | + if err != nil { |
| 17 | + return nil, err |
| 18 | + } |
| 19 | + |
| 20 | + // TODO more precise args range location |
| 21 | + p := NewArgsParser(args) |
| 22 | + account := parseArg(p, r, expectAccount) |
| 23 | + asset := parseArg(p, r, expectAsset) |
| 24 | + err = p.parse() |
| 25 | + if err != nil { |
| 26 | + return nil, err |
| 27 | + } |
| 28 | + |
| 29 | + balance_, err := getBalance(s, *account, *asset) |
| 30 | + if err != nil { |
| 31 | + return nil, err |
| 32 | + } |
| 33 | + |
| 34 | + balanceIsPositive := balance_.Cmp(big.NewInt(0)) == 1 |
| 35 | + if balanceIsPositive { |
| 36 | + return &Monetary{ |
| 37 | + Amount: NewMonetaryInt(0), |
| 38 | + Asset: Asset(*asset), |
| 39 | + }, nil |
| 40 | + } |
| 41 | + |
| 42 | + overdraft := new(big.Int).Neg(balance_) |
| 43 | + return &Monetary{ |
| 44 | + Amount: MonetaryInt(*overdraft), |
| 45 | + Asset: Asset(*asset), |
| 46 | + }, nil |
| 47 | +} |
| 48 | + |
| 49 | +func meta( |
| 50 | + s *programState, |
| 51 | + rng parser.Range, |
| 52 | + args []Value, |
| 53 | +) (string, InterpreterError) { |
| 54 | + // TODO more precise location |
| 55 | + p := NewArgsParser(args) |
| 56 | + account := parseArg(p, rng, expectAccount) |
| 57 | + key := parseArg(p, rng, expectString) |
| 58 | + err := p.parse() |
| 59 | + if err != nil { |
| 60 | + return "", err |
| 61 | + } |
| 62 | + |
| 63 | + meta, fetchMetaErr := s.Store.GetAccountsMetadata(s.ctx, MetadataQuery{ |
| 64 | + *account: []string{*key}, |
| 65 | + }) |
| 66 | + if fetchMetaErr != nil { |
| 67 | + return "", QueryMetadataError{WrappedError: fetchMetaErr} |
| 68 | + } |
| 69 | + s.CachedAccountsMeta = meta |
| 70 | + |
| 71 | + // body |
| 72 | + accountMeta := s.CachedAccountsMeta[*account] |
| 73 | + value, ok := accountMeta[*key] |
| 74 | + |
| 75 | + if !ok { |
| 76 | + return "", MetadataNotFound{Account: *account, Key: *key, Range: rng} |
| 77 | + } |
| 78 | + |
| 79 | + return value, nil |
| 80 | +} |
| 81 | + |
| 82 | +func balance( |
| 83 | + s *programState, |
| 84 | + r parser.Range, |
| 85 | + args []Value, |
| 86 | +) (*Monetary, InterpreterError) { |
| 87 | + // TODO more precise args range location |
| 88 | + p := NewArgsParser(args) |
| 89 | + account := parseArg(p, r, expectAccount) |
| 90 | + asset := parseArg(p, r, expectAsset) |
| 91 | + err := p.parse() |
| 92 | + if err != nil { |
| 93 | + return nil, err |
| 94 | + } |
| 95 | + |
| 96 | + // body |
| 97 | + |
| 98 | + balance, err := getBalance(s, *account, *asset) |
| 99 | + if err != nil { |
| 100 | + return nil, err |
| 101 | + } |
| 102 | + |
| 103 | + if balance.Cmp(big.NewInt(0)) == -1 { |
| 104 | + return nil, NegativeBalanceError{ |
| 105 | + Account: *account, |
| 106 | + Amount: *balance, |
| 107 | + } |
| 108 | + } |
| 109 | + |
| 110 | + balanceCopy := new(big.Int).Set(balance) |
| 111 | + |
| 112 | + m := Monetary{ |
| 113 | + Asset: Asset(*asset), |
| 114 | + Amount: MonetaryInt(*balanceCopy), |
| 115 | + } |
| 116 | + return &m, nil |
| 117 | +} |
| 118 | + |
| 119 | +func getAsset( |
| 120 | + s *programState, |
| 121 | + r parser.Range, |
| 122 | + args []Value, |
| 123 | +) (Value, InterpreterError) { |
| 124 | + err := s.checkFeatureFlag(flags.ExperimentalGetAssetFunctionFeatureFlag) |
| 125 | + if err != nil { |
| 126 | + return nil, err |
| 127 | + } |
| 128 | + |
| 129 | + p := NewArgsParser(args) |
| 130 | + mon := parseArg(p, r, expectMonetary) |
| 131 | + err = p.parse() |
| 132 | + if err != nil { |
| 133 | + return nil, err |
| 134 | + } |
| 135 | + |
| 136 | + return mon.Asset, nil |
| 137 | +} |
| 138 | + |
| 139 | +func getAmount( |
| 140 | + s *programState, |
| 141 | + r parser.Range, |
| 142 | + args []Value, |
| 143 | +) (Value, InterpreterError) { |
| 144 | + err := s.checkFeatureFlag(flags.ExperimentalGetAmountFunctionFeatureFlag) |
| 145 | + if err != nil { |
| 146 | + return nil, err |
| 147 | + } |
| 148 | + |
| 149 | + p := NewArgsParser(args) |
| 150 | + mon := parseArg(p, r, expectMonetary) |
| 151 | + err = p.parse() |
| 152 | + if err != nil { |
| 153 | + return nil, err |
| 154 | + } |
| 155 | + |
| 156 | + return mon.Amount, nil |
| 157 | +} |
0 commit comments