无锁队列的实现

无锁队列的实现

————注:本文于2019年11月4日更新————

关于无锁队列的实现,网上有很多文章,虽然本文可能和那些文章有所重复,但是我还是想以我自己的方式把这些文章中的重要的知识点串起来和大家讲一讲这个技术。下面开始正文。

关于CAS等原子操作

在开始说无锁队列之前,我们需要知道一个很重要的技术就是CAS操作——Compare & Set,或是 Compare & Swap,现在几乎所有的CPU指令都支持CAS的原子操作,X86下对应的是 CMPXCHG 汇编指令。有了这个原子操作,我们就可以用其来实现各种无锁(lock free)的数据结构。

这个操作用C语言来描述就是下面这个样子:(代码来自Wikipedia的Compare And Swap词条)意思就是说,看一看内存*reg里的值是不是oldval,如果是的话,则对其赋值newval

int compare_and_swap (int* reg, int oldval, int newval)
{
  int old_reg_val = *reg;
  if (old_reg_val == oldval) {
     *reg = newval;
  }
  return old_reg_val;
}

我们可以看到,old_reg_val 总是返回,于是,我们可以在 compare_and_swap 操作之后对其进行测试,以查看它是否与 oldval相匹配,因为它可能有所不同,这意味着另一个并发线程已成功地竞争到 compare_and_swap 并成功将 reg 值从 oldval 更改为别的值了。

这个操作可以变种为返回bool值的形式(返回 bool值的好处在于,可以调用者知道有没有更新成功):

bool compare_and_swap (int *addr, int oldval, int newval)
{
  if ( *addr != oldval ) {
      return false;
  }
  *addr = newval;
  return true;
}

与CAS相似的还有下面的原子操作:(这些东西大家自己看Wikipedia,也没什么复杂的)

注:在实际的C/C++程序中,CAS的各种实现版本如下:

1)GCC的CAS

GCC4.1+版本中支持CAS的原子操作(完整的原子操作可参看 GCC Atomic Builtins

bool __sync_bool_compare_and_swap (type *ptr, type oldval type newval, ...)
type __sync_val_compare_and_swap (type *ptr, type oldval type newval, ...)

2)Windows的CAS

在Windows下,你可以使用下面的Windows API来完成CAS:(完整的Windows原子操作可参看MSDN的InterLocked Functions

 InterlockedCompareExchange ( __inout LONG volatile *Target,
                                 __in LONG Exchange,
                                 __in LONG Comperand);

3) C++11中的CAS

