void ok_pop_up	(	Widget	w,
		long	tag,
		unsigned long *	reason
	)

Definition at line 1779 of file did.c.

References Curr_service_id, Curr_service_name, Curr_view_opt_par, dic_cmnd_service(), dic_info_service_stamped(), dic_release_service(), DID_COMMAND, DID_KILL_ALL, did_prepare_command(), DID_SEL_NODE, DID_SEL_SERVICE, DID_SERVICE, DID_SERVICES, get_service_format(), id, no_link_int, ONCE_ONLY, put_selection(), recv_service_info(), show_servers(), and str.

{
Widget id, sel_id;
char *str, *pstr;
void recv_service_info();
void did_prepare_command();
void show_servers();

/*
        if(tag == 5)
        {
                id = (Widget)XmSelectionBoxGetChild(w,XmDIALOG_TEXT);
                str = (char *)XmTextGetString(id);
                if(!str[0])
                {
                        XtFree(str);
                        return;
                }
                if( ( fptr = fopen( str, "w" ) ) == (FILE *)0 )
                {
                printf("Cannot open: %s for writing\n",str);
                        return;
                }                   
                ptr = &Curr_servp->server;
                if (ptr->pid > 0x1000000)
                        fprintf(fptr,"Server %s (pid = %X) on node %s\n    provides %d services :\n",
                        Curr_servp->name, ptr->pid, ptr->node, ptr->n_services);
                else
                        fprintf(fptr,"Server %s (pid = %d) on node %s\n    provides %d services :\n",
                                Curr_servp->name, ptr->pid, ptr->node, ptr->n_services);
                service_ptr = Curr_servp->service_ptr;
                for(i=0;i<ptr->n_services; i++)
                {
                        sprintf(str,service_ptr->name);
                        fprintf(fptr,"        %s\n",service_ptr->name);
                        service_ptr++;
                }               
                fclose(fptr);
                XtFree(str);
                return;
        }
        if(tag == 4)
        {
                sel_id = put_selection(4, "Printing...");
                id = (Widget)XmSelectionBoxGetChild(sel_id,XmDIALOG_HELP_BUTTON);
                XtUnmanageChild(id);

                id = (Widget)XmSelectionBoxGetChild(sel_id,XmDIALOG_APPLY_BUTTON);
                XtUnmanageChild(id);
                id = (Widget)XmSelectionBoxGetChild(sel_id,XmDIALOG_TEXT);
                str = (char *)XmTextGetString(id);
                if(!str[0])
                {
                        XtFree(str);
                        return;
                }
                ptr = &Curr_servp->server;
                if(pstr = strrchr(str,']'))
                        *(++pstr) = '\0';
                if(pstr = strrchr(str,'/'))
                        *(++pstr) = '\0';
                sprintf(txt_str,"%s%s.TXT",str,Curr_servp->name);
                XtFree(str);
                XmTextSetString(id, txt_str);
                return;
        }
*/
        if(reason){}
        if(tag == DID_KILL_ALL)
        {
                dic_cmnd_service("DIS_DNS/KILL_SERVERS",0,0);
                return;
        }
        id = XmSelectionBoxGetChild(w,XmDIALOG_TEXT);
        str = XmTextGetString(id);
        if(!str[0])
        {
                XtFree(str);
                return;
        }
    if ((tag == DID_SEL_NODE) || (tag == DID_SEL_SERVICE)) 
        {
                strcpy(Curr_view_opt_par, str);
                show_servers();
                XtFree(str);
        }
    if(tag == DID_SERVICES)
        {
          pstr = strchr(str,' ');
          if(!pstr)
            {
              strcpy(Curr_service_name, str);
              strcpy(str,"SVC");
            }
          else
            {
              pstr++;
              strcpy(Curr_service_name, pstr);
            }
          if(Curr_service_id)
            {
              dic_release_service(Curr_service_id);
              Curr_service_id = 0;
            }
          if(str[0] == 'S')
            {
              /*
              if((!strstr(pstr,"/SERVICE_LIST")) && 
                 (!strstr(pstr,"/CLIENT_LIST")) &&
                 (!strstr(pstr,"/SERVER_LIST")))
                {
                  Curr_service_id = dic_info_service(Curr_service_name,
                                             MONITORED,5,0,0,
                                             recv_service_info,0,
                                                     &no_link_int,4);
                }
              else
                {
              */
              dic_info_service_stamped(Curr_service_name,
                                                         ONCE_ONLY,10,0,0,
                                             recv_service_info,0,
                                                     &no_link_int,4);
                  /*
                }
                  */
              put_selection(DID_SERVICE,"Service Contents");
            }
          else
            {
              get_service_format();
              sel_id = put_selection(DID_COMMAND,"Send Command");
              id = XmSelectionBoxGetChild(sel_id,XmDIALOG_HELP_BUTTON);
              XtUnmanageChild(id);
              id = XmSelectionBoxGetChild(sel_id,XmDIALOG_APPLY_BUTTON);
              XtUnmanageChild(id);
              id = XmSelectionBoxGetChild(sel_id,XmDIALOG_LIST);
              /*
              XtUnmanageChild(id);
              */
              XtUnmapWidget(id);
            }
          XtFree(str);
        }
    if(tag == DID_COMMAND)
        {
          did_prepare_command(str);
          XtFree(str);
        }
}

Here is the call graph for this function: