workbench/libs/popupmenu/pmmem.c

   1 //
   2 // pmmem.h
   3 //
   4
   5 #include "pmpriv.h"
   6 #include "pmmem.h"
   7
   8 APTR PM_AllocVecPooled(LONG size)
   9 {
  10 #if defined(__AROS__) || defined(__MORPHOS__)
  11         ULONG *p;
  12
  13         // To Do: Add Semaphore protection to the pool!!!
  14         // stegerg: MOS and AROS have MEMF_SEM_PROTECTED. See pminit.c
  15
  16         size += sizeof(ULONG);
  17
  18         p = AllocPooled(MemPool, size);
  19         if(p) {
  20                 *p++ = size;
  21                 return (APTR)p;
  22         }
  23         return NULL;
  24 #else
  25         return AllocVec(size, MEMF_CLEAR);
  26 #endif
  27 }
  28
  29 void PM_FreeVecPooled(APTR mem)
  30 {
  31 #if defined(__AROS__) || defined(__MORPHOS__)
  32         ULONG *p = (ULONG *)mem;
  33         p--;
  34         FreePooled(MemPool, p, *p);
  35 #else
  36         FreeVec(mem);
  37 #endif
  38 }
  39
  40 ULONG PM_String_Length(STRPTR s)
  41 {
  42         IPTR r=(IPTR)s;
  43
  44         while(*s++);
  45
  46         return ((IPTR)s)-r;
  47 }
  48
  49 STRPTR PM_String_Copy(STRPTR Source, STRPTR Dest, LONG Len)
  50 {
  51         if(Len==-1) {
  52                 while(*Source) *Dest++=*Source++;
  53                 *Dest++=0;
  54                 return Dest;
  55         } else {
  56                 LONG ctr=0;
  57
  58                 while(ctr<Len) {
  59                         Dest[ctr]=Source[ctr];
  60                         ctr++;
  61                 }
  62                 return &Dest[ctr];
  63         }
  64 }
  65
  66 ULONG PM_String_Compare(STRPTR str1, STRPTR str2)
  67 {
  68         ULONG i, j=0;
  69         if(!str1 || !str2) return 0;
  70         for(i=0;;i++) {
  71                 j+=str1[i];
  72                 j-=str2[i];
  73                 if(!str1[i] || !str2[i] || j) return j;
  74         }
  75 }
  76
  77 void PM_StrCat(STRPTR str1, STRPTR str2)
  78 {
  79         while(*str1) str1++;
  80         while(*str2) *str1++=*str2++;
  81         *str1=0;
  82 }