summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChristian Grothoff <christian@grothoff.org>2023-07-28 12:21:28 +0200
committerChristian Grothoff <christian@grothoff.org>2023-07-28 12:21:28 +0200
commitc93ce9ea2eb16a91422b8101fecd8c491c7e93b7 (patch)
tree073a5d3dc35d410faa3bc098291eab108e63975a
parent571d43cef3732ed6f491d91a9e767a80008edeb1 (diff)
downloadexchange-c93ce9ea2eb16a91422b8101fecd8c491c7e93b7.tar.gz
exchange-c93ce9ea2eb16a91422b8101fecd8c491c7e93b7.tar.bz2
exchange-c93ce9ea2eb16a91422b8101fecd8c491c7e93b7.zip
-fix type defs
-rw-r--r--src/exchangedb/0003-age_withdraw.sql2
-rw-r--r--src/exchangedb/exchange-0001.sql28
-rw-r--r--src/exchangedb/exchange-0002.sql.in15
-rw-r--r--src/exchangedb/exchange_do_age_withdraw.sql15
-rw-r--r--src/exchangedb/exchange_do_reserves_in_insert.sql17
5 files changed, 32 insertions, 45 deletions
diff --git a/src/exchangedb/0003-age_withdraw.sql b/src/exchangedb/0003-age_withdraw.sql
index c85eb60f5..05c0df272 100644
--- a/src/exchangedb/0003-age_withdraw.sql
+++ b/src/exchangedb/0003-age_withdraw.sql
@@ -29,7 +29,7 @@ BEGIN
'(age_withdraw_id BIGINT GENERATED BY DEFAULT AS IDENTITY'
',h_commitment BYTEA NOT NULL CONSTRAINT h_commitment_length CHECK(LENGTH(h_commitment)=64)'
',max_age SMALLINT NOT NULL CONSTRAINT max_age_positive CHECK(max_age>=0)'
- ',amount_with_fee TALER_AMOUNT NOT NULL'
+ ',amount_with_fee taler_amount NOT NULL'
',reserve_pub BYTEA NOT NULL CONSTRAINT reserve_pub_length CHECK(LENGTH(reserve_pub)=32)'
',reserve_sig BYTEA NOT NULL CONSTRAINT reserve_sig_length CHECK(LENGTH(reserve_sig)=64)'
',noreveal_index SMALLINT NOT NULL CONSTRAINT noreveal_index_positive CHECK(noreveal_index>=0)'
diff --git a/src/exchangedb/exchange-0001.sql b/src/exchangedb/exchange-0001.sql
index 79a0dec13..a5998b852 100644
--- a/src/exchangedb/exchange-0001.sql
+++ b/src/exchangedb/exchange-0001.sql
@@ -141,22 +141,10 @@ COMMENT ON FUNCTION comment_partitioned_column
-- Taler amounts and helper functiosn
-------------------------------------------------------------
-DO $$
-BEGIN
- CREATE TYPE TALER_AMOUNT
- AS (val INT8
- ,frac INT4);
-
- COMMENT ON TYPE TALER_AMOUNT
- IS 'Type to store a TALER-amount as (val, frac) pair.';
-EXCEPTION
- WHEN duplicate_object THEN null;
-END
-$$;
CREATE PROCEDURE amount_normalize(
- IN amount TALER_AMOUNT
- ,OUT normalized TALER_AMOUNT
+ IN amount taler_amount
+ ,OUT normalized taler_amount
)
LANGUAGE plpgsql
AS $$
@@ -169,9 +157,9 @@ COMMENT ON PROCEDURE amount_normalize
IS 'Returns the normalized amount by adding to the .val the value of (.frac / 100000000) and removing the modulus 100000000 from .frac.';
CREATE PROCEDURE amount_add(
- IN a TALER_AMOUNT
- ,IN b TALER_AMOUNT
- ,OUT sum TALER_AMOUNT
+ IN a taler_amount
+ ,IN b taler_amount
+ ,OUT sum taler_amount
)
LANGUAGE plpgsql
AS $$
@@ -189,9 +177,9 @@ COMMENT ON PROCEDURE amount_add
IS 'Returns the normalized sum of two amounts. It raises an exception when the resulting .val is larger than 2^52';
CREATE FUNCTION amount_left_minus_right(
- IN l TALER_AMOUNT
- ,IN r TALER_AMOUNT
- ,OUT diff TALER_AMOUNT
+ IN l taler_amount
+ ,IN r taler_amount
+ ,OUT diff taler_amount
,OUT ok BOOLEAN
)
LANGUAGE plpgsql
diff --git a/src/exchangedb/exchange-0002.sql.in b/src/exchangedb/exchange-0002.sql.in
index 1d28f63a4..f0bf339bc 100644
--- a/src/exchangedb/exchange-0002.sql.in
+++ b/src/exchangedb/exchange-0002.sql.in
@@ -19,6 +19,21 @@ BEGIN;
SELECT _v.register_patch('exchange-0002', NULL, NULL);
SET search_path TO exchange;
+CREATE TYPE taler_amount
+ AS
+ (val INT8
+ ,frac INT4);
+COMMENT ON TYPE taler_amount
+ IS 'Stores an amount, fraction is in units of 1/100000000 of the base value';
+
+CREATE TYPE exchange_do_array_reserve_insert_return_type
+ AS
+ (transaction_duplicate BOOLEAN
+ ,ruuid INT8
+ );
+COMMENT ON TYPE exchange_do_array_reserve_insert_return_type
+ IS 'Return type for exchange_do_array_reserves_insert() stored procedure';
+
#include "0002-denominations.sql"
#include "0002-denomination_revocations.sql"
#include "0002-wire_targets.sql"
diff --git a/src/exchangedb/exchange_do_age_withdraw.sql b/src/exchangedb/exchange_do_age_withdraw.sql
index e76d4ba75..ce257a8d9 100644
--- a/src/exchangedb/exchange_do_age_withdraw.sql
+++ b/src/exchangedb/exchange_do_age_withdraw.sql
@@ -16,7 +16,7 @@
-- @author Özgür Kesim
CREATE OR REPLACE FUNCTION exchange_do_age_withdraw(
- IN amount_with_fee TALER_AMOUNT,
+ IN amount_with_fee taler_amount,
IN rpub BYTEA,
IN rsig BYTEA,
IN now INT8,
@@ -38,8 +38,8 @@ AS $$
DECLARE
reserve_gc INT8;
difference RECORD;
- balance TALER_AMOUNT;
- new_balance TALER_AMOUNT;
+ balance taler_amount;
+ new_balance taler_amount;
not_before date;
earliest_date date;
BEGIN
@@ -104,9 +104,9 @@ required_age=0;
-- Check reserve balance is sufficient.
SELECT *
-INTO
+INTO
difference
-FROM
+FROM
amount_left_minus_right(
balance
,amount_with_fee);
@@ -114,7 +114,7 @@ FROM
balance_ok = difference.ok;
IF NOT balance_ok
-THEN
+THEN
RETURN;
END IF;
@@ -166,6 +166,5 @@ END IF;
END $$;
-COMMENT ON FUNCTION exchange_do_age_withdraw(TALER_AMOUNT, BYTEA, BYTEA, INT8, INT8, BYTEA, INT2, INT2, BYTEA[], INT8[], BYTEA[])
+COMMENT ON FUNCTION exchange_do_age_withdraw(taler_amount, BYTEA, BYTEA, INT8, INT8, BYTEA, INT2, INT2, BYTEA[], INT8[], BYTEA[])
IS 'Checks whether the reserve has sufficient balance for an age-withdraw operation (or the request is repeated and was previously approved) and that age requirements are met. If so updates the database with the result. Includes storing the blinded planchets and denomination signatures, or signaling conflict';
-
diff --git a/src/exchangedb/exchange_do_reserves_in_insert.sql b/src/exchangedb/exchange_do_reserves_in_insert.sql
index cf57d8e81..26966a940 100644
--- a/src/exchangedb/exchange_do_reserves_in_insert.sql
+++ b/src/exchangedb/exchange_do_reserves_in_insert.sql
@@ -966,21 +966,6 @@ END $$;
-
-
-
-
-DO $$
-BEGIN
- CREATE TYPE exchange_do_array_reserve_insert_return_type
- AS
- (transaction_duplicate BOOLEAN
- ,ruuid INT8);
-EXCEPTION
- WHEN duplicate_object THEN null;
-END
-$$;
-
CREATE OR REPLACE FUNCTION exchange_do_array_reserves_insert(
IN in_gc_date INT8,
IN in_reserve_expiration INT8,
@@ -1019,7 +1004,7 @@ BEGIN
,UNNEST (ina_payto_uri) AS payto_uri
ON CONFLICT DO NOTHING;
- FOR i IN
+ FOR i IN
SELECT
reserve_pub
,wire_ref