home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / x / volume18 / ftptool-4.3 / part11 < prev    next >
Text File  |  1992-08-18  |  51KB  |  2,020 lines
  1. Newsgroups: comp.sources.x
  2. Path: uunet!gossip.pyramid.com!decwrl!mips!msi!dcmartin
  3. From: Mike.Sullivan@EBay.Sun.COM (Mike Sullivan {AKA Simon BarSinister})
  4. Subject: v18i093: Ftptool 4.3 (XVIEW), Part11/12
  5. Message-ID: <1992Aug18.153809.29142@msi.com>
  6. Originator: dcmartin@fascet
  7. Sender: dcmartin@msi.com (David C. Martin - Moderator)
  8. Organization: Molecular Simulations, Inc.
  9. References: <csx-18i083-ftptool-4.3@uunet.UU.NET>
  10. Date: Tue, 18 Aug 1992 15:38:09 GMT
  11. Approved: dcmartin@msi.com
  12. Lines: 2006
  13.  
  14. Submitted-by: Mike.Sullivan@EBay.Sun.COM (Mike Sullivan {AKA Simon BarSinister})
  15. Posting-number: Volume 18, Issue 93
  16. Archive-name: ftptool-4.3/part11
  17.  
  18. #!/bin/sh
  19. # this is part.11 (part 11 of a multipart archive)
  20. # do not concatenate these parts, unpack them in order with /bin/sh
  21. # file create_other.c continued
  22. #
  23. if test ! -r _shar_seq_.tmp; then
  24.     echo 'Please unpack part 1 first!'
  25.     exit 1
  26. fi
  27. (read Scheck
  28.  if test "$Scheck" != 11; then
  29.     echo Please unpack part "$Scheck" next!
  30.     exit 1
  31.  else
  32.     exit 0
  33.  fi
  34. ) < _shar_seq_.tmp || exit 1
  35. if test ! -f _shar_wnt_.tmp; then
  36.     echo 'x - still skipping create_other.c'
  37. else
  38. echo 'x - continuing file create_other.c'
  39. sed 's/^X//' << 'SHAR_EOF' >> 'create_other.c' &&
  40. X        NULL);
  41. X
  42. /*
  43. X    window_fit_height(host_window.panel);
  44. X    */
  45. X
  46. X    window_fit(host_window.frame);
  47. X
  48. X    xv_set(host_window.advanced.panel,
  49. X        XV_WIDTH, WIN_EXTEND_TO_EDGE,
  50. X        NULL);
  51. X
  52. X    x = rect.r_left - 347;
  53. X    y = rect.r_top  + 100;
  54. X    width = xv_get(host_window.frame, XV_WIDTH);
  55. X    height = xv_get(host_window.frame, XV_HEIGHT);
  56. X
  57. X    set_geometry(host_window.geometry, host_window.frame, width, height, x, y);
  58. X
  59. X    add_dismiss(host_window.basic.panel, host_window.basic.connect,
  60. X        host_window.basic.dismiss);
  61. X    
  62. X    minus_proc();
  63. X
  64. X    XFlush(dpy);
  65. X
  66. X    hostlist_head = new_hostlist();
  67. X    read_ftptoolrc();
  68. X    reload_host_list_menu(hostlist_head);
  69. X    if (hostlist_head->next) {
  70. X        struct hostlist *tmp = hostlist_head->next;
  71. X
  72. X        /* default to first entry */
  73. X        if (try_proxy) {
  74. X            xv_set(host_window.advanced.proxy, 
  75. X                PANEL_VALUE, tmp->proxy, 
  76. X                XV_SHOW, TRUE,
  77. X                NULL);
  78. X        } else {
  79. X            xv_set(host_window.advanced.proxy,
  80. X                XV_SHOW, FALSE,
  81. X                NULL);
  82. X        }
  83. X        xv_set(host_window.advanced.alias, 
  84. X            PANEL_VALUE, tmp->aliasname, 
  85. X            NULL);
  86. X        xv_set(host_window.advanced.last_visited, 
  87. X            PANEL_VALUE, tmp->last_visited, 
  88. X            NULL);
  89. X        xv_set(host_window.advanced.comment, 
  90. X            PANEL_VALUE, tmp->comment, 
  91. X            NULL);
  92. X        xv_set(host_window.basic.host, 
  93. X            PANEL_VALUE, tmp->host, 
  94. X            NULL);
  95. X        xv_set(host_window.basic.login, 
  96. X            PANEL_VALUE, tmp->login, 
  97. X            NULL);
  98. X        xv_set(host_window.basic.password, 
  99. X            PANEL_VALUE, tmp->password, 
  100. X            NULL);
  101. X        xv_set(host_window.advanced.transfer_mode, 
  102. X            PANEL_VALUE, tmp->transfer_mode, 
  103. X            NULL);
  104. X        xv_set(host_window.advanced.remote_auto_cd, 
  105. X            PANEL_VALUE, tmp->remote_directory, 
  106. X            NULL);
  107. X        xv_set(host_window.advanced.local_auto_cd, 
  108. X            PANEL_VALUE, tmp->local_directory, 
  109. X            NULL);
  110. X        xv_set(host_window.advanced.dir_parse, 
  111. X            PANEL_VALUE, tmp->dir_parse, 
  112. X            NULL);
  113. X    } else {
  114. X        xv_set(host_window.advanced.proxy,
  115. X            XV_SHOW, FALSE,
  116. X            NULL);
  117. X    }
  118. X    xv_set(host_window.frame,
  119. X        WIN_EVENT_PROC, host_event_proc,
  120. X        NULL);
  121. X
  122. }
  123. X
  124. #ifdef USE_PROTOTYPES
  125. void create_session_log(void)
  126. #else
  127. void create_session_log()
  128. #endif
  129. {
  130. X    Rect    rect;
  131. X    int        width, height, x, y;
  132. X
  133. X    XSync(dpy, False);
  134. X
  135. X    session_window.frame = xv_create(base_window.frame, FRAME_CMD,
  136. X        XV_LABEL, "Ftptool: Session Log",
  137. X        XV_WIDTH, rect.r_width,
  138. X        FRAME_SHOW_RESIZE_CORNER, TRUE,
  139. #ifdef XVIEW3
  140. X        FRAME_CMD_PIN_STATE, FRAME_CMD_PIN_IN,
  141. #else
  142. X        FRAME_CMD_PUSHPIN_IN, TRUE,
  143. #endif
  144. X        NULL);
  145. X
  146. X    session_window.panel = xv_get(session_window.frame, FRAME_CMD_PANEL);
  147. X
  148. X    xv_set(session_window.panel,
  149. X        XV_HELP_DATA, "ftptool:SessionLog",
  150. X        NULL);
  151. X
  152. X    window_fit_height(session_window.panel);
  153. X
  154. X    session_window.log = xv_create(session_window.frame, TEXTSW,
  155. X        XV_HEIGHT, 100,
  156. X        TEXTSW_MEMORY_MAXIMUM, 200000,
  157. X        TEXTSW_DISABLE_LOAD, TRUE,
  158. X        TEXTSW_READ_ONLY, TRUE,
  159. X        NULL);
  160. X
  161. X    height = xv_get(session_window.frame, XV_HEIGHT);
  162. X
  163. X    frame_get_rect(local_window.frame, &rect);
  164. X
  165. X    x = rect.r_left;
  166. X    y = rect.r_top + rect.r_height;
  167. X    rect.r_top = y;
  168. X    rect.r_height = height;
  169. X    width = rect.r_width;
  170. X    frame_set_rect(session_window.frame, &rect);
  171. X    frame_set_rect(session_window.panel, &rect);
  172. X
  173. X    set_geometry(session_window.geometry,session_window.frame,width,height,x,y);
  174. X    
  175. X    window_fit(session_window.frame);
  176. #ifdef notdef
  177. X    if (logging) {
  178. X        xv_set(session_window.frame, 
  179. X            XV_SHOW, TRUE, 
  180. X            NULL);
  181. X    }
  182. #endif
  183. X
  184. }
  185. X
  186. #ifdef USE_PROTOTYPES
  187. void create_about_window(void)
  188. #else
  189. void create_about_window()
  190. #endif
  191. {
  192. X    int        width = xv_get(base_window.frame, XV_WIDTH);
  193. X    int        height = xv_get(base_window.frame, XV_HEIGHT);
  194. X    Rect    *butrect;
  195. X    Server_image corner_glyph;
  196. X
  197. X    about_window.frame = xv_create(base_window.frame, FRAME_CMD,
  198. X        XV_LABEL, "Ftptool: About Ftptool",
  199. #ifdef XVIEW3
  200. X        FRAME_CMD_PIN_STATE, FRAME_CMD_PIN_IN,
  201. #else
  202. X        FRAME_CMD_PUSHPIN_IN, TRUE,
  203. #endif
  204. X        XV_WIDTH, width,
  205. X        XV_HEIGHT, height,
  206. X        NULL);
  207. X
  208. X    about_window.panel = xv_get(about_window.frame, FRAME_CMD_PANEL);
  209. X
  210. X    xv_set(about_window.panel,
  211. X        XV_HELP_DATA, "ftptool:AboutWindow",
  212. X        NULL);
  213. X
  214. X    xv_set(about_window.panel, 
  215. X        PANEL_LAYOUT, PANEL_VERTICAL,
  216. X        NULL);
  217. X
  218. X    xv_create(about_window.panel, PANEL_MESSAGE,
  219. X        XV_X, 100,
  220. X        PANEL_LABEL_STRING, header_name,
  221. X        PANEL_LABEL_BOLD, TRUE,
  222. X        NULL);
  223. X
  224. X    xv_create(about_window.panel, PANEL_MESSAGE,
  225. X        XV_X, 100,
  226. X        PANEL_LABEL_STRING, "Copyright 1991",
  227. X        PANEL_LABEL_BOLD, TRUE,
  228. X        NULL);
  229. X
  230. X    xv_create(about_window.panel, PANEL_MESSAGE,
  231. X        XV_X, 100,
  232. X        PANEL_LABEL_STRING, "Mike Sullivan and Sun Microsystems",
  233. X        PANEL_LABEL_BOLD, TRUE,
  234. X        NULL);
  235. X
  236. X    xv_create(about_window.panel, PANEL_MESSAGE,
  237. X        XV_X, 100,
  238. X        PANEL_LABEL_STRING, "All Rights Reserved",
  239. X        PANEL_LABEL_BOLD, TRUE,
  240. X        NULL);
  241. X
  242. X    window_fit_height(about_window.panel);
  243. X
  244. X    about_window.message = xv_create(about_window.frame, TEXTSW,
  245. X        XV_X, 0,
  246. X        XV_WIDTH, WIN_EXTEND_TO_EDGE,
  247. X        XV_HEIGHT, 136,
  248. X        OPENWIN_SHOW_BORDERS, TRUE,
  249. X        TEXTSW_BROWSING, TRUE,
  250. X        TEXTSW_DISABLE_LOAD, TRUE,
  251. X        NULL);
  252. X
  253. X    about_window.bottom_panel = xv_create(about_window.frame, PANEL,
  254. X        XV_X, 0,
  255. X        NULL);
  256. X
  257. X    about_window.mail = xv_create(about_window.bottom_panel,PANEL_BUTTON,
  258. X        PANEL_LABEL_STRING, "Send Mail...",
  259. X        PANEL_NOTIFY_PROC, about_send_proc,
  260. X        NULL);
  261. X
  262. X    xv_set(about_window.panel, 
  263. X        PANEL_LAYOUT, PANEL_HORIZONTAL,
  264. X        NULL);
  265. X
  266. X    about_window.dismiss = xv_create(about_window.bottom_panel,
  267. X        PANEL_BUTTON,
  268. X        PANEL_LABEL_STRING, "Dismiss",
  269. X        PANEL_NOTIFY_PROC, dismiss_about_window,
  270. X        XV_HELP_DATA, "ftptool:DismissButton",
  271. X        NULL);
  272. X
  273. X    xv_set(about_window.panel, 
  274. X        PANEL_LAYOUT, PANEL_VERTICAL,
  275. X        NULL);
  276. X
  277. X    window_fit_height(about_window.bottom_panel);
  278. X
  279. X    butrect = (Rect *)xv_get(about_window.mail,XV_RECT);
  280. X    xv_set(about_window.mail,
  281. X        XV_X, (int)xv_get(about_window.bottom_panel, XV_WIDTH)/2 
  282. X            - butrect->r_width,
  283. X        NULL);
  284. X
  285. X
  286. X    window_fit(about_window.frame);
  287. X    
  288. X    corner_glyph = xv_create(XV_NULL, SERVER_IMAGE,
  289. X        XV_WIDTH, 64,
  290. X        XV_HEIGHT, 64,
  291. X        SERVER_IMAGE_DEPTH, 1,
  292. X        SERVER_IMAGE_BITS, icon_array,
  293. X        NULL);
  294. X
  295. X    xv_create(about_window.panel, PANEL_MESSAGE,
  296. X        XV_X, 2,
  297. X        XV_Y, xv_get(about_window.panel, XV_HEIGHT)/2 - 32,
  298. X        PANEL_LABEL_IMAGE, corner_glyph,
  299. X        NULL);
  300. X
  301. X    add_dismiss(about_window.panel, about_window.mail,
  302. X        about_window.dismiss);
  303. }
  304. X
  305. #ifdef USE_PROTOTYPES
  306. void create_feedback_window(void)
  307. #else
  308. void create_feedback_window()
  309. #endif
  310. {
  311. X    int        width = xv_get(base_window.frame, XV_WIDTH);
  312. X    int        height = xv_get(base_window.frame, XV_HEIGHT);
  313. X    Rect    *butrect;
  314. X
  315. X    feedback_window.frame = xv_create(base_window.frame, FRAME_CMD,
  316. X        XV_LABEL, "Ftptool: Send Feedback",
  317. #ifdef XVIEW3
  318. X        FRAME_CMD_PIN_STATE, FRAME_CMD_PIN_OUT,
  319. #else
  320. X        FRAME_CMD_PUSHPIN_IN, FALSE,
  321. #endif
  322. X        XV_WIDTH, width,
  323. X        XV_HEIGHT, height,
  324. X        NULL);
  325. X
  326. X    feedback_window.panel = xv_get(feedback_window.frame, FRAME_CMD_PANEL);
  327. X
  328. X    xv_set(feedback_window.panel,
  329. X        XV_HELP_DATA, "ftptool:FeedbackWindow",
  330. X        NULL);
  331. X
  332. X    xv_set(feedback_window.panel, 
  333. X        PANEL_LAYOUT, PANEL_VERTICAL,
  334. X        NULL);
  335. X
  336. X    xv_create(feedback_window.panel, PANEL_MESSAGE,
  337. X        PANEL_LABEL_STRING, 
  338. X          "Your feedback is appreciated. To insure that your message arrives,",
  339. X        NULL);
  340. X
  341. X    xv_create(feedback_window.panel, PANEL_MESSAGE,
  342. X        PANEL_LABEL_STRING, "check that the \"To\" address is valid for your site before clicking \"Send.\"",
  343. X        NULL);
  344. X
  345. X    feedback_window.which=xv_create(feedback_window.panel,
  346. X        PANEL_CHOICE_STACK,
  347. X        PANEL_CHOICE_NROWS, 1,
  348. X        PANEL_LAYOUT, PANEL_HORIZONTAL,
  349. X        PANEL_LABEL_STRING, "To:",
  350. X        PANEL_CHOICE_STRINGS,
  351. X            "Mike.Sullivan@Sun.COM",
  352. X            "uunet!sun.com!mike.sullivan%male",
  353. X            "Other Address",
  354. X            NULL,
  355. X        PANEL_NOTIFY_PROC, feedback_address_proc,
  356. X        NULL);
  357. X
  358. X    feedback_window.other = xv_create(feedback_window.panel, PANEL_TEXT,
  359. X        PANEL_LABEL_STRING, "Other:  ",
  360. X        PANEL_LABEL_BOLD, TRUE,
  361. X        PANEL_VALUE_DISPLAY_LENGTH, 40,
  362. X        PANEL_VALUE_STORED_LENGTH, 64,
  363. X        PANEL_VALUE, "",
  364. X        PANEL_READ_ONLY, FALSE,
  365. X        XV_SHOW, FALSE,
  366. X        NULL);
  367. X
  368. X    window_fit_height(feedback_window.panel);
  369. X
  370. X    feedback_window.feedback = xv_create(feedback_window.frame, TEXTSW,
  371. X        XV_X, 0,
  372. X        XV_WIDTH, WIN_EXTEND_TO_EDGE,
  373. X        XV_HEIGHT, 188,
  374. X        OPENWIN_SHOW_BORDERS, TRUE,
  375. X        NULL);
  376. X
  377. X    feedback_window.bottom_panel = xv_create(feedback_window.frame, PANEL,
  378. X        XV_X, 0,
  379. X        PANEL_LAYOUT, PANEL_HORIZONTAL,
  380. X        NULL);
  381. X
  382. X    feedback_window.send = xv_create(feedback_window.bottom_panel, 
  383. X        PANEL_BUTTON,
  384. X        PANEL_LABEL_STRING, "Send",
  385. X        PANEL_NOTIFY_PROC, feedback_send_proc,
  386. X        NULL);
  387. X
  388. X    window_fit_height(feedback_window.bottom_panel);
  389. X    butrect = (Rect *)xv_get(feedback_window.send,XV_RECT);
  390. X    xv_set(feedback_window.send,
  391. X        XV_X, (int)xv_get(feedback_window.bottom_panel, XV_WIDTH)/2 
  392. X            - butrect->r_width,
  393. X        NULL);
  394. X
  395. X    feedback_window.cancel = xv_create(feedback_window.bottom_panel, 
  396. X        PANEL_BUTTON,
  397. X        PANEL_LABEL_STRING, "Cancel",
  398. X        PANEL_NOTIFY_PROC, feedback_cancel_proc,
  399. X        NULL);
  400. X
  401. X
  402. X    window_fit(feedback_window.frame);
  403. }
  404. X    
  405. #ifdef USE_PROTOTYPES
  406. void create_file_property_window(struct file_property_window *file_props, 
  407. X    char *header)
  408. #else
  409. void create_file_property_window(file_props, header)
  410. struct file_property_window *file_props;
  411. char    *header;
  412. #endif
  413. {
  414. X    int x_gap;
  415. X    int y_gap;
  416. X    Rect    rect;
  417. X    Rect    *butrect;
  418. X
  419. X    file_props->frame = xv_create(base_window.frame, FRAME_PROPS,
  420. X        XV_LABEL, header,
  421. #ifdef XVIEW3
  422. X        FRAME_CMD_PIN_STATE, FRAME_CMD_PIN_IN,
  423. #else
  424. X        FRAME_CMD_PUSHPIN_IN, TRUE,
  425. #endif
  426. X        NULL);
  427. X
  428. X    file_props->panel = (Panel)xv_get(file_props->frame, FRAME_PROPS_PANEL);
  429. X
  430. X    x_gap = xv_get(file_props->panel, PANEL_ITEM_X_GAP);
  431. X
  432. X    y_gap = xv_get(file_props->panel, PANEL_ITEM_Y_GAP);
  433. X
  434. X    xv_set(file_props->panel, 
  435. X        PANEL_LAYOUT, PANEL_VERTICAL, 
  436. X        XV_HELP_DATA, "ftptool:FileProperty",
  437. X        NULL);
  438. X
  439. X    file_props->filename = xv_create(file_props->panel, PANEL_MESSAGE,
  440. X        PANEL_LABEL_STRING, "Name:",
  441. X        PANEL_LABEL_BOLD, TRUE,
  442. X        XV_HELP_DATA, "ftptool:FilePropertyName",
  443. X        NULL);
  444. X
  445. X    file_props->owner = xv_create(file_props->panel, PANEL_MESSAGE,
  446. X        PANEL_LABEL_STRING, "Owner:",
  447. X        PANEL_LABEL_BOLD, TRUE,
  448. X        XV_HELP_DATA, "ftptool:FilePropertyOwner",
  449. X        NULL);
  450. X
  451. X    file_props->group = xv_create(file_props->panel, PANEL_MESSAGE,
  452. X        PANEL_LABEL_STRING, "Group:",
  453. X        PANEL_LABEL_BOLD, TRUE,
  454. X        XV_HELP_DATA, "ftptool:FilePropertyGroup",
  455. X        NULL);
  456. X
  457. X    file_props->modtime = xv_create(file_props->panel, PANEL_MESSAGE,
  458. X        PANEL_LABEL_STRING, "Last Modified:",
  459. X        PANEL_LABEL_BOLD, TRUE,
  460. X        XV_HELP_DATA, "ftptool:FilePropertyModtime",
  461. X        NULL);
  462. X
  463. X    file_props->size = xv_create(file_props->panel, PANEL_MESSAGE,
  464. X        PANEL_LABEL_STRING, "Size:",
  465. X        PANEL_LABEL_BOLD, TRUE,
  466. X        XV_HELP_DATA, "ftptool:FilePropertySize",
  467. X        NULL);
  468. X
  469. X    file_props->type = xv_create(file_props->panel, PANEL_MESSAGE,
  470. X        PANEL_LABEL_STRING, "Type:",
  471. X        PANEL_LABEL_BOLD, TRUE,
  472. X        XV_HELP_DATA, "ftptool:FilePropertyType",
  473. X        NULL);
  474. X
  475. X    file_props->perms_message = xv_create(file_props->panel, PANEL_MESSAGE,
  476. X        PANEL_NEXT_ROW, xv_row(file_props->panel, 1),
  477. X        PANEL_LABEL_BOLD, TRUE,
  478. X        PANEL_LABEL_STRING,"Permissions:",
  479. X        NULL);
  480. X
  481. X    file_props->user_perms = xv_create(file_props->panel, PANEL_MESSAGE,
  482. X        PANEL_LABEL_STRING, "Owner:",
  483. X        PANEL_LABEL_BOLD, TRUE,
  484. X        XV_HELP_DATA, "ftptool:FilePropertyUserPerms",
  485. X        NULL);
  486. X
  487. X    file_props->group_perms = xv_create(file_props->panel, PANEL_MESSAGE,
  488. X        PANEL_LABEL_STRING, "Group:",
  489. X        PANEL_LABEL_BOLD, TRUE,
  490. X        XV_HELP_DATA, "ftptool:FilePropertyGroupPerms",
  491. X        NULL);
  492. X
  493. X    file_props->other_perms = xv_create(file_props->panel, PANEL_MESSAGE,
  494. X        PANEL_LABEL_STRING, "Other:",
  495. X        PANEL_LABEL_BOLD, "Other:",
  496. X        XV_HELP_DATA, "ftptool:FilePropertyOtherPerms",
  497. X        NULL);
  498. X
  499. X    file_props->dismiss = xv_create(file_props->panel, PANEL_BUTTON,
  500. X        PANEL_LABEL_STRING, "Dismiss",
  501. X        PANEL_NOTIFY_PROC, dismiss_file_props_window,
  502. X        XV_SHOW, openlook_mode ? FALSE : TRUE,
  503. X        PANEL_CLIENT_DATA, file_props->frame,
  504. X        XV_HELP_DATA, "ftptool:DismissButton",
  505. X        NULL);
  506. X
  507. X    window_fit(file_props->panel);
  508. X    justify_items(file_props->panel, FALSE);
  509. X
  510. X    file_props->filename = xv_create(file_props->panel, PANEL_TEXT,
  511. X        PANEL_VALUE_DISPLAY_LENGTH, 25,
  512. X        PANEL_VALUE_STORED_LENGTH, MAXHOSTNAMELEN,
  513. X        PANEL_READ_ONLY, TRUE,
  514. X        PANEL_ITEM_X, xv_get(file_props->filename, PANEL_ITEM_X)
  515. X            + xv_get(file_props->filename, XV_WIDTH) + x_gap,
  516. X        PANEL_ITEM_Y, xv_get(file_props->filename, PANEL_ITEM_Y),
  517. X        XV_HELP_DATA, "ftptool:FilePropertyName",
  518. X        NULL);
  519. X
  520. X    xv_create(file_props->panel, PANEL_MESSAGE,
  521. X        PANEL_LABEL_BOLD, TRUE,
  522. X        PANEL_LABEL_STRING,"Read  Write Execute",
  523. X        PANEL_ITEM_X, xv_get(file_props->perms_message, PANEL_ITEM_X)
  524. X            + xv_get(file_props->perms_message, XV_WIDTH) + x_gap,
  525. X        PANEL_ITEM_Y, xv_get(file_props->perms_message, PANEL_ITEM_Y),
  526. X        NULL);
  527. X
  528. X    file_props->owner = xv_create(file_props->panel, PANEL_MESSAGE,
  529. X        PANEL_INACTIVE, TRUE,
  530. X        PANEL_READ_ONLY, TRUE,
  531. X        PANEL_ITEM_X, xv_get(file_props->owner, PANEL_ITEM_X)
  532. X            + xv_get(file_props->owner, XV_WIDTH) + x_gap,
  533. X        PANEL_ITEM_Y, xv_get(file_props->owner, PANEL_ITEM_Y),
  534. X        XV_HELP_DATA, "ftptool:FilePropertyOwner",
  535. X        NULL);
  536. X
  537. X    file_props->group = xv_create(file_props->panel, PANEL_MESSAGE,
  538. X        PANEL_INACTIVE, TRUE,
  539. X        PANEL_READ_ONLY, TRUE,
  540. X        PANEL_ITEM_X, xv_get(file_props->group, PANEL_ITEM_X)
  541. X            + xv_get(file_props->group, XV_WIDTH) + x_gap,
  542. X        PANEL_ITEM_Y, xv_get(file_props->group, PANEL_ITEM_Y),
  543. X        XV_HELP_DATA, "ftptool:FilePropertyGroup",
  544. X        NULL);
  545. X
  546. X    file_props->modtime = xv_create(file_props->panel, PANEL_MESSAGE,
  547. X        PANEL_INACTIVE, TRUE,
  548. X        PANEL_READ_ONLY, TRUE,
  549. X        PANEL_ITEM_X, xv_get(file_props->modtime, PANEL_ITEM_X)
  550. X            + xv_get(file_props->modtime, XV_WIDTH) + x_gap,
  551. X        PANEL_ITEM_Y, xv_get(file_props->modtime, PANEL_ITEM_Y),
  552. X        XV_HELP_DATA, "ftptool:FilePropertyModtime",
  553. X        NULL);
  554. X
  555. X    file_props->size = xv_create(file_props->panel, PANEL_MESSAGE,
  556. X        PANEL_INACTIVE, TRUE,
  557. X        PANEL_READ_ONLY, TRUE,
  558. X        PANEL_ITEM_X, xv_get(file_props->size, PANEL_ITEM_X)
  559. X            + xv_get(file_props->size, XV_WIDTH) + x_gap,
  560. X        PANEL_ITEM_Y, xv_get(file_props->size, PANEL_ITEM_Y),
  561. X        XV_HELP_DATA, "ftptool:FilePropertySize",
  562. X        NULL);
  563. X
  564. X    file_props->type = xv_create(file_props->panel, PANEL_MESSAGE,
  565. X        PANEL_INACTIVE, TRUE,
  566. X        PANEL_READ_ONLY, TRUE,
  567. X        PANEL_ITEM_X, xv_get(file_props->type, PANEL_ITEM_X)
  568. X            + xv_get(file_props->type, XV_WIDTH) + x_gap,
  569. X        PANEL_ITEM_Y, xv_get(file_props->type, PANEL_ITEM_Y),
  570. X        XV_HELP_DATA, "ftptool:FilePropertyType",
  571. X        NULL);
  572. X
  573. X    file_props->user_perms = xv_create(file_props->panel, PANEL_CHECK_BOX,
  574. X        PANEL_INACTIVE, TRUE,
  575. X        PANEL_CHOICE_STRINGS,
  576. X            "",
  577. X            "",
  578. X            "",
  579. X            NULL,
  580. X        PANEL_ITEM_X, xv_get(file_props->user_perms, PANEL_ITEM_X)
  581. X            + xv_get(file_props->user_perms, XV_WIDTH) + x_gap * 2,
  582. X        PANEL_ITEM_Y, xv_get(file_props->user_perms, PANEL_ITEM_Y) - y_gap/2,
  583. X        XV_HELP_DATA, "ftptool:FilePropertyUserPerms",
  584. X        NULL);
  585. X
  586. X    file_props->group_perms = xv_create(file_props->panel, PANEL_CHECK_BOX,
  587. X        PANEL_INACTIVE, TRUE,
  588. X        PANEL_CHOICE_STRINGS,
  589. X            "",
  590. X            "",
  591. X            "",
  592. X            NULL,
  593. X        PANEL_ITEM_X, xv_get(file_props->group_perms, PANEL_ITEM_X)
  594. X            + xv_get(file_props->group_perms, XV_WIDTH) + x_gap * 2,
  595. X        PANEL_ITEM_Y, xv_get(file_props->group_perms, PANEL_ITEM_Y) - y_gap/2,
  596. X        XV_HELP_DATA, "ftptool:FilePropertyGroupPerms",
  597. X        NULL);
  598. X
  599. X    file_props->other_perms = xv_create(file_props->panel, PANEL_CHECK_BOX,
  600. X        PANEL_INACTIVE, TRUE,
  601. X        PANEL_CHOICE_STRINGS,
  602. X            "",
  603. X            "",
  604. X            "",
  605. X            NULL,
  606. X        PANEL_ITEM_X, xv_get(file_props->other_perms, PANEL_ITEM_X)
  607. X            + xv_get(file_props->other_perms, XV_WIDTH) + x_gap * 2,
  608. X        PANEL_ITEM_Y, xv_get(file_props->other_perms, PANEL_ITEM_Y) - y_gap/2,
  609. X        XV_HELP_DATA, "ftptool:FilePropertyOtherPerms",
  610. X        NULL);
  611. X
  612. X    window_fit(file_props->panel);
  613. X    window_fit(file_props->frame);
  614. X
  615. X    XSync(dpy, False);
  616. X
  617. X    frame_get_rect(file_props->frame, &rect);
  618. X
  619. X    butrect = (Rect *)xv_get(file_props->dismiss, XV_RECT);
  620. X
  621. X    xv_set(file_props->dismiss,
  622. X        XV_X, rect.r_width / 2 - butrect->r_width / 2,
  623. X        NULL);
  624. }
  625. X
  626. #ifdef USE_PROTOTYPES
  627. void create_tar_file_popup(void)
  628. #else
  629. void create_tar_file_popup()
  630. #endif
  631. {
  632. X    Panel_button_item ok;
  633. X    Rect    *butrect;
  634. X    Panel    panel;
  635. X
  636. X    tar_frame = xv_create(base_window.frame, FRAME_CMD,
  637. X        XV_LABEL, "Ftptool: Create Tar File",
  638. X        NULL);
  639. X 
  640. X    panel = xv_get(tar_frame, FRAME_CMD_PANEL);
  641. X 
  642. X    xv_set(panel, 
  643. X        PANEL_LAYOUT, PANEL_VERTICAL, 
  644. X        XV_HELP_DATA, "ftptool:TarFileNameWindow",
  645. X        NULL);
  646. X 
  647. X    tar_text = xv_create(panel, PANEL_TEXT,
  648. X        PANEL_VALUE_DISPLAY_LENGTH, 20,
  649. X        PANEL_VALUE_STORED_LENGTH, MAXPATHLEN + 1,
  650. X        PANEL_LABEL_STRING, "Tar Filename: ",
  651. X        PANEL_LAYOUT, PANEL_HORIZONTAL,
  652. X        XV_HELP_DATA, "ftptool:TarFileNameText",
  653. X        NULL);
  654. X 
  655. X    ok = xv_create(panel, PANEL_BUTTON,
  656. X        PANEL_NOTIFY_PROC, create_tar_proc,
  657. X        PANEL_LABEL_STRING, "Start Tar",
  658. X        XV_HELP_DATA, "ftptool:TarFileNameButton",
  659. X        NULL);
  660. X    xv_set(panel, 
  661. X        PANEL_DEFAULT_ITEM, ok, 
  662. X        NULL);
  663. X 
  664. X    window_fit(panel);
  665. X    window_fit(tar_frame);
  666. X 
  667. X    butrect = (Rect *)xv_get(ok, XV_RECT);
  668. X    xv_set(ok, 
  669. X        XV_X, (int)xv_get(panel, XV_WIDTH)/2 - butrect->r_width,
  670. X        NULL);
  671. }
  672. X
  673. #ifdef USE_PROTOTYPES
  674. void create_load_save_popup(Frame *framep, Panel *textp, Panel *buttonp)
  675. #else
  676. void create_load_save_popup(framep, textp, buttonp)
  677. Frame    *framep;
  678. Panel    *textp;
  679. Panel    *buttonp;
  680. #endif
  681. {
  682. X    Frame frame;
  683. X    Panel panel;
  684. X    Panel text;
  685. X    Panel button;
  686. X    Rect    *butrect;
  687. X    
  688. X    frame = xv_create(base_window.frame, FRAME_CMD,
  689. X        NULL);
  690. X
  691. X    panel = xv_get(frame, FRAME_CMD_PANEL);
  692. X 
  693. X    xv_set(panel,
  694. X        PANEL_LAYOUT, PANEL_VERTICAL,
  695. X        NULL);
  696. X 
  697. X    text = xv_create(panel, PANEL_TEXT,
  698. X        PANEL_VALUE_DISPLAY_LENGTH, 40,
  699. X        PANEL_VALUE_STORED_LENGTH, MAXPATHLEN + 1,
  700. X        PANEL_LABEL_STRING, "Filename: ",
  701. X        PANEL_LAYOUT, PANEL_HORIZONTAL,
  702. X        XV_HELP_DATA, "ftptool:LoadSaveBatchList",
  703. X        NULL);
  704. X 
  705. X    button = xv_create(panel, PANEL_BUTTON,
  706. X        PANEL_LABEL_STRING, "Load",
  707. X        NULL);
  708. X
  709. X    xv_set(panel, PANEL_DEFAULT_ITEM, button, NULL);
  710. X 
  711. X    window_fit(panel);
  712. X    window_fit(frame);
  713. X 
  714. X    butrect = (Rect *)xv_get(button, XV_RECT);
  715. X    xv_set(button, 
  716. X        XV_X, (int)xv_get(panel, XV_WIDTH)/2 - butrect->r_width,
  717. X        NULL);
  718. X 
  719. X    *framep = frame;
  720. X    *textp = text;
  721. X    *buttonp = button;
  722. }
  723. X
  724. #ifdef USE_PROTOTYPES
  725. void create_schedule_window(void)
  726. #else
  727. void create_schedule_window()
  728. #endif
  729. {
  730. X    Menu    host_menu;
  731. X    Menu    options_menu;
  732. X    Menu    list_menu;
  733. X    Panel    message;
  734. X    int        x,y,width,height;
  735. X
  736. X    schedule_window.frame = (Frame)xv_create(base_window.frame, FRAME_CMD,
  737. X        XV_LABEL, "Ftptool: Schedule Batch Transfer",
  738. X        FRAME_SHOW_RESIZE_CORNER, TRUE,
  739. X        FRAME_SHOW_FOOTER, TRUE,
  740. X        XV_HELP_DATA, "ftptool:ScheduleWindow",
  741. X        NULL);
  742. X
  743. X    schedule_window.panel = xv_get(schedule_window.frame, FRAME_CMD_PANEL);
  744. X
  745. X    xv_set(schedule_window.panel,
  746. X        PANEL_LAYOUT, PANEL_VERTICAL,
  747. X        NULL);
  748. X
  749. X    schedule_window.process = xv_create(schedule_window.panel, PANEL_BUTTON,
  750. X        PANEL_LABEL_STRING, "Process Batch",
  751. X        PANEL_NOTIFY_PROC, batch_process_proc,
  752. X        XV_HELP_DATA, "ftptool:ProcessBatch",
  753. X        NULL);
  754. X
  755. X    xv_set(schedule_window.panel,
  756. X        PANEL_LAYOUT, PANEL_HORIZONTAL,
  757. X        NULL);
  758. X
  759. X    host_menu = xv_create(XV_NULL, MENU,
  760. X        MENU_GEN_PIN_WINDOW, base_window.frame, "Hosts",
  761. X        MENU_TITLE_ITEM, "Hosts",
  762. X        MENU_ITEM,
  763. X            MENU_STRING, "No Hosts!",
  764. X            NULL,
  765. X        NULL);
  766. X
  767. X    schedule_window.hosts = xv_create(schedule_window.panel, PANEL_BUTTON,
  768. X        PANEL_LABEL_STRING, "Hosts",
  769. X        PANEL_ITEM_MENU, host_menu,
  770. X        XV_HELP_DATA, "ftptool:ScheduleHosts",
  771. X        NULL);
  772. X
  773. #ifdef LINT
  774. X    options_menu = NULL;
  775. X    options_menu = options_menu;
  776. #else
  777. X    options_menu = xv_create(XV_NULL, MENU,
  778. X        MENU_ITEM,
  779. X            MENU_STRING, "Set Current",
  780. X            MENU_NOTIFY_PROC, set_current_schedule_proc,
  781. X            XV_HELP_DATA, "ftptool:ScheduleCurrent",
  782. X            NULL,
  783. X        MENU_ITEM,
  784. X            MENU_STRING, "Add",
  785. X            MENU_NOTIFY_PROC, schedule_add_proc,
  786. X            XV_HELP_DATA, "ftptool:ScheduleAdd",
  787. X            NULL,
  788. X        MENU_ITEM,
  789. X            MENU_STRING, "Change",
  790. X            MENU_NOTIFY_PROC, schedule_change_proc,
  791. X            XV_HELP_DATA, "ftptool:ScheduleChange",
  792. X            NULL,
  793. X        MENU_ITEM,
  794. X            MENU_STRING, "Delete",
  795. X            MENU_NOTIFY_PROC, schedule_delete_proc,
  796. X            XV_HELP_DATA, "ftptool:ScheduleDelete",
  797. X            NULL,
  798. X        NULL);
  799. #endif
  800. X
  801. X    schedule_window.options = xv_create(schedule_window.panel, PANEL_BUTTON,
  802. X        PANEL_LABEL_STRING, "Options",
  803. X        PANEL_ITEM_MENU, options_menu,
  804. X        XV_HELP_DATA, "ftptool:ScheduleOptions",
  805. X        NULL);
  806. X
  807. X
  808. X    schedule_window.dismiss = xv_create(schedule_window.panel, PANEL_BUTTON,
  809. X        PANEL_LABEL_STRING, "Dismiss",
  810. X        PANEL_NOTIFY_PROC, dismiss_schedule_window,
  811. X        XV_SHOW, openlook_mode ? FALSE : TRUE,
  812. X        XV_HELP_DATA, "ftptool:DismissButton",
  813. X        NULL);
  814. X
  815. X    xv_set(schedule_window.panel, 
  816. X        PANEL_LAYOUT, PANEL_VERTICAL, 
  817. X        NULL);
  818. X    
  819. X    message = xv_create(schedule_window.panel, PANEL_MESSAGE,
  820. X        PANEL_LABEL_STRING, "Time Now:",
  821. X        PANEL_LABEL_BOLD, TRUE,
  822. X        XV_HELP_DATA, "ftptool:ScheduleTime",
  823. X        NULL);
  824. X
  825. X    schedule_window.direction = xv_create(schedule_window.panel, PANEL_CHOICE,
  826. X        PANEL_LABEL_STRING, "Action:",
  827. X        PANEL_CHOOSE_ONE, TRUE,
  828. X        PANEL_CHOICE_STRINGS,
  829. X            "Receive From",
  830. X            "Send to",
  831. X            NULL,
  832. X        XV_HELP_DATA, "ftptool:ScheduleDirection",
  833. X        PANEL_NOTIFY_PROC, action_choice_proc,
  834. X        NULL);
  835. X
  836. X    schedule_window.menu_name = xv_create(schedule_window.panel, PANEL_TEXT,
  837. X        PANEL_LABEL_STRING, "Target:",
  838. X        PANEL_VALUE, "",
  839. X        PANEL_READ_ONLY, TRUE,
  840. X        PANEL_VALUE_DISPLAY_LENGTH, 30,
  841. X        PANEL_VALUE_STORED_LENGTH, MAXHOSTNAMELEN,
  842. X        XV_HELP_DATA, "ftptool:ScheduleTarget",
  843. X        NULL);
  844. X
  845. X
  846. X    schedule_window.hour = xv_create(schedule_window.panel, PANEL_NUMERIC_TEXT,
  847. X        PANEL_MIN_VALUE, 1,
  848. X        PANEL_MAX_VALUE, 23,
  849. X        PANEL_VALUE_STORED_LENGTH, 20,
  850. X        PANEL_VALUE_DISPLAY_LENGTH, 2,
  851. X        PANEL_LABEL_STRING, "Hour:",
  852. X        XV_HELP_DATA, "ftptool:ScheduleHour",
  853. X        NULL);
  854. X
  855. X    schedule_window.month = xv_create(schedule_window.panel,PANEL_CHOICE_STACK,
  856. X        PANEL_LAYOUT, PANEL_HORIZONTAL,
  857. X        PANEL_LABEL_STRING, "Date:",
  858. X        PANEL_CHOICE_STRINGS,
  859. X            "Jan", "Feb", "Mar", "Apr",
  860. X            "May", "Jun", "Jul", "Aug",
  861. X            "Sep", "Oct", "Nov", "Dec",
  862. X            NULL,
  863. X        PANEL_VALUE, 0,
  864. X        XV_HELP_DATA, "ftptool:ScheduleMonth",
  865. X        NULL);
  866. X
  867. X    window_fit(schedule_window.panel);
  868. X    justify_items(schedule_window.panel, TRUE);
  869. X
  870. X    schedule_window.receive_list = xv_create(schedule_window.panel, PANEL_LIST,
  871. X        PANEL_LIST_DISPLAY_ROWS, 6,
  872. X        PANEL_LAYOUT, PANEL_VERTICAL,
  873. X        PANEL_CHOOSE_NONE, TRUE,
  874. X        PANEL_CHOOSE_ONE, FALSE,
  875. X        PANEL_READ_ONLY, TRUE,
  876. X        PANEL_NOTIFY_PROC, receive_list_proc,
  877. X        XV_HELP_DATA, "ftptool:BatchReceiveList",
  878. X        NULL);
  879. X
  880. X    list_menu = xv_get(schedule_window.receive_list, PANEL_ITEM_MENU);
  881. X
  882. X    xv_set(list_menu, 
  883. X        MENU_GEN_PROC, receive_list_menu_gen,
  884. X        MENU_TITLE_ITEM, "Batch Receive",
  885. X        MENU_ITEM,
  886. X            MENU_STRING, "",
  887. X            MENU_FEEDBACK, FALSE,
  888. X            NULL,
  889. X        MENU_ITEM, 
  890. X            MENU_STRING, "Delete", 
  891. X            MENU_NOTIFY_PROC, receive_list_delete_proc,
  892. X            XV_HELP_DATA, "ftptool:BatchReceiveDelete",
  893. X            NULL,
  894. X        MENU_ITEM, 
  895. X            MENU_STRING, "Copy to Local", 
  896. X            MENU_NOTIFY_PROC, batchget_proc,
  897. X            XV_HELP_DATA, "ftptool:BatchReceiveCopy",
  898. X            NULL,
  899. X        MENU_ITEM, 
  900. X            MENU_STRING, "Load", 
  901. X            MENU_NOTIFY_PROC, show_load_receive_list_proc,
  902. X            XV_HELP_DATA, "ftptool:BatchLoad",
  903. X            NULL,
  904. X        MENU_ITEM, 
  905. X            MENU_STRING, "Save", 
  906. X            MENU_NOTIFY_PROC, show_save_receive_list_proc,
  907. X            XV_HELP_DATA, "ftptool:BatchSave",
  908. X            NULL,
  909. X        NULL);
  910. X
  911. X    schedule_window.send_list = xv_create(schedule_window.panel, PANEL_LIST,
  912. X        PANEL_LIST_DISPLAY_ROWS, 6,
  913. X        PANEL_LAYOUT, PANEL_VERTICAL,
  914. X        PANEL_CHOOSE_NONE, TRUE,
  915. X        PANEL_CHOOSE_ONE, FALSE,
  916. X        PANEL_READ_ONLY, TRUE,
  917. X        PANEL_ITEM_X, xv_get(schedule_window.receive_list, XV_X),
  918. X        PANEL_ITEM_Y, xv_get(schedule_window.receive_list, XV_Y),
  919. X        PANEL_NOTIFY_PROC, send_list_proc,
  920. X        XV_HELP_DATA, "ftptool:BatchSendList",
  921. X        XV_SHOW, FALSE,
  922. X        NULL);
  923. X
  924. X    list_menu = xv_get(schedule_window.send_list, PANEL_ITEM_MENU);
  925. X
  926. X    xv_set(list_menu, 
  927. X        MENU_GEN_PROC, send_list_menu_gen,
  928. X        MENU_TITLE_ITEM, "Batch Send",
  929. X        MENU_ITEM,
  930. X            MENU_STRING, "",
  931. X            MENU_FEEDBACK, FALSE,
  932. X            NULL,
  933. X        MENU_ITEM, 
  934. X            MENU_STRING, "Delete", 
  935. X            MENU_NOTIFY_PROC, send_list_delete_proc,
  936. X            XV_HELP_DATA, "ftptool:BatchSendDelete",
  937. X            NULL,
  938. X        MENU_ITEM, 
  939. X            MENU_STRING, "Copy to Remote", 
  940. X            MENU_NOTIFY_PROC, batchput_proc,
  941. X            XV_HELP_DATA, "ftptool:BatchSendCopy",
  942. X            NULL,
  943. X        MENU_ITEM, 
  944. X            MENU_STRING, "Load", 
  945. X            MENU_NOTIFY_PROC, show_load_send_list_proc,
  946. X            XV_HELP_DATA, "ftptool:BatchLoad",
  947. X            NULL,
  948. X        MENU_ITEM, 
  949. X            MENU_STRING, "Save", 
  950. X            MENU_NOTIFY_PROC, show_save_send_list_proc,
  951. X            XV_HELP_DATA, "ftptool:BatchSave",
  952. X            NULL,
  953. X        NULL);
  954. X
  955. X    xv_set(schedule_window.panel,
  956. X        PANEL_LAYOUT, PANEL_HORIZONTAL,
  957. X        NULL);
  958. X
  959. X
  960. X    schedule_window.current_time = xv_create(schedule_window.panel,
  961. X        PANEL_MESSAGE,
  962. X        PANEL_ITEM_X, xv_get(message, XV_X) + xv_get(message, XV_WIDTH)
  963. X            + xv_col(schedule_window.panel, 1) / 2,
  964. X        PANEL_ITEM_Y, xv_get(message, XV_Y),
  965. X        PANEL_LABEL_STRING, "",
  966. X        XV_HELP_DATA, "ftptool:ScheduleTime",
  967. X        NULL);
  968. X
  969. X    schedule_window.minute = xv_create(schedule_window.panel, 
  970. X        PANEL_NUMERIC_TEXT,
  971. X        PANEL_VALUE_STORED_LENGTH, 20,
  972. X        PANEL_VALUE_DISPLAY_LENGTH, 2,
  973. X        PANEL_MIN_VALUE, 0,
  974. X        PANEL_MAX_VALUE, 59,
  975. X        PANEL_LABEL_STRING, "Minute:",
  976. X        PANEL_ITEM_X, xv_get(schedule_window.hour, XV_X) 
  977. X            + xv_get(schedule_window.hour, XV_WIDTH)
  978. X            + xv_col(schedule_window.panel, 1),
  979. X        PANEL_ITEM_Y, xv_get(schedule_window.hour, XV_Y),
  980. X        XV_HELP_DATA, "ftptool:ScheduleMinute",
  981. X        NULL);
  982. X
  983. X    schedule_window.day = xv_create(schedule_window.panel, 
  984. X        PANEL_NUMERIC_TEXT,
  985. X        PANEL_VALUE_STORED_LENGTH, 20,
  986. X        PANEL_VALUE_DISPLAY_LENGTH, 2,
  987. X        PANEL_MIN_VALUE, 1,
  988. X        PANEL_MAX_VALUE, 31,
  989. X        PANEL_ITEM_X, xv_get(schedule_window.month, XV_X) 
  990. X            + xv_get(schedule_window.month, XV_WIDTH)
  991. X            + xv_col(schedule_window.panel, 1),
  992. X        PANEL_ITEM_Y, xv_get(schedule_window.month, XV_Y)
  993. X            + xv_row(schedule_window.panel, 1)/8,
  994. X        XV_HELP_DATA, "ftptool:ScheduleDay",
  995. X        NULL);
  996. X
  997. X    schedule_window.year = xv_create(schedule_window.panel, 
  998. X        PANEL_NUMERIC_TEXT,
  999. X        PANEL_VALUE_DISPLAY_LENGTH, 4,
  1000. X        PANEL_VALUE_STORED_LENGTH, 40,
  1001. X        PANEL_MIN_VALUE, 1992,
  1002. X        PANEL_MAX_VALUE, 2000,
  1003. X        PANEL_ITEM_X, xv_get(schedule_window.day, XV_X) 
  1004. X            + xv_get(schedule_window.day, XV_WIDTH)
  1005. X            + xv_col(schedule_window.panel, 1),
  1006. X        PANEL_ITEM_Y, xv_get(schedule_window.day, XV_Y),
  1007. X        XV_HELP_DATA, "ftptool:ScheduleYear",
  1008. X        NULL);
  1009. X
  1010. X    window_fit(schedule_window.panel);
  1011. X    window_fit(schedule_window.frame);
  1012. X
  1013. X    xv_set(schedule_window.frame,
  1014. X        WIN_EVENT_PROC, schedule_event_proc,
  1015. X        NULL);
  1016. X    x = xv_get(schedule_window.frame, XV_X);
  1017. X    y = xv_get(schedule_window.frame, XV_Y);
  1018. X    width = xv_get(schedule_window.frame, XV_WIDTH);
  1019. X    height = xv_get(schedule_window.frame, XV_HEIGHT);
  1020. X    set_geometry(schedule_window.geometry,schedule_window.frame,width,
  1021. X        height,x,y);
  1022. X    /*
  1023. X        create load/save popup.
  1024. X     */
  1025. X    create_load_save_popup(&schedule_window.lsframe, &schedule_window.filename, 
  1026. X        &schedule_window.lsbutton);
  1027. }
  1028. X
  1029. #ifdef USE_PROTOTYPES
  1030. void create_status_window(void)
  1031. #else
  1032. void create_status_window()
  1033. #endif
  1034. {
  1035. X    Rect    *butrect;
  1036. X    Rect    rect;
  1037. X    Panel_item    status_message;
  1038. X    Panel_item    size_message;
  1039. X    int        x;
  1040. X    int        y;
  1041. X    int        width;
  1042. X    int        height;
  1043. X
  1044. X    frame_get_rect(base_window.frame, &rect);
  1045. X
  1046. X    status_window.frame = xv_create(base_window.frame, FRAME_CMD,
  1047. X        XV_LABEL, "Ftptool: Transfer Status",
  1048. X        XV_HELP_DATA, "ftptool:StatusWindow",
  1049. X        FRAME_SHOW_FOOTER, TRUE,
  1050. X        NULL);
  1051. X
  1052. X    status_window.panel = xv_get(status_window.frame, FRAME_CMD_PANEL);
  1053. X 
  1054. X    xv_set(status_window.panel,
  1055. X        PANEL_LAYOUT, PANEL_VERTICAL,
  1056. X        WIN_BORDER, TRUE,
  1057. X        NULL);
  1058. X
  1059. X    status_message = xv_create(status_window.panel, PANEL_MESSAGE,
  1060. X        PANEL_LABEL_STRING, "Status:",
  1061. X        PANEL_LABEL_BOLD, TRUE,
  1062. X        NULL);
  1063. X
  1064. X    size_message = xv_create(status_window.panel, PANEL_MESSAGE,
  1065. X        PANEL_LABEL_STRING, "Size:",
  1066. X        PANEL_LABEL_BOLD, TRUE,
  1067. X        NULL);
  1068. X
  1069. #ifdef notdef
  1070. X    status_window.file_gauge = xv_create(status_window.panel, PANEL_GAUGE,
  1071. X        PANEL_NEXT_ROW, xv_row(status_window.panel, 1) / 2,
  1072. X        PANEL_LABEL_STRING, "File:",
  1073. X        PANEL_LABEL_BOLD, TRUE,
  1074. X        PANEL_MIN_VALUE, 0,
  1075. X        PANEL_MAX_VALUE, 100,
  1076. X        PANEL_GAUGE_WIDTH, 200,
  1077. X        PANEL_TICKS, 20,
  1078. X        XV_HELP_DATA, "ftptool:FileGauge",
  1079. X        NULL);
  1080. #endif
  1081. X
  1082. X    status_window.total_gauge = xv_create(status_window.panel, PANEL_GAUGE,
  1083. X        PANEL_NEXT_ROW, xv_row(status_window.panel, 1) / 2,
  1084. X        PANEL_LABEL_STRING, "Total:",
  1085. X        PANEL_LABEL_BOLD, TRUE,
  1086. X        PANEL_MIN_VALUE, 0,
  1087. X        PANEL_MAX_VALUE, 100,
  1088. X        PANEL_GAUGE_WIDTH, 200,
  1089. X        PANEL_TICKS, 20,
  1090. X        XV_HELP_DATA, "ftptool:TotalGauge",
  1091. X        NULL);
  1092. X
  1093. X    status_window.dismiss = xv_create(status_window.panel, PANEL_BUTTON,
  1094. X        PANEL_LABEL_STRING, "Dismiss",
  1095. X        PANEL_NOTIFY_PROC, dismiss_status_window,
  1096. X        XV_HELP_DATA, "ftptool:DismissButton",
  1097. X        NULL);
  1098. X
  1099. X    xv_set(status_window.panel,
  1100. X        WIN_FIT_HEIGHT, 10,
  1101. X        WIN_FIT_WIDTH, 10,
  1102. X        NULL);
  1103. X
  1104. X    justify_items(status_window.panel, TRUE);
  1105. X
  1106. X    status_window.message = xv_create(status_window.panel, PANEL_MESSAGE,
  1107. X        PANEL_LABEL_STRING, "Not Transferring",
  1108. X        PANEL_ITEM_X, xv_get(status_message, XV_X) 
  1109. X            + xv_get(status_message, XV_WIDTH)
  1110. X            + xv_col(status_window.panel, 1) / 2,
  1111. X        PANEL_ITEM_Y, xv_get(status_message, XV_Y),
  1112. X        NULL);
  1113. X
  1114. X    status_window.size = xv_create(status_window.panel, PANEL_MESSAGE,
  1115. X        PANEL_LABEL_STRING, "0 bytes",
  1116. X        PANEL_ITEM_X, xv_get(size_message, XV_X) 
  1117. X            + xv_get(size_message, XV_WIDTH)
  1118. X            + xv_col(status_window.panel, 1) / 2,
  1119. X        PANEL_ITEM_Y, xv_get(size_message, XV_Y),
  1120. X        NULL);
  1121. X
  1122. X    xv_set(status_window.panel,
  1123. X        WIN_FIT_HEIGHT, 10,
  1124. X        WIN_FIT_WIDTH, 10,
  1125. X        NULL);
  1126. X
  1127. X    butrect = (Rect *)xv_get(status_window.dismiss, XV_RECT);
  1128. X    xv_set(status_window.dismiss,
  1129. X        XV_X, xv_get(status_window.panel, XV_WIDTH) / 2
  1130. X            - butrect->r_width / 2,
  1131. X        XV_SHOW, openlook_mode ? FALSE : TRUE,
  1132. X        NULL);
  1133. X
  1134. X    window_fit(status_window.frame);
  1135. X
  1136. X    x = rect.r_left - xv_get(status_window.frame, XV_WIDTH);
  1137. X    y = rect.r_top;
  1138. X    width = xv_get(status_window.frame, XV_WIDTH);
  1139. X    height = xv_get(status_window.frame, XV_HEIGHT);
  1140. X
  1141. X    set_geometry(status_window.geometry, status_window.frame, 
  1142. X        width, height, x, y);
  1143. }
  1144. SHAR_EOF
  1145. echo 'File create_other.c is complete' &&
  1146. chmod 0644 create_other.c ||
  1147. echo 'restore of create_other.c failed'
  1148. Wc_c="`wc -c < 'create_other.c'`"
  1149. test 40591 -eq "$Wc_c" ||
  1150.     echo 'create_other.c: original size 40591, current size' "$Wc_c"
  1151. rm -f _shar_wnt_.tmp
  1152. fi
  1153. # ============= button_funcs.c ==============
  1154. if test -f 'button_funcs.c' -a X"$1" != X"-c"; then
  1155.     echo 'x - skipping button_funcs.c (File already exists)'
  1156.     rm -f _shar_wnt_.tmp
  1157. else
  1158. > _shar_wnt_.tmp
  1159. echo 'x - extracting button_funcs.c (Text)'
  1160. sed 's/^X//' << 'SHAR_EOF' > 'button_funcs.c' &&
  1161. #include "ftptool.h"
  1162. X
  1163. #ifdef USE_PROTOTYPES
  1164. void    connect_proc(void)
  1165. #else
  1166. void    connect_proc()
  1167. #endif
  1168. {
  1169. X    if (!strcmp((char *)xv_get(base_window.connect, 
  1170. X        PANEL_LABEL_STRING), " Connect... ")) {
  1171. X        if (xv_get(host_window.frame, XV_SHOW) == FALSE) {
  1172. X            xv_set(host_window.frame, 
  1173. X                XV_SHOW, TRUE, 
  1174. X                NULL);
  1175. X            return;
  1176. X        }
  1177. X        dowhat = DOCONNECT;
  1178. X        notify_stop();
  1179. X    } else {
  1180. X        /* disconnect */
  1181. X        /* used to make sure we are connected */
  1182. X        /* with PANEL_INACTIVE, don't need to anymore */
  1183. X        footer_message("Disconnecting...", (char *)NULL);
  1184. X        footer_message("", (char *)NULL);
  1185. X        disconnect();
  1186. X    }
  1187. }
  1188. X
  1189. #ifdef USE_PROTOTYPES
  1190. void    local_properties(void)
  1191. #else
  1192. void    local_properties()
  1193. #endif
  1194. {
  1195. X    if (!openlook_mode && xv_get(local_file_properties.frame, XV_SHOW)==TRUE){
  1196. X        xv_set(local_file_properties.frame, 
  1197. X            XV_SHOW, FALSE, 
  1198. X            NULL);
  1199. X    } else {
  1200. X        xv_set(local_file_properties.frame, 
  1201. X            XV_SHOW, TRUE, 
  1202. X            NULL);
  1203. X    }
  1204. }
  1205. X
  1206. #ifdef USE_PROTOTYPES
  1207. void    remote_properties(void)
  1208. #else
  1209. void    remote_properties()
  1210. #endif
  1211. {
  1212. X    if (!openlook_mode && xv_get(remote_file_properties.frame,XV_SHOW)==TRUE){
  1213. X        xv_set(remote_file_properties.frame, 
  1214. X            XV_SHOW, FALSE, 
  1215. X            NULL);
  1216. X    } else {
  1217. X        xv_set(remote_file_properties.frame, 
  1218. X            XV_SHOW, TRUE, 
  1219. X            NULL);
  1220. X    }
  1221. }
  1222. X
  1223. #ifdef USE_PROTOTYPES
  1224. void    props_proc(void)
  1225. #else
  1226. void    props_proc()
  1227. #endif
  1228. {
  1229. X    if (!openlook_mode && xv_get(tool_property_window.frame, XV_SHOW)==TRUE){
  1230. X        xv_set(tool_property_window.frame, 
  1231. X            XV_SHOW, FALSE, 
  1232. X            NULL);
  1233. X    } else {
  1234. X        xv_set(tool_property_window.frame, 
  1235. X            XV_SHOW, TRUE, 
  1236. X            NULL);
  1237. X    }
  1238. }
  1239. X
  1240. #ifdef USE_PROTOTYPES
  1241. void    get_proc(void)
  1242. #else
  1243. void    get_proc()
  1244. #endif
  1245. {
  1246. X    dowhat = DOGET;
  1247. X    notify_stop();
  1248. }
  1249. X
  1250. #ifdef USE_PROTOTYPES
  1251. void    batchget_proc(void)
  1252. #else
  1253. void    batchget_proc()
  1254. #endif
  1255. {
  1256. X    dowhat = DOBATCHGET;
  1257. X    notify_stop();
  1258. }
  1259. X
  1260. #ifdef USE_PROTOTYPES
  1261. void    uncompress_proc(void)
  1262. #else
  1263. void    uncompress_proc()
  1264. #endif
  1265. {
  1266. X    dowhat = DOUNCOMPRESS;
  1267. X    notify_stop();
  1268. }
  1269. X
  1270. #ifdef USE_PROTOTYPES
  1271. void    compress_proc(void)
  1272. #else
  1273. void    compress_proc()
  1274. #endif
  1275. {
  1276. X    dowhat = DOCOMPRESS;
  1277. X    notify_stop();
  1278. }
  1279. X
  1280. #ifdef USE_PROTOTYPES
  1281. void    tar_proc(void)
  1282. #else
  1283. void    tar_proc()
  1284. #endif
  1285. {
  1286. X    dowhat = DOGETTARFILENAME;
  1287. X    notify_stop();
  1288. }
  1289. X
  1290. #ifdef USE_PROTOTYPES
  1291. void    create_tar_proc(void)
  1292. #else
  1293. void    create_tar_proc()
  1294. #endif
  1295. {
  1296. X    dowhat = DOTAR;
  1297. X    notify_stop();
  1298. }
  1299. X
  1300. #ifdef USE_PROTOTYPES
  1301. void    extract_proc(void)
  1302. #else
  1303. void    extract_proc()
  1304. #endif
  1305. {
  1306. X    dowhat = DOEXTRACT;
  1307. X    notify_stop();
  1308. }
  1309. X
  1310. #ifdef USE_PROTOTYPES
  1311. void    put_proc(void)
  1312. #else
  1313. void    put_proc()
  1314. #endif
  1315. {
  1316. X    dowhat = DOPUT;
  1317. X    notify_stop();
  1318. }
  1319. X
  1320. #ifdef USE_PROTOTYPES
  1321. void    batchput_proc(void)
  1322. #else
  1323. void    batchput_proc()
  1324. #endif
  1325. {
  1326. X    dowhat = DOBATCHPUT;
  1327. X    notify_stop();
  1328. }
  1329. X
  1330. #ifdef USE_PROTOTYPES
  1331. void    remote_view(void)
  1332. #else
  1333. void    remote_view()
  1334. #endif
  1335. {
  1336. X    dowhat = DOREMOTEVIEW;
  1337. X    notify_stop();
  1338. }
  1339. X
  1340. #ifdef USE_PROTOTYPES
  1341. void    local_view(void)
  1342. #else
  1343. void    local_view()
  1344. #endif
  1345. {
  1346. X    dowhat = DOLOCALVIEW;
  1347. X    notify_stop();
  1348. }
  1349. X
  1350. #ifdef USE_PROTOTYPES
  1351. void    local_dir_view(void)
  1352. #else
  1353. void    local_dir_view()
  1354. #endif
  1355. {
  1356. X    if (!openlook_mode && xv_get(local_window.frame, XV_SHOW) == TRUE) {
  1357. X        xv_set(local_window.frame, 
  1358. X            XV_SHOW, FALSE, 
  1359. X            NULL);
  1360. X    } else {
  1361. X        xv_set(local_window.frame, 
  1362. X            XV_SHOW, TRUE, 
  1363. X            NULL);
  1364. X    }
  1365. }
  1366. X
  1367. #ifdef USE_PROTOTYPES
  1368. void    session_view(void)
  1369. #else
  1370. void    session_view()
  1371. #endif
  1372. {
  1373. X    if (!openlook_mode && xv_get(session_window.frame, XV_SHOW) == TRUE) {
  1374. X        xv_set(session_window.frame, 
  1375. X            XV_SHOW, FALSE, 
  1376. X            NULL);
  1377. X    } else {
  1378. X        xv_set(session_window.frame, 
  1379. X            XV_SHOW, TRUE, 
  1380. X            NULL);
  1381. X    }
  1382. }
  1383. X
  1384. #ifdef USE_PROTOTYPES
  1385. void    status_view(void)
  1386. #else
  1387. void    status_view()
  1388. #endif
  1389. {
  1390. X    if (!openlook_mode && xv_get(status_window.frame, XV_SHOW) == TRUE) {
  1391. X        xv_set(status_window.frame, 
  1392. X            XV_SHOW, FALSE, 
  1393. X            NULL);
  1394. X    } else {
  1395. X        xv_set(status_window.frame, 
  1396. X            XV_SHOW, TRUE, 
  1397. X            NULL);
  1398. X    }
  1399. }
  1400. X
  1401. #ifdef USE_PROTOTYPES
  1402. void    host_view(void)
  1403. #else
  1404. void    host_view()
  1405. #endif
  1406. {
  1407. X    if (!openlook_mode && xv_get(host_window.frame, XV_SHOW) == TRUE) {
  1408. X        xv_set(host_window.frame, 
  1409. X            XV_SHOW, FALSE, 
  1410. X            NULL);
  1411. X    } else {
  1412. X        xv_set(host_window.frame, 
  1413. X            XV_SHOW, TRUE, 
  1414. X            NULL);
  1415. X    }
  1416. }
  1417. X
  1418. #ifdef USE_PROTOTYPES
  1419. void    schedule_view(void)
  1420. #else
  1421. void    schedule_view()
  1422. #endif
  1423. {
  1424. X    if (!openlook_mode && xv_get(schedule_window.frame, XV_SHOW) == TRUE) {
  1425. X        xv_set(schedule_window.frame, 
  1426. X            XV_SHOW, FALSE, 
  1427. X            NULL);
  1428. X    } else {
  1429. X        xv_set(schedule_window.frame, 
  1430. X            XV_SHOW, TRUE, 
  1431. X            NULL);
  1432. X    }
  1433. }
  1434. X
  1435. #ifdef USE_PROTOTYPES
  1436. void    abort_proc(void)
  1437. #else
  1438. void    abort_proc()
  1439. #endif
  1440. {
  1441. X    abort_transfer = 1; 
  1442. X    xv_set(base_window.frame,
  1443. X        FRAME_BUSY, TRUE,
  1444. X        NULL);
  1445. }
  1446. X
  1447. X
  1448. #ifdef USE_PROTOTYPES
  1449. int local_list_proc(Panel_item item, char *string, Xv_opaque client_data,
  1450. X    Panel_list_op op, Event *event)
  1451. #else
  1452. int local_list_proc(item,string,client_data,op,event)
  1453. Panel_item        item;
  1454. char            *string;
  1455. XXv_opaque        client_data;
  1456. Panel_list_op   op;
  1457. Event            *event;
  1458. #endif
  1459. {
  1460. X    struct dirlist *tmp = (struct dirlist *)client_data;
  1461. X    static struct dirlist *lastselected;
  1462. X    static double lasttime;
  1463. X    double    newtime;
  1464. X
  1465. X    switch(op) {
  1466. X        case PANEL_LIST_OP_SELECT:
  1467. X            if (S_ISREG(tmp->mode) || S_ISLNK(tmp->mode)) {
  1468. X                local_list_nfiles++;
  1469. X            } else if (S_ISDIR(tmp->mode)) {
  1470. X                local_list_ndirs++;
  1471. X            } else
  1472. X                local_list_nothers++;
  1473. X            show_stats(&local_file_properties, tmp);
  1474. X            break;
  1475. X        case PANEL_LIST_OP_DESELECT:
  1476. X            if (S_ISREG(tmp->mode) || S_ISLNK(tmp->mode)) {
  1477. X                local_list_nfiles--;
  1478. X            } else if (S_ISDIR(tmp->mode)) {
  1479. X                local_list_ndirs--;
  1480. X            } else
  1481. X                local_list_nothers--;
  1482. X            if ((local_list_nfiles+local_list_ndirs+local_list_nothers)==0)
  1483. X                inactivate_props(&local_file_properties);
  1484. X            break;
  1485. X        default:
  1486. X            return (XV_OK);
  1487. X    }
  1488. X    local_show_items();
  1489. X    if (tmp == lastselected) {
  1490. X        newtime=event->ie_time.tv_sec + event->ie_time.tv_usec/1000000.0;
  1491. X        if ((newtime - lasttime) <= click_timeout) {
  1492. X            local_doubleclick(tmp);
  1493. X            lastselected = NULL;
  1494. X            goto out;
  1495. X        }
  1496. X    }
  1497. X    lastselected = tmp;
  1498. X    lasttime = event->ie_time.tv_sec + event->ie_time.tv_usec/1000000.0;
  1499. out:
  1500. X    change_local_list_menu();
  1501. X    return (XV_OK);
  1502. }
  1503. X
  1504. #ifdef USE_PROTOTYPES
  1505. int remote_list_proc(Panel_item item, char *string, Xv_opaque client_data,
  1506. X    Panel_list_op op, Event *event)
  1507. #else
  1508. int remote_list_proc(item,string,client_data,op,event)
  1509. Panel_item        item;
  1510. char            *string;
  1511. XXv_opaque         client_data;
  1512. Panel_list_op   op;
  1513. Event            *event;
  1514. #endif
  1515. {
  1516. X    struct dirlist *tmp = (struct dirlist *)client_data;
  1517. X    static struct dirlist *lastselected;
  1518. X    static double lasttime;
  1519. X    double    newtime;
  1520. X
  1521. X    if (!connected)
  1522. X        return (XV_OK);
  1523. X    switch(op) {
  1524. X        case PANEL_LIST_OP_SELECT:
  1525. X            if (non_unix || S_ISREG(tmp->mode) || S_ISLNK(tmp->mode)) {
  1526. X                remote_list_nfiles++;
  1527. X            } else if (S_ISDIR(tmp->mode)) {
  1528. X                remote_list_ndirs++;
  1529. X            } else
  1530. X                remote_list_nothers++;
  1531. X            show_stats(&remote_file_properties, tmp);
  1532. X            break;
  1533. X        case PANEL_LIST_OP_DESELECT:
  1534. X            if (non_unix || S_ISREG(tmp->mode) || S_ISLNK(tmp->mode)) {
  1535. X                remote_list_nfiles--;
  1536. X            } else if (S_ISDIR(tmp->mode)) {
  1537. X                remote_list_ndirs--;
  1538. X            } else
  1539. X                remote_list_nothers--;
  1540. X            if ((remote_list_nfiles+remote_list_ndirs+remote_list_nothers)==0)
  1541. X                inactivate_props(&remote_file_properties);
  1542. X            break;
  1543. X        default:
  1544. X            return (XV_OK);
  1545. X    }
  1546. X    remote_show_items();
  1547. X    if (tmp == lastselected) {
  1548. X        newtime=event->ie_time.tv_sec + event->ie_time.tv_usec/1000000.0;
  1549. X        if ((newtime - lasttime) <= click_timeout) {
  1550. X            if (S_ISLNK(tmp->mode))
  1551. X                which_remote_file = linkname(tmp->name);
  1552. X            else
  1553. X                which_remote_file = strdup(tmp->name);
  1554. X            if (which_remote_file == NULL) {
  1555. X                fprintf(stderr,"Out of memory.\n");
  1556. X            } else {
  1557. X                which_remote_mode = tmp->mode;
  1558. X                which_remote_size = tmp->size;
  1559. X                dowhat=DOREMOTEDOUBLECLICK;
  1560. X                notify_stop();
  1561. X            }
  1562. X            lastselected = NULL;
  1563. X            goto out;
  1564. X        }
  1565. X    }
  1566. X    lastselected = tmp;
  1567. X    lasttime = event->ie_time.tv_sec + event->ie_time.tv_usec/1000000.0;
  1568. out:
  1569. X    change_remote_list_menu();
  1570. X    return (XV_OK);
  1571. }
  1572. X
  1573. #ifdef USE_PROTOTYPES
  1574. int send_list_proc(Panel_item item, char *string, Xv_opaque client_data,
  1575. X    Panel_list_op op,Event *event)
  1576. #else
  1577. int send_list_proc(item,string,client_data,op,event)
  1578. Panel_item        item;
  1579. char            *string;
  1580. XXv_opaque         client_data;
  1581. Panel_list_op   op;
  1582. Event            *event;
  1583. #endif
  1584. {
  1585. X    switch(op) {
  1586. X        case PANEL_LIST_OP_SELECT:
  1587. X            nsenditems++;
  1588. X            break;
  1589. X        case PANEL_LIST_OP_DESELECT:
  1590. X            nsenditems--;
  1591. X            break;
  1592. X        default:
  1593. X            return (XV_OK);
  1594. X    }
  1595. X    return (XV_OK);
  1596. }
  1597. X
  1598. #ifdef USE_PROTOTYPES
  1599. int receive_list_proc(Panel_item item, char *string, Xv_opaque client_data,
  1600. X    Panel_list_op op, Event *event)
  1601. #else
  1602. int receive_list_proc(item,string,client_data,op,event)
  1603. Panel_item        item;
  1604. char            *string;
  1605. XXv_opaque         client_data;
  1606. Panel_list_op   op;
  1607. Event            *event;
  1608. #endif
  1609. {
  1610. X    switch(op) {
  1611. X        case PANEL_LIST_OP_SELECT:
  1612. X            nreceiveitems++;
  1613. X            break;
  1614. X        case PANEL_LIST_OP_DESELECT:
  1615. X            nreceiveitems--;
  1616. X            break;
  1617. X        default:
  1618. X            return (XV_OK);
  1619. X    }
  1620. X    return (XV_OK);
  1621. }
  1622. X
  1623. X
  1624. #ifdef USE_PROTOTYPES
  1625. void apply_changes(void)
  1626. #else
  1627. void apply_changes()
  1628. #endif
  1629. {
  1630. X    int    answer;
  1631. X
  1632. #ifdef XVIEW3
  1633. X    Xv_notice notice;
  1634. X
  1635. X    /* set resources */
  1636. X    notice = xv_create(tool_property_window.panel, NOTICE,
  1637. X        NOTICE_MESSAGE_STRINGS,
  1638. X            "Applying your changes will only apply to this session,",
  1639. X            "but can also be saved for future sessions. Saving changes",
  1640. X            "will replace your ~/.ftptooldefaults file.",
  1641. X            NULL,
  1642. X        NOTICE_BUTTON_YES,      "Apply to session only",
  1643. X        NOTICE_BUTTON,          "Save changes", 2,
  1644. X        NOTICE_STATUS, &answer,
  1645. X        XV_SHOW, TRUE,
  1646. X        NULL);
  1647. X    xv_destroy_safe(notice);
  1648. #else
  1649. X    answer = notice_prompt(tool_property_window.panel, NULL,
  1650. X        NOTICE_MESSAGE_STRINGS,
  1651. X            "Applying your changes will only apply to this session,",
  1652. X            "but can also be saved for future sessions. Saving changes",
  1653. X            "will replace your ~/.ftptooldefaults file.",
  1654. X            NULL,
  1655. X        NOTICE_BUTTON_YES,      "Apply to session only",
  1656. X        NOTICE_BUTTON,          "Save changes", 2,
  1657. X        NULL);
  1658. #endif
  1659. X    if (answer == NOTICE_YES)
  1660. X        return;
  1661. X
  1662. X
  1663. X    set_xdefaults();
  1664. X    save_xdefaults();
  1665. }
  1666. X
  1667. #ifdef USE_PROTOTYPES
  1668. void ftptool_props_apply_proc(void)
  1669. #else
  1670. void ftptool_props_apply_proc()
  1671. #endif
  1672. {
  1673. X    int    oldconfirmdeletes;
  1674. X    int    oldopenlook_mode;
  1675. X    int    oldignore_case;
  1676. X    int changed=0;
  1677. X    char    *s;
  1678. X    int    options;
  1679. X    int    oldoptions;
  1680. X    struct dirlist *head;
  1681. X
  1682. X    /* selections */
  1683. X    /* logging keepalive*/
  1684. X    oldoptions = logging | keepalive;
  1685. X    options = xv_get(tool_property_window.ftptool.options, PANEL_VALUE);
  1686. X    logging = options & 0x1;
  1687. X    keepalive = options & 0x2;
  1688. X    if (logging) {
  1689. X        xv_set(session_window.frame, 
  1690. X            XV_SHOW, TRUE, 
  1691. X            NULL);
  1692. X    } else {
  1693. X        xv_set(session_window.frame, 
  1694. X            XV_SHOW, FALSE, 
  1695. X            NULL);
  1696. X    }
  1697. X
  1698. X    if (oldoptions != options)
  1699. X        changed++;
  1700. X
  1701. X    oldoptions = unique_local_names | unique_remote_names;
  1702. X    options = xv_get(tool_property_window.ftptool.unique, PANEL_VALUE);
  1703. X    unique_local_names = options & 0x1;
  1704. X    unique_remote_names = options & 0x2;
  1705. X
  1706. X    if (oldoptions != options)
  1707. X        changed++;
  1708. X
  1709. X    oldoptions = auto_connect | show_status | try_proxy;
  1710. X    options = xv_get(tool_property_window.ftptool.automatic, PANEL_VALUE);
  1711. X    auto_connect = options & 0x1;
  1712. X    show_status = options & 0x2;
  1713. X    try_proxy = options & 0x4;
  1714. X
  1715. X    if (oldoptions != options)
  1716. X        changed++;
  1717. X
  1718. X    oldconfirmdeletes = confirmdeletes;
  1719. X    confirmdeletes = xv_get(tool_property_window.ftptool.confirm,
  1720. X        PANEL_VALUE);
  1721. X    if (oldconfirmdeletes != confirmdeletes)
  1722. X        changed = 1;
  1723. X
  1724. X    oldignore_case = ignore_case;
  1725. X    ignore_case = xv_get(tool_property_window.ftptool.ignore_case,
  1726. X        PANEL_VALUE);
  1727. X    if (oldignore_case != ignore_case) {
  1728. X        hostlist_head = sort_hostlist(hostlist_head);
  1729. X        reload_host_list_menu(hostlist_head);
  1730. X
  1731. X        if (local_sort_mode == SORTBYNAME) {
  1732. X            clear_slist(local_window.list);
  1733. X            head = sort_dirlist(local_dircache.first->dlist, 
  1734. X                local_sort_mode, local_sort_direction);
  1735. X            if (head != NULL) {
  1736. X                dirlist_to_slist(local_window.list, head);
  1737. X            }
  1738. X        }
  1739. X
  1740. X        if (remote_sort_mode == SORTBYNAME && connected ) {
  1741. X            clear_slist(base_window.list);
  1742. X            head = sort_dirlist(remote_dircache.first->dlist, 
  1743. X                remote_sort_mode, remote_sort_direction);
  1744. X            if (head != NULL) {
  1745. X                dirlist_to_slist(base_window.list, head);
  1746. X            }
  1747. X        }
  1748. X
  1749. X        changed = 1;
  1750. X    }
  1751. X
  1752. X    oldopenlook_mode = openlook_mode;
  1753. X    openlook_mode = xv_get(tool_property_window.ftptool.openlook,
  1754. X        PANEL_VALUE);
  1755. X
  1756. X    if (oldopenlook_mode != openlook_mode)
  1757. X        changed = 1;
  1758. X
  1759. X    if (openlook_mode) {
  1760. X        xv_set(base_window.quit, 
  1761. X            XV_SHOW, FALSE, 
  1762. X            NULL);
  1763. X        xv_set(local_window.dismiss, 
  1764. X            XV_SHOW, FALSE, 
  1765. X            NULL);
  1766. X        xv_set(local_file_properties.dismiss, 
  1767. X            XV_SHOW, FALSE, 
  1768. X            NULL);
  1769. X        xv_set(remote_file_properties.dismiss, 
  1770. X            XV_SHOW, FALSE, 
  1771. X            NULL);
  1772. X        xv_set(schedule_window.dismiss,
  1773. X            XV_SHOW, FALSE,
  1774. X            NULL);
  1775. X        xv_set(status_window.dismiss,
  1776. X            XV_SHOW, FALSE,
  1777. X            NULL);
  1778. X
  1779. X    } else {
  1780. X        xv_set(base_window.quit, 
  1781. X            XV_SHOW, TRUE, 
  1782. X            NULL);
  1783. X        xv_set(local_window.dismiss, 
  1784. X            XV_SHOW, TRUE, 
  1785. X            NULL);
  1786. X        xv_set(local_file_properties.dismiss, 
  1787. X            XV_SHOW, TRUE, 
  1788. X            NULL);
  1789. X        xv_set(remote_file_properties.dismiss, 
  1790. X            XV_SHOW, TRUE, 
  1791. X            NULL);
  1792. X        xv_set(schedule_window.dismiss,
  1793. X            XV_SHOW, TRUE,
  1794. X            NULL);
  1795. X        xv_set(status_window.dismiss,
  1796. X            XV_SHOW, TRUE,
  1797. X            NULL);
  1798. X    }
  1799. X    resize_window(local_window.panel, local_window.list,
  1800. X        local_window.dismiss);
  1801. X
  1802. X    add_dismiss(host_window.basic.panel, host_window.basic.connect,
  1803. X        host_window.basic.dismiss);
  1804. X    add_dismiss(about_window.panel, about_window.mail,
  1805. X        about_window.dismiss);
  1806. X
  1807. X    s = (char *)xv_get(tool_property_window.ftptool.anonftp, PANEL_VALUE);
  1808. X    if (*s != '\0' && strcmp(s, anonftp_password) != 0) {
  1809. X        changed = 1;
  1810. X        free(anonftp_password);
  1811. X        anonftp_password = strdup(s);
  1812. X    }
  1813. X
  1814. X    if (changed)
  1815. X        apply_changes();
  1816. }
  1817. X
  1818. #ifdef USE_PROTOTYPES
  1819. void directory_lists_props_apply_proc(void)
  1820. #else
  1821. void directory_lists_props_apply_proc()
  1822. #endif
  1823. {
  1824. X    int    olddircache_size;
  1825. X    int    oldsort_mode;
  1826. X    int    oldsort_direction;
  1827. X    int    olddotfiles;
  1828. X    int    oldgroup_files;
  1829. X    struct dirlist *head;
  1830. X    int    changed = 0;
  1831. X
  1832. X    olddircache_size = dircache_size;
  1833. X    if (xv_get(tool_property_window.directory_lists.cache_inf,
  1834. X        PANEL_VALUE) == 1)
  1835. X        dircache_size = 0;
  1836. X    else
  1837. X        dircache_size=xv_get(tool_property_window.directory_lists.cache, 
  1838. X            PANEL_VALUE);
  1839. X    if (olddircache_size != dircache_size) {
  1840. X        changed = 1;
  1841. X        dircache_shrink(&local_dircache, dircache_size);
  1842. X        dircache_shrink(&remote_dircache, dircache_size);
  1843. X    }
  1844. X
  1845. X    oldsort_mode = remote_sort_mode;
  1846. X    remote_sort_mode=
  1847. X        xv_get(tool_property_window.directory_lists.remote_sort,
  1848. X            PANEL_VALUE);
  1849. X
  1850. X    oldsort_direction = remote_sort_direction;
  1851. X    remote_sort_direction=
  1852. X        xv_get(tool_property_window.directory_lists.remote_sortdir,
  1853. X            PANEL_VALUE);
  1854. X
  1855. X    olddotfiles = local_showdotfiles;
  1856. X    local_showdotfiles =
  1857. X        xv_get(tool_property_window.directory_lists.local_dotfiles, 
  1858. X            PANEL_VALUE);
  1859. X    if (olddotfiles != local_showdotfiles) {
  1860. X        changed = 1;
  1861. X        change_local_dir(".", 0);
  1862. X    }
  1863. X
  1864. X    olddotfiles = remote_showdotfiles;
  1865. X    remote_showdotfiles =
  1866. X        xv_get(tool_property_window.directory_lists.remote_dotfiles, 
  1867. X            PANEL_VALUE);
  1868. X    if (olddotfiles != remote_showdotfiles) {
  1869. X        changed = 1;
  1870. X        if (connected) {
  1871. X            which_remote_file = strdup(".");
  1872. X            if (which_remote_file == NULL) {
  1873. X                fprintf(stderr,"Out of memory.\n");
  1874. X                exit(1);
  1875. X            } else {
  1876. X                dowhat=DOREMOTECD;
  1877. X                notify_stop();
  1878. X            }
  1879. X        }
  1880. X    }
  1881. X
  1882. X    oldgroup_files = group_remote_files;
  1883. X    group_remote_files=
  1884. X        xv_get(tool_property_window.directory_lists.remote_group,
  1885. X            PANEL_VALUE);
  1886. X
  1887. X    if ((oldsort_mode != remote_sort_mode) 
  1888. X        || (oldsort_direction != remote_sort_direction) 
  1889. X        || (oldgroup_files != group_remote_files)) {
  1890. X        changed = 1;
  1891. X        if (connected && (remote_showdotfiles == olddotfiles)) {
  1892. X            clear_slist(base_window.list);
  1893. X            head = sort_dirlist(remote_dircache.first->dlist, 
  1894. X                remote_sort_mode, remote_sort_direction);
  1895. X            if (head != NULL) {
  1896. X                dirlist_to_slist(base_window.list, head);
  1897. X            }
  1898. X        }
  1899. X    }
  1900. X
  1901. X    oldsort_mode = local_sort_mode;
  1902. X    local_sort_mode = 
  1903. X        xv_get(tool_property_window.directory_lists.local_sort,
  1904. X            PANEL_VALUE);
  1905. X
  1906. X    oldsort_direction = local_sort_direction;
  1907. X    local_sort_direction = 
  1908. X        xv_get(tool_property_window.directory_lists.local_sortdir,
  1909. X            PANEL_VALUE);
  1910. X
  1911. X    oldgroup_files = group_local_files;
  1912. X    group_local_files = 
  1913. X        xv_get(tool_property_window.directory_lists.local_group,
  1914. X            PANEL_VALUE);
  1915. X
  1916. X    if ((oldsort_mode != local_sort_mode) 
  1917. X        || (oldsort_direction != local_sort_direction)
  1918. X        || (oldgroup_files != group_local_files)) {
  1919. X        changed = 1;
  1920. X        clear_slist(local_window.list);
  1921. X        head = sort_dirlist(local_dircache.first->dlist, 
  1922. X            local_sort_mode, local_sort_direction);
  1923. X        if (head != NULL) {
  1924. X            dirlist_to_slist(local_window.list, head);
  1925. X        }
  1926. X    }
  1927. X
  1928. X    if (changed)
  1929. X        apply_changes();
  1930. }
  1931. X
  1932. #ifdef USE_PROTOTYPES
  1933. void viewers_props_apply_proc(void)
  1934. #else
  1935. void viewers_props_apply_proc()
  1936. #endif
  1937. {
  1938. X    int    changed = 0;
  1939. X    char    *s;
  1940. X
  1941. X    s = (char *)xv_get(tool_property_window.viewers.viewer, PANEL_VALUE);
  1942. X    if (*s != '\0' && strcmp(s, default_viewer) != 0) {
  1943. X        changed = 1;
  1944. X        free(default_viewer);
  1945. X        default_viewer = strdup(s);
  1946. X    }
  1947. X
  1948. X    s = (char *)xv_get(tool_property_window.viewers.archive, PANEL_VALUE);
  1949. X    if (*s != '\0' && strcmp(s, archive_viewer) != 0) {
  1950. X        changed = 1;
  1951. X        free(archive_viewer);
  1952. X        archive_viewer = strdup(s);
  1953. X    }
  1954. X
  1955. X    s=(char *)xv_get(tool_property_window.viewers.postscript,PANEL_VALUE);
  1956. X    if (*s != '\0' && strcmp(s, postscript_viewer) != 0) {
  1957. X        changed = 1;
  1958. X        free(postscript_viewer);
  1959. X        postscript_viewer = strdup(s);
  1960. X    }
  1961. X
  1962. X    if (changed)
  1963. X        apply_changes();
  1964. }
  1965. X
  1966. #ifdef USE_PROTOTYPES
  1967. void ftptool_props_reset_proc(void)
  1968. #else
  1969. void ftptool_props_reset_proc()
  1970. #endif
  1971. {
  1972. X    int    options;
  1973. X
  1974. X    options = logging | keepalive;
  1975. X    xv_set(tool_property_window.ftptool.options,
  1976. X        PANEL_VALUE, options, 
  1977. X        NULL);
  1978. X    options = unique_local_names | unique_remote_names;
  1979. X    xv_set(tool_property_window.ftptool.unique,
  1980. X        PANEL_VALUE, options, 
  1981. X        NULL);
  1982. X    options = auto_connect | show_status | try_proxy;
  1983. X    xv_set(tool_property_window.ftptool.automatic,
  1984. X        PANEL_VALUE, options, 
  1985. X        NULL);
  1986. X    xv_set(tool_property_window.ftptool.openlook, 
  1987. X        PANEL_VALUE, openlook_mode, 
  1988. X        NULL);
  1989. X    xv_set(tool_property_window.ftptool.confirm, 
  1990. X        PANEL_VALUE, confirmdeletes,
  1991. X        NULL);
  1992. X    xv_set(tool_property_window.ftptool.anonftp, 
  1993. X        PANEL_VALUE, anonftp_password, 
  1994. X        NULL);
  1995. X    xv_set(tool_property_window.ftptool.ignore_case, 
  1996. X        PANEL_VALUE, ignore_case, 
  1997. X        NULL);
  1998. }
  1999. X
  2000. #ifdef USE_PROTOTYPES
  2001. void directory_lists_props_reset_proc(void)
  2002. #else
  2003. void directory_lists_props_reset_proc()
  2004. #endif
  2005. {
  2006. X    xv_set(tool_property_window.directory_lists.cache_inf,
  2007. X        PANEL_VALUE, dircache_size == 0,
  2008. SHAR_EOF
  2009. true || echo 'restore of button_funcs.c failed'
  2010. fi
  2011. echo 'End of  part 11'
  2012. echo 'File button_funcs.c is continued in part 12'
  2013. echo 12 > _shar_seq_.tmp
  2014. exit 0
  2015. -- 
  2016. Senior Systems Scientist        mail: dcmartin@msi.com
  2017. Molecular Simulations, Inc.        uucp: uunet!dcmartin
  2018. 796 North Pastoria Avenue        at&t: 408/522-9236
  2019. Sunnyvale, California 94086        fax: 408/732-0831
  2020.