Mirror of forum.nim-lang.org

10357 :: How to get information about .lnk(link) file extension?

• ploxotnuj1 (orginal) [2023-07-25T20:56:13+02:00] view original

  How to get information about .lnk(link) file extension? For example, the full path to the application to which this link goes?

---

• termer (orginal) [2023-07-25T21:11:43+02:00] view original

  I don't know if anyone has written a library for parsing them, but if not, you can read Microsoft's docs about their format and make a library that does it yourself. =

---

• Bosinski (orginal) [2023-07-25T21:13:28+02:00] view original

  The format of .lnk-files is described in-depth::

  1. https://github.com/libyal/liblnk/blob/main/documentation/Windows%20Shortcut%20File%20(LNK)%20format.asciidoc
  2. https://learn.microsoft.com/en-us/openspecs/windows_protocols/ms-shllink/16cb4ca1-9339-4d0c-a68d-bf1d6cc0f943

---

• enthus1ast (orginal) [2023-07-25T22:41:29+02:00] view original

  You could use winim:

  https://github.com/khchen/winim

  With the IShellLink. There is an example in the readme how to use it.

---

• Ward (orginal) [2023-07-28T22:13:44+02:00] view original

  Here is a demo:

  import winim
  
  converter pointerConverter(x: ptr): ptr PVOID = cast[ptr PVOID](x)
  
  proc parseLnk(lnk: string) =
    var pIL: ptr IShellLink
    if CoCreateInstance(&CLSID_ShellLink, nil, CLSCTX_LOCAL_SERVER, &IID_IShellLink, &pIL).SUCCEEDED:
      defer: pIL.Release()
      
      var pPF: ptr IPersistFile
      if pIL.QueryInterface(&IID_IPersistFile, &pPF).SUCCEEDED:
        defer: pPF.Release()
        
        if pPF.Load(lnk, STGM_READ).SUCCEEDED:
          var buffer = T(32768)
          var index: cint
          
          if pIL.GetPath(buffer, cint buffer.len, nil, SLGP_RAWPATH).SUCCEEDED:
            echo "Path: ", $buffer.nullTerminated()
          
          if pIL.GetWorkingDirectory(buffer, cint buffer.len).SUCCEEDED:
            echo "WorkingDirectory: ", $buffer.nullTerminated()
          
          if pIL.GetArguments(buffer, cint buffer.len).SUCCEEDED:
            echo "Arguments: ", $buffer.nullTerminated()
          
          if pIL.GetIconLocation(buffer, cint buffer.len, &index).SUCCEEDED:
            echo "IconLocation: ", $buffer.nullTerminated()
  
  CoInitialize(nil)
  # parseLnk("test.lnk")
  Run

---