HYSBZ 2243染色樹鎖断分

タイトル:http://www.lydsy.com/JudgeOnline/problem.php?id=2243
タイトル:
Descriptionは、n個のノードを有するルートレスツリーとm個の操作を与え、操作は2種類ある:1、ノードaからノードbへの経路上のすべての点を色cに染める;2、問い合わせノードaからノードbへの経路上の色セグメントの数(連続して同じ色が同じセグメントとみなされる)は、例えば「112212」が3セグメントからなる:「11」、「222」、「1」である.このm操作を順番に完了するプログラムを書いてください.Inputの最初の行は2つの整数nとmを含み、それぞれノード数と操作数を表す.2行目はn個の正の整数を含み、n個のノードの初期色を表す.次の行は、xとyの間に無方向のエッジがあることを示す2個の整数xとyを含む.「C a b c」は、ノードaからノードbへの経路上のすべての点(aおよびbを含む)を色cに染める染色操作であることを示す.「Q a b」は、ノードaからノードb(aおよびbを含む)への経路上の色セグメントの数を問い合わせる問合せ動作であることを示す.Outputは質問操作ごとに1行の答えを出力する.
考え方:線分樹区間更新区間合併、面倒くさい...
まとめ:現在私が書いた最長のコード...たぶん複雑な問題が少ないから

#include 
#include 
#include 
#include 
using namespace std;

const int N = 100100;
struct edge
{
    int to, next;
}g[N*2];
int dep[N], siz[N], son[N], fat[N], id[N], top[N], head[N];
int tmp[N], d[N][2], val[N];
int n, m, num, cnt;
struct node
{
    int l, r, lc, rc, sum, mark; /*lc, rc             ，*/
}s[N*4];
void add_edge(int v, int u)
{
    g[cnt].to = u;
    g[cnt].next = head[v];
    head[v] = cnt++;
}
void dfs1(int v, int fa, int d)
{
    dep[v] = d, son[v] = 0, siz[v] = 1, fat[v] = fa;
    for(int i = head[v]; i != -1; i = g[i].next)
    {
        int u = g[i].to;
        if(u != fa)
        {
            dfs1(u, v, d + 1);
            siz[v] += siz[u];
            if(siz[son[v]] < siz[u]) son[v] = u;
        }
    }
}
void dfs2(int v, int tp)
{
    top[v] = tp, id[v] = ++num;
    if(son[v]) dfs2(son[v], top[v]);
    for(int i = head[v]; i != -1; i = g[i].next)
    {
        int u = g[i].to;
        if(u != fat[v] && u != son[v]) dfs2(u, u);
    }
}
void push_up(int k) /*    ，                     ，           */
{
    s[k].lc = s[k<<1].lc, s[k].rc = s[k<<1|1].rc;
    if(s[k<<1].rc == s[k<<1|1].lc)
        s[k].sum = s[k<<1].sum + s[k<<1|1].sum - 1;
    else
        s[k].sum = s[k<<1].sum + s[k<<1|1].sum;
}
void push_down(int k)
{
    if(s[k].mark)
    {
        s[k<<1].mark = s[k<<1|1].mark = s[k].mark;
        s[k<<1].lc = s[k<<1].rc = s[k<<1|1].lc = s[k<<1|1].rc = s[k].mark;
        s[k<<1].sum = s[k<<1|1].sum = 1;
        s[k].mark = 0;
    }
}
void build(int l, int r, int k)
{
    s[k].l = l, s[k].r = r, s[k].sum = 1, s[k].mark = 0;
    if(l == r)
    {
        s[k].lc = s[k].rc = val[l];
        return;
    }
    int mid = (l + r) >> 1;
    build(l, mid, k << 1);
    build(mid + 1, r, k << 1|1);
    push_up(k);
}
void update(int l, int r, int c, int k)
{
    if(l <= s[k].l && s[k].r <= r)
    {
        s[k].sum = 1;
        s[k].lc = s[k].rc = c;
        s[k].mark = c;
        return;
    }

    push_down(k);
    int mid = (s[k].l + s[k].r) >> 1;
    if(l <= mid) update(l, r, c, k << 1);
    if(r > mid) update(l, r, c, k << 1|1);
    push_up(k);
}
void renew(int v, int u, int c)
{
    int t1 = top[v], t2 = top[u];
    while(t1 != t2)
    {
        if(dep[t1] < dep[t2])
            swap(t1, t2), swap(v, u);
        update(id[t1], id[v], c, 1);
        v = fat[t1], t1 = top[v];
    }
    if(dep[v] > dep[u]) swap(v, u);
    update(id[v], id[u], c, 1);
}
int query(int l, int r, int k)
{
    if(l <= s[k].l && s[k].r <= r)
        return s[k].sum;

    push_down(k);
    int mid = (s[k].l + s[k].r) >> 1;
    int ans = 0, f1 = 0, f2 = 0;
    if(l <= mid)
        ans += query(l, r, k << 1), f1 = 1;
    if(r > mid)
        ans += query(l, r, k << 1|1), f2 = 1;
    if(f1 && f2) /*                      */
        if(s[k<<1].rc == s[k<<1|1].lc) ans -= 1;
    push_up(k);
    return ans;
}
int query_node(int x, int k)
{
    if(s[k].l == s[k].r)
        return s[k].rc;
    push_down(k);
    int mid = (s[k].l + s[k].r) >> 1;
    int ans = 0;
    if(x <= mid) ans = query_node(x, k << 1);
    else ans = query_node(x, k << 1|1);
    push_up(k);
    return ans;
}
int seek(int v, int u)
{
    int t1 = top[v], t2 = top[u];
    int ans = 0;
    while(t1 != t2)
    {
        if(dep[t1] < dep[t2])
            swap(t1, t2), swap(v, u);
        ans += query(id[t1], id[v], 1);
        /*                 */
        if(query_node(id[t1], 1) == query_node(id[fat[t1]], 1)) 
            ans--;
        v = fat[t1], t1 = top[v];
    }
    //printf("%d
", ans);
    if(dep[v] > dep[u]) swap(v, u);
    return ans += query(id[v], id[u], 1);
}
void slove()
{
    char ch;
    int a, b, c;
    while(m--)
    {
        scanf(" %c", &ch);
        if(ch == 'Q')
        {
            scanf("%d%d", &a, &b);
            printf("%d
", seek(a, b));
        }
        else
        {
            scanf("%d%d%d", &a, &b, &c);
            renew(a, b, c);
        }
    }
}
int main()
{
    while(~ scanf("%d%d", &n, &m))
    {
        memset(head, -1, sizeof head);
        cnt = num = 0;
        for(int i = 1; i <= n; i++)
            scanf("%d", tmp + i);
        for(int i = 1; i <= n - 1; i++)
        {
            scanf("%d%d", &d[i][0], &d[i][1]);
            add_edge(d[i][0], d[i][1]);
            add_edge(d[i][1], d[i][0]);
        }
        dfs1(1, 0, 1);
        dfs2(1, 1);
        for(int i = 1; i <= n; i++)
            val[id[i]] = tmp[i];
        build(1, num, 1);
        slove();
    }
    return 0;
}