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
=str[j];
bel[n++]=i;
}
r
=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;
}