【POJ】3415 Common Substrings

#include<cstdio>
#include<cstring>
typedef __int64 LL;
#define MAXN 200010
char s[MAXN];
int wa[MAXN],wb[MAXN],wv[MAXN],ws[MAXN];
int sa[MAXN],height[MAXN],rk[MAXN];
int stk[MAXN],cnt[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++);
}
int main()
{
    LL ans,temp;
    int k,len,n,i,top,size;
    while(scanf("%d",&k),k)
    {
        scanf(" %s",s);
        len=strlen(s);
        s[len]='#';
        scanf(" %s",s+len+1);
        n=strlen(s);
        SA(n+1,'z'+1);
        Height(n);
        for(i=1;i<=n;i++)
        {
            if(height[i]>=k)
                height[i]-=k-1;
            else
                height[i]=0;
        }
        ans=temp=0;
        top=-1;
        for(i=1;i<=n;i++)
        {
            for(size=0;top>-1&&stk[top]>height[i];top--)
            {
                size+=cnt[top];
                temp+=(height[i]-stk[top])*cnt[top];
            }
            stk[++top]=height[i];
            cnt[top]=size;
            if(sa[i-1]<len)
            {
                temp+=height[i];
                cnt[top]++;
            }
            if(sa[i]>len)
                ans+=temp;
        }
        temp=0;
        top=-1;
        for(i=1;i<=n;i++)
        {
            for(size=0;top>-1&&stk[top]>height[i];top--)
            {
                size+=cnt[top];
                temp+=(height[i]-stk[top])*cnt[top];
            }
            stk[++top]=height[i];
            cnt[top]=size;
            if(sa[i-1]>len)
            {
                temp+=height[i];
                cnt[top]++;
            }
            if(sa[i]<len)
                ans+=temp;
        }
        printf("%I64d\n",ans);
    }
    return 0;
}