add oversampler

oversampling/WDL/swell/swell-gdi-internalpool.h

@@ -0,0 +1,222 @@
+/* Cockos SWELL (Simple/Small Win32 Emulation Layer for Linux/OSX)
+   Copyright (C) 2006 and later, Cockos, Inc.
+
+    This software is provided 'as-is', without any express or implied
+    warranty.  In no event will the authors be held liable for any damages
+    arising from the use of this software.
+
+    Permission is granted to anyone to use this software for any purpose,
+    including commercial applications, and to alter it and redistribute it
+    freely, subject to the following restrictions:
+
+    1. The origin of this software must not be misrepresented; you must not
+       claim that you wrote the original software. If you use this software
+       in a product, an acknowledgment in the product documentation would be
+       appreciated but is not required.
+    2. Altered source versions must be plainly marked as such, and must not be
+       misrepresented as being the original software.
+    3. This notice may not be removed or altered from any source distribution.
+  
+  // used for HDC/HGDIOBJ pooling (to avoid excess heap use), used by swell-gdi.mm and swell-gdi-generic.cpp
+*/
+
+#if defined(_DEBUG)
+  #define SWELL_GDI_DEBUG
+#endif
+
+static WDL_Mutex *m_ctxpool_mutex;
+#ifdef SWELL_GDI_DEBUG
+  #include "../ptrlist.h"
+  static WDL_PtrList<HDC__> *m_ctxpool_debug;
+  static WDL_PtrList<HGDIOBJ__> *m_objpool_debug;
+#else
+  static HDC__ *m_ctxpool;
+  static int m_ctxpool_size;
+  static HGDIOBJ__ *m_objpool;
+  static int m_objpool_size;
+#endif
+
+
+
+HDC__ *SWELL_GDP_CTX_NEW()
+{
+  if (!m_ctxpool_mutex) m_ctxpool_mutex=new WDL_Mutex;
+  
+  HDC__ *p=NULL;
+#ifdef SWELL_GDI_DEBUG
+  m_ctxpool_mutex->Enter();
+  if (!m_ctxpool_debug) m_ctxpool_debug = new WDL_PtrList<HDC__>;
+  if (m_ctxpool_debug->GetSize() > 8192)
+  {
+    p =  m_ctxpool_debug->Get(0);
+    m_ctxpool_debug->Delete(0);
+    memset(p,0,sizeof(*p));
+  }
+  m_ctxpool_mutex->Leave();
+#else
+  if (m_ctxpool)
+  {
+    m_ctxpool_mutex->Enter();
+    if ((p=m_ctxpool))
+    { 
+      m_ctxpool=p->_next;
+      m_ctxpool_size--;
+      memset(p,0,sizeof(*p));
+    }
+    m_ctxpool_mutex->Leave();
+  }
+#endif
+  if (!p) 
+  {
+//    printf("alloc ctx\n");
+    p=(HDC__ *)calloc(sizeof(HDC__)+128,1); // extra space in case things want to use it (i.e. swell-gdi-lice does)
+  }
+  return p;
+}
+static void SWELL_GDP_CTX_DELETE(HDC__ *p)
+{
+  if (!m_ctxpool_mutex) m_ctxpool_mutex=new WDL_Mutex;
+
+  if (WDL_NOT_NORMALLY(!p || p->_infreelist)) return;
+
+  memset(p,0,sizeof(*p));
+
+#ifdef SWELL_GDI_DEBUG
+  m_ctxpool_mutex->Enter();
+  p->_infreelist=true;
+  if (!m_ctxpool_debug) m_ctxpool_debug = new WDL_PtrList<HDC__>;
+  m_ctxpool_debug->Add(p);
+  m_ctxpool_mutex->Leave();
+#else
+  if (m_ctxpool_size<100)
+  {
+    m_ctxpool_mutex->Enter();
+    p->_infreelist=true;
+    p->_next = m_ctxpool;
+    m_ctxpool = p;
+    m_ctxpool_size++;
+    m_ctxpool_mutex->Leave();
+  }
+  else 
+  {
+  //  printf("free ctx\n");
+    free(p);
+  }
+#endif
+}
+static HGDIOBJ__ *GDP_OBJECT_NEW()
+{
+  if (!m_ctxpool_mutex) m_ctxpool_mutex=new WDL_Mutex;
+  HGDIOBJ__ *p=NULL;
+#ifdef SWELL_GDI_DEBUG
+  m_ctxpool_mutex->Enter();
+  if (!m_objpool_debug) m_objpool_debug = new WDL_PtrList<HGDIOBJ__>;
+  if (m_objpool_debug->GetSize()>8192)
+  {
+    p = m_objpool_debug->Get(0);
+    m_objpool_debug->Delete(0);
+    memset(p,0,sizeof(*p));
+  }
+  m_ctxpool_mutex->Leave();
+#else
+  if (m_objpool)
+  {
+    m_ctxpool_mutex->Enter();
+    if ((p=m_objpool))
+    {
+      m_objpool = p->_next;
+      m_objpool_size--;
+      memset(p,0,sizeof(*p));
+    }
+    m_ctxpool_mutex->Leave();
+  }
+#endif
+  if (!p) 
+  {
+    //   printf("alloc obj\n");
+    p=(HGDIOBJ__ *)calloc(sizeof(HGDIOBJ__),1);    
+  }
+  return p;
+}
+
+static bool HGDIOBJ_VALID(HGDIOBJ__ *p, int reqType=0)
+{
+  return p &&
+    WDL_NORMALLY( p != (HGDIOBJ__*)TYPE_PEN && p != (HGDIOBJ__*)TYPE_BRUSH &&
+                  p != (HGDIOBJ__*)TYPE_FONT && p != (HGDIOBJ__*)TYPE_BITMAP) &&
+    WDL_NORMALLY(!p->_infreelist) &&
+    WDL_NORMALLY(!reqType || reqType == p->type);
+}
+
+static void GDP_OBJECT_DELETE(HGDIOBJ__ *p)
+{
+  if (!m_ctxpool_mutex) m_ctxpool_mutex=new WDL_Mutex;
+  if (WDL_NOT_NORMALLY(!p) || !HGDIOBJ_VALID(p)) return;
+
+  memset(p,0,sizeof(*p));
+#ifdef SWELL_GDI_DEBUG
+  m_ctxpool_mutex->Enter();
+  p->_infreelist = true;
+  if (!m_objpool_debug) m_objpool_debug = new WDL_PtrList<HGDIOBJ__>;
+  m_objpool_debug->Add(p);
+  m_ctxpool_mutex->Leave();
+#else
+  if (m_objpool_size<200)
+  {
+    m_ctxpool_mutex->Enter();
+    p->_infreelist = true;
+    p->_next = m_objpool;
+    m_objpool = p;
+    m_objpool_size++;
+    m_ctxpool_mutex->Leave();
+  }
+  else
+  {
+    //    printf("free obj\n");
+    free(p);
+  }
+#endif
+}
+
+static bool HDC_VALID(HDC__ *ct)
+{
+  return ct && WDL_NORMALLY(!ct->_infreelist);
+}
+
+
+#if !defined(SWELL_GDI_DEBUG) && defined(SWELL_CLEANUP_ON_UNLOAD)
+
+class _swellGdiUnloader
+{
+  public:
+  _swellGdiUnloader() { }
+  ~_swellGdiUnloader() 
+  {
+     {
+       HDC__ *p = m_ctxpool;
+       m_ctxpool = NULL;
+       while (p)
+       {
+         HDC__ *t = p;
+         p = p->_next;
+         free(t);
+       }
+     }
+     {
+       HGDIOBJ__ *p = m_objpool;
+       m_objpool = NULL;
+       while (p)
+       {
+         HGDIOBJ__ *t = p;
+         p = p->_next;
+         free(t);
+       }
+     }
+
+     delete m_ctxpool_mutex;
+     m_ctxpool_mutex=NULL;
+  }
+};
+
+_swellGdiUnloader __swell__swellGdiUnloader;
+#endif