【POJ】3294 Life Forms

#include<cstdio>
#include<cstring>
#include<algorithm>
using namespace std;
#define MAXN 1100
#define MAXL 200100
char str[MAXN][MAXN],s[MAXL];
int wa[MAXL],wb[MAXL],wv[MAXL],ws[MAXL];
int sa[MAXL],height[MAXL],rk[MAXL];
int m,len[MAXN];
inline bool cmp(int *r,int a,int b,int L)
{
    return r[a]==r[b]&&r[a+L]==r[b+L];
}
void SA(int n,int m)
{
    int i,j,p,*x=wa,*y=wb,*t;
    for(i=0;i<m;i++)
        ws[i]=0;
    for(i=0;i<n;i++)
        ws[x[i]=s[i]]++;
    for(i=1;i<m;i++)
        ws[i]+=ws[i-1];
    for(i=n-1;i>=0;i--)
        sa[--ws[x[i]]]=i;
    for(j=p=1;p<n;j<<=1,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<m;i++)
            ws[i]=0;
        for(i=0;i<n;i++)
            ws[wv[i]=x[y[i]]]++;
        for(i=1;i<m;i++)
            ws[i]+=ws[i-1];
        for(i=n-1;i>=0;i--)
            sa[--ws[wv[i]]]=y[i];
        for(t=x,x=y,y=t,x[sa[0]]=0,p=i=1;i<n;i++)
            x[sa[i]]=cmp(y,sa[i-1],sa[i],j)?p-1:p++;
    }
}
void Height(int n)
{
    int i,j,k;
    for(i=1;i<=n;i++)
        rk[sa[i]]=i;
    for(i=k=0;i<n;height[rk[i++]]=k)
        for(k?k--:0,j=sa[rk[i]-1];s[i+k]==s[j+k];k++);
}
bool OK(int n,int mid)
{
    int i,j,k,t,cnt;
    bool h[MAXN];
    for(i=1;i<=n;i++)
    {
        if(height[i]>=mid)
        {
            memset(h,false,sizeof(h));
            for(j=i;j<=n&&height[j]>=mid;j++);
            for(k=i-1;k<j;k++)
            {
                t=upper_bound(len,len+m,sa[k])-len;
                h[t]=true;
            }
            for(k=cnt=0;k<m;k++)
            {
                if(h[k])
                    cnt++;
            }
            if(cnt>(m>>1))
                return true;
            i=j-1;
        }
    }
    return false;
}
void Print(int n,int low)
{
    int i,j,k,t,cnt;
    bool h[MAXN];
    for(i=1;i<=n;i++)
    {
        if(height[i]>=low)
        {
            memset(h,false,sizeof(h));
            for(j=i;j<=n&&height[j]>=low;j++);
            for(k=i-1;k<j;k++)
            {
                t=upper_bound(len,len+m,sa[k])-len;
                h[t]=true;
            }
            for(k=cnt=0;k<m;k++)
            {
                if(h[k])
                    cnt++;
            }
            if(cnt>(m>>1))
            {
                for(k=sa[i];k<sa[i]+low;k++)
                    putchar(s[k]);
                putchar('\n');
            }
            i=j-1;
        }
    }
}
int main()
{
    int n,i,j,high,low,mid;
    bool first=true;
    while(scanf("%d",&m),m)
    {
        if(first)
            first=false;
        else
            putchar('\n');
        high=0;
        for(i=s[0]=0;i<m;i++)
        {
            scanf(" %s",str[i]);
            n=strlen(str[i]);
            if(i+1>='a')
                str[i][n]='a'-1;
            else
                str[i][n]=i+1;
            str[i][n+1]=0;
            high=max(high,n);
            strcat(s,str[i]);
            len[i]=strlen(s);
        }
        n=len[m-1]-1;
        s[n]=0;
        SA(n+1,256);
        Height(n);
        for(low=0,high++;low<high;)
        {
            mid=(low+high)>>1;
            if(OK(n,mid))
                low=mid+1;
            else
                high=mid;
        }
        low=max(low-1,0);
        if(low)
            Print(n,low);
        else
            puts("?");
    }
    return 0;
}