HDU 6138 2017多校第八场1006 Fleet of the Eternal Throne ：AC自动机

题意：给出n（<=1e5）个串（总长度<=1e5），以及q(<=300，数据有点弱，q改成1e5才好)次询问，每次询问给出x和y，表示输入的第x个和第y个串，要求找出一个最长的字串p，满足：p是x的字串，p是y的字串，且p是这n个串中某一个（可以是多个）的前缀,输出这个最大的长度。

题解：对n个串造出 自动AC机 ，这里的AC机不需要维护单词的结束点  需要维护一个每个节点到根的距离，也就是前缀的长度。然后用x跑一遍AC机，在所有匹配成功的结束节点上记上一个标记（直接记成询问次数就行了：第一次询问flag记成1，第二次记成2，这样保证每次的flag都不一样就不用清空标记了），然后这些标记点的意思就是：这个前缀是n个串中某个的前缀，且这个前缀是串x的字串。然后再用y跑一次AC机，在y匹配成功的节点，如果他刚刚被打了标记，那就统计最长的length就可以。

十分钟手切的自动AC机，在剩下最后五分钟的时候，过了样例就直接交了，然后队友一直在刷新Ranklist，突然发现A了。。。妈耶。。这太惊悚了有木有

Code：

#include<bits/stdc++.h>
using namespace std;
const int MAX = 100005;
struct AC{
	AC* nxt[26];
	AC* fail;
	int length;
	int flag;
};
AC* root;
int n,q,ans;
int index[MAX];
char allchar[MAX*10];
void clear(AC* node){
	for (int i=0;i<=25;i++){
		if (node->nxt[i]!=NULL){
			clear(node->nxt[i]);
		}
	}
	free(node);
}
AC* create(){
	AC* node = (AC*)(malloc(sizeof(AC)));
	memset(node->nxt,0,sizeof(node->nxt));
	node->fail = NULL;
	node->flag = -1;
	node->length =0;
	return node;
}
AC* insert(AC* root,char* word){
	AC* node = root;
	char* p = word;
	while (*p){
//		cout<<*p<<endl;
		int id = *p-'a';
		if (node->nxt[id]==NULL){
			node->nxt[id]= create();
		}
		node->nxt[id]->length = node->length+1;
		node = node->nxt[id];
		p ++;
	}
}
void init(){
	if (root!=NULL){
		clear(root);
	}
	root = create();
}
void input(){
	scanf("%d",&n);
	int delta = 0;
	for (int i=1;i<=n;i++){
		index[i] = delta;
		scanf("%s",allchar+delta);
		insert(root,allchar+delta);
		delta+=strlen(allchar+delta)+1;
	}
}
AC* que[MAX*10];
void build(){
	int l=0;
	int r=1;
	que[1]= root;
	root->fail = root;
	while (l<r){
		l++;
		AC* q = que[l];
		for (int i=0;i<=25;i++){
			if (q->nxt[i]!=NULL){
				if (q==root){
					q->nxt[i]->fail = root;
				}else{
					q->nxt[i]->fail = q->fail;
					while (q->nxt[i]->fail->nxt[i]==NULL&&q->nxt[i]->fail!=root){
						q->nxt[i]->fail = q->nxt[i]->fail->fail;
					}
					if (q->nxt[i]->fail->nxt[i]!=NULL){
						q->nxt[i]->fail = q->nxt[i]->fail->nxt[i];
					}
				}
				r++;
				que[r] = q->nxt[i];
			}
		}
	}
}
void search(char * word,int f){
	AC* node = root;
	char* p = word;
	while (*p){
//		cout<<*p<<endl;
		int id = *p-'a';
		while (node!=root&&node->nxt[id]==NULL){
			node = node->fail;
		}
		if (node->nxt[id]!=NULL){
			node = node->nxt[id];
		}
		AC* temp = node;
		while (temp!=root){
			temp->flag = f;
			temp = temp->fail;
		}
		p++;
	}
}
void query(char * word,int f){
	AC* node = root;
	char* p = word;
	while (*p){
//		cout<<*p<<endl;
		int id = *p-'a';
		while (node!=root&&node->nxt[id]==NULL){
			node = node->fail;
		}
		if (node->nxt[id]!=NULL){
			node = node->nxt[id];
		}
		AC* temp = node;
		while (temp!=root){
			if (temp->flag ==f){
				ans = max(ans,temp->length);
			}
			temp = temp->fail;
		}
		p++;
	}
}
void solve(){
	scanf("%d",&q);
	for (int i=1;i<=q;i++){
		int x,y;
		scanf("%d%d",&x,&y);
		search(allchar+index[x],i);
		ans =0;
		query(allchar+index[y],i);
		printf("%d\n",ans);
	}
}
int main(){
	int t;
	scanf("%d",&t);
	while (t--){
		init();
		input();
		build();
		solve();
	}
}