蒟蒻求调，只用了拓扑

#include<bits/stdc++.h>
using namespace std;

const int N=4e5+10,M=4e5+10;
int n,m;
int to[M],nxt[M],h[N],tot,deg[N];
int v[N];//有限可到
int cnt[N];//到过几次
int V[N];//BFS可到

void add(int x,int y)
{
	to[++tot]=y;
	nxt[tot]=h[x];
	h[x]=tot;
	deg[y]++;
}

void topsort()
{
	queue<int> q;
	q.push(0);
	v[0]=1;
	cnt[0]++;
	while(q.size())
	{
		int x=q.front();q.pop();
		for(int i=h[x];i;i=nxt[i])
		{
			int y=to[i];
			cnt[y]++;
			if(--deg[y]==0)
			{
				q.push(y);
				v[y]=1;
			}
		}
	}
}

void BFS()
{
	queue<int> q;
	q.push(1);
	V[1]=1;
	while(q.size())
	{
		int x=q.front();q.pop();
		for(int i=h[x];i;i=nxt[i])
		{
			int y=to[i];
			if(!V[y])q.push(y),V[y]=1;
		}
	}
}

int main()
{
	int t;
	cin>>t;
	while(t--)
	{
		for(int i=0;i<=n;i++)
		{
			cnt[i]=v[i]=V[i]=h[i]=deg[i]=0;
		}
		tot=0;
	scanf("%d%d",&n,&m);
	for(int i=1;i<=m;i++)
	{
		int x,y;
		scanf("%d%d",&x,&y);
		add(x,y);
	}
	add(0,1);
	BFS();
	for(int i=1;i<=n;i++)
	{
		if(!V[i])
		{
			for(int j=h[i];j;j=nxt[j])
			{
				deg[to[j]]--;
			}
		}
	}
	topsort();
	for(int i=1;i<=n;i++)
	{
		if(!v[i]&&V[i])
		{
			cout<<-1<<" ";
			continue;
		}
		if(!V[i])
		{
			cout<<0<<" ";
			continue;
		}
		if(v[i]&&cnt[i]==1)
		{
			cout<<1<<" ";
			continue;
		}
		if(v[i]&&cnt[i]>1)
		{
			cout<<2<<" ";
			continue;
		}
	}
	}
	return 0;
}