POJ 3294 二分找超过一半字符串中存在的子串

题目大意：

给定n个字符串，求出现在不小于k/2个字符串中的最长子串。 

二分找对应子串长度的答案，将所有字符串链接成一个长字符串求后缀数组，记录每一个位置本属于第几个字符串，利用height查询的时候，

根据记录的位置不断判断是否出现重复的字符串是在同一个字符串内的

#include <cstdio>
#include <cstring>
#include <vector>
#include <iostream>
using namespace std;
typedef long long ll;
const int N = 200010;
int r[N] , sa[N] , rank[N] , height[N];
int K , wa[N] , wb[N] , wv[N] , wsf[N];
int cmp(int *r , int a , int b , int l){return r[a]==r[b]&&r[a+l]==r[b+l];}
void da(int *r , int *sa , int n , int m)
{
    int i,j,p,*x=wa,*y=wb,*t;
    for(i=0;i<m;i++)wsf[i]=0;
    for(i=0;i<n;i++)wsf[x[i]=r[i]]++;
    for(i=1 ; i<m ; i++) wsf[i]+=wsf[i-1];
    for(i=n-1;i>=0;i--) sa[--wsf[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++) wsf[i]=0;
        for(i=0;i<n;i++) wsf[wv[i]]++;
        for(i=1;i<m;i++) wsf[i]+=wsf[i-1];
        for(i=n-1;i>=0;i--) sa[--wsf[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 callHeight(int *r , int *sa , 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;
}
#define ll long long
int n , len , pos[105][2] , dif , mp[N];
bool vis[105];
char s[105][1005] , all[N];
vector<int> ans , tmp;
bool check(int mid)
{
    tmp.clear();
    bool flag = false;
    memset(vis , 0 , sizeof(vis));
    int cnt = 1 , rec = sa[0];
    vis[sa[0]] = true;
    for(int i=1 ; i<len ; i++){
        if(height[i]<mid){
            if(cnt>n/2){
                tmp.push_back(rec);
                flag = true;
            }
            memset(vis , 0 , sizeof(vis));
            cnt = 1 , vis[mp[sa[i]]] = true , rec = sa[i];
        }
        else{
            if(!vis[mp[sa[i]]]){
                vis[mp[sa[i]]] = true;
                cnt++;
                rec = sa[i];
            }
        }
    }
    if(flag) ans = tmp;
    return flag;
}
int bin_search()
{
    int l=0 , r=1000 , ans=0 , mid;
    while(l<=r){
        mid = (l+r)>>1;
        if(check(mid)) l=mid+1 , ans=mid;
        else r=mid-1;
    }
    return ans;
}
int main()
{
   // freopen("a.in" , "r" , stdin);
    bool flag = false;
    while(scanf("%d" , &n) , n){
        if(flag) puts("");
        flag = true;
        len = 0 , dif = 27;
        for(int i=0 ; i<n ; i++){
            scanf("%s" , s[i]);
            for(int j=0 ; j<strlen(s[i]) ; j++) all[len] = s[i][j] , mp[len]=i+1 , r[len++] = s[i][j]-'a'+1;
            pos[i][0] = len;
            all[len] = '*';
            mp[len]=i+1 , r[len++] = dif++;
        }
        r[len-1] = 0;
        da(r , sa , len , dif);
       // for(int i=0 ; i<len ; i++) cout<<"i: "<<i<<" "<<sa[i]<<endl;
        callHeight(r , sa , len-1);
        int ret = bin_search();
        if(!ret) puts("?");
        else{
            for(int i=0 ; i<ans.size() ; i++){
                for(int j=ans[i] , t=0 ; t<ret ; j++ , t++) printf("%c" , all[j]);
                puts("");
            }
        }
    }
}