chore: add internal comma separated parsing method

Author: janniks

packages/cli/src/cli.ts

@@ -98,6 +98,7 @@ import {
 import { gaiaAuth, gaiaConnect, gaiaUploadProfileAll, getGaiaAddressFromProfile } from './data';
 
 import { defaultUrlFromNetwork, STACKS_TESTNET } from '@stacks/network';
+import { internal_parseCommaSeparated } from '@stacks/transactions';
 import {
   generateNewAccount,
   generateWallet,
@@ -793,23 +794,7 @@ async function contractDeploy(_network: CLINetworkAdapter, args: string[]): Prom
 
 /** @internal */
 export function parseDirectFunctionArgs(functionArgsStr: string): ClarityValue[] {
-  return functionArgsStr
-    .split('')
-    .reduce(
-      (acc, char) => {
-        if (char === '(' || char === '{') acc.p++;
-        if (char === ')' || char === '}') acc.p--;
-        if (char === ',' && !acc.p) {
-          acc.segs.push('');
-        } else {
-          acc.segs[acc.segs.length - 1] += char;
-        }
-        return acc;
-      },
-      { p: 0, segs: [''] }
-    )
-    .segs.filter(arg => arg.trim())
-    .map(arg => Cl.parse(arg.trim()));
+  return internal_parseCommaSeparated(functionArgsStr);
 }
 
 // Get function arguments via interactive prompts

packages/transactions/src/clarity/index.ts

@@ -24,3 +24,6 @@ export * from './types';
 
 export * from './deserialize';
 export * from './serialize';
+
+/** @ignore Meant for internal use by other Stacks.js packages. Not stable. */
+export { internal_parseCommaSeparated } from './parser';

packages/transactions/src/clarity/parser.ts

@@ -327,3 +327,14 @@ export function parse(clarityValueString: string): ClarityValue {
   if (!result.success || !result.capture) throw 'Parse error'; // todo: we can add better error messages and add position tracking
   return result.capture as ClarityValue;
 }
+
+/** @ignore Meant for internal use by other Stacks.js packages. Not stable. */
+export function internal_parseCommaSeparated(clarityValueString: string): ClarityValue[] {
+  const combinator = entire(
+    greedy(1, clValue(), c => Cl.list(c as ClarityValue[]), regex(/\s*,\s*/))
+  );
+  const result = combinator(clarityValueString);
+  if (!result.success || !result.capture)
+    throw `Error trying to parse string: ${clarityValueString}`;
+  return (result.capture as ListCV<ClarityValue>).value;
+}