C++11中的STL中的atomic类的函数可以让你跨平台。(完整的C++11的原子操作可参看 Atomic Operation Library

template< class T >
bool atomic_compare_exchange_weak( std::atomic* obj,
                                   T* expected, T desired );
template< class T >
bool atomic_compare_exchange_weak( volatile std::atomic* obj,
                                   T* expected, T desired );

无锁队列的链表实现

下面的代码主要参考于两篇论文:

(注:下面的代码并不完全与这篇论文相同)

初始化一个队列的代码很简,初始化一个dummy结点(注:在链表操作中,使用一个dummy结点,可以少掉很多边界条件的判断),如下所示:

InitQueue(Q)
{
    node = new node()
    node->next = NULL;
    Q->head = Q->tail = node;
}

我们先来看一下进队列用CAS实现的方式,基本上来说就是链表的两步操作:

  1. 第一步,把tail指针的next指向要加入的结点。 tail->next = p;
  2. 第二步,把tail指针移到队尾。 tail = p;
EnQueue(Q, data) //进队列
{
    //准备新加入的结点数据
    n = new node();
    n->value = data;
    n->next = NULL;

    do {
        p = Q->tail; //取链表尾指针的快照
    } while( CAS(p->next, NULL, n) != TRUE); 
    //while条件注释:如果没有把结点链在尾指针上,再试

    CAS(Q->tail, p, n); //置尾结点 tail = n;
}

我们可以看到,程序中的那个 do-while 的 Retry-Loop 中的 CAS 操作:如果 p->nextNULL,那么,把新结点 n 加到队尾。如果不成功,则重新再来一次!

就是说,很有可能我在准备在队列尾加入结点时,别的线程已经加成功了,于是tail指针就变了,于是我的CAS返回了false,于是程序再试,直到试成功为止。这个很像我们的抢电话热线的不停重播的情况。

但是你会看到,为什么我们的“置尾结点”的操作(第13行)不判断是否成功,因为:

  1. 如果有一个线程T1,它的while中的CAS如果成功的话,那么其它所有的 随后线程的CAS都会失败,然后就会再循环,
  2. 此时,如果T1 线程还没有更新tail指针,其它的线程继续失败,因为tail->next不是NULL了。
  3. 直到T1线程更新完 tail 指针,于是其它的线程中的某个线程就可以得到新的 tail 指针,继续往下走了。
  4. 所以,只要线程能从 while 循环中退出来,意味着,它已经“独占”了,tail 指针必然可以被更新。

这里有一个潜在的问题——如果T1线程在用CAS更新tail指针的之前,线程停掉或是挂掉了,那么其它线程就进入死循环了。下面是改良版的EnQueue()

EnQueue(Q, data) //进队列改良版 v1
{
    n = new node();
    n->value = data;
    n->next = NULL;

    p = Q->tail;
    oldp = p
    do {
        while (p->next != NULL)
            p = p->next;
    } while( CAS(p.next, NULL, n) != TRUE); //如果没有把结点链在尾上,再试

    CAS(Q->tail, oldp, n); //置尾结点
}

我们让每个线程,自己fetch 指针 p 到链表尾。但是这样的fetch会很影响性能。而且,如果一个线程不断的EnQueue,会导致所有的其它线程都去 fetch 他们的 p 指针到队尾,能不能不要所有的线程都干同一个事?这样可以节省整体的时间?

比如:直接 fetch Q->tail 到队尾?因为,所有的线程都共享着 Q->tail,所以,一旦有人动了它后,相当于其它的线程也跟着动了,于是,我们的代码可以改进成如下的实现:

EnQueue(Q, data) //进队列改良版 v2 
{
    n = new node();
    n->value = data;
    n->next = NULL;

    while(TRUE) {
        //先取一下尾指针和尾指针的next
        tail = Q->tail;
        next = tail->next;

        //如果尾指针已经被移动了,则重新开始
        if ( tail != Q->tail ) continue;

        //如果尾指针的 next 不为NULL,则 fetch 全局尾指针到next
        if ( next != NULL ) {
            CAS(Q->tail, tail, next);
            continue;
        }

        //如果加入结点成功,则退出
        if ( CAS(tail->next, next, n) == TRUE ) break;
    }
    CAS(Q->tail, tail, n); //置尾结点
}

上述的代码还是很清楚的,相信你一定能看懂,而且,这也是 Java 中的 ConcurrentLinkedQueue 的实现逻辑,当然,我上面的这个版本比 Java 的好一点,因为没有 if 嵌套,嘿嘿。

好了,我们解决了EnQueue,我们再来看看DeQueue的代码:(很简单,我就不解释了)

DeQueue(Q) //出队列
{
    do{
        p = Q->head;
        if (p->next == NULL){
            return ERR_EMPTY_QUEUE;
        }
    while( CAS(Q->head, p, p->next) != TRUE );
    return p->next->value;
}

我们可以看到,DeQueue的代码操作的是 head->next,而不是 head 本身。这样考虑是因为一个边界条件,我们需要一个dummy的头指针来解决链表中如果只有一个元素,headtail 都指向同一个结点的问题,这样 EnQueueDeQueue 要互相排斥了

但是,如果 headtail 都指向同一个结点,这意味着队列为空,应该返回 ERR_EMPTY_QUEUE,但是,在判断 p->next == NULL 时,另外一个EnQueue操作做了一半,此时的 p->next 不为 NULL了,但是 tail 指针还差最后一步,没有更新到新加的结点,这个时候就会出现,在 EnQueue 并没有完成的时候, DeQueue 已经把新增加的结点给取走了,此时,队列为空,但是,head 与 tail 并没有指向同一个结点。如下所示:

虽然,EnQueue的函数会把 tail 指针置对,但是,这种情况可能还是会导致一些并发问题,所以,严谨来说,我们需要避免这种情况。于是,我们需要加入更多的判断条件,还确保这个问题。下面是相关的改进代码:

DeQueue(Q) //出队列,改进版
{
    while(TRUE) {
        //取出头指针,尾指针,和第一个元素的指针
        head = Q->head;
        tail = Q->tail;
        next = head->next;

        // Q->head 指针已移动,重新取 head指针
        if ( head != Q->head ) continue;
        
        // 如果是空队列
        if ( head == tail && next == NULL ) {
            return ERR_EMPTY_QUEUE;
        }
        
        //如果 tail 指针落后了
        if ( head == tail && next == NULL ) {
            CAS(Q->tail, tail, next);
            continue;
        }

        //移动 head 指针成功后,取出数据
        if ( CAS( Q->head, head, next) == TRUE){
            value = next->value;
            break;
        }
    }
    free(head); //释放老的dummy结点
    return value;
}

上面这段代码的逻辑和 Java 的 ConcurrentLinkedQueuepoll 方法很一致了。也是《Simple, Fast, and Practical Non-Blocking and Blocking ConcurrentQueue Algorithms》这篇论文中的实现。

CAS的ABA问题

所谓ABA(见维基百科的ABA词条),问题基本是这个样子:

  1. 进程P1在共享变量中读到值为A
  2. P1被抢占了,进程P2执行
  3. P2把共享变量里的值从A改成了B,再改回到A,此时被P1抢占。
  4. P1回来看到共享变量里的值没有被改变,于是继续执行。

虽然P1以为变量值没有改变,继续执行了,但是这个会引发一些潜在的问题。ABA问题最容易发生在lock free 的算法中的,CAS首当其冲,因为CAS判断的是指针的值。很明显,值是很容易又变成原样的。

比如上述的DeQueue()函数,因为我们要让head和tail分开,所以我们引入了一个dummy指针给head,当我们做CAS的之前,如果head的那块内存被回收并被重用了,而重用的内存又被EnQueue()进来了,这会有很大的问题。(内存管理中重用内存基本上是一种很常见的行为

这个例子你可能没有看懂,维基百科上给了一个活生生的例子——

你拿着一个装满钱的手提箱在飞机场,此时过来了一个火辣性感的美女,然后她很暖昧地挑逗着你,并趁你不注意的时候,把用一个一模一样的手提箱和你那装满钱的箱子调了个包,然后就离开了,你看到你的手提箱还在那,于是就提着手提箱去赶飞机去了。

这就是ABA的问题。

解决ABA的问题

维基百科上给了一个解——使用double-CAS(双保险的CAS),例如,在32位系统上,我们要检查64位的内容

1)一次用CAS检查双倍长度的值,前半部是值,后半部分是一个计数器。

2)只有这两个都一样,才算通过检查,要吧赋新的值。并把计数器累加1。

这样一来,ABA发生时,虽然值一样,但是计数器就不一样(但是在32位的系统上,这个计数器会溢出回来又从1开始的,这还是会有ABA的问题)

当然,我们这个队列的问题就是不想让那个内存重用,这样明确的业务问题比较好解决,论文《Implementing Lock-Free Queues》给出一这么一个方法——使用结点内存引用计数refcnt!(论文《Simple, Fast, and Practical Non-Blocking and Blocking ConcurrentQueue Algorithms》中的实现方法也基本上是一样的,用到的是增加一个计数,可以理解为版本号)

SafeRead(q)
{
    loop:
        p = q->next;
        if (p == NULL){
            return p;
        }

        Fetch&Add(p->refcnt, 1);

        if (p == q->next){
            return p;
        }else{
            Release(p);
        }
    goto loop;
}

其中的 Fetch&Add和Release分是是加引用计数和减引用计数,都是原子操作,这样就可以阻止内存被回收了。

用数组实现无锁队列

本实现来自论文《Implementing Lock-Free Queues

使用数组来实现队列是很常见的方法,因为没有内存的分部和释放,一切都会变得简单,实现的思路如下:

1)数组队列应该是一个ring buffer形式的数组(环形数组)

