OK guys, there's a very serious leak on Linux, confirmed by the code below. Every time you change the value of a picture ring, either by clicking on the arrow of the picture ring or right-click on it (callback to SetCtrlVal), it uses 1 extra Mb of mem for a 512x512 pixel image !!!
Here's a sample code:
// Right-click the ring to cause memory leak
#include <stdio.h>
#include <stdlib.h>
#include <cvirte.h>
#include <userint.h>
#define RND_COLOR (((rand()<<16) ^ (rand()<<8) ^ rand()) & 0xFFFFFF)
// (int)((double)(0xFFFFFF)*rand()/RAND_MAX)
static int Pnl=0,
Text, Ring, // Controls
NbVals=16, // Number of images in the ring
Width=512, Height=512; // Of the Canvas and image ring
// Returns memory used by process in 4Kb page:
// TotalSize Resident Share Text Lib Data Dirty
// See "man proc" section statm
static char* ReadOffMemoryStatus(void) {
static char statm[80];
statm[0]='\0';
#ifdef _NI_linux_
FILE *f = fopen("/proc/self/statm","r");
if (f)
fgets (statm, 79, f),
fclose(f);
#endif
return statm;
}
static void Prepare(const int Nb) {
Point polyPoints[10]={{0,0}};
char Str[10];
int i, Bitmap;
int Canvas=NewCtrl(Pnl, CTRL_CANVAS, "", 0, 0);
SetCtrlAttribute(Pnl, Canvas, ATTR_DRAW_POLICY, VAL_UPDATE_IMMEDIATELY);
SetCtrlAttribute(Pnl, Canvas, ATTR_WIDTH, Width);
SetCtrlAttribute(Pnl, Canvas, ATTR_HEIGHT, Height);
// SetCtrlAttribute(Pnl, Canvas, ATTR_ENABLE_ANTI_ALIASING, 1); // No compile on Linux
SetCtrlAttribute(Pnl, Canvas, ATTR_PICT_BGCOLOR, RND_COLOR /*VAL_TRANSPARENT*/);
SetCtrlAttribute(Pnl, Canvas, ATTR_PEN_FILL_COLOR, RND_COLOR);
SetCtrlAttribute(Pnl, Canvas, ATTR_PEN_COLOR, RND_COLOR);
SetCtrlAttribute(Pnl, Canvas, ATTR_PEN_WIDTH, 7);
for (i=0; i<10; i++)
polyPoints[i].x=(Width*rand()/RAND_MAX),
polyPoints[i].y=(Height*rand()/RAND_MAX);
sprintf(Str, "%d", Nb);
// CanvasStartBatchDraw(Pnl, Canvas);
// This sometimes doesn't work on Linux
CanvasDrawPoly (Pnl, Canvas, 10, polyPoints, 1, VAL_DRAW_FRAME_AND_INTERIOR);
CanvasDrawLine (Pnl, Canvas, MakePoint(Width-1,0), MakePoint(0, Height-1));
SetCtrlAttribute(Pnl, Canvas, ATTR_PEN_COLOR, VAL_BLACK);
SetCtrlAttribute(Pnl, Canvas, ATTR_PEN_FILL_COLOR, VAL_WHITE);
CanvasDrawText(Pnl, Canvas, Str, VAL_APP_META_FONT,
MakeRect (2, 2, VAL_KEEP_SAME_SIZE, VAL_KEEP_SAME_SIZE), VAL_UPPER_LEFT);
// CanvasEndBatchDraw(Pnl, Canvas);
GetCtrlBitmap(Pnl, Canvas, 0, &Bitmap);
DiscardCtrl (Pnl, Canvas);
InsertListItem(Pnl, Ring, Nb, NULL, Nb); // The value is the color, so remember which one you use
SetCtrlBitmap (Pnl, Ring, Nb, Bitmap);
DiscardBitmap (Bitmap);
}
int CVICALLBACK cb_Change(int panel, int control, int event,
void *callbackData, int eventData1, int eventData2) {
static int i=0;
switch (event) {
case EVENT_RIGHT_CLICK:
case EVENT_RIGHT_DOUBLE_CLICK:
SetCtrlVal(Pnl, Ring, i=(i+1)%NbVals);
// No break;
case EVENT_COMMIT:
SetCtrlVal(Pnl, Text, ReadOffMemoryStatus());
break;
}
return 0;
}
int CVICALLBACK cb_Quit(int panel, int control, int event,
void *callbackData, int eventData1, int eventData2) {
switch (event) {
case EVENT_COMMIT: QuitUserInterface (0); break;
}
return 0;
}
int main (int argc, char *argv[]) {
int i, Quit;
if (InitCVIRTE (0, argv, 0) == 0) return -1;
Pnl = NewPanel (0, "Test image ring", 20, 20, Height+20, Width);
Text = NewCtrl (Pnl, CTRL_STRING_LS, "Memory use (in 4Kb pages)", 0, 0);
Ring = NewCtrl (Pnl, CTRL_PICTURE_RING, "", 20, 0);
Quit = NewCtrl (Pnl, CTRL_SQUARE_BUTTON_LS, "", 50, 50);
SetCtrlAttribute(Pnl, Ring, ATTR_HEIGHT, Height);
SetCtrlAttribute(Pnl, Ring, ATTR_WIDTH, Width);
SetCtrlAttribute (Pnl, Ring, ATTR_CTRL_MODE, VAL_HOT);
SetCtrlAttribute(Pnl, Ring, ATTR_CALLBACK_FUNCTION_POINTER, cb_Change);
for (i=0; i<NbVals; i++) Prepare(i);
SetCtrlAttribute(Pnl, Text, ATTR_WIDTH, 250);
SetCtrlAttribute(Pnl, Text, ATTR_LABEL_LEFT, 250);
SetCtrlAttribute(Pnl, Text, ATTR_LABEL_TOP, 0);
SetCtrlAttribute(Pnl, Quit, ATTR_CALLBACK_FUNCTION_POINTER, cb_Quit);
SetCtrlAttribute(Pnl, Quit, ATTR_VISIBLE, 0);
SetCtrlAttribute(Pnl, Quit, ATTR_SHORTCUT_KEY, VAL_ESC_VKEY);
SetPanelAttribute(Pnl, ATTR_CLOSE_CTRL, Quit);
DisplayPanel (Pnl);
RunUserInterface ();
return 0;
}
There are other issues as well:
- CanvasDrawPoly sometimes doesn't work.
- The anti-aliasing on a canvas doesn't compile.
Is there anything more recent than CVI 2010 for Linux ?!?
