asynchronous ant class building

fix #391

Author: artur-shaik

autoload/javacomplete/classpath/ant.vim

@@ -39,7 +39,6 @@ function! javacomplete#classpath#ant#Generate(force) abort
   let g:JavaComplete_ProjectKey = substitute(g:JavaComplete_AntPath, '[\\/:;.]', '_', 'g')
   let path = javacomplete#util#GetBase("classpath". g:FILE_SEP). g:JavaComplete_ProjectKey
 
-  call s:Log(path)
   if filereadable(path)
     if a:force == 0 && getftime(path) >= getftime(g:JavaComplete_AntPath)
       call s:Log("get libs from cache file")
@@ -48,33 +47,109 @@ function! javacomplete#classpath#ant#Generate(force) abort
     call javacomplete#util#RemoveFile(javacomplete#util#GetBase('cache'). g:FILE_SEP. 'class_packages_'. g:JavaComplete_ProjectKey. '.dat')
   endif
 
-  let hasInitTarget = !empty(system("ant -projecthelp -v | grep '^ init\\>'"))
-  let tmpFile = []
+  let s:antPath = path
+  let s:antOutput = []
+  let cmd = "ant -projecthelp -v | grep '^ init\\>'"
+  call javacomplete#util#RunSystem(
+        \ cmd, "ant check 'init' target process",
+        \ "javacomplete#classpath#ant#CheckInitTargetHandler")
+  return '.'
+endfunction
+
+function! javacomplete#classpath#ant#CheckInitTargetHandler(data, event)
+  if a:event == 'exit'
+    if a:data == "0"
+      let hasInitTarget = !empty(s:antOutput)
+      let s:antOutput = []
+      call s:BuildAntClasspath(hasInitTarget)
+    else
+      echohl WarningMsg | echomsg "Failed to check 'init' target" | echohl None
+    endif
+  elseif a:event == 'stdout'
+    for data in filter(a:data,'v:val =~ "^ init\\>.*$"')
+      if g:JavaComplete_ShowExternalCommandsOutput
+        echomsg data
+      endif
+      if exists('s:antOutput')
+        call add(s:antOutput, data)
+      endif
+    endfor
+  elseif a:event == 'stderr'
+    for data in filter(a:data,'v:val !~ "^\\s*$"')
+      echoerr data
+    endfor
+  endif
+endfunction
+
+function! s:BuildAntClasspath(hasInitTarget)
+  let tmpBuildFile = []
   for line in readfile(g:JavaComplete_AntPath)
     if stridx(line, '</project>') >= 0
-      if hasInitTarget
+      if a:hasInitTarget
         let xmlTemplate = s:antXmlTemplate
         let xmlTemplate[0] = xmlTemplate[0][:-2]. ' depends="init">'
-        call extend(tmpFile, xmlTemplate)
+        call extend(tmpBuildFile, xmlTemplate)
       else
-        call extend(tmpFile, s:antXmlTemplate)
+        call extend(tmpBuildFile, s:antXmlTemplate)
       endif
     endif
-    call add(tmpFile, line)
-  endfor
-  let s:temporaryAntFile = "vjc-ant-build.xml"
-  call writefile(tmpFile, s:temporaryAntFile)
-
-  let antCmd = ['ant', '-f', s:temporaryAntFile, '-q', 'vjc-printclasspath']
-  call delete(s:temporaryAntFile)
-  let result = system(join(antCmd, " "))
-  for line in split(result, '\n')
-    let matches = matchlist(line, '\m^\s\+\[echo\]\s\+\(.*\)')
-    if !empty(matches)
-      return matches[1]
-    endif
+    call add(tmpBuildFile, line)
   endfor
-  return '.'
+  let s:tmpAntFileName = "vjc-ant-build.xml"
+  call writefile(tmpBuildFile, s:tmpAntFileName)
+
+  let s:antOutput = []
+  let antCmd = ['ant', '-f', s:tmpAntFileName, '-q', 'vjc-printclasspath']
+  call javacomplete#util#RunSystem(
+        \ antCmd, "ant classpath build process",
+        \ "javacomplete#classpath#ant#BuildClasspathHandler")
 endfunction
 
+function! javacomplete#classpath#ant#BuildClasspathHandler(data, event)
+  if a:event == 'exit'
+    if a:data == "0"
+      for line in s:antOutput
+        let matches = matchlist(line, '\m^\s\+\[echo\]\s\+\(.*\)')
+        if !empty(matches)
+          let cp = matches[1]
+          break
+        endif
+      endfor
+      if cp != '.'
+        call writefile([cp], s:antPath)
+      endif
+
+      let g:JavaComplete_LibsPath .= ':'. cp
+
+      call javacomplete#util#RemoveFile(javacomplete#util#GetBase('cache'). g:FILE_SEP. 'class_packages_'. g:JavaComplete_ProjectKey. '.dat')
+
+      call javacomplete#server#UnblockStart()
+      call javacomplete#server#Terminate()
+      call javacomplete#server#Start()
+
+      echomsg "Ant classpath built successfully"
+    else
+      echohl WarningMsg | echomsg "Failed to build ant classpath" | echohl None
+    endif
+
+    call delete(s:tmpAntFileName)
+
+    unlet s:antOutput
+    unlet s:tmpAntFileName
+
+  elseif a:event == 'stdout'
+    for data in filter(a:data,'v:val !~ "^\\s*$"')
+      if g:JavaComplete_ShowExternalCommandsOutput
+        echomsg data
+      endif
+    endfor
+    if exists('s:antOutput')
+      call extend(s:antOutput, a:data)
+    endif
+  elseif a:event == 'stderr'
+    for data in filter(a:data,'v:val !~ "^\\s*$"')
+      echoerr data
+    endfor
+  endif
+endfunction
 " vim:set fdm=marker sw=2 nowrap: