home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Misc / setip10.lha / SetIntPri.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-12-09  |  1.8 KB  |  117 lines
  1. ;/*
  2. sc parms=register nostackcheck commentnest opttime SetIntPri.c
  3. slink lib:c.o SetIntPri.o to SetIntPri lib lib:sc.lib lib:scm.lib sc sd
  4. quit 0
  5.  
  6. ¥ø, ©Øø£ - Ð¡Ç ¦Z /\/\ÆÐE ß¥ §¦£¦çØn §µ®fE®
  7.  
  8. */
  9.  
  10. #define __USE_SYSBASE   1
  11.  
  12. #include <exec/types.h>
  13. #include <exec/nodes.h>
  14. #include <exec/lists.h>
  15. #include <exec/tasks.h>
  16. #include <exec/execbase.h>
  17. #include <proto/exec.h>
  18. #include <dos/dosextens.h>
  19. #include <dos.h>
  20. #include <proto/dos.h>
  21. #include <string.h>
  22.  
  23.  
  24. int SetIntPri(char *name,long);
  25.  
  26.  
  27. const char * VERSTAG = "$VER: SetIntPri 1.0 ("__DATE__") (c) SiliconSurfer/Phantasm";
  28.  
  29.  
  30. int main (void)
  31. {
  32.     LONG pri=0;
  33.    LONG Quiet = 0;
  34.    struct RDArgs *rda;
  35.    LONG vec[3]={0,0,0};
  36.    char *IntName = NULL;
  37.  
  38.     if (rda = ReadArgs("NAME/A,PRIORITY/A/N,Q=QUIET/S", vec, NULL) )
  39.     {
  40.        IntName = (char *)(vec[0]);
  41.        pri = *(LONG *)(vec[1]);
  42.        Quiet = vec[2];
  43.  
  44.         if (!Quiet) Printf("%s\n\n",&VERSTAG[6]);
  45.  
  46.        if (pri <-128 || pri >127)
  47.        {
  48.            if (!Quiet)
  49.                PutStr("Requested priority out of range\n");
  50.            FreeArgs(rda);
  51.            return 10;
  52.        }
  53.  
  54.       Forbid();
  55.  
  56.         if (!SetIntPri(IntName,pri))
  57.         {
  58.             Permit();
  59.             if (!Quiet)
  60.                 Printf("%s not found\n", IntName);
  61.             FreeArgs(rda);
  62.             return 20;
  63.         }
  64.         else
  65.         {
  66.            Permit();
  67.            if (!Quiet)
  68.            {
  69.                   Printf("%s priority changed to %ld\n",IntName,pri);
  70.            }
  71.            FreeArgs(rda);
  72.            return 0;
  73.        }
  74.    }
  75.    else
  76.     {
  77.         Printf("%s\n\n",&VERSTAG[6]);
  78.        PrintFault(IoErr(), "ReadArgs() error");
  79.     }
  80.    return 5;
  81. }
  82.  
  83. int SetIntPri(char *name,long pri)
  84. {
  85.     struct Node *node;
  86.    struct List *plist;
  87.     ULONG  i;
  88.  
  89.  
  90.    for (i=0;i<16;i++)
  91.    {
  92.  
  93.        Disable();
  94.  
  95.         if (plist=(struct List *)SysBase->IntVects[i].iv_Data)
  96.         {
  97.  
  98.             node=FindName(plist,name);
  99.  
  100.             if (node)
  101.             {
  102.                 Remove(node);
  103.                 node->ln_Pri=pri;
  104.                 Enqueue(plist,node);
  105.                Enable();
  106.                 return(-1);
  107.             }
  108.  
  109.         }
  110.  
  111.        Enable();
  112.  
  113.    }
  114.    return (NULL);
  115. }
  116.  
  117.