[
"autonomous agent",
{
"init": "{
$nom_AA = 'Validacions';
// Portal
//$_Portal = '5WVBJQHTEP54AEYUJGTQKWTXTXZSJQWA';
$_Portal = trigger.address; // * només x tests
if ( $_Portal != trigger.address ) bounce ( 'Portal no reconegut' );
// Principals
$args = trigger.data;
$adr__ = trigger.initial_address;
$_unitat = trigger.output[[ asset != base ]].asset;
$qt = 10; // Pendent de definició!!!
$proces = $args.proces;
$idprop = $args.idprop;
$entitats = var[ $_Portal ][ 'entitats' ] otherwise {};
// Funcions
$__dada = $refval =>
data_feed[[ oracles = $args._Registre, feed_name = $refval, ifnone = false ]];
$__arg = $arg =>
$args[ $arg ] otherwise
bounce ( "Cal proporcionar el valor de: " || $arg );
// Comprovacions
// La proposta encara no pot estar validada
if ( $__dada( 'validacio_' || $idprop ) )
{ bounce( 'Ja validada' ); }
// La proposta ha d'existir
if ( ! $__dada( $idprop ) )
{ bounce( 'No hi ha cap proposta amb aquesta id' ); }
// Processos
if ( $proces == 'convocatoria_validadores' ) {
$convocs = [ 1, 2, 3, 4, 5, 6 ];
$nombre_isox = $__dada( 'darrer_isox' );
$ordinal_base = number_from_seed( timestamp, $nombre_isox );
$__isox_aleatori = $x => {
$ord_isox_aleatori =
$ordinal_base + $x > $nombre_isox ?
$ordinal_base + $x - $nombre_isox :
$ordinal_base + $x;
$isox_seleccionat = $__dada( 'isox_' || $ord_isox_aleatori );
$isox_seleccionat AND $__dada( 'isox_' || $ord_isox_aleatori ) == 'habilitat' ?
$isox_seleccionat : ''
};
$preseleccio_isox = map( $convocs, 5, $__isox_aleatori );
$seleccio_isox =
array_length( $preseleccio_isox ) < 10 ?
$preseleccio_isox :
$preseleccio_isox || map( $convocs, 5, $__isox_aleatori );
$__entitat_aleatoria = $x => {
$ord_entitat_aleatoria =
number_from_seed( timestamp, $__dada( 'ordinal_entitat' ) );
$ref_entitat = $__dada( 'ordinal_entitat_' || $ord_entitat_aleatoria );
$_entitat = $__dada( $ref_entitat || '_adr' );
$__dada( $ref_entitat || '_estat' ) == 'operatiu' ?
$_entitat : ''
};
$preseleccio_entitats = map( $convocs, 5, $__entitat_aleatoria );
$seleccio_entitats =
array_length( $preseleccio_entitats ) < 10 ?
$preseleccio_entitats :
$preseleccio_entitats || map( $convocs, 5, $__entitat_aleatoria );
$__delegada_aleatoria = $x => {
$ord_delegada_aleatoria =
number_from_seed( timestamp, $__dada( 'Nombre_Delegades' ) );
$seleccio_entitats[ $ord_delegada_aleatoria ]
};
$seleccio_delegades = map( $seleccio_entitats, 6, $__delegada_aleatoria );
$nova_convocatoria = {
isox: $seleccio_isox,
delegades: $seleccio_delegades,
temps: timestamp
};
}
if ( $proces == 'decisio_validacio' ) {
$convocatoria = var[ 'convocatoria_' || $idprop ];
$validacio = $__dada( 'validacio_' || $idprop );
$deliberacio = var[ 'deliberacio_' || $idprop ];
$refus = $__dada( 'refus_' || $idprop );
$dades = {};
// La convocatoria ha d'existir
if ( ! $convocatoria )
{ bounce( 'No hi ha cap convocatoria amb aquesta id' ); }
// Tractament proposta encara pendent
if ( $validacio OR $refus )
{ bounce( 'Aquesta proposta ja ha estat tractada' ); }
$_isox = $convocatoria.isox[ $adr__ ] ? $adr__ : false;
$_delegada = $convocatoria.delegades[ $adr__ ] ? $adr__ : false;
// adr__ actuant ha estat convocada
if ( ! $_isox AND ! $_delegada )
{ bounce( 'Adreça no convocada' ); }
// adr__ actuant pendent decisió
if (
$deliberacio.isox.aprovacions[ $adr__ ] OR
$deliberacio.delegades.aprovacions[ $adr__ ] )
{ bounce( "Ja hi consta una decisió d'aquesta adreça per a aquesta proposta" ); }
$grup = $_isox ? 'isox' : $_delegada ? 'delegades' : bounce( 'error' );
// Deliberació pendent
if ( $deliberacio[ $grup ].refusada OR $deliberacio[ $grup ].aprovada )
{ bounce( 'Deliberacio de ' || $grup || ' ja enllestida' ); }
if ( $__arg( 'decisio' ) == 'refusada' ) {
$deliberacio[ $grup ].refus = $adr__;
$deliberacio[ $grup ].refusada = timestamp;
$dades[ 'refus_' || $idprop ] = timestamp;
}
if ( $__arg( 'decisio' ) == 'aprovada' ) {
$deliberacio[ $grup ].aprovacions[] = $adr__;
$resp = 'aprovada per' || $adr__;
$nombre_aprovacions = $deliberacio[ $grup ].aprovacions;
if ( array_length( $nombre_aprovacions == $__dada( 'Nombre_Aprovacions' ))) {
$deliberacio[ $grup ].aprovada = timestamp;
}
}
if ( $deliberacio.isox.aprovada AND $deliberacio.delegades.aprovada ) {
$dades[ 'validacio_' || $idprop ] = timestamp;
}
}
// Temporalment, per als TESTS!!!...............................
if ( $proces == 'validacio_directa_TEST' ) {
$dades[ 'validacio_' || $idprop ] = timestamp;
}
$registre = {};
$registre.dades = $dades;
$outputs = [
{
address : $args._Registre,
amount : $qt
},
{
address : $args._Portal,
amount : $qt + 2
}
];
}",
"messages": [
{
"app": "data",
"payload": "{ $registre }"
},
{
"app": "payment",
"payload": {
"asset": "base",
"outputs": [
{
"address": "{ $args._Registre }",
"amount": "{ $__dada( 'Provisio' ) }"
}
]
}
},
{
"if": "{ $proces == 'test_outputs' }",
"app": "payment",
"payload": {
"asset": "{ 'base' }",
"outputs": [
"{ $outputs[0] }"
]
}
},
{
"if": "{ $proces == 'convocatoria_validadores' }",
"app": "payment",
"payload": {
"asset": "{ $_unitat }",
"outputs": [
{
"if": "{ $seleccio_isox[0] }",
"address": "{ $seleccio_isox[0] }",
"amount": "{ $qt }"
},
{
"if": "{ $seleccio_isox[1] }",
"address": "{ $seleccio_isox[1] }",
"amount": "{ $qt }"
},
{
"if": "{ $seleccio_isox[2] }",
"address": "{ $seleccio_isox[2] }",
"amount": "{ $qt }"
},
{
"if": "{ $seleccio_isox[3] }",
"address": "{ $seleccio_isox[3] }",
"amount": "{ $qt }"
},
{
"if": "{ $seleccio_isox[4] }",
"address": "{ $seleccio_isox[4] }",
"amount": "{ $qt }"
},
{
"if": "{ $seleccio_isox[5] }",
"address": "{ $seleccio_isox[5] }",
"amount": "{ $qt }"
},
{
"if": "{ $seleccio_isox[6] }",
"address": "{ $seleccio_isox[6] }",
"amount": "{ $qt }"
},
{
"if": "{ $seleccio_isox[7] }",
"address": "{ $seleccio_isox[7] }",
"amount": "{ $qt }"
},
{
"if": "{ $seleccio_isox[8] }",
"address": "{ $seleccio_isox[8] }",
"amount": "{ $qt }"
},
{
"if": "{ $seleccio_isox[9] }",
"address": "{ $seleccio_isox[9] }",
"amount": "{ $qt }"
}
]
}
},
{
"app": "state",
"state": "{
response[ 'Procés' ] = $proces;
response[ 'Proposta' ] = $idprop;
if ( $nova_convocatoria ) {
var[ 'convocatoria_' || $idprop ] = $nova_convocatoria;
}
if ( $proces == 'decisio_validacio' ) {
response[ 'Validació' ] =
$__arg( 'decisio' ) || ' per ' || $adr__;
if ( $deliberacio[ $grup ].aprovada ) {
response[ 'Validació' ] = ' aprovada per ' || $grup;
}
if ( $deliberacio.isox.aprovada AND $deliberacio.delegades.aprovada ) {
response[ 'Validació' ] = 'aprovada';
}
if ( $__arg( 'decisio' ) == 'refusada' ) {
response[ 'Validació' ] = 'refusada';
}
var[ 'deliberacio_' || $idprop ] = $deliberacio;
}
// -- Nou Portal
if ( !! $args.nou_portal ) {
var[ 'anterior_portal' ] = var[ 'portal_actual' ];
var[ 'portal_actual' ] = !! $args.nou_portal;
response[ 'Nou portal actual' ] = !! $args.nou_portal;
}
}"
}
]
}
]