| 1 | [ |
| 2 | "autonomous agent", |
| 3 | { |
| 4 | "init": "{ |
| 5 | $nom_AA = 'Portal'; |
| 6 | $versio = '0.1.2'; |
| 7 | |
| 8 | $_AUT_000 = 'C4KIJSUWVM7BGWTLXKX3K4PNRXV7OY4W'; |
| 9 | |
| 10 | $adr__ = trigger.address; |
| 11 | $args = trigger.data; |
| 12 | |
| 13 | $__bota = $txt => bounce ( $nom_AA || ' >>> ' || $txt ); |
| 14 | |
| 15 | if ( $args.proces == 'definicio_geto' OR $args.proces == 'esmena_generics' ) { |
| 16 | |
| 17 | $__arg = $arg => |
| 18 | $args[ $arg ] ? |
| 19 | $args[ $arg ] : |
| 20 | $__bota( "Cal proporcionar el valor de: " || $arg ); |
| 21 | |
| 22 | $ref = $__arg( 'ref' ); |
| 23 | $val = $__arg( 'val' ); |
| 24 | |
| 25 | |
| 26 | $__autoritzada = ( $x ) => { |
| 27 | $aut = var[ '_AUT_' || $x ]; |
| 28 | $aut AND $aut == $adr__ |
| 29 | }; |
| 30 | |
| 31 | |
| 32 | if ( $adr__ != $_AUT_000 |
| 33 | AND ! $__autoritzada( '0' ) |
| 34 | AND ! $__autoritzada( 'A' ) |
| 35 | AND ! $__autoritzada( 'B' ) |
| 36 | AND ! $__autoritzada( 'C' ) |
| 37 | ) { $__bota( 'No autoritzada' ); } |
| 38 | |
| 39 | |
| 40 | $es_AUT_000 = $adr__ == $_AUT_000; |
| 41 | if ( ! $es_AUT_000 OR ( $es_AUT_000 AND $__autoritzada( '0' ) ) ) { |
| 42 | |
| 43 | if ( $args.tasca == 'confirmacio' ) { |
| 44 | $proposta = var[ $args.id ]; |
| 45 | |
| 46 | |
| 47 | if ( ! $proposta ) |
| 48 | { $__bota( "No hi ha cap proposta de nou getó amb aquesta ref" ); } |
| 49 | |
| 50 | |
| 51 | if ( $proposta.proposant == $adr__ ) |
| 52 | { $__bota( "El procés de confirmació l'ha d'endegar una altra AUT" ); } |
| 53 | |
| 54 | |
| 55 | if ( var[ 'Lapse' ] > timestamp - $proposta.temps ) |
| 56 | { $__bota( "Encara no es pot confirmar la proposta" ); } |
| 57 | |
| 58 | |
| 59 | if ( ! var[ $args._Validacions ][ $args.id ] ) |
| 60 | { $__bota( "La proposta encara no ha estat validada" ); } |
| 61 | |
| 62 | $tasca = 'confirmacio'; |
| 63 | |
| 64 | } else { |
| 65 | |
| 66 | if ( var[ $ref ] AND var[ $ref ] == $val ) |
| 67 | { $__bota( "El valor proposat coincideix amb l'actual" ); } |
| 68 | |
| 69 | |
| 70 | $ord_darrera_prop = var[ 'ordinal_proposta_' || $ref ]; |
| 71 | $darrera_prop = var[ 'proposta_' || $ref || '_' || $ord_darrera_prop ]; |
| 72 | |
| 73 | if ( !! $darrera_prop AND $darrera_prop.val == $val ) |
| 74 | { $__bota( "El valor proposat coincideix amb el de la darrera proposta" ); } |
| 75 | |
| 76 | $ref_ordinal = 'ordinal_proposta_' || $ref; |
| 77 | $ordinal = var[ $ref_ordinal ]; |
| 78 | |
| 79 | $nou_ordinal = ! $ordinal ? 1 : $ordinal + 1; |
| 80 | |
| 81 | $tasca = 'proposta'; |
| 82 | } |
| 83 | } else { $tasca = 'drecera'; } |
| 84 | } |
| 85 | }", |
| 86 | "messages": { |
| 87 | "cases": [ |
| 88 | { |
| 89 | "if": "{ $args.proces == 'acces' }", |
| 90 | "init": "{ |
| 91 | $args._Portal = this_address; |
| 92 | $args._FOP = var[ '_FOP' ]; |
| 93 | $args._Estels = var[ '_Estels' ]; |
| 94 | |
| 95 | $args.geto = trigger.output[[ asset != base ]].asset; |
| 96 | $args.qt = trigger.output[[ asset = $args.geto ]]; |
| 97 | }", |
| 98 | "messages": [ |
| 99 | { |
| 100 | "app": "data", |
| 101 | "payload": "{ $args }" |
| 102 | }, |
| 103 | { |
| 104 | "app": "payment", |
| 105 | "payload": { |
| 106 | "asset": "{ $args.geto }", |
| 107 | "outputs": [ |
| 108 | { |
| 109 | "address": "{ var[ '_Acces' ] }", |
| 110 | "amount": "{ $args.qt }" |
| 111 | } |
| 112 | ] |
| 113 | } |
| 114 | } |
| 115 | ] |
| 116 | }, |
| 117 | { |
| 118 | "if": "{ $args.proces == 'esmena_generics' }", |
| 119 | "messages": [ |
| 120 | { |
| 121 | "app": "state", |
| 122 | "state": "{ |
| 123 | |
| 124 | if ( $es_AUT_000 AND ! var[ '_AUT_0' ] ) { |
| 125 | if ( $ref == 'multiple' ) { |
| 126 | |
| 127 | $generics = var[ 'Generics' ]; |
| 128 | |
| 129 | $__valvar = $refvar => |
| 130 | $args[ $refvar ] ? |
| 131 | $args[ $refvar ] : |
| 132 | $generics[ $refvar ]; |
| 133 | |
| 134 | var[ 'Generics' ] = { |
| 135 | _Acces: $__valvar( '_Acces' ), |
| 136 | _Getons: $__valvar( '_Getons' ), |
| 137 | _Validacions: $__valvar( '_Validacions' ), |
| 138 | _FRO: $__valvar( '_FRO' ), |
| 139 | _FOP: $__valvar( '_FOP' ), |
| 140 | _FDIP: $__valvar( '_FDIP' ), |
| 141 | _Estels: $__valvar( '_Estels' ), |
| 142 | Interval: $__valvar( 'Interval' ), |
| 143 | Lapse: $__valvar( 'Lapse' ), |
| 144 | _Transfer: $__valvar( '_Transfer' ), |
| 145 | _Capacitacio: $__valvar( '_Capacitacio' ), |
| 146 | _Avis: $__valvar( '_Avis' ), |
| 147 | Import_Activacio: $__valvar( 'Import_Activacio' ), |
| 148 | Import_Subscripcio: $__valvar( 'Import_Subscripcio' ), |
| 149 | Import_Renovacio: $__valvar( 'Import_Renovacio' ), |
| 150 | Taxa_Conversio: $__valvar( 'Taxa_Conversio' ), |
| 151 | Factor_Conversio: $__valvar( 'Factor_Conversio' ), |
| 152 | Cicles_Latencia: $__valvar( 'Cicles_Latencia' ), |
| 153 | _AUT_0: $__valvar( '_AUT_0' ), |
| 154 | _AUT_A: $__valvar( '_AUT_A' ), |
| 155 | _AUT_B: $__valvar( '_AUT_B' ), |
| 156 | _AUT_C: $__valvar( '_AUT_C' ), |
| 157 | }; |
| 158 | |
| 159 | response[ '_Acces' ] = $__valvar( '_Acces' ); |
| 160 | response[ '_Getons' ] = $__valvar( '_Getons' ); |
| 161 | response[ '_Validacions' ] = $__valvar( '_Validacions' ); |
| 162 | response[ '_FRO' ] = $__valvar( '_FRO' ); |
| 163 | response[ '_FOP' ] = $__valvar( '_FOP' ); |
| 164 | response[ '_FDIP' ] = $__valvar( '_FDIP' ); |
| 165 | response[ '_Estels' ] = $__valvar( 'id_Estels' ); |
| 166 | response[ 'Interval' ] = $__valvar( 'Interval' ); |
| 167 | response[ 'Lapse' ] = $__valvar( 'Lapse' ); |
| 168 | response[ '_Transfer' ] = $__valvar( '_Transfer' ); |
| 169 | response[ '_Capacitacio' ] = $__valvar( '_Capacitacio' ); |
| 170 | response[ '_Avis' ] = $__valvar( '_Avis' ); |
| 171 | response[ 'Import_Activacio' ] = $__valvar( 'Import_Activacio' ); |
| 172 | response[ 'Import_Subscripcio' ] = $__valvar( 'Import_Subscripcio' ); |
| 173 | response[ 'Import_Renovacio' ] = $__valvar( 'Import_Activacio' ); |
| 174 | response[ 'Taxa_Conversio' ] = $__valvar( 'Taxa_Conversio' ); |
| 175 | response[ 'Factor_Conversio' ] = $__valvar( 'Factor_Conversio' ); |
| 176 | response[ 'Cicles_Latencia' ] = $__valvar( 'Cicles_Latencia' ); |
| 177 | response[ '_AUT_0' ] = $__valvar( '_AUT_0' ); |
| 178 | response[ '_AUT_A' ] = $__valvar( '_AUT_A' ); |
| 179 | response[ '_AUT_B' ] = $__valvar( '_AUT_B' ); |
| 180 | response[ '_AUT_C' ] = $__valvar( '_AUT_C' ); |
| 181 | |
| 182 | } else { |
| 183 | var[ $ref ] = $val; |
| 184 | response[ 'nova ref' ] = $ref; |
| 185 | response[ 'nou val' ] = $val; |
| 186 | } |
| 187 | } else if ( $args.tasca == 'confirmacio' ) { |
| 188 | var[ $proposta.ref ] = $proposta.val; |
| 189 | response[ 'proposta' ] = $ref; |
| 190 | response[ 'nova ref' ] = $proposta.ref; |
| 191 | response[ 'nou val' ] = $proposta.val; |
| 192 | } else { |
| 193 | var[ $ref_ordinal ] = $nou_ordinal; |
| 194 | |
| 195 | $id_proposta = 'proposta_' || $ref || '_' || $nou_ordinal; |
| 196 | var[ $id_proposta ] = |
| 197 | { |
| 198 | ref: $ref, |
| 199 | val: $val, |
| 200 | ordinal: $nou_ordinal, |
| 201 | proposant: $adr__, |
| 202 | temps: timestamp, |
| 203 | }; |
| 204 | |
| 205 | response[ 'proposta' ] = $id_proposta; |
| 206 | response[ 'nova ref' ] = $ref; |
| 207 | response[ 'nou val' ] = $val; |
| 208 | response[ 'data proposta' ] = timestamp_to_string( timestamp ); |
| 209 | response[ 'data inici periode confirmació'] = |
| 210 | timestamp_to_string( timestamp + var[ 'Lapse' ] ); |
| 211 | } |
| 212 | }" |
| 213 | } |
| 214 | ] |
| 215 | }, |
| 216 | { |
| 217 | "if": "{ $args.proces == 'definicio_geto' }", |
| 218 | "messages": [ |
| 219 | { |
| 220 | "if": "{ $tasca != 'proposta' }", |
| 221 | "app": "asset", |
| 222 | "payload": { |
| 223 | "cap": "{ $args.cap otherwise 1e9 }", |
| 224 | "is_private": false, |
| 225 | "is_transferrable": true, |
| 226 | "auto_destroy": "{ !! $args.auto_destroy }", |
| 227 | "fixed_denominations": false, |
| 228 | "issued_by_definer_only": true, |
| 229 | "cosigned_by_definer": false, |
| 230 | "spender_attested": false |
| 231 | } |
| 232 | }, |
| 233 | { |
| 234 | "app": "state", |
| 235 | "state": "{ |
| 236 | if ( $tasca != 'confirmacio' ) { |
| 237 | $perfil = { |
| 238 | id : response_unit, |
| 239 | _FOG : $__arg( '_FOG' ), |
| 240 | _AUT_A : $__arg( '_AUT_A' ), |
| 241 | factor_conversio : $__arg( 'factor_conversio' ), |
| 242 | import_activacio : $__arg( 'import_activacio' ), |
| 243 | import_subscripcio : $__arg( 'import_subscripcio' ), |
| 244 | import_renovacio : $__arg( 'import_renovacio' ), |
| 245 | taxa_conversio : $__arg( 'taxa_conversio' ), |
| 246 | derivacio_aFOG : $__arg( 'derivacio_aFOG' ), |
| 247 | activacions_restringides : $__arg( 'activacions_restringides' ), |
| 248 | subscripcions_restringides : $__arg( 'subscripcions_restringides' ), |
| 249 | recepcions_restringides : $__arg( 'recepcions_restringides' ), |
| 250 | conversions_restringides : $__arg( 'conversions_restringides' ), |
| 251 | valors_esmenables : $__arg( 'valors_esmenables' ), |
| 252 | llistats_editables : $__arg( 'llistats_editables' ), |
| 253 | bloqueig_possible : $__arg( 'bloqueig_possible' ), |
| 254 | }; |
| 255 | } |
| 256 | if ( $tasca == 'drecera' ) { |
| 257 | $getons = var[ 'Getons' ]; |
| 258 | |
| 259 | $getons[ response_unit ] = |
| 260 | { |
| 261 | proposant: $adr__, |
| 262 | confirmant: $adr__, |
| 263 | temps: timestamp, |
| 264 | perfil: $perfil |
| 265 | }; |
| 266 | response[ 'Getó operatiu' ] = response_unit; |
| 267 | } |
| 268 | if ( $tasca == 'confirmacio' ) { |
| 269 | $prop = var[ $args.ref_proposta ]; |
| 270 | $getons = var[ 'Getons' ]; |
| 271 | |
| 272 | $getons[ response_unit ] = |
| 273 | { |
| 274 | proposant: $prop.proposant, |
| 275 | confirmant: $adr__, |
| 276 | temps: timestamp, |
| 277 | perfil: $prop.perfil |
| 278 | }; |
| 279 | response[ 'Getó operatiu' ] = $args.id; |
| 280 | } |
| 281 | if ( $tasca == 'proposta' ) { |
| 282 | $ref_proposta = 'nou_geto_' || $ordinal; |
| 283 | var[ $ref_proposta ] = |
| 284 | { |
| 285 | proposant: $adr__, |
| 286 | temps: timestamp, |
| 287 | perfil: $perfil |
| 288 | }; |
| 289 | response[ 'ref proposta' ] = $ref_proposta; |
| 290 | response[ 'data mínima per a la confirmació'] = |
| 291 | timestamp_to_string( timestamp + $args.lapse ); |
| 292 | } |
| 293 | response[ 'tasca' ] = $tasca; |
| 294 | }" |
| 295 | } |
| 296 | ] |
| 297 | }, |
| 298 | { |
| 299 | "if": "{ $args.proces == 'emissio_getons' }", |
| 300 | "messages": [ |
| 301 | { |
| 302 | "app": "payment", |
| 303 | "payload": { |
| 304 | "asset": "{trigger.data.asset}", |
| 305 | "outputs": [ |
| 306 | { |
| 307 | "address": "{trigger.address}", |
| 308 | "amount": "{trigger.data.amount}" |
| 309 | } |
| 310 | ] |
| 311 | } |
| 312 | } |
| 313 | ] |
| 314 | } |
| 315 | ] |
| 316 | } |
| 317 | } |
| 318 | ] |