[HDU3518]Boring counting

#include <iostream>
#include <cstdio>
#include <cstdlib>
#include <cstring>
#include <cctype>
#include <algorithm>

#define maxn 1010

char S[maxn];
int n, rank[maxn], height[maxn], sa[maxn], Ws[maxn];
bool cmp(int* a, int p1, int p2, int l) {
	if(p1 + l > n && p2 + l > n) return a[p1] == a[p2];
	if(p1 + l > n || p2 + l > n) return 0;
	return a[p1] == a[p2] && a[p1+l] == a[p2+l];
}
void ssort() {
	int *x = rank, *y = height;
	int m = 0;
	memset(Ws, 0, sizeof(Ws));
	for(int i = 1; i <= n; i++) Ws[x[i] = S[i]]++, m = std::max(m, x[i]);
	for(int i = 1; i <= m; i++) Ws[i] += Ws[i-1];
	for(int i = n; i; i--) sa[Ws[x[i]]--] = i;
	for(int j = 1, pos = 0; pos < n; j <<= 1, m = pos) {
		pos = 0;
		for(int i = n - j + 1; i <= n; i++) y[++pos] = i;
		for(int i = 1; i <= n; i++) if(sa[i] > j) y[++pos] = sa[i] - j;
		for(int i = 1; i <= m; i++) Ws[i] = 0;
		for(int i = 1; i <= n; i++) Ws[x[i]]++;
		for(int i = 1; i <= m; i++) Ws[i] += Ws[i-1];
		for(int i = n; i; i--) sa[Ws[x[y[i]]]--] = y[i];
		std::swap(x, y); pos = 1; x[sa[1]] = 1;
		for(int i = 2; i <= n; i++) x[sa[i]] = cmp(y, sa[i], sa[i-1], j) ? pos : ++pos;
	}
	return ;
}
void calch() {
	for(int i = 1; i <= n; i++) rank[sa[i]] = i;
	for(int i = 1, j, k = 0; i <= n; height[rank[i++]] = k)
		for(k ? k-- : 0, j = sa[rank[i]-1]; S[j+k] == S[i+k]; k++);
	return ;
}

int tag[maxn];

int main() {
	while(~scanf("%s", S + 1)) {
		if(S[1] == ‘#‘) break;
		n = strlen(S + 1);
		
		ssort();
		calch();
		memset(tag, 0, sizeof(tag));
		int ans = 0;
		for(int i = 1; i <= n; i++)
			for(int len = tag[i] + 1; len <= n - sa[i] + 1; len++) {
				int cnt = 0, mnp = sa[i], mxp = sa[i];
				for(int j = i + 1; j <= n && height[j] >= len; j++) {
					tag[j] = std::max(tag[j], len);
					mnp = std::min(mnp, sa[j]); mxp = std::max(mxp, sa[j]);
				}
				if(mxp - mnp >= len) ans++;
			}
		printf("%d\n", ans);
	}
	
	return 0;
}