hover supports detail level

script/cli/doc/export.lua

@@ -197,7 +197,7 @@ end
 
 export.makeDocObject['function'] = function(source, obj, has_seen)
     obj.args = export.documentObject(source.args, has_seen)
-    obj.view = getLabel(source, source.parent.type == 'setmethod')
+    obj.view = getLabel(source, source.parent.type == 'setmethod', 1)
     local _, _, max = vm.countReturnsOfFunction(source)
     if max > 0 then obj.returns = {} end
     for i = 1, max do

script/core/completion/completion.lua

@@ -277,7 +277,7 @@ end
 ---@async
 local function buildDesc(source)
     local desc = markdown()
-    local hover = getHover.get(source)
+    local hover = getHover.get(source, 1)
     desc:add('md', hover)
     desc:splitLine()
     desc:add('lua', getSnip(source))

script/core/hover/init.lua

@@ -9,7 +9,7 @@ local guide      = require 'parser.guide'
 local wssymbol   = require 'core.workspace-symbol'
 
 ---@async
-local function getHover(source)
+local function getHover(source, level)
     local md        = markdown()
     local defMark   = {}
     local labelMark = {}
@@ -32,7 +32,7 @@ local function getHover(source)
         defMark[def] = true
 
         if checkLable then
-            local label = getLabel(def, oop)
+            local label = getLabel(def, oop, level)
             if not labelMark[tostring(label)] then
                 labelMark[tostring(label)] = true
                 md:add('lua', label)
@@ -126,7 +126,7 @@ local accept = {
 }
 
 ---@async
-local function getHoverByUri(uri, position)
+local function getHoverByUri(uri, position, level)
     local ast = files.getState(uri)
     if not ast then
         return nil

script/core/hover/label.lua

@@ -42,12 +42,13 @@ local function asDocTypeName(source)
 end
 
 ---@async
-local function asValue(source, title)
+---@param level integer
+local function asValue(source, title, level)
     local name    = buildName(source, false) or ''
     local ifr     = vm.getInfer(source)
     local type    = ifr:view(guide.getUri(source))
     local literal = ifr:viewLiterals()
-    local cont    = buildTable(source)
+    local cont    = buildTable(source, level)
     local pack = {}
     pack[#pack+1] = title
     pack[#pack+1] = name .. ':'
@@ -73,7 +74,8 @@ local function asValue(source, title)
 end
 
 ---@async
-local function asLocal(source)
+---@param level integer
+local function asLocal(source, level)
     local node
     if source.type == 'local'
     or source.type == 'self' then
@@ -82,20 +84,21 @@ local function asLocal(source)
         node = source.node
     end
     if node.type == 'self' then
-        return asValue(source, '(self)')
+        return asValue(source, '(self)', level)
     end
     if node.parent.type == 'funcargs' then
-        return asValue(source, '(parameter)')
+        return asValue(source, '(parameter)', level)
     elseif guide.getParentFunction(source) ~= guide.getParentFunction(node) then
-        return asValue(source, '(upvalue)')
+        return asValue(source, '(upvalue)', level)
     else
-        return asValue(source, 'local')
+        return asValue(source, 'local', level)
     end
 end
 
 ---@async
-local function asGlobal(source)
-    return asValue(source, '(global)')
+---@param level integer
+local function asGlobal(source, level)
+    return asValue(source, '(global)', level)
 end
 
 local function isGlobalField(source)
@@ -126,11 +129,12 @@ local function isGlobalField(source)
 end
 
 ---@async
-local function asField(source)
+---@param level integer
+local function asField(source, level)
     if isGlobalField(source) then
-        return asGlobal(source)
+        return asGlobal(source, level)
     end
-    return asValue(source, '(field)')
+    return asValue(source, '(field)', level)
 end
 
 local function asDocFieldName(source)
@@ -192,26 +196,27 @@ local function asNumber(source)
 end
 
 ---@async
-return function (source, oop)
+---@param level integer
+return function (source, oop, level)
     if     source.type == 'function'
     or     source.type == 'doc.type.function' then
         return asFunction(source, oop)
     elseif source.type == 'local'
     or     source.type == 'self'
     or     source.type == 'getlocal'
     or     source.type == 'setlocal' then
-        return asLocal(source)
+        return asLocal(source, level)
     elseif source.type == 'setglobal'
     or     source.type == 'getglobal' then
-        return asGlobal(source)
+        return asGlobal(source, level)
     elseif source.type == 'getfield'
     or     source.type == 'setfield'
     or     source.type == 'getmethod'
     or     source.type == 'setmethod'
     or     source.type == 'tablefield'
     or     source.type == 'field'
     or     source.type == 'method' then
-        return asField(source)
+        return asField(source, level)
     elseif source.type == 'string' then
         return asString(source)
     elseif source.type == 'number'

script/core/hover/table.lua

@@ -159,13 +159,18 @@ local function getNodeMap(uri, fields, keyMap)
 end
 
 ---@async
+---@param level integer
 ---@return string?
-return function (source)
+return function (source, level)
+    if level <= 0 then
+        return nil
+    end
     local uri = guide.getUri(source)
     local maxFields = config.get(uri, 'Lua.hover.previewFields')
     if maxFields <= 0 then
         return nil
     end
+    maxFields = maxFields * level
 
     local node = vm.compileNode(source)
     for n in node:eachObject() do

script/core/signature.lua

@@ -43,7 +43,7 @@ end
 
 ---@async
 local function makeOneSignature(source, oop, index)
-    local label = hoverLabel(source, oop)
+    local label = hoverLabel(source, oop, 0)
     if not label then
         return nil
     end

script/provider/provider.lua

@@ -362,7 +362,7 @@ m.register 'textDocument/hover' {
             return nil
         end
         local pos = converter.unpackPosition(state, params.position)
-        local hover, source = core.byUri(uri, pos)
+        local hover, source = core.byUri(uri, pos, 1)
         if not hover or not source then
             return nil
         end

test/crossfile/hover.lua

@@ -57,7 +57,7 @@ function TEST(expect)
         end
     end
 
-    local hover = core.byUri(sourceUri, sourcePos)
+    local hover = core.byUri(sourceUri, sourcePos, 1)
     assert(hover)
     local content = tostring(hover):gsub('\r\n', '\n')
     assert(eq(content, expect.hover))