workbench/libs/popupmenu/staticlib/pm_exlst.c

   1 /*
   2     Copyright © 2010, The AROS Development Team.
   3     All rights reserved.
   4
   5     $Id$
   6 */
   7
   8 //#define DEBUG 1
   9 #include <aros/debug.h>
  10
  11 #include <utility/tagitem.h>
  12 #include <proto/alib.h>
  13
  14 /*****************************************************************************
  15
  16     NAME */
  17 #define NO_INLINE_STDARG /* turn off inline def */
  18 #include <proto/popupmenu.h>
  19 extern struct PopupMenuBase * PopupMenuBase;
  20
  21         struct PM_IDLst *PM_ExLst(
  22
  23 /*  SYNOPSIS */
  24         ULONG id,
  25         ...)
  26
  27 /*  FUNCTION
  28
  29     INPUTS
  30
  31     RESULT
  32
  33     NOTES
  34
  35     EXAMPLE
  36
  37     BUGS
  38
  39     SEE ALSO
  40
  41     INTERNALS
  42
  43     HISTORY
  44
  45 *****************************************************************************/
  46 {
  47     struct PM_IDLst *retval = NULL;
  48
  49 #ifdef NO_LINEAR_VARARGS
  50     ULONG size = 1; // for initial value
  51     ULONG val;
  52     ULONG *values;
  53     ULONG idx;
  54     va_list ap;
  55
  56     va_start(ap, id);
  57
  58     // count IDs
  59     for (val = id; val != 0; val = va_arg(ap, ULONG))
  60     {
  61         size++;
  62     }
  63
  64     D(bug("[PM_ExLst] size %d\n", size));
  65
  66     values = AllocVec(size * sizeof(ULONG), MEMF_ANY);
  67
  68     if (values)
  69     {
  70         values[0] = id; // initial value
  71
  72         va_start(ap, id);
  73
  74         // fill the array
  75         for (idx = 1; idx < size; idx++)
  76         {
  77             values[idx] = va_arg(ap, ULONG);
  78             D(bug("[PM_ExLst] i %d value %d\n", idx, values[idx]));
  79         }
  80
  81         retval = PM_ExLstA(values);
  82     }
  83
  84     va_end(ap);
  85
  86     FreeVec(values);
  87 #else
  88     retval = PM_ExLstA((ULONG *)&id);
  89 #endif
  90
  91     return retval;
  92
  93 } /* PM_ExLst */