2)数组的元素应该有三个可能的值:HEAD,TAIL,EMPTY(当然,还有实际的数据)

3)数组一开始全部初始化成EMPTY,有两个相邻的元素要初始化成HEAD和TAIL,这代表空队列。

4)EnQueue操作。假设数据x要入队列,定位TAIL的位置,使用double-CAS方法把(TAIL, EMPTY) 更新成 (x, TAIL)。需要注意,如果找不到(TAIL, EMPTY),则说明队列满了。

5)DeQueue操作。定位HEAD的位置,把(HEAD, x)更新成(EMPTY, HEAD),并把x返回。同样需要注意,如果x是TAIL,则说明队列为空。

算法的一个关键是——如何定位HEAD或TAIL?

1)我们可以声明两个计数器,一个用来计数EnQueue的次数,一个用来计数DeQueue的次数。

2)这两个计算器使用使用Fetch&ADD来进行原子累加,在EnQueue或DeQueue完成的时候累加就好了。

3)累加后求个模什么的就可以知道TAIL和HEAD的位置了。

如下图所示:

 小结

以上基本上就是所有的无锁队列的技术细节,这些技术都可以用在其它的无锁数据结构上。

1)无锁队列主要是通过CAS、FAA这些原子操作,和Retry-Loop实现。

