#
#
#            Nimrod's Runtime Library
#        (c) Copyright 2010 Andreas Rumpf
#
#    See the file "copying.txt", included in this
#    distribution, for details about the copyright.
#

## This module implements a simple proc for opening URLs with the user's
## default browser.

import strutils

when defined(windows):
  import winlean
else:
  import os, osproc

proc openDefaultBrowser*(url: string) =
  ## opens `url` with the user's default browser. This does not block.
  ##
  ## Under Windows, ``ShellExecute`` is used. Under Mac OS X the ``open``
  ## command is used. Under Unix, it is checked if ``gnome-open`` exists and
  ## used if it does. Next attempt is ``kde-open``, then ``xdg-open``.
  ## Otherwise the environment variable ``BROWSER`` is used to determine the
  ## default browser to use.
  when defined(windows):
    discard ShellExecute(0'i32, "open", url, nil, nil, SW_SHOWNORMAL)
  elif defined(macosx):
    discard execShellCmd("open " & quoteIfContainsWhite(url))
  else:
    const attempts = ["gnome-open ", "kde-open ", "xdg-open "]
    var u = quoteIfContainsWhite(url)
    for a in items(attempts):
      if execShellCmd(a & u) == 0: return
    for b in getEnv("BROWSER").split(PathSep):
      try:
        # we use ``startProcess`` here because we don't want to block!
        discard startProcess(command=b, args=[url], options={poUseShell})
        return
      except EOS:
        nil