\includegraphics pagebox 沒有剪輯

Question

我有一些 PDF 圖標，其 TrimBox 與 MediaBox 不同。例如:

Page size:      23.2441 x 20.6929 pts (rotated 0 degrees)
MediaBox:           0.00     0.00    23.24    20.69
CropBox:            0.00     0.00    23.24    20.69
BleedBox:           0.00     0.00    23.24    20.69
TrimBox:            0.00     4.25    21.26    20.69
ArtBox:             0.00     4.25    21.26    20.69

我想以使用 TrimBox 進行定位和尺寸並顯示 MediaBox 中的全部內容的方式包含圖像。但是，由於我很懶，所以我想bb在不手動設定的情況下執行此操作\includegraphics。

我已經嘗試過但到目前為止不起作用：

\includegraphics[pagebox=trimbox, clip=false]{my-picture}

什麼有效但太具體（並非所有圖示都相同）：

\includegraphics[bb=0 4.25 21.26 20.69, clip=false]{my-picture}

有哪些方法可以做到這一點而無需在 LaTeX 來源中手動修剪圖形？

---

我使用 LuaLaTeX，所以一種選擇可以將圖示儲存在字體中作為字形，但其中一些形狀在轉換中會被破壞（嘗試過字體客製化）其中一個有兩種顏色（是的，我知道這可能不再是問題）。

Answer 1

以下似乎適用於 pdflatex （我將您的文件重新命名為trimbox.pdf）：

\documentclass[a4paper]{article}

\usepackage{graphicx,expl3}

\begin{document}
\fbox{\includegraphics{trimbox}}
\ExplSyntaxOn
\fbox{%
\pdfpagebox=4 ~ %force use of trimbox
\pdfximage{trimbox.pdf}
\int_set:Nn\l_tmpa_int{\pdflastximage} 
\includegraphics[viewport=
\dim_to_decimal:n{\pdfximagebbox\l_tmpa_int~1}~ % Returns lower-left x
\dim_to_decimal:n{\pdfximagebbox\l_tmpa_int~2}~ % Returns lower-left y
\dim_to_decimal:n{\pdfximagebbox\l_tmpa_int~3}~ % Returns upper-right x
\dim_to_decimal:n{\pdfximagebbox\l_tmpa_int~4}  % Returns upper-right y
]{trimbox}}
\ExplSyntaxOff

\end{document}

\l_tmpa_int可能不需要，\pdflastximage似乎也有效，但我發現在新圖像中間訪問最後一張圖像有點勇敢。

lualatex 不知道該指令\pdfximagbbox，因此不可避免地需要一些 lua 程式碼來取得視口值：

\documentclass[a4paper]{article}

\usepackage{graphicx,expl3}

\begin{document}
\fbox{\includegraphics{trimbox}}
\directlua{
a = img.new({filename='trimbox.pdf',pagebox='trim'})
img.scan(a)
}
\fbox{\includegraphics[viewport=\directlua{tex.print(a.bbox[1]/ 65536)}
                                \directlua{tex.print(a.bbox[2]/ 65536)}
                                \directlua{tex.print(a.bbox[3]/ 65536)}
                                \directlua{tex.print(a.bbox[4]/ 65536)}]{trimbox}}
\end{document}

Answer 2

根據大衛·卡萊爾（David Carlisle）查看圖書館的建議，epdf我得到了一些可以滿足我需求的東西，所以我將其作為答案發布。然而，我願意接受更通用的東西，而不是僅限 lua 或只是更好。

這是一個工作代碼：

\documentclass{article}

\usepackage{graphicx}

\usepackage{luacode}

\begin{luacode*}
function bbTrimBox(options,docname)
  tex.print("\\includegraphics")
  if options ~= "" then
    tex.print("["..options)
  end
  local doc = epdf.open(docname)
  if doc == nil then
    doc = epdf.open(docname .. ".pdf")
  end
  if doc == nil then
    tex.error("Could not find PDF file \""..docname.."\"")
    if options ~= "" then
      tex.print("]")
    end
  else
    if options ~= "" then
      tex.print(",")
    else
      tex.print("[")
    end
    local box = doc:getCatalog():getPage(1):getTrimBox()
    local bb = "bb=" .. box.x1 .. " " .. box.y1 .. " " .. box.x2 .. " " .. box.y2
    tex.print(bb)
    tex.print("]")
    -- doc:close() -- cannot call this, "attempt to call method 'close' (a nil value)"
  end
  tex.print("{"..docname.."}")
end
\end{luacode*}

\newcommand\includegraphicsbb[2][]{\directlua{bbTrimBox("#1", "#2")}}

\begin{document}
\fontsize{30}{40}\selectfont
This a test text \includegraphics[height=1em, pagebox=trimbox, clip=false]{mwe} \includegraphicsbb[height=1em]{mwe}
\end{document}

輸出如下（使用問題中的圖像）：