poj 1226 Substrings (后缀数组)

http://poj.org/problem?id=1226

    求给定的字符串及其反串的最大公共子串。

    后缀数组，将所有的字符串及其子串连接起来，用分隔符隔开，并给每个字符串及反串的字符标记所在串。二分答案，看是否有n个字符串或者其反串存在长为mid的公共前缀。
code:

#include<cstdio>
#include<cstring>
#define Max(a, b)   a>b?a:b
const int maxn = 10001 ;
int wa[maxn], wb[maxn], wv[maxn], ws[maxn], rank[maxn], height[maxn], sa[maxn], s[maxn], loc[maxn] ;
bool vis[1001] ;
char str[101] ;
int cmp(int *r,int a,int b,int l){
    return r[a]==r[b] && r[a+l]==r[b+l] ;
}
int n ;
void da(int *r, 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]=r[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=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++) ws[i] = 0 ;
        for(i=0; i<n; i++) ws[wv[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, 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 ++ ;
    }
    return ;
}
void calheight(int *r, 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--:0, j=sa[rank[i]-1]; r[i+k]==r[j+k]; k++) ;
    return ;
}
int check(int mid, int len){
    int count = 0 ;
    memset(vis, false, sizeof(vis)) ;
    for(int i=2; i<=len; i++){
        if(mid>height[i]){
            memset(vis, false, sizeof(vis)) ;
            count = 0 ;
            continue ;
        }
        if(!vis[loc[sa[i-1]]])    vis[loc[sa[i-1]]] = true, count ++ ;
        if(!vis[loc[sa[i]]])    vis[loc[sa[i]]] = true, count ++ ;
        if(count==n)    return 1 ;
    }
    return 0 ;
}
int main(){
    int t, i, j, temp, m, ans ;
    scanf("%d", &t) ;
    while(t--){
        scanf("%d", &n) ;
        temp = 300 ;
        m = 0 ;
        ans = 0 ;
        for(i=1; i<=n; i++){
            scanf("%s", str) ;
            for(j=0; j<strlen(str); j++){
                s[m] = str[j] ;
                loc[m++] = i ;
            }
            s[m] = temp ;
            loc[m++] = temp ++ ;
            for(j=strlen(str)-1; j>=0; j--){
                s[m] = str[j] ;
                loc[m++] = i ;
            }
            s[m] = temp ;
            loc[m++] = temp ++ ;
        }
        s[m] = 0 ;
        da(s, m+1 ,temp) ;
        calheight(s, m) ;
        int left=0, right=strlen(str), mid ;
        while(left<=right){
            mid = (left + right) / 2 ;
            if(check(mid, m)){
                left = mid + 1 ;
                ans = mid ;
            }else
                right = mid - 1 ;
        }
        printf("%d\n", ans) ;
    }
    return 0 ;}