📄 00000005.htm

📁 一份很好的linux入门资料
💻 HTM
📖 第 1 页 / 共 2 页
字号:
12 下一页
<HTML><HEAD>  <TITLE>BBS水木清华站∶精华区</TITLE></HEAD><BODY><CENTER><H1>BBS水木清华站∶精华区</H1></CENTER>发信人:&nbsp;fuse&nbsp;(保险丝),&nbsp;信区:&nbsp;Linux&nbsp;<BR>标&nbsp;&nbsp;题:&nbsp;Mailing&nbsp;list&nbsp;-&gt;&nbsp;BBS&nbsp;<BR>发信站:&nbsp;BBS&nbsp;水木清华站&nbsp;(Tue&nbsp;Jun&nbsp;16&nbsp;22:44:59&nbsp;1998)&nbsp;<BR>&nbsp;<BR>&nbsp;<BR>改了点，再灌一遍&nbsp;:-)&nbsp;<BR>&nbsp;<BR>这是把mailing&nbsp;list转到bbs上的看板上的方法。&nbsp;<BR>很土的办法，但是还挺好用，试运行3天了:-)&nbsp;<BR>&nbsp;<BR>在bbs上看文章可以a,&nbsp;?,&nbsp;/查找文章，可以用m,&nbsp;g标识&nbsp;<BR>可以收录精华区，比在mail信箱里看舒服多了，最重要&nbsp;<BR>的，可以一个人定阅，供众多人阅读:-)&nbsp;<BR>&nbsp;<BR>1.&nbsp;开个uid=bbs(9999)的帐号，如bsdqna&nbsp;<BR>2.&nbsp;在freebsd的home下面放一.forward文件,&nbsp;<BR>&nbsp;&nbsp;&nbsp;内书:&nbsp;&quot;|&nbsp;/home/bsdqna/mailpost&nbsp;/home/bbs&quot;&nbsp;<BR>3.&nbsp;bbs上开一版，比如:FreeBSD_Question版&nbsp;<BR>4.&nbsp;在/home/bsdqna/目录下放一叫mailpost文件&nbsp;<BR>&nbsp;&nbsp;&nbsp;内容附后，chmod&nbsp;+x&nbsp;mailpost&nbsp;<BR>5.&nbsp;cp&nbsp;~/bbsadm/innbbsd/innd&nbsp;~/bbsadm/innbbsd/maillist&nbsp;<BR>&nbsp;&nbsp;&nbsp;cd&nbsp;~/bbsadm/innbbsd/maillist/;&nbsp;vi&nbsp;bbspost.c&nbsp;<BR>&nbsp;&nbsp;找以下片断,在post_article()里&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;gets(&nbsp;userid&nbsp;);&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;gets(&nbsp;subject&nbsp;);&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;gets(&nbsp;realfrom&nbsp;);&nbsp;---&gt;加进这一行&nbsp;<BR>&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;if(&nbsp;usermail&nbsp;)&nbsp;{&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;//&nbsp;&nbsp;&nbsp;&nbsp;check_userec(&nbsp;&amp;record,&nbsp;userid&nbsp;);&nbsp;--&gt;comment掉这行&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;}&nbsp;<BR>&nbsp;&nbsp;&nbsp;再make&nbsp;bbspost&nbsp;<BR>&nbsp;&nbsp;将生成的bbspost放到/home/bbs/innd下面&nbsp;<BR>&nbsp;<BR>6.&nbsp;然后以<A HREF="mailto:bsdqna@your.host.name发信给Majordomo@FreeBSD.ORG">bsdqna@your.host.name发信给Majordomo@FreeBSD.ORG</A>&nbsp;<BR>&nbsp;&nbsp;&nbsp;subscribe&nbsp;freebsd_questions&nbsp;<BR>&nbsp;&nbsp;再以bsdqna回信auth一下，你的小站就会源源不断有信进来乐：&nbsp;<BR>＞<I>&nbsp;&nbsp;35&nbsp;&nbsp;◆&nbsp;FreeBSD_Bugs&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;[系统]&nbsp;○&nbsp;FreeBSD_Bugs&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;诚徵板主中&nbsp;</I><BR>&nbsp;&nbsp;&nbsp;70&nbsp;&nbsp;◆&nbsp;FreeBSD_Hacker&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;[系统]&nbsp;○&nbsp;FreeBSD_Hacker&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;诚徵板主中&nbsp;<BR>&nbsp;&nbsp;371&nbsp;&nbsp;◆&nbsp;FreeBSD_Question&nbsp;&nbsp;&nbsp;[系统]&nbsp;○&nbsp;FreeBSD_Question&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;诚徵板主中&nbsp;<BR>&nbsp;<BR>&nbsp;<BR>&nbsp;mailpost附后,&nbsp;压根不懂perl的我是拿bbs自带的程序改的，一定&nbsp;<BR>&nbsp;有更好的办法，还请各位大侠出手改进。&nbsp;<BR>&nbsp;<BR>#!/usr/bin/perl&nbsp;<BR>#&nbsp;<BR>#&nbsp;mailpost&nbsp;<BR>($bbshome)&nbsp;=&nbsp;@ARGV;&nbsp;<BR>if(&nbsp;!&nbsp;$bbshome&nbsp;)&nbsp;&nbsp;{&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;print&nbsp;&quot;Usage:&nbsp;mailpost&nbsp;bbs_home&nbsp;&lt;&nbsp;article_from_user_mail\n&quot;;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;exit(&nbsp;0&nbsp;);&nbsp;<BR>}&nbsp;<BR>&nbsp;<BR>$tmpfile&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;&quot;/tmp/mailpost.$$&quot;;&nbsp;<BR>$logfile&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;&quot;$bbshome/bbslog&quot;;&nbsp;<BR>#&nbsp;$mailbox&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;&quot;$bbshome/mailbox&quot;;&nbsp;<BR>$inndhome&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;&quot;$bbshome/innd&quot;;&nbsp;<BR>$poster&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;&quot;$inndhome/bbspost&quot;;&nbsp;<BR>$parsedate&nbsp;&nbsp;&nbsp;=&nbsp;&quot;$inndhome/parsedate&quot;;&nbsp;<BR>$denyfile&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;&quot;$inndhome/email.deny&quot;;&nbsp;<BR>$INC[&nbsp;@INC&nbsp;]&nbsp;=&nbsp;&quot;$inndhome&quot;;&nbsp;<BR>&nbsp;<BR>&amp;mail_article();&nbsp;<BR>&nbsp;<BR>sub&nbsp;logit&nbsp;<BR>{&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;if(&nbsp;$logfile&nbsp;)&nbsp;{&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;open(&nbsp;FN,&nbsp;&quot;&gt;&gt;&nbsp;$logfile&quot;&nbsp;);&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;print&nbsp;FN&nbsp;@_;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;close(&nbsp;FN&nbsp;);&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;}&nbsp;else&nbsp;{&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;print&nbsp;@_;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;}&nbsp;<BR>}&nbsp;<BR>&nbsp;<BR>sub&nbsp;log_tmpfile&nbsp;<BR>{&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;open(&nbsp;FN,&nbsp;$tmpfile&nbsp;);&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;$result&nbsp;=&nbsp;&lt;FN&gt;;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;close(&nbsp;FN&nbsp;);&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;unlink(&nbsp;$tmpfile&nbsp;);&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&amp;logit(&nbsp;$result&nbsp;);&nbsp;<BR>}&nbsp;<BR>&nbsp;<BR>sub&nbsp;junk_mail&nbsp;<BR>{&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;local&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;($msg)&nbsp;=&nbsp;@_;&nbsp;<BR>&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&amp;logit(&nbsp;&quot;unknown&nbsp;mail&nbsp;$msg\n&quot;&nbsp;);&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;if(&nbsp;!&nbsp;$name&nbsp;)&nbsp;{&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;$name&nbsp;=&nbsp;&quot;Mail-Daemon&quot;;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;}&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;if(&nbsp;!&nbsp;$subject&nbsp;)&nbsp;{&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;$subject&nbsp;=&nbsp;&quot;&lt;Unknown&gt;:&nbsp;$msg&quot;;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;}&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;open(&nbsp;FN,&nbsp;&quot;|&nbsp;$poster&nbsp;post&nbsp;$bbshome/boards/junk&nbsp;&gt;&nbsp;$tmpfile&quot;&nbsp;);&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;print&nbsp;FN&nbsp;&quot;$name\n&quot;;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;print&nbsp;FN&nbsp;&quot;$subject\n&quot;;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;print&nbsp;FN&nbsp;@MAIL;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;close(&nbsp;FN&nbsp;);&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&amp;log_tmpfile();&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;exit(&nbsp;0&nbsp;);&nbsp;<BR>}&nbsp;<BR>&nbsp;<BR>sub&nbsp;uudecode&nbsp;<BR>{&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;local&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;($begin)&nbsp;=&nbsp;@_;&nbsp;<BR>&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;$line&nbsp;=&nbsp;$MAIL[&nbsp;$begin&nbsp;+&nbsp;1&nbsp;];&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;if(&nbsp;substr(&nbsp;$line,&nbsp;0,&nbsp;1&nbsp;)&nbsp;ne&nbsp;&quot;M&quot;&nbsp;)&nbsp;{&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;return;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;}&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;$tmpfile&nbsp;=&nbsp;&quot;/tmp/decode.$$&quot;;&nbsp;<BR>
12 下一页
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -