void iupMatrixMarkBlockSet(Ihandle* ih, int ctrl, int lin1, int col1)
{
int mark = 1, mark_full_all, lin, col;
IFniii markedit_cb = NULL;
IFnii mark_cb = NULL;
iupMatrixMarkBlockReset(ih);
iupMatrixPrepareDrawData(ih);
if (!ih->data->mark_multiple || ih->data->mark_continuous || !ctrl)
{
iupMatrixMarkClearAll(ih, 1);
iupMatrixDraw(ih, 0);
}
else
mark = -1; /* toggle mark state */
ih->data->mark_full1 = 0;
mark_full_all = 0;
if (lin1 == 0 && col1 == 0)
{
if ((ih->data->mark_mode == IMAT_MARK_CELL && ih->data->mark_multiple) ||
ih->data->mark_mode == IMAT_MARK_COL ||
ih->data->mark_mode == IMAT_MARK_LIN)
mark_full_all = 1;
}
/* If it was pointing for a column title... */
else if (lin1 == 0)
{
if ((ih->data->mark_mode == IMAT_MARK_CELL && ih->data->mark_multiple) ||
ih->data->mark_mode & IMAT_MARK_COL)
ih->data->mark_full1 = IMAT_PROCESS_COL;
}
/* If it was pointing for a line title... */
else if (col1 == 0)
{
if ((ih->data->mark_mode == IMAT_MARK_CELL && ih->data->mark_multiple) ||
ih->data->mark_mode & IMAT_MARK_LIN)
ih->data->mark_full1 = IMAT_PROCESS_LIN;
}
if (ih->data->mark_mode == IMAT_MARK_CELL && ih->data->callback_mode)
{
markedit_cb = (IFniii)IupGetCallback(ih, "MARKEDIT_CB");
mark_cb = (IFnii)IupGetCallback(ih, "MARK_CB");
}
if (mark_full_all)
{
if (ih->data->mark_mode == IMAT_MARK_CELL)
{
for (col = 1; col < ih->data->columns.num; col++)
{
for(lin = 1; lin < ih->data->lines.num; lin++)
iMatrixMarkCellSet(ih, lin, col, mark, markedit_cb, mark_cb);
}
}
else if (ih->data->mark_mode == IMAT_MARK_LIN)
{
for(lin = 1; lin < ih->data->lines.num; lin++)
iMatrixMarkLinSet(ih, lin, mark);
iupMatrixDrawTitleLines(ih, 1, ih->data->lines.num-1);
}
else if (ih->data->mark_mode == IMAT_MARK_COL)
{
for (col = 1; col < ih->data->columns.num; col++)
iMatrixMarkColSet(ih, col, mark);
iupMatrixDrawTitleColumns(ih, 1, ih->data->columns.num-1);
}
iupMatrixDrawCells(ih, 1, 1, ih->data->lines.num-1, ih->data->columns.num-1);
}
else
iMatrixMarkItem(ih, lin1, col1, mark, markedit_cb, mark_cb);
ih->data->mark_lin1 = lin1;
ih->data->mark_col1 = col1;
ih->data->mark_block = 1;
}
static int winDialogBaseProc(Ihandle* ih, UINT msg, WPARAM wp, LPARAM lp, LRESULT *result)
{
if (iupwinBaseContainerProc(ih, msg, wp, lp, result))
return 1;
iupwinMenuDialogProc(ih, msg, wp, lp);
switch (msg)
{
case WM_GETMINMAXINFO:
{
if (winDialogCheckMinMaxInfo(ih, (MINMAXINFO*)lp))
{
*result = 0;
return 1;
}
break;
}
case WM_MOVE:
{
IFnii cb = (IFnii)IupGetCallback(ih, "MOVE_CB");
int x, y;
/* ignore LPARAM because they are the clientpos */
iupdrvDialogGetPosition(ih, NULL, &x, &y);
if (cb) cb(ih, x, y);
break;
}
case WM_SIZE:
{
if (ih->data->ignore_resize)
break;
switch(wp)
{
case SIZE_MINIMIZED:
{
if (ih->data->show_state != IUP_MINIMIZE)
{
IFni show_cb = (IFni)IupGetCallback(ih, "SHOW_CB");
ih->data->show_state = IUP_MINIMIZE;
if (show_cb && show_cb(ih, IUP_MINIMIZE) == IUP_CLOSE)
IupExitLoop();
}
break;
}
case SIZE_MAXIMIZED:
{
if (ih->data->show_state != IUP_MAXIMIZE)
{
IFni show_cb = (IFni)IupGetCallback(ih, "SHOW_CB");
ih->data->show_state = IUP_MAXIMIZE;
if (show_cb && show_cb(ih, IUP_MAXIMIZE) == IUP_CLOSE)
IupExitLoop();
}
winDialogResize(ih, LOWORD(lp), HIWORD(lp));
if (iupAttribGetBoolean(ih, "MDICHILD"))
{
/* WORKAROUND: when a child MDI dialog is maximized,
its title is displayed inside the MDI client area.
So we force a MDI client size update */
RECT rect;
Ihandle* client = (Ihandle*)iupAttribGet(ih, "MDICLIENT_HANDLE");
GetClientRect(client->handle, &rect);
PostMessage(client->handle, WM_SIZE, (WPARAM)SIZE_RESTORED, MAKELPARAM(rect.right-rect.left, rect.bottom-rect.top));
}
break;
}
case SIZE_RESTORED:
{
if (ih->data->show_state == IUP_MAXIMIZE || ih->data->show_state == IUP_MINIMIZE)
{
IFni show_cb = (IFni)IupGetCallback(ih, "SHOW_CB");
ih->data->show_state = IUP_RESTORE;
if (show_cb && show_cb(ih, IUP_RESTORE) == IUP_CLOSE)
IupExitLoop();
}
winDialogResize(ih, LOWORD(lp), HIWORD(lp));
break;
}
}
if (iupAttribGetBoolean(ih, "MDIFRAME"))
{
/* We are going to manually position the MDI client,
so abort MDI frame processing. */
*result = 0;
return 1;
}
else
break;
}
case WM_USER+IUPWIN_TRAY_NOTIFICATION:
{
int dclick = 0;
int button = 0;
int pressed = 0;
switch (lp)
{
case WM_LBUTTONDOWN:
pressed = 1;
button = 1;
break;
case WM_MBUTTONDOWN:
pressed = 1;
button = 2;
break;
case WM_RBUTTONDOWN:
pressed = 1;
button = 3;
break;
case WM_LBUTTONDBLCLK:
dclick = 1;
button = 1;
break;
case WM_MBUTTONDBLCLK:
dclick = 1;
button = 2;
break;
case WM_RBUTTONDBLCLK:
dclick = 1;
button = 3;
break;
case WM_LBUTTONUP:
button = 1;
break;
case WM_MBUTTONUP:
button = 2;
break;
case WM_RBUTTONUP:
button = 3;
break;
}
if (button != 0)
{
IFniii cb = (IFniii)IupGetCallback(ih, "TRAYCLICK_CB");
if (cb && cb(ih, button, pressed, dclick) == IUP_CLOSE)
IupExitLoop();
}
break;
}
case WM_CLOSE:
{
Icallback cb = IupGetCallback(ih, "CLOSE_CB");
if (cb)
{
int ret = cb(ih);
if (ret == IUP_IGNORE)
{
*result = 0;
return 1;
}
if (ret == IUP_CLOSE)
IupExitLoop();
}
/* child mdi is automatically destroyed */
if (iupAttribGetBoolean(ih, "MDICHILD"))
IupDestroy(ih);
else
{
if (!winDialogMDICloseChildren(ih))
{
*result = 0;
return 1;
}
IupHide(ih); /* IUP default processing */
}
*result = 0;
return 1;
}
case WM_COPYDATA: /* usually from SetGlobal("SINGLEINSTANCE") */
{
COPYDATASTRUCT* cds = (COPYDATASTRUCT*)lp;
IFnsi cb = (IFnsi)IupGetCallback(ih, "COPYDATA_CB");
if (cb) cb(ih, cds->lpData, cds->cbData);
break;
}
case WM_SETCURSOR:
{
if (ih->handle == (HWND)wp && LOWORD(lp)==HTCLIENT)
{
HCURSOR hCur = (HCURSOR)iupAttribGet(ih, "_IUPWIN_HCURSOR");
if (hCur)
{
SetCursor(hCur);
*result = 1;
return 1;
}
else if (iupAttribGet(ih, "CURSOR"))
{
SetCursor(NULL);
*result = 1;
return 1;
}
}
break;
}
case WM_ERASEBKGND:
{
HBITMAP hBitmap = (HBITMAP)iupAttribGet(ih, "_IUPWIN_BACKGROUND_BITMAP");
if (hBitmap)
{
RECT rect;
HDC hdc = (HDC)wp;
HBRUSH hBrush = CreatePatternBrush(hBitmap);
GetClientRect(ih->handle, &rect);
FillRect(hdc, &rect, hBrush);
DeleteObject(hBrush);
/* return non zero value */
*result = 1;
return 1;
}
else
{
unsigned char r, g, b;
char* color = iupAttribGet(ih, "_IUPWIN_BACKGROUND_COLOR");
if (iupStrToRGB(color, &r, &g, &b))
{
RECT rect;
HDC hdc = (HDC)wp;
SetDCBrushColor(hdc, RGB(r,g,b));
GetClientRect(ih->handle, &rect);
FillRect(hdc, &rect, (HBRUSH)GetStockObject(DC_BRUSH));
/* return non zero value */
*result = 1;
return 1;
}
}
break;
}
case WM_DESTROY:
{
/* Since WM_CLOSE changed the Windows default processing */
/* WM_DESTROY is NOT received by IupDialogs */
/* Except when they are children of other IupDialogs and the parent is destroyed. */
/* So we have to destroy the child dialog. */
/* The application is responsable for destroying the children before this happen. */
IupDestroy(ih);
break;
}
}
if (msg == (UINT)WM_HELPMSG)
{
Ihandle* child = NULL;
DWORD* struct_ptr = (DWORD*)lp;
if (*struct_ptr == sizeof(CHOOSECOLOR))
{
CHOOSECOLOR* choosecolor = (CHOOSECOLOR*)lp;
child = (Ihandle*)choosecolor->lCustData;
}
if (*struct_ptr == sizeof(CHOOSEFONT))
{
CHOOSEFONT* choosefont = (CHOOSEFONT*)lp;
child = (Ihandle*)choosefont->lCustData;
}
if (child)
{
Icallback cb = IupGetCallback(child, "HELP_CB");
if (cb && cb(child) == IUP_CLOSE)
EndDialog((HWND)iupAttribGet(child, "HWND"), IDCANCEL);
}
}
return 0;
}
/* Redraw a block of cells of the matrix. Handle marked cells, change
automatically the background color of them.
- lin1, col1 : cell coordinates that mark the left top corner of the area to be redrawn
- lin2, col2 : cell coordinates that mark the right bottom corner of the area to be redrawn */
void iupMatrixDrawCells(Ihandle* ih, int lin1, int col1, int lin2, int col2)
{
int x1, y1, x2, y2, old_x2, old_y1, old_y2;
int alignment, lin, col, active, first_col, first_lin;
long framecolor, emptyarea_color = -1;
IFnii mark_cb;
IFnii dropcheck_cb;
IFniiiiiiC draw_cb;
x2 = ih->data->w-1;
y2 = ih->data->h-1;
old_x2 = x2;
old_y1 = 0;
old_y2 = y2;
if (ih->data->lines.num <= 1 ||
ih->data->columns.num <= 1)
return;
if (ih->data->columns.num_noscroll>1 && col1==1 && col2==ih->data->columns.num_noscroll-1)
{
first_col = 0;
x1 = 0;
}
else
{
if (col1 > ih->data->columns.last ||
col2 < ih->data->columns.first)
return;
if (col1 < ih->data->columns.first)
col1 = ih->data->columns.first;
if (col2 > ih->data->columns.last)
col2 = ih->data->columns.last;
first_col = ih->data->columns.first;
x1 = 0;
for (col = 0; col< ih->data->columns.num_noscroll; col++)
x1 += ih->data->columns.dt[col].size;
}
if (ih->data->lines.num_noscroll>1 && lin1==1 && lin2==ih->data->lines.num_noscroll-1)
{
first_lin = 0;
y1 = 0;
}
else
{
if (lin1 > ih->data->lines.last ||
lin2 < ih->data->lines.first)
return;
if (lin1 < ih->data->lines.first)
lin1 = ih->data->lines.first;
if (lin2 > ih->data->lines.last)
lin2 = ih->data->lines.last;
first_lin = ih->data->lines.first;
y1 = 0;
for (lin = 0; lin< ih->data->lines.num_noscroll; lin++)
y1 += ih->data->lines.dt[lin].size;
}
iupMATRIX_CLIPAREA(ih, x1, x2, y1, y2);
cdCanvasClip(ih->data->cd_canvas, CD_CLIPOFF); /* wait for background */
/* Find the initial position of the first column */
if (first_col==ih->data->columns.first)
x1 -= ih->data->columns.first_offset;
for(col = first_col; col < col1; col++)
x1 += ih->data->columns.dt[col].size;
/* Find the initial position of the first line */
if (first_lin == ih->data->lines.first)
y1 -= ih->data->lines.first_offset;
for(lin = first_lin; lin < lin1; lin++)
y1 += ih->data->lines.dt[lin].size;
/* Find the final position of the last column */
x2 = x1;
for( ; col <= col2; col++)
x2 += ih->data->columns.dt[col].size;
/* Find the final position of the last line */
y2 = y1;
for( ; lin <= lin2; lin++)
y2 += ih->data->lines.dt[lin].size;
if ((col2 == ih->data->columns.num-1) && (old_x2 > x2))
{
emptyarea_color = cdIupConvertColor(ih->data->bgcolor_parent);
cdCanvasForeground(ih->data->cd_canvas, emptyarea_color);
/* If it was drawn until the last column and remains space in the right of it,
then delete this area with the the background color. */
iupMATRIX_BOX(ih, x2, old_x2, old_y1, old_y2);
}
if ((lin2 == ih->data->lines.num-1) && (old_y2 > y2))
{
if (emptyarea_color == -1)
emptyarea_color = cdIupConvertColor(ih->data->bgcolor_parent);
cdCanvasForeground(ih->data->cd_canvas, emptyarea_color);
/* If it was drawn until the last line visible and remains space below it,
then delete this area with the the background color. */
iupMATRIX_BOX(ih, 0, old_x2, y2, old_y2);
}
/* after the background */
cdCanvasClip(ih->data->cd_canvas, CD_CLIPAREA);
/***** Draw the cell values and frame */
old_y1 = y1;
framecolor = cdIupConvertColor(iupAttribGetStr(ih, "FRAMECOLOR"));
active = iupdrvIsActive(ih);
mark_cb = (IFnii)IupGetCallback(ih, "MARK_CB");
dropcheck_cb = (IFnii)IupGetCallback(ih, "DROPCHECK_CB");
draw_cb = (IFniiiiiiC)IupGetCallback(ih, "DRAW_CB");
for(col = col1; col <= col2; col++) /* For all the columns in the region */
{
if (ih->data->columns.dt[col].size == 0)
continue;
alignment = iMatrixDrawGetColAlignment(ih, col);
x2 = x1 + ih->data->columns.dt[col].size;
for(lin = lin1; lin <= lin2; lin++) /* For all lines in the region */
{
int drop = 0;
int marked = 0;
if (ih->data->lines.dt[lin].size == 0)
continue;
y2 = y1 + ih->data->lines.dt[lin].size;
/* If the cell is marked, then draw it with attenuation color */
marked = iupMatrixMarkCellGet(ih, lin, col, mark_cb);
iMatrixDrawBackground(ih, x1, x2, y1, y2, marked, active, lin, col);
iMatrixDrawFrameRectCell(ih, lin, col, x1, x2, y1, y2, framecolor);
if (dropcheck_cb)
{
int ret = dropcheck_cb(ih, lin, col);
if (ret == IUP_DEFAULT)
{
drop = IMAT_DROPBOX_W+IMAT_PADDING_W/2;
iMatrixDrawDropFeedback(ih, x2, y1, y2, active, framecolor);
}
else if (ret == IUP_CONTINUE)
{
drop = IMAT_TOGGLE_SIZE + IMAT_PADDING_W;
iMatrixDrawToggle(ih, x2, y1, y2, lin, col, marked, active);
}
}
/* draw the cell contents */
iMatrixDrawCellValue(ih, x1, x2-drop, y1, y2, alignment, marked, active, lin, col, draw_cb, framecolor);
y1 = y2;
}
x1 = x2;
y1 = old_y1; /* must reset also y */
}
cdCanvasClip(ih->data->cd_canvas, CD_CLIPOFF);
}
static void motTextModifyVerifyCallback(Widget w, Ihandle *ih, XmTextVerifyPtr text)
{
int start, end, key = 0;
char *value, *new_value, *insert_value;
KeySym motcode = 0;
IFnis cb;
if (iupAttribGet(ih, "_IUPMOT_DISABLE_TEXT_CB"))
return;
if (iupAttribGet(ih, "_IUPMOT_SPIN_DISABLE_TEXT_CB"))
{
if (iupAttribGet(ih, "_IUPMOT_SPIN_NOAUTO"))
text->doit = False;
iupAttribSetStr(ih, "_IUPMOT_SPIN_DISABLE_TEXT_CB", NULL);
return;
}
cb = (IFnis)IupGetCallback(ih, "ACTION");
if (!cb && !ih->data->mask)
return;
if (text->event && text->event->type == KeyPress)
{
unsigned int state = ((XKeyEvent*)text->event)->state;
if (state & ControlMask || /* Ctrl */
state & Mod1Mask ||
state & Mod5Mask || /* Alt */
state & Mod4Mask) /* Apple/Win */
return;
motcode = XKeycodeToKeysym(iupmot_display, ((XKeyEvent*)text->event)->keycode, 0);
}
value = XmTextGetString(ih->handle);
start = text->startPos;
end = text->endPos;
insert_value = text->text->ptr;
if (motcode == XK_Delete)
{
new_value = value;
iupStrRemove(value, start, end, 1);
}
else if (motcode == XK_BackSpace)
{
new_value = value;
iupStrRemove(value, start, end, -1);
}
else
{
if (!value)
new_value = iupStrDup(insert_value);
else if (insert_value)
new_value = iupStrInsert(value, insert_value, start, end);
else
new_value = value;
}
if (insert_value && insert_value[0]!=0 && insert_value[1]==0)
key = insert_value[0];
if (ih->data->mask && iupMaskCheck(ih->data->mask, new_value)==0)
{
if (new_value != value) free(new_value);
XtFree(value);
text->doit = False; /* abort processing */
return;
}
if (cb)
{
int cb_ret = cb(ih, key, (char*)new_value);
if (cb_ret==IUP_IGNORE)
text->doit = False; /* abort processing */
else if (cb_ret==IUP_CLOSE)
{
IupExitLoop();
text->doit = False; /* abort processing */
}
else if (cb_ret!=0 && key!=0 &&
cb_ret != IUP_DEFAULT && cb_ret != IUP_CONTINUE)
{
insert_value[0] = (char)cb_ret; /* replace key */
}
}
if (text->doit)
{
/* Spin is not automatically updated when you directly edit the text */
Widget spinbox = (Widget)iupAttribGet(ih, "_IUP_EXTRAPARENT");
if (spinbox && XmIsSpinBox(spinbox) && !iupAttribGet(ih, "_IUPMOT_SPIN_NOAUTO"))
{
int pos;
if (iupStrToInt(new_value, &pos))
{
XmTextPosition caret_pos = text->currInsert;
iupAttribSetStr(ih, "_IUPMOT_DISABLE_TEXT_CB", "1");
XtVaSetValues(ih->handle, XmNposition, pos, NULL);
iupAttribSetStr(ih, "_IUPMOT_DISABLE_TEXT_CB", NULL);
/* do not handle all situations, but handle the basic ones */
if (text->startPos == text->endPos) /* insert */
caret_pos++;
else if (text->startPos < text->endPos && text->startPos < text->currInsert) /* backspace */
caret_pos--;
XmTextSetInsertionPosition(ih->handle, caret_pos);
text->doit = False;
}
}
}
if (new_value != value) free(new_value);
XtFree(value);
(void)w;
}
void iupBaseCallValueChangedCb(Ihandle* ih)
{
IFn vc_cb = (IFn)IupGetCallback(ih, "VALUECHANGED_CB");
if (vc_cb)
vc_cb(ih);
}
void iupwinMenuDialogProc(Ihandle* ih_dialog, UINT msg, WPARAM wp, LPARAM lp)
{
/* called only from winDialogBaseProc */
switch (msg)
{
case WM_INITMENUPOPUP:
{
HMENU hMenu = (HMENU)wp;
Ihandle *ih = iupwinMenuGetHandle(hMenu);
if (ih)
{
Icallback cb = (Icallback)IupGetCallback(ih, "OPEN_CB");
if (!cb && ih->parent) cb = (Icallback)IupGetCallback(ih->parent, "OPEN_CB"); /* check also in the Submenu */
if (cb) cb(ih);
}
break;
}
case WM_UNINITMENUPOPUP:
{
HMENU hMenu = (HMENU)wp;
Ihandle *ih = iupwinMenuGetHandle(hMenu);
if (ih)
{
Icallback cb = (Icallback)IupGetCallback(ih, "MENUCLOSE_CB");
if (!cb && ih->parent) cb = (Icallback)IupGetCallback(ih->parent, "MENUCLOSE_CB"); /* check also in the Submenu */
if (cb) cb(ih);
}
break;
}
case WM_MENUSELECT:
{
HMENU hMenu = (HMENU)lp;
Ihandle *ih;
if (!lp)
break;
if ((HIWORD(wp) & MF_POPUP) || (HIWORD(wp) & MF_SYSMENU)) /* drop-down ih or submenu. */
{
UINT menuindex = LOWORD(wp);
HMENU hsubmenu = GetSubMenu(hMenu, menuindex);
ih = iupwinMenuGetHandle(hsubmenu); /* returns the handle of a IupMenu */
if (ih) ih = ih->parent; /* gets the submenu */
}
else /* ih item */
{
UINT menuID = LOWORD(wp);
ih = iupwinMenuGetItemHandle(hMenu, menuID);
}
if (ih)
{
Icallback cb = IupGetCallback(ih, "HIGHLIGHT_CB");
if (cb) cb(ih);
}
break;
}
case WM_MENUCOMMAND:
{
int menuId = GetMenuItemID((HMENU)lp, (int)wp);
Icallback cb;
Ihandle* ih;
if (menuId >= IUP_MDI_FIRSTCHILD)
break;
ih = iupwinMenuGetItemHandle((HMENU)lp, menuId);
if (!ih)
break;
winItemCheckToggle(ih);
cb = IupGetCallback(ih, "ACTION");
if (cb && cb(ih) == IUP_CLOSE)
IupExitLoop();
break;
}
case WM_ENTERMENULOOP:
{
/* Simulate WM_KILLFOCUS when the menu interaction is started */
Ihandle* lastfocus = (Ihandle*)iupAttribGet(ih_dialog, "_IUPWIN_LASTFOCUS");
if (lastfocus) iupCallKillFocusCb(lastfocus);
break;
}
case WM_EXITMENULOOP:
{
/* Simulate WM_GETFOCUS when the menu interaction is stopped */
Ihandle* lastfocus = (Ihandle*)iupAttribGet(ih_dialog, "_IUPWIN_LASTFOCUS");
if (lastfocus) iupCallGetFocusCb(lastfocus);
break;
}
}
}
static int gtkMessageDlgPopup(Ihandle* ih, int x, int y)
{
InativeHandle* parent = iupDialogGetNativeParent(ih);
GtkMessageType type = GTK_MESSAGE_INFO;
GtkWidget* dialog;
char *icon, *buttons, *title;
int response, num_but = 2;
iupAttribSetInt(ih, "_IUPDLG_X", x);
iupAttribSetInt(ih, "_IUPDLG_Y", y);
icon = iupAttribGetStr(ih, "DIALOGTYPE");
if (iupStrEqualNoCase(icon, "ERROR"))
type = GTK_MESSAGE_ERROR;
else if (iupStrEqualNoCase(icon, "WARNING"))
type = GTK_MESSAGE_WARNING;
else if (iupStrEqualNoCase(icon, "INFORMATION"))
type = GTK_MESSAGE_INFO;
else if (iupStrEqualNoCase(icon, "QUESTION"))
type = GTK_MESSAGE_QUESTION;
dialog = gtk_message_dialog_new((GtkWindow*)parent,
0,
type,
GTK_BUTTONS_NONE,
iupgtkStrConvertToUTF8(iupAttribGetStr(ih, "VALUE")));
if (!dialog)
return IUP_ERROR;
title = iupAttribGetStr(ih, "TITLE");
if (title)
gtk_window_set_title(GTK_WINDOW(dialog), iupgtkStrConvertToUTF8(title));
buttons = iupAttribGetStr(ih, "BUTTONS");
if (iupStrEqualNoCase(buttons, "OKCANCEL"))
{
gtk_dialog_add_button(GTK_DIALOG(dialog),
GTK_STOCK_OK,
IUP_RESPONSE_1);
gtk_dialog_add_button(GTK_DIALOG(dialog),
GTK_STOCK_CANCEL,
IUP_RESPONSE_2);
}
else if (iupStrEqualNoCase(buttons, "YESNO"))
{
gtk_dialog_add_button(GTK_DIALOG(dialog),
GTK_STOCK_YES,
IUP_RESPONSE_1);
gtk_dialog_add_button(GTK_DIALOG(dialog),
GTK_STOCK_NO,
IUP_RESPONSE_2);
}
else /* OK */
{
gtk_dialog_add_button(GTK_DIALOG(dialog),
GTK_STOCK_OK,
IUP_RESPONSE_1);
num_but = 1;
}
if (IupGetCallback(ih, "HELP_CB"))
gtk_dialog_add_button(GTK_DIALOG(dialog), GTK_STOCK_HELP, IUP_RESPONSE_HELP);
if (num_but == 2 && iupAttribGetInt(ih, "BUTTONDEFAULT") == 2)
gtk_dialog_set_default_response(GTK_DIALOG(dialog), IUP_RESPONSE_2);
else
gtk_dialog_set_default_response(GTK_DIALOG(dialog), IUP_RESPONSE_1);
/* initialize the widget */
gtk_widget_realize(dialog);
ih->handle = dialog;
iupDialogUpdatePosition(ih);
ih->handle = NULL;
do
{
response = gtk_dialog_run(GTK_DIALOG(dialog));
if (response == IUP_RESPONSE_HELP)
{
Icallback cb = IupGetCallback(ih, "HELP_CB");
if (cb && cb(ih) == IUP_CLOSE)
response = (num_but == 2)? IUP_RESPONSE_2: IUP_RESPONSE_1;
}
} while (response == IUP_RESPONSE_HELP);
if (response == IUP_RESPONSE_1)
IupSetAttribute(ih, "BUTTONRESPONSE", "1");
else
IupSetAttribute(ih, "BUTTONRESPONSE", "2");
gtk_widget_destroy(dialog);
return IUP_NOERROR;
}
static int gtkColorDlgPopup(Ihandle* ih, int x, int y)
{
InativeHandle* parent = iupDialogGetNativeParent(ih);
GtkColorSelectionDialog* dialog;
GtkColorSelection* colorsel;
GdkColor color;
char *value;
unsigned char r = 0, g = 0, b = 0, a = 255;
int response, ret;
iupAttribSetInt(ih, "_IUPDLG_X", x); /* used in iupDialogUpdatePosition */
iupAttribSetInt(ih, "_IUPDLG_Y", y);
dialog = (GtkColorSelectionDialog*)gtk_color_selection_dialog_new(iupgtkStrConvertToUTF8(iupAttribGet(ih, "TITLE")));
if (!dialog)
return IUP_ERROR;
if (parent)
gtk_window_set_transient_for((GtkWindow*)dialog, (GtkWindow*)parent);
ret = iupStrToRGBA(iupAttribGet(ih, "VALUE"), &r, &g, &b, &a);
colorsel = (GtkColorSelection*)dialog->colorsel;
iupgdkColorSet(&color, r, g, b);
gtk_color_selection_set_current_color(colorsel, &color);
value = iupAttribGetStr(ih, "ALPHA");
if (value)
{
int alpha;
if (iupStrToInt(value, &alpha))
{
if (alpha<0) alpha=0;
if (alpha>255) alpha=255;
gtk_color_selection_set_has_opacity_control(colorsel, TRUE);
gtk_color_selection_set_current_alpha(colorsel, iupCOLOR8TO16(alpha));
}
}
else if (iupAttribGetBoolean(ih, "SHOWALPHA") || ret == 4)
{
gtk_color_selection_set_has_opacity_control(colorsel, TRUE);
gtk_color_selection_set_current_alpha(colorsel, iupCOLOR8TO16(a));
}
else
gtk_color_selection_set_has_opacity_control(colorsel, FALSE);
value = iupAttribGetStr(ih, "COLORTABLE");
if (value)
{
gtk_color_selection_set_has_palette (colorsel, TRUE);
gtkColorDlgSetPalette(colorsel, value);
}
else if (iupAttribGetBoolean(ih, "SHOWCOLORTABLE"))
gtk_color_selection_set_has_palette (colorsel, TRUE);
else
gtk_color_selection_set_has_palette (colorsel, FALSE);
if (IupGetCallback(ih, "HELP_CB"))
gtk_widget_show(dialog->help_button);
/* initialize the widget */
gtk_widget_realize(GTK_WIDGET(dialog));
ih->handle = GTK_WIDGET(dialog);
iupDialogUpdatePosition(ih);
ih->handle = NULL;
do
{
response = gtk_dialog_run(GTK_DIALOG(dialog));
if (response == GTK_RESPONSE_HELP)
{
Icallback cb = IupGetCallback(ih, "HELP_CB");
if (cb && cb(ih) == IUP_CLOSE)
response = GTK_RESPONSE_CANCEL;
}
} while (response == GTK_RESPONSE_HELP);
if (response == GTK_RESPONSE_OK)
{
GdkColor color;
gtk_color_selection_get_current_color(colorsel, &color);
IupSetAttribute(ih, "STATUS", "1");
if (gtk_color_selection_get_has_opacity_control(colorsel))
{
int alpha = gtk_color_selection_get_current_alpha(colorsel);
iupAttribSetInt(ih, "ALPHA", (int)iupCOLOR16TO8(alpha));
iupAttribSetStrf(ih, "VALUE", "%d %d %d %d", (int)iupCOLOR16TO8(color.red), (int)iupCOLOR16TO8(color.green), (int)iupCOLOR16TO8(color.blue), (int)iupCOLOR16TO8(alpha));
}
else
iupAttribSetStrf(ih, "VALUE", "%d %d %d", (int)iupCOLOR16TO8(color.red), (int)iupCOLOR16TO8(color.green), (int)iupCOLOR16TO8(color.blue));
if (gtk_color_selection_get_has_palette(colorsel))
gtkColorDlgGetPalette(ih, colorsel);
}
else
{
iupAttribSetStr(ih, "ALPHA", NULL);
iupAttribSetStr(ih, "VALUE", NULL);
iupAttribSetStr(ih, "COLORTABLE", NULL);
iupAttribSetStr(ih, "STATUS", NULL);
}
gtk_widget_destroy(GTK_WIDGET(dialog));
return IUP_NOERROR;
}
static int gtkMessageDlgPopup(Ihandle* ih, int x, int y)
{
InativeHandle* parent = iupDialogGetNativeParent(ih);
GtkMessageType type = GTK_MESSAGE_OTHER;
GtkWidget* dialog;
char *icon, *buttons, *title;
const char *ok, *cancel, *yes, *no, *help, *retry = IupGetLanguageString("IUP_RETRY");
int response, button_def;
iupAttribSetInt(ih, "_IUPDLG_X", x); /* used in iupDialogUpdatePosition */
iupAttribSetInt(ih, "_IUPDLG_Y", y);
icon = iupAttribGetStr(ih, "DIALOGTYPE");
if (iupStrEqualNoCase(icon, "ERROR"))
type = GTK_MESSAGE_ERROR;
else if (iupStrEqualNoCase(icon, "WARNING"))
type = GTK_MESSAGE_WARNING;
else if (iupStrEqualNoCase(icon, "INFORMATION"))
type = GTK_MESSAGE_INFO;
else if (iupStrEqualNoCase(icon, "QUESTION"))
type = GTK_MESSAGE_QUESTION;
dialog = gtk_message_dialog_new((GtkWindow*)parent,
0,
type,
GTK_BUTTONS_NONE,
"%s",
iupgtkStrConvertToSystem(iupAttribGet(ih, "VALUE")));
if (!dialog)
return IUP_ERROR;
title = iupAttribGet(ih, "TITLE");
if (title)
gtk_window_set_title(GTK_WINDOW(dialog), iupgtkStrConvertToSystem(title));
#if GTK_CHECK_VERSION(3, 10, 0)
ok = "_OK";
cancel = "_Cancel";
yes = "_Yes";
no = "_No";
help = "_Help";
#else
ok = GTK_STOCK_OK;
cancel = GTK_STOCK_CANCEL;
yes = GTK_STOCK_YES;
no = GTK_STOCK_NO;
help = GTK_STOCK_HELP;
#endif
buttons = iupAttribGetStr(ih, "BUTTONS");
if (iupStrEqualNoCase(buttons, "OKCANCEL"))
{
gtk_dialog_add_button(GTK_DIALOG(dialog),
ok,
IUP_RESPONSE_1);
gtk_dialog_add_button(GTK_DIALOG(dialog),
cancel,
IUP_RESPONSE_2);
}
if (iupStrEqualNoCase(buttons, "RETRYCANCEL"))
{
gtk_dialog_add_button(GTK_DIALOG(dialog),
retry,
IUP_RESPONSE_1);
gtk_dialog_add_button(GTK_DIALOG(dialog),
cancel,
IUP_RESPONSE_2);
}
else if (iupStrEqualNoCase(buttons, "YESNO"))
{
gtk_dialog_add_button(GTK_DIALOG(dialog),
yes,
IUP_RESPONSE_1);
gtk_dialog_add_button(GTK_DIALOG(dialog),
no,
IUP_RESPONSE_2);
}
else if (iupStrEqualNoCase(buttons, "YESNOCANCEL"))
{
gtk_dialog_add_button(GTK_DIALOG(dialog),
yes,
IUP_RESPONSE_1);
gtk_dialog_add_button(GTK_DIALOG(dialog),
no,
IUP_RESPONSE_2);
gtk_dialog_add_button(GTK_DIALOG(dialog),
cancel,
IUP_RESPONSE_3);
}
else /* OK */
{
gtk_dialog_add_button(GTK_DIALOG(dialog),
ok,
IUP_RESPONSE_1);
}
if (IupGetCallback(ih, "HELP_CB"))
gtk_dialog_add_button(GTK_DIALOG(dialog), help, IUP_RESPONSE_HELP);
button_def = iupAttribGetInt(ih, "BUTTONDEFAULT");
if (button_def == 3)
gtk_dialog_set_default_response(GTK_DIALOG(dialog), IUP_RESPONSE_3);
else if (button_def == 2)
gtk_dialog_set_default_response(GTK_DIALOG(dialog), IUP_RESPONSE_2);
else
gtk_dialog_set_default_response(GTK_DIALOG(dialog), IUP_RESPONSE_1);
/* initialize the widget */
gtk_widget_realize(dialog);
ih->handle = dialog;
iupDialogUpdatePosition(ih);
ih->handle = NULL;
do
{
response = gtk_dialog_run(GTK_DIALOG(dialog));
if (response == IUP_RESPONSE_HELP)
{
Icallback cb = IupGetCallback(ih, "HELP_CB");
if (cb && cb(ih) == IUP_CLOSE)
{
if (iupStrEqualNoCase(buttons, "YESNOCANCEL"))
response = IUP_RESPONSE_3;
else if(iupStrEqualNoCase(buttons, "OK"))
response = IUP_RESPONSE_1;
else
response = IUP_RESPONSE_2;
}
}
} while (response == IUP_RESPONSE_HELP);
if (response == IUP_RESPONSE_3)
IupSetAttribute(ih, "BUTTONRESPONSE", "3");
else if (response == IUP_RESPONSE_2)
IupSetAttribute(ih, "BUTTONRESPONSE", "2");
else
IupSetAttribute(ih, "BUTTONRESPONSE", "1");
gtk_widget_destroy(dialog);
return IUP_NOERROR;
}
void iupmotKeyPressEvent(Widget w, Ihandle *ih, XEvent *evt, Boolean *cont)
{
int result;
int code = motKeyDecode((XKeyEvent*)evt);
if (code == 0)
return;
if ((((XKeyEvent*)evt)->state & Mod1Mask || ((XKeyEvent*)evt)->state & Mod5Mask)) /* Alt */
{
KeySym motcode = XKeycodeToKeysym(iupmot_display, ((XKeyEvent*)evt)->keycode, 0);
if (motcode < 128)
{
IFni cb;
Ihandle* dialog = IupGetDialog(ih);
char attrib[22] = "_IUPMOT_MNEMONIC_ _CB";
attrib[17] = (char)toupper(motcode);
cb = (IFni)IupGetCallback(dialog, attrib);
if (cb)
{
cb(dialog, attrib[17]);
return;
}
}
}
result = iupKeyCallKeyCb(ih, code);
if (result == IUP_CLOSE)
{
IupExitLoop();
return;
}
if (result == IUP_IGNORE)
{
*cont = False;
return;
}
/* in the previous callback the dialog could be destroyed */
if (iupObjectCheck(ih))
{
/* this is called only for canvas */
if (ih->iclass->nativetype==IUP_TYPECANVAS)
{
result = iupKeyCallKeyPressCb(ih, code, 1);
if (result == IUP_CLOSE)
{
IupExitLoop();
return;
}
if (result == IUP_IGNORE)
{
*cont = False;
return;
}
}
if (!iupKeyProcessNavigation(ih, code, ((XKeyEvent*)evt)->state & ShiftMask))
{
*cont = False;
return;
}
}
(void)w;
}
static int gtkDialogMapMethod(Ihandle* ih)
{
int decorations = 0;
int functions = 0;
InativeHandle* parent;
GtkWidget* fixed;
#ifdef HILDON
if (iupAttribGetInt(ih, "HILDONWINDOW"))
{
HildonProgram *program = HILDON_PROGRAM(hildon_program_get_instance());
ih->handle = hildon_window_new();
if (ih->handle)
hildon_program_add_window(program, HILDON_WINDOW(ih->handle));
}
else
{
iupAttribSetStr(ih, "DIALOGHINT", "YES"); /* otherwise not displayed correctly */
ih->handle = gtk_window_new(GTK_WINDOW_TOPLEVEL);
}
#else
ih->handle = gtk_window_new(GTK_WINDOW_TOPLEVEL);
#endif
if (!ih->handle)
return IUP_ERROR;
parent = iupDialogGetNativeParent(ih);
if (parent)
{
gtk_window_set_transient_for((GtkWindow*)ih->handle, (GtkWindow*)parent);
/* manually remove child windows when parent is destroyed */
g_signal_connect(G_OBJECT(parent), "destroy", G_CALLBACK(gtkDialogChildDestroyEvent), ih);
}
g_signal_connect(G_OBJECT(ih->handle), "focus-in-event", G_CALLBACK(iupgtkFocusInOutEvent), ih);
g_signal_connect(G_OBJECT(ih->handle), "focus-out-event", G_CALLBACK(iupgtkFocusInOutEvent), ih);
g_signal_connect(G_OBJECT(ih->handle), "enter-notify-event", G_CALLBACK(iupgtkEnterLeaveEvent), ih);
g_signal_connect(G_OBJECT(ih->handle), "leave-notify-event", G_CALLBACK(iupgtkEnterLeaveEvent), ih);
g_signal_connect(G_OBJECT(ih->handle), "show-help", G_CALLBACK(iupgtkShowHelp), ih);
/* The iupgtkKeyPressEvent of the control with the focus will propagate the key up to the dialog. */
/* Inside iupgtkKeyPressEvent we test this to avoid duplicate calls. */
g_signal_connect(G_OBJECT(ih->handle), "key-press-event", G_CALLBACK(iupgtkKeyPressEvent), ih);
g_signal_connect(G_OBJECT(ih->handle), "configure-event", G_CALLBACK(gtkDialogConfigureEvent), ih);
g_signal_connect(G_OBJECT(ih->handle), "window-state-event", G_CALLBACK(gtkDialogWindowStateEvent), ih);
g_signal_connect(G_OBJECT(ih->handle), "delete-event", G_CALLBACK(iupgtkDialogDeleteEvent), ih);
gtk_window_set_default_size((GtkWindow*)ih->handle, 100, 100); /* set this to avoid size calculation problems */
if (iupStrBoolean(iupAttribGet(ih, "DIALOGHINT")))
gtk_window_set_type_hint(GTK_WINDOW(ih->handle), GDK_WINDOW_TYPE_HINT_DIALOG);
/* the container that will receive the child element. */
fixed = gtk_fixed_new();
gtk_container_add((GtkContainer*)ih->handle, fixed);
gtk_widget_show(fixed);
/* initialize the widget */
gtk_widget_realize(ih->handle);
if (iupAttribGetInt(ih, "DIALOGFRAME")) {
iupAttribSetStr(ih, "RESIZE", "NO");
}
if (!iupAttribGetInt(ih, "RESIZE")) {
iupAttribSetStr(ih, "MAXBOX", "NO"); /* Must also remove these, so RESIZE=NO can work */
iupAttribSetStr(ih, "MINBOX", "NO");
}
if (IupGetAttribute(ih, "TITLE")) { /* must use IupGetAttribute to check from the native implementation */
functions |= GDK_FUNC_MOVE;
decorations |= GDK_DECOR_TITLE;
}
if (iupAttribGetInt(ih, "MENUBOX")) {
functions |= GDK_FUNC_CLOSE;
decorations |= GDK_DECOR_MENU;
}
if (iupAttribGetInt(ih, "MINBOX")) {
functions |= GDK_FUNC_MINIMIZE;
decorations |= GDK_DECOR_MINIMIZE;
}
if (iupAttribGetInt(ih, "MAXBOX")) {
functions |= GDK_FUNC_MAXIMIZE;
decorations |= GDK_DECOR_MAXIMIZE;
}
if (iupAttribGetInt(ih, "RESIZE")) {
functions |= GDK_FUNC_RESIZE;
decorations |= GDK_DECOR_RESIZEH;
}
if (iupAttribGetInt(ih, "BORDER"))
decorations |= GDK_DECOR_BORDER;
if (decorations == 0)
gtk_window_set_decorated((GtkWindow*)ih->handle, FALSE);
else
{
GdkWindow* window = ih->handle->window;
if (window)
{
gdk_window_set_decorations(window, (GdkWMDecoration)decorations);
gdk_window_set_functions(window, (GdkWMFunction)functions);
}
}
/* configure for DRAG&DROP */
if (IupGetCallback(ih, "DROPFILES_CB"))
iupAttribSetStr(ih, "DRAGDROP", "YES");
{
/* Reset the DLGBGCOLOR global attribute
if it is the first time a dialog is created.
The value returned by gtk_style_new is not accurate. */
GtkStyle* style = gtk_widget_get_style(ih->handle);
if (style && IupGetGlobal("_IUP_RESET_DLGBGCOLOR"))
{
iupgtkUpdateGlobalColors(style);
IupSetGlobal("_IUP_RESET_DLGBGCOLOR", NULL);
}
}
/* configure the size range */
gtkDialogSetMinMax(ih, 1, 1, 65535, 65535); /* MINSIZE and MAXSIZE default values */
/* Ignore VISIBLE before mapping */
iupAttribSetStr(ih, "VISIBLE", NULL);
return IUP_NOERROR;
}
int iupMatrixSetMarkAttrib(Ihandle* ih, int lin, int col, const char* value)
{
if (ih->data->mark_mode == IMAT_MARK_NO)
return 0;
if (lin >= 0 && col >= 0) /* both are specified */
{
if (!iupMatrixCheckCellPos(ih, lin, col))
return 0;
if (ih->data->mark_mode == IMAT_MARK_CELL)
{
int mark, ret = 0;
if (lin == 0 || col == 0) /* title can NOT have a mark */
return 0;
mark = iupStrBoolean(value);
if (ih->data->callback_mode)
{
IFniii markedit_cb = (IFniii)IupGetCallback(ih, "MARKEDIT_CB");
if (markedit_cb && !ih->data->inside_markedit_cb)
{
ih->data->inside_markedit_cb = 1;
markedit_cb(ih, lin, col, mark);
ih->data->inside_markedit_cb = 0;
}
else
{
if (mark)
{
iupAttribSetId2(ih, "MARK", lin, col, "1");
ret = 1;
}
else
iupAttribSetId2(ih, "MARK", lin, col, NULL);
}
}
else
{
if (mark)
ih->data->cells[lin][col].flags |= IMAT_IS_MARKED;
else
ih->data->cells[lin][col].flags &= ~IMAT_IS_MARKED;
}
if (ih->handle)
{
/* This assumes that the matrix has been draw completely previously */
iupMatrixPrepareDrawData(ih);
iupMatrixDrawCells(ih, lin, col, lin, col);
}
return ret;
}
else
{
int mark = iupStrBoolean(value);
if (ih->data->mark_mode & IMAT_MARK_LIN && lin>0)
{
if (mark)
ih->data->lines.dt[lin].flags |= IMAT_IS_MARKED;
else
ih->data->lines.dt[lin].flags &= ~IMAT_IS_MARKED;
}
if (ih->data->mark_mode & IMAT_MARK_COL && col>0)
{
if (mark)
ih->data->columns.dt[col].flags |= IMAT_IS_MARKED;
else
ih->data->columns.dt[col].flags &= ~IMAT_IS_MARKED;
}
if (ih->handle)
{
/* This assumes that the matrix has been drawn completely previously */
iupMatrixPrepareDrawData(ih);
iupMatrixDrawCells(ih, lin, col, lin, col);
}
}
}
return 0;
}
char* iupMatrixGetMarkedAttrib(Ihandle* ih)
{
int lin, col, size;
IFnii mark_cb;
char* p, *value = NULL;
int exist_mark = 0; /* Show if there is someone marked */
if (ih->data->mark_mode == IMAT_MARK_NO)
return NULL;
mark_cb = (IFnii)IupGetCallback(ih, "MARK_CB");
if (ih->data->mark_mode == IMAT_MARK_CELL)
{
size = (ih->data->lines.num-1) * (ih->data->columns.num-1) + 1;
value = iupStrGetMemory(size);
p = value;
for(lin = 1; lin < ih->data->lines.num; lin++)
{
for(col = 1; col < ih->data->columns.num; col++)
{
if (iupMatrixMarkCellGet(ih, lin, col, mark_cb))
{
exist_mark = 1;
*p++ = '1';
}
else
*p++ = '0';
}
}
*p = 0;
}
else
{
int marked_lines = 0, marked_cols = 0;
if (ih->data->mark_mode == IMAT_MARK_LINCOL) /* must find which format to return */
{
/* look for a marked column */
for(col = 1; col < ih->data->columns.num; col++)
{
if (ih->data->columns.dt[col].flags & IMAT_IS_MARKED)
{
marked_cols = 1; /* at least one column is marked */
break;
}
}
if (!marked_cols)
marked_lines = 1;
}
else if (ih->data->mark_mode == IMAT_MARK_LIN)
marked_lines = 1;
else if (ih->data->mark_mode == IMAT_MARK_COL)
marked_cols = 1;
if (marked_lines)
{
size = 1 + (ih->data->lines.num-1) + 1;
value = iupStrGetMemory(size);
p = value;
*p++ = 'L';
for(lin = 1; lin < ih->data->lines.num; lin++)
{
if (ih->data->lines.dt[lin].flags & IMAT_IS_MARKED)
{
exist_mark = 1;
*p++ = '1';
}
else
*p++ = '0';
}
*p = 0;
}
else if (marked_cols)
{
size = 1 + (ih->data->columns.num-1) + 1;
value = iupStrGetMemory(size);
p = value;
*p++ = 'C';
for(col = 1; col < ih->data->columns.num; col++)
{
if (ih->data->columns.dt[col].flags & IMAT_IS_MARKED)
{
exist_mark = 1;
*p++ = '1';
}
else
*p++ = '0';
}
*p = 0;
}
}
return exist_mark? value: NULL;
}
int iupMatrixSetMarkedAttrib(Ihandle* ih, const char* value)
{
int lin, col, mark;
IFniii markedit_cb;
if (ih->data->mark_mode == IMAT_MARK_NO)
return 0;
if (!value)
iupMatrixMarkClearAll(ih, 1);
else if (*value == 'C' || *value == 'c') /* columns */
{
if (ih->data->mark_mode == IMAT_MARK_LIN)
return 0;
value++; /* skip C mark */
if ((int)strlen(value) != ih->data->columns.num-1)
return 0;
markedit_cb = (IFniii)IupGetCallback(ih, "MARKEDIT_CB");
for(col = 1; col < ih->data->columns.num; col++)
{
if (*value++ == '1')
mark = 1;
else
mark = 0;
/* mark all the cells for that column */
if (ih->data->mark_mode == IMAT_MARK_CELL)
{
for(lin = 1; lin < ih->data->lines.num; lin++)
iMatrixMarkCellSet(ih, lin, col, mark, markedit_cb, NULL);
}
else
iMatrixMarkColSet(ih, col, mark);
}
if (ih->data->mark_mode & IMAT_MARK_LIN)
iMatrixMarkAllLinCol(&(ih->data->lines), 0);
}
else if (*value == 'L' || *value == 'l') /* lines */
{
if (ih->data->mark_mode == IMAT_MARK_COL)
return 0;
value++; /* skip L mark */
if ((int)strlen(value) != ih->data->lines.num-1)
return 0;
markedit_cb = (IFniii)IupGetCallback(ih, "MARKEDIT_CB");
for(lin = 1; lin < ih->data->lines.num; lin++)
{
if (*value++ == '1')
mark = 1;
else
mark = 0;
/* Mark all the cells for that line */
if (ih->data->mark_mode == IMAT_MARK_CELL)
{
for(col = 1; col < ih->data->columns.num; col++)
iMatrixMarkCellSet(ih, lin, col, mark, markedit_cb, NULL);
}
else
iMatrixMarkLinSet(ih, lin, mark);
}
if (ih->data->mark_mode & IMAT_MARK_COL)
iMatrixMarkAllLinCol(&(ih->data->columns), 0);
}
else if (ih->data->mark_mode == IMAT_MARK_CELL) /* cells */
{
if ((int)strlen(value) != (ih->data->lines.num-1)*(ih->data->columns.num-1))
return 0;
markedit_cb = (IFniii)IupGetCallback(ih, "MARKEDIT_CB");
for(lin = 1; lin < ih->data->lines.num; lin++)
{
for(col = 1; col < ih->data->columns.num; col++)
{
if (*value++ == '1')
mark = 1;
else
mark = 0;
iMatrixMarkCellSet(ih, lin, col, mark, markedit_cb, NULL);
}
}
}
if (ih->handle)
iupMatrixDraw(ih, 1);
return 0;
}
static gboolean gtkDialogConfigureEvent(GtkWidget *widget, GdkEventConfigure *evt, Ihandle *ih)
{
int old_width, old_height, old_x, old_y;
gint x, y;
(void)widget;
#ifndef HILDON
/* In hildon the menu is not a menubar */
if (ih->data->menu && ih->data->menu->handle)
{
if (evt->width > 0)
gtk_widget_set_size_request(ih->data->menu->handle, evt->width, -1);
}
#endif
if (ih->data->ignore_resize)
return FALSE;
old_width = iupAttribGetInt(ih, "_IUPGTK_OLD_WIDTH");
old_height = iupAttribGetInt(ih, "_IUPGTK_OLD_HEIGHT");
/* Check the size change, because configure is called also for position changes */
if (evt->width != old_width || evt->height != old_height)
{
IFnii cb;
int border, caption, menu;
iupAttribSetInt(ih, "_IUPGTK_OLD_WIDTH", evt->width);
iupAttribSetInt(ih, "_IUPGTK_OLD_HEIGHT", evt->height);
iupdrvDialogGetDecoration(ih, &border, &caption, &menu);
/* update dialog size */
#ifdef HILDON
/* In Hildon, the configure event contains the window size, not the client area size */
ih->currentwidth = evt->width;
ih->currentheight = evt->height;
#else
ih->currentwidth = evt->width + 2*border;
ih->currentheight = evt->height + 2*border + caption; /* menu is inside the window client area */
#endif
cb = (IFnii)IupGetCallback(ih, "RESIZE_CB");
if (!cb || cb(ih, evt->width, evt->height - menu)!=IUP_IGNORE) /* width and height here are for the client area */
{
ih->data->ignore_resize = 1;
IupRefresh(ih);
ih->data->ignore_resize = 0;
}
}
old_x = iupAttribGetInt(ih, "_IUPGTK_OLD_X");
old_y = iupAttribGetInt(ih, "_IUPGTK_OLD_Y");
iupdrvDialogGetPosition(ih, NULL, &x, &y); /* ignore evt->x and evt->y because they are the clientpos and not X/Y */
/* Check the position change, because configure is called also for size changes */
if (x != old_x || y != old_y)
{
IFnii cb;
iupAttribSetInt(ih, "_IUPGTK_OLD_X", x);
iupAttribSetInt(ih, "_IUPGTK_OLD_Y", y);
cb = (IFnii)IupGetCallback(ih, "MOVE_CB");
if (cb)
cb(ih, x, y);
}
return FALSE;
}
gboolean iupgtkKeyPressEvent(GtkWidget *widget, GdkEventKey *evt, Ihandle *ih)
{
int result;
int code = iupgtkKeyDecode(evt);
if (code == 0)
return FALSE;
/* Avoid duplicate calls if a child of a native container contains the focus.
GTK will call the callback for the child and for the container.
Ignore the one sent to the parent. For now only IupDialog and IupTabs
have keyboard signals intercepted.
*/
if (iupObjectIsNativeContainer(ih))
{
GtkWindow* win = (GtkWindow*)IupGetDialog(ih)->handle;
GtkWidget *widget_focus = gtk_window_get_focus(win);
if (widget_focus && widget_focus != widget)
return FALSE;
}
result = iupKeyCallKeyCb(ih, code);
if (result == IUP_CLOSE)
{
IupExitLoop();
return FALSE;
}
if (result == IUP_IGNORE)
return TRUE;
/* in the previous callback the dialog could be destroyed */
if (iupObjectCheck(ih))
{
/* this is called only for canvas */
if (ih->iclass->nativetype == IUP_TYPECANVAS)
{
result = iupKeyCallKeyPressCb(ih, code, 1);
if (result == IUP_CLOSE)
{
IupExitLoop();
return FALSE;
}
if (result == IUP_IGNORE)
return TRUE;
}
if (!iupKeyProcessNavigation(ih, code, evt->state & GDK_SHIFT_MASK))
return TRUE;
/* compensate the show-help limitation.
* It is not called on F1, only on Shift+F1 and Ctrl+F1. */
if (code == K_F1)
{
Icallback cb = IupGetCallback(ih, "HELP_CB");
if (cb)
{
if (cb(ih) == IUP_CLOSE)
IupExitLoop();
}
}
}
(void)widget;
return FALSE;
}
static int gtkDialogMapMethod(Ihandle* ih)
{
int decorations = 0;
int functions = 0;
InativeHandle* parent;
GtkWidget* inner_parent;
int has_titlebar = 0;
#ifdef HILDON
if (iupAttribGetBoolean(ih, "HILDONWINDOW"))
{
HildonProgram *program = HILDON_PROGRAM(hildon_program_get_instance());
ih->handle = hildon_window_new();
if (ih->handle)
hildon_program_add_window(program, HILDON_WINDOW(ih->handle));
}
else
{
iupAttribSet(ih, "DIALOGHINT", "YES"); /* otherwise not displayed correctly */
ih->handle = gtk_window_new(GTK_WINDOW_TOPLEVEL);
}
#else
ih->handle = gtk_window_new(GTK_WINDOW_TOPLEVEL);
#endif
if (!ih->handle)
return IUP_ERROR;
parent = iupDialogGetNativeParent(ih);
if (parent)
{
gtk_window_set_transient_for((GtkWindow*)ih->handle, (GtkWindow*)parent);
/* manually remove child windows when parent is destroyed */
g_signal_connect(G_OBJECT(parent), "destroy", G_CALLBACK(gtkDialogChildDestroyEvent), ih);
}
g_signal_connect(G_OBJECT(ih->handle), "focus-in-event", G_CALLBACK(iupgtkFocusInOutEvent), ih);
g_signal_connect(G_OBJECT(ih->handle), "focus-out-event", G_CALLBACK(iupgtkFocusInOutEvent), ih);
g_signal_connect(G_OBJECT(ih->handle), "enter-notify-event", G_CALLBACK(iupgtkEnterLeaveEvent), ih);
g_signal_connect(G_OBJECT(ih->handle), "leave-notify-event", G_CALLBACK(iupgtkEnterLeaveEvent), ih);
g_signal_connect(G_OBJECT(ih->handle), "show-help", G_CALLBACK(iupgtkShowHelp), ih);
/* The iupgtkKeyPressEvent of the control with the focus will propagate the key up to the dialog. */
/* Inside iupgtkKeyPressEvent we test this to avoid duplicate calls. */
g_signal_connect(G_OBJECT(ih->handle), "key-press-event", G_CALLBACK(iupgtkKeyPressEvent), ih);
g_signal_connect(G_OBJECT(ih->handle), "configure-event", G_CALLBACK(gtkDialogConfigureEvent), ih);
g_signal_connect(G_OBJECT(ih->handle), "window-state-event", G_CALLBACK(gtkDialogWindowStateEvent), ih);
g_signal_connect(G_OBJECT(ih->handle), "delete-event", G_CALLBACK(iupgtkDialogDeleteEvent), ih);
gtk_window_set_default_size((GtkWindow*)ih->handle, 100, 100); /* set this to avoid size calculation problems */
if (iupAttribGetBoolean(ih, "DIALOGHINT"))
gtk_window_set_type_hint(GTK_WINDOW(ih->handle), GDK_WINDOW_TYPE_HINT_DIALOG);
/* the container that will receive the child element. */
inner_parent = iupgtkNativeContainerNew(0);
gtk_container_add((GtkContainer*)ih->handle, inner_parent);
gtk_widget_show(inner_parent);
/* initialize the widget */
gtk_widget_realize(ih->handle);
if (iupAttribGet(ih, "TITLE"))
has_titlebar = 1;
if (iupAttribGetBoolean(ih, "RESIZE"))
{
functions |= GDK_FUNC_RESIZE;
decorations |= GDK_DECOR_RESIZEH;
decorations |= GDK_DECOR_BORDER; /* has_border */
}
else
iupAttribSet(ih, "MAXBOX", "NO");
if (iupAttribGetBoolean(ih, "MENUBOX"))
{
functions |= GDK_FUNC_CLOSE;
decorations |= GDK_DECOR_MENU;
has_titlebar = 1;
}
if (iupAttribGetBoolean(ih, "MAXBOX"))
{
functions |= GDK_FUNC_MAXIMIZE;
decorations |= GDK_DECOR_MAXIMIZE;
has_titlebar = 1;
}
if (iupAttribGetBoolean(ih, "MINBOX"))
{
functions |= GDK_FUNC_MINIMIZE;
decorations |= GDK_DECOR_MINIMIZE;
has_titlebar = 1;
}
if (has_titlebar)
{
functions |= GDK_FUNC_MOVE;
decorations |= GDK_DECOR_TITLE;
gtk_window_set_title((GtkWindow*)ih->handle, "");
}
if (iupAttribGetBoolean(ih, "BORDER") || has_titlebar)
decorations |= GDK_DECOR_BORDER; /* has_border */
if (decorations == 0)
gtk_window_set_decorated((GtkWindow*)ih->handle, FALSE);
else
{
GdkWindow* window = iupgtkGetWindow(ih->handle);
if (window)
{
gdk_window_set_decorations(window, (GdkWMDecoration)decorations);
gdk_window_set_functions(window, (GdkWMFunction)functions);
}
}
/* configure for DRAG&DROP */
if (IupGetCallback(ih, "DROPFILES_CB"))
iupAttribSet(ih, "DROPFILESTARGET", "YES");
/* configure the size range */
gtkDialogSetMinMax(ih, 1, 1, 65535, 65535); /* MINSIZE and MAXSIZE default values */
/* Ignore VISIBLE before mapping */
iupAttribSet(ih, "VISIBLE", NULL);
if (iupStrBoolean(IupGetGlobal("INPUTCALLBACKS")))
gtk_widget_add_events(ih->handle, GDK_POINTER_MOTION_MASK|GDK_BUTTON_PRESS_MASK|GDK_BUTTON_RELEASE_MASK|GDK_BUTTON_MOTION_MASK);
return IUP_NOERROR;
}
/* Callback to report to the user which visualization area of
the matrix changed. */
static void iMatrixScrollCallScrollTopCb(Ihandle* ih)
{
IFnii cb = (IFnii)IupGetCallback(ih, "SCROLLTOP_CB");
if (cb)
cb(ih, ih->data->lines.first, ih->data->columns.first);
}
int iupdrvMenuPopup(Ihandle* ih, int x, int y)
{
HWND hWndActive = GetActiveWindow();
int tray_menu = 0;
int menuId;
if (!hWndActive)
{
/* search for a valid handle */
Ihandle* dlg = iupDlgListFirst();
do
{
if (dlg->handle)
{
hWndActive = dlg->handle; /* found a valid handle */
/* if not a "TRAY" dialog, keep searching, because TRAY is a special case */
if (iupAttribGetBoolean(dlg, "TRAY"))
break;
}
dlg = iupDlgListNext();
} while (dlg);
}
/* Necessary to avoid tray dialogs to lock popup menus (they get sticky after the 1st time) */
if (hWndActive)
{
Ihandle* dlg = iupwinHandleGet(hWndActive);
if (dlg && iupAttribGetBoolean(dlg, "TRAY"))
{
/* To display a context menu for a notification icon,
the current window must be the foreground window. */
SetForegroundWindow(hWndActive);
tray_menu = 1;
}
}
/* stop processing here. messages will not go to the message loop */
menuId = TrackPopupMenu((HMENU)ih->handle, TPM_LEFTALIGN|TPM_RIGHTBUTTON|TPM_RETURNCMD, x, y, 0, hWndActive, NULL);
if (tray_menu)
{
/* You must force a task switch to the application that
called TrackPopupMenu at some time in the near future.
This is done by posting a benign message to the window. */
PostMessage(hWndActive, WM_NULL, 0, 0);
}
if (menuId)
{
Icallback cb;
Ihandle* ih_item = iupwinMenuGetItemHandle((HMENU)ih->handle, menuId);
if (!ih_item) return IUP_NOERROR;
winItemCheckToggle(ih_item);
cb = IupGetCallback(ih_item, "ACTION");
if (cb && cb(ih_item) == IUP_CLOSE)
IupExitLoop();
}
return IUP_NOERROR;
}
int iupKeyCallKeyPressCb(Ihandle *ih, int code, int press)
{
IFnii cb = (IFnii)IupGetCallback(ih, "KEYPRESS_CB");
if (cb) return cb(ih, code, press);
return IUP_DEFAULT;
}
static int winButtonMsgProc(Ihandle* ih, UINT msg, WPARAM wp, LPARAM lp, LRESULT *result)
{
if (ih->data->type != IUP_BUTTON_TEXT)
{
/* redraw IMPRESS image if any */
if ((msg == WM_LBUTTONDOWN || msg == WM_LBUTTONUP) && iupAttribGet(ih, "IMPRESS"))
iupdrvRedrawNow(ih);
}
switch (msg)
{
case WM_XBUTTONDBLCLK:
case WM_LBUTTONDBLCLK:
case WM_MBUTTONDBLCLK:
case WM_RBUTTONDBLCLK:
case WM_XBUTTONDOWN:
case WM_LBUTTONDOWN:
case WM_MBUTTONDOWN:
case WM_RBUTTONDOWN:
{
/* Process BUTTON_CB */
iupwinButtonDown(ih, msg, wp, lp);
/* Feedback will NOT be done when not receiving the focus or when in double click */
if ((msg==WM_LBUTTONDOWN && !iupAttribGetBoolean(ih, "CANFOCUS")) ||
msg==WM_LBUTTONDBLCLK)
{
iupAttribSet(ih, "_IUPWINBUT_SELECTED", "1");
iupdrvRedrawNow(ih);
}
break;
}
case WM_XBUTTONUP:
case WM_LBUTTONUP:
case WM_MBUTTONUP:
case WM_RBUTTONUP:
{
/* Process BUTTON_CB */
iupwinButtonUp(ih, msg, wp, lp);
if (msg==WM_LBUTTONUP)
{
if (iupAttribGet(ih, "_IUPWINBUT_SELECTED"))
{
iupAttribSet(ih, "_IUPWINBUT_SELECTED", NULL);
iupdrvRedrawNow(ih);
}
/* BN_CLICKED will NOT be notified when not receiving the focus */
if (!iupAttribGetBoolean(ih, "CANFOCUS"))
{
Icallback cb = IupGetCallback(ih, "ACTION");
if (cb && cb(ih) == IUP_CLOSE)
IupExitLoop();
}
}
if (!iupwinIsVistaOrNew() && iupObjectCheck(ih))
{
/* TIPs desapear forever after a button click in XP,
so we force an update. */
char* tip = iupAttribGet(ih, "TIP");
if (tip)
iupdrvBaseSetTipAttrib(ih, tip);
}
break;
}
case WM_KEYDOWN:
case WM_SYSKEYDOWN:
if (wp==VK_RETURN)
{
/* enter activates the button */
iupdrvActivate(ih);
*result = 0;
return 1; /* abort default processing, or the default button will be activated,
in this case even if there is a default button, this button must be activated instead. */
}
break;
case WM_MOUSELEAVE:
if (!iupwin_comctl32ver6 && iupAttribGetBoolean(ih, "FLAT"))
{
iupAttribSet(ih, "_IUPWINBUT_ENTERWIN", NULL);
iupdrvRedrawNow(ih);
}
if (iupAttribGet(ih, "_IUPWINBUT_SELECTED"))
{
iupAttribSet(ih, "_IUPWINBUT_SELECTED", NULL);
iupdrvRedrawNow(ih);
}
break;
case WM_MOUSEMOVE:
if (!iupwin_comctl32ver6 && iupAttribGetBoolean(ih, "FLAT"))
{
if (!iupAttribGet(ih, "_IUPWINBUT_ENTERWIN"))
{
iupAttribSet(ih, "_IUPWINBUT_ENTERWIN", "1");
iupdrvRedrawNow(ih);
}
}
break;
case WM_SETFOCUS:
if (!iupAttribGetBoolean(ih, "CANFOCUS"))
{
HWND previous = (HWND)wp;
if (previous && previous != ih->handle)
{
SetFocus(previous);
*result = 0;
return 1;
}
}
break;
}
return iupwinBaseMsgProc(ih, msg, wp, lp, result);
}
static int iDetachBoxButton_CB(Ihandle* bar, int button, int pressed, int x, int y, char* status)
{
Ihandle* ih = bar->parent;
Ihandle* mainDlg = IupGetDialog(ih);
if (button != IUP_BUTTON1)
return IUP_DEFAULT;
if (!ih->data->is_holding && pressed) /* DRAG BEGIN */
{
ih->data->is_holding = 1;
/* Change cursor */
IupSetAttribute(bar, "CURSOR", "IupDetachBoxCursor");
}
else if (ih->data->is_holding && !pressed) /* DRAG END */
{
Ihandle *new_parent;
IFnnii detachedCB = (IFnnii)IupGetCallback(ih, "DETACHED_CB");
int cur_x, cur_y;
ih->data->is_holding = 0;
iupStrToIntInt(IupGetGlobal("CURSORPOS"), &cur_x, &cur_y, 'x');
/* Create new dialog */
new_parent = IupDialog(NULL);
/* Set new dialog as child of the current application */
IupSetAttributeHandle(new_parent, "PARENTDIALOG", mainDlg);
if (detachedCB)
{
int ret = detachedCB(ih, new_parent, cur_x, cur_y);
if (ret == IUP_IGNORE)
{
IupDestroy(new_parent);
return IUP_DEFAULT;
}
}
/* Save current parent and reference child */
ih->data->old_parent = ih->parent;
ih->data->old_brother = ih->brother;
IupMap(new_parent);
/* Sets the new parent */
IupReparent(ih, new_parent, NULL);
/* Restores the cursor */
IupSetAttribute(bar, "CURSOR", "MOVE");
/* Hide canvas bar */
ih->data->barsize = 0;
IupHide(bar);
/* Updates/redraws the layout of the dialog application */
IupRefresh(mainDlg);
IupSetAttribute(new_parent, "RASTERSIZE", NULL);
IupRefresh(new_parent);
/* Maps and shows the new dialog */
IupShowXY(new_parent, cur_x, cur_y);
}
(void)x;
(void)y;
(void)status;
return IUP_DEFAULT;
}
static void iGLCanvasBoxEnterChild(Ihandle* ih, Ihandle* child, int x, int y)
{
Ihandle* last_child = (Ihandle*)iupAttribGet(ih, "_IUP_GLBOX_LAST_ENTER");
if (last_child && last_child != child)
{
if (iupAttribGetInt(last_child, "ACTIVE"))
{
IFn cb;
char* value;
value = iupAttribGet(ih, "_IUPGLBOX_TIP_SET");
if (value)
{
value = iupAttribGet(ih, "_IUPGLBOX_TIP");
IupSetStrAttribute(ih, "TIP", value); /* reset attribute if it was set */
iupAttribSet(ih, "_IUPGLBOX_TIP", NULL);
iupAttribSet(ih, "_IUPGLBOX_TIP_SET", NULL);
}
iupAttribSet(last_child, "HIGHLIGHT", NULL);
iupAttribSet(last_child, "PRESSED", NULL);
cb = (IFn)IupGetCallback(last_child, "GL_LEAVEWINDOW_CB");
if (cb)
cb(last_child);
value = iupAttribGet(ih, "_IUPGLBOX_CURSOR");
if (value)
{
IupSetStrAttribute(ih, "CURSOR", value); /* reset attribute if it was set */
iupAttribSet(ih, "_IUPGLBOX_CURSOR", NULL);
}
}
iupAttribSet(ih, "_IUP_GLBOX_LAST_ENTER", NULL);
}
if (child && child != last_child)
{
if (iupAttribGetInt(child, "ACTIVE"))
{
IFnii cb;
char* value;
value = iupAttribGet(child, "TIP");
if (value)
{
iupAttribSet(ih, "_IUPGLBOX_TIP_SET", "1"); /* TIP can be NULL */
iupAttribSetStr(ih, "_IUPGLBOX_TIP", IupGetAttribute(ih, "TIP"));
IupSetStrAttribute(ih, "TIP", value);
IupSetAttribute(ih, "TIPVISIBLE", "Yes");
}
iupAttribSet(child, "HIGHLIGHT", "1");
cb = (IFnii)IupGetCallback(child, "GL_ENTERWINDOW_CB");
if (cb)
cb(child, x, y);
value = iupAttribGet(child, "CURSOR");
if (value)
{
iupAttribSetStr(ih, "_IUPGLBOX_CURSOR", IupGetAttribute(ih, "CURSOR"));
IupSetStrAttribute(ih, "CURSOR", value);
}
}
iupAttribSet(ih, "_IUP_GLBOX_LAST_ENTER", (char*)child);
}
}
static void iMatrixExPasteData(Ihandle *ih, const char* data, int lin, int col, const char* busyname)
{
int num_lin, num_col, skip_lines,
data_num_lin, data_num_col;
char sep=0, *str_sep;
IFnii pastesize_cb;
/* reset error state */
iupAttribSet(ih, "LASTERROR", NULL);
if (!data || data[0]==0)
{
iupAttribSet(ih, "LASTERROR", "IUP_ERRORNOTEXT");
return;
}
skip_lines = IupGetInt(ih, "TEXTSKIPLINES");
if (skip_lines)
{
int i, len;
const char *next_line;
for (i=0; i<skip_lines; i++)
{
next_line = iupStrNextLine(data, &len);
if (next_line==data) /* no next line */
{
iupAttribSet(ih, "LASTERROR", "IUP_ERRORNOTEXT");
return;
}
data = (char*)next_line;
}
}
str_sep = IupGetAttribute(ih, "TEXTSEPARATOR");
if (str_sep) sep = *str_sep;
if (!iMatrixExStrGetDataSize(data, &data_num_lin, &data_num_col, &sep))
{
iupAttribSet(ih, "LASTERROR", "IUP_ERRORINVALIDDATA");
return;
}
num_lin = IupGetInt(ih, "NUMLIN");
num_col = IupGetInt(ih, "NUMCOL");
pastesize_cb = (IFnii)IupGetCallback(ih, "PASTESIZE_CB");
if (pastesize_cb)
{
int vis_num_lin = iMatrixExGetVisibleNumLin(ih, lin, data_num_lin);
int vis_num_col = iMatrixExGetVisibleNumCol(ih, col, data_num_col);
if (lin+vis_num_lin>num_lin ||
col+vis_num_col>num_col)
{
int ret = pastesize_cb(ih, lin+vis_num_lin, col+vis_num_col);
if (ret == IUP_IGNORE)
return;
else if (ret == IUP_CONTINUE)
{
if (lin+vis_num_lin>num_lin) IupSetInt(ih, "NUMLIN", lin+vis_num_lin);
if (col+vis_num_col>num_col) IupSetInt(ih, "NUMCOL", col+vis_num_col);
}
}
}
iMatrixExPasteSetData(ih, data, data_num_lin, data_num_col, sep, lin, col, num_lin, num_col, busyname);
}
bool iupPlot::Render(cdCanvas* canvas)
{
if (!mRedraw)
return true;
// Shift the drawing area to the plot viewport
cdCanvasOrigin(canvas, mViewport.mX, mViewport.mY);
// There are no additional transformations set in the CD canvas,
// all transformations are done here.
cdCanvasClip(canvas, CD_CLIPAREA);
// Draw the background, axis and grid restricted only by the viewport
cdCanvasClipArea(canvas, 0, mViewport.mWidth - 1, 0, mViewport.mHeight - 1);
// draw entire plot viewport
DrawBackground(canvas);
if (!mDataSetListCount)
return true;
cdCanvasNativeFont(canvas, IupGetAttribute(ih, "FONT"));
ConfigureAxis();
if (!CalculateAxisRange())
return false;
if (!CheckRange(mAxisX))
return false;
if (!CheckRange(mAxisY))
return false;
CalculateTitlePos();
// Must be before calculate margins
CalculateTickSize(canvas, mAxisX.mTick);
CalculateTickSize(canvas, mAxisY.mTick);
CalculateMargins(canvas);
iupPlotRect theDatasetArea;
theDatasetArea.mX = mBack.mMargin.mLeft;
theDatasetArea.mY = mBack.mMargin.mBottom;
theDatasetArea.mWidth = mViewport.mWidth - mBack.mMargin.mLeft - mBack.mMargin.mRight;
theDatasetArea.mHeight = mViewport.mHeight - mBack.mMargin.mTop - mBack.mMargin.mBottom;
if (!CalculateTickSpacing(theDatasetArea, canvas))
return false;
if (!CalculateXTransformation(theDatasetArea))
return false;
if (!CalculateYTransformation(theDatasetArea))
return false;
IFnC pre_cb = (IFnC)IupGetCallback(ih, "PREDRAW_CB");
if (pre_cb)
pre_cb(ih, canvas);
if (mBack.GetImage())
DrawBackgroundImage(canvas);
if (!mGrid.DrawX(mAxisX.mTickIter, mAxisX.mTrafo, theDatasetArea, canvas))
return false;
if (mGrid.mShowX)
mGridMinor.DrawX(mAxisX.mTickIter, mAxisX.mTrafo, theDatasetArea, canvas);
if (!mGrid.DrawY(mAxisY.mTickIter, mAxisY.mTrafo, theDatasetArea, canvas))
return false;
if (mGrid.mShowY)
mGridMinor.DrawY(mAxisY.mTickIter, mAxisY.mTrafo, theDatasetArea, canvas);
if (!mAxisX.DrawX(theDatasetArea, canvas, mAxisY))
return false;
if (!mAxisY.DrawY(theDatasetArea, canvas, mAxisX))
return false;
if (mBox.mShow)
mBox.Draw(theDatasetArea, canvas);
// draw the datasets, legend, crosshair and selection restricted to the dataset area
cdCanvasClipArea(canvas, theDatasetArea.mX, theDatasetArea.mX + theDatasetArea.mWidth - 1, theDatasetArea.mY, theDatasetArea.mY + theDatasetArea.mHeight - 1);
IFniiddi drawsample_cb = (IFniiddi)IupGetCallback(ih, "DRAWSAMPLE_CB");
for (int ds = 0; ds < mDataSetListCount; ds++)
{
iupPlotDataSet* dataset = mDataSetList[ds];
if (drawsample_cb)
{
iupPlotSampleNotify inNotify = { ih, ds, drawsample_cb };
dataset->DrawData(mAxisX.mTrafo, mAxisY.mTrafo, canvas, &inNotify);
}
else
dataset->DrawData(mAxisX.mTrafo, mAxisY.mTrafo, canvas, NULL);
}
if (mCrossHairH)
DrawCrossHairH(theDatasetArea, canvas);
else if (mCrossHairV)
DrawCrossHairV(theDatasetArea, canvas);
if (mShowSelectionBand)
{
if (mSelectionBand.mX < theDatasetArea.mX)
{
mSelectionBand.mWidth = mSelectionBand.mX + mSelectionBand.mWidth - theDatasetArea.mX;
mSelectionBand.mX = theDatasetArea.mX;
}
if (mSelectionBand.mY < theDatasetArea.mY)
{
mSelectionBand.mHeight = mSelectionBand.mY + mSelectionBand.mHeight - theDatasetArea.mY;
mSelectionBand.mY = theDatasetArea.mY;
}
if (mSelectionBand.mX + mSelectionBand.mWidth > theDatasetArea.mX + theDatasetArea.mWidth)
mSelectionBand.mWidth = theDatasetArea.mX + theDatasetArea.mWidth - mSelectionBand.mX;
if (mSelectionBand.mY + mSelectionBand.mHeight > theDatasetArea.mY + theDatasetArea.mHeight)
mSelectionBand.mHeight = theDatasetArea.mY + theDatasetArea.mHeight - mSelectionBand.mY;
mBox.Draw(mSelectionBand, canvas);
}
IFnC post_cb = (IFnC)IupGetCallback(ih, "POSTDRAW_CB");
if (post_cb)
post_cb(ih, canvas);
if (!DrawLegend(theDatasetArea, canvas, mLegend.mPos))
return false;
// Draw title restricted only by the viewport
cdCanvasClipArea(canvas, 0, mViewport.mWidth - 1, 0, mViewport.mHeight - 1);
DrawTitle(canvas);
if (!IupGetInt(ih, "ACTIVE"))
DrawInactive(canvas);
mRedraw = false;
return true;
}
static int winButtonProc(Ihandle* ih, UINT msg, WPARAM wp, LPARAM lp, LRESULT *result)
{
if (ih->data->type != IUP_BUTTON_TEXT)
{
/* redraw IMPRESS image if any */
if ((msg == WM_LBUTTONDOWN || msg == WM_LBUTTONUP) && iupAttribGet(ih, "IMPRESS"))
iupdrvDisplayRedraw(ih);
}
switch (msg)
{
case WM_XBUTTONDBLCLK:
case WM_LBUTTONDBLCLK:
case WM_MBUTTONDBLCLK:
case WM_RBUTTONDBLCLK:
case WM_XBUTTONDOWN:
case WM_LBUTTONDOWN:
case WM_MBUTTONDOWN:
case WM_RBUTTONDOWN:
{
iupwinButtonDown(ih, msg, wp, lp);
break;
}
case WM_XBUTTONUP:
case WM_LBUTTONUP:
case WM_MBUTTONUP:
case WM_RBUTTONUP:
{
iupwinButtonUp(ih, msg, wp, lp);
/* BN_CLICKED will NOT be notified when not receiving the focus */
if (msg==WM_LBUTTONUP && !iupAttribGetBoolean(ih, "FOCUSONCLICK"))
{
Icallback cb = IupGetCallback(ih, "ACTION");
if (cb && cb(ih) == IUP_CLOSE)
IupExitLoop();
}
break;
}
case WM_KEYDOWN:
case WM_SYSKEYDOWN:
if (wp==VK_RETURN)
{
/* enter activates the button */
iupdrvActivate(ih);
*result = 0;
return 1; /* abort default processing, or the default button will be activated,
in this case even if there is a default button, this button must be activated instead. */
}
break;
case WM_MOUSELEAVE:
if (!iupwin_comctl32ver6)
{
iupAttribSetStr(ih, "_IUPWINBUT_ENTERWIN", NULL);
iupdrvDisplayRedraw(ih);
}
break;
case WM_MOUSEMOVE:
if (!iupwin_comctl32ver6)
{
if (!iupAttribGet(ih, "_IUPWINBUT_ENTERWIN"))
{
iupAttribSetStr(ih, "_IUPWINBUT_ENTERWIN", "1");
iupdrvDisplayRedraw(ih);
}
}
break;
case WM_SETFOCUS:
{
HWND previous = (HWND)wp;
if (!iupAttribGetBoolean(ih, "FOCUSONCLICK") && wp && iupAttribGet(ih, "_IUPWIN_ENTERWIN"))
{
SetFocus(previous);
*result = 0;
return 1;
}
}
break;
}
return iupwinBaseProc(ih, msg, wp, lp, result);
}
static int winDialogMapMethod(Ihandle* ih)
{
InativeHandle* native_parent;
DWORD dwStyle = WS_CLIPSIBLINGS,
dwExStyle = 0;
int has_titlebar = 0,
has_border = 0;
char* classname = "IupDialog";
char* title = iupAttribGet(ih, "TITLE");
if (title)
has_titlebar = 1;
if (iupAttribGetBoolean(ih, "RESIZE"))
{
dwStyle |= WS_THICKFRAME;
has_border = 1;
}
else
iupAttribSetStr(ih, "MAXBOX", "NO");
if (iupAttribGetBoolean(ih, "MENUBOX"))
{
dwStyle |= WS_SYSMENU;
has_titlebar = 1;
}
if (iupAttribGetBoolean(ih, "MAXBOX"))
{
dwStyle |= WS_MAXIMIZEBOX;
has_titlebar = 1;
}
if (iupAttribGetBoolean(ih, "MINBOX"))
{
dwStyle |= WS_MINIMIZEBOX;
has_titlebar = 1;
}
if (iupAttribGetBoolean(ih, "BORDER") || has_titlebar)
has_border = 1;
if (iupAttribGetBoolean(ih, "MDICHILD"))
{
Ihandle *client;
/* must have a parent dialog (the mdi frame) */
Ihandle* parent = IupGetAttributeHandle(ih, "PARENTDIALOG");
if (!parent || !parent->handle)
return IUP_ERROR;
/* set when the mdi client is mapped */
client = (Ihandle*)iupAttribGet(parent, "MDICLIENT_HANDLE");
if (!client)
return IUP_ERROR;
/* store the mdi client handle in each mdi child also */
iupAttribSetStr(ih, "MDICLIENT_HANDLE", (char*)client);
classname = "IupDialogMDIChild";
/* The actual parent is the mdi client */
native_parent = client->handle;
dwStyle |= WS_CHILD;
if (has_titlebar)
dwStyle |= WS_CAPTION;
else if (has_border)
dwStyle |= WS_BORDER;
if (!IupGetName(ih))
iupAttribSetHandleName(ih);
}
else
{
native_parent = iupDialogGetNativeParent(ih);
if (native_parent)
{
dwStyle |= WS_POPUP;
if (has_titlebar)
dwStyle |= WS_CAPTION;
else if (has_border)
dwStyle |= WS_BORDER;
}
else
{
if (has_titlebar)
{
dwStyle |= WS_OVERLAPPED;
}
else
{
if (has_border)
dwStyle |= WS_POPUP | WS_BORDER;
else
dwStyle |= WS_POPUP;
dwExStyle |= WS_EX_NOACTIVATE; /* this will hide it from the taskbar */
}
}
if (iupAttribGetBoolean(ih, "MDIFRAME"))
{
COLORREF color = GetSysColor(COLOR_BTNFACE);
iupAttribSetStrf(ih, "_IUPWIN_BACKGROUND_COLOR", "%d %d %d", (int)GetRValue(color),
(int)GetGValue(color),
(int)GetBValue(color));
classname = "IupDialogMDIFrame";
}
}
if (iupAttribGetBoolean(ih, "TOOLBOX") && native_parent)
dwExStyle |= WS_EX_TOOLWINDOW | WS_EX_WINDOWEDGE;
if (iupAttribGetBoolean(ih, "DIALOGFRAME") && native_parent)
dwExStyle |= WS_EX_DLGMODALFRAME; /* this will hide the MENUBOX but not the close button */
iupwinGetNativeParentStyle(ih, &dwExStyle, &dwStyle);
if (iupAttribGetBoolean(ih, "HELPBUTTON"))
dwExStyle |= WS_EX_CONTEXTHELP;
if (iupAttribGetBoolean(ih, "CONTROL") && native_parent)
{
/* TODO: this were used by LuaCom to create embeded controls,
don't know if it is still working */
dwStyle = WS_CHILD | WS_TABSTOP | WS_CLIPCHILDREN;
classname = "IupDialogControl";
}
/* CreateWindowEx will send WM_GETMINMAXINFO before Ihandle is associated with HWND */
if (iupAttribGet(ih, "MINSIZE") || iupAttribGet(ih, "MAXSIZE"))
winMinMaxHandle = ih;
/* size will be updated in IupRefresh -> winDialogLayoutUpdate */
/* position will be updated in iupDialogShowXY */
if (iupAttribGetBoolean(ih, "MDICHILD"))
ih->handle = CreateMDIWindow(classname,
title, /* title */
dwStyle, /* style */
0, /* x-position */
0, /* y-position */
100, /* horizontal size - set this to avoid size calculation problems */
100, /* vertical size */
native_parent, /* owner window */
iupwin_hinstance, /* instance of app. */
0); /* no creation parameters */
else
ih->handle = CreateWindowEx(dwExStyle, /* extended styles */
classname, /* class */
title, /* title */
dwStyle, /* style */
0, /* x-position */
0, /* y-position */
100, /* horizontal size - set this to avoid size calculation problems */
100, /* vertical size */
native_parent, /* owner window */
(HMENU)0, /* Menu or child-window identifier */
iupwin_hinstance, /* instance of app. */
NULL); /* no creation parameters */
if (!ih->handle)
return IUP_ERROR;
/* associate HWND with Ihandle*, all Win32 controls must call this. */
iupwinHandleAdd(ih, ih->handle);
if (iupStrEqual(classname, "IupDialogMDIChild")) /* hides the mdi child */
ShowWindow(ih->handle, SW_HIDE);
/* configure for DROP of files */
if (IupGetCallback(ih, "DROPFILES_CB"))
iupAttribSetStr(ih, "DROPFILESTARGET", "YES");
/* Reset attributes handled during creation that */
/* also can be changed later, and can be consulted from the native system. */
iupAttribSetStr(ih, "TITLE", NULL);
/* Ignore VISIBLE before mapping */
iupAttribSetStr(ih, "VISIBLE", NULL);
/* Set the default CmdShow for ShowWindow */
ih->data->cmd_show = SW_SHOWNORMAL;
if (iupAttribGetBoolean(ih, "MDICHILD"))
winDialogMDIRefreshMenu(ih);
return IUP_NOERROR;
}
static int gtkFontDlgPopup(Ihandle* ih, int x, int y)
{
InativeHandle* parent = iupDialogGetNativeParent(ih);
GtkFontSelectionDialog* dialog;
int response;
char* preview_text, *standardfont;
iupAttribSetInt(ih, "_IUPDLG_X", x); /* used in iupDialogUpdatePosition */
iupAttribSetInt(ih, "_IUPDLG_Y", y);
dialog = (GtkFontSelectionDialog*)gtk_font_selection_dialog_new(iupgtkStrConvertToUTF8(iupAttribGet(ih, "TITLE")));
if (!dialog)
return IUP_ERROR;
if (parent)
gtk_window_set_transient_for((GtkWindow*)dialog, (GtkWindow*)parent);
standardfont = iupAttribGet(ih, "VALUE");
if (!standardfont)
standardfont = IupGetGlobal("DEFAULTFONT");
gtk_font_selection_dialog_set_font_name(dialog, standardfont);
preview_text = iupAttribGet(ih, "PREVIEWTEXT");
if (preview_text)
gtk_font_selection_dialog_set_preview_text(dialog, preview_text);
if (IupGetCallback(ih, "HELP_CB"))
gtk_dialog_add_button(GTK_DIALOG(dialog), GTK_STOCK_HELP, GTK_RESPONSE_HELP);
/* initialize the widget */
gtk_widget_realize(GTK_WIDGET(dialog));
ih->handle = GTK_WIDGET(dialog);
iupDialogUpdatePosition(ih);
ih->handle = NULL;
do
{
response = gtk_dialog_run(GTK_DIALOG(dialog));
if (response == GTK_RESPONSE_HELP)
{
Icallback cb = IupGetCallback(ih, "HELP_CB");
if (cb && cb(ih) == IUP_CLOSE)
response = GTK_RESPONSE_CANCEL;
}
} while (response == GTK_RESPONSE_HELP);
if (response == GTK_RESPONSE_OK)
{
char* fontname = gtk_font_selection_dialog_get_font_name(dialog);
iupAttribStoreStr(ih, "VALUE", fontname);
g_free(fontname);
iupAttribSetStr(ih, "STATUS", "1");
}
else
{
iupAttribSetStr(ih, "VALUE", NULL);
iupAttribSetStr(ih, "STATUS", NULL);
}
gtk_widget_destroy(GTK_WIDGET(dialog));
return IUP_NOERROR;
}
/* Draw the line titles, visible, between lin and lastlin, include it.
Line titles marked will be draw with the appropriate feedback.
-> lin1 - First line to have its title drawn
-> lin2 - Last line to have its title drawn */
void iupMatrixDrawTitleLines(Ihandle* ih, int lin1, int lin2)
{
int x1, y1, x2, y2, first_lin;
int lin, alignment, active, framehighlight;
long framecolor;
IFniiiiiiC draw_cb;
if (!ih->data->columns.dt[0].size)
return;
if (ih->data->lines.num_noscroll>1 && lin1==1 && lin2==ih->data->lines.num_noscroll-1)
{
first_lin = 0;
y1 = 0;
}
else
{
if (lin1 > ih->data->lines.last ||
lin2 < ih->data->lines.first)
return;
if (lin1 < ih->data->lines.first)
lin1 = ih->data->lines.first;
if (lin2 > ih->data->lines.last)
lin2 = ih->data->lines.last;
first_lin = ih->data->lines.first;
y1 = 0;
for (lin = 0; lin< ih->data->lines.num_noscroll; lin++)
y1 += ih->data->lines.dt[lin].size;
}
/* Start the position of the line title */
x1 = 0;
x2 = ih->data->columns.dt[0].size;
iupMATRIX_CLIPAREA(ih, x1, x2, y1, ih->data->h-1);
cdCanvasClip(ih->data->cd_canvas, CD_CLIPAREA);
/* Find the initial position of the first line */
if (first_lin == ih->data->lines.first)
y1 -= ih->data->lines.first_offset;
for(lin = first_lin; lin < lin1; lin++)
y1 += ih->data->lines.dt[lin].size;
framecolor = cdIupConvertColor(iupAttribGetStr(ih, "FRAMECOLOR"));
framehighlight = iupAttribGetInt(ih, "FRAMETITLEHIGHLIGHT");
active = iupdrvIsActive(ih);
draw_cb = (IFniiiiiiC)IupGetCallback(ih, "DRAW_CB");
alignment = iMatrixDrawGetColAlignment(ih, 0);
/* Draw the titles */
for(lin = lin1; lin <= lin2; lin++)
{
/* If it is a hidden line (size = 0), don't draw the title */
if(ih->data->lines.dt[lin].size == 0)
continue;
y2 = y1 + ih->data->lines.dt[lin].size;
/* If it doesn't have title, the loop just calculate the final position */
if (ih->data->columns.dt[0].size)
{
int marked = iupMatrixLineIsMarked(ih, lin);
iMatrixDrawBackground(ih, x1, x2, y1, y2, marked, active, lin, 0);
iMatrixDrawFrameRectTitle(ih, lin, 0, x1, x2, y1, y2, framecolor, framehighlight);
iMatrixDrawCellValue(ih, x1, x2, y1, y2, alignment, marked, active, lin, 0, draw_cb, framecolor);
}
y1 = y2;
}
cdCanvasClip(ih->data->cd_canvas, CD_CLIPOFF);
}
static int winFileDlgPopup(Ihandle *ih, int x, int y)
{
InativeHandle* parent = iupDialogGetNativeParent(ih);
OPENFILENAME openfilename;
int result, dialogtype;
char *value, *initial_dir=NULL;
TCHAR* extfilter = NULL;
iupAttribSetInt(ih, "_IUPDLG_X", x); /* used in iupDialogUpdatePosition */
iupAttribSetInt(ih, "_IUPDLG_Y", y);
value = iupAttribGetStr(ih, "DIALOGTYPE");
if (iupStrEqualNoCase(value, "SAVE"))
dialogtype = IUP_DIALOGSAVE;
else if (iupStrEqualNoCase(value, "DIR"))
dialogtype = IUP_DIALOGDIR;
else
dialogtype = IUP_DIALOGOPEN;
if (dialogtype == IUP_DIALOGDIR)
{
winFileDlgGetFolder(ih);
return IUP_NOERROR;
}
/* if NOT set will NOT be Modal */
/* anyway it will be modal only relative to its parent */
if (!parent)
parent = GetActiveWindow();
ZeroMemory(&openfilename, sizeof(OPENFILENAME));
openfilename.lStructSize = sizeof(OPENFILENAME);
openfilename.hwndOwner = parent;
value = iupAttribGet(ih, "EXTFILTER");
if (value)
{
int index;
extfilter = winFileDlgStrReplaceSeparator(iupwinStrToSystem(value));
openfilename.lpstrFilter = extfilter;
value = iupAttribGet(ih, "FILTERUSED");
if (iupStrToInt(value, &index))
openfilename.nFilterIndex = index;
else
openfilename.nFilterIndex = 1;
}
else
{
value = iupAttribGet(ih, "FILTER");
if (value)
{
TCHAR *winfo, *wvalue;
int sz1, sz2;
char* info = iupAttribGet(ih, "FILTERINFO");
if (!info)
info = value;
winfo = iupwinStrToSystem(info);
wvalue = iupwinStrToSystem(value);
/* concat FILTERINFO+FILTER */
sz1 = lstrlen(winfo)+1; /* each part has a terminator */
sz2 = lstrlen(wvalue)+1;
extfilter = (TCHAR*)malloc((sz1+sz2+1)*sizeof(TCHAR));
memcpy(extfilter, winfo, sz1*sizeof(TCHAR)); /* copy also the terminator */
memcpy(extfilter+sz1, wvalue, sz2*sizeof(TCHAR));
extfilter[sz1+sz2] = 0; /* additional terminator at the end */
openfilename.lpstrFilter = extfilter;
openfilename.nFilterIndex = 1;
}
}
openfilename.lpstrFile = (TCHAR*)malloc((IUP_MAX_FILENAME_SIZE+1)*sizeof(TCHAR));
value = iupAttribGet(ih, "FILE");
if (value)
{
iupwinStrCopy(openfilename.lpstrFile, value, IUP_MAX_FILENAME_SIZE);
winFileDlgStrReplacePathSlash(openfilename.lpstrFile);
}
else
openfilename.lpstrFile[0] = 0;
openfilename.nMaxFile = IUP_MAX_FILENAME_SIZE;
/* only supports extensions with up to three characters, should NOT include the period */
openfilename.lpstrDefExt = iupwinStrToSystem(iupAttribGet(ih, "EXTDEFAULT"));
initial_dir = iupStrDup(iupAttribGet(ih, "DIRECTORY"));
openfilename.lpstrInitialDir = iupwinStrToSystemFilename(initial_dir);
if (openfilename.lpstrInitialDir)
winFileDlgStrReplacePathSlash((TCHAR*)openfilename.lpstrInitialDir);
openfilename.lpstrTitle = iupwinStrToSystem(iupAttribGet(ih, "TITLE"));
openfilename.Flags = OFN_PATHMUSTEXIST | OFN_HIDEREADONLY;
if (!iupAttribGetBoolean(ih, "NOOVERWRITEPROMPT"))
openfilename.Flags |= OFN_OVERWRITEPROMPT;
if (iupAttribGetBoolean(ih, "SHOWHIDDEN"))
openfilename.Flags |= OFN_FORCESHOWHIDDEN;
value = iupAttribGet(ih, "ALLOWNEW");
if (!value)
{
if (dialogtype == IUP_DIALOGSAVE)
value = "YES";
else
value = "NO";
}
if (iupStrBoolean(value))
openfilename.Flags |= OFN_CREATEPROMPT;
else
openfilename.Flags |= OFN_FILEMUSTEXIST;
if (iupAttribGetBoolean(ih, "NOCHANGEDIR"))
openfilename.Flags |= OFN_NOCHANGEDIR;
if (iupAttribGetBoolean(ih, "MULTIPLEFILES"))
openfilename.Flags |= OFN_ALLOWMULTISELECT;
openfilename.lpfnHook = winFileDlgSimpleHook;
openfilename.Flags |= OFN_ENABLEHOOK | OFN_EXPLORER | OFN_ENABLESIZING;
openfilename.lCustData = (LPARAM)ih;
if (iupAttribGetBoolean(ih, "SHOWPREVIEW") && IupGetCallback(ih, "FILE_CB"))
{
openfilename.Flags |= OFN_ENABLETEMPLATE;
openfilename.hInstance = iupwin_dll_hinstance? iupwin_dll_hinstance: iupwin_hinstance;
openfilename.lpTemplateName = TEXT("iupPreviewDlg");
openfilename.lpfnHook = winFileDlgPreviewHook;
}
if (IupGetCallback(ih, "HELP_CB"))
openfilename.Flags |= OFN_SHOWHELP;
if (dialogtype == IUP_DIALOGOPEN)
result = GetOpenFileName(&openfilename);
else
result = GetSaveFileName(&openfilename);
if (result)
{
if (iupAttribGetBoolean(ih, "MULTIPLEFILES"))
{
/* If there is more than one file, replace terminator by the separator */
if (openfilename.lpstrFile[openfilename.nFileOffset-1] == 0 &&
openfilename.nFileOffset>0)
{
int i = 0;
int count = 0;
char* dir = iupwinStrFromSystemFilename(openfilename.lpstrFile); /* already is the directory, but without the last separator */
iupAttribSetStrf(ih, "DIRECTORY", "%s\\", dir); /* add the last separator */
/* first the path */
iupAttribSetStrId(ih, "MULTIVALUE", count, iupAttribGet(ih, "DIRECTORY")); /* here count=0 always */
count++;
while (openfilename.lpstrFile[i] != 0 || openfilename.lpstrFile[i + 1] != 0)
{
if (openfilename.lpstrFile[i] == 0)
{
iupAttribSetStrId(ih, "MULTIVALUE", count, iupwinStrFromSystemFilename(openfilename.lpstrFile + i + 1));
count++;
openfilename.lpstrFile[i] = TEXT('|');
}
i++;
}
iupAttribSetInt(ih, "MULTIVALUECOUNT", count);
openfilename.lpstrFile[i] = TEXT('|'); /* one last at the end */
iupAttribSetStr(ih, "VALUE", iupwinStrFromSystemFilename(openfilename.lpstrFile)); /* here file was already modified to match the IUP format */
}
else
{
/* if there is only one file selected the returned value is different
and includes just that file */
char* filename = iupwinStrFromSystemFilename(openfilename.lpstrFile);
char* dir = iupStrFileGetPath(filename);
int dir_len = (int)strlen(dir);
iupAttribSetStr(ih, "DIRECTORY", dir);
iupAttribSetStrId(ih, "MULTIVALUE", 0, dir);
iupAttribSetStrId(ih, "MULTIVALUE", 1, filename + dir_len);
iupAttribSetStr(ih, "VALUE", filename); /* here value is not separated by '|' */
iupAttribSetInt(ih, "MULTIVALUECOUNT", 2);
free(dir);
}
iupAttribSet(ih, "STATUS", "0");
iupAttribSet(ih, "FILEEXIST", "YES");
}
else
{
char* filename = iupwinStrFromSystemFilename(openfilename.lpstrFile);
char* dir = iupStrFileGetPath(filename);
iupAttribSetStr(ih, "DIRECTORY", dir);
free(dir);
if (winIsFile(openfilename.lpstrFile)) /* check if file exists */
{
iupAttribSet(ih, "FILEEXIST", "YES");
iupAttribSet(ih, "STATUS", "0");
}
else
{
iupAttribSet(ih, "FILEEXIST", "NO");
iupAttribSet(ih, "STATUS", "1");
}
iupAttribSetStr(ih, "VALUE", filename);
}
iupAttribSetInt(ih, "FILTERUSED", (int)openfilename.nFilterIndex);
}
else
{
iupAttribSet(ih, "FILTERUSED", NULL);
iupAttribSet(ih, "VALUE", NULL);
iupAttribSet(ih, "DIRECTORY", NULL);
iupAttribSet(ih, "FILEEXIST", NULL);
iupAttribSet(ih, "STATUS", "-1");
}
if (extfilter) free(extfilter);
if (initial_dir) free(initial_dir);
if (openfilename.lpstrFile) free(openfilename.lpstrFile);
return IUP_NOERROR;
}
