prio_queue.c
上传用户:tsgydb
上传日期:2007-04-14
资源大小:10674k
文件大小:6k
源码类别:

MySQL数据库

开发平台:

Visual C++

  1. /* ==== prio_queue.c ==========================================================
  2.  * Copyright (c) 1994 by Chris Provenzano, proven@mit.edu
  3.  * All rights reserved.
  4.  *
  5.  * Redistribution and use in source and binary forms, with or without
  6.  * modification, are permitted provided that the following conditions
  7.  * are met:
  8.  * 1. Redistributions of source code must retain the above copyright
  9.  *    notice, this list of conditions and the following disclaimer.
  10.  * 2. Redistributions in binary form must reproduce the above copyright
  11.  *    notice, this list of conditions and the following disclaimer in the
  12.  *    documentation and/or other materials provided with the distribution.
  13.  * 3. All advertising materials mentioning features or use of this software
  14.  *    must display the following acknowledgement:
  15.  *  This product includes software developed by Chris Provenzano.
  16.  * 4. The name of Chris Provenzano may not be used to endorse or promote 
  17.  *   products derived from this software without specific prior written
  18.  *   permission.
  19.  *
  20.  * THIS SOFTWARE IS PROVIDED BY CHRIS PROVENZANO ``AS IS'' AND
  21.  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  22.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  23.  * ARE DISCLAIMED.  IN NO EVENT SHALL CHRIS PROVENZANO BE LIABLE FOR ANY 
  24.  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
  25.  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR 
  26.  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
  27.  * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 
  28.  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  29.  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 
  30.  * SUCH DAMAGE.
  31.  *
  32.  * Description : Priority Queue functions.
  33.  *
  34.  *  1.00 94/09/19 proven
  35.  *      -Started coding this file.
  36.  */
  37. #ifndef lint
  38. static const char rcsid[] = "$Id$";
  39. #endif
  40. #include <pthread.h>
  41. /* A thread when it becomes eligeble to run is placed on the run queue.
  42.   This requires locking the kernel lock
  43. */
  44. /* ==========================================================================
  45.  * pthread_prio_queue_init()
  46.  */
  47. void pthread_prio_queue_init(struct pthread_prio_queue * queue)
  48. {
  49. int i;
  50. for (i = 0; i <= PTHREAD_MAX_PRIORITY; i++) {
  51. queue->level[i].first = NULL;
  52. queue->level[i].last = NULL;
  53. }
  54. queue->next = NULL;
  55. queue->data = NULL;
  56. }
  57. /* ==========================================================================
  58.  * pthread_priority_enq()
  59.  */
  60. void pthread_prio_queue_enq(struct pthread_prio_queue * queue,
  61.   struct pthread * pthread)
  62. {
  63. int priority = pthread->pthread_priority;
  64. if (queue->next) {
  65. if (queue->level[priority].first) {
  66. pthread->next = (queue->level[priority].last)->next;
  67. (queue->level[priority].last)->next = pthread;
  68. queue->level[priority].last = pthread;
  69. return;
  70. if (priority != PTHREAD_MAX_PRIORITY) {
  71. int prev_priority;
  72. /* Find first higher priority thread queued on queue */
  73. for (prev_priority = priority + 1; prev_priority <=
  74.   PTHREAD_MAX_PRIORITY; prev_priority++) {
  75. if (queue->level[prev_priority].first) {
  76. pthread->next = (queue->level[prev_priority].last)->next;
  77. (queue->level[prev_priority].last)->next = pthread;
  78. queue->level[priority].first = pthread;
  79. queue->level[priority].last = pthread;
  80. return;
  81. }
  82. }
  83. }
  84. }
  85. queue->level[priority].first = pthread;
  86. queue->level[priority].last = pthread;
  87. pthread->next = queue->next;
  88. queue->next = pthread;
  89. }
  90. /* ==========================================================================
  91.  * pthread_prio_queue_deq()
  92.  */
  93. struct pthread * pthread_prio_queue_deq(struct pthread_prio_queue * queue)
  94. {
  95. struct pthread * pthread;
  96. int priority;
  97. if (pthread = queue->next) {
  98. priority = queue->next->pthread_priority;
  99. if (queue->level[priority].first == queue->level[priority].last) {
  100. queue->level[priority].first = NULL;
  101. queue->level[priority].last = NULL;
  102. } else {
  103. queue->level[priority].first = pthread->next;
  104. }
  105. queue->next = pthread->next;
  106. pthread->next = NULL;
  107. }
  108. return(pthread);
  109. }
  110. /* ==========================================================================
  111.  * pthread_prio_queue_remove()
  112.  */
  113. int pthread_prio_queue_remove(struct pthread_prio_queue *queue, 
  114.       struct pthread *thread)
  115. {
  116.   /* XXX This is slow, should start with thread priority */
  117.   int priority = thread->pthread_priority;
  118.   struct pthread **current = &(queue->level[priority].first);
  119.   struct pthread *prev = NULL;
  120.   if (thread==*current) {
  121.     int current_priority=priority+1;
  122.     if (*current == queue->next){
  123.       pthread_prio_queue_deq(queue);
  124.       thread->next = NULL;
  125.       return(OK);
  126.     }
  127.     for (current_priority; current_priority <= PTHREAD_MAX_PRIORITY;
  128.  current_priority++) {
  129.       if (queue->level[current_priority].last) {
  130. queue->level[current_priority].last->next = (*current)->next;
  131. if ((*current)->next &&
  132.     (*current)->next->pthread_priority == priority) 
  133.   queue->level[priority].first = (*current)->next;
  134. else {
  135.   queue->level[priority].first = NULL;
  136.   queue->level[priority].last  = NULL;
  137. }
  138. thread->next = NULL;
  139. return(OK);
  140.       }
  141.     }
  142.   }
  143.   if (*current == NULL) /* Mati Sauks */
  144.   {
  145.     return (NOTOK);
  146.   }
  147.   for (prev=*current,current=&((*current)->next); 
  148.        *current && ((*current)->pthread_priority == priority);
  149.        prev=*current,current=&((*current)->next)) {
  150.     if (*current == thread) {
  151.       if (*current == queue->level[priority].last) {
  152. queue->level[priority].last = prev;
  153.       }
  154.       *current = (*current)->next;
  155.       thread->next=NULL;
  156.       return(OK);
  157.     }
  158.   }
  159.   return(NOTOK);
  160. }