Reorder toptica.vim

This commit is contained in:
Stefan Liebl 2025-03-10 10:12:15 +01:00
parent 0b46c3a932
commit ab7c371331

View File

@ -18,108 +18,87 @@ command -nargs=? -complete=dir DeCoF call s:ProjectSet('decof', '<args>')
command DeviceFirmwareUpdate call s:DeviceFirmwareUpdate() command DeviceFirmwareUpdate call s:DeviceFirmwareUpdate()
command -nargs=? -complete=file JenkinsLinter call s:Jenkins_linter('<args>') command -nargs=? -complete=file JenkinsLinter call s:Jenkins_linter('<args>')
set titlestring= " set titlestring=
" Get titlestring for DLCpro
function! g:Title_string()
let titlestring = ''
if exists('g:project_type')
let titlestring .= ' project: '.g:project_type
endif
" Get compiler-version for DLCpro
function! g:Compiler_version()
if exists('g:ProjectBuildDir') if exists('g:ProjectBuildDir')
let cmakefile = g:ProjectBuildDir . '/CMakeCache.txt' let cmakefile = g:ProjectBuildDir . '/CMakeCache.txt'
if filereadable(cmakefile) if filereadable(cmakefile)
let titlestring .= ' compiler: '
for line in readfile(cmakefile) for line in readfile(cmakefile)
if match(line, 'NEW_COMPILER:BOOL=OFF') >= 0 if match(line, 'NEW_COMPILER:BOOL=OFF') >= 0
return 'old' let titlestring .= 'old'
elseif match(line, 'NEW_COMPILER:BOOL=ON') >= 0 elseif match(line, 'NEW_COMPILER:BOOL=ON') >= 0
return 'new' let titlestring .= 'new'
endif endif
endfor endfor
endif endif
endif endif
return 0
return titlestring
endfunction endfunction
function! s:ProjectSet(project_type, project_base_dir) function! s:ProjectSet(project_type, project_base_dir)
execute "DirenvExport" set spell spelllang=en,de
set expandtab
set cinoptions=l1,g2,h2,N-2,t0,+0,(0,w1,Ws,m1,)100,*100
set textwidth=120
let $QT_FONT_DPI=96 " Size for qt-application in debugger
let g:project_type = a:project_type let g:project_type = a:project_type
let g:jenkins_url = 'http://jenkins.toptica.com' let g:jenkins_url = 'http://jenkins.toptica.com'
let s:ProjectBaseDir = fnamemodify(a:project_base_dir, ":p")
" directories
if a:project_base_dir != ''
if (isdirectory(fnamemodify(a:project_base_dir, ':p:h:h').'/src'))
let s:ProjectBaseDir = fnamemodify(a:project_base_dir, ':p:h:h')
elseif (isdirectory(fnamemodify(a:project_base_dir, ':p:h').'/src'))
let s:ProjectBaseDir = fnamemodify(a:project_base_dir, ':p:h')
else
let s:ProjectBaseDir = fnamemodify(a:project_base_dir, ':p')
endif
else
" defaults
if (g:project_type == 'dlcpro-new')
let s:ProjectBaseDir = '~/dlcpro/firmware'
elseif (g:project_type == 'dlcpro')
let s:ProjectBaseDir = '~/dlcpro/firmware'
elseif (g:project_type == 'dlcpro-tui')
let s:ProjectBaseDir = '~/dlcpro/firmware'
elseif (g:project_type == 'dlcpro-tui-simulator')
let s:ProjectBaseDir = '~/dlcpro/firmware.tui-simulator'
elseif (g:project_type == 'dlcpro-can')
let s:ProjectBaseDir = '~/dlcpro/firmware'
elseif (g:project_type == 'shg')
let s:ProjectBaseDir = '~/dlcpro/shg-firmware'
elseif (g:project_type == 'dlcpro-gui')
let s:ProjectBaseDir = '~/dlcpro/pc-gui'
elseif (g:project_type == 'topmode')
let s:ProjectBaseDir = '~/topmode/firmware'
elseif (g:project_type == 'topmode-gui')
let s:ProjectBaseDir = '~/topmode/pc-gui'
elseif (g:project_type == 'digifalc')
let s:ProjectBaseDir = '~/dlcpro/falc/firmware'
elseif (g:project_type == 'servoboard')
let s:ProjectBaseDir = '~/dlcpro/mta/firmware'
elseif (g:project_type == 'dl-motor')
let s:ProjectBaseDir = '~/dlcpro/dl-motor'
elseif (g:project_type == 'pfd')
let s:ProjectBaseDir = '~/dlcpro/pfd/firmware'
else
echo "no project"
endif
endif
let g:ProjectSrcDirRel = 'src'
let s:ProjectSrcDir = s:ProjectBaseDir.'/'.g:ProjectSrcDirRel
" Direnv " Direnv
execute "DirenvExport"
let $DIRENV_DIR = s:ProjectBaseDir let $DIRENV_DIR = s:ProjectBaseDir
" vim path " vim path
execute 'cd '.s:ProjectSrcDir execute 'cd '.s:ProjectBaseDir
execute 'set path-=./**' execute 'set path-=./**'
execute 'set path+=' . s:ProjectSrcDir.'/**' execute 'set path+='.s:ProjectBaseDir.'**'
" Settings for invoke development " Settings for invoke
let s:invoke = 'invoke' let s:invoke = 'invoke'
let s:tasks_file_dev = '~/tools/invoke/'.g:project_type.'/tasks.py' let s:tasks_file_dev = '~/tools/invoke/'.g:project_type.'/tasks.py'
if filereadable(s:tasks_file_dev) command! TasksLoad call system('cp '.s:tasks_file_dev.' tasks.py') " copy development version to project
call system('cp '.s:tasks_file_dev.' tasks.py') " copy development version to project command! TasksSave call system('cp tasks.py '.s:tasks_file_dev) " copy project version to development
elseif filereadable('tasks.py') " Tab-completion for invoke is done with plugin vim-bash-completion
" do nothing let $BASH_COMPLETION_DIR = '/home/liebl/.invoke'
else let invoke_completion_file = $BASH_COMPLETION_DIR.'/bash_completion'
echoerr 'tasks.py not found' if !filereadable(invoke_completion_file)
call system('invoke --print-completion-script bash > '.invoke_completion_file)
endif endif
" python tags
" execute "set tags+=" . s:ProjectBaseDir . '/tags'
" configure quickfix window for asyncrun
augroup QuickfixStatus
autocmd BufWinEnter quickfix setlocal
\ statusline=%t\ [%{g:asyncrun_status}]\ %{exists('w:quickfix_title')?\ '\ '.w:quickfix_title\ :\ ''}\ %=%-15(%l,%c%V%)\ %P
augroup END
" ==== " ====
" Make " Make
" ==== " ====
function! s:getDefaultforOption(option_name) compiler gcc
let g:BuildType = 'Debug'
function! s:getDefaultValueForOption(option_name)
if a:option_name == '--project' if a:option_name == '--project'
return g:project_type return g:project_type
elseif a:option_name == '--device-ip' elseif a:option_name == '--device-ip'
return g:DeviceIP return g:DeviceIP
elseif a:option_name == '--build-type' elseif a:option_name == '--build-type'
return g:BuildType return g:BuildType
elseif a:option_name == '--version-file'
return g:ProjectBuildDir.'/artifacts/VERSION'
elseif a:option_name == '--laser1-type' elseif a:option_name == '--laser1-type'
return g:DeviceType return g:DeviceType
elseif a:option_name == '--powerswitch-ip' elseif a:option_name == '--powerswitch-ip'
@ -132,7 +111,7 @@ function! s:ProjectSet(project_type, project_base_dir)
endfunction endfunction
" Add default value for all available options, if not already set " Add default value for all available options, if not already set
function! s:SetDefaultOptions(commandline) function! s:SetDefaultsForAllOptions(commandline)
let commandline = a:commandline let commandline = a:commandline
let task = split(commandline)[0] let task = split(commandline)[0]
@ -141,7 +120,7 @@ function! s:ProjectSet(project_type, project_base_dir)
if l:tasks =~ task if l:tasks =~ task
let l:options_allowed = system(s:invoke.' --complete -- '.task.' -') let l:options_allowed = system(s:invoke.' --complete -- '.task.' -')
for option in split(l:options_allowed) for option in split(l:options_allowed)
let value = s:getDefaultforOption(option) let value = s:getDefaultValueForOption(option)
if value != '' && commandline !~ option if value != '' && commandline !~ option
let commandline .= ' '.option.'='.value let commandline .= ' '.option.'='.value
endif endif
@ -151,9 +130,18 @@ function! s:ProjectSet(project_type, project_base_dir)
return commandline return commandline
endfunction endfunction
" Tab completion for MakeCmd is done by bash-completion
function! GetAllMakeCompletions(ArgLead, CmdLine, CursorPos)
let l:words = split(a:CmdLine)
let l:words[0] = 'invoke'
let l:command = join(l:words)
return bash#complete(l:command)
endfunction
command! -complete=customlist,GetAllMakeCompletions -nargs=* MakeCmd call s:Make('<args>', 'async')
function! s:Make(args, async_mode) function! s:Make(args, async_mode)
" Add defaults for options " Add defaults for options
let l:options = s:SetDefaultOptions(a:args) let l:options = s:SetDefaultsForAllOptions(a:args)
if (a:async_mode == 'sync') if (a:async_mode == 'sync')
" Synchronous execution with returned output " Synchronous execution with returned output
@ -174,44 +162,36 @@ function! s:ProjectSet(project_type, project_base_dir)
endif endif
endfunction endfunction
" Tab-completion for invoke is done with plugin vim-bash-completion
let $BASH_COMPLETION_DIR = '~/.invoke'
let invoke_completion_file = $BASH_COMPLETION_DIR.'/bash_completion'
if !filereadable(invoke_completion_file)
call system('invoke --print-completion-script bash > '.invoke_completion_file)
endif
function! GetAllMakeCompletions(ArgLead, CmdLine, CursorPos)
let l:words = split(a:CmdLine)
let l:words[0] = 'invoke'
let l:command = join(l:words)
return bash#complete(l:command)
endfunction
" Get some configurations from the project " Get some configurations from the project
" ---------------------------------------- " ----------------------------------------
let l:tasks = s:Make('--list', 'sync') let l:tasks = s:Make('--list', 'sync')
let g:DebugRemote = (l:tasks =~ 'gdb-server') let g:DebugRemote = (l:tasks =~ 'gdb-server')
let g:ProjectBuildDir = s:Make('build-dir', 'sync') let g:ProjectBuildDir = s:Make('build-dir', 'sync')
" Fallback
if g:ProjectBuildDir == ''
let g:ProjectBuildDir = s:ProjectBaseDir.'.build/'.g:project_type
endif
let g:Elffile = s:Make('elf-file', 'sync') let g:Elffile = s:Make('elf-file', 'sync')
let l:is_arm = s:Make('is-arm', 'sync') let l:is_arm = s:Make('is-arm', 'sync')
let g:termdebug_config = {} let g:termdebug_config = {}
if l:is_arm =~ 'True' if l:is_arm =~ 'True'
if g:project_type == 'topmode' if g:project_type == 'topmode' || g:project_type == 'dlcpro'
" Old topmode needs old gdb " Old dlcpro and topmode need old gdb
let g:termdebug_config['command'] = '/opt/OSELAS.Toolchain-2020.08.0/arm-v7a-linux-gnueabihf/gcc-10.2.1-clang-10.0.1-glibc-2.32-binutils-2.35-kernel-5.8-sanitized/bin/arm-v7a-linux-gnueabihf-gdb' let g:termdebug_config['command'] = '/opt/OSELAS.Toolchain-2020.08.0/arm-v7a-linux-gnueabihf/gcc-10.2.1-clang-10.0.1-glibc-2.32-binutils-2.35-kernel-5.8-sanitized/bin/arm-v7a-linux-gnueabihf-gdb'
else else
let g:termdebug_config['command'] = 'arm-none-eabi-gdb' let g:termdebug_config['command'] = 'arm-none-eabi-gdb'
endif endif
else else
let g:termdebug_config['command'] = 'gdb' let g:termdebug_config['command'] = ['gdb']
" let g:termdebug_config['command'] = ['ssh', 'localhost', 'gdb']
endif endif
if (count(['dlcpro', 'dlcpro-new'], g:project_type) > 0) if (count(['dlcpro', 'dlcpro-new'], g:project_type) > 0)
set wildignore-=**/firmware/src/device-control/** set wildignore-=**/firmware/src/device-control/**
set wildignore+=**/shg-firmware/** set wildignore+=**/shg-firmware/**
set titlestring=%<%t\ (%{expand('%:p:h')})%=project:\ %{g:project_type}\ \ \ \ compiler:\ %{g:Compiler_version()} set titlestring=%<%t\ (%{expand('%:p:h')})%{g:Title_string()}
let g:DeviceIP = 'dlc_pro__040083' let g:DeviceIP = 'dlc_pro__040083'
let g:DeviceType = 'TApro' let g:DeviceType = 'TApro'
let g:PowerswitchIP = 'elab-stefan' let g:PowerswitchIP = 'elab-stefan'
@ -257,27 +237,6 @@ function! s:ProjectSet(project_type, project_base_dir)
let g:stm32_target = 'STM32F4XX' let g:stm32_target = 'STM32F4XX'
endif endif
" python tags
execute "set tags+=" . s:ProjectBaseDir . '/tags'
" =============
" Some settings
" =============
set spell spelllang=en,de
set expandtab
set cinoptions=l1,g2,h2,N-2,t0,+0,(0,w1,Ws,m1,)100,*100
set textwidth=120
let $QT_FONT_DPI=96 " Size for qt-application in debugger
let g:BuildType = 'Default'
compiler gcc
command! -complete=customlist,GetAllMakeCompletions -nargs=* MakeCmd call s:Make('<args>', 'async')
" configure quickfix window for asyncrun
augroup QuickfixStatus
autocmd BufWinEnter quickfix setlocal
\ statusline=%t\ [%{g:asyncrun_status}]\ %{exists('w:quickfix_title')?\ '\ '.w:quickfix_title\ :\ ''}\ %=%-15(%l,%c%V%)\ %P
augroup END
function! s:DeviceFirmwareUpdate() function! s:DeviceFirmwareUpdate()
call s:Make('kill', 'bang') call s:Make('kill', 'bang')
call s:Make('flash', 'bang') call s:Make('flash', 'bang')
@ -317,10 +276,7 @@ function! s:ProjectSet(project_type, project_base_dir)
sleep 2 sleep 2
let s:gdb_connect_script = g:ProjectBuildDir.'/gdbinit' let s:gdb_connect_script = g:ProjectBuildDir.'/gdbinit'
if file_readable(s:gdb_connect_script) if file_readable(s:gdb_connect_script)
echom 'Liebl1'
autocmd User TermdebugStartPost call term_sendkeys('',"source ".s:gdb_connect_script."\n") autocmd User TermdebugStartPost call term_sendkeys('',"source ".s:gdb_connect_script."\n")
else
echom 'Liebl2'
endif endif
Termdebug Termdebug
call s:SendToDebugger('set confirm off') call s:SendToDebugger('set confirm off')