home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / x / volume13 / xdtm / part05 < prev    next >
Text File  |  1991-05-18  |  40KB  |  1,132 lines
  1. Path: uunet!olivea!apple!sun-barr!newstop!exodus!cogs.sussex.ac.uk
  2. From: eddyg@cogs.sussex.ac.uk (EdwardJ. Groenendaal)
  3. Newsgroups: comp.sources.x
  4. Subject: v13i010: xdtm - X Desktop Manager for the X Window System, Part05/11
  5. Message-ID: <13574@exodus.Eng.Sun.COM>
  6. Date: 19 May 91 00:03:04 GMT
  7. References: <csx-13i006:xdtm@uunet.UU.NET>
  8. Sender: news@exodus.Eng.Sun.COM
  9. Lines: 1120
  10. Approved: argv@sun.com
  11.  
  12. Submitted-by: Edward "J." Groenendaal <eddyg@cogs.sussex.ac.uk>
  13. Posting-number: Volume 13, Issue 10
  14. Archive-name: xdtm/part05
  15.  
  16. Submitted-by: eddyg@cste
  17. Archive-name: xdtm/part05
  18.  
  19. ---- Cut Here and feed the following to sh ----
  20. #!/bin/sh
  21. # This is part 05 of xdtm
  22. # ============= xdtm/bitmaps/file.icon ==============
  23. if test ! -d 'xdtm'; then
  24.     echo 'x - creating directory xdtm'
  25.     mkdir 'xdtm'
  26. fi
  27. if test ! -d 'xdtm/bitmaps'; then
  28.     echo 'x - creating directory xdtm/bitmaps'
  29.     mkdir 'xdtm/bitmaps'
  30. fi
  31. if test -f 'xdtm/bitmaps/file.icon' -a X"$1" != X"-c"; then
  32.     echo 'x - skipping xdtm/bitmaps/file.icon (File already exists)'
  33. else
  34. echo 'x - extracting xdtm/bitmaps/file.icon (Text)'
  35. sed 's/^X//' << 'SHAR_EOF' > 'xdtm/bitmaps/file.icon' &&
  36. X#define file_width 32
  37. X#define file_height 32
  38. Xstatic char file_bits[] = {
  39. X   0xf0, 0xff, 0x7f, 0x00, 0x10, 0x00, 0xc0, 0x00, 0x10, 0x00, 0x40, 0x01,
  40. X   0x10, 0x00, 0x40, 0x02, 0x10, 0x00, 0x40, 0x04, 0x10, 0x00, 0xc0, 0x0f,
  41. X   0x10, 0x00, 0x00, 0x08, 0x10, 0x00, 0x00, 0x08, 0x10, 0x00, 0x00, 0x08,
  42. X   0x10, 0x00, 0x00, 0x08, 0x10, 0x00, 0x00, 0x08, 0x10, 0x00, 0x00, 0x08,
  43. X   0x10, 0x00, 0x00, 0x08, 0x10, 0x00, 0x00, 0x08, 0x10, 0x00, 0x00, 0x08,
  44. X   0x10, 0x00, 0x00, 0x08, 0x10, 0x00, 0x00, 0x08, 0x10, 0x00, 0x00, 0x08,
  45. X   0x10, 0x00, 0x00, 0x08, 0x10, 0x00, 0x00, 0x08, 0x10, 0x00, 0x00, 0x08,
  46. X   0x10, 0x00, 0x00, 0x08, 0x10, 0x00, 0x00, 0x08, 0x10, 0x00, 0x00, 0x08,
  47. X   0x10, 0x00, 0x00, 0x08, 0x10, 0x00, 0x00, 0x08, 0x10, 0x00, 0x00, 0x08,
  48. X   0x10, 0x00, 0x00, 0x08, 0x10, 0x00, 0x00, 0x08, 0x10, 0x00, 0x00, 0x08,
  49. X   0x10, 0x00, 0x00, 0x08, 0xf0, 0xff, 0xff, 0x0f};
  50. SHAR_EOF
  51. chmod 0644 xdtm/bitmaps/file.icon ||
  52. echo 'restore of xdtm/bitmaps/file.icon failed'
  53. Wc_c="`wc -c < 'xdtm/bitmaps/file.icon'`"
  54. test 875 -eq "$Wc_c" ||
  55.     echo 'xdtm/bitmaps/file.icon: original size 875, current size' "$Wc_c"
  56. fi
  57. # ============= xdtm/bitmaps/folder.icon ==============
  58. if test -f 'xdtm/bitmaps/folder.icon' -a X"$1" != X"-c"; then
  59.     echo 'x - skipping xdtm/bitmaps/folder.icon (File already exists)'
  60. else
  61. echo 'x - extracting xdtm/bitmaps/folder.icon (Text)'
  62. sed 's/^X//' << 'SHAR_EOF' > 'xdtm/bitmaps/folder.icon' &&
  63. X#define folder_width 32
  64. X#define folder_height 32
  65. Xstatic char folder_bits[] = {
  66. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  67. X   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  68. X   0x00, 0x00, 0xf8, 0x03, 0x00, 0x00, 0x04, 0x04, 0x00, 0x00, 0x02, 0x08,
  69. X   0xfe, 0xff, 0xff, 0x7f, 0x02, 0x00, 0x00, 0x40, 0x02, 0x00, 0x00, 0x40,
  70. X   0x02, 0x00, 0x00, 0x40, 0x02, 0x00, 0x00, 0x40, 0x02, 0x00, 0x00, 0x40,
  71. X   0x02, 0x00, 0x00, 0x40, 0x02, 0x00, 0x00, 0x40, 0x02, 0x00, 0x00, 0x40,
  72. X   0x02, 0x00, 0x00, 0x40, 0x02, 0x00, 0x00, 0x40, 0x02, 0x00, 0x00, 0x40,
  73. X   0x02, 0x00, 0x00, 0x40, 0x02, 0x00, 0x00, 0x40, 0x02, 0x00, 0x00, 0x40,
  74. X   0x02, 0x00, 0x00, 0x40, 0x02, 0x00, 0x00, 0x40, 0x02, 0x00, 0x00, 0x40,
  75. X   0x02, 0x00, 0x00, 0x40, 0x02, 0x00, 0x00, 0x40, 0x02, 0x00, 0x00, 0x40,
  76. X   0xfe, 0xff, 0xff, 0x7f, 0x00, 0x00, 0x00, 0x00};
  77. SHAR_EOF
  78. chmod 0644 xdtm/bitmaps/folder.icon ||
  79. echo 'restore of xdtm/bitmaps/folder.icon failed'
  80. Wc_c="`wc -c < 'xdtm/bitmaps/folder.icon'`"
  81. test 881 -eq "$Wc_c" ||
  82.     echo 'xdtm/bitmaps/folder.icon: original size 881, current size' "$Wc_c"
  83. fi
  84. # ============= xdtm/bitmaps/xdtm.xbm ==============
  85. if test -f 'xdtm/bitmaps/xdtm.xbm' -a X"$1" != X"-c"; then
  86.     echo 'x - skipping xdtm/bitmaps/xdtm.xbm (File already exists)'
  87. else
  88. echo 'x - extracting xdtm/bitmaps/xdtm.xbm (Text)'
  89. sed 's/^X//' << 'SHAR_EOF' > 'xdtm/bitmaps/xdtm.xbm' &&
  90. X/* This X bitmap is designed for use with the X Desktop Manager.
  91. X * it was designed by Edward Groenendaal, April 1991.
  92. X */
  93. X#define xdtm_width 32
  94. X#define xdtm_height 32
  95. Xstatic char xdtm_bits[] = {
  96. X   0x00, 0x00, 0x00, 0x00, 0xfe, 0xff, 0xff, 0x7f, 0x4a, 0x06, 0x00, 0x58,
  97. X   0xfe, 0xff, 0xff, 0x7f, 0x02, 0x08, 0x10, 0x40, 0x02, 0x88, 0xff, 0x43,
  98. X   0x02, 0x88, 0x10, 0x42, 0xfe, 0xcf, 0x39, 0x47, 0x02, 0x48, 0x29, 0x45,
  99. X   0xe2, 0xc8, 0x39, 0x47, 0xa2, 0x88, 0x00, 0x42, 0xa2, 0xf8, 0x07, 0x42,
  100. X   0xe2, 0x88, 0x04, 0x42, 0x02, 0xf8, 0xff, 0x7f, 0xfa, 0x0b, 0x00, 0x40,
  101. X   0x02, 0xe8, 0x9c, 0x43, 0xe2, 0xa8, 0x94, 0x42, 0xa2, 0xa8, 0x94, 0x42,
  102. X   0xa2, 0xe8, 0x9c, 0x43, 0xe2, 0x08, 0x00, 0x40, 0x02, 0xe8, 0xb6, 0x43,
  103. X   0x7a, 0x0b, 0x00, 0x40, 0x02, 0xe8, 0x9c, 0x43, 0x02, 0xa8, 0x94, 0x42,
  104. X   0x02, 0xa8, 0x94, 0x42, 0x02, 0xe8, 0x9c, 0x43, 0xfe, 0x0f, 0x00, 0x40,
  105. X   0x92, 0xec, 0x9c, 0x43, 0x92, 0x0c, 0x00, 0x40, 0x92, 0x0c, 0x00, 0x40,
  106. X   0xfe, 0xff, 0xff, 0x7f, 0x00, 0x00, 0x00, 0x00};
  107. SHAR_EOF
  108. chmod 0644 xdtm/bitmaps/xdtm.xbm ||
  109. echo 'restore of xdtm/bitmaps/xdtm.xbm failed'
  110. Wc_c="`wc -c < 'xdtm/bitmaps/xdtm.xbm'`"
  111. test 998 -eq "$Wc_c" ||
  112.     echo 'xdtm/bitmaps/xdtm.xbm: original size 998, current size' "$Wc_c"
  113. fi
  114. # ============= xdtm/buttons.c ==============
  115. if test -f 'xdtm/buttons.c' -a X"$1" != X"-c"; then
  116.     echo 'x - skipping xdtm/buttons.c (File already exists)'
  117. else
  118. echo 'x - extracting xdtm/buttons.c (Text)'
  119. sed 's/^X//' << 'SHAR_EOF' > 'xdtm/buttons.c' &&
  120. X/*****************************************************************************
  121. X ** File          : buttons.c                                               **
  122. X ** Purpose       : Initialise and Realise button dialogs                   **
  123. X ** Author        : Edward Groenendaal                                      **
  124. X ** Date          : April 1991                                              **
  125. X ** Documentation : Xdtm Design Folder                                      **
  126. X ** Related Files :                                                         **
  127. X *****************************************************************************/
  128. X
  129. X#include "xdtm.h"
  130. X#include "menus.h"
  131. X
  132. X#include <X11/Shell.h>
  133. X#include <X11/Xaw/Label.h>
  134. X#include <X11/Xaw/Command.h>
  135. X#include <X11/Xaw/Viewport.h>
  136. X#include "Xedw/XedwForm.h"
  137. X#include "Xedw/XedwList.h"
  138. X
  139. Xextern void realize_dialog(Widget);
  140. X
  141. X/* Widgets */
  142. X
  143. Xprivate Widget buttonpopup;     /* For confermation of move/copy/trash buttons */
  144. Xprivate Widget buttonform;
  145. Xprivate Widget buttonlabel1;
  146. Xprivate Widget buttonlabel2;
  147. Xprivate Widget buttonyes;
  148. Xprivate Widget buttonno;
  149. Xprivate Widget fileview;
  150. Xprivate Widget filelist;
  151. X
  152. X/*****************************************************************************
  153. X *                             init_button                                   *
  154. X *****************************************************************************/
  155. Xpublic void init_button(Widget top)
  156. X{
  157. X  /* initialise the widget which display's a list of filenames with a message
  158. X   * and a couple of buttons.
  159. X   */
  160. X
  161. X  Arg arglist[5];
  162. X  Cardinal i;
  163. X  XtTranslations translations;
  164. X  Dimension height, space;
  165. X  XFontStruct *font;
  166. X
  167. X  buttonpopup  =   XtCreatePopupShell("buttonpopup",
  168. X                      transientShellWidgetClass,
  169. X                      top,
  170. X                      NULL, 0);
  171. X
  172. X
  173. X  buttonform    =   XtCreateManagedWidget("buttonform",
  174. X                      xedwFormWidgetClass,
  175. X                      buttonpopup,
  176. X                      NULL, 0);
  177. X
  178. X  i = 0;
  179. X  XtSetArg(arglist[i], XtNjustify, XtJustifyCenter);  i++;
  180. X  XtSetArg(arglist[i], XtNfullWidth,          True);  i++;
  181. X  XtSetArg(arglist[i], XtNborderWidth,           0); i++;
  182. X  buttonlabel1  =   XtCreateManagedWidget("buttonlabel1",
  183. X                      labelWidgetClass,
  184. X                      buttonform,
  185. X                      arglist, i);
  186. X
  187. X  i = 3;
  188. X  XtSetArg(arglist[i], XtNfromVert,   buttonlabel1);  i++; 
  189. X  buttonlabel2  =   XtCreateManagedWidget("buttonlabel2",
  190. X                      labelWidgetClass,
  191. X                      buttonform,
  192. X                      arglist, i);
  193. X
  194. X  i = 0;
  195. X  XtSetArg(arglist[i], XtNfromVert, buttonlabel2);  i++; 
  196. X  XtSetArg(arglist[i], XtNfullWidth,        True);  i++;
  197. X  XtSetArg(arglist[i], XtNforceBars,        True);  i++;
  198. X  XtSetArg(arglist[i], XtNallowVert,        True);  i++;
  199. X  fileview = XtCreateManagedWidget("fileview",
  200. X                   viewportWidgetClass,
  201. X                   buttonform,
  202. X                   arglist, i);
  203. X
  204. X  translations = XtParseTranslationTable("");
  205. X  i = 0;
  206. X  XtSetArg(arglist[i], XtNdefaultColumns,  1); i++;
  207. X  XtSetArg(arglist[i], XtNforceColumns, True); i++;
  208. X  XtSetArg(arglist[i], XtNrowSpacing,      4); i++;
  209. X  XtSetArg(arglist[i], XtNtranslations, translations); i++;
  210. X  filelist = XtCreateManagedWidget("filelist",
  211. X                   xedwListWidgetClass,
  212. X                   fileview,
  213. X                   arglist, i);
  214. X
  215. X
  216. X  /* Get font height from filelist, then set fileview to be 5 times that
  217. X   * size.
  218. X   */
  219. X
  220. X  i = 0;
  221. X  XtSetArg(arglist[i], XtNfont, &font); i++;
  222. X  XtSetArg(arglist[i], XtNrowSpacing, &space); i++;
  223. X  XtGetValues(filelist, arglist, i);
  224. X
  225. X  height = (font->max_bounds.ascent +
  226. X           font->max_bounds.descent +
  227. X       space) * 5;
  228. X
  229. X  i = 0;
  230. X  XtSetArg(arglist[i], XtNheight, height); i++;
  231. X  XtSetValues(fileview, arglist, i);
  232. X
  233. X
  234. X  i = 0;
  235. X  XtSetArg(arglist[i], XtNfromVert,       fileview);  i++; 
  236. X  XtSetArg(arglist[i], XtNjustify, XtJustifyCenter);  i++;
  237. X  buttonno   =   XtCreateManagedWidget("buttonyes",
  238. X                       commandWidgetClass,
  239. X                       buttonform,
  240. X                       arglist, i);
  241. X 
  242. X  i = 2;
  243. X  XtSetArg(arglist[i], XtNfromHoriz,   buttonno);  i++;
  244. X  XtSetArg(arglist[i], XtNwidthLinked, buttonno);  i++;
  245. X  buttonyes  =   XtCreateManagedWidget("buttonyes",
  246. X                       commandWidgetClass,
  247. X                       buttonform,
  248. X                       arglist, i);
  249. X
  250. X}
  251. X
  252. X/*****************************************************************************
  253. X *                                button_dialog                              *
  254. X *****************************************************************************/
  255. Xpublic void button_dialog(Cardinal type, XedwListReturnStruct *list)
  256. X{
  257. X  /* Set the resources of the dialog to the type of dialog required, 
  258. X   * the type is either Trash, Copy or Move then popup the dialog.
  259. X   *
  260. X   * - Takes the type of dialog, and the list of files to display.
  261. X   */
  262. X
  263. X  private int buttoniconcmp(XedwList **, XedwList **);
  264. X  extern String getfilename(String);
  265. X  extern void setscroll(Widget, float);
  266. X
  267. X  XedwListReturnStruct *tmp;
  268. X  XedwList **buttonlist;
  269. X  Arg arglist[5];
  270. X  Cardinal i, n;
  271. X  private String CancelButtonLabel = "Cancel";
  272. X
  273. X  /* Count items in linked list */
  274. X  n = 0;
  275. X  tmp = list;
  276. X  while (tmp != NULL) {
  277. X    tmp = tmp->next;
  278. X    n++;
  279. X  }
  280. X
  281. X  /* Allocate an array of XedwList* of that size */
  282. X  buttonlist = (XedwList**) XtMalloc (sizeof(XedwList*) * (n+1));
  283. X
  284. X  /* Put Strings from linked list into array, using NULL icons */
  285. X  for (i = 0; i < n; i++) {
  286. X    buttonlist[i] = XtNew(XedwList);
  287. X    buttonlist[i]->string = list->string;
  288. X    list = list->next;
  289. X  }
  290. X  buttonlist[i] = NULL;
  291. X
  292. X  /* Sort the list */
  293. X  qsort((char*)buttonlist, n, sizeof(buttonlist[0]), buttoniconcmp);
  294. X
  295. X  /* Reset view to top */
  296. X
  297. X  setscroll(fileview, 0.0);
  298. X
  299. X  switch (type) {
  300. X  case Trash:
  301. X    {
  302. X      extern void trashQueryResult(Widget, Boolean, caddr_t);
  303. X      private String TrashLabel1       = "Delete these files";
  304. X      private String TrashLabel2       = "from current directory?";
  305. X      private String TrashButtonLabel  = "Delete";
  306. X
  307. X      /* label */
  308. X      i = 0;
  309. X      XtSetArg(arglist[i], XtNlabel, TrashLabel1);  i++;
  310. X      XtSetValues(buttonlabel1, arglist, i);
  311. X    
  312. X      /* label2 */
  313. X      i = 0;
  314. X      XtSetArg(arglist[i], XtNlabel,       TrashLabel2);  i++; 
  315. X      XtSetValues(buttonlabel2, arglist, i);
  316. X      
  317. X      /* file list */
  318. X      i = 0;
  319. X      XtSetArg(arglist[i], XtNlongest,           0); i++;
  320. X      XtSetArg(arglist[i], XtNnumberStrings,     0); i++;
  321. X      XtSetArg(arglist[i], XtNxedwList, buttonlist); i++;
  322. X      XtSetValues(filelist, arglist, i);
  323. X
  324. X      /* button1 */
  325. X      i = 0;
  326. X      XtSetArg(arglist[i], XtNlabel, CancelButtonLabel);  i++;
  327. X      XtSetValues(buttonno, arglist, i);
  328. X      
  329. X      /* button2 */
  330. X      i = 0;
  331. X      XtSetArg(arglist[i], XtNlabel,   TrashButtonLabel);  i++;
  332. X      XtSetValues(buttonyes, arglist, i);
  333. X      
  334. X      XtAddCallback(buttonno, XtNcallback, trashQueryResult, False);
  335. X      XtAddCallback(buttonyes, XtNcallback, trashQueryResult, True);
  336. X      realize_dialog(buttonpopup);
  337. X      break;
  338. X    }
  339. X  case Copy:
  340. X    {
  341. X      extern void copyQueryResult(Widget, Boolean, caddr_t);
  342. X      private String CopyLabel1       = "Copy these files";
  343. X      private String CopyLabel2       = "to current directory?";
  344. X      private String CopyButtonLabel  = "Copy";
  345. X
  346. X      /* label */
  347. X      i = 0;
  348. X      XtSetArg(arglist[i], XtNlabel, CopyLabel1);  i++;
  349. X      XtSetValues(buttonlabel1, arglist, i);
  350. X    
  351. X      /* label2 */
  352. X      i = 0;
  353. X      XtSetArg(arglist[i], XtNlabel, CopyLabel2);  i++; 
  354. X      XtSetValues(buttonlabel2, arglist, i);
  355. X      
  356. X      /* file list */
  357. X      i = 0;
  358. X      XtSetArg(arglist[i], XtNlongest,           0); i++;
  359. X      XtSetArg(arglist[i], XtNnumberStrings,     0); i++;
  360. X      XtSetArg(arglist[i], XtNxedwList, buttonlist); i++;
  361. X      XtSetValues(filelist, arglist, i);
  362. X
  363. X      /* button1 */
  364. X      i = 0;
  365. X      XtSetArg(arglist[i], XtNlabel, CancelButtonLabel);  i++;
  366. X      XtSetValues(buttonno, arglist, i);
  367. X      
  368. X      /* button2 */
  369. X      i = 0;
  370. X      XtSetArg(arglist[i], XtNlabel, CopyButtonLabel);  i++;
  371. X      XtSetValues(buttonyes, arglist, i);
  372. X      
  373. X      XtAddCallback(buttonno, XtNcallback,  copyQueryResult, False);
  374. X      XtAddCallback(buttonyes, XtNcallback, copyQueryResult, True);
  375. X      realize_dialog(buttonpopup);
  376. X      break;
  377. X    }
  378. X  case Move:
  379. X    {
  380. X      extern void moveQueryResult(Widget, Boolean, caddr_t);
  381. X      private String MoveLabel1       = "Move these files";
  382. X      private String MoveLabel2       = "to current directory?";
  383. X      private String MoveButtonLabel  = "Move";
  384. X
  385. X      /* label */
  386. X      i = 0;
  387. X      XtSetArg(arglist[i], XtNlabel, MoveLabel1);  i++;
  388. X      XtSetValues(buttonlabel1, arglist, i);
  389. X    
  390. X      /* label2 */
  391. X      i = 0;
  392. X      XtSetArg(arglist[i], XtNlabel, MoveLabel2);  i++; 
  393. X      XtSetValues(buttonlabel2, arglist, i);
  394. X      
  395. X      /* file list */
  396. X      i = 0;
  397. X      XtSetArg(arglist[i], XtNlongest,           0); i++;
  398. X      XtSetArg(arglist[i], XtNnumberStrings,     0); i++;
  399. X      XtSetArg(arglist[i], XtNxedwList, buttonlist); i++;
  400. X      XtSetValues(filelist, arglist, i);
  401. X
  402. X      /* button1 */
  403. X      i = 0;
  404. X      XtSetArg(arglist[i], XtNlabel, CancelButtonLabel);  i++;
  405. X      XtSetValues(buttonno, arglist, i);
  406. X      
  407. X      /* button2 */
  408. X      i = 0;
  409. X      XtSetArg(arglist[i], XtNlabel, MoveButtonLabel);  i++;
  410. X      XtSetValues(buttonyes, arglist, i);
  411. X      
  412. X      XtAddCallback(buttonno, XtNcallback,  moveQueryResult, False);
  413. X      XtAddCallback(buttonyes, XtNcallback, moveQueryResult, True);
  414. X      realize_dialog(buttonpopup);
  415. X      break;
  416. X    }
  417. X
  418. X  default:
  419. X    fprintf(stderr, "Unrecognised button dialog request\n");
  420. X    break;
  421. X  }
  422. X
  423. X}
  424. X
  425. X/*****************************************************************************
  426. X *                             destroy_button_dialog                         *
  427. X *****************************************************************************/
  428. Xpublic void destroy_button_dialog(void)
  429. X{
  430. X  /* Popdown and destroy the callback lists of the dialog */
  431. X
  432. X  XtPopdown(buttonpopup);
  433. X  
  434. X  XtRemoveAllCallbacks(buttonyes, XtNcallback);
  435. X  XtRemoveAllCallbacks(buttonno, XtNcallback);
  436. X
  437. X}
  438. X
  439. X/*****************************************************************************
  440. X *                               buttoniconcmp                               *
  441. X *****************************************************************************/
  442. Xprivate int buttoniconcmp(XedwList **ip1, XedwList **ip2)
  443. X{
  444. X  /* compare the strings of 2 XedwList's */
  445. X
  446. X  return (strcmp((*ip1)->string, 
  447. X         (*ip2)->string));
  448. X}
  449. SHAR_EOF
  450. chmod 0644 xdtm/buttons.c ||
  451. echo 'restore of xdtm/buttons.c failed'
  452. Wc_c="`wc -c < 'xdtm/buttons.c'`"
  453. test 10282 -eq "$Wc_c" ||
  454.     echo 'xdtm/buttons.c: original size 10282, current size' "$Wc_c"
  455. fi
  456. # ============= xdtm/dialogs.c ==============
  457. if test -f 'xdtm/dialogs.c' -a X"$1" != X"-c"; then
  458.     echo 'x - skipping xdtm/dialogs.c (File already exists)'
  459. else
  460. echo 'x - extracting xdtm/dialogs.c (Text)'
  461. sed 's/^X//' << 'SHAR_EOF' > 'xdtm/dialogs.c' &&
  462. X/*****************************************************************************
  463. X ** File          : dialogs.c                                               **
  464. X ** Purpose       : Initialise and Realise dialogs                          **
  465. X ** Author        : Edward Groenendaal                                      **
  466. X ** Date          : 18th Feb 1991                                           **
  467. X ** Documentation : Xdtm Design Folder                                      **
  468. X ** Related Files : quit.c buttons.c listoption.c map.c select.c display.c  **
  469. X **                 newfile.c                            **
  470. X *****************************************************************************/
  471. X
  472. X/* dialog box's provided: Quit    - Quit (yes/no)
  473. X *              Button  - Do action to these files (yes/no)
  474. X *                        Longl   - Select options on Long Listing
  475. X *                        Map     - Map program x over selected files OR
  476. X *                        Select  - Select files using RE x.
  477. X *              Query   - Display file?
  478. X *               Display - Display a file.
  479. X *                     Newfile - Ask for filename, create empty file. 
  480. X *
  481. X */
  482. X
  483. X#include "xdtm.h"
  484. X
  485. X/*****************************************************************************
  486. X *                         createDialogWidgets                               *
  487. X *****************************************************************************/
  488. Xpublic void createDialogWidgets(Widget top)
  489. X{
  490. X  /* Call the initialise procedures of all the xdtm dialogs */
  491. X
  492. X  extern void init_quit(Widget);
  493. X  extern void init_button(Widget);
  494. X  extern void init_listoption(Widget);
  495. X  extern void init_map(Widget);
  496. X  extern void init_query(Widget);
  497. X  extern void init_display(Widget);
  498. X  extern void init_newfile(Widget);
  499. X
  500. X  init_quit(top);
  501. X  init_button(top);
  502. X  init_listoption(top);
  503. X  init_map(top);
  504. X  init_query(top);
  505. X  init_display(top);
  506. X  init_newfile(top);
  507. X                  
  508. X}
  509. X
  510. X/*****************************************************************************
  511. X *                               realize_dialog                              *
  512. X *****************************************************************************/
  513. Xpublic void realize_dialog(Widget popup)
  514. X{
  515. X  /* Given a popup widget this procedure, modified from one in the X Toolkit
  516. X   * Intrinsics Programmers Manual, O'Reilly & Associates, pops it up with
  517. X   * the center of the popup over the center of the application.
  518. X   */
  519. X
  520. X  extern Widget topLevel;
  521. X  Position x,y;
  522. X  Dimension appWidth, appHeight, qWidth, qHeight;
  523. X  XtGeometryResult result;
  524. X  XtWidgetGeometry answer, question;
  525. X  Arg arglist[2];
  526. X  Cardinal i;
  527. X  
  528. X  /* You dont know the dimensions of a widget for certain until it is
  529. X   * realized, therefore realize the dialog.
  530. X   * NOTE: XtRealizeWidget returns without an error if widget is already
  531. X   *       realized, hence no check via XtIsRealized.
  532. X   */
  533. X
  534. X  XtRealizeWidget(popup);
  535. X
  536. X  /* Get dimensions of application */
  537. X  i = 0;
  538. X  XtSetArg(arglist[i], XtNwidth,  &appWidth);    i++;
  539. X  XtSetArg(arglist[i], XtNheight, &appHeight);   i++;
  540. X  XtGetValues(topLevel, arglist, i);
  541. X
  542. X  /* Get dimensions of quit popup */
  543. X  i = 0;
  544. X  XtSetArg(arglist[i], XtNwidth,  &qWidth);    i++;
  545. X  XtSetArg(arglist[i], XtNheight, &qHeight);   i++;
  546. X  XtGetValues(popup, arglist, i);
  547. X
  548. X  /* Translate application coordinates to screen coordinates */
  549. X  XtTranslateCoords(topLevel,
  550. X            (Position) ((appWidth/2)-(qWidth/2)),
  551. X            (Position) ((appHeight/2)-(qHeight/2)),
  552. X            &x, &y);
  553. X
  554. X  /* move popup shell to that position */
  555. X  i = 0;
  556. X  XtSetArg(arglist[i], XtNx, x);  i++;
  557. X  XtSetArg(arglist[i], XtNy, y);  i++;
  558. X  XtSetValues(popup, arglist, i);
  559. X
  560. X  XtPopup(popup, XtGrabNonexclusive);
  561. X  
  562. X}
  563. SHAR_EOF
  564. chmod 0644 xdtm/dialogs.c ||
  565. echo 'restore of xdtm/dialogs.c failed'
  566. Wc_c="`wc -c < 'xdtm/dialogs.c'`"
  567. test 3636 -eq "$Wc_c" ||
  568.     echo 'xdtm/dialogs.c: original size 3636, current size' "$Wc_c"
  569. fi
  570. # ============= xdtm/dirman.c ==============
  571. if test -f 'xdtm/dirman.c' -a X"$1" != X"-c"; then
  572.     echo 'x - skipping xdtm/dirman.c (File already exists)'
  573. else
  574. echo 'x - extracting xdtm/dirman.c (Text)'
  575. sed 's/^X//' << 'SHAR_EOF' > 'xdtm/dirman.c' &&
  576. X/*****************************************************************************
  577. X ** File          : dirman.c                                                **
  578. X ** Purpose       : Directory Manager                                       **
  579. X ** Author        : Edward Groenendaal                                      **
  580. X ** Date          : 18th Feb 1991                                           **
  581. X ** Documentation : Xdtm Design Folder                                      **
  582. X *****************************************************************************/
  583. X
  584. X/* Include the application header file */
  585. X#include "xdtm.h"
  586. X
  587. X/* Include the local header files */
  588. X#include <sys/types.h>
  589. X#include <dirent.h>
  590. X#include <sys/stat.h>
  591. X#include <sys/param.h>
  592. X#include <limits.h>
  593. X#include <X11/Xaw/AsciiText.h>
  594. X
  595. X#include "menus.h"
  596. X#include "Xedw/XedwList.h"
  597. X#include "Xedw/XedwForm.h"
  598. X
  599. X#define LISTSIZE    128        /* The initial size of the icon_list   */
  600. X#define LISTINCR    64        /* The steps by which it will increase */
  601. X
  602. X#ifdef TRUE_SYSV
  603. X#ifndef MAXPATHLEN
  604. X#define MAXPATHLEN 512  /* jcc */
  605. X#endif
  606. X#endif
  607. X
  608. Xpublic void   changestate(Boolean);        /* Change sensitivity */
  609. Xpublic String getfilename(String);       /* extract filename */
  610. X
  611. Xpublic Widget directoryManager;
  612. Xpublic String cwd;            /* current working directory */
  613. Xpublic Cardinal icon_list_size = 0;
  614. Xpublic Cardinal icon_list_max_size = LISTSIZE;
  615. Xpublic XedwList **icon_list;        /* List with icons and/or filenames */
  616. X
  617. X/* local copies of the menu panes which are to be made insensitive when
  618. X * no there is no current selection.
  619. X */
  620. Xprivate Widget duplicatemenu, trashmenu, 
  621. X               copymenu, movemenu, mapmenu;
  622. X
  623. X
  624. X/*****************************************************************************
  625. X *                       createDirectoryManagerWidgets                       *
  626. X *****************************************************************************/
  627. Xpublic void createDirectoryManagerWidgets(Widget view)
  628. X{
  629. X  /* Create the directory manager widget 
  630. X   *
  631. X   * - Takes the directoryManager's parent widget
  632. X   */
  633. X
  634. X  public  void selection_made(Widget, caddr_t, caddr_t);
  635. X  private void DoubleClick(Widget, XButtonEvent*);
  636. X  private void GoUp(Widget, XButtonEvent*);
  637. X  private void SelectAll(Widget, XButtonEvent*);
  638. X  private void Refresh(Widget, XButtonEvent*);
  639. X
  640. X  extern Icon_mode current_mode;
  641. X  Cardinal i;
  642. X  Arg arglist[6];
  643. X  XtTranslations dirManTranslations;
  644. X
  645. X  /* New actions for directoryManager */
  646. X  static XtActionsRec actions[] = {
  647. X    {"DoubleClick", DoubleClick},
  648. X    {"GoUp",        GoUp},
  649. X    {"SelectAll",   SelectAll},
  650. X    {"Refresh",     Refresh},
  651. X    {NULL, NULL}
  652. X  };
  653. X
  654. X  /* New translations for directoryManager */
  655. X  static char defaultTranslations[] =
  656. X             "<Btn1Up>(2):     DoubleClick()\n\
  657. X              <Key>u:          GoUp()\n\
  658. X              <Key>a:          SelectAll()\n\
  659. X          Ctrl<Key>L:      Refresh()";
  660. X  
  661. X  /* Set the initial mode depending on the value set in the application
  662. X   * defaults. (current_mode.mode set previously to this value when 
  663. X   * creating widgets.
  664. X   */
  665. X  i = 0;
  666. X  switch (current_mode.mode) {
  667. X  case Icons:
  668. X    XtSetArg(arglist[i], XtNshowIcons, True); i++;
  669. X    break;
  670. X  case Short:
  671. X    XtSetArg(arglist[i], XtNshowIcons,   False); i++;
  672. X    XtSetArg(arglist[i], XtNrowSpacing, 5); i++;
  673. X    break;
  674. X  case Long:
  675. X    XtSetArg(arglist[i], XtNshowIcons,   False); i++;
  676. X    XtSetArg(arglist[i], XtNrowSpacing,      5); i++;
  677. X    XtSetArg(arglist[i], XtNforceColumns, True); i++;
  678. X    XtSetArg(arglist[i], XtNdefaultColumns,  1); i++;    
  679. X  }
  680. X  XtSetArg(arglist[i], XtNfont, app_data.dm_font); i++;    
  681. X  XtSetArg(arglist[i], XtNmSelections,      True); i++;
  682. X  directoryManager    =   XtCreateManagedWidget("directoryManager",
  683. X                        xedwListWidgetClass,
  684. X                        view,
  685. X                        arglist, i);
  686. X
  687. X  /* Add callbacks and translations */
  688. X  XtAddCallback(directoryManager, XtNcallback, selection_made, 0);
  689. X  XtAddActions(actions, XtNumber(actions));
  690. X  dirManTranslations = XtParseTranslationTable(defaultTranslations);
  691. X  XtAugmentTranslations(directoryManager, dirManTranslations);
  692. X}
  693. X
  694. X/*****************************************************************************
  695. X *                     directoryManagerNewDirectory                          *
  696. X *****************************************************************************/
  697. Xpublic Boolean directoryManagerNewDirectory(String newpath)
  698. X{
  699. X  /* Change the contents of the directoryManager to that of the directory
  700. X   * contained in the string newpath.
  701. X   */
  702. X
  703. X  extern Boolean getIconType(String, String, XedwList*);
  704. X  extern void setCursor(Cursor);
  705. X  extern void setscroll(Widget, float);
  706. X  private int iconcmp(XedwList*, XedwList*);
  707. X
  708. X  extern Icon_mode current_mode;
  709. X  extern Cursor busy;
  710. X  extern Widget dirSelector;
  711. X  extern Widget directoryManagerView;
  712. X  Arg args[1];
  713. X  XedwList temp;
  714. X  DIR *dirp;
  715. X  struct dirent *dp;
  716. X  Cardinal i = 0, n;
  717. X  Boolean result = False; /* Whether the change of directories succeeded */
  718. X
  719. X  /* create a new one */
  720. X  if ((dirp = opendir(newpath)) != NULL && chdir(newpath) == 0) {
  721. X
  722. X    /* set cursor to busy */
  723. X    setCursor(busy);
  724. X
  725. X    /* Trash old list */
  726. X    for(i=0; i < icon_list_size; i++) {
  727. X      XtFree(icon_list[i]->string);
  728. X      XtFree(icon_list[i]);
  729. X    }
  730. X
  731. X    /* Get icon type for each file */
  732. X    i = 0;
  733. X    while ((dp = readdir(dirp)) != NULL) {
  734. X      if (i == icon_list_max_size) {
  735. X    icon_list_max_size += LISTINCR;
  736. X    icon_list = (XedwList**) XtRealloc(icon_list,
  737. X                       sizeof(XedwList*) * 
  738. X                       icon_list_max_size);
  739. X      } else 
  740. X    if (getIconType(dp->d_name, newpath, &temp)) {
  741. X      icon_list[i] = XtNew(XedwList);
  742. X      icon_list[i]->string = temp.string;
  743. X      icon_list[i]->icon   = temp.icon;
  744. X      i++;
  745. X    }
  746. X    }
  747. X    icon_list[i] = NULL;    /* NULL terminated */
  748. X    icon_list_size = i;
  749. X
  750. X    /* Sort the list */
  751. X    qsort((char*)icon_list, icon_list_size, sizeof(icon_list[0]), iconcmp);
  752. X
  753. X    /* Change the contents of the directory Manager */
  754. X    XedwListChange(directoryManager, icon_list, icon_list_size, 0, True);
  755. X
  756. X    /* Set the scrollbar of the viewport to the top */
  757. X    setscroll(directoryManagerView, 0.0);
  758. X    
  759. X    closedir(dirp);
  760. X    result = True;
  761. X
  762. X    /* Change entry in the directory selector */
  763. X    XtSetArg(args[0], XtNstring, newpath); 
  764. X    XtSetValues(dirSelector, args, 1);
  765. X    /* reset cursor */
  766. X    setCursor(NULL);
  767. X  } else 
  768. X    XBell(XtDisplay(directoryManager), 100);
  769. X  return(result);
  770. X}
  771. X
  772. X/*****************************************************************************
  773. X *                                iconcmp                                    *
  774. X *****************************************************************************/
  775. Xprivate int iconcmp(XedwList **ip1, XedwList **ip2)
  776. X{
  777. X  /* compare the strings of 2 XedwList's */
  778. X
  779. X  return (strcmp(getfilename((*ip1)->string), 
  780. X         getfilename((*ip2)->string)));
  781. X}
  782. X
  783. X/*****************************************************************************
  784. X *                              initDirectoryManager                         *
  785. X *****************************************************************************/
  786. Xpublic void initDirectoryManager(void)
  787. X{
  788. X  /* Get the menubar pane widgets, create the initial icon_list, find 
  789. X   * out what the current directory is.
  790. X   */
  791. X
  792. X  extern Boolean buttonSensitive;
  793. X  extern Widget menuBar;
  794. X  char tmpcwd[MAXPATHLEN];
  795. X
  796. X  /* Initialise the icon list */
  797. X  icon_list = (XedwList**) XtMalloc(sizeof(XedwList*) * LISTSIZE);
  798. X
  799. X  /* Set the starting directory */
  800. X#ifdef USE_CWD
  801. X  if (getcwd(tmpcwd, MAXPATHLEN) != NULL)
  802. X#else
  803. X  if (getwd(tmpcwd) != NULL) 
  804. X#endif
  805. X    cwd = XtNewString(tmpcwd);
  806. X  else
  807. X    if ((cwd = (char*) getenv("HOME")) == NULL) 
  808. X      cwd = XtNewString("/");
  809. X    else
  810. X      cwd = XtNewString(cwd);
  811. X
  812. X  /* Get the id's of the menu widgets which are to be toggled with the
  813. X   * buttons. Note: This relies on the menus being created first, which
  814. X   * they are.
  815. X   */
  816. X  if ((duplicatemenu = 
  817. X       XtNameToWidget(menuBar, "fileMenuButton.fileMenu.duplicate")) == NULL) {
  818. X    fprintf(stderr, "Directorymanager: Can't find duplicate menu widget\n");
  819. X    exit(2);
  820. X  }
  821. X  if ((trashmenu   = 
  822. X       XtNameToWidget(menuBar, "fileMenuButton.fileMenu.trash")) == NULL) {
  823. X    fprintf(stderr, "Directorymanager: Can't find trash menu widget\n");
  824. X    exit(2);
  825. X  }
  826. X  if ((copymenu    = 
  827. X       XtNameToWidget(menuBar, "fileMenuButton.fileMenu.copy")) == NULL) {
  828. X    fprintf(stderr, "Directorymanager: Can't find copy menu widget\n");
  829. X    exit(2);
  830. X  }
  831. X  if ((movemenu    = 
  832. X       XtNameToWidget(menuBar, "fileMenuButton.fileMenu.move")) == NULL) {
  833. X    fprintf(stderr, "Directorymanager: Can't find move menu widget\n");
  834. X    exit(2);
  835. X  }
  836. X  if ((mapmenu     = 
  837. X       XtNameToWidget(menuBar, "optionMenuButton.optionMenu.map")) == NULL) {
  838. X    fprintf(stderr, "Directorymanager: Can't find map menu widget\n");
  839. X    exit(2);
  840. X  }
  841. X  (void) directoryManagerNewDirectory(cwd);
  842. X  buttonSensitive = True;
  843. X  changestate(False);        /* Insure that menus are insensitive */
  844. X}
  845. X
  846. X/*****************************************************************************
  847. X *                              selection_made                               *
  848. X *****************************************************************************/
  849. Xpublic void selection_made(Widget w, caddr_t client_data, caddr_t call_data)
  850. X{
  851. X  /* Someone has either selected or deselected an item.
  852. X   * If there's nothing selected then buttons are changed to 
  853. X   * not sensitive.
  854. X   */
  855. X
  856. X  extern Boolean buttonSensitive;
  857. X  extern Widget trashButton, copyButton, moveButton;
  858. X  Arg arglist[1];
  859. X  Cardinal i;
  860. X
  861. X
  862. X  if (XedwListSelection(w) != buttonSensitive)
  863. X    if (buttonSensitive == False) {
  864. X      changestate(True);
  865. X    } else {
  866. X      changestate(False);
  867. X    }
  868. X}
  869. X
  870. X/*****************************************************************************
  871. X *                              DoubleClick                                  *
  872. X *****************************************************************************/
  873. Xprivate void DoubleClick(Widget w, XButtonEvent *event)
  874. X{
  875. X  /* Either Start a program, View a file or change directory.
  876. X   * executable = try to exec it.
  877. X   * directory  = try to enter it.
  878. X   * otherwise offer to view it.
  879. X   *
  880. X   * Maybe add stuff here to start a predefined application with this
  881. X   * file as an argument if the filename matches a particular pattern,
  882. X   * (James Beal, Henry Thomas)
  883. X   *
  884. X   * e.g. "\.ps$"  -> "xps !@"
  885. X   *      "\.man$" -> "xterm -T 'Manual Page' -e sh -c 'nroff -man !@ | less'"
  886. X   *      "\.gif$" -> "xview !@"
  887. X   */
  888. X
  889. X  extern void query_dialog(String, Boolean);
  890. X  extern int execute(String, String, String, Boolean);
  891. X
  892. X  extern Boolean buttonSensitive;
  893. X  extern Widget trashButton, moveButton, copyButton;
  894. X
  895. X  struct stat filestatus;
  896. X  String fullname, filename, temp;
  897. X  XedwListReturnStruct *highlighted;
  898. X  Arg arglist[1];
  899. X  Cardinal i;
  900. X
  901. X  selection_made(w, (caddr_t)0, (caddr_t)0);
  902. X  highlighted = XedwListShowCurrent(w);
  903. X
  904. X  if (highlighted->xedwList_index != XDTM_LIST_NONE) {
  905. X    filename = getfilename(highlighted->string);
  906. X    fullname=(String) XtMalloc((strlen(filename)+strlen(cwd)+2) * sizeof(char));
  907. X    strcpy(fullname, cwd);
  908. X    if (strcmp(cwd, "/") != 0)
  909. X      strcat(fullname, "/");
  910. X    strcat(fullname, filename);
  911. X
  912. X    /* Use normal stat.. follows symbolic links */
  913. X    if (stat(fullname, &filestatus) == -1) {
  914. X      fprintf(stderr,"xdtm: ARRRGGHHH stat error\n");
  915. X    } else {
  916. X      if ((filestatus.st_mode & S_IFMT) == S_IFDIR) {
  917. X    if (strcmp(filename, "..") == 0) {
  918. X      strcpy(fullname, cwd);
  919. X      if ((temp = (char*) strrchr(fullname, '/')) == NULL) 
  920. X        fprintf(stderr, "xdtm: impossible error\n");
  921. X      if (temp == fullname)
  922. X        *(temp+1) = '\0';
  923. X      else
  924. X        *temp = '\0';
  925. X    }  
  926. X    if (strcmp(filename, ".") == 0) {
  927. X      XtFree(fullname);
  928. X      fullname=XtNewString(cwd);
  929. X    }
  930. X    if (directoryManagerNewDirectory(fullname) == True) {
  931. X      XtFree(cwd);
  932. X      cwd=fullname;
  933. X      changestate(False);
  934. X    } else XBell(XtDisplay(w), 100);
  935. X      } else {
  936. X    /* Not a directory, is it executable? */
  937. X    if ((filestatus.st_mode & S_IXUSR) != 0 ||
  938. X        (filestatus.st_mode & S_IXGRP) != 0 ||
  939. X        (filestatus.st_mode & S_IXOTH) != 0) {
  940. X      extern void setCursor(Cursor);
  941. X      extern Cursor busy;
  942. X
  943. X      setCursor(busy);
  944. X      execute(fullname, filename, filename, False);
  945. X      setCursor(NULL);
  946. X    } else
  947. X      if ((filestatus.st_mode & S_IFMT) == S_IFREG) {
  948. X        /* Display dialog box to ask whether to display file */
  949. X        query_dialog(fullname, True);
  950. X      } else XBell(XtDisplay(w), 100);
  951. X    XtFree(fullname);
  952. X      }
  953. X    }
  954. X    XtFree(highlighted);
  955. X  }
  956. X}
  957. X
  958. X/*****************************************************************************
  959. X *                                     GoUp                                  *
  960. X *****************************************************************************/
  961. Xprivate void GoUp(Widget w, XButtonEvent *event)
  962. X{
  963. X  /* Change to the directory immeditaly above the current one,
  964. X   * does this by highlighting the .. directory, then calling 
  965. X   * DoubleClick to change to the highlighted directory. 
  966. X   * I used this longwinded approach because it showed on screen
  967. X   * what was actually happening.
  968. X   */
  969. X
  970. X  Cardinal i;
  971. X  /* Find entry with .. */
  972. X  for (i=0; i < icon_list_size && 
  973. X       (strcmp(getfilename(icon_list[i]->string), "..") != 0); i++); 
  974. X
  975. X  XedwListUnhighlight(w, XedwAll);
  976. X  /* Call XedwListHighlight with item number */
  977. X  XedwListHighlight(w, i);
  978. X
  979. X  /* Call double click */
  980. X
  981. X  DoubleClick(w, (XButtonEvent*) NULL);
  982. X
  983. X}
  984. X
  985. X/*****************************************************************************
  986. X *                                 SelectAll                                 *
  987. X *****************************************************************************/
  988. Xprivate void SelectAll(Widget w, XButtonEvent *event)
  989. X{
  990. X  /* Select All the files in the current directory except for . and .. */
  991. X
  992. X  extern Boolean buttonSensitive;
  993. X  extern Widget trashButton, moveButton, copyButton;
  994. X  public void changestate(Boolean);
  995. X  extern void setCursor(Cursor);
  996. X  extern Mode mode;
  997. X  extern Cursor busy;
  998. X
  999. X  Arg arglist[1];
  1000. X  Cardinal i;
  1001. X
  1002. X  /* Don't do it if in copy or move mode */
  1003. X  if (mode == NormalMode) {
  1004. X    setCursor(busy);
  1005. X    XedwListHighlight(w, XedwAll);
  1006. X    
  1007. X    /* unhighlight . and .. */
  1008. X    for (i=0; i < icon_list_size && 
  1009. X     (strcmp(getfilename(icon_list[i]->string), ".") != 0); i++); 
  1010. X    XedwListUnhighlight(w, i);
  1011. X    for (i=i; i < icon_list_size && 
  1012. X     (strcmp(getfilename(icon_list[i]->string), "..") != 0); i++); 
  1013. X    XedwListUnhighlight(w, i);
  1014. X    setCursor(NULL);
  1015. X  } else
  1016. X    XBell(XtDisplay(w), 100);
  1017. X  
  1018. X  /* do buttons */
  1019. X  if (icon_list_size > 2) {
  1020. X    changestate(True);
  1021. X  }
  1022. X}
  1023. X
  1024. X/*****************************************************************************
  1025. X *                                Refresh                                    *
  1026. X *****************************************************************************/
  1027. Xprivate void Refresh(Widget w, XButtonEvent *event)
  1028. X{
  1029. X  /* Refresh the current directory contents to the actual contents.
  1030. X   */
  1031. X
  1032. X  directoryManagerNewDirectory(cwd);
  1033. X}
  1034. X
  1035. X/*****************************************************************************
  1036. X *                               changestate                                 *
  1037. X *****************************************************************************/
  1038. Xpublic void changestate(Boolean new)
  1039. X{
  1040. X  /* Toggle the sensitivity of all the widgets which may not be used
  1041. X   * when no files are highlighted.
  1042. X   *
  1043. X   * - Takes the new state for widgets.
  1044. X   */
  1045. X
  1046. X  extern Boolean buttonSensitive;
  1047. X  extern Widget trashButton, copyButton, moveButton;
  1048. X  extern Mode mode;
  1049. X
  1050. X  if (buttonSensitive == True) {
  1051. X    if (mode == MoveMode) {
  1052. X      /* Turn off Trash and Copy */
  1053. X      XtSetSensitive(copyButton,    False);
  1054. X      XtSetSensitive(trashButton,   False);
  1055. X      XtSetSensitive(copymenu,      False);
  1056. X      XtSetSensitive(trashmenu,     False);
  1057. X      XtSetSensitive(mapmenu,       False);
  1058. X      XtSetSensitive(duplicatemenu, False);
  1059. X      buttonSensitive = False;
  1060. X    } else if (mode == CopyMode) {
  1061. X      /* Turn off Trash and Move */
  1062. X      XtSetSensitive(moveButton,    False);
  1063. X      XtSetSensitive(trashButton,   False);
  1064. X      XtSetSensitive(movemenu,      False);
  1065. X      XtSetSensitive(trashmenu,     False);
  1066. X      XtSetSensitive(mapmenu,       False);
  1067. X      XtSetSensitive(duplicatemenu, False);
  1068. X      buttonSensitive = False;
  1069. X    } else if (new == False) {
  1070. X      /* Turn off All */
  1071. X      XtSetSensitive(moveButton,    False);
  1072. X      XtSetSensitive(copyButton,    False);
  1073. X      XtSetSensitive(trashButton,   False);
  1074. X      XtSetSensitive(copymenu,      False);
  1075. X      XtSetSensitive(movemenu,      False);
  1076. X      XtSetSensitive(trashmenu,     False);
  1077. X      XtSetSensitive(mapmenu,       False);
  1078. X      XtSetSensitive(duplicatemenu, False);
  1079. X      buttonSensitive = False;
  1080. X    }
  1081. X  } else {
  1082. X    /* buttonSensitive == False */
  1083. X
  1084. X    /* If in MoveMode or CopyMode, then everything is set anyway */
  1085. X    if (mode == NormalMode && new == True) {
  1086. X      /* Set all to True */
  1087. X      XtSetSensitive(trashButton,   True);
  1088. X      XtSetSensitive(moveButton,    True);
  1089. X      XtSetSensitive(copyButton,    True);
  1090. X      XtSetSensitive(trashmenu,     True);
  1091. X      XtSetSensitive(movemenu,      True);
  1092. X      XtSetSensitive(copymenu,      True);
  1093. X      XtSetSensitive(duplicatemenu, True);
  1094. X      XtSetSensitive(mapmenu,       True);
  1095. X      buttonSensitive = True;
  1096. X    }
  1097. X  }
  1098. X}
  1099. X
  1100. X/*****************************************************************************
  1101. X *                              getfilename                                  *
  1102. X *****************************************************************************/
  1103. Xpublic String getfilename(String s)
  1104. X{
  1105. X  /* If in Long Listing mode this function returns the filename part
  1106. X   * of the string used in the directory list. If not in Long Listing
  1107. X   * then return the string unmolested.
  1108. X   */
  1109. X  extern Icon_mode current_mode;
  1110. X
  1111. X  if (current_mode.mode == Long && (strlen(s) > current_mode.length))
  1112. X    return (s+current_mode.length);
  1113. X  else
  1114. X    return (s);
  1115. X}
  1116. SHAR_EOF
  1117. chmod 0644 xdtm/dirman.c ||
  1118. echo 'restore of xdtm/dirman.c failed'
  1119. Wc_c="`wc -c < 'xdtm/dirman.c'`"
  1120. test 17893 -eq "$Wc_c" ||
  1121.     echo 'xdtm/dirman.c: original size 17893, current size' "$Wc_c"
  1122. fi
  1123. true || echo 'restore of xdtm/display.c failed'
  1124. echo End of part 5, continue with part 6
  1125. exit 0
  1126.  
  1127. --
  1128. Dan Heller
  1129. O'Reilly && Associates       Z-Code Software    Comp-sources-x:
  1130. Senior Writer                President          comp-sources-x@uunet.uu.net
  1131. argv@ora.com                 argv@zipcode.com
  1132.