📄 00000009.htm
字号:
if (!( (srcLine[k] >= '0' && srcLine[k] <= '9') <BR> ||(srcLine[k] >= 'A' && srcLine[k] <= 'Z') <BR> ||(srcLine[k] >= 'a' && srcLine[k] <= 'z') <BR> || '.' == srcLine[k]) ) <BR> break; <BR> <BR> strcpy(Buf2, srcLine + k + 1); <BR> sprintf(srcLine + k + 1, "<A HREF="mailto:%s",">%s",</A> Buf2); <BR> ptr += 7; /* strlen("<A HREF="mailto:")">")</A> */ <BR> j = strchr(ptr, ' ') - srcLine - 1; <BR> } /* End if (strchr(ptr, ' ') - strchr(ptr, '.') > 0) */ <BR> } /* End if (strchr(ptr, '.')) */ <BR> } /* End if (ptr = strchr(srcLine + j, '@')) */ <BR> } /* for (j = 0; srcLine[j]; j ++) */ <BR> <BR> for (j = Buf2[0] = 0; srcLine[j]; j ++) <BR> { <BR> switch (srcLine[j]) <BR> { <BR> case '>': <BR> strcat(Buf2, "&gt;"); <BR> break; <BR> <BR> case '<': <BR> strcat(Buf2, "&lt;"); <BR> break; <BR> <BR> case '&': <BR> strcat(Buf2, "&amp;"); <BR> break; <BR> <BR> case '"': <BR> strcat(Buf2, "&quot;"); <BR> break; <BR> <BR> case ' ': <BR> strcat(Buf2, "&nbsp;"); <BR> break; <BR> <BR> case 27: <BR> ptr = strchr(srcLine + j, 'm'); <BR> if (ptr) <BR> j = ptr - srcLine; <BR> break; <BR> <BR> case 'h': <BR> case 'H': <BR> case 'f': <BR> case 'F': <BR> case 'n': <BR> case 'N': <BR> case 'm': <BR> case 'M': <BR> if (!strncasecmp(srcLine + j, "<A HREF="http://",">http://",</A> 7) <BR> || !strncasecmp(srcLine + j, "<A HREF="ftp://",">ftp://",</A> 6) <BR> || !strncasecmp(srcLine + j, "<A HREF="news://",">news://",</A> 7) <BR> || !strncasecmp(srcLine + j, "<A HREF="mailto:",">",</A> 7)) <BR> { <BR> ptr = strchr(srcLine + j, ' '); <BR> <BR> if (ptr) <BR> { <BR> *ptr = 0; <BR> k = strlen(Buf2); <BR> sprintf(Buf2 + k, "<A HREF=\"%s\">%s</A>", srcLine + j, srcLine + j + 7 * (!strncasecmp(srcLine + j, "<A HREF="mailto:",">",</A> 7))); <BR> *ptr = ' '; <BR> j += ptr - (srcLine + j) - 1; <BR> break; <BR> } <BR> } <BR> /* no break here ! */ <BR> <BR> default: <BR> Buf2[k = strlen(Buf2)] = srcLine[j]; <BR> Buf2[k + 1] = 0; <BR> } <BR> } <BR> <BR> if (':' == srcLine[0]) <BR> sprintf(dstLine, "∶<I>%s</I><BR>\n", Buf2 + 1); <BR> else if ('>' == srcLine[0]) <BR> sprintf(dstLine, "><I>%s</I><BR>\n", Buf2 + 4); <BR> else <BR> sprintf(dstLine, "%s<BR>\n", Buf2); <BR> <BR> fputs(dstLine, pdstFile); <BR> } <BR> <BR> fputs("\n\n<CENTER><H1>", pdstFile); <BR> fputs(FOOTER, pdstFile); <BR> fputs("</H1></CENTER>\n\n", pdstFile); <BR> fputs("\n\n</BODY>\n\n</HTML>", pdstFile); <BR> fclose(pdstFile); <BR> fclose(psrcFile); <BR> } /* if (!strcmp(Buf, DOTNAMES)) else ... */ <BR> } /* while (!feof(pls_AFR)) */ <BR> <BR> <BR> printf("Finished creating HTML files...\n"); <BR> fclose(pls_AFR); <BR> <BR> <BR> printf("Compressing HTML files...\n"); <BR> printf("Calling \"tar\"...\n"); <BR> sprintf(Buf, "%s/%s.html.tar", WORKDIR, srcX); <BR> unlink(Buf); <BR> sprintf(Buf, "tar cf %s/%s.html.tar %s", WORKDIR, srcX, dstX); <BR> system(Buf); <BR> <BR> printf("Cleaning working directory/data...\n"); <BR> sprintf(Buf, "rm -fr %s %ld.Xhtml", dstX, now); <BR> system(Buf); <BR> if (0 == chdir(dstX)) <BR> { <BR> printf("Unexpected error: Can not erase directory \"%s\"\n", dstX); <BR> exit(-2); <BR> } <BR> <BR> printf("Calling \"gzip\"...\n"); <BR> sprintf(Buf, "%s/%s.html.tar.gz", WORKDIR, srcX); <BR> unlink(Buf); <BR> sprintf(Buf, "gzip %s/%s.html.tar", WORKDIR, srcX); <BR> system(Buf); <BR> <BR> sprintf(Buf, "mv -f %s/%s.html.tar.gz %s/%s.html.tgz", WORKDIR, srcX, WORKDIR, srcX); <BR> system(Buf); <BR> <BR> <BR> printf("Finished Xhtml: %s.html.tgz\n", srcX); <BR> return 0; <BR>} <BR> <BR>-- <BR> <BR> 我 们 的 一 切 追 求 和 作 为, 都 有 一 个 令 人 厌 倦 的 过 程 <BR> <BR> 作 为 一 个 不 识 厌 倦 为 何 物 的 人, 便 掌 握 了 生 命 的 全 部 秘 密 <BR> <BR>※ 修改:·Leeward 於 Jun 15 08:08:30 修改本文·[FROM: 166.111.120.84] <BR>※ 来源:·BBS 水木清华站 bbs.net.tsinghua.edu.cn·[FROM: 166.111.120.84] <BR><CENTER><H1>BBS水木清华站∶精华区</H1></CENTER></BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -