/*-------------------------------------------------------------------------*/
static void DeleteLines(Widget w, XtPointer cld, XtPointer cad)
{
Widget matrix = (Widget) cld;
int rows;
int i;
int rows_to_delete = 0;
int rows_old;
int max_rows = 7;
DENTER(GUI_LAYER, "DeleteLines");
if (!matrix) {
DEXIT;
return;
}
/* max_rows = XbaeMatrixVisibleRows(matrix); */
rows = rows_old = XbaeMatrixNumRows(matrix);
for (i=0; i<rows; i++)
if (XbaeMatrixIsRowSelected(matrix, i))
rows_to_delete++;
i = 0;
while (i<rows) {
if (XbaeMatrixIsRowSelected(matrix, i)) {
XbaeMatrixDeleteRows(matrix, i, 1);
rows--;
}
else
i++;
}
if ((rows_old - rows_to_delete) < max_rows)
XbaeMatrixAddRows(matrix, rows, NULL, NULL, NULL, (max_rows - rows));
/* reset attribute line */
XbaeMatrixDeselectAll(matrix);
/* refresh the matrix */
XbaeMatrixRefresh(matrix);
DEXIT;
}
void update_cells(Widget w, XtPointer client_data, XtPointer call_data)
/*
* redo frame since number of data points or set type, etc., may change
*/
{
EditPoints *ep = (EditPoints *)client_data;
int i, j, nr, nc;
short width;
char buf[32];
ep->nrows = getsetlength(ep->gno, ep->setno);
switch (dataset_type(ep->gno, ep->setno)) {
case SET_XY:
ep->collabels = labels1;
break;
case SET_XYDX:
ep->collabels = labels2;
break;
case SET_XYDY:
ep->collabels = labels3;
break;
case SET_XYDXDX:
ep->collabels = labels4;
break;
case SET_XYDYDY:
ep->collabels = labels5;
break;
case SET_XYDXDY:
ep->collabels = labels6;
break;
case SET_XYZ:
ep->collabels = labels7;
break;
case SET_XYHILO:
ep->collabels = labels8;
break;
case SET_XYRT:
ep->collabels = labels9;
break;
}
switch (dataset_type(ep->gno, ep->setno)) {
case SET_XY:
ep->ncols = 2;
break;
case SET_XYDX:
case SET_XYDY:
case SET_XYZ:
case SET_POLY:
ep->ncols = 3;
break;
case SET_XYDXDX:
case SET_XYDYDY:
case SET_XYDXDY:
case SET_XYZW:
case SET_XYRT:
case SET_XYUV:
case SET_XYYY:
case SET_XYXX:
ep->ncols = 4;
break;
case SET_XYHILO:
case SET_XYBOX:
ep->ncols = 5;
break;
case SET_XYBOXPLOT:
ep->ncols = 6;
break;
}
cells = MakeCells( ep );
rowlabels = (String *) malloc(ep->nrows * sizeof(String));
for (i = 0; i < ep->nrows; i++) {
sprintf(buf, "%d", i + 1);
rowlabels[i] = (String) malloc((sizeof(buf) + 1) * sizeof(char));
strcpy(rowlabels[i], buf);
}
width = (short) ceil(log10(i))+2; /* increase row label width by 1 */
/* get current size of widget */
XtVaGetValues( ep->mw, XmNcolumns, &nc,
XmNrows, &nr,
NULL );
if( ep->nrows > nr )
XbaeMatrixAddRows( ep->mw, 0, NULL, NULL, NULL, ep->nrows-nr );
else if( ep->nrows < nr )
XbaeMatrixDeleteRows( ep->mw, 0, nr - ep->nrows );
if( ep->ncols > nc )
XbaeMatrixAddColumns( ep->mw, 0, NULL, NULL, widths, NULL,
NULL, NULL, NULL, ep->ncols-nc );
else if( ep->ncols < nc )
XbaeMatrixDeleteColumns( ep->mw, 0, nc - ep->ncols );
XtVaSetValues(ep->mw, XmNrowLabels, rowlabels,
XmNcells, cells,
XmNcolumnLabels, ep->collabels,
XmNrowLabelWidth, width,
NULL);
/* free memory used to hold strings */
for (i = 0; i < ep->nrows; i++) {
for (j = 0; j < ep->ncols; j++) {
XtFree((XtPointer) cells[i][j]);
}
XtFree((XtPointer) cells[i]);
free( rowlabels[i] );
}
XtFree((XtPointer) cells);
}
void matrix_label(struct dsc$descriptor_s *label_dsc, int *nlab)
{
char *label = label_dsc->dsc$a_pointer;
#else
void matrix_label(char *label, int *nlab)
{
#endif
Widget clip;
int i, old_nrows;
char **labels, **rlab, *s, lab[MAXLAB+1];
unsigned char *ca;
short *cw;
if (ntuple_id == 0) return;
ncols = *nlab;
old_nrows = nrows;
nrows = 0;
s = label;
labels = (char **) XtMalloc(ncols * sizeof(char *));
rlab = (char **) XtMalloc(1 * sizeof(char *));
cw = (short *) XtMalloc(ncols * sizeof(short));
ca = (unsigned char *) XtMalloc(ncols * sizeof(unsigned char));
for (i = 0; i < ncols; i++) {
strncpy(lab, s, MAXLAB); lab[MAXLAB] = '\0';
labels[i] = km_strip(lab);
cw[i] = 15;
ca[i] = XmALIGNMENT_CENTER;
s += MAXLAB;
}
/* empty row label */
rlab[0] = XtMalloc(2);
strcpy(rlab[0], " ");
if (!matrix) {
/*
* Create a Matrix widget
*/
matrix = XtVaCreateManagedWidget("matrix",
xbaeMatrixWidgetClass, ntupleScan,
XmNleftOffset, 5,
XmNleftAttachment, XmATTACH_FORM,
XmNrightOffset, 5,
XmNrightAttachment, XmATTACH_FORM,
XmNtopWidget, separatorGadget5,
XmNtopOffset, 5,
XmNtopAttachment, XmATTACH_WIDGET,
XmNbottomWidget, separatorGadget4,
XmNbottomOffset, 5,
XmNbottomAttachment, XmATTACH_WIDGET,
XmNcolumnLabels, labels,
XmNcolumnWidths, cw,
XmNcolumnLabelAlignments, ca,
XmNcolumns, ncols,
XmNrowLabels, rlab,
XmNrowLabelWidth, (short) 6,
XmNrows, 1,
NULL);
/* overridebtranslation table, also for clip widget */
XtOverrideTranslations(matrix,
XtParseTranslationTable(translation_table));
clip = XtNameToWidget(matrix, "clip");
if (clip)
XtOverrideTranslations(clip,
XtParseTranslationTable(translation_table));
/* install some callbacks */
XtAddCallback(matrix, XmNenterCellCallback,
(XtCallbackProc)matrix_enter_cb, NULL);
XtAddCallback(matrix, XmNselectCellCallback,
(XtCallbackProc)matrix_select_cb, NULL);
} else {
XbaeMatrixDeleteRows(matrix, 1, old_nrows-1);
for (i = 0; i < ncols; i++)
XbaeMatrixSetCell(matrix, 0, i, " ");
XtVaSetValues(matrix, XmNrowLabels, rlab, NULL);
}
for (i = 0; i < ncols; i++)
XtFree(labels[i]);
XtFree(rlab[0]);
XtFree((char *) labels);
XtFree((char *) rlab);
XtFree((char *) cw);
XtFree((char *) ca);
}
/* options_menu initialisation procedure */
void options_menu_init(
Widget topl)
{
Widget widget;
String filestr, dirstr;
char lineBuf[1024], fileBuf[512], dateBuf[64];
char authorBuf[64], stageBuf[16];
MAPaintExpressMapStatus status;
MAPaintExpressMapQuality quality;
int bibfileStartIndex=0;
/* create the tool controls dialog */
tool_controls_dialog = create_tool_controls_dialog( topl );
/* create the surgery controls dialog */
surgeryDialog = createDomainSurgeryDialog( topl );
XtManageChild( surgeryDialog );
HGU_XmSaveRestoreAddWidget( surgeryDialog, NULL, NULL, NULL, NULL );
/* create the review controls dialog */
reviewDialog = createDomainReviewDialog( topl );
XtManageChild( reviewDialog );
HGU_XmSaveRestoreAddWidget( reviewDialog, NULL, NULL, NULL, NULL );
/* create the colormap controls */
colormap_dialog = create_colormap_dialog( topl );
XtManageChild( colormap_dialog );
HGU_XmSaveRestoreAddWidget( colormap_dialog, NULL, NULL, NULL, NULL );
/* get option menu resources */
XtGetApplicationResources(globals.topl, &globals,
autosave_res, XtNumber(autosave_res),
NULL, 0);
/* add an autosave timeout */
filestr = globals.autosave_file;
dirstr = globals.autosave_dir;
if( strlen(dirstr) < 1 ){
globals.autosave_file = (String)
AlcMalloc(sizeof(char) * (strlen(filestr) + 16 ));
sprintf(globals.autosave_file, "%s.%d", filestr, getpid());
}
else {
globals.autosave_file = (String)
AlcMalloc(sizeof(char) * (strlen(dirstr) + strlen(filestr) + 16 ));
sprintf(globals.autosave_file, "%s/%s.%d", dirstr, filestr, getpid());
}
/* no autosave in sectionView mode */
if( globals.sectViewFlg ){
globals.autosavetimeoutID = 0;
}
else {
globals.autosavetimeoutID =
XtAppAddTimeOut(globals.app_con, globals.autosave_time*1000,
autosavetimeout_cb, NULL);
}
/* create the autosave controls */
autosave_dialog = create_autosave_dialog( topl );
XtManageChild( autosave_dialog );
HGU_XmSaveRestoreAddWidget( autosave_dialog, NULL, NULL, NULL, NULL );
globals.stipple = (Pixmap) 0;
globals.paint_action_quit_flag = 0;
globals.currentPaintAction = MAPAINT_PAINT_BALL_2D;
globals.currentPaintActionCbFunc = MAPaintPaintBall2DCb;
globals.currentPaintActionInitFunc = MAPaintPaintBall2DInit;
globals.currentPaintActionQuitFunc = MAPaintPaintBall2DQuit;
globals.review_domain_obj = NULL;
/* remove the editing options in sectionView mode */
if( globals.sectViewFlg ){
char nameBuf[64];
int i;
for(i=0; options_menu_itemsP[i].name != NULL; i++){
if( strstr(options_menu_itemsP[i].name, "colormap") ){
continue;
}
else if( options_menu_itemsP[i].name ){
sprintf(nameBuf, "*.options_menu*%s",
options_menu_itemsP[i].name);
if((widget = XtNameToWidget(topl, nameBuf))){
XtSetSensitive(widget, False);
}
}
}
}
/* create the save sequence controls */
save_seq_dialog = create_save_seq_dialog( topl );
XtManageChild( save_seq_dialog );
HGU_XmSaveRestoreAddWidget( save_seq_dialog, NULL, NULL, NULL, NULL );
/* get the current working directory */
if((dirstr = getcwd(lineBuf, 256))){
globals.origDir = AlcStrDup(dirstr);
}
else {
globals.origDir = NULL;
}
/* check for rapid-map or express-map */
if( globals.rapidMapFlg || globals.expressMapFlg ){
/* check for bibfile list file */
if( globals.bibfileListFile ){
FILE *fp;
int i, j, linecount, csvCount;
WlzObject *dummyObj;
WlzPixelV bgdV;
Widget toggle, notebook, matrix, textField;
XmNotebookPageInfo pageInfo;
XmToggleButtonCallbackStruct cbs;
/* set the default csv file */
if( globals.bibfileListFile[0] == '/' ){
if( strstr(globals.bibfileListFile, ".csv") ){
sprintf(lineBuf, "%s", globals.bibfileListFile);
}
else {
sprintf(lineBuf, "%s.csv", globals.bibfileListFile);
}
}
else {
if( strstr(globals.bibfileListFile, ".csv") ){
sprintf(lineBuf, "%s/%s", globals.origDir, globals.bibfileListFile);
}
else {
sprintf(lineBuf, "%s/%s.csv", globals.origDir, globals.bibfileListFile);
}
}
warpGlobals.bibfileListCSVFile = AlcStrDup(lineBuf);
/* read file and create lists */
if((fp = fopen(globals.bibfileListFile, "r"))){
/* count lines */
linecount = 1;
while( fgets(lineBuf, 1024, fp) ){
linecount++;
}
warpGlobals.bibfileList = (char **) AlcCalloc(linecount, sizeof(char *));
warpGlobals.statusList = (MAPaintExpressMapStatus *)
AlcCalloc(linecount, sizeof(MAPaintExpressMapStatus));
warpGlobals.dateList = (char **) AlcCalloc(linecount, sizeof(char *));
warpGlobals.authorList = (char **) AlcCalloc(linecount, sizeof(char *));
warpGlobals.stageList = (char **) AlcCalloc(linecount, sizeof(char *));
warpGlobals.qualityList = (MAPaintExpressMapQuality *)
AlcCalloc(linecount, sizeof(MAPaintExpressMapQuality));
rewind(fp);
linecount = 0;
while( fgets(lineBuf, 1024, fp) ){
int statusTmp, qualityTmp;
csvCount = sscanf(lineBuf, "%[^,\n], %d, %[^,\n], %[^,\n], %[^,\n], %d", fileBuf,
&statusTmp, dateBuf, authorBuf, stageBuf, &qualityTmp);
status = statusTmp;
quality = qualityTmp;
if( csvCount > 0 ){
if((fileBuf[0] != '/') && globals.origDir ){
warpGlobals.bibfileList[linecount] =
(char *) AlcMalloc(sizeof(char)*
(strlen(fileBuf) +
strlen(globals.origDir) + 4));
sprintf(warpGlobals.bibfileList[linecount],
"%s/%s", globals.origDir, fileBuf);
}
else {
warpGlobals.bibfileList[linecount] = AlcStrDup(fileBuf);
}
}
if( csvCount > 1 ){
warpGlobals.statusList[linecount] = status;
}
else {
warpGlobals.statusList[linecount] = MA_EXPRESSMAP_STATUS_NONE;
}
if( csvCount > 2 ){
warpGlobals.dateList[linecount] = AlcStrDup(dateBuf);
}
else {
warpGlobals.dateList[linecount] = AlcStrDup("Unknown");
}
if( csvCount > 3 ){
warpGlobals.authorList[linecount] = AlcStrDup(authorBuf);
}
else {
warpGlobals.authorList[linecount] = AlcStrDup("Unknown");
}
if( csvCount > 4 ){
warpGlobals.stageList[linecount] = AlcStrDup(stageBuf);
}
else {
warpGlobals.stageList[linecount] = AlcStrDup("TS23");
}
if( csvCount > 5 ){
warpGlobals.qualityList[linecount] = quality;
}
else {
warpGlobals.qualityList[linecount] = MA_EXPRESSMAP_QUALITY_NONE;
}
linecount++;
}
warpGlobals.bibfileListCount = linecount;
fclose(fp);
}
/* create dummy reference object and install */
bgdV.type = WLZ_GREY_UBYTE;
bgdV.v.ubv = 255;
dummyObj = WlzAssignObject(WlzMakeCuboid(0, 5, 0, 5, 0, 5,
WLZ_GREY_UBYTE, bgdV,
NULL, NULL, NULL), NULL);
set_topl_title("dummy");
globals.file = NULL;
globals.origObjType = WLZ_3D_DOMAINOBJ;
install_paint_reference_object(dummyObj);
WlzFreeObj(dummyObj);
/* create warp input dialog */
warpInput2DCb(globals.topl, NULL, NULL);
/* get the warp controls toggle */
if((toggle = XtNameToWidget(globals.topl, "*warp_input_2d_frame_title"))){
XtVaSetValues(toggle, XmNset, True, NULL);
cbs.set = True;
XtCallCallbacks(toggle, XmNvalueChangedCallback, &cbs);
}
/* set the files names etc in the table widget */
if((matrix = XtNameToWidget(globals.topl, "*expressmap_matrix"))){
String *rows, bibfileStr, tailStr, *labels;
int numRows;
Boolean *rowButtonLabels;
XtVaGetValues(matrix,
XmNrows, &numRows,
XmNtextField, &textField,
NULL);
if( numRows > 0 ){
XbaeMatrixDeleteRows(matrix, 0, numRows);
}
rows = (String *) AlcMalloc(sizeof(String) * warpGlobals.bibfileListCount * 6);
labels = (String *) AlcMalloc(sizeof(String) * warpGlobals.bibfileListCount);
rowButtonLabels = (Boolean *)AlcMalloc(sizeof(Boolean) *
warpGlobals.bibfileListCount);
bibfileStartIndex = -1;
for(i=0; i < warpGlobals.bibfileListCount; i++){
bibfileStr = tailStr = warpGlobals.bibfileList[i];
for(j=0; j < strlen(bibfileStr); j++){
if( bibfileStr[j] == '/' ){
tailStr = bibfileStr + (j + 1);
}
}
rows[i*6 + 0] = tailStr;
rows[i*6 + 1] = expressMapStatusStrs[warpGlobals.statusList[i]];
rows[i*6 + 2] = warpGlobals.dateList[i];
rows[i*6 + 3] = warpGlobals.authorList[i];
rows[i*6 + 4] = warpGlobals.stageList[i];
rows[i*6 + 5] = expressMapQualityStrs[warpGlobals.qualityList[i]];
labels[i] = "->";
rowButtonLabels[i] = True;
/* check for first "None" */
if((bibfileStartIndex == -1) &&
(warpGlobals.statusList[i] == MA_EXPRESSMAP_STATUS_NONE)){
bibfileStartIndex = i;
}
}
XbaeMatrixAddRows(matrix, 0, rows, labels, NULL, i);
for(i=0; i < warpGlobals.bibfileListCount; i++){
XbaeMatrixSetRowUserData(matrix, i, (XtPointer) (long) i);
}
XtVaSetValues(matrix,
XmNbuttonLabels, True,
XmNrowButtonLabels, rowButtonLabels,
XmNrowLabelAlignment, XmALIGNMENT_CENTER,
NULL);
AlcFree(rows);
AlcFree(labels);
AlcFree(rowButtonLabels);
XtVaSetValues(textField, XmNeditable, False, NULL);
}
/* set rapidMap mode */
if( globals.rapidMapFlg ){
if((notebook = XtNameToWidget(globals.topl,
"*warp_cntrl_notebook"))){
XtVaSetValues(notebook,
XmNcurrentPageNumber, 2,
NULL);
/* call the activate callback */
if( XmNotebookGetPageInfo(notebook, 2,
&pageInfo) == XmPAGE_FOUND ){
XmPushButtonCallbackStruct cbs;
cbs.reason = XmCR_ACTIVATE;
cbs.event = NULL;
cbs.click_count = 1;
XtCallCallbacks(pageInfo.major_tab_widget,
XmNactivateCallback, &cbs);
}
}
}
else {
if((notebook = XtNameToWidget(globals.topl,
"*warp_cntrl_notebook"))){
XtVaSetValues(notebook,
XmNcurrentPageNumber, 3,
NULL);
/* call the activate callback */
if( XmNotebookGetPageInfo(notebook, 3,
&pageInfo) == XmPAGE_FOUND ){
XmPushButtonCallbackStruct cbs;
cbs.reason = XmCR_ACTIVATE;
cbs.event = NULL;
cbs.click_count = 1;
XtCallCallbacks(pageInfo.major_tab_widget,
XmNactivateCallback, &cbs);
}
}
}
/* read first bibfile */
warpGlobals.bibfileSavedFlg = 1;
if( bibfileStartIndex < 0 ){
bibfileStartIndex = 0;
}
warpGlobals.bibfileListIndex = bibfileStartIndex - 1;
if( globals.rapidMapFlg ){
if((toggle = XtNameToWidget(globals.topl, "*warp_input_rapid_form*next"))){
XtCallCallbacks(toggle, XmNactivateCallback, NULL);
}
}
else {
if((toggle = XtNameToWidget(globals.topl, "*warp_input_express_form*next"))){
XtCallCallbacks(toggle, XmNactivateCallback, NULL);
}
}
}
else {
warpGlobals.bibfileListCSVFile = NULL;
/* should report an error here */
}
}
else {
warpGlobals.matrix = NULL;
}
return;
}
