-- Name: view_def_to_orig(text); Type: FUNCTION; Schema: util; Owner: -

--

CREATE FUNCTION view_def_to_orig(view_def text) RETURNS text

    LANGUAGE sql IMMUTABLE

    AS $_$

/* unexpand expanded * expressions. any list of 5+ cols from the same table is

treated as a * expression. */

SELECT regexp_replace($1,

'\y((?:"[^"]+"|\w+)\.)(?:"[^"]+"|\w+)'|| --1st col, which lacks separator before

'(,[[:blank:]]*

[[:blank:]]*)\1(?:"[^"]+"|\w+)'|| -- 2nd col, which has separator before

'(?:\2\1(?:"[^"]+"|\w+)){4,}', -- later cols, w/ same table name and separator

'\1*'/*prefix w/ table*/, 'g')

$_$;

--