【2012 百度之星资格赛 H:用户请求中的品牌】

H:用户请求中的品牌

• 查看
• 提交
• 统计
• 提问

时间限制: 

1000ms

 

内存限制: 

65536kB

描述

馅饼同学是一个在百度工作，做用户请求（query）分析的同学，他在用户请求中经常会遇到一些很奇葩的词汇。在比方说“johnsonjohnson”、“duckduck”，这些词汇虽然看起来是一些词汇的单纯重复，但是往往都是一些特殊品牌的词汇，不能被拆分开。为了侦测出这种词的存在，你今天需要完成我给出的这个任务——“找出用户请求中循环节最多的子串”。

输入

输入数据包括多组，每组为一个全部由小写字母组成的不含空格的用户请求（字符串），占一行。用户请求的长度不大于100,000。
最后一行输入为#，作为结束的标志。

输出

对于每组输入，先输出这个组的编号（第n组就是输出“Case n:”）；然后输出这组用户请求中循环节最多的子串。如果一个用户请求中有两个循环节数相同的子串，请选择那个字典序最小的。

样例输入

ilovejohnsonjohnsonverymuch
duckduckgo
aaabbbcccisagoodcompany
#

样例输出

Case 1: johnsonjohnson
Case 2: duckduck
Case 3: aaa

#include<stdio.h>
#include<string.h>
#include<stdlib.h>
#define MAXD 100010
#define INF 0x3f3f3f3f
char b[MAXD];
int N, r[MAXD], sa[MAXD], rank[MAXD], height[MAXD], wa[MAXD], wb[MAXD], ws[MAXD], wv[MAXD];
int best[20][MAXD], mm[MAXD], len[MAXD], first[MAXD], P;
void init()
{
    int i;
    for(i = 0; b[i]; i ++)
        r[i] = b[i];
    r[N = i] = 0;
}
int cmp(int *p, int x, int y, int l)
{
    return p[x] == p[y] && p[x + l] == p[y + l];
}
int cmp1(const void *_p, const void *_q)
{
    int i, *p = (int *)_p, *q = (int *)_q;
    for(i = 0; i < len[*p] && i < len[*q]; i ++)
    {
        if(r[first[*p] + i] < r[first[*q] + i])
            return -1;
        else if(r[first[*p] + i] > r[first[*q] + i])
            return 1;
    }
    if(i == len[*p])
        return -1;
    return 1;
}
void da(int n, int m)
{
    int i, j, p, *x = wa, *y = wb, *t;
    memset(ws, 0, sizeof(ws[0]) * m);
    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 = 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]];
        memset(ws, 0, sizeof(ws[0]) * m);
        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, x[sa[0]] = 0, i = p = 1; i < n; i ++)
            x[sa[i]] = cmp(y, sa[i - 1], sa[i], j) ? p - 1 : p ++;
    }
}
void calheight(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 ++);
}
void initRMQ(int n)
{
    int i, j, x, y;
    for(mm[0] = -1, i = 1; i <= n; i ++)
        mm[i] = (i & (i - 1)) == 0 ? mm[i - 1] + 1 : mm[i - 1];
    for(i = 1; i <= n; i ++)
        best[0][i] = i;
    for(i = 1; i <= mm[n]; i ++)
        for(j = 1; j <= n - (1 << i) + 1; j ++)
        {
            x = best[i - 1][j];
            y = best[i - 1][j + (1 << (i - 1))];
            best[i][j] = height[x] < height[y] ? x : y;
        }
}
int askRMQ(int x, int y)
{
    int t = mm[y - x + 1];
    y = y - (1 << t) + 1;
    x = best[t][x];
    y = best[t][y];
    return height[x] < height[y] ? height[x] : height[y];
}
int calculate(int x, int y)
{
    int t;
    x = rank[x], y = rank[y];
    if(x > y)
        t = x, x = y, y = t;
    ++ x;
    return askRMQ(x, y);
}
void printresult(int max)
{
    int i, j, k;
    if(max == 1)
    {
        k = INF;
        for(i = 0; i < N; i ++)
            if(r[i] < k)
                k = r[i];
        printf("%c\n", k);
    }
    else
    {
        for(i = 0; i < P; i ++)
            ws[i] = i;
        qsort(ws, P, sizeof(ws[0]), cmp1);
        for(i = 0, k = ws[0]; i < len[k]; i ++)
            printf("%c", r[first[k] + i]);
        printf("\n");
    }
}
void solve()
{
    int i, j, k, p, max = 1, ans;
    da(N + 1, 128);
    calheight(N);
    initRMQ(N);
    for(i = 1; i < N; i ++)
        for(j = 0; j + i < N; j += i)
        {
            ans = calculate(j, j + i);
            k = j - (i - ans % i);
            ans = ans / i + 1;
            if(ans < max - 1 || (ans == max - 1 && calculate(k, k + i) < i))
                continue;
            for(k = ans == max - 1 ? k : j; j - k < i; k --)
            {
                ans = calculate(k, k + i);
                ans = ans / i + 1;
                if(ans < max)
                    break;
                if(ans > max)
                {
                    max = ans;
                    P = 0;
                }
                first[P] = k, len[P] = ans * i;
                ++ P;
            }
        }
    printresult(max);
}
int main()
{
    int t = 0;
    for(;;)
    {
        scanf("%s", b);
        if(b[0] == '#')
            break;
        printf("Case %d: ", ++ t);
        init();
        solve();
    }
    return 0;
}