From 2b9c1002c32cdddd0843db239e1fd700a24aa1a0 Mon Sep 17 00:00:00 2001
From: Hironori Kitagawa <h_kitagawa2001@yahoo.co.jp>
Date: Sat, 25 Jun 2022 08:21:13 +0900
Subject: [PATCH] fix #44916 by introducing "rubydepth" key.

---
 src/addons/luatexja-ruby.sty | 11 +++++++++++
 src/ltj-ruby.lua             |  1 +
 2 files changed, 12 insertions(+)

diff --git a/src/addons/luatexja-ruby.sty b/src/addons/luatexja-ruby.sty
index 8367feb..c8b452d 100644
--- a/src/addons/luatexja-ruby.sty
+++ b/src/addons/luatexja-ruby.sty
@@ -78,6 +78,14 @@
   \expandafter\def\csname ltj@@rubyip@tbaseheight\endcsname{#1}%
 }
 %% これらの値が正のとき，親文字の高さをこの値（\zh 単位）とみなす
+
+\ltj@@rkeydef{yrubydepth} % 縦組以外 (yoko, utod, dtou)
+\ltj@@rkeydef{trubydepth} % 縦組
+\define@key[ltj]{ruby}{rubydepth}{%
+  \expandafter\def\csname ltj@@rubyip@yrubydepth\endcsname{#1}%
+  \expandafter\def\csname ltj@@rubyip@trubydepth\endcsname{#1}%
+}
+
 \define@boolkey[ltj]{ruby}{intrude_jfmgk}[true]{}
 \define@boolkey[ltj]{ruby}{intrude_xkanjiskip}[true]{}
 \define@boolkey[ltj]{ruby}{intrude_kanjiskip}[true]{}
@@ -119,6 +127,8 @@
           + 1048576 * \ifltj@ruby@rubysmash1\else0\fi),
       baseheight = \ltj@safe@dimen{\ifnum\ltjgetparameter{direction}=3
                      \ltj@@rubyip@tbaseheight\else\ltj@@rubyip@ybaseheight\fi\zh},
+      rubydepth = \ltj@safe@dimen{\ifnum\ltjgetparameter{direction}=3
+                     \ltj@@rubyip@trubydepth\else\ltj@@rubyip@yrubydepth\fi#1},
       intrude_jfmgk = \string{
        \ifltj@ruby@intrude_jfmgk [luatexja.icflag_table.FROM_JFM]=true,\fi
        \ifltj@ruby@intrude_kanjiskip
@@ -249,6 +259,7 @@
   stretchbol={0}{1}{1}, stretcheol={1}{1}{0},
   maxmargin=0.5, size=0.5, intergap=0, rubysmash=false,
   kenten=\textbullet, fontcmd=\relax, ybaseheight=0.88, tbaseheight=0.5,
+  yrubydepth=-1, trubydepth=-1,
   intrude_jfmgk, intrude_kanjiskip, intrude_xkanjiskip,
   epsilon=0.0001,
 }
diff --git a/src/ltj-ruby.lua b/src/ltj-ruby.lua
index 320b730..865db05 100644
--- a/src/ltj-ruby.lua
+++ b/src/ltj-ruby.lua
@@ -398,6 +398,7 @@ local function new_ruby_box(r, p, tmp_tbl, no_begin, no_end)
    setfield(a, 'depth', 0); setfield(k, 'kern', tmp_tbl.intergap)
    insert_after(r, r, a); insert_after(r, a, k);
    insert_after(r, k, p); setfield(p, 'next', nil)
+   if tmp_tbl.rubydepth >= 0 then setfield(r, 'depth', tmp_tbl.rubydepth) end
    if tmp_tbl.baseheight >= 0 then setfield(p, 'height', tmp_tbl.baseheight) end
    a = node.direct.vpack(r); setfield(a, 'shift', 0)
    set_attr(a, attr_ruby, post_intrusion)
-- 
2.11.0