evm-contracts-tools 0.0.62 → 0.0.64

package/lib/evm-contract-call-dynamic

@@ -56,6 +56,11 @@ const
 const
   _echo =
     _libcrash._echo;
+/* global
+     _echo2 */
+const
+  _echo2 =
+    _libcrash._echo2;
 /* global
      _exit */
 const
@@ -347,7 +352,8 @@ async function
     _target_network,
     _api_key_path,
     _measure_unit,
-    _price_gas) {
+    _price_gas,
+    _retries_max) {
   let
     _gas_fee,
     _fee_priority,
@@ -360,9 +366,6 @@ async function
     `Auto-detecting gas price.`;
   _msg_info(
     _msg);
-  const
-    _retries_max =
-      3;
   _price_feasible_retries_max =
     _retries_max;
   _price_gas_transaction_get_selection_mode =
@@ -380,10 +383,24 @@ async function
     "",      // output file
     _price_gas_transaction_get_retries_max
   ];
-  _price_gas = await
-    _price_gas_transaction_get.apply(
-      null,
-      _price_gas_transaction_get_args);
+  try {
+    _price_gas = await
+      _price_gas_transaction_get.apply(
+        null,
+        _price_gas_transaction_get_args);
+  }
+  catch(
+    _error) {
+    _msg =
+      "Error getting gas price from the " +
+      "network.";
+    _msg_error(
+      _msg,
+      0);
+    _echo2(
+      _error);
+    throw _error;
+  }
   _price_gas_transaction_get_args = [
     _target_network,
     _price_gas_transaction_get_selection_mode,
@@ -395,10 +412,24 @@ async function
     "",    // output file
     _price_gas_transaction_get_retries_max
   ];
-  _gas_fee = await
-    _price_gas_transaction_get.apply(
-      null,
-      _price_gas_transaction_get_args);
+  try {
+    _gas_fee = await
+      _price_gas_transaction_get.apply(
+        null,
+        _price_gas_transaction_get_args);
+  }
+  catch(
+    _error) {
+    _msg =
+      "Error getting gas fee from the " +
+      "network.";
+    _msg_error(
+      _msg,
+      0);
+    _echo2(
+      _error);
+    throw _error;
+  }
   _price_gas_transaction_get_args = [
     _target_network,
     _price_gas_transaction_get_selection_mode,
@@ -410,10 +441,24 @@ async function
     "",         // output file
     _price_gas_transaction_get_retries_max
   ];
-  _fee_priority = await
-    _price_gas_transaction_get.apply(
-      null,
-      _price_gas_transaction_get_args);
+  try {
+    _fee_priority = await
+      _price_gas_transaction_get.apply(
+        null,
+        _price_gas_transaction_get_args);
+  }
+  catch(
+    _error) {
+    _msg =
+      "Error getting fee priority from the " +
+      "network.";
+    _msg_error(
+      _msg,
+      0);
+    _echo2(
+      _error);
+    throw _error;
+  }
   _msg =
     `Got gas price '${_price_gas}' ` +
     `${_measure_unit} with '${_gas_fee}' ` +
@@ -424,331 +469,947 @@ async function
     `'${_price_gas_transaction_get_selection_mode}'.`;
   _msg_info(
     _msg);
-  return _price_gas;
+  return  [
+    _price_gas,
+    _gas_fee,
+    _fee_priority
+  ];
 }
 
 async function
