/**************************************************************************** * NCSA Mosaic for the X Window System * * Software Development Group * * National Center for Supercomputing Applications * * University of Illinois at Urbana-Champaign * * 605 E. Springfield, Champaign IL 61820 * * mosaic@ncsa.uiuc.edu * * * * Copyright (C) 1993, Board of Trustees of the University of Illinois * * * * NCSA Mosaic software, both binary and source (hereafter, Software) is * * copyrighted by The Board of Trustees of the University of Illinois * * (UI), and ownership remains with the UI. * * * * The UI grants you (hereafter, Licensee) a license to use the Software * * for academic, research and internal business purposes only, without a * * fee. Licensee may distribute the binary and source code (if released) * * to third parties provided that the copyright notice and this statement * * appears on all copies and that no charge is associated with such * * copies. * * * * Licensee may make derivative works. However, if Licensee distributes * * any derivative work based on or derived from the Software, then * * Licensee will (1) notify NCSA regarding its distribution of the * * derivative work, and (2) clearly notify users that such derivative * * work is a modified version and not the original NCSA Mosaic * * distributed by the UI. * * * * Any Licensee wishing to make commercial use of the Software should * * contact the UI, c/o NCSA, to negotiate an appropriate license for such * * commercial use. Commercial use includes (1) integration of all or * * part of the source code into a product for sale or license by or on * * behalf of Licensee to third parties, or (2) distribution of the binary * * code or source code to third parties that need it to utilize a * * commercial product sold or licensed by or on behalf of Licensee. * * * * UI MAKES NO REPRESENTATIONS ABOUT THE SUITABILITY OF THIS SOFTWARE FOR * * ANY PURPOSE. IT IS PROVIDED "AS IS" WITHOUT EXPRESS OR IMPLIED * * WARRANTY. THE UI SHALL NOT BE LIABLE FOR ANY DAMAGES SUFFERED BY THE * * USERS OF THIS SOFTWARE. * * * * By using or copying this Software, Licensee agrees to abide by the * * copyright law and all other applicable laws of the U.S. including, but * * not limited to, export control laws, and the terms of this license. * * UI shall have the right to terminate this license immediately by * * written notice upon Licensee's breach of, or non-compliance with, any * * of its terms. Licensee may be held legally responsible for any * * copyright infringement that is caused or encouraged by Licensee's * * failure to abide by the terms of this license. * * * * Comments and questions are welcome and can be sent to * * mosaic-x@ncsa.uiuc.edu. * ****************************************************************************/ #include "mosaic.h" #include #include #include #include #include #include #include #include #include "libhtmlw/HTML.h" #include gui_news_list(mo_window *win) { mo_load_window_text(win,"news:*",NULL); } gui_news_index(mo_window *win) { char url[128]; strcpy(url,win->current_node->url); news_index(url); if(url[0]) mo_load_window_text(win,url,NULL); } gui_news_prev(mo_window *win) { char url[128]; strcpy(url,win->current_node->url); news_prev(url); if(url[0]) mo_load_window_text(win,url,NULL); } gui_news_next(mo_window *win) { char url[128]; strcpy(url,win->current_node->url); news_next(url); if(url[0]) mo_load_window_text(win,url,NULL); } gui_news_prevt(mo_window *win) { char url[128]; strcpy(url,win->current_node->url); news_prevt(url); if(url[0]) mo_load_window_text(win,url,NULL); } gui_news_nextt(mo_window *win) { char url[128]; strcpy(url,win->current_node->url); news_nextt(url); if(url[0]) mo_load_window_text(win,url,NULL); } static XmxCallback (include_fsb_cb) { char *fname; FILE *fp; char line[MO_LINE_LENGTH], *status; mo_window *win = mo_fetch_window_by_id (XmxExtractUniqid ((int)client_data)); if (!win) return; XtUnmanageChild (win->news_fsb_win); fname = (char *)malloc (128 * sizeof (char)); XmStringGetLtoR (((XmFileSelectionBoxCallbackStruct *)call_data)->value, XmSTRING_DEFAULT_CHARSET, &fname); fp = fopen (fname, "r"); if (!fp) { char *buf, *final, tmpbuf[80]; int final_len; buf=my_strerror(errno); if (!buf || !*buf || !strcmp(buf,"Error 0")) { sprintf(tmpbuf,"Unknown Error"); buf=tmpbuf; } final_len=30+((!fname || !*fname?3:strlen(fname))+13)+15+(strlen(buf)+13); final=(char *)calloc(final_len,sizeof(char)); strcpy(final,"\nUnable to Open File:\n"); sprintf(final+strlen(final)," %s\n",(!fname || !*fname?" ":fname)); sprintf(final+strlen(final),"\nOpen Error:\n"); sprintf(final+strlen(final)," %s\n",buf); XmxMakeErrorDialog (win->news_win, final, "Open Error"); XtManageChild (Xmx_w); if (final) { free(final); final=NULL; } return; } while (1) { long pos; status = fgets (line, MO_LINE_LENGTH, fp); if (!status || !(*line)) goto done; #ifdef L10N { char *p; for (p=line;*p;p++) { if (*p & 0x80) { if (!(*(++p) & 0x80)) { p[-1] = '?'; } } } } #endif /* L10N */ XmTextInsert (win->news_text, pos = XmTextGetInsertionPosition (win->news_text), line); /* move insertion position to past this line to avoid inserting the lines in reverse order */ XmTextSetInsertionPosition (win->news_text, pos + strlen(line)); } done: return; } static XmxCallback (include_button_cb) /* Why is this here ?*/ { mo_window *win = mo_fetch_window_by_id (XmxExtractUniqid ((int)client_data)); return; } /* ----------------------- mo_post_news_window -------------------------- */ int NNTPpost(char *from, char *subj, char *ref, char *groups, char *msg); int NNTPgetarthdrs(char *art,char **ref, char **grp, char **subj, char **from); char *NNTPgetquoteline(char *art); static XmxCallback (news_win_cb) { mo_window *win = mo_fetch_window_by_id (XmxExtractUniqid ((int)client_data)); char *msg,*subj,*group,*from; switch (XmxExtractToken ((int)client_data)) { case 0: /* POST */ XtUnmanageChild (win->news_win); msg = XmxTextGetString (win->news_text); from = XmxTextGetString (win->news_text_from); subj = XmxTextGetString (win->news_text_subj); group = XmxTextGetString (win->news_text_group); if (!msg) return; if (msg[0] == '\0') return; NNTPpost(from, subj, NULL, group, msg); free(msg); free(from); free(group); free(subj); case 1: /* DISMISS */ XtUnmanageChild (win->news_win); /* since we're going to re-use this in different configs we'll destroy it */ XtDestroyWidget (win->news_win); win->news_win = NULL; win->news_fsb_win = NULL; /* Do nothing. */ break; case 2: /* HELP */ mo_open_another_window (win, mo_assemble_help_url ("help-on-news.html"), NULL, NULL); break; case 3: /* INSERT FILE */ if (!win->news_fsb_win) { win->news_fsb_win = XmxMakeFileSBDialog (win->news_win, "NCSA Mosaic: Include File In News Post", "Name of file to include:", include_fsb_cb, 0); } else { XmFileSelectionDoSearch (win->news_fsb_win, NULL); } XmxManageRemanage (win->news_fsb_win); break; case 4: /* QUOTE */ break; } return; } static XmxCallback (follow_win_cb) { mo_window *win = mo_fetch_window_by_id (XmxExtractUniqid ((int)client_data)); char *msg,*subj,*group,*from,*line; int pos; switch (XmxExtractToken ((int)client_data)) { case 0: /* POST */ XtUnmanageChild (win->news_win); msg = XmxTextGetString (win->news_text); from = XmxTextGetString (win->news_text_from); subj = XmxTextGetString (win->news_text_subj); group = XmxTextGetString (win->news_text_group); if (!msg) return; if (msg[0] == '\0') return; NNTPpost(from, subj, win->newsfollow_ref, group, msg); free(msg); free(from); free(group); free(subj); case 1: /* DISMISS */ if(win->newsfollow_ref) free(win->newsfollow_ref); if(win->newsfollow_grp) free(win->newsfollow_grp); if(win->newsfollow_subj) free(win->newsfollow_subj); if(win->newsfollow_from) free(win->newsfollow_from); if(win->newsfollow_artid) free(win->newsfollow_artid); XtUnmanageChild (win->news_win); /* since we're going to re-use this in different configs we'll destroy it */ XtDestroyWidget (win->news_win); win->news_win = NULL; win->news_fsb_win = NULL; /* Do nothing. */ break; case 2: /* HELP */ mo_open_another_window (win, mo_assemble_help_url ("help-on-news.html"), NULL, NULL); break; case 3: /* INSERT FILE */ if (!win->news_fsb_win) { win->news_fsb_win = XmxMakeFileSBDialog (win->news_win, "NCSA Mosaic: Include File In News Post", "Name of file to include:", include_fsb_cb, 0); } else { XmFileSelectionDoSearch (win->news_fsb_win, NULL); } XmxManageRemanage (win->news_fsb_win); break; case 4: /* QUOTE */ line = malloc(strlen(win->newsfollow_from)+30); sprintf(line,"%s writes:\n\n",win->newsfollow_from); XmTextInsert(win->news_text, pos = XmTextGetInsertionPosition (win->news_text), line); /* move insertion position to past this line to avoid inserting the lines in reverse order */ XmTextSetInsertionPosition (win->news_text, pos+strlen(line)); if(line = NNTPgetquoteline(win->newsfollow_artid)){ do { #ifdef L10N mo_news_codeconv(line); #endif /* L10N */ XmTextInsert(win->news_text, pos = XmTextGetInsertionPosition (win->news_text), line); /* move insertion position to past this line to avoid inserting the lines in reverse order */ XmTextSetInsertionPosition (win->news_text, pos+strlen(line)); } while (line = NNTPgetquoteline(NULL)); } break; } return; } mo_status mo_post_news_win (mo_window *win) { return mo_post_generic_news_win(win,0); } mo_status mo_post_follow_win (mo_window *win) { char *s; if(strncmp("news:",win->current_node->url,5)) return; /* fix me */ NNTPgetarthdrs(&(win->current_node->url)[5], &(win->newsfollow_ref), &(win->newsfollow_grp), &(win->newsfollow_subj), &(win->newsfollow_from)); /* add a re: if needed*/ if(strncmp("Re: ",win->newsfollow_subj,4) && strncmp("re: ",win->newsfollow_subj,4)){ s = malloc(strlen(win->newsfollow_subj)+5); /* this sucks -bjs*/ sprintf(s,"Re: %s",win->newsfollow_subj); free(win->newsfollow_subj); win->newsfollow_subj = s; } /* add this article to ref */ win->newsfollow_artid = malloc(strlen(win->current_node->url)); strcpy(win->newsfollow_artid, &(win->current_node->url)[5]); if(!win->newsfollow_ref){ win->newsfollow_ref = malloc(strlen(win->current_node->url)); sprintf(win->newsfollow_ref,"<%s>",&(win->current_node->url)[5]); } else { s = malloc(strlen(win->newsfollow_ref)+ strlen(win->current_node->url)); /* this sucks -bjs*/ sprintf(s,"%s <%s>",win->newsfollow_ref,&(win->current_node->url)[5]); free(win->newsfollow_ref); win->newsfollow_ref = s; } return mo_post_generic_news_win(win,1); } mo_status mo_post_generic_news_win(mo_window *win, int follow) { extern char *machine; struct passwd *pw = getpwuid (getuid ()); char namestr[1024], *author, tmp[1024]; Widget dialog_frame; Widget dialog_sep, buttons_form; Widget news_form, yap_label, f_label, s_label, g_label; FILE *fp; long pos; if (Rdata.default_author_name) author = Rdata.default_author_name; else author = pw->pw_gecos; sprintf (namestr, "%s <%s@%s>", author, pw->pw_name, machine); if (!win->news_win) { /* Create it for the first time. */ XmxSetUniqid (win->id); Xmx_n = 0; win->news_win = XmxMakeFormDialog (win->base, "NCSA Mosaic: News Post"); dialog_frame = XmxMakeFrame (win->news_win, XmxShadowOut); /* Constraints for base. */ XmxSetConstraints (dialog_frame, XmATTACH_FORM, XmATTACH_FORM, XmATTACH_FORM, XmATTACH_FORM, NULL, NULL, NULL, NULL); /* Main form. */ news_form = XmxMakeForm (dialog_frame); XmxSetArg(XmNalignment, XmALIGNMENT_END); f_label = XmxMakeLabel (news_form, "From: "); XmxSetArg(XmNalignment, XmALIGNMENT_END); s_label = XmxMakeLabel (news_form, "Subject: "); XmxSetArg(XmNalignment, XmALIGNMENT_END); g_label = XmxMakeLabel (news_form, "Groups: "); if(follow) yap_label = XmxMakeLabel (news_form, "Follow-up to UseNet News Article"); else yap_label = XmxMakeLabel (news_form, "Post a UseNet News Article"); #ifdef L10N #ifdef MOTIF_I18N if (Rdata.half_sized_textfield) XmxSetArg (XmNcolumns, 33); else #endif /* MOTIF_I18N */ #endif /* L10N */ XmxSetArg (XmNcolumns, 65); win->news_text_subj = XmxMakeText (news_form); #ifdef L10N #ifdef MOTIF_I18N if (Rdata.half_sized_textfield) XmxSetArg (XmNcolumns, 33); else #endif /* MOTIF_I18N */ #endif /* L10N */ XmxSetArg (XmNcolumns, 65); win->news_text_group = XmxMakeText (news_form); #ifdef L10N #ifdef MOTIF_I18N if (Rdata.half_sized_textfield) XmxSetArg (XmNcolumns, 33); else #endif /* MOTIF_I18N */ #endif /* L10N */ XmxSetArg (XmNcolumns, 65); XmxSetArg (XmNeditable, False); win->news_text_from = XmxMakeText (news_form); XmxSetArg (XmNscrolledWindowMarginWidth, 10); XmxSetArg (XmNscrolledWindowMarginHeight, 10); XmxSetArg (XmNcursorPositionVisible, True); XmxSetArg (XmNeditable, True); XmxSetArg (XmNeditMode, XmMULTI_LINE_EDIT); XmxSetArg (XmNrows, 30); #ifdef L10N #ifdef MOTIF_I18N if (Rdata.half_sized_textfield) XmxSetArg (XmNcolumns, 40); else #endif /* MOTIF_I18N */ #endif /* L10N */ XmxSetArg (XmNcolumns, 80); XmxSetArg (XmNwordWrap, True); XmxSetArg (XmNscrollHorizontal, False); #ifdef L10N #if defined(IXIMOTIF1_2) || !defined(MOTIF_I18N) XmxSetArg (XmNfontList, (XtArgVal)win->font_list); #endif /* IXIMOTIF1_2 && !MOTIF_I18N */ #endif /* L10N */ win->news_text = XmxMakeScrolledText (news_form); dialog_sep = XmxMakeHorizontalSeparator (news_form); if(follow) buttons_form = XmxMakeFormAndFiveButtons (news_form, follow_win_cb, "Post", "Quote", "Insert File", "Dismiss", "Help...", 0, 4, 3, 1, 2); else buttons_form = XmxMakeFormAndFourButtons (news_form, news_win_cb, "Post", "Insert File", "Dismiss", "Help...", 0, 3, 1, 2); /* Constraints for news_form. */ XmxSetOffsets (yap_label, 10, 20, 0, 0); XmxSetConstraints (yap_label, XmATTACH_FORM, XmATTACH_NONE ,XmATTACH_FORM, XmATTACH_FORM, NULL, NULL, NULL, NULL); XmxSetOffsets (win->news_text_from, 10, 10, 10, 10); XmxSetConstraints (win->news_text_from, XmATTACH_WIDGET, XmATTACH_NONE, XmATTACH_WIDGET, XmATTACH_FORM, yap_label, NULL, f_label, NULL); XmxSetOffsets (f_label, 14, 10, 10, 10); XmxSetConstraints (f_label, XmATTACH_WIDGET, XmATTACH_NONE, XmATTACH_NONE, XmATTACH_NONE, yap_label, NULL, NULL, NULL); XmxSetOffsets (win->news_text_subj, 10, 10, 10, 10); XmxSetConstraints (win->news_text_subj, XmATTACH_WIDGET, XmATTACH_NONE, XmATTACH_WIDGET, XmATTACH_FORM, win->news_text_from, NULL, s_label, NULL); XmxSetOffsets (s_label, 14, 10, 10, 10); XmxSetConstraints (s_label, XmATTACH_WIDGET, XmATTACH_NONE, XmATTACH_NONE, XmATTACH_NONE, win->news_text_from, NULL, NULL, NULL); XmxSetOffsets (win->news_text_group, 10, 10, 10, 10); XmxSetConstraints (win->news_text_group, XmATTACH_WIDGET, XmATTACH_NONE, XmATTACH_WIDGET, XmATTACH_FORM, win->news_text_subj, NULL, g_label, NULL); XmxSetOffsets (g_label, 14, 10, 10, 10); XmxSetConstraints (g_label, XmATTACH_WIDGET ,XmATTACH_NONE, XmATTACH_NONE, XmATTACH_NONE, win->news_text_subj, NULL, NULL, NULL); XmxSetOffsets (XtParent (win->news_text), 10, 0, 3, 3); XmxSetConstraints (XtParent (win->news_text), XmATTACH_WIDGET, XmATTACH_WIDGET,XmATTACH_FORM, XmATTACH_FORM, win->news_text_group, dialog_sep, NULL, NULL); XmxSetArg (XmNtopOffset, 10); XmxSetConstraints (dialog_sep, XmATTACH_NONE, XmATTACH_WIDGET, XmATTACH_FORM, XmATTACH_FORM, NULL, buttons_form, NULL, NULL); XmxSetConstraints (buttons_form, XmATTACH_NONE, XmATTACH_FORM, XmATTACH_FORM, XmATTACH_FORM, NULL, NULL, NULL, NULL); XmxTextSetString (win->news_text, "\n\n"); /* leave a gap... */ /* tack signature on the end if it exists - code from Martin Hamilton */ if (Rdata.signature) XmTextSetInsertionPosition (win->news_text, 2); if ((fp = fopen(Rdata.signature, "r")) != NULL) { while(fgets(tmp, sizeof(tmp) - 1, fp)) { XmTextInsert(win->news_text, pos = XmTextGetInsertionPosition (win->news_text), tmp); XmTextSetInsertionPosition (win->news_text, pos + strlen(tmp)); } fclose(fp); } XmTextSetInsertionPosition (win->news_text, 0); if(follow){ XmxTextSetString (win->news_text_group, win->newsfollow_grp); XmxTextSetString (win->news_text_subj, win->newsfollow_subj); } else { XmxTextSetString (win->news_text_group, ""); XmxTextSetString (win->news_text_subj, ""); } XmxTextSetString (win->news_text_from, namestr); } XmxManageRemanage (win->news_win); return mo_succeed; }