Copy cartodb lib/sql scripts from CDB_CartodbfyTable branch

scripts-available/CDB_UserTables.sql

@@ -0,0 +1,39 @@
+-- Function returning list of cartodb user tables
+--
+-- The optional argument restricts the result to tables
+-- of the specified access type.
+--
+-- Currently accepted permissions are: 'public', 'private' or 'all'
+--
+DROP FUNCTION IF EXISTS CDB_UserTables(); -- replaced by:
+CREATE OR REPLACE FUNCTION CDB_UserTables(perm text DEFAULT 'all')
+RETURNS SETOF information_schema.sql_identifier
+AS $$
+  WITH usertables AS ( 
+    -- TODO: query CDB_TableMetadata for this ?
+    -- See http://github.com/CartoDB/cartodb/issues/254#issuecomment-26044777
+    SELECT table_name as t
+    FROM information_schema.tables
+    WHERE
+         table_type='BASE TABLE'
+     AND table_schema='public'
+     AND table_name NOT IN (
+      'cdb_tablemetadata',
+      'spatial_ref_sys'
+     )
+  ), perms AS (
+    SELECT t, has_table_privilege('publicuser', 'public.'||t, 'SELECT') as p
+    FROM usertables
+  )
+  SELECT t FROM perms
+  WHERE p = CASE WHEN $1 = 'private' THEN false
+                 WHEN $1 = 'public' THEN true
+                 ELSE not p -- none
+            END
+    OR $1 = 'all'
+   ;
+$$ LANGUAGE 'sql';
+
+-- This is a private function, so only the db owner need privileges
+REVOKE ALL ON FUNCTION CDB_UserTables(text) FROM PUBLIC;
+GRANT EXECUTE ON FUNCTION CDB_UserTables(text) TO ":DATABASE_USERNAME";