杭电3065(HDU3065)

#include<stdio.h>
#include<string.h>
#include<algorithm>
using namespace std;
#define N 2000010
struct node
{
    node *fail;
    node *next[128];
    int count,id;
    node()
    {
        fail=NULL;
        count=0;
        for(int i=0;i<128;i++)
            next[i]=NULL;
    }
}*q[200010];
node *root;
char str[N],a[1010][55];
int ans[1010];
void insert(char *s,int c)
{
    node *p=root;
    int i,j,len=strlen(s);
    for(i=0;i<len;i++)
    {
        j=s[i];
        if(p->next[j]==NULL)
            p->next[j]=new node();
        p=p->next[j];
    }
    p->count++;
    p->id=c+1;
}
void build()
{
    int i,j,head=0,tail=0;
    node *p,*tmp;
    q[tail++]=root;
    while(head!=tail)
    {
        p=q[head++];
        for(i=0;i<128;i++)
        {
            if(p->next[i]!=NULL)
            {
                if(p==root)
                    p->next[i]->fail=root;
                else
                {
                    tmp=p->fail;
                    while(tmp!=NULL)
                    {
                        if(tmp->next[i]!=NULL)
                        {
                            p->next[i]->fail=tmp->next[i];
                            break;
                        }
                        tmp=tmp->fail;
                    }
                    if(tmp==NULL)
                        p->next[i]->fail=root;
                }
                q[tail++]=p->next[i];
            }
        }
    }
}
void query()
{
    int i,j,len=strlen(str);
    node *p=root,*tmp;
    memset(ans,0,sizeof(ans));
    for(i=0;i<len;i++)
    {
        j=str[i];
        while(p->next[j]==NULL&&p!=root)
            p=p->fail;
        p=p->next[j];
        if(p==NULL)
            p=root;
        tmp=p;
        while(tmp!=NULL)
        {
            if(tmp->count>0)
                ans[tmp->id]++;
            tmp=tmp->fail;
        }
    }
}
void del(node *a)//由于数组较大且多次输入,所以每次结束后需要把空间释放出来,否则会MLT
{
    for(int i=0;i<128;i++)
    {
        if(a->next[i]!=NULL)
            del(a->next[i]);
        delete(a->next[i]);
    }
}
int main()
{
    int n,i,j,k;
    while(scanf("%d",&n)!=EOF)
    {
        root=new node();
        for(i=0;i<n;i++)
        {
            scanf("%s",a[i]);
            insert(a[i],i);
        }
        build();
        scanf("%s",str);
        query();
        for(i=1;i<=n;i++)
            if(ans[i])
            printf("%s: %d\n",a[i-1],ans[i]);
            del(root);
    }
    return 0;
}