【POJ】3693 Maximum repetition substring

#include<cstdio>
#include<algorithm>
using namespace std;
#define MAXN 100010
#define MAXM 20
char s[MAXN];
int wa[MAXN],wb[MAXN],wv[MAXN],ws[MAXN];
int sa[MAXN],height[MAXN],rk[MAXN];
int st[MAXM][MAXN],log2[MAXN];
int len[MAXN];
inline bool cmp(int *r,int a,int b,int len)
{
    return r[a]==r[b]&&r[a+len]==r[b+len];
}
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++);
}
void Init()
{
    int i,k;
    log2[1]=0;
    for(i=k=2;i<MAXN;i++)
    {
        if(i>=(1<<k))
            k++;
        log2[i]=k-1;
    }
}
void ST(int n)
{
    int i,j;
    for(i=1;i<=n;i++)
        st[0][i]=height[i];
    for(j=1;(1<<j)<=n;j++)
    {
        for(i=1;i+(1<<j)<=n+1;i++)
            st[j][i]=min(st[j-1][i],st[j-1][i+(1<<(j-1))]);
    }
}
int LCP(int i,int j)
{
    i=rk[i];
    j=rk[j];
    if(i>j)
        swap(i,j);
    i++;
    int k=log2[j-i+1];
    return min(st[k][i],st[k][j-(1<<k)+1]);
}
int main()
{
    int n,ca=1;
    int i,j,k,temp,res,ans,pos,cnt,bg;
    Init();
    while(scanf(" %s",s),s[0]!='#')
    {
        n=strlen(s);
        SA(n+1,'z'+1);
        Height(n);
        ST(n);
        ans=0;
        for(i=1;i<=(n>>1);i++)
        {
            for(res=j=0;j+i<=n;j+=i)
            {
                k=LCP(j,j+i);
                temp=k/i+1;
                pos=j-(i-k%i);
                if(pos>=0&&LCP(pos,pos+i)>=i)
                    temp++;
                res=max(res,temp);
            }
            if(res>ans)
            {
                ans=res;
                cnt=0;
                len[cnt++]=i;
            }
            else if(res==ans)
                len[cnt++]=i;
        }
        for(i=1;i<=n;i++)
        {
            for(j=0;j<cnt;j++)
            {
                if(sa[i]+len[j]<=n&&LCP(sa[i],sa[i]+len[j])>=len[j]*(ans-1))
                    break;
            }
            if(j!=cnt)
                break;
        }
        printf("Case %d: ",ca++);
        temp=sa[i]+len[j]*ans;
        for(k=sa[i];k<temp;k++)
            putchar(s[k]);
        putchar('\n');
    }
    return 0;
}