home *** CD-ROM | disk | FTP | other *** search
/ Skunkware 5 / Skunkware 5.iso / src / X11 / wais / x / filereq.c < prev    next >
Encoding:
C/C++ Source or Header  |  1995-05-09  |  4.4 KB  |  179 lines
  1. /* WIDE AREA INFORMATION SERVER SOFTWARE:
  2.    No guarantees or restrictions.  See the readme file for the full standard
  3.    disclaimer.
  4.  
  5.    This is part of the X user-interface for the WAIS software.  Do with it
  6.    as you please.
  7.  
  8.    jonathan@Think.COM
  9.  *
  10.  * $Log:    filereq.c,v $
  11.  * Revision 1.2  92/04/30  12:21:34  jonathan
  12.  * Added "quit no save" button, and changed the meaning of cancel.
  13.  * 
  14.  * Revision 1.1  92/03/25  18:51:30  jonathan
  15.  * Initial revision
  16.  * 
  17.  */
  18.  
  19. #ifndef lint
  20. static char *RCSid = "$Header: /tmp_mnt/net/quake/proj/wais/wais-8-b5/x/RCS/filereq.c,v 1.2 92/04/30 12:21:34 jonathan Exp $";
  21. #endif
  22.  
  23. #define FILEREQ_C
  24. #include "xwais.h"
  25.  
  26. static Boolean
  27. isdir(name)
  28. char* name;
  29. {
  30.   struct stat stats;
  31.  
  32.   if(stat(name, &stats) < 0) return FALSE;
  33.  
  34.   if(S_ISDIR(stats.st_mode)) return TRUE;
  35.   else return FALSE;
  36. }
  37.  
  38. static int last_file = NO_ITEM_SELECTED;
  39.  
  40. void
  41. SetFileName(w, closure, call_data)
  42. Widget w;
  43. XtPointer closure, call_data;
  44. {
  45.   XawListReturnStruct *l = (XawListReturnStruct*)call_data;
  46.   char dirname[MAX_FILENAME_LEN+1], filename[MAX_FILENAME_LEN+1];
  47.  
  48.   if(!(strcmp(l->string, "."))) return;
  49.   if(!(strcmp(l->string, ".."))) {
  50.     char *slash;
  51.     sprintf(dirname, "%s", GetString(dirnamewidget));
  52.     if(dirname[strlen(dirname)-1] == '/')
  53.       dirname[strlen(dirname)-1] = 0;
  54.     slash = strrchr(dirname, '/');
  55.     if (slash != NULL) *(slash+1) = 0;
  56.     ReplaceText(dirnamewidget, dirname);
  57.     last_file = NO_ITEM_SELECTED;
  58.     SetDir(NULL, NULL, NULL);
  59.     ReplaceText(filenamewidget, "");
  60.     return;
  61.   }
  62.   
  63.   sprintf(dirname, "%s", GetString(dirnamewidget));
  64.   if(dirname[strlen(dirname)-1] != '/')
  65.     strcat(dirname, "/");
  66.  
  67.   sprintf(filename, "%s%s", dirname, l->string);
  68.  
  69.   if(isdir(filename)) {
  70.     strcat(filename, "/");
  71.     ReplaceText(dirnamewidget, filename);
  72.     last_file = NO_ITEM_SELECTED;
  73.     SetDir(NULL, NULL, NULL);
  74.     ReplaceText(filenamewidget, "");
  75.   }
  76.   else {
  77.     if(last_file == l->list_index) {
  78.       last_file = NO_ITEM_SELECTED;
  79.       DoSave(NULL, NULL, NULL);
  80.     }
  81.     else {
  82.       last_file = l->list_index;
  83.       ReplaceText(filenamewidget, l->string);
  84.     }
  85.   }
  86. }
  87.  
  88. void SetDir(w, closure, call_data)
  89. Widget w;
  90. XtPointer closure, call_data;
  91. {
  92.   static char **files = NULL;
  93.   char dirname[MAX_FILENAME_LEN+2];
  94.  
  95.   last_file = NO_ITEM_SELECTED;
  96.  
  97.   if(files != NULL) {
  98.     int i;
  99.     for(i =0; files[i] != NULL; i++) s_free(files[i]);
  100.     free(files);
  101.   }
  102.  
  103.   strncpy(dirname, GetString(dirnamewidget), MAX_FILENAME_LEN);
  104.   if((files = GetDirNames(dirname)) == NULL) {
  105.     pathname_directory(dirname, dirname);
  106.     files = GetDirNames(dirname);
  107.   }
  108.  
  109.   if(dirname[strlen(dirname)-1] != '/')
  110.     strcat(dirname, "/");
  111.   ReplaceText(dirnamewidget, dirname);
  112.  
  113.   RebuildListWidget(savelist, files);
  114. }
  115.  
  116. static void
  117. cancelFile(w, closure, call_data)
  118. Widget w;
  119. XtPointer closure, call_data;
  120. {
  121.   Arg args[1];
  122.   XtPopdown(savereq);
  123.   XtSetArg(args[0], XtNsensitive, False);
  124.   XtSetValues(quitbutton, args, ONE);
  125. }
  126.  
  127. void clearReqButtons()
  128. {
  129.   Arg args[1];
  130.  
  131.   XtSetArg(args[0], XtNlabel, "   Save  ");
  132.   XtSetValues(savebutton, args, ONE);
  133.   XtSetArg(args[0], XtNsensitive, False);
  134.   XtSetValues(quitbutton, args, ONE);
  135. }
  136.  
  137. ScrollList
  138. MakeSaveRequester(parent)
  139. Widget parent;
  140. {
  141.   Widget frame, labelwid, button, view;
  142.   ScrollList result;
  143.   Arg arglist[10];
  144.   Arg args[1];
  145.   Cardinal num_args;
  146.  
  147.   num_args = 0;
  148.   XtSetArg(arglist[num_args], XtNtitle, "Save As"); num_args++;
  149.   XtSetArg(arglist[num_args], XtNiconName, "Save As"); num_args++;
  150.   savereq = XtCreatePopupShell("savereqpopup", applicationShellWidgetClass, 
  151.                   parent, arglist, num_args);
  152.   frame = XtCreateManagedWidget("savereq", formWidgetClass, savereq, NULL, ZERO);
  153.  
  154.   labelwid = MakeLabel(frame, "dirlabel", "Directory", NULL, NULL);
  155.   dirnamewidget = MakeStringBox(frame, "dirbox", "", NULL, NULL);
  156.  
  157.   num_args = 0;
  158.   XtSetArg (arglist[num_args], XtNallowVert, True); num_args++;
  159.  
  160.   view = XtCreateManagedWidget ("fileview", viewportWidgetClass,
  161.                 frame, arglist, num_args);
  162.  
  163.   result = 
  164.     MakeScrollList(view, "fileWindow", NULL, SetFileName, NULL, NULL);
  165.  
  166.   labelwid = MakeLabel(frame, "filelabel", "File Name", NULL, NULL);
  167.   filenamewidget = MakeStringBox(frame, "filebox", "", NULL, NULL);
  168.  
  169.   savebutton = MakeCommandButton(frame, "fileset", setFile,
  170.                  NULL, NULL, NULL);
  171.   cancelbutton = MakeCommandButton(frame, "filecancel", cancelFile,
  172.                    NULL, NULL, NULL);
  173.   quitbutton = MakeCommandButton(frame, "filequit", quitFile,
  174.                    NULL, NULL, NULL);
  175.  
  176.   clearReqButtons();
  177.   return result;
  178. }
  179.