Add SSL check to rails#get_binding_for

* Attempted to get win32 working using curl since I could not figure
  out a better way to determine this in windows, and I am not familar
  with the common ways windows users install/use ruby on Windows other
  than through WSL2.  I used railsinstaller to accomplish this, which
  comes with curl.  If curl does not exist, it reverts to http as the
  default.
* Used @tpope's recommendation of using the pid to retrieve the process
  for non-win32 systems.
* Prepended the uri_scheme to the return values of get_binding_for(pid)

Author: dblanken

autoload/rails.vim

@@ -1742,17 +1742,16 @@ function! s:Preview(bang, lnum, uri) abort
   endif
   let binding = s:sub(binding, '^0\.0\.0\.0>|^127\.0\.0\.1>', 'localhost')
   let binding = s:sub(binding, '^\[::\]', '[::1]')
-  let uri_scheme = rails#app().uri_scheme()
   let uri = empty(a:uri) ? get(rails#buffer().preview_urls(a:lnum),0,'') : a:uri
   if uri =~ '://'
     "
   elseif uri =~# '^[[:alnum:]-]\+\.'
-    let uri = uri_scheme.'://'.s:sub(uri, '^[^/]*\zs', matchstr(root, ':\d\+$'))
+    let uri = s:sub(uri, '^[^/]*\zs', matchstr(root, ':\d\+$'))
   elseif uri =~# '^[[:alnum:]-]\+\%(/\|$\)'
     let domain = s:sub(binding, '^localhost>', 'lvh.me')
-    let uri = uri_scheme.'://'.s:sub(uri, '^[^/]*\zs', '.'.domain)
+    let uri = s:sub(uri, '^[^/]*\zs', '.'.domain)
   else
-    let uri = uri_scheme.'://'.binding.'/'.s:sub(uri,'^/','')
+    let uri = binding.'/'.s:sub(uri,'^/','')
   endif
   call s:initOpenURL()
   if (exists(':OpenURL') == 2) && !a:bang
@@ -1962,10 +1961,21 @@ function! rails#get_binding_for(pid) abort
   if empty(a:pid)
     return ''
   endif
+  let uri_scheme = 'http://'
   if has('win32')
     let output = system('netstat -anop tcp')
     let binding = matchstr(output, '\n\s*TCP\s\+\zs\S\+\ze\s\+\S\+\s\+LISTENING\s\+'.a:pid.'\>')
-    return s:sub(binding, '^([^[]*:.*):', '[\1]:')
+    if executable('curl')
+      let curl_result = system('curl --silent --head --fail https://'.binding)
+      if len(matchstr(curl_result, '200 OK')) > 0
+        let uri_scheme = 'https://'
+      endif
+    endif
+    return uri_scheme.s:sub(binding, '^([^[]*:.*):', '[\1]:')
+  endif
+  let has_ssl = system('ps -p '.a:pid.' | grep "ssl:"')
+  if len(has_ssl) > 0
+    let uri_scheme = 'https://'
   endif
   if executable('lsof')
     let lsof = 'lsof'
@@ -1981,12 +1991,12 @@ function! rails#get_binding_for(pid) abort
       let binding = matchstr(output, '\S\+:\d\+\ze\s\+(LISTEN)\n')
       let binding = s:sub(binding, '^\*', '[::]')
     endif
-    return binding
+    return uri_scheme.binding
   endif
   if executable('netstat')
     let output = system('netstat -antp')
     let binding = matchstr(output, '\S\+:\d\+\ze\s\+\S\+\s\+LISTEN\s\+'.a:pid.'/')
-    return s:sub(binding, '^([^[]*:.*):', '[\1]:')
+    return uri_scheme.s:sub(binding, '^([^[]*:.*):', '[\1]:')
   endif
   return ''
 endfunction
@@ -2681,29 +2691,15 @@ function! s:app_named_route_file(route_name) dict abort
   return ""
 endfunction
 
-function! s:app_uri_scheme() dict abort
-  if self.cache.needs('uri_scheme')
-    let binding = self.server_binding()
-    let https = system('ps | grep -v "grep" | grep ' . shellescape('ssl://' . binding))
-    if len(https) > 0
-      call self.cache.set('uri_scheme', 'https')
-    else
-      call self.cache.set('uri_scheme', 'http')
-    endif
-  endif
-  return self.cache.get('uri_scheme')
-endfunction
-
 function! s:app_routes() dict abort
   if self.cache.needs('routes')
     let cd = haslocaldir() ? 'lcd' : exists(':tcd') && haslocaldir(-1) ? 'tcd' : 'cd'
     let cwd = getcwd()
     let routes = []
     let paths = {}
     let binding = self.server_binding()
-    let uri_scheme = self.uri_scheme()
     if len(binding) && len(s:webcat())
-      let html = system(s:webcat() . ' ' . shellescape(uri_scheme . '://' . binding . '/rails/info/routes'))
+      let html = system(s:webcat() . ' ' . shellescape(binding . '/rails/info/routes'))
       for line in split(matchstr(html, '.*<tbody>\zs.*\ze</tbody>'), "\n")
         let val = matchstr(line, '\C<td data-route-name=''\zs[^'']*''\ze>')
         if len(val)
@@ -2760,7 +2756,7 @@ function! s:app_routes() dict abort
   return self.cache.get('routes')
 endfunction
 
-call s:add_methods('app', ['routes', 'named_route_file', 'uri_scheme'])
+call s:add_methods('app', ['routes', 'named_route_file'])
 
 " }}}1
 " Projection Commands {{{1