POJ 3693 Maximum repetition substring

#include<cstdio>
#include<cstring>
using namespace std;
const int nMax = 111111;

int  num[nMax];
char s[nMax];
int a[nMax];
int sa[nMax], rank[nMax], height[nMax];
int wa[nMax], wb[nMax], wv[nMax], wd[nMax];

int cmp(int *r, int a, int b, int l){
    return r[a] == r[b] && r[a+l] == r[b+l];
}
int min(int a,int b){
    return a<b ? a:b;
}

void da(int *r, int n, int m){          //  倍增算法 r为待匹配数组  n为总长度 m为字符范围
    int i, j, p, *x = wa, *y = wb, *t;
    for(i = 0; i < m; i ++) wd[i] = 0;
    for(i = 0; i < n; i ++) wd[x[i]=r[i]] ++;
    for(i = 1; i < m; i ++) wd[i] += wd[i-1];
    for(i = n-1; i >= 0; i --) sa[-- wd[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 ++) wd[i] = 0;
        for(i = 0; i < n; i ++) wd[wv[i]] ++;
        for(i = 1; i < m; i ++) wd[i] += wd[i-1];
        for(i = n-1; i >= 0; i --) sa[-- wd[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 *r, int n){           //  求height数组。
    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 -- : 0, j = sa[rank[i]-1]; r[i+k] == r[j+k]; k ++);
    }
}

int Log[nMax];
int best[20][nMax];
void initlog(){
    Log[0] = -1;
    for(int i=1;i<=nMax;i++){
        Log[i]=(i&(i-1))?Log[i-1]:Log[i-1] + 1 ;
    }
}
void initRMQ(int n) {//初始化RMQ
    for(int i = 1; i <= n ; i ++) best[0][i] = height[i];
    for(int i = 1; i <= Log[n] ; i ++) {
        int limit = n - (1<<i) + 1;
        for(int j = 1; j <= limit ; j ++) {
            best[i][j] = min(best[i-1][j] , best[i-1][j+(1<<i>>1)]);
        }
    }
}
int lcp(int a,int b) {//询问a,b后缀的最长公共前缀
    a = rank[a];    b = rank[b];
    if(a > b){
        int tem=a;
        a=b;b=tem;
    }
    //printf("%d %d\n",a,b);
    a ++;
    int t = Log[b - a + 1];
    return min(best[t][a] , best[t][b - (1<<t) + 1]);
}
int main(){
    initlog();
    int kase=1;
    int k,step,ti,tl,ttl;
    while(scanf("%s",s)!=EOF&&s[0]!='#'){
        int len=(int)strlen(s);
        for(int i=0;i<len;i++)  num[i]=s[i]-'a'+1;
        num[len]=0;
        da(num,len+1,30);
        calHeight(num,len);
        initRMQ(len);
        int cnt=0,tmax=-1;
        for(int l=1;l<len;l++){
            for(int i=0;i+l<len;i+=l){
                k=lcp(i,i+l);
                step=k/l+1;
                ti=i-(l-k%l);
                if(ti>=0&&k%l!=0){
                    if(lcp(ti,ti+l)>=k)  step++;
                }
                if(tmax<step){
                    cnt=0;
                    tmax=step;
                    a[cnt++]=l;
                }
                if(tmax==step){
                    a[cnt++]=l;
                }
            }
        }
        int flag=0,start;
        for(int i=1;i<len&&!flag;i++){
            for(int j=0;j<cnt;j++){
                tl=a[j];
                if(lcp(sa[i],sa[i]+tl)>=(tmax-1)*tl){
                    start=sa[i];
                    ttl=tl*tmax;
                    flag=1;
                    break;
                }
            }
        }
        printf("Case %d: ",kase++);
        for(int i=start;i<start+ttl;i++)  printf("%c",s[i]);
        printf("\n");
    }
    return 0;
}