2)对于Retry-Loop,我个人感觉其实和锁什么什么两样。只是这种“锁”的粒度变小了,主要是“锁”HEAD和TAIL这两个关键资源。而不是整个数据结构。

还有一些和Lock Free的文章你可以去看看:

注:我配了一张look-free的自行车,寓意为——如果不用专门的车锁,那么自行得自己锁自己!

 (全文完)

(转载本站文章请注明作者和出处 酷 壳 – CoolShell ,请勿用于任何商业用途)

好烂啊有点差凑合看看还不错很精彩 (53 人打了分,平均分: 4.21 )
Loading...

无锁队列的实现》的相关评论

  1. 以前一直以为lock free就是使用无锁编程,今天看了一篇文章发现我这种理解是错误的,其实用不用锁和lock free是没关联的。用了锁也可能是lock free,而不用锁有可能不是lock free。lock free的正确解释为一个“锁无关”的程序能够确保执行它的所有线程中至少有一个能够继续往下执行。

      1. //如果 tail 指针落后了
        if ( head == tail && next == NULL ) {
        CAS(Q->tail, tail, next);
        continue;
        }
        这个是不是有问题?

        1. 应该是:
          //如果 tail 指针落后了
          if ( head == tail && next != NULL ) {
          CAS(Q->tail, tail, next);
          continue;
          }
          笔误吧

      2. p = Q->tail;
        oldp = p
        do {
        while (p->next != NULL)
        p = p->next;
        } while( CAS(p.next, NULL, n) != TRUE); //如果没有把结点链在尾上,再试

        CAS(Q->tail, oldp, n); //置尾结点

        浩哥,EnQueue在下面这种情况下,tail指针似乎会错?望指教
        1. T1/T2两个线程同时到达p=Q->tail, 两线程获取相同的oldp;
        2. T1先进去do/while循环,T1的p到达链表尾,并CAS成功,T1线程进队列的n1节点加入链表尾;
        3. 在T1执行CAS(Q->tail, oldp, n)之前,T2线程CAS成功,并将n2节点加入链表尾;
        4. 接下来,T1执行CAS(Q->tail, oldp, n)
        1)如果失败,说明T2已经执行CAS将tail设置成链表尾n2;
        2)如果成功,说明T2未设置tail,T1会将Q->tail设置为n1,然后T2执行CAS(Q->tail, oldp, n),Q->tail与oldp不等,此时Q->tail没有被设置成真正的链表尾n2;

  2. EnQueue(x) //进队列
    {
    //准备新加入的结点数据
    q = new record();
    q->value = x;
    q->next = NULL;

    do {
    p = tail; //取链表尾指针的快照
    } while( CAS(p->next, NULL, q) != TRUE); //如果没有把结点链在尾指针上,再试

    CAS(tail, p, q); //置尾结点
    }
    这里第二个cas可以不加吗?貌似只需要保证tail的可见性就可以了,因为这一步永远只有只有一个线程竞争

    1. 第二个CAS是必须的。
      因为`CAS(p->next, NULL, q)`与`CAS(tail, p, q)`两个操作加在一起并不是原子的,中间可能因为CPU时间片切换到其它线程上,例如,其它线程执行了`CAS(p->next, NULL, q1)`,此时尾部链表是`p->q->q1`,这样真正的tail节点就不是q了。
      如果没有CAS判断,那么就会导致tail节点指向q,而不是q1。

      1. 哎呀,我把原评论看成是while里面含有`p = p->next`的版本了,抱歉!

        但是CAS提供的原子操作是能保证这个赋值过程不被打断的,不太清楚赋值操作在汇编层面会有几个指令,所以说这个地方可能加上CAS会保险点把

        1. 作者说了
          ”’
          2. 此时,如果T1 线程还没有更新tail指针,其它的线程继续失败,因为tail->next不是NULL了。
          ”’

          所以正常场景其他线程是不会走到第二个 CAS,但是,谁能保证没有bug,导致其他线程在其他地方误改 tail 的值,所以最好保证以下 p 和 tail 是不是相同

  3. 改良版的EnQueue()里,如果有p个线程在并发操作队列,tail指向的节点离真正的尾最多相差2p-1个节点。原文有证。

  4. 入队操作,我觉得原始版本反而简洁明了,改进版需要注意tail,它无法保证任何时候或最终能指向最新的一个节点。

    另外,这个算法如果想在没有线程安全GC的语言里实现会非常蛋疼。

  5. CAS比较的是地址吗???
    谁编程会比较地址,我不太明白,帮忙解释一下

  6. In multithreaded computing, the ABA problem occurs during synchronization, when a location is read twice, has the same value for both reads, and “value is the same” is used to indicate “nothing has changed”. However, another thread can execute between the two reads and change the value, do other work, then change the value back, thus fooling the first thread into thinking “nothing has changed” even though the second thread did work that violates that assumption.

    是 value 不是 address
    改一下吧 别误导人了

  7. 更新了ABA问题 大赞

    早几年从看你的博客到自己实现 后来碰到ABA问题 当时还没更新

    文中的ABA解决的方式 应该也算是一种取巧 本质是 更新指针的同时 保证计数也是原子的更新

    1. 我当时做法是给每个值 都加了个wrap

      top → A → B → C

      top → wrap(A) → wrap(B) → wrap(C)

      保证 wrap(A) == wrap(A) // return false

  8. 能不能问一下,那个无锁队列的改良版v1中,会不会出现A线程往tail后面入队了一个,但还没更新tail而且没有死亡,在这两个过程中间B线程进入内层循环自己找到了tail后面的那个节点,然后开始往队列中插入其他节点的情况,那这样不是两个线程同时在占用这个队列吗。(我多线程学的不是很好,希望能得到大家的解答,十分感谢!)

  9. DeQueue(Q) //出队列,改进版
    {
    while(TRUE) {
    //取出头指针,尾指针,和第一个元素的指针
    head = Q->head; // (1)
    tail = Q->tail;
    next = head->next; // (2)

    // Q->head 指针已移动,重新取 head指针
    if ( head != Q->head ) continue;

    // 如果是空队列
    if ( head == tail && next == NULL ) {
    return ERR_EMPTY_QUEUE;
    }

    //如果 tail 指针落后了
    if ( head == tail && next == NULL ) {
    CAS(Q->tail, tail, next);
    continue;
    }

    //移动 head 指针成功后,取出数据
    if ( CAS( Q->head, head, next) == TRUE){
    value = next->value;
    break;
    }
    }
    free(head); //释放老的dummy结点
    return value;

    }

    如果A, B 两个线程同时到达 1 处,此时 A, B 线程的 head 是相同的,假设都是 0xfff128。然后 B 线程运行较快,一直到结束,调用 free(head), 释放 0xfff128 。接着 A 线程运行到2处,试图访问 head->next (访问 0xfff128 的内容)。这样是不是就有问题了。

    1. 对,这里的free应该是换成减少引用计数的put操作,当引用计数为0时,才可以真正的释放资源。

    2. 不会的,在下面这一步CAS,检查会失败,导致线程B会继续,不会break,所以head指针就不一样了

      //移动 head 指针成功后,取出数据
      if ( CAS( Q->head, head, next) == TRUE){
      value = next->value;
      break;
      }

  10. “用数组实现无锁队列”那段,引用论文原文中提到,因为内存对其问题,这个方法在实际机器中可能是不可实现的,这点很重要建议注明。
    However, it does have a subtle problem:
    on real machines, memory operations must be aligned.
    Our algorithm requires an unaligned CSW for every
    other operation, and thus would be infeasible on a real
    machine.

  11. 出队列,改良版的第18行,判断条件应该改成:
    head == tail && next != NULL
    吧?

  12. 出队列,改良版的第9-11行:
    // Q->head指针已移动,重新取head指针
    if (head != Q->head)
    continue;
    没看懂,Q->head指向的是队列的头节点吧,这个节点不会被删除,所以应该永远不会发生head != Q->head的情况吧?

    1. 不是的,这里的意思是可以同时存在多个入队和多个出队的情况,所以,完全有可能出现head!=Q->head的情况。

  13. DeQueue的代码是存在问题的,需要修改的不是Q->head,而应该是Q->head->next,因为Q->head指向的是一个头节点

  14. EnQueue(Q, data) //进队列改良版 v1
    { 
        n = new node();
        n->value = data;
        n->next = NULL;
    
    p = Q->tail;
    oldp = p;
    do {
        while (p->next != NULL)
            p = p->next;
    
    } while( CAS(p->next, NULL, n) != TRUE); //如果没有把结点链在尾上,再试
    
    while (p->next != NULL) {
            p = p->next;
    }
    CAS(Q->tail, oldp, p); //置尾结点
    }
    
    1. 这样做是有问题的:
      首先一个空的队列,两个线程并发,
      a线程,添加节点a,执行到17行,此时增加了一个节点,然后线程调度暂停,开始调度b线程,添加节点b,此时会在节点a后面添加节点b,然后运行到17行,又触发线程调度暂停,a线程开始执行,此时判断 Q->tail, oldp 相等,尾部指针执行节点a,结束,再开始调度线程b,此时判断Q->tail, oldp不相等,更新会失败,就会导致尾部指针没有指向最后一个节点。

  15. // 如果 tail 指针落后了
    if ( head == tail && next == NULL ) {
    CAS(Q->tail, tail, next);
    continue;
    }

    这里是不是有问题?
    判断条件是不是应该改为 if ( head == tail && next != NULL ) ?

    1. 是的,这里的代码有的地方有点不严谨。
      不过看懂原型就好。

      我自己实现参照boost里的lockfree部分

  16. 写的有点问题,漏掉了expected和desired的exchange这种细节。
    而且没有完整的code供测试,容易误导人。

  17. 问题1:
    进队列改良版 v1
    line14 置尾节点,CAS(Q->tail, oldp, n)这句有问题吧。如果T1和T2两个线程在line14之前都成功先后在队列尾部入队了n1和n2,然后line14 T1成功把Q->tail置为n1,T2会在line14上失败,于是实际Q->tail还是在n1上,但预期应该是在n2上;

    问题2:
    进队列改良版 v2,line13这句多余的吧,即使line13判断尾指针没有被移动,不需要重新开始,有什么用呢,完全可能在line14这里尾指针被移动掉啊。

  18. 无论是使用指令集lock,还是说用mutex锁。其实都要同步,因为多个线程要对同一个共享内存进行写,就必须要同步。

    只是说用芯片指令的lock(cmpchg或直接lock add指令),同步的边界代价很小。当线程A lock时,线程B的lock指令会被cpu自动retry,而不会把OS中的线程状态阻塞或者挂起。由硬件CPU自己发起的retry。

  19. 在EnQueue中,下面这一步有什么意义?就算加了这一步判断,也 有可能判断的时候是不成立的,执行到下一步就成立了。

    //如果尾指针已经被移动了,则重新开始
    if ( tail != Q->tail ) continue;

  20. EnQueue(Q, data) //进队列改良版 v2
    {
    n = new node();
    n->value = data;
    n->next = NULL;
    while(TRUE) {
    //先取一下尾指针和尾指针的next
    tail = Q->tail;
    next = tail->next;
    //如果尾指针已经被移动了,则重新开始
    if ( tail != Q->tail ) continue;
    //如果尾指针的 next 不为NULL,则 fetch 全局尾指针到next
    if ( next != NULL ) {
    CAS(Q->tail, tail, next);
    continue;
    }
    //如果加入结点成功,则退出
    if ( CAS(tail->next, next, n) == TRUE ) break;
    }
    CAS(Q->tail, tail, n); //置尾结点
    }

    请问 new 出来的 node 在哪里释放的?

  21. SafeRead(q)
    {
    loop:
    p = q->next;
    if (p == NULL){
    return p;
    }
    Fetch&Add(p->refcnt, 1);
    // thread_i do sth.
    if (p == q->next){
    return p;
    }else{
    Release(p);
    }
    goto loop;
    }

发表回复

您的电子邮箱地址不会被公开。 必填项已用*标注