octave_packages/missing-functions-1.0.2/missingfunctionstatus.m

   1 ## Copyright (C) 2008 Bill Denney
   2 ##
   3 ## This software is free software; you can redistribute it and/or modify it
   4 ## under the terms of the GNU General Public License as published by
   5 ## the Free Software Foundation; either version 3 of the License, or (at
   6 ## your option) any later version.
   7 ##
   8 ## This software is distributed in the hope that it will be useful, but
   9 ## WITHOUT ANY WARRANTY; without even the implied warranty of
  10 ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  11 ## General Public License for more details.
  12 ##
  13 ## You should have received a copy of the GNU General Public License
  14 ## along with this software; see the file COPYING.  If not, see
  15 ## <http://www.gnu.org/licenses/>.
  16
  17 ## -*- texinfo -*-
  18 ## @deftypefn {Function File} {} missingfunctionstatus (@var{outdir})
  19 ## Write out all the current Matlab functions and toolboxes to
  20 ## @var{outdir} in html format.
  21 ## @seealso{missingmatlabfunctions}
  22 ## @end deftypefn
  23
  24 function missingfunctionstatus (outdir = ".")
  25
  26   urlbase = "http://www.mathworks.com/access/helpdesk/help/";
  27
  28   toolboxes = {"Matlab" "techdoc/ref/f16-6011.html";
  29                "Aerospace" "toolbox/aerotbx/ug/bqj21qj.html";
  30                "Bioinformatics" "toolbox/bioinfo/ref/a1052308804.html";
  31                "Communications" "toolbox/comm/ug/a1037894415.html";
  32                "Control System" "toolbox/control/ref/f2-1014412.html";
  33                "Curve Fitting" "toolbox/curvefit/f2-17602.html";
  34                "Data Acquisition" "toolbox/daq/f14-17602.html";
  35                "Database" "toolbox/database/ug/f4-6010.html";
  36                "Datafeed" "toolbox/datafeed/bp_usto-1.html";
  37                "Filter Design" "toolbox/filterdesign/ref/f11-35125.html";
  38                "Financial" "toolbox/finance/f6-213137.html";
  39                "Financial Derivatives" "toolbox/finderiv/f0-23501.html";
  40                "Fixed-Income" "toolbox/finfixed/f5-6010.html";
  41                "Fixed-Point" "toolbox/fixedpoint/ref/f20333.html";
  42                "Fuzzy Logic" "toolbox/fuzzy/fp4856.html";
  43                "GARCH" "toolbox/garch/f9-21078.html";
  44                "Genetic Algorithm and Direct Search" "toolbox/gads/bqe0w5v.html";
  45                "Image Acquisition" "toolbox/imaq/f14-17602.html";
  46                "Image Processing" "toolbox/images/f3-23960.html";
  47                "Instrument Control" "toolbox/instrument/f9-42439.html";
  48                "Mapping" "toolbox/map/f3-12193.html";
  49                "Mapping (Projections)" "toolbox/map/f4-4154.html";
  50                "Model Predictive Control" "toolbox/mpc/chmpcrefintro.html";
  51                "Neural Network" "toolbox/nnet/function.html";
  52                "OPC" "toolbox/opc/ug/f7-6010.html";
  53                "Optimization" "toolbox/optim/ug/bqnk0r0.html";
  54                "Partial Differential Equation" "toolbox/pde/ug/f7498.html";
  55                "RF" "toolbox/rf/bq33b0t.html";
  56                "Robust Control" "toolbox/robust/refintro.html";
  57                "Signal Processing" "toolbox/signal/f9-131178c.html";
  58                "Spline" "toolbox/splines/refer1_html.html";
  59                "Spreadsheet Link EX" "toolbox/exlink/f4-6010.html";
  60                "Statistics" "toolbox/stats/bq_w_hm.html";
  61                "Symbolic Math" "toolbox/symbolic/f3-157665.html";
  62                "System Identification" "toolbox/ident/ref/f3-8911.html";
  63                "Virtual Reality" "toolbox/vr/f0-6010.html";
  64                "Wavelet" "toolbox/wavelet/ref_open.html"};
  65
  66   filenames = cell (rows (toolboxes), 1);
  67   for i = 1:rows (toolboxes)
  68     basename = toolboxes{i,1};
  69     basename(isspace (basename)) = "_";
  70     filenames{i} = [basename ".html"];
  71     missingmatlabfunctions (fullfile (outdir, filenames{i}), "",
  72                             [urlbase toolboxes{i,2}])
  73   endfor
  74
  75   ## make the index page
  76   [fid msg] = fopen (fullfile (outdir, "index.html"), "wt");
  77   if (fid < 0)
  78     error ("missingfunctionstatus: could not open index.html, %s", msg)
  79   endif
  80   fprintf (fid, "<html xmlns=\"http://www.w3.org/1999/xhtml\"><head><title>Matlab Functions Missing from Octave</title><link rel=\"stylesheet\" type=\"text/css\" href=\"missingmatlab.css\"/></head><body>\n");
  81   for i = 1:rows (toolboxes)
  82     fprintf (fid, "<a href=\"%s\">%s</a><br/>",
  83              filenames{i}, toolboxes{i,1});
  84   endfor
  85   fprintf (fid, "</body></html>")
  86   fclose (fid);
  87
  88 endfunction