Lualatex: Font table with examples

Question

I wanted to create a table of the fonts on my machine with short examples of each. So I got the function below and tried to modify to print the font in its typeface. (LuaLatex)

\documentclass[10pt,a4paper]{article}
\usepackage{fontspec}
\usepackage{luacode,luaotfload,luatextra}
\usepackage[margin=18mm]{geometry}

\begin{document}
\begin{luacode}
myfonts=dofile(fonts.names.path.localdir..'/otfl-names.lua')
--tex.print('\\begin{verbatim}\\par')
for i,v in ipairs(myfonts.mappings) do
  --tex.print('\\fontspec{' .. v.fontname .. '}')   % most recent attempt
  --tex.print('\\setmainfont{' .. v.fontname .. '}') % first attempt
tex.print(v.familyname..', '..v.fontname..'\\par')
end
--tex.print('\\end{verbatim}\\par')
\end{luacode}

\end{document}

Both of the commented lines does not work (fontspec or setmainfont).

How should go about doing this with lua?

Answer 1

This improves Caramdir's answer to make the table easier to read:

\documentclass{article}

\usepackage{fontspec}
\setmainfont{Latin Modern Mono Light}

\usepackage{luacode}

\usepackage[margin=18mm]{geometry}
\parindent=0pt

\usepackage{longtable,makecell}
\renewcommand\arraystretch{2}

\begin{document}
\begin{luacode}
myfonts=dofile(fonts.names.path.localdir..'/otfl-names.lua') -- TeX Live 2012 or earlier
-- myfonts=dofile(fonts.names.path.path) -- TeX Live 2013
teststring = "Sphinx of black quartz, judge my vow."

tex.print("\\begin{longtable}{ll}\\hline")

for i,v in ipairs(myfonts.mappings) do
  -- Stop early for testing purposes.
  if i > 20 then break end

  tex.print('\\makecell[l]{\\bfseries')
  tex.print(-2, v.familyname)
  tex.print('\\\\[-1ex] \\scriptsize')
  tex.print(-2, v.fontname)
  tex.print('} & \\LARGE\\fontspec{' .. v.fontname .. '}')
  tex.print(-2, teststring)
  tex.print('\\\\ \\hline')
end
tex.print("\\end{longtable}")
\end{luacode}

\end{document}

Answer 2

This works for me—as long as there are no fonts with underscores or other offending characters. For the general case, use the optional first argument of tex.print to avoid any troubles: setting it to -2 assigns catcode 12 (other) to all characters except spaces (that way TeX doesn't see \, _, etc. as special characters). See the LuaTeX manual (texdoc luatex) for details.

\documentclass[10pt,a4paper]{article}
\usepackage{fontspec}
\usepackage{luacode,luaotfload,luatextra}
\usepackage[margin=18mm]{geometry}

\begin{document}
\begin{luacode}
myfonts=dofile(fonts.names.path.localdir..'/otfl-names.lua')

for i,v in ipairs(myfonts.mappings) do
  tex.print('\\setmainfont{' .. v.fontname .. '}') 
  tex.sprint(-2, v.familyname..', '..v.fontname) --Prints everything with catcode 12.
  tex.sprint('\\par')
  if i > 50 then break end --Stop early for testing purposes.
end
\end{luacode}    
\end{document}

Running this without the early breaking line will take rather long and some fonts might cause problems (e.g., in my case MnSymbol9.otf caused the pdf to be corrupt and ocrb5.otf caused fontspec to fail).

Answer 3

The following works with lualatex (LuaTeX) 0.95.0 (TeX Live 2016).

First, ensure that luaotfload-names.lua is in the same directory:

luaotfload-tool -u
cp ~/.texlive/texmf-var/luatex-cache/generic/names/luaotfload-names.lua.gz .
gzip -d ~/luaotfload-names.lua.gz

Then create allfonts.tex with the following content:

\RequirePackage{luatex85}
\documentclass[varwidth]{standalone}
\usepackage{fontspec}
\setmainfont{Latin Modern Mono Light}

\usepackage[tmargin=23mm,lmargin=25mm]{geometry}

\usepackage{luacode}

\usepackage{longtable,makecell}
\renewcommand\arraystretch{2}

\begin{document}
\begin{luacode}
myfonts=dofile('luaotfload-names.lua')
teststring = "Sphinx of black quartz, judge my vow."

tex.print("\\begin{longtable}{ll}\\hline")

for i,v in ipairs(myfonts.mappings) do
  -- Stop early for testing purposes.
  if i > 20 then break end

  tex.print('\\makecell[l]{\\bfseries')
  tex.print(-2, v.familyname)
  tex.print('\\\\[-1ex] \\scriptsize')
  tex.print(-2, v.fontname)
  tex.print('} & \\LARGE\\fontspec{' .. v.fontname .. '}')
  tex.print(-2, teststring)
  tex.print('\\\\ \\hline')
end
tex.print("\\end{longtable}")
\end{luacode}

\end{document}

Run lualatex allfonts.tex

This is a slightly modified version of Leo Liu's answer. Took me a while to figure out that I ran into errors because of fonts.names.path.localdir and not knowing how to generate the list of fonts.