AIで作ったアプリ、
外から読めていないか5分で自分で確かめる

-- naisei.dev 無料の自己点検「Supabase 5分点検」（2026年10月版）
-- ・見るのは設定だけです。表の中身（会員の情報など）は読みません
-- ・何も書き換えません（SELECT 1文だけです）
-- ・結果はこの画面にだけ出ます。どこにも送られません
-- 使い方：Supabase の SQL Editor に全部貼り付けて「Run」
-- API で公開するスキーマを増やしている場合は、すぐ下の ('public') に足してください。例：('public'), ('api')
with exposed(nsp) as (values ('public')),
rels as (
  select c.oid, n.nspname || '.' || c.relname as name, c.relkind, c.relrowsecurity,
         coalesce(array_to_string(c.reloptions, ','), '') as opts
  from pg_class c
  join pg_namespace n on n.oid = c.relnamespace
  where n.nspname in (select nsp from exposed)
    and c.relkind in ('r', 'p', 'v', 'm')
    and not exists (select 1 from pg_depend d
                    where d.classid = 'pg_class'::regclass and d.objid = c.oid and d.deptype = 'e')
),
pii as (
  select a.attrelid as oid, string_agg(a.attname, ', ' order by a.attnum) as cols
  from pg_attribute a
  where a.attrelid in (select oid from rels) and a.attnum > 0 and not a.attisdropped
    and a.attname ~* '(mail|phone|tel|address|addr|zip|postal|birth|password|passwd|token|secret|card|full_?name|first_?name|last_?name|kana|line_?user|氏名|名前|住所|電話|生年月日)'
  group by a.attrelid
),
pol as (
  select r.oid, r.name, p.policyname, p.cmd,
         p.roles && array['anon', 'public']::name[] as to_anon,
         p.roles && array['authenticated']::name[] as to_auth,
         coalesce(p.qual, '') as qual, coalesce(p.with_check, '') as wcheck
  from pg_policies p
  join rels r on r.name = p.schemaname || '.' || p.tablename
  where p.permissive = 'PERMISSIVE'
),
f as (
  -- 1) 鍵（RLS）がかかっていない表
  select case when has_table_privilege('anon', r.oid, 'select') then 1
              when has_table_privilege('authenticated', r.oid, 'select') and pii.cols is not null then 1
              when has_table_privilege('authenticated', r.oid, 'select') then 2
              else 3 end as lv,
         r.name::text as target,
         (case when has_table_privilege('anon', r.oid, 'select')
                 then '鍵（RLS）がかかっておらず、ログインなしで誰でも全部読めます'
                      || case when has_table_privilege('anon', r.oid, 'insert,update,delete')
                              then '。書き換え・削除もできます' else '' end
               when has_table_privilege('authenticated', r.oid, 'select')
                 then '鍵（RLS）がかかっておらず、ログインすれば誰でも全部読めます（新規登録を誰でもできるなら、実質だれでも）'
               else '鍵（RLS）はかかっていませんが、API からは読めない設定です' end
          || coalesce('。個人情報らしき列：' || pii.cols, ''))::text as what,
         (case when has_table_privilege('anon', r.oid, 'select') or has_table_privilege('authenticated', r.oid, 'select')
               then 'この表の RLS を有効にし、読んでよい人だけに開くポリシーを作る'
               else '—' end)::text as todo
  from rels r left join pii on pii.oid = r.oid
  where r.relkind in ('r', 'p') and not r.relrowsecurity

  union all
  -- 2) 鍵はあるが「誰でも全部読める」決まり
  select case when pii.cols is not null then 1 else 2 end,
         p.name::text,
         ('「' || p.policyname || '」の決まりで、'
          || case when p.to_anon then 'ログインなしで誰でも全部読めます'
                  else 'ログインすれば誰でも全部読めます（新規登録を誰でもできるなら、実質だれでも）' end
          || coalesce('。個人情報らしき列：' || pii.cols, '。お知らせや商品など、公開してよい表なら問題ありません'))::text,
         ('読んでよい人の条件（本人の分だけ、など）に書き直す')::text
  from pol p left join pii on pii.oid = p.oid
  where p.cmd in ('SELECT', 'ALL') and p.qual = 'true'
    and ((p.to_anon and has_table_privilege('anon', p.oid, 'select'))
         or (p.to_auth and has_table_privilege('authenticated', p.oid, 'select')))

  union all
  -- 3) 誰でも書き換え・削除できる決まり
  select 1, p.name::text,
         ('「' || p.policyname || '」の決まりで、'
          || case when p.to_anon then 'ログインなしで' else 'ログインすれば' end
          || '誰でも全部の行を' || case p.cmd when 'DELETE' then '削除' when 'UPDATE' then '書き換え' else '書き換え・削除' end
          || 'できます')::text,
         ('書き換えてよい人の条件（本人の行だけ、など）に書き直す')::text
  from pol p
  where p.cmd in ('UPDATE', 'DELETE', 'ALL') and p.qual = 'true'
    and ((p.to_anon and has_table_privilege('anon', p.oid, 'update,delete'))
         or (p.to_auth and has_table_privilege('authenticated', p.oid, 'update,delete')))

  union all
  -- 4) 誰でも書き込める決まり（申込フォームなら想定どおり）
  select 2, p.name::text,
         ('「' || p.policyname || '」の決まりで、ログインなしで誰でも行を足せます。申込フォームなど、想定どおりなら問題ありません')::text,
         ('いたずら送信の対策（回数の制限など）があるか確かめる')::text
  from pol p
  where p.cmd = 'INSERT' and p.wcheck = 'true' and p.to_anon
    and has_table_privilege('anon', p.oid, 'insert')

  union all
  -- 5) 表の鍵を素通りするビュー
  select case when pii.cols is not null or pg_get_viewdef(r.oid) ~* 'auth\.users' then 1 else 2 end,
         r.name::text,
         ('このビューは表の鍵（RLS）を素通りします。'
          || case when has_table_privilege('anon', r.oid, 'select') then 'ログインなしで' else 'ログインすれば' end
          || '誰でも読めます'
          || case when pg_get_viewdef(r.oid) ~* 'auth\.users' then '。ログイン用の名簿（auth.users）を見ています' else '' end
          || coalesce('。個人情報らしき列：' || pii.cols, ''))::text,
         ('ビューに security_invoker = true を付けるか、読める人を絞る')::text
  from rels r left join pii on pii.oid = r.oid
  where r.relkind = 'v' and r.opts !~* 'security_invoker=(true|on|yes|1)'
    and (has_table_privilege('anon', r.oid, 'select') or has_table_privilege('authenticated', r.oid, 'select'))

  union all
  -- 6) 鍵をかけられない集計の表（マテリアライズドビュー）
  select case when pii.cols is not null then 1 else 2 end,
         r.name::text,
         ('集計の表（マテリアライズドビュー）には鍵をかけられません。'
          || case when has_table_privilege('anon', r.oid, 'select') then 'ログインなしで' else 'ログインすれば' end
          || '誰でも読めます' || coalesce('。個人情報らしき列：' || pii.cols, ''))::text,
         ('API から読めないように権限を外し、必要なら関数ごしに出す')::text
  from rels r left join pii on pii.oid = r.oid
  where r.relkind = 'm'
    and (has_table_privilege('anon', r.oid, 'select') or has_table_privilege('authenticated', r.oid, 'select'))

  union all
  -- 7) 作った人の権限で動く関数（表の鍵を素通りできる）
  select 2, (n.nspname || '.' || p.proname || '(' || pg_get_function_identity_arguments(p.oid) || ')')::text,
         (case when has_function_privilege('anon', p.oid, 'execute') then 'ログインなしで' else 'ログインすれば' end
          || '呼べる関数で、作った人の権限で動きます（表の鍵を素通りできます）')::text,
         ('中で「呼んだ本人の分だけ」を返しているか確かめる。要らなければ実行の権限を外す')::text
  from pg_proc p
  join pg_namespace n on n.oid = p.pronamespace
  where n.nspname in (select nsp from exposed) and p.prosecdef and p.prokind = 'f'
    and p.prorettype <> 'trigger'::regtype
    and not exists (select 1 from pg_depend d
                    where d.classid = 'pg_proc'::regclass and d.objid = p.oid and d.deptype = 'e')
    and (has_function_privilege('anon', p.oid, 'execute') or has_function_privilege('authenticated', p.oid, 'execute'))

  union all
  -- 8) 公開のバケット（ファイル置き場）
  select 2, ('ファイル置き場 ' || b.id)::text,
         ('公開の設定です。URL が分かれば、ログインなしで誰でも見られます')::text,
         ('名簿・申込書・写真などを置いていないか確かめる。置くなら非公開に')::text
  from storage.buckets b
  where b.public

  union all
  -- 9) ファイルの取り出しを誰にでも許す決まり
  select 2, ('ファイル置き場の決まり「' || p.policyname || '」')::text,
         ('ログインなしでファイルの一覧・取り出しを許しています（条件：' || coalesce(p.qual, 'なし') || '）')::text,
         ('非公開のファイルまで取り出せないか、条件を確かめる')::text
  from pg_policies p
  where p.schemaname = 'storage' and p.tablename = 'objects' and p.permissive = 'PERMISSIVE'
    and p.cmd in ('SELECT', 'ALL') and p.roles && array['anon', 'public']::name[]
),
ok as (
  select 3 as lv, '鍵（RLS）で守られている表'::text as target,
         (count(*) || '個：' || array_to_string((array_agg(r.name order by r.name))[1:12], '、')
          || case when count(*) > 12 then ' ほか' else '' end)::text as what,
         '—'::text as todo
  from rels r
  where r.relkind in ('r', 'p') and r.relrowsecurity and r.name not in (select target from f)
  having count(*) > 0

  union all
  select 3, 'ファイル置き場（非公開）'::text, (count(*) || '個')::text, '—'::text
  from storage.buckets b where not b.public
  having count(*) > 0

  union all
  select 3, '全体'::text, '要対応は見つかりませんでした'::text, '「確認」の行が意図どおりかだけ見てください'::text
  where not exists (select 1 from f where lv = 1)
)
select case lv when 1 then '要対応' when 2 then '確認' else 'OK' end as "判定",
       target as "対象", what as "何が起きるか", todo as "次にやること"
from (select * from f union all select * from ok) x
order by lv, target;