generate_html_file(lisf,flag,lang)
Add here a paragraph of the function description. Other paragraph can be added
Add here a paragraph of the function description
Add here scilab instructions and comments
//generate_html_file //Entrée : lisf est une liste de nom de fichier sans extension: CAN_f, Linear ou synthe // flag est un drapeau(pour l'instant de taille 1): // 'block' pour une fonction d'interface scicos // 'pal' pour un fichier palette scicos (cosf) // 'diagr' pour un diagramme de simulation scicos // 'scilib' pour une librairie de fonctions scilab // 'sci' pour une fonction scilab. // 'rout' pour une routines bas niveau // 'sim' pour un script de simulation scilab // 'sce' pour un script scilab // DOIT RAJOUTER lang function generate_html_file(lisf,flag,lang) //verify the 'lang' right parameter [lsh,rsh]=argn(0) if rsh<3 then if ~exists('lang') then lang='eng' elseif lang<>'eng' & lang<>'fr' then lang='eng' end end select flag case 'block' ext='' func=generate_blocks_tex_file case 'pal' ext='_cosf' func=generate_pals_tex_file case 'diagr' ext='_cos' func=generate_diagr_tex_file case 'scilib' ext='_scilib' func=generate_scilib_tex_file case 'sci' ext='_sci' func=generate_scifun_tex_file case 'rout' ext='_rout' func=generate_rout_tex_file case 'sim' ext='' func=generate_sim_tex_file case 'sce' ext='_sce' func=generate_sce_tex_file else printf("Try with flag ''block'',''pal'',... ''diagr'',''scilib'',''sci'',''rout'',''sim''\n") abort end rep=lisf+ext for i=1:size(lisf,1) //generate main tex file DOIT RAJOUTER lang func(lisf(i,1),'html',lang); chdir(rep(i,1)); //analyse tex files analyse_tex_file('.'); flg_bib=%f; //run LaTeX if fileinfo(lisf(i,1)+'_bib.tex')<>[] then //bibliography printf("Bibliography file found. Run latex...") unix_g(latex_cmd+lisf(i,1)+'.tex'); printf("Done\n") flg_bib=%t; //flag bib end //conversion latex2html printf("Convert %s.tex file in %s.html... ",lisf(i,1),lisf(i,1)); unix_g(latex2html_cmd+lisf(i,1)+'_ '+lisf(i,1)); printf("Done\n"); //change color subtitle html_txt=change_color_subtitle('./'+lisf(i,1)+'/'+lisf(i,1)+'.htm','blue'); if html_txt<>[] then mputl(html_txt,'./'+lisf(i,1)+'/'+lisf(i,1)+'.htm'); end; //change font html_txt=change_font('./'+lisf(i,1)+'/'+lisf(i,1)+'.htm',flag); if html_txt<>[] then mputl(html_txt,'./'+lisf(i,1)+'/'+lisf(i,1)+'.htm'); end; //change bibliography level if flg_bib then html_txt=change_level_bib('./'+lisf(i,1)+'/'+lisf(i,1)+'.htm'); end if html_txt<>[] then mputl(html_txt,'./'+lisf(i,1)+'/'+lisf(i,1)+'.htm'); end; //change 'Contents' and 'Bibliography' line if lang<>'eng' then html_txt=change_contents_line('./'+lisf(i,1)+'/'+lisf(i,1)+'.htm',lang); end if html_txt<>[] then mputl(html_txt,'./'+lisf(i,1)+'/'+lisf(i,1)+'.htm'); end; if lang<>'eng' then html_txt=change_biblio_line('./'+lisf(i,1)+'/'+lisf(i,1)+'.htm',lang); end if html_txt<>[] then mputl(html_txt,'./'+lisf(i,1)+'/'+lisf(i,1)+'.htm'); end; tt=listfiles("./"+lisf(i,1)+"/"); htm_f=%f;gif_f=%f; for j=1:size(tt,1) if strindex(tt(j),'.htm')<>[] then htm_f=%t, end; if strindex(tt(j),'.gif')<>[] then gif_f=%t, end; end //move htm files if htm_f then //unix_g(mv_cmd+'./'+lisf(i,1)+'/'+lisf(i,1)+'.htm ../htm') unix_g(mv_cmd+'./'+lisf(i,1)+'/'+lisf(i,1)+'.htm '+html_path+lang+'/') end //move gif files if gif_f then //unix_g(mv_cmd+'./'+lisf(i,1)+'/*.gif ../htm'); unix_g(mv_cmd+'./'+lisf(i,1)+'/*.gif '+html_path+lang+'/') end //clean temporary files chdir('..') unix_g(rm_cmd+rep(i,1)) end endfunction