home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / altsrcs / 3 / 3896 < prev    next >
Encoding:
Internet Message Format  |  1991-08-24  |  49.5 KB
  1. Path: wupost!uunet!mcsun!unido!estevax!norisc!iain
  2. From: iain@norisc.UUCP (Iain Lea)
  3. Newsgroups: alt.sources
  4. Subject: tin v1.00 - YAN (Yet Another Newsreader) Part 03/08
  5. Message-ID: <584@norisc.UUCP>
  6. Date: 23 Aug 91 13:52:58 GMT
  7. Sender: iain@norisc.UUCP (Iain Lea)
  8. Organization: What organization?
  9. Lines: 1718
  10.  
  11. Submitted-by: iain@estevax.uucp
  12. Archive-name: tin/part03
  13.  
  14. #!/bin/sh
  15. # this is tin.shar.03 (part 3 of tin)
  16. # do not concatenate these parts, unpack them in order with /bin/sh
  17. # file kill.c continued
  18. #
  19. if touch 2>&1 | fgrep '[-amc]' > /dev/null
  20.  then TOUCH=touch
  21.  else TOUCH=true
  22. fi
  23. if test ! -r shar3_seq_.tmp; then
  24.     echo "Please unpack part 1 first!"
  25.     exit 1
  26. fi
  27. (read Scheck
  28.  if test "$Scheck" != 3; then
  29.     echo "Please unpack part $Scheck next!"
  30.     exit 1
  31.  else
  32.     exit 0
  33.  fi
  34. ) < shar3_seq_.tmp || exit 1
  35. echo "x - Continuing file kill.c"
  36. sed 's/^X//' << 'SHAR_EOF' >> kill.c &&
  37. X                        case KILL_BOTH:
  38. X                            if (str_str (arts[i].subject, killf[j].kill_subj) != 0) {
  39. X                                arts[i].tagged = TRUE;
  40. X                                killed = TRUE;
  41. X                            }
  42. X                            if (str_str (arts[i].from, killf[j].kill_from) != 0) {
  43. X                                arts[i].tagged = TRUE;
  44. X                                killed = TRUE;
  45. X                            }
  46. X                            break;
  47. X                    }
  48. X                }
  49. X            }
  50. X        }
  51. X    }
  52. X    return (killed);
  53. X}
  54. SHAR_EOF
  55. echo "File kill.c is complete" &&
  56. $TOUCH -am 0819090291 kill.c &&
  57. chmod 0600 kill.c ||
  58. echo "restore of kill.c failed"
  59. set `wc -c kill.c`;Wc_c=$1
  60. if test "$Wc_c" != "9014"; then
  61.     echo original size 9014, current size $Wc_c
  62. fi
  63. # ============= lang.c ==============
  64. echo "x - extracting lang.c (Text)"
  65. sed 's/^X//' << 'SHAR_EOF' > lang.c &&
  66. X/*
  67. X *  Project   : tin - a visual threaded usenet newsreader
  68. X *  Module    : lang.c
  69. X *  Author    : R.Skrenta / I.Lea
  70. X *  Created   : 01-04-91
  71. X *  Updated   : 23-08-91
  72. X *  Release   : 1.0
  73. X *  Notes     :
  74. X *  Copyright : (c) Copyright 1991 by Rich Skrenta & Iain Lea
  75. X *                You may  freely  copy or  redistribute  this software,
  76. X *              so  long as there is no profit made from its use, sale
  77. X *              trade or  reproduction.  You may not change this copy-
  78. X *              right notice, and it must be included in any copy made
  79. X */
  80. X
  81. X#ifdef LANG_GERMAN
  82. X
  83. X#else
  84. X
  85. X/*
  86. X *  art.c
  87. X */
  88. X
  89. Xchar *txt_group = "Group %s...    ";
  90. Xchar *txt_cannot_open_dir = "can't open dir %s\n";
  91. Xchar *txt_cannot_open_art = "can't open article %s: ";
  92. Xchar *txt_indexing = "Indexing...%4d";
  93. Xchar *txt_corrupt_index = "Index file %s corrupted. error %d on record %d";
  94. X
  95. X/*
  96. X *  group.c
  97. X */
  98. X
  99. Xchar *txt_inverse_on = "Inverse video enabled";
  100. Xchar *txt_inverse_off = "Inverse video disabled";
  101. Xchar *txt_subscribed_to = "subscribed to %s";
  102. Xchar *txt_unsubscribed_to = "unsubscribed from %s";
  103. Xchar *txt_mark_all_read = "Mark everything as read? (y/n): ";
  104. Xchar *txt_marked_as_read = "All articles marked as read";
  105. Xchar *txt_no_more_groups = "No more groups";
  106. Xchar *txt_no_prev_group = "No previous group";
  107. Xchar *txt_no_arts = "*** No Articles ***";
  108. Xchar *txt_end_of_arts = "*** End of Articles ***";
  109. Xchar *txt_no_next_unread_art = "No next unread article";
  110. Xchar *txt_no_prev_unread_art = "No previous unread article";
  111. Xchar *txt_no_last_message = "No last message";
  112. Xchar *txt_bad_command = "Bad command.  Type 'h' for help.";
  113. Xchar *txt_you_have_mail = "    you have mail\n";
  114. Xchar *txt_type_h_for_help = "Type 'h' for help\n";
  115. Xchar *txt_read_art = "Read article> ";
  116. Xchar *txt_search_forwards = "Search forwards [%s]> ";
  117. Xchar *txt_search_backwards = "Search backwards [%s]> ";
  118. Xchar *txt_author_search_forwards = "Author search forwards [%s]> ";
  119. Xchar *txt_author_search_backwards = "Author search backwards [%s]> ";
  120. Xchar *txt_no_search_string = "No search string";
  121. Xchar *txt_no_match = "No match";
  122. Xchar *txt_post_subject = "Post Subject: ";
  123. Xchar *txt_cannot_open = "can't open %s";
  124. Xchar *txt_posting = "Posting...";
  125. Xchar *txt_art_posted = "-- article posted --";
  126. Xchar *txt_art_rejected = "-- article rejected --";
  127. Xchar *txt_abort_edit_post = "a)bort, e)dit, p)ost: ";
  128. Xchar *txt_help_i_4 = "4$       Select article 4 ($=select last article)\r\n";
  129. Xchar *txt_help_ctrl_k = "^K       Kill current article\r\n";
  130. Xchar *txt_help_ctrl_l = "^L       Redraw page\r\n";
  131. Xchar *txt_help_ctrl_d = "^D^U     Down (^U=up) a page\r\n";
  132. Xchar *txt_help_i_cr = "<CR>     Read current article\r\n";
  133. Xchar *txt_help_i_tab = "<TAB>    View next unread article or group\r\n";
  134. Xchar *txt_help_m = "m        Move current group within group selection list\r\n";
  135. Xchar *txt_help_M = "M        Menu of configurable options\r\n";
  136. Xchar *txt_help_a = "aA       Author forward (A=backward) search\r\n";
  137. Xchar *txt_help_c = "c        Mark all articles as read\r\n";
  138. Xchar *txt_help_g = "g        Choose a new group by name\r\n";
  139. Xchar *txt_help_I = "I        Toggle inverse video\r\n";
  140. Xchar *txt_help_K = "K        Mark article/thread as read & advance\r\n";
  141. Xchar *txt_help_j = "jk       Down (k=up) a line\r\n";
  142. Xchar *txt_help_i_n = "nN       Go to next (N=next unread) group\r\n";
  143. Xchar *txt_help_i_p = "pP       Go to previous (P=previous unread) group\r\n";
  144. Xchar *txt_help_q = "q        Quit\r\n";
  145. Xchar *txt_help_s = "su       Subscribe (u=unsubscribe) to this group\r\n";
  146. Xchar *txt_help_S = "SU       Subscribe (U=unsubscribe) groups that match pattern\r\n";
  147. Xchar *txt_help_i_S = "S        Save articles matching pattern\r\n";
  148. Xchar *txt_help_t = "T        Tag current article for saving\r\n";
  149. Xchar *txt_help_T = "t        Return to group selection index\r\n";
  150. Xchar *txt_help_U = "U        Untag all articles\r\n";
  151. Xchar *txt_help_w = "w        Post an article\r\n";
  152. Xchar *txt_help_i_search = "/?       Subject forward (?=backward) search\r\n";
  153. Xchar *txt_help_dash = "-        Show last message\r\n";
  154. X#ifdef DONT_USE_REGEX 
  155. Xchar *txt_save_pattern = "Enter save pattern [%s]> ";
  156. X#else
  157. Xchar *txt_save_pattern = "Enter regex save pattern [%s]> ";
  158. X#endif
  159. Xchar *txt_base_file_name = "Enter base file name> ";
  160. Xchar *txt_base_subdir = "Enter sub directory name> ";
  161. Xchar *txt_saved_pattern_to = "-- saved pattern to %s - %s --";
  162. Xchar *txt_saved_to_mailbox = "-- saved to mailbox %s --";
  163. Xchar *txt_switch_on_kill_art_menu = "Kill Article Menu is switched OFF. Select Options Menu to switch it ON.";
  164. X
  165. X/* 
  166. X *  help.c:
  167. X */
  168. X
  169. Xchar *txt_group_select_com_1 = "Group Selection Commands (page 1 of 2)";
  170. Xchar *txt_group_select_com_2 = "Group Selection Commands (page 2 of 2)";
  171. Xchar *txt_index_page_com_1 = "Index Page Commands (page 1 of 2)";
  172. Xchar *txt_index_page_com_2 = "Index Page Commands (page 2 of 2)";
  173. Xchar *txt_art_pager_com_1 = "Article Pager Commands (page 1 of 2)";
  174. Xchar *txt_art_pager_com_2 = "Article Pager Commands (page 2 of 2)";
  175. Xchar *txt_hit_space_for_more = "-- Hit space for more commands --";
  176. Xchar *txt_select_info = "Group Select Help (page %d of %d)";
  177. Xchar *txt_group_info = "Group Help (page %d of %d)";
  178. Xchar *txt_page_info = "Page Help (page %d of %d)";
  179. X
  180. X/* 
  181. X *  kill.c:
  182. X */
  183. X
  184. Xchar *txt_kill_menu = "Kill Article Menu";
  185. Xchar *txt_kill_subject = "Kill Subject [%-45s] (y/n): ";
  186. Xchar *txt_kill_from =    "Kill From    [%-45s] (y/n): ";
  187. Xchar *txt_kill_text = "Kill text pattern : ";
  188. Xchar *txt_kill_text_type = "Apply pattern to  : ";
  189. Xchar *txt_kill_group =     "Kill pattern scope: ";
  190. Xchar *txt_help_kill_subject = "Subject: line to add to kill file. Press backspace key to clear field.";
  191. Xchar *txt_help_kill_from = "From: line to add to kill file. Press backspace key to clear field.";
  192. Xchar *txt_help_kill_text = "Enter text pattern to kill if Subject: & From: lines are not what you want.";
  193. Xchar *txt_help_kill_text_type = "Select where text pattern should be applied. Use <SPACE> to toggle choices.";
  194. Xchar *txt_help_kill_group = "Apply kill to current group only or all groups. Use <SPACE> to toggle choices.";
  195. Xchar *txt_abort_edit_save_killfile = "a)bort e)dit s)ave killfile: ";
  196. X
  197. X
  198. X/* 
  199. X *  main.c:
  200. X */
  201. X
  202. Xchar *txt_not_in_active_file = "Group %s not found in active file";
  203. Xchar *txt_screen_init_failed = "Screen initialization failed\n";
  204. Xchar *txt_bad_active_file = "Active file corrupt\n";
  205. X
  206. X/*
  207. X *  misc.c
  208. X */
  209. X
  210. Xchar *txt_cannot_find_base_art = "Cannot find base article %s";
  211. Xchar *txt_out_of_memory = "%s: out of memory\n";
  212. X
  213. X/*
  214. X *  nntp_open.c
  215. X */
  216. X
  217. Xchar *txt_cannot_get_nntp_server_name = "Cannot get nntp server name\n";
  218. Xchar *txt_server_name_in_file_env_var = "Either put the name in the file %s,\nor put it in the environment variable NNTPSERVER\n";
  219. Xchar *txt_failed_to_connect_to_server = "failed to connect to (%s) server\n";
  220. Xchar *txt_rejected_by_nntpserver = "rejected by server, nntp error %d\n";
  221. Xchar *txt_connection_to_server_broken = "connection to server broken\n";
  222. Xchar *txt_stuff_nntp_cannot_open = "stuff_nntp: can't open %s: ";
  223. Xchar *txt_nntp_to_fp_cannot_reopen = "nntp_to_fp: can't reopen %s: ";
  224. Xchar *txt_nntp_to_fd_cannot_reopen = "nntp_to_fd: can't reopen %s: ";
  225. X
  226. X/*
  227. X *  page.c
  228. X */
  229. X
  230. Xchar *txt_quit = "Do you really want to quit? (y/n): ";
  231. Xchar *txt_art_unavailable = "[Article %ld unvailable]\r\r";
  232. Xchar *txt_art_marked_as_unread = "Article marked as unread";
  233. Xchar *txt_thread_marked_as_unread = "Thread marked as unread";
  234. Xchar *txt_begin_of_art = "*** Beginning of article ***";
  235. Xchar *txt_next_resp = "-- next response --";
  236. Xchar *txt_last_resp = "-- last response --";
  237. Xchar *txt_more = "--More--";
  238. Xchar *txt_more_percent = "--More--(%d%%) [%ld/%ld]";
  239. Xchar *txt_note_x_of_n = "%sNote %3d of %3d\r\n";
  240. Xchar *txt_art = "Article %ld  ";
  241. Xchar *txt_resp_x_of_n = "Resp %3d of %3d\r\n";
  242. Xchar *txt_no_resp = "No responses\r\n";
  243. Xchar *txt_1_resp = "1 Response\r\n";
  244. Xchar *txt_x_resp = "%d Responses\r\n";
  245. Xchar *txt_s_at_s = "%s at %s";
  246. Xchar *txt_note_resp_page = "Note %d of %d, Resp %d (page %d):  %s";
  247. Xchar *txt_note_page = "Note %d of %d (page %d):  %s";
  248. Xchar *txt_read_resp = "Read response> ";
  249. Xchar *txt_help_p_0 = "0        Read the base article in this thread\r\n";
  250. Xchar *txt_help_p_4 = "4        Read response 4 in this thread\r\n";
  251. Xchar *txt_help_p_cr = "<CR>     Skip to next base article\r\n";
  252. Xchar *txt_help_p_tab = "<TAB>    Advance to next page or unread article\r\n";
  253. Xchar *txt_help_b = "b<SPACE> Back (<SPACE>=forward) a page\r\n";
  254. Xchar *txt_help_bug = "B        Mail bug/gripe/comment to %s\r\n";
  255. Xchar *txt_help_p_f = "fF       Post (F=copy text) a followup\r\n";
  256. Xchar *txt_help_ctrl_h = "^H       Show articles header\r\n";
  257. Xchar *txt_help_h =      "hH       Command (H=context sensitive) help\r\n";
  258. Xchar *txt_help_p_i = "i        Return to index page\r\n";
  259. Xchar *txt_help_p_k = "kK       Mark article (K=thread) as read & advance to next unread\r\n";
  260. Xchar *txt_help_p_m = "m        Mail this article to someone\r\n";
  261. Xchar *txt_help_p_n = "nN       Go to to the next (N=unread) article\r\n";
  262. Xchar *txt_help_p_o = "oO       Output article (O=thread) to printer\r\n";
  263. Xchar *txt_help_p_p = "pP       Go to the previous (P=unread) article\r\n";
  264. Xchar *txt_help_p_r = "rR       Reply through mail (R=copy text) to author\r\n";
  265. Xchar *txt_help_p_s = "sS       Save article (S=thread) to file\r\n";
  266. Xchar *txt_help_p_z = "zZ       Mark article (Z=thread) as unread\r\n";
  267. Xchar *txt_help_p_ctrl_r = "^R$      Redisplay first page ($=last page) of article\r\n";
  268. Xchar *txt_help_p_d = "d        Toggle rot-13 decoding for this article\r\n";
  269. Xchar *txt_help_p_pipe = "|        Pipe article into command\r\n";
  270. Xchar *txt_help_p_search = "/        Article forward search\r\n";
  271. Xchar *txt_mail_art_to = "Mail article to: ";
  272. Xchar *txt_abort_edit_send = "a)bort, e)dit, s)end: ";
  273. Xchar *txt_mailing_to = "Mailing to %s...";
  274. Xchar *txt_message_sent = "-- Message sent --";
  275. Xchar *txt_command_failed_s = "Command failed: %s\n";
  276. Xchar *txt_in_art_you_write = "In article %s you write:\n";
  277. Xchar *txt_resp_to_poster = "Responses have been directed to the poster. Post anyway? (y/n): ";
  278. Xchar *txt_resp_redirect = "Responses have been directed to the following newsgroups";
  279. Xchar *txt_continue = "Continue? (y/n): ";
  280. Xchar *txt_writes = "%s writes:\n";
  281. Xchar *txt_save_art_to_file = "Save article to file> ";
  282. Xchar *txt_art_not_saved = "-- article not saved --";
  283. Xchar *txt_print_art_yn = "Do you really want to print the article? (y/n): ";
  284. Xchar *txt_print_thread_yn = "Do you really want to print the thread? (y/n): ";
  285. Xchar *txt_no_filename = "No filename";
  286. Xchar *txt_saving = "Saving...    ";
  287. Xchar *txt_art_saved_to = "-- article saved to %s --";
  288. Xchar *txt_save_thread_to = "Save thread to file> ";
  289. Xchar *txt_thread_not_saved = "-- thread not saved --";
  290. Xchar *txt_thread_saved_to_many = "-- thread saved to %s - %s --";
  291. Xchar *txt_thread_saved_to = "-- thread saved to %s --";
  292. Xchar *txt_pipe_to_command = "Pipe to command: ";
  293. Xchar *txt_error_printing_art = "-- error printing article --";
  294. Xchar *txt_printing = "Printing...";
  295. Xchar *txt_art_printed = "-- article printed --";
  296. Xchar *txt_error_printing_thread = "-- error printing thread --";
  297. Xchar *txt_thread_printed = "-- thread printed --";
  298. Xchar *txt_append_to_file = "File %s exists. Append? (y/n): ";
  299. X
  300. X/*
  301. X *  posted.c
  302. X */
  303. X
  304. Xchar *txt_post_history_menu = "Posted articles history";
  305. Xchar *txt_no_arts_posted = "No articles have been posted";
  306. X
  307. X/*
  308. X *  prompt.c
  309. X */
  310. X
  311. Xchar *txt_hit_any_key = "-- Hit any key to continue --";
  312. X
  313. X/*
  314. X *  rcfile.c
  315. X */
  316. X 
  317. Xchar *txt_opt_autosave =        "    1. Auto save       : ";
  318. Xchar *txt_opt_save_separate =   "    2. Save separate   : ";
  319. Xchar *txt_opt_mark_saved_read = "    3. Mark saved read : ";
  320. Xchar *txt_opt_kill_articles =   "    4. Kill articles   : ";
  321. Xchar *txt_opt_show_author =     "    5. Show Author     : ";
  322. Xchar *txt_opt_draw_arrow =      "    6. Draw arrow      : ";
  323. Xchar *txt_opt_post_process =    "    7. Post process    : ";
  324. Xchar *txt_opt_print_header =    "    8. Print header    : ";
  325. Xchar *txt_opt_process_type = "    9. Process type    : ";
  326. Xchar *txt_opt_sort_type = "    10 Sort article by : ";
  327. Xchar *txt_opt_savedir = "    11 Save directory  : ";
  328. Xchar *txt_opt_maildir = "    12 Mail directory  : ";
  329. Xchar *txt_opt_printer = "    13 Printer         : ";
  330. Xchar *txt_options_menu = "Options Menu";
  331. Xchar *txt_post_process_sh = "shell archive";
  332. Xchar *txt_post_process_uud = "uudecode";
  333. Xchar *txt_post_process_uud_zoo = "uudecode & zoo";
  334. Xchar *txt_post_process_uud_lzh = "uudecode & lharc";
  335. Xchar *txt_post_process_uud_arc = "uudecode & arc";
  336. Xchar *txt_post_process_uud_zip = "uudecode & zip";
  337. Xchar *txt_post_process_patch = "patch";
  338. Xchar *txt_sort_by_none = "Nothing";
  339. Xchar *txt_sort_by_subj = "Subject: field";
  340. Xchar *txt_sort_by_from = "From: field";
  341. Xchar *txt_sort_by_date = "Date: field";
  342. Xchar *txt_help_autosave = "Auto save article/thread by Archive-name: header. Use <SPACE> to toggle ON/OFF.";
  343. Xchar *txt_help_save_separate = "Save articles/threads to separate files. Use <SPACE> to toggle ON/OFF.";
  344. Xchar *txt_help_print_header = "Print complete mail header or Subject: & From:. Use <SPACE> to toggle ON/OFF.";
  345. Xchar *txt_help_show_author = "Show Subject & From (author) fields in group menu. Use <SPACE> to toggle ON/OFF.";
  346. Xchar *txt_help_draw_arrow = "Draw -> or highlighted bar for selection. Use <SPACE> to toggle ON/OFF.";
  347. Xchar *txt_help_kill_articles = "Kill articles that match entries in kill file. Use <SPACE> to toggle ON/OFF.";
  348. Xchar *txt_help_post_process = "Post process (ie. unshar) saved article/thread. Use <SPACE> to toggle ON/OFF."; 
  349. Xchar *txt_help_mark_saved_read = "Mark saved articles/threads as read. Use <SPACE> to toggle ON/OFF."; 
  350. Xchar *txt_help_post_proc_type = "Post processing to apply to articles/threads. Use <SPACE> to toggle choices.";
  351. Xchar *txt_help_sort_type = "Sort articles by Subject, From or Date fields. Use <SPACE> to toggle choices.";
  352. Xchar *txt_help_savedir = "The directory where you want articles/threads saved.";
  353. Xchar *txt_help_maildir = "The directory where articles/threads are to be saved in mailbox format.";
  354. Xchar *txt_help_printer = "The printer program with options that is to be used to print articles/threads.";
  355. Xchar *txt_save_options = "Save options? (y/n): ";
  356. X
  357. X/*
  358. X *  save.c
  359. X */
  360. X
  361. Xchar *txt_post_processing = "Post processing...";
  362. Xchar *txt_deleting = "Deleting...";
  363. X
  364. X/*
  365. X *  search.c
  366. X */
  367. X
  368. Xchar *txt_searching = "Searching...";
  369. X
  370. X/*
  371. X *  select.c
  372. X */
  373. X
  374. Xchar *txt_moving = "Moving...";
  375. X#ifdef DONT_USE_REGEX 
  376. Xchar *txt_subscribe_pattern = "Enter subscribe pattern> ";
  377. Xchar *txt_unsubscribe_pattern = "Enter subscribe pattern> ";
  378. X#else
  379. Xchar *txt_subscribe_pattern = "Enter regex subscribe pattern> ";
  380. Xchar *txt_unsubscribe_pattern = "Enter regex subscribe pattern> ";
  381. X#endif
  382. Xchar *txt_subscribing = "Subscribing...";
  383. Xchar *txt_subscribing_to = "Subscribing to %s...";
  384. Xchar *txt_unsubscribing = "Unsubscribing...";
  385. Xchar *txt_unsubscribing_from = "Unsubscribing from %s...";
  386. Xchar *txt_subscribed_num_groups = "subscribed to %d groups";
  387. Xchar *txt_unsubscribed_num_groups = "unsubscribed from %d groups";
  388. Xchar *txt_del_group_in_newsrc = "Delete current group from .newsrc? (y/n): ";
  389. Xchar *txt_group_deleted = "Group deleted";
  390. Xchar *txt_mark_group_read = "Mark group as read? (y/n): ";
  391. Xchar *txt_no_groups_to_delete = "No groups to delete";
  392. Xchar *txt_reset_newsrc = "Reset newsrc? (y/n): ";
  393. Xchar *txt_no_groups_to_read = "No more groups to read";
  394. Xchar *txt_added_groups = "Added %d group%s";
  395. Xchar *txt_plural = "s";
  396. Xchar *txt_no_groups_to_yank_in = "No more groups to yank in";
  397. Xchar *txt_group_selection = "Group Selection";
  398. Xchar *txt_select_group = "Select group> ";
  399. Xchar *txt_help_g_4 = "4$       Select group 4 ($=select last group)\r\n";
  400. Xchar *txt_help_g_ctrl_r = "^R       Reset .newsrc\r\n";
  401. Xchar *txt_help_g_ctrl_k = "^Kz      Delete (z=undelete) group from .newsrc\r\n";
  402. Xchar *txt_help_g_cr = "<CR>     Read current group\r\n";
  403. Xchar *txt_help_g_tab = "<TAB>    View next unread group\r\n";
  404. Xchar *txt_help_g_c = "c        Mark group as all read\r\n";
  405. Xchar *txt_help_W = "W        List articles posted by user\r\n";
  406. Xchar *txt_help_g_y = "y        Yank in groups that are not in the .newsrc\r\n";
  407. Xchar *txt_help_g_dollar = "Y        Reread group list from .newsrc\r\n";
  408. Xchar *txt_help_g_search = "/?       Group forward (?=backward) search\r\n";
  409. Xchar *txt_newsgroup = "Newsgroup> ";
  410. Xchar *txt_newsgroup_position = "Position %s in group list [1,2,..,$]> ";
  411. X
  412. X#endif
  413. X
  414. SHAR_EOF
  415. $TOUCH -am 0823134091 lang.c &&
  416. chmod 0600 lang.c ||
  417. echo "restore of lang.c failed"
  418. set `wc -c lang.c`;Wc_c=$1
  419. if test "$Wc_c" != "16340"; then
  420.     echo original size 16340, current size $Wc_c
  421. fi
  422. # ============= lang.h ==============
  423. echo "x - extracting lang.h (Text)"
  424. sed 's/^X//' << 'SHAR_EOF' > lang.h &&
  425. X/*
  426. X *  Project   : tin - a visual threaded usenet newsreader
  427. X *  Module    : lang.h
  428. X *  Author    : I.Lea
  429. X *  Created   : 01-04-91
  430. X *  Updated   : 21-08-91
  431. X *  Release   : 1.0
  432. X *  Notes     :
  433. X *  Copyright : (c) Copyright 1991 by Iain Lea
  434. X *                You may  freely  copy or  redistribute  this software,
  435. X *              so  long as there is no profit made from its use, sale
  436. X *              trade or  reproduction.  You may not change this copy-
  437. X *              right notice, and it must be included in any copy made
  438. X */
  439. X
  440. X/*
  441. X *  art.c
  442. X */
  443. X
  444. Xextern char *txt_group;
  445. Xextern char *txt_cannot_open_dir;
  446. Xextern char *txt_cannot_open_art;
  447. Xextern char *txt_indexing;
  448. Xextern char *txt_corrupt_index;
  449. X
  450. X/*
  451. X *  group.c
  452. X */
  453. X
  454. Xextern char *txt_inverse_on;
  455. Xextern char *txt_inverse_off;
  456. Xextern char *txt_subscribed_to;
  457. Xextern char *txt_unsubscribed_to;
  458. Xextern char *txt_mark_all_read;
  459. Xextern char *txt_marked_as_read;
  460. Xextern char *txt_no_more_groups;
  461. Xextern char *txt_no_prev_group;
  462. Xextern char *txt_no_arts;
  463. Xextern char *txt_end_of_arts;
  464. Xextern char *txt_no_next_unread_art;
  465. Xextern char *txt_no_prev_unread_art;
  466. Xextern char *txt_no_last_message;
  467. Xextern char *txt_bad_command;
  468. Xextern char *txt_you_have_mail;
  469. Xextern char *txt_type_h_for_help;
  470. Xextern char *txt_read_art;
  471. Xextern char *txt_author_search_forwards;
  472. Xextern char *txt_author_search_backwards;
  473. Xextern char *txt_search_forwards;
  474. Xextern char *txt_search_backwards;
  475. Xextern char *txt_no_search_string;
  476. Xextern char *txt_no_match;
  477. Xextern char *txt_post_subject;
  478. Xextern char *txt_cannot_open;
  479. Xextern char *txt_posting;
  480. Xextern char *txt_art_posted;
  481. Xextern char *txt_art_rejected;
  482. Xextern char *txt_abort_edit_post;
  483. Xextern char *txt_index_page_com_1;
  484. Xextern char *txt_index_page_com_2;
  485. Xextern char *txt_hit_space_for_more;
  486. Xextern char *txt_help_i_4;
  487. Xextern char *txt_help_ctrl_k;
  488. Xextern char *txt_help_ctrl_l;
  489. Xextern char *txt_help_ctrl_d;
  490. Xextern char *txt_help_i_cr;
  491. Xextern char *txt_help_i_tab;
  492. Xextern char *txt_help_m;
  493. Xextern char *txt_help_M;
  494. Xextern char *txt_help_a;
  495. Xextern char *txt_help_c;
  496. Xextern char *txt_help_g;
  497. Xextern char *txt_help_I;
  498. Xextern char *txt_help_K;
  499. Xextern char *txt_help_j;
  500. Xextern char *txt_help_i_n;
  501. Xextern char *txt_help_i_p;
  502. Xextern char *txt_help_q;
  503. Xextern char *txt_help_s;
  504. Xextern char *txt_help_S;
  505. Xextern char *txt_help_i_S;
  506. Xextern char *txt_help_t;
  507. Xextern char *txt_help_T;
  508. Xextern char *txt_help_U;
  509. Xextern char *txt_help_i_u;
  510. Xextern char *txt_help_w;
  511. Xextern char *txt_help_i_search;
  512. Xextern char *txt_help_dash;
  513. Xextern char *txt_save_pattern;
  514. Xextern char *txt_base_file_name;
  515. Xextern char *txt_base_subdir;
  516. Xextern char *txt_saved_pattern_to;
  517. Xextern char *txt_saved_to_mailbox;
  518. Xextern char *txt_switch_on_kill_art_menu;
  519. X
  520. X/* 
  521. X *  help.c:
  522. X */
  523. X
  524. Xextern char *txt_select_info;
  525. Xextern char *txt_group_info;
  526. Xextern char *txt_page_info;
  527. X
  528. X/* 
  529. X *  kill.c:
  530. X */
  531. X
  532. Xextern char *txt_kill_menu;
  533. Xextern char *txt_kill_subject;
  534. Xextern char *txt_kill_from;
  535. Xextern char *txt_kill_text;
  536. Xextern char *txt_kill_text_type;
  537. Xextern char *txt_kill_group;
  538. Xextern char *txt_help_kill_subject;
  539. Xextern char *txt_help_kill_from;
  540. Xextern char *txt_help_kill_text;
  541. Xextern char *txt_help_kill_text_type;
  542. Xextern char *txt_help_kill_group;
  543. Xextern char *txt_abort_edit_save_killfile;
  544. X
  545. X/*
  546. X *  page.c
  547. X */
  548. X
  549. Xextern char *txt_quit;
  550. Xextern char *txt_art_unavailable;
  551. Xextern char *txt_art_marked_as_unread;
  552. Xextern char *txt_thread_marked_as_unread;
  553. Xextern char *txt_begin_of_art;
  554. Xextern char *txt_next_resp;
  555. Xextern char *txt_last_resp;
  556. Xextern char *txt_more_percent;
  557. Xextern char *txt_more;
  558. Xextern char *txt_note_x_of_n;
  559. Xextern char *txt_art;
  560. Xextern char *txt_resp_x_of_n;
  561. Xextern char *txt_no_resp;
  562. Xextern char *txt_1_resp;
  563. Xextern char *txt_x_resp;
  564. Xextern char *txt_s_at_s;
  565. Xextern char *txt_note_resp_page;
  566. Xextern char *txt_note_page;
  567. Xextern char *txt_read_resp;
  568. Xextern char *txt_art_pager_com_1;
  569. Xextern char *txt_art_pager_com_2;
  570. Xextern char *txt_help_p_0;
  571. Xextern char *txt_help_p_4;
  572. Xextern char *txt_help_p_cr;
  573. Xextern char *txt_help_p_tab;
  574. Xextern char *txt_help_b;
  575. Xextern char *txt_help_bug;
  576. Xextern char *txt_help_p_f;
  577. Xextern char *txt_help_ctrl_h;
  578. Xextern char *txt_help_h;
  579. Xextern char *txt_help_p_i;
  580. Xextern char *txt_help_p_k;
  581. Xextern char *txt_help_p_m;
  582. Xextern char *txt_help_p_n;
  583. Xextern char *txt_help_p_o;
  584. Xextern char *txt_help_p_p;
  585. Xextern char *txt_help_p_r;
  586. Xextern char *txt_help_p_s;
  587. Xextern char *txt_help_p_z;
  588. Xextern char *txt_help_p_ctrl_r;
  589. Xextern char *txt_help_p_d;
  590. Xextern char *txt_help_p_pipe;
  591. Xextern char *txt_help_p_search;
  592. Xextern char *txt_mail_art_to;
  593. Xextern char *txt_abort_edit_send;
  594. Xextern char *txt_mailing_to;
  595. Xextern char *txt_message_sent;
  596. Xextern char *txt_command_failed_s;
  597. Xextern char *txt_in_art_you_write;
  598. Xextern char *txt_resp_to_poster;
  599. Xextern char *txt_resp_redirect;
  600. Xextern char *txt_continue;
  601. Xextern char *txt_writes;
  602. Xextern char *txt_save_art_to_file;
  603. Xextern char *txt_art_not_saved;
  604. Xextern char *txt_print_art_yn;
  605. Xextern char *txt_print_thread_yn;
  606. Xextern char *txt_no_filename;
  607. Xextern char *txt_saving;
  608. Xextern char *txt_art_saved_to;
  609. Xextern char *txt_save_thread_to;
  610. Xextern char *txt_thread_not_saved;
  611. Xextern char *txt_thread_saved_to_many;
  612. Xextern char *txt_thread_saved_to;
  613. Xextern char *txt_pipe_to_command;
  614. Xextern char *txt_command_failed;
  615. Xextern char *txt_error_printing_art;
  616. Xextern char *txt_printing;
  617. Xextern char *txt_art_printed;
  618. Xextern char *txt_error_printing_thread;
  619. Xextern char *txt_thread_printed;
  620. Xextern char *txt_append_to_file;
  621. X
  622. X/*
  623. X *  prompt.c
  624. X */
  625. X
  626. Xextern char *txt_hit_any_key;
  627. X 
  628. X/* 
  629. X *  main.c:
  630. X */
  631. X
  632. Xextern char *txt_not_in_active_file;
  633. Xextern char *txt_screen_init_failed;
  634. Xextern char *txt_bad_active_file;
  635. X
  636. X/*
  637. X *  misc.c
  638. X */
  639. X
  640. Xextern char *txt_cannot_find_base_art;
  641. Xextern char *txt_out_of_memory;
  642. X
  643. X/*
  644. X *  nntp.c
  645. X */
  646. X
  647. Xextern char *txt_cannot_get_nntp_server_name;
  648. Xextern char *txt_server_name_in_file_env_var;
  649. Xextern char *txt_failed_to_connect_to_server;
  650. Xextern char *txt_rejected_by_nntpserver;
  651. Xextern char *txt_connection_to_server_broken;
  652. Xextern char *txt_stuff_nntp_cannot_open;
  653. Xextern char *txt_nntp_to_fp_cannot_reopen;
  654. Xextern char *txt_nntp_to_fd_cannot_reopen;
  655. X
  656. X/*
  657. X *  posted.c
  658. X */
  659. X
  660. Xextern char *txt_post_history_menu;
  661. Xextern char *txt_no_arts_posted;
  662. X
  663. X/*
  664. X *  rcfile.c
  665. X */
  666. X
  667. Xextern char *txt_opt_autosave;
  668. Xextern char *txt_opt_save_separate;
  669. Xextern char *txt_opt_mark_saved_read;
  670. Xextern char *txt_opt_kill_articles;
  671. Xextern char *txt_opt_show_author;
  672. Xextern char *txt_opt_draw_arrow;
  673. Xextern char *txt_opt_post_process;
  674. Xextern char *txt_opt_print_header;
  675. Xextern char *txt_opt_process_type;
  676. Xextern char *txt_opt_sort_type;
  677. Xextern char *txt_post_process_sh;
  678. Xextern char *txt_post_process_uud;
  679. Xextern char *txt_post_process_uud_zoo;
  680. Xextern char *txt_post_process_uud_lzh;
  681. Xextern char *txt_post_process_uud_arc;
  682. Xextern char *txt_post_process_uud_zip;
  683. Xextern char *txt_post_process_patch;
  684. Xextern char *txt_sort_by_none;
  685. Xextern char *txt_sort_by_subj;
  686. Xextern char *txt_sort_by_from;
  687. Xextern char *txt_sort_by_date;
  688. Xextern char *txt_opt_savedir;
  689. Xextern char *txt_opt_maildir;
  690. Xextern char *txt_opt_printer;
  691. Xextern char *txt_opt_kill_subj;
  692. Xextern char *txt_opt_kill_from;
  693. Xextern char *txt_options_menu;
  694. Xextern char *txt_help_autosave;
  695. Xextern char *txt_help_save_separate;
  696. Xextern char *txt_help_print_header;
  697. Xextern char *txt_help_show_author;
  698. Xextern char *txt_help_draw_arrow;
  699. Xextern char *txt_help_kill_articles;
  700. Xextern char *txt_help_post_process;
  701. Xextern char *txt_help_mark_saved_read;
  702. Xextern char *txt_help_post_proc_type;
  703. Xextern char *txt_help_sort_type;
  704. Xextern char *txt_help_savedir;
  705. Xextern char *txt_help_maildir;
  706. Xextern char *txt_help_printer;
  707. Xextern char *txt_save_options;
  708. X
  709. X/*
  710. X *  save.c
  711. X */
  712. X
  713. Xextern char *txt_post_processing;
  714. Xextern char *txt_deleting;
  715. X
  716. X/*
  717. X *  search.c
  718. X */
  719. X
  720. Xextern char *txt_searching;
  721. X
  722. X/*
  723. X *  select.c
  724. X */
  725. X
  726. Xextern char *txt_moving;
  727. Xextern char *txt_subscribe_pattern;
  728. Xextern char *txt_unsubscribe_pattern;
  729. Xextern char *txt_subscribing;
  730. Xextern char *txt_subscribing_to;
  731. Xextern char *txt_unsubscribing;
  732. Xextern char *txt_unsubscribing_from;
  733. Xextern char *txt_subscribed_num_groups;
  734. Xextern char *txt_unsubscribed_num_groups;
  735. Xextern char *txt_del_group_in_newsrc;
  736. Xextern char *txt_group_deleted;
  737. Xextern char *txt_mark_group_read;
  738. Xextern char *txt_no_groups_to_delete;
  739. Xextern char *txt_reset_newsrc;
  740. Xextern char *txt_no_groups_to_read;
  741. Xextern char *txt_added_groups;
  742. Xextern char *txt_rewriting_newsrc_file;
  743. Xextern char *txt_plural;
  744. Xextern char *txt_no_groups_to_yank_in;
  745. Xextern char *txt_group_selection;
  746. Xextern char *txt_select_group;
  747. Xextern char *txt_group_select_com_1;
  748. Xextern char *txt_group_select_com_2;
  749. Xextern char *txt_help_g_4;
  750. Xextern char *txt_help_g_ctrl_r;
  751. Xextern char *txt_help_g_ctrl_k;
  752. Xextern char *txt_help_g_cr;
  753. Xextern char *txt_help_g_tab;
  754. Xextern char *txt_help_g_c;
  755. Xextern char *txt_help_W;
  756. Xextern char *txt_help_g_y;
  757. Xextern char *txt_help_g_dollar;
  758. Xextern char *txt_help_g_search;
  759. Xextern char *txt_newsgroup;
  760. Xextern char *txt_newsgroup_position;
  761. X
  762. SHAR_EOF
  763. $TOUCH -am 0821133491 lang.h &&
  764. chmod 0600 lang.h ||
  765. echo "restore of lang.h failed"
  766. set `wc -c lang.h`;Wc_c=$1
  767. if test "$Wc_c" != "8856"; then
  768.     echo original size 8856, current size $Wc_c
  769. fi
  770. # ============= mail.c ==============
  771. echo "x - extracting mail.c (Text)"
  772. sed 's/^X//' << 'SHAR_EOF' > mail.c &&
  773. X/*
  774. X *  Project   : tin - a visual threaded usenet newsreader
  775. X *  Module    : mail.c
  776. X *  Author    : R.Skrenta
  777. X *  Created   : 01-04-91
  778. X *  Updated   : 10-08-91
  779. X *  Release   : 1.0
  780. X *  Notes     :
  781. X *  Copyright : (c) Copyright 1991 by Rich Skrenta
  782. X *                You may  freely  copy or  redistribute  this software,
  783. X *              so  long as there is no profit made from its use, sale
  784. X *              trade or  reproduction.  You may not change this copy-
  785. X *              right notice, and it must be included in any copy made
  786. X */
  787. X
  788. X#include    <stdio.h>
  789. X#include    <sys/types.h>
  790. X#include    <sys/stat.h>
  791. X
  792. X#define        TRUE        1
  793. X#define        FALSE        0
  794. X
  795. X
  796. Xchar *mailbox_name = NULL;
  797. Xoff_t mailbox_size;
  798. X
  799. X
  800. X/*
  801. X *  Record size of mailbox so we can detect if new mail has arrived
  802. X */
  803. X
  804. Xvoid mail_setup ()
  805. X{
  806. X    struct stat buf;
  807. X    extern char *getenv();
  808. X
  809. X    if (mailbox_name == NULL)
  810. X        mailbox_name = getenv("MAIL");
  811. X
  812. X    if (mailbox_name == NULL)
  813. X        mailbox_size = 0;
  814. X    else {
  815. X        if (stat(mailbox_name, &buf) >= 0)
  816. X            mailbox_size = buf.st_size;
  817. X        else
  818. X            mailbox_size = 0;
  819. X    }
  820. X}
  821. X
  822. X
  823. X/*
  824. X *  Return TRUE if new mail has arrived
  825. X */
  826. X
  827. Xint mail_check ()
  828. X{
  829. X    struct stat buf;
  830. X
  831. X    if (mailbox_name != NULL
  832. X    &&  stat(mailbox_name, &buf) >= 0
  833. X    &&  mailbox_size < buf.st_size)
  834. X        return TRUE;
  835. X
  836. X    return FALSE;
  837. X}
  838. X
  839. SHAR_EOF
  840. $TOUCH -am 0819090291 mail.c &&
  841. chmod 0600 mail.c ||
  842. echo "restore of mail.c failed"
  843. set `wc -c mail.c`;Wc_c=$1
  844. if test "$Wc_c" != "1260"; then
  845.     echo original size 1260, current size $Wc_c
  846. fi
  847. # ============= main.c ==============
  848. echo "x - extracting main.c (Text)"
  849. sed 's/^X//' << 'SHAR_EOF' > main.c &&
  850. X/*
  851. X *  Project   : tin - a visual threaded usenet newsreader
  852. X *  Module    : main.c
  853. X *  Author    : R.Skrenta / I.Lea
  854. X *  Created   : 01-04-91
  855. X *  Updated   : 20-08-91
  856. X *  Release   : 1.0
  857. X *  Notes     :
  858. X *  Copyright : (c) Copyright 1991 by Rich Skrenta & Iain Lea
  859. X *                You may  freely  copy or  redistribute  this software,
  860. X *              so  long as there is no profit made from its use, sale
  861. X *              trade or  reproduction.  You may not change this copy-
  862. X *              right notice, and it must be included in any copy made
  863. X */
  864. X
  865. X#include    "tin.h"
  866. X
  867. Xchar *version = "v1.00";
  868. Xchar cvers[LEN+1];
  869. Xchar nntp_server[LEN+1];
  870. X
  871. Xint max_subj = 0;
  872. Xint max_from = 0;
  873. Xint max_active;
  874. Xint group_hash[TABLE_SIZE];            /* group name --> active[] */
  875. Xint *my_group;                        /* .newsrc --> active[] */
  876. Xint *unread;                        /* highest art read in group */
  877. Xint num_active;                        /* one past top of active */
  878. Xint local_top;                        /* one past top of my_group */
  879. Xint catchup = FALSE;                /* mark all arts read in all subscribed groups */
  880. Xint update = FALSE;                    /* update index files only mode */
  881. Xint verbose = FALSE;                /* update index files only mode */
  882. Xint start_line_offset;                /* used by invoke_editor for line no. */
  883. Xint read_news_via_nntp = FALSE;        /* read news locally or via NNTP */
  884. Xint max_art;
  885. Xint top = 0;
  886. Xint top_base;
  887. Xint tin_uid;
  888. Xint tin_gid;
  889. Xint real_uid;
  890. Xint real_gid;
  891. Xint local_index;                    /* do private indexing? */
  892. X
  893. Xlong *base;
  894. X
  895. Xstruct group_ent *active;            /* active file */
  896. Xstruct header *arts;
  897. X
  898. X
  899. X#ifdef SIGTSTP
  900. Xvoid main_susp (sig)
  901. X    int sig;
  902. X{
  903. X    Raw(FALSE);
  904. X    putchar('\n');
  905. X    signal(SIGTSTP, SIG_DFL);
  906. X#ifdef BSD
  907. X    sigsetmask(sigblock(0) & ~(1 << (SIGTSTP -1)));
  908. X#endif
  909. X    kill(0, SIGTSTP);
  910. X
  911. X    signal(SIGTSTP, main_susp);
  912. X    mail_setup();
  913. X    if (! update) {
  914. X        Raw(TRUE);
  915. X    }
  916. X}
  917. X#endif
  918. X
  919. X
  920. Xvoid signal_handler (sig)
  921. X    int sig;
  922. X{
  923. X    if (sig == SIGINT) {
  924. X        signal (SIGINT, signal_handler);
  925. X    } else {
  926. X        free_all_arrays ();
  927. X        Raw(FALSE);
  928. X        printf("\n%s: signal handler caught signal %d\n", progname,sig);
  929. X        exit(1);
  930. X    }
  931. X}
  932. X
  933. X
  934. Xvoid main (argc, argv)
  935. X    int argc;    
  936. X    char *argv[];
  937. X{
  938. X    extern int optind, opterr;
  939. X    extern char *optarg;
  940. X    extern char author_search_string[LEN+1];
  941. X    extern char group_search_string[LEN+1];
  942. X    extern char subject_search_string[LEN+1];
  943. X    int c, i;
  944. X    struct stat st;
  945. X    
  946. X    signal(SIGINT, signal_handler);        /* ctrl-C */
  947. X    signal(SIGQUIT, signal_handler);    /* ctrl-\ */
  948. X    signal(SIGILL, signal_handler);
  949. X    signal(SIGBUS, signal_handler);
  950. X    signal(SIGSEGV, signal_handler);
  951. X    
  952. X    signal(SIGPIPE, SIG_IGN);
  953. X#ifdef SIGTSTP
  954. X    signal(SIGTSTP, main_susp);
  955. X#endif
  956. X
  957. X    debug = FALSE;
  958. X
  959. X    strcpy (progname, argv[0]);
  960. X
  961. X    nntp_server[0] = '\0';
  962. X    group_search_string[0] = '\0';
  963. X    author_search_string[0] = '\0';
  964. X    subject_search_string[0] = '\0';
  965. X
  966. X    hash_init ();
  967. X    for (i = 0; i < TABLE_SIZE; i++) {
  968. X        group_hash[i] = -1;
  969. X    }
  970. X
  971. X    tin_uid = geteuid();
  972. X    tin_gid = getegid();
  973. X    real_uid = getuid();
  974. X    real_gid = getgid();
  975. X
  976. X    init_selfinfo ();    /* set up char *'s: homedir, newsrc, etc. */
  977. X    init_alloc ();        /* allocate initial array sizes */
  978. X
  979. X    if (tin_uid == real_uid) {    /* run out of someone's account */
  980. X        local_index = TRUE;    /* index in their home directory */
  981. X        mkdir(indexdir, 0755);
  982. X    } else {            /* we're setuid, index in /usr/spool/news */
  983. X        local_index = FALSE;
  984. X    }
  985. X
  986. X    while ((c = getopt (argc, argv, "cd:Df:hm:M:p:rS:uv")) != EOF) {
  987. X        switch(c) {
  988. X            case 'c':
  989. X                catchup = TRUE;
  990. X                update = TRUE;
  991. X                break;
  992. X                
  993. X            case 'd':
  994. X                my_strncpy (savedir, optarg, LEN);
  995. X                if (stat (savedir,&st) == -1) {
  996. X                    mkdir (savedir, 0755);
  997. X                }
  998. X                break;
  999. X
  1000. X            case 'D':        /* debug mode */
  1001. X                debug = TRUE;
  1002. X                break;
  1003. X
  1004. X            case 'f':
  1005. X                my_strncpy (newsrc, optarg, LEN);
  1006. X                break;
  1007. X
  1008. X            case 'm':
  1009. X                my_strncpy (mailer, optarg, LEN);
  1010. X                break;
  1011. X
  1012. X            case 'M':
  1013. X                my_strncpy (maildir, optarg, LEN);
  1014. X                if (stat (maildir,&st) == -1) {
  1015. X                    mkdir (maildir, 0755);
  1016. X                }
  1017. X                break;
  1018. X
  1019. X            case 'p':
  1020. X                my_strncpy (printer, optarg, LEN);
  1021. X                default_printer = FALSE;
  1022. X                break;
  1023. X
  1024. X            case 'r':    /* read news remotely from default NNTP server */
  1025. X#ifdef USE_NNTP            
  1026. X                read_news_via_nntp = TRUE;
  1027. X#else
  1028. X                printf ("Option not enabled. Recompile %s with -DUSE_NNTP.\n", progname);
  1029. X                exit (1);
  1030. X#endif
  1031. X                break;
  1032. X
  1033. X            case 'S':
  1034. X                my_strncpy (spooldir, optarg, LEN);
  1035. X                break;
  1036. X
  1037. X            case 'u':
  1038. X                update = TRUE;
  1039. X                break;
  1040. X
  1041. X            case 'v':
  1042. X                verbose = TRUE;
  1043. X                update = TRUE;
  1044. X                break;
  1045. X
  1046. X            case 'h':
  1047. X            case '?':
  1048. X            default:
  1049. X                usage (progname);
  1050. X                exit (1);
  1051. X        }
  1052. X    }
  1053. X
  1054. X    sprintf (page_header, "%s %s%s", progname, version, is_remote ());     
  1055. X    sprintf (cvers, "%s (c) Copyright 1991 Iain Lea.", page_header);
  1056. X
  1057. X    if (! update) {
  1058. X        printf ("%s\n", cvers);
  1059. X        fflush (stdout);
  1060. X    }
  1061. X
  1062. X    nntp_startup ();    /* connect server if we are using nntp */
  1063. X    read_active ();        /* load the active file into active[] */
  1064. X
  1065. X    if (optind < argc) {
  1066. X        while (optind < argc) {
  1067. X            if (add_group (argv[optind], TRUE) < 0) {
  1068. X                fprintf (stderr, txt_not_in_active_file, argv[optind]);
  1069. X                fprintf (stderr, "\n");
  1070. X            }
  1071. X            optind++;
  1072. X        }
  1073. X    } else {
  1074. X        read_newsrc(TRUE);
  1075. X    }
  1076. X
  1077. X    if (InitScreen () == FALSE) {
  1078. X        fprintf(stderr,txt_screen_init_failed);
  1079. X        exit(1);
  1080. X    }
  1081. X
  1082. X    ScreenSize (&LINES, &COLS);
  1083. X    Raw(TRUE);
  1084. X
  1085. X#ifdef TIOCGWINSZ
  1086. X    {
  1087. X        struct winsize win;
  1088. X
  1089. X        if (ioctl (0, TIOCGWINSZ, &win) == 0) {
  1090. X            if (win.ws_row != 0)
  1091. X                LINES = win.ws_row - 1;
  1092. X            if (win.ws_col != 0)
  1093. X                COLS = win.ws_col;
  1094. X        }
  1095. X    }
  1096. X#endif
  1097. X
  1098. X    max_subj = (COLS/2) - 2;
  1099. X    max_from = (COLS-max_subj) - 17;
  1100. X
  1101. X    if (kill_articles) {            /* read in users kill file */
  1102. X        read_kill_file ();
  1103. X    }
  1104. X    
  1105. X    if (update) {            /* index file updater only */
  1106. X        Raw (FALSE);
  1107. X        do_update ();
  1108. X        exit (0);
  1109. X    }
  1110. X
  1111. X    init_screen_array (TRUE);        /* allocate screen array */
  1112. X    
  1113. X    mail_setup ();        /* record mailbox size for "you have mail" */
  1114. X
  1115. X#ifndef USE_CLEARSCREEN
  1116. X    ClearScreen();
  1117. X#endif
  1118. X
  1119. X    selection_index ();
  1120. X
  1121. X    tin_done (0);
  1122. X
  1123. X    exit (0);
  1124. X}
  1125. X
  1126. X/*
  1127. X * usage
  1128. X */
  1129. X
  1130. Xvoid usage (progname)
  1131. X    char *progname;
  1132. X{
  1133. X    fprintf(stderr, "%s %s - threaded usenet newsreader. Copyright 1991 Iain Lea.\n\n", progname, version);
  1134. X    fprintf(stderr, "Usage: %s [options] [newsgroups]\n",progname);
  1135. X    fprintf(stderr, "  -c       mark all articles as read in subscribed newsgroups\n");
  1136. X    fprintf(stderr, "  -d dir   save articles to directory [default=%s]\n",savedir);
  1137. X    fprintf(stderr, "  -f file  subscribed newsgroups file [default=%s/.newsrc]\n", homedir);
  1138. X    fprintf(stderr, "  -h       help\n");
  1139. X    fprintf(stderr, "  -m file  mail program [default=%s]\n",DEFAULT_MAILER);
  1140. X    fprintf(stderr, "  -M dir   mailbox directory [default=%s]\n",maildir);
  1141. X    fprintf(stderr, "  -p file  print program with options [default=%s]\n",DEFAULT_PRINTER);
  1142. X    fprintf(stderr, "  -r       read news remotely from default NNTP server\n",DEFAULT_PRINTER);
  1143. X    fprintf(stderr, "  -S dir   spool directory [default=%s]\n",SPOOLDIR);
  1144. X    fprintf(stderr, "  -u       update index files only\n");
  1145. X    fprintf(stderr, "  -v       update index files only (verbose)\n");
  1146. X}
  1147. SHAR_EOF
  1148. $TOUCH -am 0820174191 main.c &&
  1149. chmod 0600 main.c ||
  1150. echo "restore of main.c failed"
  1151. set `wc -c main.c`;Wc_c=$1
  1152. if test "$Wc_c" != "6852"; then
  1153.     echo original size 6852, current size $Wc_c
  1154. fi
  1155. # ============= memory.c ==============
  1156. echo "x - extracting memory.c (Text)"
  1157. sed 's/^X//' << 'SHAR_EOF' > memory.c &&
  1158. X/*
  1159. X *  Project   : tin - a visual threaded usenet newsreader
  1160. X *  Module    : memory.c
  1161. X *  Author    : R.Skrenta / I.Lea
  1162. X *  Created   : 01-04-91
  1163. X *  Updated   : 22-08-91
  1164. X *  Release   : 1.0
  1165. X *  Notes     :
  1166. X *  Copyright : (c) Copyright 1991 by Rich Skrenta & Iain Lea
  1167. X *                You may  freely  copy or  redistribute  this software,
  1168. X *              so  long as there is no profit made from its use, sale
  1169. X *              trade or  reproduction.  You may not change this copy-
  1170. X *              right notice, and it must be included in any copy made
  1171. X */
  1172. X
  1173. X#include    "tin.h"
  1174. X
  1175. Xint active_num = 0;
  1176. Xint article_num = 0;
  1177. X
  1178. X/*
  1179. X *  Dynamic table management
  1180. X *  These settings are memory conservative:  small initial allocations
  1181. X *  and a 50% expansion on table overflow.  A fast vm system with
  1182. X *  much memory might want to start with higher initial allocations
  1183. X *  and a 100% expansion on overflow, especially for the arts[] array.
  1184. X */
  1185. X
  1186. Xvoid init_alloc ()
  1187. X{
  1188. X    if (active_num) {    /* initial alloc */
  1189. X        max_active = active_num;
  1190. X    } else {
  1191. X        max_active = DEFAULT_ACTIVE_NUM;
  1192. X    }
  1193. X
  1194. X    active = (struct group_ent *) my_malloc((unsigned) sizeof(*active) * max_active);
  1195. X    my_group = (int *) my_malloc((unsigned) sizeof(int) * max_active);
  1196. X    unread = (int *) my_malloc((unsigned) sizeof(int) * max_active);
  1197. X
  1198. X    if(article_num) {    /* initial alloc */
  1199. X        max_art = article_num;
  1200. X    } else {
  1201. X        max_art = DEFAULT_ARTICLE_NUM;
  1202. X    }
  1203. X
  1204. X    arts = (struct header *) my_malloc((unsigned) sizeof(*arts) * max_art);
  1205. X    base = (long *) my_malloc((unsigned) sizeof(long) * max_art);
  1206. X
  1207. X    max_kill = DEFAULT_KILL_NUM;
  1208. X    
  1209. X    killf = (struct kill_t *) my_malloc((unsigned) sizeof(*killf) * max_kill);
  1210. X
  1211. X    max_save = DEFAULT_SAVE_NUM;
  1212. X    
  1213. X    save = (struct save_t *) my_malloc((unsigned) sizeof(*save) * max_save);
  1214. X}
  1215. X
  1216. X
  1217. Xvoid expand_art()
  1218. X{
  1219. X    max_art += max_art / 2;        /* increase by 50% */
  1220. X
  1221. X    arts = (struct header *) my_realloc((char *) arts, (unsigned) sizeof(*arts) * max_art);
  1222. X    base = (long *) my_realloc((char *) base, (unsigned) sizeof(long) * max_art);
  1223. X}
  1224. X
  1225. X
  1226. Xvoid free_art_array ()
  1227. X{
  1228. X    register int i;
  1229. X
  1230. X    for (i=0 ; i < top ; i++) {
  1231. X        arts[i].artnum = 0L;
  1232. X        arts[i].thread = ART_NORMAL;
  1233. X        arts[i].inthread = FALSE;
  1234. X        arts[i].unread = ART_UNREAD;
  1235. X        arts[i].tagged = FALSE;
  1236. X        if (arts[i].part) {
  1237. X            free (arts[i].part);
  1238. X            arts[i].part = (char *) 0;
  1239. X        }
  1240. X        if (arts[i].patch) {
  1241. X            free (arts[i].patch);
  1242. X            arts[i].patch = (char *) 0;
  1243. X        }
  1244. X    }
  1245. X}
  1246. X
  1247. X
  1248. Xvoid expand_active()
  1249. X{
  1250. X    max_active += max_active / 2;        /* increase by 50% */
  1251. X
  1252. X    active = (struct group_ent *) my_realloc((char *) active,
  1253. X                        (unsigned) sizeof(*active) * max_active);
  1254. X    my_group = (int *) my_realloc((char *) my_group, (unsigned) sizeof(int) * max_active);
  1255. X    unread = (int *) my_realloc((char *) unread, (unsigned) sizeof(int) * max_active);
  1256. X}
  1257. X
  1258. X
  1259. Xvoid expand_kill()
  1260. X{
  1261. X    max_kill += max_kill / 2;        /* increase by 50% */
  1262. X
  1263. X    killf = (struct kill_t *) my_realloc((char *) killf, (unsigned) sizeof(struct kill_t) * max_kill);
  1264. X}
  1265. X
  1266. X
  1267. Xvoid expand_save()
  1268. X{
  1269. X    max_save += max_save / 2;        /* increase by 50% */
  1270. X
  1271. X    save = (struct save_t *) my_realloc((char *) save, (unsigned) sizeof(struct save_t) * max_save);
  1272. X}
  1273. X
  1274. X
  1275. Xvoid init_screen_array (allocate)
  1276. X    int allocate;
  1277. X{
  1278. X    int i;
  1279. X
  1280. X    if (allocate) {
  1281. X        screen = (struct screen_t *) my_malloc((unsigned) sizeof(*screen) * LINES);
  1282. X
  1283. X        for (i=0 ; i < LINES ; i++) {
  1284. X            screen[i].col = (char *) my_malloc ((unsigned) COLS+1);
  1285. X        }
  1286. X    } else {
  1287. X        for (i=0 ; i < LINES ; i++) {
  1288. X            if (screen[i].col) {
  1289. X                free (screen[i].col);
  1290. X                screen[i].col = (char *) 0;
  1291. X            }
  1292. X        }
  1293. X
  1294. X        free (screen);
  1295. X    }
  1296. X}
  1297. X
  1298. X
  1299. Xvoid free_all_arrays ()
  1300. X{
  1301. X    register int i;
  1302. X
  1303. X    hash_reclaim ();
  1304. X    
  1305. X    init_screen_array (FALSE);
  1306. X
  1307. X    free_art_array ();
  1308. X
  1309. X    if (my_group) {
  1310. X        free (my_group);
  1311. X    }
  1312. X
  1313. X    if (unread) {
  1314. X        free (unread);
  1315. X    }
  1316. X
  1317. X    if (base) {
  1318. X        free (base);
  1319. X    }
  1320. X
  1321. X    if (killf) {
  1322. X        free_kill_array ();
  1323. X        if (killf) {
  1324. X            free (killf);
  1325. X        }
  1326. X    }
  1327. X
  1328. X    if (save) {
  1329. X        free_save_array ();
  1330. X        if (save) {
  1331. X            free (save);
  1332. X        }
  1333. X    }
  1334. X
  1335. X    if (active) { 
  1336. X        for (i=0 ; i < max_active ; i++) {
  1337. X            if (active[i].name) {
  1338. X                free (active[i].name);
  1339. X            }
  1340. X        }
  1341. X        free (active);
  1342. X    }
  1343. X
  1344. X    if (arts) {
  1345. X        free (arts);
  1346. X    }
  1347. X}
  1348. X
  1349. X
  1350. Xvoid free_kill_array ()
  1351. X{
  1352. X    int i;
  1353. X    
  1354. X    for (i=0 ; i < kill_num ; i++) {
  1355. X        if (killf[i].kill_subj) {
  1356. X            free (killf[i].kill_subj);
  1357. X            killf[i].kill_subj = (char *) 0;
  1358. X        }
  1359. X        if (killf[i].kill_from) {
  1360. X            free (killf[i].kill_from);
  1361. X            killf[i].kill_from = (char *) 0;
  1362. X        }
  1363. X    }
  1364. X}
  1365. X
  1366. X
  1367. X/*
  1368. X *  reset save list array to 0 and free's all its allocated memory
  1369. X */
  1370. X 
  1371. Xvoid free_save_array ()
  1372. X{
  1373. X    int i;
  1374. X    
  1375. X    for (i=0 ; i < save_num ; i++) {
  1376. X        if (save[i].subject) {
  1377. X            free (save[i].subject);
  1378. X            save[i].subject = (char *) 0;
  1379. X        }
  1380. X        if (save[i].archive) {
  1381. X            free (save[i].archive);
  1382. X            save[i].archive = (char *) 0;
  1383. X        }
  1384. X        if (save[i].dir) {
  1385. X            free (save[i].dir);
  1386. X            save[i].dir = (char *) 0;
  1387. X        }
  1388. X        if (save[i].file) {
  1389. X            free (save[i].file);
  1390. X            save[i].file = (char *) 0;
  1391. X        }
  1392. X        if (save[i].part) {
  1393. X            free (save[i].part);
  1394. X            save[i].part = (char *) 0;
  1395. X        }
  1396. X        if (save[i].patch) {
  1397. X            free (save[i].patch);
  1398. X            save[i].patch = (char *) 0;
  1399. X        }
  1400. X        save[i].index   = -1;
  1401. X        save[i].saved   = FALSE;
  1402. X        save[i].is_mailbox = FALSE;
  1403. X    }
  1404. X    
  1405. X    save_num = 0;
  1406. X}
  1407. X
  1408. Xchar *my_malloc (size)
  1409. X    unsigned size;
  1410. X{
  1411. X    char *p;
  1412. X
  1413. X    if ((p = (char *) calloc (1, (int) size)) == NULL) {
  1414. X        fprintf (stderr, txt_out_of_memory, progname);
  1415. X        exit (1);
  1416. X    }
  1417. X    return p;
  1418. X}
  1419. X
  1420. X
  1421. Xchar *my_realloc (p, size)
  1422. X    char *p;
  1423. X    unsigned size;
  1424. X{
  1425. X    if (! p) {
  1426. X        p = (char *) calloc (1, (int) size);
  1427. X    } else {
  1428. X        p = (char *) realloc (p, (int) size);
  1429. X    }
  1430. X
  1431. X    if (! p) {
  1432. X        fprintf (stderr, txt_out_of_memory, progname);
  1433. X        exit (1);
  1434. X    }
  1435. X    return p;
  1436. X}
  1437. X
  1438. SHAR_EOF
  1439. $TOUCH -am 0822175591 memory.c &&
  1440. chmod 0600 memory.c ||
  1441. echo "restore of memory.c failed"
  1442. set `wc -c memory.c`;Wc_c=$1
  1443. if test "$Wc_c" != "5489"; then
  1444.     echo original size 5489, current size $Wc_c
  1445. fi
  1446. # ============= misc.c ==============
  1447. echo "x - extracting misc.c (Text)"
  1448. sed 's/^X//' << 'SHAR_EOF' > misc.c &&
  1449. X/*
  1450. X *  Project   : tin - a visual threaded usenet newsreader
  1451. X *  Module    : misc.c
  1452. X *  Author    : R.Skrenta / I.Lea
  1453. X *  Created   : 01-04-91
  1454. X *  Updated   : 20-08-91
  1455. X *  Release   : 1.0
  1456. X *  Notes     :
  1457. X *  Copyright : (c) Copyright 1991 by Rich Skrenta & Iain Lea
  1458. X *                You may  freely  copy or  redistribute  this software,
  1459. X *              so  long as there is no profit made from its use, sale
  1460. X *              trade or  reproduction.  You may not change this copy-
  1461. X *              right notice, and it must be included in any copy made
  1462. X */
  1463. X
  1464. X#include    "tin.h"
  1465. X
  1466. X
  1467. Xchar rcdir[LEN+1];
  1468. Xchar rcfile[LEN+1];
  1469. Xchar indexdir[LEN+1];
  1470. Xchar killfile[LEN+1];
  1471. Xchar postfile[LEN+1];
  1472. X
  1473. Xchar active_file[LEN+1];
  1474. Xchar homedir[LEN+1];
  1475. Xchar userid[LEN+1];
  1476. Xchar delgroups[LEN+1];
  1477. Xchar newsrc[LEN+1];
  1478. Xchar newnewsrc[LEN+1];
  1479. Xchar add_addr[LEN+1];        /* address to add to rR reply to author with mail */
  1480. Xchar reply_to[LEN+1];        /* reply-to address */
  1481. Xchar my_org[LEN+1];            /* organization */
  1482. Xchar sig[LEN+1];
  1483. Xchar signature[LEN+1];
  1484. Xchar killsubj[LEN+1];        /* contains Subject:'s not to be shown */
  1485. Xchar killfrom[LEN+1];        /* conatins From:'s not to be shown */
  1486. Xchar page_header[LEN+1];    /* page header of pgm name and version */
  1487. Xchar savedir[LEN+1];        /* directory to save articles to */
  1488. Xchar spooldir[LEN+1];        /* directory where new is */
  1489. Xchar mailer[LEN+1];            /* mail program */
  1490. Xchar maildir[LEN+1];        /* mailbox dir where = saves are stored */
  1491. Xchar printer[LEN+1];        /* printer program */
  1492. Xchar progname[LEN+1];        /* program name */
  1493. Xint sort_art_type;            /* sort arts[] array by subject,from or date field */
  1494. Xint save_separate;            /* save a each part of a thread to a separate file */
  1495. Xint save_archive_name;        /* save thread with name from Archive-name: field */
  1496. Xint default_printer;        /* set to false if user give a printer with -p switch */
  1497. Xint print_header;            /* print all of mail header or just Subject: & From lines */
  1498. Xint show_author;            /* show Subject & From or only Subject in group menu */
  1499. Xint draw_arrow_mark;        /* draw -> or highlighted bar */
  1500. Xint kill_articles;            /* kill articles matching kill file contents */
  1501. Xint post_process;            /* post process (ie. unshar/uudecode) saved article/thread */
  1502. Xint mark_saved_read;        /* mark saved article/thread as read */
  1503. Xint post_proc_type;            /* type of post processing to be performed */
  1504. Xint num_of_tagged_files;
  1505. X
  1506. X/*
  1507. X * init_selfinfo
  1508. X *   Deterimines users home directory, userid, and a path
  1509. X *   for an rc file in the home directory
  1510. X */
  1511. X
  1512. Xvoid init_selfinfo()
  1513. X{
  1514. X    char nam[LEN+1];
  1515. X    char *p;
  1516. X    extern char *getenv();
  1517. X    extern struct passwd *getpwuid();
  1518. X    FILE *fp;
  1519. X    struct passwd *myentry;
  1520. X    struct stat sb;
  1521. X
  1522. X    myentry = getpwuid (getuid());
  1523. X    strcpy (userid, myentry->pw_name);
  1524. X    strcpy (homedir, myentry->pw_dir);
  1525. X
  1526. X    default_printer = TRUE;
  1527. X    draw_arrow_mark = FALSE;
  1528. X    kill_articles = FALSE;
  1529. X    mark_saved_read = TRUE;
  1530. X    num_of_tagged_files = 0;
  1531. X    post_process = FALSE;
  1532. X    post_proc_type = POST_PROC_SH;
  1533. X    print_header = FALSE;
  1534. X    save_separate = TRUE;
  1535. X    save_archive_name = TRUE;
  1536. X    show_author = TRUE;
  1537. X    sort_art_type = SORT_BY_NONE;
  1538. X
  1539. X    killsubj[0] = '\0';
  1540. X    killfrom[0] = '\0';
  1541. X    
  1542. X    author_search_string[0] = '\0';
  1543. X    group_search_string[0] = '\0';
  1544. X    subject_search_string[0] = '\0';
  1545. X    art_search_string[0] = '\0';
  1546. X    default_regex_pattern[0] = '\0';
  1547. X    
  1548. X    sprintf (rcdir,  "%s/%s", homedir, RCDIR);
  1549. X    sprintf (indexdir, "%s/%s", rcdir, INDEXDIR);
  1550. X    sprintf (rcfile,   "%s/%s", rcdir, RCFILE);
  1551. X    sprintf (indexdir, "%s/%s", rcdir, INDEXDIR);
  1552. X    sprintf (killfile, "%s/%s", rcdir, KILLFILE);
  1553. X    sprintf (postfile, "%s/%s", rcdir, POSTFILE);
  1554. X
  1555. X    if (stat (rcdir, &sb) == -1) {
  1556. X        mkdir (rcdir, 0755);
  1557. X        if (stat (indexdir, &sb) == -1) {
  1558. X            mkdir (indexdir, 0755);
  1559. X        }
  1560. X    }
  1561. X
  1562. X    sprintf (signature, "%s/.signature", homedir);
  1563. X    sprintf (sig, "%s/.Sig", homedir);
  1564. X    sprintf (newsrc, "%s/.newsrc", homedir);
  1565. X    sprintf (newnewsrc, "%s/.newnewsrc", homedir);
  1566. X    sprintf (delgroups, "%s/.delgroups", homedir);
  1567. X    sprintf (active_file, "%s/active", LIBDIR);
  1568. X    sprintf (savedir, "%s/News",homedir);
  1569. X    sprintf (maildir, "%s/%s",homedir,DEFAULT_MAILBOX);
  1570. X
  1571. X    strcpy (mailer, DEFAULT_MAILER);
  1572. X    strcpy (printer, DEFAULT_PRINTER);
  1573. X    strcpy (spooldir, SPOOLDIR);
  1574. X
  1575. X    read_rcfile ();
  1576. X
  1577. X    if (stat(savedir,&sb) == -1) {
  1578. X        mkdir(savedir, 0755);
  1579. X    }
  1580. X    if (stat(maildir,&sb) == -1) {
  1581. X        mkdir(maildir, 0755);
  1582. X    }
  1583. X    
  1584. X    if (stat(active_file, &sb) >= 0)
  1585. X        goto got_active;
  1586. X
  1587. X/*
  1588. X *  I hate forgetting to define LIBDIR correctly.  Guess a
  1589. X *  couple of likely places if it's not where LIBDIR says it is.
  1590. X */
  1591. X
  1592. X    strcpy (active_file, "/usr/lib/news/active");
  1593. X    if (stat(active_file, &sb) >= 0)
  1594. X        goto got_active;
  1595. X
  1596. X    strcpy(active_file, "/usr/local/lib/news/active");
  1597. X    if (stat(active_file, &sb) >= 0)
  1598. X        goto got_active;
  1599. X
  1600. X    strcpy(active_file, "/usr/public/lib/news/active");
  1601. X    if (stat(active_file, &sb) >= 0)
  1602. X        goto got_active;
  1603. X
  1604. X/*
  1605. X *  Oh well.  Revert to what LIBDIR says it is to produce a
  1606. X *  useful error message when read_active() fails later.
  1607. X */
  1608. X
  1609. X    sprintf(active_file, "%s/active", LIBDIR);
  1610. X
  1611. Xgot_active:
  1612. X
  1613. X/*
  1614. X *  check enviroment for organization
  1615. X */
  1616. X    my_org[0] = '\0';
  1617. X    if ((p = getenv("ORGANIZATION")) != NULL) {
  1618. X        my_strncpy (my_org, p, LEN);
  1619. X        goto got_org;
  1620. X    }
  1621. X
  1622. X/*
  1623. X *  check ~/.org for organization
  1624. X */
  1625. X    sprintf(nam, "%s/organization", rcdir);
  1626. X    fp = fopen (nam, "r");
  1627. X
  1628. X/*
  1629. X *  check LIBDIR/organization for system wide organization
  1630. X */
  1631. X    if (fp == NULL) {
  1632. X        sprintf(nam, "%s/organization", LIBDIR);
  1633. X        fp = fopen(nam, "r");
  1634. X    }
  1635. X
  1636. X    if (fp == NULL) {
  1637. X        sprintf(nam, "/usr/lib/news/organization");
  1638. X        fp = fopen(nam, "r");
  1639. X    }
  1640. X
  1641. X    if (fp == NULL) {
  1642. X        sprintf(nam, "/usr/local/lib/news/organization");
  1643. X        fp = fopen(nam, "r");
  1644. X    }
  1645. X
  1646. X    if (fp == NULL) {
  1647. X        sprintf(nam, "/usr/public/lib/news/organization");
  1648. X        fp = fopen(nam, "r");
  1649. X    }
  1650. X
  1651. X    if (fp == NULL) {
  1652. X        sprintf(nam, "/etc/organization");
  1653. X        fp = fopen(nam, "r");
  1654. X    }
  1655. X
  1656. X    if (fp != NULL) {
  1657. X        if (fgets(my_org, LEN, fp) != NULL) {
  1658. X            for (p = my_org; *p && *p != '\n'; p++) ;
  1659. X            *p = '\0';
  1660. X        }
  1661. X        fclose(fp);
  1662. X    }
  1663. X
  1664. Xgot_org:;
  1665. X
  1666. X/*
  1667. X *  check enviroment for REPLY_TO
  1668. X */
  1669. X    reply_to[0] = '\0';
  1670. X    if ((p = getenv("REPLY_TO")) != NULL) {
  1671. X        my_strncpy (reply_to, p, LEN);
  1672. X        goto got_reply;
  1673. X    }
  1674. X
  1675. X    sprintf(nam, "%s/reply_to", rcdir);
  1676. X    fp = fopen(nam, "r");
  1677. X    
  1678. X    if (fp != NULL) {
  1679. X        if (fgets(reply_to, LEN, fp) != NULL) {
  1680. X            for (p = reply_to; *p && *p != '\n'; p++) ;
  1681. X            *p = '\0';
  1682. X        }
  1683. X        fclose(fp);
  1684. X    }
  1685. X
  1686. Xgot_reply:;
  1687. X
  1688. X/*
  1689. X *  check enviroment for ADD_ADDR
  1690. X */
  1691. X    add_addr[0] = '\0';
  1692. X    if ((p = getenv("ADD_ADDR")) != NULL) {
  1693. X        my_strncpy (add_addr, p, LEN);
  1694. X        goto got_addr;
  1695. X    }
  1696. X
  1697. X    sprintf(nam, "%s/add_addr", rcdir);
  1698. X    fp = fopen(nam, "r");
  1699. X    
  1700. X    if (fp != NULL) {
  1701. X        if (fgets(add_addr, LEN, fp) != NULL) {
  1702. X            for (p = add_addr; *p && *p != '\n'; p++) ;
  1703. X            *p = '\0';
  1704. X        }
  1705. X        fclose(fp);
  1706. X    }
  1707. X
  1708. Xgot_addr:;
  1709. X
  1710. X}
  1711. X
  1712. X
  1713. X/*
  1714. X *  Which base note (an index into base[]) does a respnum
  1715. X *  (an index into arts[]) corresponsd to?
  1716. X *
  1717. X *  In other words, base[] points to an entry in arts[] which is
  1718. SHAR_EOF
  1719. echo "End of tin part 3"
  1720. echo "File misc.c is continued in part 4"
  1721. echo "4" > shar3_seq_.tmp
  1722. exit 0
  1723.  
  1724. --
  1725. NAME   Iain Lea
  1726. EMAIL  norisc!iain@estevax.UUCP  ...!unido!estevax!norisc!iain
  1727. SNAIL  Siemens AG, AUT 922C, Postfach 4848, Nuernberg, Germany
  1728. PHONE  +49-911-895-3853, +49-911-895-3877, +49-911-331963
  1729.