POJ-3294-Life Forms

罗大神论文中的倒数第二题，思路论文上也有

代码:

#include<cstdio>
#include<cstring>
#include<iostream>
using namespace std;
const int maxn=1e5+1000;
const int maxm=101;
char str[1001];
int n,m,d,bel[maxn],r[maxn],wa[maxn],wb[maxn],wv[maxn],wu[maxn],rank[maxn],sa[maxn],height[maxn];
bool vis[maxm];
int cmp(int *r,int a,int b,int l)
{
    return r[a]==r[b]&&r[a+l]==r[b+l];
}
void da(int n,int m)
{
    int i,j,p,*x=wa,*y=wb,*t;
    for(i=0;i<m;i++)
	wu[i]=0;
    for(i=0;i<n;i++)
	wu[x[i]=r[i]]++;
    for(i=1;i<m;i++)
	wu[i]+=wu[i-1];
    for(i=n-1;i>=0;i--)
	sa[--wu[x[i]]]=i;
    for(j=1,p=1;p<n;j*=2,m=p)
    {
	for(p=0,i=n-j;i<n;i++)
	    y[p++]=i;
	for(i=0;i<n;i++)
	    if(sa[i]>=j)
		y[p++]=sa[i]-j;
	for(i=0;i<n;i++)
	    wv[i]=x[y[i]];
	for(i=0;i<m;i++)
	    wu[i]=0;
	for(i=0;i<n;i++)
	    wu[wv[i]]++;
	for(i=1;i<m;i++)
	    wu[i]+=wu[i-1];
	for(i=n-1;i>=0;i--)
	    sa[--wu[wv[i]]]=y[i];
	for(t=x,x=y,y=t,p=1,x[sa[0]]=0,i=1;i<n;i++)
	    x[sa[i]]=cmp(y,sa[i-1],sa[i],j)?p-1:p++;
    }
}
void calheight(int n)
{
    int i,j,k=0;
    for(i=1;i<=n;i++)
	rank[sa[i]]=i;
    for(i=0;i<n;height[rank[i++]]=k)
	for(k?k--:k=0,j=sa[rank[i]-1];r[i+k]==r[j+k];k++);
}
bool test(int val)
{
    int cnt=0;
    memset(vis,0,sizeof(vis));
    vis[0]=1;
    vis[bel[sa[0]]]=1;
    cnt=1;
    for(int i=1;i<=n;i++)
    {
	if(height[i]<val)
	{
	    cnt=0;
	    memset(vis,0,sizeof(vis));
	    vis[0]=1;
	}
	if(!vis[bel[sa[i]]])
	{
	    vis[bel[sa[i]]]=1;
	    if(++cnt>m/2)
		return true;
	}
    }
    return false;
}
void GetAns(int val)
{
    int cnt=0;
    memset(vis,0,sizeof(vis));
    vis[0]=1;
    vis[bel[sa[0]]]=1;
    cnt=1;
    for(int i=1;i<=n;i++)
    {
	if(height[i]<val)
	{
	    if(cnt>m/2)
	    {
		for(int j=sa[i-1];j<sa[i-1]+val;j++)
		    printf("%c",r[j]);
		printf("\n");
	    }
	    cnt=0;
	    memset(vis,0,sizeof(vis));
	    vis[0]=1;
	}
	if(!vis[bel[sa[i]]])
	{
	    vis[bel[sa[i]]]=1;
	    cnt++;
	}
    }
    if(++cnt>m/2)
    {
       for(int i=sa[i-1];i<sa[i-1]+val;i++)
	   printf("%c",r[i]);
       printf("\n");
    }
}
int main()
{
    bool f=0;
    while(scanf("%d",&m)&&m)
    {
	if(f)
	    printf("\n");
	else
	    f=1;
	n=0;
	d=123;
	for(int i=1;i<=m;i++)
	{
	    scanf("%s",str);
	    int len=strlen(str);
	    for(int j=0;j<len;j++)
	    {
		r[n]=str[j];
		bel[n++]=i;
	    }
	    r[n]=d++;
	    bel[n++]=0;
	}
	r[--n]=0;
	da(n+1,500);
	calheight(n);
	int l=1,r=n,ans=-1;
	while(l<=r)
	{
	    int mid=(l+r)>>1;
	    if(test(mid))
	    {
		ans=mid;
		l=mid+1;
	    }
	    else
		r=mid-1;
	}
	if(ans==-1)
	    printf("?\n");
	else
	    GetAns(ans);

    }
    return 0;
}