-  _contract_call_dynamic(
-    _call_timeout,
+  _contract_check(
     _wallet_seed,
     _wallet_password,
-    _api_key_path,
-    _price_gas,
-    _msg_value,
-    _measure_unit,
-    _target_network,
     _contract_address,
     _contract_abi_path,
     _contract_bytecode_path,
     _contract_compiler_output_path,
-    _contract_method,
-    _method_args,
-    _verbose) {
+    _target_network,
+    _api_key_path,
+    _contract) {
   let
-    _amount,
-    _contract,
-    _contract_get_opts,
-    _fee_priority,
-    _gas_fee,
-    _method,
-    _msg,
-    _eip_1559,
-    _price_feasible_retries,
-    _price_feasible_retries_max,
-    _price_gas_max,
-    _price_gas_transaction_get_args,
-    _price_gas_transaction_get_retries_max,
-    _price_gas_transaction_get_selection_mode,
-    _retries_max,
-    _send_opts,
-    _receipt,
-    _tx;
-  _eip_1559 =
-    true;
-  _price_gas_max =
-    100000000;
-  _send_opts =
-    {};
-  if ( typeof(
-         _measure_unit) === "undefined" ||
+    _contract_object_get,
+    _contract_get_args;
+  const
+    _contract_type =
+      typeof(
+        _contract);
+  _contract_object_get =
+    false;
+  if ( _contract_type == "undefined" ) {
+    _contract_object_get =
+      true;
+  }
+  else if ( _contract_type == "string" ) {
+    if ( _contract.length < 1 ) {
+      _contract_object_get =
+        true;
+    }
+  }
+  else if ( _contract_type == "object" ) {
+    const
+      _contract_keys =
+        Object.keys(
+          _contract);
+    if ( _contract_keys.length < 1 ) {
+      _contract_object_get =
+        true;
+    }
+  }
+  else if ( _contract_type == "boolean" ) {
+    _contract_object_get =
+      true;
+  }
+  else {
+    _msg =
+      "Unknown type for 'Contract' ethers object.";
+    _msg_error(
+      _msg,
+      0);
+    throw _msg;
+  }
+  if ( ! _contract_object_get ) {
+    _msg =
+      "Using input ethers " +
+      "'Contract' object.";
+    _msg_info(
+      _msg);
+  }
+  else {
+    const
+      _contract_get_args = [
+        _wallet_seed,
+        _wallet_password,
+        _contract_address,
+        _contract_abi_path,
+        _contract_bytecode_path,
+        _contract_compiler_output_path,
+        _target_network,
+        _api_key_path,
+      ];
+    try {
+      _contract =
+        await _contract_get.apply(
+          null,
+          _contract_get_args);
+      await _msg_info_contract_obtained(
+        _contract);
+    }
+    catch(
+      _error) {
+      _msg =
+        "Error obtaining ethers " +
+        "contract object.";
+      _msg_error(
+        _msg,
+        0);
+      throw _error;
+    }
+  }
+  return _contract;
+}
+
+function
+  _measure_unit_check(
+    _measure_unit) {
+  const
+    _measure_unit_type =
+      typeof(
+        _measure_unit);
+  if ( _measure_unit_type === "undefined" ||
          _measure_unit == "" ) {
     _measure_unit =
       "wei";
   }
-  if ( typeof(
-         _price_gas) === "undefined" ||
-         _price_gas == "" ) {
+  else if ( _measure_unit_type === "string" ) {
+    if ( _measure_unit.length < 1 ) {
+      _measure_unit =
+        "wei";
+    }
+  }
+  else if ( _measure_unit_type === "array" ||
+            _measure_unit_type === "object" ) {
+    _msg =
+      "Measure unit must be of type 'string'.";
+    _msg_error(
+      _msg,
+      0);
+    throw _msg;
+  }
+  else {
+    _msg =
+      `Unknown type '${_measure_unit_type}' ` +
+      "for variable '_measure_unit'.";
+    _msg_error(
+      _msg,
+      0);
+    throw _msg;
+  }
+  return _measure_unit; 
+}
+
+async function
+  _price_gas_check(
+    _price_gas,
+    _gas_fee,
+    _fee_priority,
+    _retries_max) {
+  let
+    _msg;
+  const
+    _price_gas_type =
+      typeof(
+        _price_gas);
+  if ( _price_gas_type === "undefined" ) {
+    _msg =
+      "Gas price not set, setting '0' for " +
+      "RPC auto-detection.";
+    _msg_info(
+      _msg);
     _price_gas =
       0;
   }
+  else if ( _price_gas_type === "string" ) {
+    if ( 0 < _price_gas.length ) {
+      const
+        _not_a_number =
+          Number(
+            _price_gas);
+      if ( ( ! ( _not_a_number < 0 ) ) &&
+           ( ! ( _not_a_number > 0 ) ) &&
+           ( ! ( _not_a_number == 0 ) ) ) {
+        if ( _price_gas != "auto" &&
+             _price_gas != "fast" &&
+             _price_gas != "nextblock" ) {
+          _msg =
+            `Gas price '${_price_gas}' ` +
+            `is not a recognized value for ` +
+            `variable '_price_gas'.`;
+          _msg_error(
+            _msg,
+            0);
+          throw _msg;
+        }
+      }
+    }
+    else {
+      _msg =
+        "Gas price not set, setting '0' for " +
+        "auto-detection.";
+      _msg_info(
+        _msg);
+      _price_gas =
+        0;
+    }
+  }
+  else {
+    _msg =
+      "Unknown value for variable " +
+      `'_price_gas' (${_price_gas_type}):`;
+    _msg_error(
+      _msg,
+      0);
+    _echo2(
+      _price_gas);
+    throw _msg;
+  }
   if ( _price_gas == "auto" ||
        _price_gas == "fast" ||
        _price_gas == "nextblock" ) {
-    _price_gas =
-      _price_gas_auto_detect(
-        _target_network,
-        _api_key_path,
-        _measure_unit,
-        _price_gas);
+    _msg =
+      `Gas price set to '${_price_gas}', ` +
+      `evaluating actual value.`;
+    _msg_info(
+      _msg);
+    try {
+      [ _price_gas,
+        _gas_fee,
+        _fee_priority ] =
+        await _price_gas_auto_detect(
+          _target_network,
+          _api_key_path,
+          _measure_unit,
+          _price_gas,
+          _retries_max);
+    }
+    catch(
+      _error) {
+      _msg =
+        "Error getting gas price."
+      _msg_error(
+        _msg,
+        0);
+      _echo2(
+        _error);
+      throw _error;
+    }
   }
   else {
     _msg =
-      `Setting gas price '${_price_gas}'.`;
+      `Setting input gas price ` +
+      `'${_price_gas}'.`;
     _msg_info(
       _msg);
   }
   _price_gas =
     Number(
       _price_gas);
-  if ( typeof(
-         _msg_value) === "undefined" ) {
+  _gas_fee =
+    Number(
+      _gas_fee);
+  _fee_priority =
+    Number(
+      _fee_priority);
+  return _fee_priority;
+}
+
+function
+  _msg_value_check(
+    _msg_value) {
+  const
+    _msg_value_type =
+      typeof(
+        _msg_value);
+  if ( _msg_value_type === "undefined" ) {
+    _msg =
+      "Message value not set, " +
+      "setting transaction value '0'.";
+    _msg_info(
+      _msg);
     _msg_value =
       0;
   }
+  else if ( _msg_value_type === "string" ) {
+    if ( 0 < _msg_value.length ) {
+      const
+        _not_a_number =
+          Number(
+            _msg_value);
+      if ( ( ! ( _not_a_number < 0 ) ) &&
+           ( ! ( _not_a_number > 0 ) ) &&
+           ( ! ( _not_a_number == 0 ) ) ) {
+        _msg =
+          `Message value '${_msg_value}' ` +
+          `is not a recognized value ` +
+          `(a number) for ` +
+          `variable '_msg_value'.`;
+        _msg_error(
+          _msg,
+          0);
+        throw _msg;
+      }
+    }
+    else {
+      _msg =
+        "Message value not set, " +
+        "setting transaction value '0'.";
+      _msg_info(
+        _msg);
+      _msg_value =
+        0;
+    }
+  }
   _msg_value =
     BigInt(
       _msg_value);
-  if ( typeof(
-         _call_timeout) === "undefined" ||
-       _call_timeout == "" ) {
+  return _msg_value;
+}
+
+function
+  _call_timeout_check(
+    _call_timeout) {
+  const
+    _call_timeout_type =
+      typeof(
+        _call_timeout);
+  if ( _call_timeout_type === "number" ) {
+    true;
+  }
+  else if ( _call_timeout_type === "undefined" ) {
+    _msg =
+      "Setting timeout to '300' seconds.";
     _msg_info(
-      "Setting timeout to '300' seconds.");
+      _msg);
     _call_timeout =
       300000;
   }
-  else {
-    _call_timeout =
-      Number(
-        _call_timeout);
-  }
-  if ( typeof(
-         _measure_unit) === "undefined" ||
-         _measure_unit == "" ) {
-    _measure_unit =
-      "wei";
-  }
-  if ( typeof(
-         _verbose) === "undefined" ||
-         _verbose == "" ) {
-    _verbose =
-      "n";
-  }
-  _contract_get_opts = [
-    _wallet_seed,
-    _wallet_password,
-    _contract_address,
-    _contract_abi_path,
-    _contract_bytecode_path,
-    _contract_compiler_output_path,
-    _target_network,
-    _api_key_path,
-  ];
-  try {
-    _contract =
-      await _contract_get.apply(
-        null,
-        _contract_get_opts);
-    await _msg_info_contract_obtained(
-      _contract);
-    _method =
-      await _contract.getFunction(
-        _contract_method);
-    _msg_info_method_obtained(
-      _method);
-    if ( _price_gas > 0 ) {
-      try {
-        _tx = await
-          _method.populateTransaction.apply(
-          null,
-          _method_args);
-      }
-      catch(
-        _error) {
+  else if ( _call_timeout_type === "string" ) {
+    if ( 0 < _call_timeout.length ) {
+      const
+        _not_a_number =
+          Number(
+            _call_timeout);
+      if ( ( ! ( _not_a_number < 0 ) ) &&
+           ( ! ( _not_a_number > 0 ) ) &&
+           ( ! ( _not_a_number == 0 ) ) ) {
         _msg =
-          "Error populating transaction.";
-        _error_display(
-          _error);
+          `Call timeout '${_call_timeout}' ` +
+          `is not a recognized value (a number) for ` +
+          `variable '_call_timeout'.`;
         _msg_error(
           _msg,
           0);
+        throw _msg;
       }
-      _gas_limit =
-        Math.floor(
-          15803479 * 12 / 10);
-        // 17000000;
-      // _gas_limit =
-      //   _price_gas * 2;
+    }
+    else {
       _msg =
-        `Setting gas price '${_price_gas}' ` +
-        `${_measure_unit}, gas limit '${_gas_limit}' ` +
-        `'${_measure_unit}' gas fee '${_gas_fee}' ` +
-        `${_measure_unit}' and fee priority ` +
-        `'${_fee_priority}' '${_measure_unit}'.`;
+        "Setting timeout to '300' seconds.";
       _msg_info(
         _msg);
-      if ( _eip_1559 == false ) {
-        _tx[
-          "gasPrice"] =
-          _price_gas;
-      }
-      else if ( _eip_1559 == true ) {
-        _price_feasible_retries =
-          0;
-        while( _price_gas_max < Number(_price_gas) &&
-               _price_feasible_retries <= _price_feasible_retries_max ) {
-          _price_feasible_retries =
-            _price_feasible_retries + 1;
-          _msg =
-            `Current gas price '${_price_gas}', ` +
-            `maximum gas price '${_price_gas_max}'. ` +
-            `Waiting 30 seconds before retrying.`;
-          _msg_info(
-            _msg);
-          await _sleep(
-            30000);
-          _price_gas_transaction_get_args = [
-            _target_network,
-            _price_gas_transaction_get_selection_mode,
-            _api_key_path,
-            _measure_unit,
-            "",      // wallet seed
-            "",      // target address,
-            "price", // output type
-            "",      // output file
-            _price_gas_transaction_get_retries_max
-          ];
-          _price_gas = await
-            _price_gas_transaction_get.apply(
-              null,
-              _price_gas_transaction_get_args);
-          // _gas_limit =
-          //   Math.floor(
-          //     15803479 * 12 / 10);
-          // 17000000;
-          // 15803479 * 2;
-          // _price_gas;
-          if ( Number(_price_gas) <= _price_gas_max ) {
-            _gas_fee = await
-              _price_gas_transaction_get.apply(
-                null,
-                _price_gas_transaction_get_args);
-            _price_gas_transaction_get_args = [
-              _target_network,
-              _price_gas_transaction_get_selection_mode,
-              _api_key_path,
-              _measure_unit,
-              "",         // wallet seed
-              "",         // target address,
-              "priority", // output type
-              "",         // output file
-              _price_gas_transaction_get_retries_max
-            ];
-            _fee_priority = await
-              _price_gas_transaction_get.apply(
-                null,
-                _price_gas_transaction_get_args);
-          }
-        }
-        if ( _price_feasible_retries_max < _price_feasible_retries ) {
-          _msg =
-            `Setting price to max price ` +
-            `'${_price_gas_max}'`;
-          _msg_info(
-            _msg);
-          _price_gas =
-            _price_gas_max;
-        }
-        _price_feasible_retries =
-          _price_feasible_retries + 1;
-        _price_gas_max =
-          Math.max(
-            _price_gas_max,
-            // _gas_limit,
-            _gas_fee,
-            _fee_priority,
-            _price_gas,
-        );
-        // _tx[
-        //   "gasLimit"] =
-        //   _gas_limit;
-        _tx[
-          "maxFeePerGas"] =
-          _gas_fee;
-        _tx[
-          "maxPriorityFeePerGas"] =
-          _fee_priority;
+      _call_timeout =
+        300000;
+    }
+  }
+  else if ( _call_timeout_type === "object" ) {
+    _msg =
+      `Call timeout '${_call_timeout}' ` +
+      `is not a recognized value (a number) for ` +
+      `variable '_call_timeout':`;
+    _msg_error(
+      _msg,
+      0);
+    _echo2(
+      _call_timeout);
+    throw _msg;
+  }
+  _call_timeout =
+    Number(
+      _call_timeout);
+  return _call_timeout;
+}
+
+async function
+  _method_check(
+    _contract_method,
+    _method) {
+  let
+    _method_object_get;
+  const
+    _method_type =
+      typeof(
+        _method);
+  _method_object_get =
+    false;
+  if ( _method_type == "undefined" ) {
+    _method_object_get =
+      true;
+  }
+  else if ( _method_type == "string" ) {
+    if ( _method.length < 1 ) {
+      _method_object_get =
+        true;
+    }
+  }
+  else if ( _method_type == "object" ) {
+    const
+      _method_keys =
+        Object.keys(
+          _method);
+    if ( _method_keys.length < 1 ) {
+      _method_object_get =
+        true;
+    }
+  }
+  if ( ! _method_object_get ) {
+    _msg =
+      "Using input ethers " +
+      "'Contract.Method' object.";
+    _msg_info(
+      _msg);
+  }
+  else {
+    try {
+      _method =
+        await _contract.getFunction(
+          _contract_method);
+      await _msg_info_method_obtained(
+        _method);
+    }
+    catch(
+      _error) {
+      _msg =
+        "Error obtaining ethers " +
+        "contract method object.";
+      _msg_error(
+        _msg,
+        0);
+      throw _error;
+    }
+  }
+  return _method;
+}
+
+async function
+  _call_price_gas_manual(
+    _price_feasible_retries_max,
+    _measure_unit,
+    _target_network,
+    _api_key_path,
+    _price_gas,
+    _gas_fee,
+    _fee_priority,
+    _method,
+    _method_args,
+    _tx) {
+  let
+    _gas_limit,
+    _msg,
+    _price_feasible_retries,
+    _price_gas_max,
+    _price_gas_transaction_get_args;
+  const
+    _price_gas_type =
+      typeof(
+        _price_gas);
+  if ( _price_gas_type == "string" ) {
+    if ( 0 < _price_gas.length ) {
+      if ( ! ( _price_gas < 0 ) &&
+           ! ( _price_gas == 0 ) &&
+           ! ( _price_gas > 0 ) ) {
+        _price_gas_transaction_get_selection_mode =
+          _price_gas;
       }
-      if ( _msg_value > 0 ) {
-        if ( _measure_unit == "ether" ) {
-          _amount =
-            _ethers_to_wei(
-              _msg_value);
-        }
-        else if ( _measure_unit == "wei" ) {
-          _amount =
-            _msg_value;
-        }
-        else if ( _measure_unit == "" ) {
-          _amount =
-            _msg_value;
-        }
-        else {
-          _msg =
-            `Unknown measure unit '${_measure_unit}'.`;
-          _msg_error(
-            _msg,
-            1);
-        }
-        _tx[
-          "value"] =
-            _amount;
-        // _method_args.push(
-        //   _send_opts);
+      else {
+        _msg =
+          `Setting numeric value '${_price_gas}' ` +
+          `as gas price ` +
+          "selection mode value.";
+        _msg_info(
+          _msg);
+      }
+    }
+    else {
+      _msg =
+        "Gas price variable '_price_gas' " +
+        "empty, auto-detecting.";
+      _msg_info(
+        _msg);
+    }
+  }
+  else if ( _price_gas_type == "number" ) {
+    _msg =
+      `Setting numeric value '${_price_gas}' ` +
+      `as gas price ` +
+      "selection mode value.";
+    _msg_info(
+      _msg);
+  }
+  else {
+    _msg =
+      "Input variable '_price_gas' must be " +
+      `a number (type '${_price_gas_type}').`;
+    _msg_error(
+      _msg,
+      0);
+    throw _msg;
+  }
+  _price_gas_transaction_get_selection_mode =
+    _price_gas;
+  _price_gas_max =
+    100000000;
+  try {
+    _tx = await
+      _method.populateTransaction.apply(
+      null,
+      _method_args);
+  }
+  catch(
+    _error) {
+    _msg =
+      "Error populating transaction.";
+    _error_display(
+      _error);
+    _msg_error(
+      _msg,
+      0);
+    throw _error;
+  }
+  // An hardcoded gas limit parameter.
+  _gas_limit =
+    Math.floor(
+      15803479 * 12 / 10);
+  // 17000000;
+  // Setting as gas limit double
+  // of how much you wanna spend.
+  // _gas_limit =
+  //   _price_gas * 2;
+  _msg =
+    `Setting gas price '${_price_gas}' ` +
+    `${_measure_unit}, gas limit '${_gas_limit}' ` +
+    `'${_measure_unit}' gas fee '${_gas_fee}' ` +
+    `${_measure_unit}' and fee priority ` +
+    `'${_fee_priority}' '${_measure_unit}'.`;
+  _msg_info(
+    _msg);
+  // Non-proof of stake networks
+  if ( _eip_1559 == false ) {
+    _tx[
+      "gasPrice"] =
+      _price_gas;
+  }
+  // Proof of stake networks
+  else if ( _eip_1559 == true ) {
+    _price_feasible_retries =
+      0;
+    while( _price_gas_max < Number(
+                              _price_gas) &&
+           _price_feasible_retries <= _price_feasible_retries_max ) {
+      _price_feasible_retries =
+        _price_feasible_retries + 1;
+      _msg =
+        `Current gas price '${_price_gas}', ` +
+        `maximum gas price '${_price_gas_max}'. ` +
+        `Waiting 30 seconds before retrying.`;
+      _msg_info(
+        _msg);
+      await _sleep(
+        30000);
+      _price_gas_transaction_get_args = [
+        _target_network,
+        _price_gas_transaction_get_selection_mode,
+        _api_key_path,
+        _measure_unit,
+        "",      // wallet seed
+        "",      // target address,
+        "price", // output type
+        "",      // output file
+        _price_gas_transaction_get_retries_max
+      ];
+      _price_gas = await
+        _price_gas_transaction_get.apply(
+          null,
+          _price_gas_transaction_get_args);
+      // _gas_limit =
+      //   Math.floor(
+      //     15803479 * 12 / 10);
+      // 17000000;
+      // 15803479 * 2;
+      // _price_gas;
+      if ( Number(_price_gas) <= _price_gas_max ) {
+        _gas_fee = await
+          _price_gas_transaction_get.apply(
+            null,
+            _price_gas_transaction_get_args);
+        _price_gas_transaction_get_args = [
+          _target_network,
+          _price_gas_transaction_get_selection_mode,
+          _api_key_path,
+          _measure_unit,
+          "",         // wallet seed
+          "",         // target address,
+          "priority", // output type
+          "",         // output file
+          _price_gas_transaction_get_retries_max
+        ];
+        _fee_priority = await
+          _price_gas_transaction_get.apply(
+            null,
+            _price_gas_transaction_get_args);
+      }
+    }
+    if ( _price_feasible_retries_max < _price_feasible_retries ) {
+      _msg =
+        `Setting price to max price ` +
+        `'${_price_gas_max}'.`;
+      _msg_info(
+        _msg);
+      _price_gas =
+        _price_gas_max;
+    }
+    _price_feasible_retries =
+      _price_feasible_retries + 1;
+    _price_gas_max =
+      Math.max(
+        _price_gas_max,
+        // _gas_limit,
+        _gas_fee,
+        _fee_priority,
+        _price_gas,
+    );
+    // _tx[
+    //   "gasLimit"] =
+    //   _gas_limit;
+    _tx[
+      "maxFeePerGas"] =
+      _gas_fee;
+    _tx[
+      "maxPriorityFeePerGas"] =
+      _fee_priority;
+  }
+  if ( _msg_value > 0 ) {
+    if ( _measure_unit == "ether" ) {
+      _amount =
+        _ethers_to_wei(
+          _msg_value);
+    }
+    else if ( _measure_unit == "wei" ) {
+      _amount =
+        _msg_value;
+    }
+    else if ( _measure_unit == "" ) {
+      _msg =
+        `Measure unit not set, `;
+        `defaulting to 'wei'.`;
+      _msg_info(
+        _msg);
+      _amount =
+        _msg_value;
+    }
+    else {
+      _msg =
+        `Unknown measure unit '${_measure_unit}'.`;
+      _msg_error(
+        _msg,
+        0);
+      throw _msg;
+    }
+    _tx[
+      "value"] =
+        _amount;
+    // _method_args.push(
+    //   _send_opts);
+  }
+  try {
+    _tx = await
+      _contract.runner.sendTransaction(
+      _tx);
+  }
+  catch(
+    _error) {
+    _msg =
+      "Error sending transaction using " +
+      "'contract.runner.sendTransaction'.";
+    _msg_error(
+      _msg,
+      0);
+    throw _error;
+  }
+  return _tx;
+}
+
+async function
+  _call_price_gas_auto(
+    _measure_unit,
+    _msg_value,
+    _method,
+    _method_args) {
+  let
+    _amount,
+    _msg,
+    _tx;
+  const
+    _send_opts =
+      {};
+  if ( _msg_value > 0 ) {
+    if ( _measure_unit == "ether" ) {
+      _amount =
+        _ethers_to_wei(
+          _msg_value);
+    }
+    else if ( _measure_unit == "wei" ) {
+      _amount =
+        _msg_value;
+    }
+    else if ( _measure_unit == "" ) {
+      _msg =
+        "No measure unit set, " +
+        "defaulting to 'wei'.";
+      _amount =
+        _msg_value;
+    }
+    else {
+      _msg =
+        `Unknown measure unit '${_measure_unit}'.`;
+      _msg_error(
+        _msg,
+        0);
+      throw _msg;
+    }
+    _send_opts[
+      "value"] =
+        _amount;
+    _method_args.push(
+      _send_opts);
+    _msg =
+      `Set message value '${_amount}' ` +
+      `'${_measure_unit}'.`;
+    _msg_info(
+      _msg);
+  }
+  try {
+    _tx =
+      await _method.send.apply(
+        null,
+        _method_args)
+  }
+  catch(
+    _error) {
+    _msg =
+      "Error sending transaction to the " +
+      "network using the 'send' method" +
+      "of the Ethers method object.";
+    _msg_error(
+      _msg,
+      0);
+    _echo2(
+      _error);
+    throw _error;
+  }
+  return _tx;
+}
+
+async function
+  _contract_call_dynamic(
+    _call_timeout,
+    _wallet_seed,
+    _wallet_password,
+    _api_key_path,
+    _price_gas,
+    _msg_value,
+    _measure_unit,
+    _target_network,
+    _contract_address,
+    _contract_abi_path,
+    _contract_bytecode_path,
+    _contract_compiler_output_path,
+    _contract_method,
+    _method_args,
+    _verbose,
+    _retries_max,
+    _contract,
+    _method) {
+  let
+    _amount,
+    _call_price_gas_manual_args,
+    _call_price_gas_auto_args,
+    _contract_object_get,
+    _fee_priority,
+    _gas_fee,
+    _msg,
+    _eip_1559,
+    _price_feasible_retries_max,
+    _price_gas_max,
+    _price_gas_transaction_get_args,
+    _price_gas_transaction_get_retries_max,
+    _price_gas_transaction_get_selection_mode,
+    _send_opts,
+    _receipt,
+    _tx;
+  _eip_1559 =
+    true;
+  _send_opts =
+    {};
+  _measure_unit =
+    _measure_unit_check(
+      _measure_unit);
+  try {
+    [ _price_gas,
+      _gas_fee,
+      _fee_priority ] =
+      await _price_gas_check(
+        _price_gas,
+        _gas_fee,
+        _fee_priority,
+        _retries_max);
+  }
+  catch(
+    _error) {
+    _msg =
+      "Error checking input gas price.";
+    _msg_error(
+      _msg,
+      0);
+    _echo2(
+      _error);
+    throw _error;
+  }
+  _msg_value =
+    _msg_value_check(
+      _value);
+  _call_timeout =
+    _call_timeout_check(
+      _call_timeout);
+  if ( typeof(
+         _verbose) === "undefined" ||
+         _verbose == "" ) {
+    _verbose =
+      "n";
+  }
+  const
+    _contract_check_args = [
+      _wallet_seed,
+      _wallet_password,
+      _contract_address,
+      _contract_abi_path,
+      _contract_bytecode_path,
+      _contract_compiler_output_path,
+      _target_network,
+      _api_key_path,
+      _contract
+    ];
+  try {
+    _contract =
+      await _contract_check.apply(
+        null,
+        _contract_check_args);
+  }
+  catch(
+    _error) {
+    _msg =
+      "Error validating ethers " +
+      "contract object.";
+    _msg_error(
+      _msg,
+      0);
+    throw _error;
+  }
+  const
+    _method_check_args = [
+      _contract_method,
+      _method
+    ];
+  try {
+    _method =
+      await _method_check.apply(
+        null,
+        _method_check_args);
+  }
+  catch(
+    _error) {
+    _msg =
+      "Error validating ethers " +
+      "contract method object.";
+    _msg_error(
+      _msg,
+      0);
+    throw _error;
+  }
+  try {
+    if ( _price_gas > 0 ) {
+      _call_price_gas_manual_args = [
+        _retries_max,
+        _measure_unit,
+        _target_network,
+        _api_key_path,
+        _price_gas,
+        _gas_fee,
+        _fee_priority,
+        _method,
+        _method_args,
+        _tx
+      ];
+      try {
+        _tx =
+          await _call_price_gas_manual.apply(
+            null,
+            _call_price_gas_manual_args);
+      }
+      catch(
+        _error) {
+        _msg =
+          "Error sending transaction setting " +
+          "gas price manually.";
+        _error_display(
+          _error);
+        _msg_error(
+          _msg,
+          0);
+        throw _error;
       }
-      _tx = await
-        _contract.runner.sendTransaction(
-        _tx);
-      // _tx =
-      //   await _method.send.apply(
-      //     null,
-      //     _method_args)
     }
     else {
       _msg =
         "Setting no gas price.";
       _msg_info(
         _msg);
-      if ( _msg_value > 0 ) {
-        if ( _measure_unit == "ether" ) {
-          _amount =
-            _ethers_to_wei(
-              _msg_value);
-        }
-        else if ( _measure_unit == "wei" ) {
-          _amount =
-            _msg_value;
-        }
-        else if ( _measure_unit == "" ) {
-          _amount =
-            _msg_value;
-        }
-        else {
-          _msg =
-            `Unknown measure unit '${_measure_unit}'.`;
-          _msg_error(
-            _msg,
-            1);
-        }
-        _send_opts[
-          "value"] =
-            _amount;
-        _method_args.push(
-          _send_opts);
+      _call_price_gas_auto_args = [
+        _retries_max,
+        _measure_unit,
+        _msg_value,
+        _method,
+        _method_args,
+        _tx
+      ];
+      try {
+        _tx =
+          await _call_price_gas_auto.apply(
+            null,
+            _call_price_gas_auto_args);
+      }
+      catch(
+        _error) {
+        _msg =
+          "Error sending transaction to the " +
+          "network by letting the RPC set the " +
+          "gas price value.";
+        _msg_error(
+          _msg,
+          0);
+        _echo2(
+          _error);
+        throw _error;
       }
-      _tx =
-        await _method.send.apply(
-          null,
-          _method_args)
     }
     if ( typeof(
            _tx) == "undefined" ) {
@@ -765,13 +1426,25 @@ async function
     _msg_info(
       _msg);
     if ( _verbose == "y" ) {
-      console.log(
+      _echo(
         _tx);
     }
-    _receipt =
-      await _tx.wait(
-        1,
-        _call_timeout);
+    try {
+      _receipt =
+        await _tx.wait(
+          1,
+          _call_timeout);
+    }
+    catch(
+      _error) {
+      _msg =
+        "Error getting transaction " +
+        "receipt.";
+      _msg_error(
+        _msg,
+        0);
+      throw _error;
+    }
   } catch (
       _error) {
     if ( "code" in _error ) {
@@ -812,14 +1485,60 @@ async function
       _msg);
     throw _error;
   }
-  return [ _tx,
-           _receipt];
+  return [
+    _tx,
+    _receipt,
+    _method,
+    _contract
+  ];
 }
 
 function
   _receipt_cost_get(
     _receipt) {
+  true;
+}
 
+function
+  _retries_max_check(
+    _retries_max) {
+  let
+    _msg;
+  const
+    _retries_max_type =
+      typeof(
+        _retries_max);
+  if ( _retries_max_type === "undefined" ) {
+    _msg =
+      "Setting maximum call retries to '100'.";
+    _msg_info(
+      _msg);
+    _retries_max =
+      100;
+  }
+  else if ( _retries_max_type === "string" ) {
+    if ( _retries_max.length < 1 ) {
+      _msg =
+        "Setting maximum call retries to '100'.";
+      _msg_info(
+        _msg);
+      _retries_max =
+        100;
+    }
+  }
+  else {
+    _msg =
+      "Variable '_retries_max' must be " +
+      `a number, not a '${_retries_max_type}'.`;
+    _msg_error(
+      _msg,
+      0);
+    throw _msg;
+  }
+  _retries_max =
+    Number(
+      _retries_max);
+  return _retries_max;
 }
 
 async function
@@ -840,16 +1559,25 @@ async function
     _contract_method,
     _method_args,
     _output_file,
-    _verbose) {
+    _verbose,
+    _contract,
+    _method) {
   let
+    _attempt,
     _msg,
     _receipt,
     _receipt_type,
     _tx,
     _tx_cost,
-    _contract_call_dynamic_opts,
     _wallet_path_list,
     _wallet_path;
+  const
+    _global =
+      _global_get();
+  const
+    _quiet =
+      _global[
+        "quiet"];
   if ( typeof(
          _price_gas) === "undefined" ||
        _price_gas == "" ) {
@@ -860,55 +1588,18 @@ async function
     _price_gas =
       "";
   }
-  if ( typeof(
-         _retries_max) === "undefined" ||
-       _retries_max == "" ) {
-    _msg =
-      "Setting maximum call retries to '100'.";
-    _msg_info(
-      _msg);
-    _retries_max =
-      100;
-  }
   _retries_max =
-    Number(
+    _retries_max_check(
       _retries_max);
-  if ( typeof(
-         _call_timeout) === "undefined" ||
-       _call_timeout == "" ) {
-    _msg =
-      "Setting timeout to '300' seconds.";
-    _msg_info(
-      _msg);
-    _call_timeout =
-      300000;
-  }
   _call_timeout =
-    Number(
+    _call_timeout_check(
       _call_timeout);
-  if ( typeof(
-         _msg_value) === "undefined" ||
-       _msg_value == "" ) {
-    _msg =
-      "Setting transaction value '0'.";
-    _msg_info(
-      _msg);
-    _msg_value =
-      0;
-  }
   _msg_value =
-    BigInt(
+    _msg_value_check(
       _msg_value);
-  if ( typeof(
-         _measure_unit) === undefined ||
-       _measure_unit == "" ) {
-    _msg =
-      "Setting measure unit to 'wei'.";
-    _msg_info(
-      _msg);
-    _measure_unit =
-      "wei";
-  }
+  _measure_unit =
+    _measure_unit_check(
+      _measure_unit);
   if ( typeof(
          _wallet_password) === "undefined" ||
        _wallet_password == "" ) {
@@ -938,31 +1629,87 @@ async function
     _verbose =
       "n";
   }
-  _contract_call_dynamic_opts = [
-    _call_timeout,
-    _wallet_seed,
-    _wallet_password,
-    _api_key_path,
-    _price_gas,
-    _msg_value,
-    _measure_unit,
-    _target_network,
-    _contract_address,
-    _contract_abi_path,
-    _contract_bytecode_path,
-    _contract_compiler_output_path,
-    _contract_method,
-    _method_args
-  ];
+  const
+    _contract_check_args = [
+      _wallet_seed,
+      _wallet_password,
+      _contract_address,
+      _contract_abi_path,
+      _contract_bytecode_path,
+      _contract_compiler_output_path,
+      _target_network,
+      _api_key_path,
+      _contract
+    ];
+  try {
+    _contract =
+      await _contract_check.apply(
+        null,
+        _contract_check_args);
+  }
+  catch(
+    _error) {
+    _msg =
+      "Error validating ethers " +
+      "contract object.";
+    _msg_error(
+      _msg,
+      0);
+    throw _error;
+  }
+  const
+    _method_check_args = [
+      _contract_method,
+      _method
+    ];
+  try {
+    _method =
+      await _method_check.apply(
+        null,
+        _method_check_args);
+  }
+  catch(
+    _error) {
+    _msg =
+      "Error validating ethers " +
+      "contract method object.";
+    _msg_error(
+      _msg,
+      0);
+    throw _error;
+  }
+  const
+    _contract_call_dynamic_args = [
+      _call_timeout,
+      _wallet_seed,
+      _wallet_password,
+      _api_key_path,
+      _price_gas,
+      _msg_value,
+      _measure_unit,
+      _target_network,
+      _contract_address,
+      _contract_abi_path,
+      _contract_bytecode_path,
+      _contract_compiler_output_path,
+      _contract_method,
+      _method_args,
+      _verbose,
+      _retries_max,
+      _contract,
+      _method
+    ];
   _attempt =
     1;
   while ( _attempt <= _retries_max ) {
     try {
       [ _tx,
-        _receipt ] =
+        _receipt,
+        _method,
+        _contract ] =
         await _contract_call_dynamic.apply(
           null,
-          _contract_call_dynamic_opts);
+          _contract_call_dynamic_args);
       _receipt_type =
         typeof(
           _receipt);
@@ -983,15 +1730,15 @@ async function
             "Transaction response:";
           _msg_info(
             _msg);
-          console.log(
+          _echo(
             _tx);
           _msg =
             "Transaction receipt:";
           _msg_info(
             _msg);
-          console.log(
+          _echo(
             _receipt);
-	}
+        }
         if ( _receipt.hash != undefined ) {
           _receipt_tx_cost_get(
             _receipt,
@@ -1012,7 +1759,7 @@ async function
             _tx_cost =
               _wei_to_ether(
                 _tx_cost);
-	  }
+          }
           _msg =
             `Transaction cost: '${_tx_cost}'.`;
           _msg_info(
@@ -1053,8 +1800,12 @@ async function
       "Maximum number of retries reached.";
     throw _msg;
   }
-  return [_tx,
-          _receipt ];
+  return [
+    _tx,
+    _receipt,
+    _contract,
+    _method
+  ];
 }
 
 function