Lumesh 实用举例之 lf文件管理器

使用Lumesh编写lf配置文件的语法演示

lf 文件管理器是一个非常强大的TUI文件管理器，支持高度灵活的自定义操作。是我最喜欢的文件管理器。以下是用Lumesh为lf编写的命令配置的部分演示。

1. 变量定义和管道操作
#

1cmd all-cmd ${{
2    let cmd = lf -remote `query $id cmds` | .lines() | .drop(1) | \
3        .map(x -> {x.split("\t\t", $x) | .first()}) | Ui.pick "select cmd:"
4    lf -remote `send $id :$cmd`
5}}

lf -remote query $id cmds`` 获取lf可用命令
let 变量定义
管道操作符 | 用于数据流处理
.lines() 字符串处理方法
.drop(1) 列表操作，跳过第一个元素
.map() 函数式编程，使用lambda表达式 x -> {...}
Ui.pick 交互式选择器

2. 字符串处理和表格操作
#

1cmd history-dir ${{
2  let hist = lf -remote `query $id jumps` | Into.table('jump','path') | .drop(1) | Ui.pick "choose history:"
3  lf --remote `send $id cd ${$hist.path}`
4}}

lf -remotequery $id jumps 获取lf的历史目录
Into.table() 将数据转换为表格结构
字符串插值 ${$hist.path} 语法
对象属性访问 $hist.path

3. 条件语句和模式匹配
#

1cmd toggle-preview %{{
2    match $lf_preview {
3        true => lf -remote `send $id :set nopreview; set ratios 1:5`
4        _ => lf -remote `send $id :set preview; set ratios 1:2:3`
5    }
6}}

Lumesh的match模式匹配语法，类似Rust的match表达式。这里匹配的是true字符串，如需bool值应大写首字母True

4. 条件表达式和三元操作
#

1cmd select-files &{{
2    let htag= $lf_hidden ? '-H' : ''
3    let r=fd --exact-depth 1 $argv $htag -c never -j 1 -0 |  xargs -0 printf ' %q'
4    lf -remote `send $id :unselect; toggle $r`
5}}

三元条件操作符 condition ? value1 : value2
变量在命令行中的使用： $argv为函数接收到的参数

5. 函数式编程和列表操作
#

1cmd yank-name &{{
2    $fx.lines() | .map(Fs.base_name) | .join("\n") | wl-copy
3}}

方法链式调用 .lines().map().join()
Fs.base_name 文件系统模块函数
管道操作将结果传递给外部命令

6. 用户交互
#

1cmd delete ${{
2  println '=====DELETE=====' $fx '================'
3  if Ui.confirm('Delete these files [y/n]:'){
4    $lf_user_wheel rm -rf $fx.lines()
5  }
6}}

println 输出函数
Ui.confirm 确认对话框
if 条件语句

7. 复杂的数据处理和循环
#

 1cmd mpaste %{{
  let load=Fs.read ~/.local/share/lf/files | .lines()
  let files = $load.drop(1)
  let file_count = len($files)
  if $file_count==0 {
      print 'No files yanked'
      exit 0
  }
  let mode=$load.at(0)
  let base_names = $files.map(Fs.base_name)
  let ans = read `$mode $file_count files? [y/N]`
  if $ans == 'y' {
      match $mode {
          copy => {
              $lf_user_wheel cp -r $argv -- $files '.'
              let tg='='
          }
          move => {
              $lf_user_wheel mv -- $files '.'
              let tg='>'
          }
      }
      for file in $base_names {
          lf -remote `send $id :select "$file"; tag $tg`
      }
  }
27}}

Fs.read 文件读取
len() 长度函数
read 用户输入函数
for 循环语句
复杂的match模式匹配

8. 正则表达式和字符串操作
#

 1cmd extract-to %{{
  let dest = $argv[0] ?: {print 'Cancelled'; exit 0}
  if (Regex.match '\.([gb7xs]z|t[gbx]z|zip|zst|bz2|lz4|lzma|tar|rar|br)$' $f) {
      $lf_user_wheel ouch -q decompress --dir $dest $f
      let base_name = Fs.base_name($f)
      lf -remote `send $id :cd $dest; select $base_name; tag '^'`
  }else{
      print 'Unsupported file extention'
  }
10}}