Diff for /libaitsched/src/aitsched.c between versions 1.17.2.1 and 1.25.2.2

version 1.17.2.1, 2013/05/26 20:14:02 version 1.25.2.2, 2014/05/19 23:35:40
Line 12  terms: Line 12  terms:
 All of the documentation and software included in the ELWIX and AITNET  All of the documentation and software included in the ELWIX and AITNET
 Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org>  Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org>
   
Copyright 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012, 2013Copyright 2004 - 2014
         by Michael Pounov <misho@elwix.org>.  All rights reserved.          by Michael Pounov <misho@elwix.org>.  All rights reserved.
   
 Redistribution and use in source and binary forms, with or without  Redistribution and use in source and binary forms, with or without
Line 82  sched_SetErr(int eno, char *estr, ...) Line 82  sched_SetErr(int eno, char *estr, ...)
         va_end(lst);          va_end(lst);
 }  }
   
   
   /* string support functions directly imported from OpenBSD */
   
   #ifndef HAVE_STRLCAT
   /*
    * Appends src to string dst of size siz (unlike strncat, siz is the
    * full size of dst, not space left).  At most siz-1 characters
    * will be copied.  Always NUL terminates (unless siz <= strlen(dst)).
    * Returns strlen(src) + MIN(siz, strlen(initial dst)).
    * If retval >= siz, truncation occurred.
    */
   size_t
   strlcat(char * __restrict dst, const char * __restrict src, size_t siz)
   {
           char *d = dst;
           const char *s = src;
           size_t n = siz;
           size_t dlen;
   
           /* Find the end of dst and adjust bytes left but don't go past end */
           while (n-- != 0 && *d != '\0')
                   d++;
           dlen = d - dst;
           n = siz - dlen;
   
           if (n == 0)
                   return(dlen + strlen(s));
           while (*s != '\0') {
                   if (n != 1) {
                           *d++ = *s;
                           n--;
                   }
                   s++;
           }
           *d = '\0';
   
           return(dlen + (s - src));       /* count does not include NUL */
   }
   #endif
   #ifndef HAVE_STRLCPY
   /*
    * Copy src to string dst of size siz.  At most siz-1 characters
    * will be copied.  Always NUL terminates (unless siz == 0).
    * Returns strlen(src); if retval >= siz, truncation occurred.
    */
   size_t
   strlcpy(char * __restrict dst, const char * __restrict src, size_t siz)
   {
           char *d = dst;
           const char *s = src;
           size_t n = siz;
   
           /* Copy as many bytes as will fit */
           if (n != 0) {
                   while (--n != 0) {
                           if ((*d++ = *s++) == '\0')
                                   break;
                   }
           }
   
           /* Not enough room in dst, add NUL and traverse rest of src */
           if (n == 0) {
                   if (siz != 0)
                           *d = '\0';              /* NUL-terminate dst */
                   while (*s++)
                           ;
           }
   
           return(s - src - 1);    /* count does not include NUL */
   }
   #endif
   
   
 /* Init and prepare scheduler functions */  /* Init and prepare scheduler functions */
   
 /*  /*
Line 102  schedRegisterHooks(sched_root_task_t * __restrict root Line 175  schedRegisterHooks(sched_root_task_t * __restrict root
         root->root_hooks.hook_add.read = sched_hook_read;          root->root_hooks.hook_add.read = sched_hook_read;
         root->root_hooks.hook_add.write = sched_hook_write;          root->root_hooks.hook_add.write = sched_hook_write;
         root->root_hooks.hook_add.alarm = sched_hook_alarm;          root->root_hooks.hook_add.alarm = sched_hook_alarm;
   #if defined(HAVE_TIMER_CREATE) && defined(HAVE_TIMER_SETTIME) && defined(HAVE_TIMER_DELETE)
           root->root_hooks.hook_add.rtc = sched_hook_rtc;
   #endif
         root->root_hooks.hook_add.node = sched_hook_node;          root->root_hooks.hook_add.node = sched_hook_node;
         root->root_hooks.hook_add.proc = sched_hook_proc;          root->root_hooks.hook_add.proc = sched_hook_proc;
         root->root_hooks.hook_add.signal = sched_hook_signal;          root->root_hooks.hook_add.signal = sched_hook_signal;
Line 167  schedInit(void ** __restrict data, size_t datlen) Line 243  schedInit(void ** __restrict data, size_t datlen)
                 TAILQ_INIT(&root->root_write);                  TAILQ_INIT(&root->root_write);
                 TAILQ_INIT(&root->root_timer);                  TAILQ_INIT(&root->root_timer);
                 TAILQ_INIT(&root->root_alarm);                  TAILQ_INIT(&root->root_alarm);
                   TAILQ_INIT(&root->root_rtc);
                 TAILQ_INIT(&root->root_node);                  TAILQ_INIT(&root->root_node);
                 TAILQ_INIT(&root->root_proc);                  TAILQ_INIT(&root->root_proc);
                 TAILQ_INIT(&root->root_signal);                  TAILQ_INIT(&root->root_signal);
Line 228  schedEnd(sched_root_task_t ** __restrict root) Line 305  schedEnd(sched_root_task_t ** __restrict root)
                 schedCancel(task);                  schedCancel(task);
         TAILQ_FOREACH_SAFE(task, &(*root)->root_alarm, task_node, tmp)          TAILQ_FOREACH_SAFE(task, &(*root)->root_alarm, task_node, tmp)
                 schedCancel(task);                  schedCancel(task);
           TAILQ_FOREACH_SAFE(task, &(*root)->root_rtc, task_node, tmp)
                   schedCancel(task);
         TAILQ_FOREACH_SAFE(task, &(*root)->root_node, task_node, tmp)          TAILQ_FOREACH_SAFE(task, &(*root)->root_node, task_node, tmp)
                 schedCancel(task);                  schedCancel(task);
         TAILQ_FOREACH_SAFE(task, &(*root)->root_proc, task_node, tmp)          TAILQ_FOREACH_SAFE(task, &(*root)->root_proc, task_node, tmp)
Line 329  schedFetch(sched_root_task_t * __restrict root) Line 408  schedFetch(sched_root_task_t * __restrict root)
 int  int
 schedTrigger(sched_task_t * __restrict task)  schedTrigger(sched_task_t * __restrict task)
 {  {
   #if SUP_ENABLE != KQ_SUPPORT
           sched_SetErr(ENOTSUP, "disabled kqueue support");
           return -1;
   #else
 #ifndef EVFILT_USER  #ifndef EVFILT_USER
         sched_SetErr(ENOTSUP, "Not supported kevent() filter");          sched_SetErr(ENOTSUP, "Not supported kevent() filter");
         return -1;          return -1;
Line 351  schedTrigger(sched_task_t * __restrict task) Line 434  schedTrigger(sched_task_t * __restrict task)
   
         return 0;          return 0;
 #endif  #endif
   #endif  /* KQ_DISABLE */
 }  }
   
 /*  /*
    * schedQuery() - Query task in scheduler
    *
    * @task = task
    * return: -1 error, 0 found  and 1 not found
    */
   int
   schedQuery(sched_task_t * __restrict task)
   {
           sched_queue_t *queue;
           sched_task_t *t;
   
           if (!task || !TASK_ROOT(task))
                   return -1;      /* error */
   
           switch (TASK_TYPE(task)) {
                   case taskREAD:
                           queue = &TASK_ROOT(task)->root_read;
                           break;
                   case taskWRITE:
                           queue = &TASK_ROOT(task)->root_write;
                           break;
                   case taskTIMER:
                           queue = &TASK_ROOT(task)->root_timer;
                           break;
                   case taskALARM:
                           queue = &TASK_ROOT(task)->root_alarm;
                           break;
                   case taskRTC:
                           queue = &TASK_ROOT(task)->root_rtc;
                           break;
                   case taskNODE:
                           queue = &TASK_ROOT(task)->root_node;
                           break;
                   case taskPROC:
                           queue = &TASK_ROOT(task)->root_proc;
                           break;
                   case taskSIGNAL:
                           queue = &TASK_ROOT(task)->root_signal;
                           break;
                   case taskAIO:
                           queue = &TASK_ROOT(task)->root_aio;
                           break;
                   case taskLIO:
                           queue = &TASK_ROOT(task)->root_lio;
                           break;
                   case taskUSER:
                           queue = &TASK_ROOT(task)->root_user;
                           break;
                   case taskEVENT:
                           queue = &TASK_ROOT(task)->root_event;
                           break;
                   case taskTASK:
                           queue = &TASK_ROOT(task)->root_task;
                           break;
                   case taskSUSPEND:
                           queue = &TASK_ROOT(task)->root_suspend;
                           break;
                   case taskREADY:
                           queue = &TASK_ROOT(task)->root_ready;
                           break;
                   case taskTHREAD:
                           queue = &TASK_ROOT(task)->root_thread;
                           break;
                   default:
                           return 1;       /* not in queue */
           }
           if (queue)
                   TAILQ_FOREACH(t, queue, task_node)
                           if (TASK_ID(t) == TASK_ID(task))
                                   return 0;       /* found */
   
           return 1;       /* not in queue */
   }
   
   /*
    * schedQueryby() - Query task in scheduler by criteria
    *
    * @root = root task
    * @type = query from queue type, if =taskMAX query same task from all queues
    * @criteria = find task by criteria 
    *      [ CRITERIA_ANY|CRITERIA_CALL|CRITERIA_ARG|CRITERIA_FD|CRITERIA_VAL|
    *              CRITERIA_ID|CRITERIA_TS|CRITERIA_DATA|CRITERIA_DATLEN ]
    * @param = search parameter
    * return: -1 error, 0 found or 1 not found
    */
   int
   schedQueryby(sched_root_task_t * __restrict root, sched_task_type_t type, 
                   u_char criteria, void *param)
   {
           sched_task_t *task;
           sched_queue_t *queue;
           register int flg = 0;
   
           if (!root)
                   return -1;
           /* if type == taskMAX check in all queues */
           if (type == taskMAX) {
                   if ((flg = schedQueryby(root, taskREAD, criteria, param)) < 1)
                           return flg;
                   if ((flg = schedQueryby(root, taskWRITE, criteria, param)) < 1)
                           return flg;
                   if ((flg = schedQueryby(root, taskTIMER, criteria, param)) < 1)
                           return flg;
                   if ((flg = schedQueryby(root, taskALARM, criteria, param)) < 1)
                           return flg;
                   if ((flg = schedQueryby(root, taskRTC, criteria, param)) < 1)
                           return flg;
                   if ((flg = schedQueryby(root, taskNODE, criteria, param)) < 1)
                           return flg;
                   if ((flg = schedQueryby(root, taskPROC, criteria, param)) < 1)
                           return flg;
                   if ((flg = schedQueryby(root, taskSIGNAL, criteria, param)) < 1)
                           return flg;
                   if ((flg = schedQueryby(root, taskAIO, criteria, param)) < 1)
                           return flg;
                   if ((flg = schedQueryby(root, taskLIO, criteria, param)) < 1)
                           return flg;
                   if ((flg = schedQueryby(root, taskUSER, criteria, param)) < 1)
                           return flg;
                   if ((flg = schedQueryby(root, taskEVENT, criteria, param)) < 1)
                           return flg;
                   if ((flg = schedQueryby(root, taskTASK, criteria, param)) < 1)
                           return flg;
                   if ((flg = schedQueryby(root, taskSUSPEND, criteria, param)) < 1)
                           return flg;
                   if ((flg = schedQueryby(root, taskREADY, criteria, param)) < 1)
                           return flg;
                   if ((flg = schedQueryby(root, taskTHREAD, criteria, param)) < 1)
                           return flg;
                   return 1;       /* not found */
           }
           /* choosen queue */
           switch (type) {
                   case taskREAD:
                           queue = &root->root_read;
                           break;
                   case taskWRITE:
                           queue = &root->root_write;
                           break;
                   case taskTIMER:
                           queue = &root->root_timer;
                           break;
                   case taskALARM:
                           queue = &root->root_alarm;
                           break;
                   case taskRTC:
                           queue = &root->root_rtc;
                           break;
                   case taskNODE:
                           queue = &root->root_node;
                           break;
                   case taskPROC:
                           queue = &root->root_proc;
                           break;
                   case taskSIGNAL:
                           queue = &root->root_signal;
                           break;
                   case taskAIO:
                           queue = &root->root_aio;
                           break;
                   case taskLIO:
                           queue = &root->root_lio;
                           break;
                   case taskUSER:
                           queue = &root->root_user;
                           break;
                   case taskEVENT:
                           queue = &root->root_event;
                           break;
                   case taskTASK:
                           queue = &root->root_task;
                           break;
                   case taskSUSPEND:
                           queue = &root->root_suspend;
                           break;
                   case taskREADY:
                           queue = &root->root_ready;
                           break;
                   case taskTHREAD:
                           queue = &root->root_thread;
                           break;
                   default:
                           return 1;       /* not found */
           }
   
           TAILQ_FOREACH(task, queue, task_node) {
                   switch (criteria) {
                           case CRITERIA_ANY:
                                   return 0;               /* found */
                           case CRITERIA_CALL:
                                   if (TASK_FUNC(task) == (sched_task_func_t) param)
                                           return 0;       /* found */
                                   break;
                           case CRITERIA_ARG:
                                   if (TASK_ARG(task) == param)
                                           return 0;       /* found */
                                   break;
                           case CRITERIA_FD:
                                   if (TASK_FD(task) == (intptr_t) param)
                                           return 0;       /* found */
                                   break;
                           case CRITERIA_ID:
                           case CRITERIA_VAL:
                                   if (TASK_VAL(task) == (u_long) param)
                                           return 0;       /* found */
                                   break;
                           case CRITERIA_TS:
                                   if (!sched_timespeccmp(&TASK_TS(task), 
                                                           (struct timespec*) param, -))
                                           return 0;       /* found */
                                   break;
                           case CRITERIA_DATA:
                                   if (TASK_DATA(task) == param)
                                           return 0;       /* found */
                                   break;
                           case CRITERIA_DATLEN:
                                   if (TASK_DATLEN(task) == (size_t) param)
                                           return 0;       /* found */
                                   break;
                           default:
                                   sched_SetErr(EINVAL, "Invalid parameter criteria %d", 
                                                   criteria);
                                   return 1;               /* not found */
                   }
           }
   
           return 1;       /* not found */
   }
   
   /*
  * schedCancel() - Cancel task from scheduler   * schedCancel() - Cancel task from scheduler
  *   *
  * @task = task   * @task = task
Line 384  schedCancel(sched_task_t * __restrict task) Line 698  schedCancel(sched_task_t * __restrict task)
                 case taskALARM:                  case taskALARM:
                         queue = &TASK_ROOT(task)->root_alarm;                          queue = &TASK_ROOT(task)->root_alarm;
                         break;                          break;
                   case taskRTC:
                           queue = &TASK_ROOT(task)->root_rtc;
                           break;
                 case taskNODE:                  case taskNODE:
                         queue = &TASK_ROOT(task)->root_node;                          queue = &TASK_ROOT(task)->root_node;
                         break;                          break;
Line 441  schedCancel(sched_task_t * __restrict task) Line 758  schedCancel(sched_task_t * __restrict task)
  * @root = root task   * @root = root task
  * @type = cancel from queue type, if =taskMAX cancel same task from all queues   * @type = cancel from queue type, if =taskMAX cancel same task from all queues
  * @criteria = find task by criteria    * @criteria = find task by criteria 
 *      [CRITERIA_ANY|CRITERIA_CALL|CRITERIA_ARG|CRITERIA_FD|CRITERIA_VAL|CRITERIA_ID|CRITERIA_TS|CRITERIA_DATA] *      [ CRITERIA_ANY|CRITERIA_CALL|CRITERIA_ARG|CRITERIA_FD|CRITERIA_VAL|
  *                CRITERIA_ID|CRITERIA_TS|CRITERIA_DATA|CRITERIA_DATLEN ]
  * @param = search parameter   * @param = search parameter
  * @hook = custom cleanup hook function, may be NULL   * @hook = custom cleanup hook function, may be NULL
  * return: -1 error, -2 error in sub-stage cancel execution, -3 error from custom hook or 0 ok   * return: -1 error, -2 error in sub-stage cancel execution, -3 error from custom hook or 0 ok
Line 466  schedCancelby(sched_root_task_t * __restrict root, sch Line 784  schedCancelby(sched_root_task_t * __restrict root, sch
                         return -2;                          return -2;
                 if (schedCancelby(root, taskALARM, criteria, param, hook))                  if (schedCancelby(root, taskALARM, criteria, param, hook))
                         return -2;                          return -2;
                   if (schedCancelby(root, taskRTC, criteria, param, hook))
                           return -2;
                 if (schedCancelby(root, taskNODE, criteria, param, hook))                  if (schedCancelby(root, taskNODE, criteria, param, hook))
                         return -2;                          return -2;
                 if (schedCancelby(root, taskPROC, criteria, param, hook))                  if (schedCancelby(root, taskPROC, criteria, param, hook))
Line 504  schedCancelby(sched_root_task_t * __restrict root, sch Line 824  schedCancelby(sched_root_task_t * __restrict root, sch
                 case taskALARM:                  case taskALARM:
                         queue = &root->root_alarm;                          queue = &root->root_alarm;
                         break;                          break;
                   case taskRTC:
                           queue = &root->root_rtc;
                           break;
                 case taskNODE:                  case taskNODE:
                         queue = &root->root_node;                          queue = &root->root_node;
                         break;                          break;
Line 575  schedCancelby(sched_root_task_t * __restrict root, sch Line 898  schedCancelby(sched_root_task_t * __restrict root, sch
                                 if (TASK_DATA(task) == param)                                  if (TASK_DATA(task) == param)
                                         flg = 1;                                          flg = 1;
                                 break;                                  break;
                           case CRITERIA_DATLEN:
                                   if (TASK_DATLEN(task) == (size_t) param)
                                           flg = 1;
                                   break;
                         default:                          default:
                                 sched_SetErr(EINVAL, "Invalid parameter criteria %d", criteria);                                  sched_SetErr(EINVAL, "Invalid parameter criteria %d", criteria);
                                 flg = -1;                                  flg = -1;
Line 700  schedTermCondition(sched_root_task_t * __restrict root Line 1027  schedTermCondition(sched_root_task_t * __restrict root
  *   *
  * @root = root task   * @root = root task
  * @criteria = find task by criteria    * @criteria = find task by criteria 
 *      [CRITERIA_ANY|CRITERIA_ID|CRITERIA_DATA] *      [CRITERIA_ANY|CRITERIA_ID|CRITERIA_VAL|CRITERIA_DATA]
 * @param = search parameter (sched_task_t *task| u_long id) * @param = search parameter (sched_task_t *task| unsigned long id)
  * return: -1 error or 0 resumed ok   * return: -1 error or 0 resumed ok
  */   */
 int  int
Line 723  schedResumeby(sched_root_task_t * __restrict root, u_c Line 1050  schedResumeby(sched_root_task_t * __restrict root, u_c
                                 flg = 1;                                  flg = 1;
                                 break;                                  break;
                         case CRITERIA_ID:                          case CRITERIA_ID:
                           case CRITERIA_VAL:
                                 if (TASK_VAL(task) == (u_long) param)                                  if (TASK_VAL(task) == (u_long) param)
                                         flg = 1;                                          flg = 1;
                                 break;                                  break;

Removed from v.1.17.2.1  
changed lines
  Added in v.1.25.2.2


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>