home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 1B / DATAFILE_PDCD1B.iso / _tex / tex / source / l2esrc1 / !TeX / LaTeX2eSrc / latexbug.tex < prev    next >
Text File  |  1994-09-26  |  13KB  |  524 lines
  1. % \iffalse meta-comment
  2. %
  3. % Copyright 1994 the LaTeX3 project and the individual authors.
  4. % All rights reserved. For further copyright information see the file
  5. % legal.txt, and any other copyright indicated in this file.
  6. % 
  7. % This file is part of the LaTeX2e system.
  8. % ----------------------------------------
  9. % 
  10. %  This system is distributed in the hope that it will be useful,
  11. %  but WITHOUT ANY WARRANTY; without even the implied warranty of
  12. %  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  13. % 
  14. % 
  15. % IMPORTANT NOTICE:
  16. % 
  17. % For error reports in case of UNCHANGED versions see bugs.txt.
  18. % 
  19. % Please do not request updates from us directly.  Distribution is
  20. % done through Mail-Servers and TeX organizations.
  21. % 
  22. % You are not allowed to change this file.
  23. % 
  24. % You are allowed to distribute this file under the condition that
  25. % it is distributed together with all files mentioned in manifest.txt.
  26. % 
  27. % If you receive only some of these files from someone, complain!
  28. % 
  29. % You are NOT ALLOWED to distribute this file alone.  You are NOT
  30. % ALLOWED to take money for the distribution or use of either this
  31. % file or a changed version, except for a nominal charge for copying
  32. % etc.
  33. % \fi
  34.  
  35. %%% ====================================================================
  36. %%%  @LaTeX-file{
  37. %%%     author          = "David Carlisle",
  38. %%%     version         = "1.09",
  39. %%%     date            = "07 September 1994",
  40. %%%     filename        = "latexbug.tex",
  41. %%%     email           = "latex-bugs@uni-mainz.de",
  42. %%%     codetable       = "ISO/ASCII",
  43. %%%     keywords        = "LaTeX, bugs, reporting",
  44. %%%     supported       = "yes",
  45. %%%     docstring       = "
  46. %%%
  47. %%%     LaTeX bug report generator.
  48. %%%     %%%%%%%%%%%%%%%%%%%%%%%%%%
  49. %%%
  50. %%%     Processing this file with LaTeX should produce
  51. %%%     a file latexbug.msg in the current directory.
  52. %%%
  53. %%%     latexbug.msg may be used as a template for submitting bug
  54. %%%     reports concerning files in the standard LaTeX distribution.
  55. %%%
  56. %%%     Any bug report should include a small LaTeX test file
  57. %%%     that shows the bug, and the log that LaTeX produces on the
  58. %%%     test file.
  59. %%%
  60. %%%     Please check before submitting a bug report that your format is
  61. %%%     not more than one year old. New LaTeX releases occur at 6
  62. %%%     monthly intervals, and so your bug may be fixed in a later
  63. %%%     release.
  64. %%%
  65. %%%     Completed bug report forms should be submitted to:
  66. %%%     latex-bugs@uni-mainz.de
  67. %%%
  68. %%%  }
  69. %%% ====================================================================
  70.  
  71. \ifcat{=
  72.  
  73. \catcode`\{=1 \let\bgroup{
  74. \catcode`\}=2 \let\egroup}
  75. \catcode`\#=6 
  76. \catcode`\^=7
  77. \catcode`\@=11
  78.  
  79. \newlinechar`\^^J
  80. \def\m@ne{-1 }
  81. \countdef\count@255
  82.  
  83. \def\fmtname{INITEX}
  84. \def\fmtversion{9999/00/00}
  85. \def\@secondoftwo#1#2{#2}
  86. \everyjob{{}{INITEX}}
  87. \def\space{ }
  88. \def\@spaces{\space\space\space\space}
  89. \let\@@end\end
  90.  
  91. \chardef\msg15
  92. \immediate\openout\msg=\jobname.msg
  93.  
  94. \expandafter\edef\csname newif\endcsname#1#2{%
  95.   \let\noexpand\ifinteractive
  96.     \expandafter\noexpand\csname iffalse\endcsname}
  97.  
  98. \def\typeout{\immediate\write17}
  99.  
  100. \def\two@digits#1{\ifnum#1<10 0\fi\number#1}
  101.  
  102. \def\wmsg#1#{\bgroup\@wmsg}
  103.  
  104. \else
  105. %%
  106. %% @ is a letter
  107. %%
  108. \catcode`\@=11
  109.  
  110. %%
  111. %% Output stream to produce the bug report template.
  112. %%
  113. \newwrite\msg
  114. \immediate\openout\msg=\jobname.msg
  115.  
  116.  
  117. %%
  118. %% Check that LaTeX2e is being used.
  119. %%
  120. \ifx\undefined\newcommand
  121.  \newlinechar`\^^J%
  122.  \immediate\write17{^^J%
  123.     You must use LaTeX2e to generate the bug report!^^J^^J%
  124.     If there is a bug in the installation procedure,^^J%
  125.     and you can not create LaTeX2e, you may use initex^^J%
  126.     to generate the report}%
  127.  
  128.  \let\relax\end
  129. \else
  130. \def\@tempa{LaTeX2e}\ifx\@tempa\fmtname\else
  131.  \immediate\write17{^^J%
  132.   Older Versions of LaTeX are no longer supported.^^J%
  133.   You must use LaTeX2e to generate the bug report!^^J^^J%
  134.   If there is a bug in the installation procedure,^^J%
  135.   and you can not create LaTeX2e, you may use initex^^J%
  136.   to generate the report}%
  137.  \let\relax\@@end
  138. \fi\fi
  139.  
  140. %%
  141. %% \wmsg writes to the terminal, and the .msg file
  142. %% \wmsg* just writes to the .msg file
  143. %% \typeout just writes to the terminal
  144. %%
  145.  
  146. \def\wmsg{\bgroup\@ifstar{\interactivefalse\@wmsg}\@wmsg}
  147.  
  148. \fi
  149.  
  150. \relax
  151.  
  152.  
  153. \def\@wmsg#1{%
  154.   \ifinteractive\immediate\write17{#1}\fi
  155.   \immediate\write\msg{#1}%
  156.   \egroup}
  157.  
  158.  
  159. %%
  160. %% if \interactivefalse just make a blank template.
  161. %%
  162. \newif\ifinteractive
  163. \interactivetrue
  164.  
  165.  
  166. %%%
  167. %%% For testing for blank lines.
  168. %%%
  169. \def\xpar{\par}
  170.  
  171.  
  172. %%
  173. %% Opening Banner.
  174. %%
  175. \typeout{^^J%
  176. ============================================================^^J%
  177. ^^J%
  178. LaTeX bug report generator^^J%
  179. ==========================^^J%
  180. Processing this file with LaTeX will produce a template \jobname.msg^^J%
  181. for submitting bug reports for the LaTeX distribution.^^J%
  182. Please do not report bugs in other, non-standard, files to the^^J%
  183. latex-bugs address.^^J}
  184.  
  185. \count@=0
  186. \ifinteractive
  187. \typeout{%
  188. Several categories of files are supported,^^J%
  189. corresponding to directories in the standard LaTeX distribution:^^J^^J
  190. 0) base: \@spaces
  191.          The format itself, and the main classes such as `article'.^^J
  192. 1) tools:\@spaces
  193.          Packages supported by the LaTeX3 project team.^^J
  194. 2) graphics: 
  195.          The color and graphics packages.^^J
  196. 3) mfnfss: \space\space
  197.          Packages for using MetaFont fonts with NFSS (ie LaTeX2e).^^J
  198. 4) psnfss: \space\space
  199.          Packages for using PostScript fonts with NFSS (ie LaTeX2e).^^J
  200. 5) amslatex:
  201.          Classes and Packages supported by the AMS.^^J
  202. 6) babel:\@spaces
  203.          Packages supporting many different languages.^^J%
  204. }
  205. \message{Please select a category 0--6:  }
  206. \read\m@ne to \answer
  207. \count@=\answer
  208. \else
  209. \typeout{As you are using INITEX, I will assume category 0}
  210. \fi
  211.  
  212. \ifcase\count@
  213. \wmsg{^^J>Category: latex}\or
  214. \wmsg{^^J>Category: tools}\or
  215. \wmsg{^^J>Category: graphics}\or
  216. \wmsg{^^J>Category: mfnfss}\or
  217. \wmsg{^^J>Category: psnfss}\or
  218. \wmsg{^^J>Category: amslatex}\or
  219. \wmsg{^^J>Category: babel}\else
  220. \errhelp{Quit with `x' and then re-start latexbug}
  221. \def\badcategory{Only categories 0,...,6 are supported at this time}
  222. \errmessage{\badcategory}
  223. \fi
  224.  
  225.  
  226. \typeout{%
  227. ^^J%
  228. \ifinteractive
  229. This report generator may be used in one of two ways.^^J%
  230. If you choose the interactive option, you will be prompted to answer^^J%
  231. several questions. Otherwise a blank template will be created for^^J%
  232. you to fill in using your editor.^^J%
  233. \else
  234. INITEX should only be used for reporting bugs with the LaTeX2e^^J%
  235. installation procedure. If you have a working copy of LaTeX2e,^^J%
  236. please use that to generate the report.
  237. \fi}
  238.  
  239. \ifinteractive
  240. \message{Interactive session (y/n) ? }
  241. \read\m@ne to \answer
  242.  
  243. \ifx\answer\xpar
  244.    \def\answer{n}
  245. \fi
  246.  
  247. %%
  248. %% Allow anything begining with `y' or `Y' for yes.
  249. %%
  250. \edef\answer{\uccode`\expandafter\@car\answer\@nil}
  251. \ifnum \answer=`Y \else\interactivefalse\fi
  252. \else
  253. \def\answer{`\N}
  254. \fi
  255.  
  256. %%
  257. %% Header in the msg file.
  258. %%
  259. \wmsg*{^^J%
  260.  LaTeX2e bug report.^^J%
  261. \ifnum \answer=`Y Generated \else Template generated \fi
  262.  by latexbug.tex on \number\year/\two@digits\month/\two@digits\day^^J%
  263. ^^J%
  264.  Reports may be submitted by email to latex-bugs@uni-mainz.de^^J%
  265.  ============================================================}
  266.  
  267. \ifinteractive
  268. %%
  269. %% if interactive, \wread reads a line (verbatim) and write it to the
  270. %% .msg file, until a blank line is entered.
  271. %%
  272.   \typeout{^^J%
  273.     The answer to each question may take several lines.^^J%
  274.     (Each line will be prompted by =>.)^^J%
  275.     Typing a blank line terminates the current answer.}
  276.   \def\wread{{\catcode`\^^I=12
  277.   \let\do\@makeother\dospecials
  278.   \message{=> }\read\m@ne to \answer
  279.   \ifx\answer\xpar\else
  280.     \immediate\write\msg{\answer}
  281.     \expandafter\wread
  282.   \fi}}
  283. \else
  284. %%
  285. %% If non-interactive, \wread just writes a blank line to the .msg file,
  286. %% and \wmsg does not write to the terminal.
  287. %%
  288.   \def\wread{\wmsg{}}
  289. \fi
  290.  
  291. %%
  292. %% \copytomsg copies the contents of a file into the .msg file.
  293. %% (at least it does it as well as TeX can, so there may be
  294. %% transcription problems with 8-bit characters).
  295. %%
  296.  
  297. \chardef\inputfile=15
  298.  
  299. \def\copytomsg#1{{%
  300.    \def\do##1{\catcode`##1=11}%
  301.    \dospecials
  302.    \openin\inputfile#1
  303.    \@copytomsg
  304.    \closein\inputf