【POJ3481】【splay】Double Queue

Description

The new founded Balkan Investment Group Bank (BIG-Bank) opened a new office in Bucharest, equipped with a modern computing environment provided by IBM Romania, and using modern information technologies. As usual, each client of the bank is identified by a positive integer K and, upon arriving to the bank for some services, he or she receives a positive integer priority P. One of the inventions of the young managers of the bank shocked the software engineer of the serving system. They proposed to break the tradition by sometimes calling the serving desk with the lowest priority instead of that with the highest priority. Thus, the system will receive the following types of request:

0	The system needs to stop serving
1 K P	Add client K to the waiting list with priority P
2	Serve the client with the highest priority and drop him or her from the waiting list
3	Serve the client with the lowest priority and drop him or her from the waiting list

Your task is to help the software engineer of the bank by writing a program to implement the requested serving policy.

Input

Each line of the input contains one of the possible requests; only the last line contains the stop-request (code 0). You may assume that when there is a request to include a new client in the list (code 1), there is no other request in the list of the same client or with the same priority. An identifier K is always less than 10⁶, and a priority P is less than 10⁷. The client may arrive for being served multiple times, and each time may obtain a different priority.

Output

For each request with code 2 or 3, the program has to print, in a separate line of the standard output, the identifier of the served client. If the request arrives when the waiting list is empty, then the program prints zero (0) to the output.

Sample Input

2
1 20 14
1 30 3
2
1 10 99
3
2
2
0

Sample Output

0
20
30
10
0

Source

Southeastern Europe 2007

【分析】

本来写一个splay模板，想先过了这题然后去刷3580和维修数列的...

结果交上去果断T了，我大惊，莫非双旋比单旋还慢！

最后D了半天...发现是内存池的原因，知道真相的我眼泪掉下来.....话说我写内存池为什么就没成功过一次....

 #include <iostream>
 #include <cstdio>
 #include <algorithm>
 #include <cstring>
 #include <vector>
 #include <utility>
 #include <iomanip>
 #include <string>
 #include <cmath>
 #include <queue>
 #include <assert.h>
 #include <map>
 #include <ctime>
 #include <cstdlib>

 const int MAXN =  + ;
 const int INF = 0x7fffffff;
 const int SIZE = ;
 const int maxnode =   + ;
 using namespace std;
 typedef int ll;
 struct SPLAY{
        struct Node{
               int val, size;
               int num;//num代表编号
               Node *parent, *ch[];

               Node(){
                      val = size = ;
                      num = ;
                      parent = ch[] = ch[] = NULL;
               }
               int cmp(){
                   if (parent == NULL) return -;
                   if (parent->ch[]->num == num) return ;
                   if (parent->ch[]->num == num) return ;
               }
               void update(){
                    size = ;
                    if (ch[] != NULL) size += ch[]->size;
                    if (ch[] != NULL) size += ch[]->size;
               }
        }*root, *nil, _nil, mem[];//我写内存池就没成功过

        /*struct MEMPOOR{//内存池
               queue< Node >Q;
               Node mem[maxnode];
               Node *nil;

               void init(Node *&t){
                    for (int i = 0; i < maxnode; i++) Q.push( mem[i] );
                    nil = t;
               }
               Node *get(){
                    Node *p = &(Q.front());
                    Q.pop();
                    p->parent = p->ch[0] = p->ch[1] = nil;
                    p->num = p->val = 0;
                    p->size = 1;
                    return p;
               }
               //回收内存
               void push(Node *&p){
                    Q.push(*(p));
                    p->parent->ch[p->cmp()] = nil;
               }
        }poor;*/
        int tot, cnt;//计数
        /*void debug(){//测试内存池
             poor.init();
             Node *a = poor.get();
             a->val = 10;
             Node *b = poor.get();
             b->val = 5;
             a->ch[0] = b;
             printf("%d\n", poor.Q.size());
             printf("%d\n", a->val);
             printf("%d\n", b->cmp());
        }*/
        Node *NEW(){
             Node *p = &mem[cnt++];
             p->parent = p->ch[] = p->ch[] = nil;
             p->num = p->val = ;
             p->size = ;
             return p;
        }
        void init(){
             //循环哨兵的定义
             nil = &_nil;
             _nil.parent = _nil.ch[] = _nil.ch[] = nil;

             tot = ;
             cnt = ;
             root = nil;
             insert(root, -INF, -INF);
             insert(root, INF, INF);
        }
        void rotate(Node *t, int d){
             Node *p = t->parent;//t的右旋对于p来说也是右旋
             t = p->ch[d ^ ];
             p->ch[d ^ ] = t->ch[d];
             t->ch[d]->parent = p;
             t->ch[d] = p;
             t->parent = p->parent;
             //注意，这里要更新的原因在于t并不是引用
             if (t->parent != nil){
                if (t->parent->ch[] == p) t->parent->ch[] = t;
                else if (t->parent->ch[] == p)  t->parent->ch[] = t;
             }
             p->parent = t;
             if (t->parent == nil) root = t;
             //不用换回去了...
             p->update();
             t->update();
        }
        //将x旋转为y的子树
        void splay(Node *x, Node *y){
             while (x->parent != y){
                   if (x->parent->parent == y) rotate(x, (x->cmp() ^ ));
                   else{//不然连转两下
                        rotate(x->parent, x->parent->cmp() ^ );
                        rotate(x, x->cmp() ^ );
                   }
                   x->update();
             }
        }
        //编号和权值
        void insert(Node *&t, int num, int val){
             if (t == nil){
                t = NEW();
                t->val = val;
                t->num = num;
                return;
             }
             Node *x = t;
             while (){
                   int dir = (val > x->val);
                   if (x->ch[dir] == nil){
                      x->ch[dir] = NEW();
                      x->ch[dir]->val = val;
                      x->ch[dir]->num = num;
                      x->ch[dir]->parent = x;
                      splay(x->ch[dir], nil);
                      return;
                   }else x = x->ch[dir];
             }
             return;
        }
        void debug(){
             /*init();
             root = nil;
             insert(root, 1, 1);
             //printf("%d", root->val);
             insert(root, 2, 2);
             insert(root, 0, 0);
             insert(root, 4, 4);
             print(root);
             //printf("%d\n", root->size); */
        }
        //找到val值为k的数的名次
        int find(Node *t, int k){
            if (t == nil) return -;//-1代表找不到
            int tmp = t->ch[]->size;
            if (k == t->val) return tmp + ;
            else if (k < t->val) return find(t->ch[], k);
            else return find(t->ch[], k) + tmp + ;
        }
        //找到第k小的权值并将其splay到根
        void get(Node *t, Node *y, int k){
            Node *x = t;
            while (){
                  int tmp = x->ch[]->size;
                  if ((tmp + ) == k) break;
                  if (k <= tmp) x = x->ch[];
                  else {x = x->ch[]; k -= tmp + ;}
            }
            splay(x, y);
        }
        //删除val值为k的节点
        void Delete(int k){
             int tmp = find(root, k);
             get(root, nil, tmp - );
             get(root, root, tmp + );
             //卡出来
             //poor.push(root->ch[1]->ch[0]);
             root->ch[]->ch[] = nil;
             root->ch[]->update();
             root->update();
             return;
        }
        void print(Node *t){
             if (t == nil) return;
             print(t->ch[]);
             printf("%d ", t->val);
             print(t->ch[]);
        }

 }A;
 int n, m;

 void work(){
      //A.root = nil;
      A.init();//A.tot记录了A中的元素个数
      int t;
      while (scanf("%d", &t) && t){
             if (t == ){
                if (A.tot == ) {printf("0\n");continue;}
                A.get(A.root, A.nil, A.tot + );
                printf("%d\n", A.root->num);
                A.Delete(A.root->val);
                A.tot--;
             }else if (t == ){
                if (A.tot == ) {printf("0\n");continue;}
                A.get(A.root, A.nil, );
                printf("%d\n", A.root->num);
                A.Delete(A.root->val);
                A.tot--;
             }else{
                   int val, num;
                   scanf("%d%d", &num, &val);
                   A.insert(A.root, num, val);
                   A.tot++;
             }
      }
 }

 int main(){
     #ifdef LOCAL
     freopen("data.txt", "r", stdin);
     freopen("out.txt", "w", stdout);
     #endif
     work();
     //A.debug();
     return ;
 }