コード例 #1
0
/*-------------------------------------------------------------------------*/
void qmonPopupManopConfig(Widget w, XtPointer cld, XtPointer cad)
{
   Widget shell;
   lList *alp = NULL;
   
   DENTER(GUI_LAYER, "qmonPopupManopConfig");

   /* set busy cursor */
   XmtDisplayBusyCursor(w);

   /*
   ** create the dialog, if it doesn't exist
   */
   if (!qmon_manop) {
      shell = XmtGetTopLevelShell(w);
      qmon_manop = qmonCreateManopConfig(shell);
      XmtAddDeleteCallback(shell, XmDO_NOTHING, 
                              qmonPopdownManopConfig, NULL);
      XtAddEventHandler(XtParent(qmon_manop), StructureNotifyMask, False, 
                        SetMinShellSize, NULL);
      XtAddEventHandler(XtParent(qmon_manop), StructureNotifyMask, False, 
                        SetMaxShellSize, NULL);
   } 
   
   qmonMirrorMultiAnswer(MANAGER_T | OPERATOR_T | USERSET_T | USER_T, &alp);
   if (alp) {
      qmonMessageBox(w, alp, 0);
      lFreeList(&alp);
      /* set default cursor */
      XmtDisplayDefaultCursor(w);
      DEXIT;
      return;
   }
   qmonTimerAddUpdateProc(USERSET_T, "updateUsersetList", updateUsersetList);
   qmonStartTimer(MANAGER_T | OPERATOR_T | USERSET_T | USER_T);
   qmonManopFillList();

   xmui_manage(qmon_manop);

   /*
   ** switch to userset
   */
   if (cld) {
      XmTabSetTabWidget(manop_folder, userset_layout, True);
   }

   /* set default cursor */
   XmtDisplayDefaultCursor(w);

   DEXIT;
}
コード例 #2
0
ファイル: qmon_queue.c プロジェクト: HPCKP/gridengine
/*-------------------------------------------------------------------------*/
static void qmonQueueStartUpdate(Widget w, XtPointer cld, XtPointer cad)
{
   DENTER(GUI_LAYER, "qmonQueueStartUpdate");
  
   /* 
    * register the update procedure
    * start queue timer for queue info and exechost timer for infos
    * of host that the queue is attached to
    */
   qmonTimerAddUpdateProc(CQUEUE_T, "updateQueueList", updateQueueList);
   qmonStartTimer(CQUEUE_T | EXECHOST_T | CENTRY_T);
   
   DEXIT;
}
コード例 #3
0
/*-------------------------------------------------------------------------*/
void qmonPopupCkptConfig(Widget w, XtPointer cld, XtPointer cad)
{
    Widget shell;
    lList *alp = NULL;

    DENTER(GUI_LAYER, "qmonPopupCkptConfig");

    /* set busy cursor */
    XmtDisplayBusyCursor(w);

    if (!qmon_ckpt) {
        shell = XmtGetTopLevelShell(w);
        qmon_ckpt = qmonCreateCkptConfig(shell);
        XmtAddDeleteCallback(shell, XmDO_NOTHING,
                             qmonPopdownCkptConfig, NULL);
        /*
        ** create ask layout
        */
        ckpt_ask_layout = qmonCreateCkptAsk(qmon_ckpt);

    }
    XSync(XtDisplay(qmon_ckpt), 0);
    XmUpdateDisplay(qmon_ckpt);

    qmonMirrorMultiAnswer(CKPT_T, &alp);
    if (alp) {
        qmonMessageBox(w, alp, 0);
        lFreeList(&alp);
        /* set default cursor */
        XmtDisplayDefaultCursor(w);
        DEXIT;
        return;
    }


    qmonTimerAddUpdateProc(CKPT_T, "updateCkptList", updateCkptList);
    qmonStartTimer(CKPT_T);
    updateCkptList();
    XmListSelectPos(ckpt_names, 1, True);

    XtManageChild(qmon_ckpt);
    XRaiseWindow(XtDisplay(XtParent(qmon_ckpt)), XtWindow(XtParent(qmon_ckpt)));

    /* set default cursor */
    XmtDisplayDefaultCursor(w);

    DEXIT;
}