##########################################################################
# DWT2
#
require 'find'
require 'fileutils'

##########################################################################
# Helpers
#
class String
    def to_path
        if isWindows
            self.gsub( '/', '\\' );
        else
            self
        end
    end
end

def isWindows
    Config::CONFIG['host_os'] =~ /mswin/
end

##########################################################################
# Constants
#
DMD         = "dmd"
OBJDIR      = File.expand_path("obj")
DIMPDIR     = File.expand_path("imp")
LIBDIR      = File.expand_path("lib")
BINDIR      = File.expand_path("bin")
RSPNAME     = File.expand_path("rsp")
ALL_RESDIRS = [ "base/res", "res" ]

LOG_STDOUT  = File.expand_path("olog.txt")
LOG_STDERR  = File.expand_path("elog.txt")


if isWindows
    BASEDIR_SWT = "org.eclipse.swt.win32.win32.x86"
    LIBEXT = ".lib"
    OBJEXT = ".obj"
    EXEEXT = ".exe"
    MAPEXT = ".map"
else
    BASEDIR_SWT = "org.eclipse.swt.gtk.linux.x86"
    LIBEXT = ".a"
    OBJEXT = ".o"
    EXEEXT = ""
end

ALL_RESDIRS << File.join(BASEDIR_SWT, "res" )

if isWindows
    LIBNAMES_BASIC  = [ "advapi32", "comctl32", "comdlg32", "gdi32", "kernel32",
                        "shell32", "ole32", "oleaut32", "olepro32", "oleacc",
                        "user32", "usp10", "msimg32", "opengl32", "shlwapi",
                        "zlib", "dwt-base" ]

else
    LIBNAMES_BASIC  = [ "gtk-x11-2.0", "gdk-x11-2.0", "atk-1.0", "gdk_pixbuf-2.0",
                        "gthread-2.0", "pangocairo-1.0", "fontconfig", "Xtst",
                        "Xext", "Xrender", "Xinerama", "Xi", "Xrandr", "Xcursor",
                        "Xcomposite", "Xdamage", "X11", "Xfixes", "pango-1.0",
                        "gobject-2.0", "gmodule-2.0", "dl", "glib-2.0", "cairo",
                        "dwt-base" ]

end
LIBNAMES_SWT        = [ BASEDIR_SWT ]
LIBNAMES_EQUINOX    = [ "org.eclipse.osgi",
                        "org.eclipse.osgi.supplement",
                        "org.eclipse.equinox.common" ]

LIBNAMES_CORE       = [ "org.eclipse.core.runtime",
                        "org.eclipse.core.commands",
                        "org.eclipse.core.jobs" ]

LIBNAMES_JFACE      = [ "org.eclipse.jface" ]

LIBNAMES_JFACETEXT  = [ "org.eclipse.text",
                        "org.eclipse.jface.text.projection",
                        "org.eclipse.jface.text", ]

LIBNAMES_UIFORMS    = [ "org.eclipse.ui.forms" ]

LIBNAMES_DRAW2D     = [ "org.eclipse.draw2d" ]


##########################################################################
# Routines
#

def buildTree( basedir, srcdir, resdir, dcargs=nil, libname=nil )
    if libname == nil
        libname = basedir
    end
    puts "Building #{libname}"

    resdir_abs = File.expand_path( File.join( basedir, resdir ))
    srcdir_abs = File.expand_path( File.join( basedir, srcdir ))

    FileUtils.mkdir_p DIMPDIR
    FileUtils.mkdir_p OBJDIR

    rsp = File.new( RSPNAME, "w+" )
    rsp.puts "-H"
    #rsp.puts "-Hd#{DIMPDIR.to_path}"
    rsp.puts "-I#{srcdir_abs.to_path}"
    rsp.puts "-I#{DIMPDIR.to_path}"
    rsp.puts "-J#{resdir_abs.to_path}"
    if dcargs != nil
        rsp.puts dcargs
    end
    ALL_RESDIRS.each do | dir |
        rsp.puts "-J#{File.expand_path(dir).to_path}"
    end
    rsp.puts "-c"
    rsp.puts "-op"
    Find.find( srcdir_abs ) do |path|
        if path =~ /\.d$/ then
            rsp.puts path.to_path[ srcdir_abs.size+1 .. -1 ]
        end
    end
    rsp.close

    Dir.chdir(srcdir_abs) do
        if isWindows
            cmd = "#{DMD} @#{RSPNAME.to_path}"
        else
            cmd = "cat #{RSPNAME.to_path} | xargs #{DMD}"
        end
        sh cmd, :verbose => false do |ok, res|
            if !ok then
                Find.find( srcdir_abs ) do |path|
                    if FileTest.file?(path) && path =~ /\.di$/ then
                        FileUtils.rm path
                    end
                end

                raise "compile error"
            end
        end
    end

    Find.find( srcdir_abs ) do |path|
        if FileTest.file?(path) && path =~ /\.di$/ then
            trgfile = File.join( DIMPDIR, path[ srcdir_abs.length+1 .. -1 ])
            FileUtils.mkdir_p File.dirname(trgfile)
            FileUtils.mv path, trgfile
        end
    end

    libobjs = FileList.new
    srcdirparts = split_all( srcdir_abs ).length
    Find.find( srcdir_abs ) do |path|
        if FileTest.file?(path) && path =~ /\.o(bj)?$/ then
            trgfile = split_all( path )[ srcdirparts .. -1 ].join( "-" )
            FileUtils.mv path, File.join( OBJDIR, trgfile )
            libobjs << File.join( OBJDIR, trgfile )
        end
    end

    createLib( libobjs, libname )
end

def createLib( libobjs, name )
    FileUtils.mkdir_p LIBDIR.to_path
    rsp = File.new( RSPNAME, "w+" )
    rsp.puts "-p512 -n -c #{LIBDIR}/#{name}#{LIBEXT}"
    libobjs.each do |obj|
        rsp.puts obj.to_path
    end
    rsp.close
    cmd = "lib @#{RSPNAME} > #{LOG_STDOUT}"
    sh cmd, :verbose => false do |ok, res|
        if !ok then
            raise "librarian error"
        end
    end
    FileUtils.rm libobjs

end

def buildApp( basedir, srcdir, resdir, dflags, appname, filelist, libnames )
    if filelist == nil
        filelist = FileList[ "**/#{appname}.d" ]
    end

    srcdir_abs = File.expand_path( File.join( basedir, srcdir))
    resdir_abs = File.expand_path( File.join( basedir, resdir))

    rsp = File.new( RSPNAME, "w+" )
    rsp.puts "-I#{srcdir_abs.to_path}"
    rsp.puts "-I#{DIMPDIR.to_path}"
    rsp.puts "-J#{resdir_abs.to_path}"
    if dflags.size > 0 then
        rsp.puts dflags
    end
    ALL_RESDIRS.each do | dir |
        rsp.puts "-J#{File.expand_path(dir).to_path}"
    end

    rsp.puts "-L/NOM"
    libnames.each do | libname |
        rsp.puts "-L+#{libname}#{LIBEXT}"
    end
    rsp.puts "-L+dwt-base.lib"
    rsp.puts "-L+#{BASEDIR_SWT}.lib"
    rsp.puts "-L+#{LIBDIR.to_path}\\"

    rsp.puts "-op"
    rsp.puts "-od#{OBJDIR.to_path}"
    applfile = File.join(BINDIR,appname+EXEEXT)
    rsp.puts "-of#{applfile.to_path}"
    filelist.each do |path|
        rsp.puts File.expand_path(path).to_path[ srcdir_abs.size+1 .. -1 ]
    end
    rsp.close

    Dir.chdir(srcdir_abs) do
        if isWindows
            cmd = "#{DMD} @#{RSPNAME.to_path}"
        else
            cmd = "cat #{RSPNAME.to_path} | xargs #{DMD}"
        end
        sh cmd, :verbose => false do |ok, res|
            if !ok then
                raise "compile error"
            end
        end
    end
    if isWindows
        FileUtils.rm File.join(srcdir_abs,appname+MAPEXT), :force => true
    end

end
##########################################################################
# Targets
#
desc "Clean"
task :clean do
    puts "Cleaning"
    FileUtils.rm_rf DIMPDIR
    FileUtils.rm_rf OBJDIR
    FileUtils.rm_rf LIBDIR
    FileUtils.rm RSPNAME, :force => true
    FileUtils.rm LOG_STDOUT, :force => true
    FileUtils.rm LOG_STDERR, :force => true
end

desc "Build Base (Java Environment and Helpers)"
task :base do
    buildTree( "base", "src", "res", "", "dwt-base" )
end

desc "Build SWT"
task :swt do
    buildTree( BASEDIR_SWT, "src", "res" )
end

desc "Build Equinox"
task :equinox do
    buildTree( "org.eclipse.osgi", "src", "res" )
    buildTree( "org.eclipse.osgi", "supplement/src", "res", nil, "org.eclipse.osgi.supplement")
    buildTree( "org.eclipse.equinox.common", "src", "res" )
end

desc "Build Eclipse Core"
task :core do
    buildTree( "org.eclipse.core.runtime", "src", "res" )
    buildTree( "org.eclipse.core.commands", "src", "res" )
    buildTree( "org.eclipse.core.jobs", "src", "res" )
end

desc "Build JFace"
task :jface do
    buildTree( "org.eclipse.jface", "src", "res" )
end

desc "Build JFace.Text"
task :jfacetext do
    buildTree( "org.eclipse.text", "src", "res" )
    buildTree( "org.eclipse.jface.text", "projection", "res", "-I../src", "org.eclipse.jface.text.projection" )
    buildTree( "org.eclipse.jface.text", "src", "res" )
end

desc "Build UI Forms"
task :uiforms do
    buildTree( "org.eclipse.ui.forms", "src", "res" )
end

desc "Build Draw2D"
task :draw2d do
    buildTree( "org.eclipse.draw2d", "src", "res" )
end

desc "Build ALL"
task :all => [ :base, :swt, :equinox, :core, :jface, :jfacetext, :uiforms,
    :draw2d, :swtsnippets, :jfacesnippets ]

desc "Clean, then build ALL"
task :default => [ :clean, :all ]


desc "Build SWT Snippet Collection"
task :swtsnippets, :explicit_snp do | t, args |

    libnames = LIBNAMES_BASIC + LIBNAMES_SWT
    snps_browser = [ "Snippet128", "Snippet136" ]
    snps_opengl = [ "Snippet174", "Snippet195" ]

    snps_exclude = snps_browser + snps_opengl
    allsnippets = FileList[ File.join("org.eclipse.swt.snippets", "src", "**/Snippet*.d" )]
    if args.explicit_snp != nil
        snpname = args.explicit_snp
        puts "Building swtsnippets[#{snpname}]"
        buildApp( "org.eclipse.swt.snippets", "src", "res", "", snpname, nil, libnames )
    else
        allsnippets.each do | snp |
            if snp =~ /.*(Snippet\w+)\.d$/
                snpname = $1
                puts "Building swtsnippets[#{snpname}]"
                if !snps_exclude.include? snpname
                    buildApp( "org.eclipse.swt.snippets", "src", "res", "", snpname, nil, libnames )
                end
            else
                raise "Name does not match #{snp}"
            end
        end
    end
end

desc "Build JFace Snippet Collection"
task :jfacesnippets, :explicit_snp do | t, args |

    libnames = LIBNAMES_BASIC + LIBNAMES_SWT + LIBNAMES_EQUINOX + LIBNAMES_CORE + LIBNAMES_JFACE
    snps_exclude = []
    allsnippets = FileList[ File.join("org.eclipse.jface.snippets", "EclipseJfaceSnippets", "**/*.d" )]
    if args.explicit_snp != nil
        snpname = args.explicit_snp
        puts "Building jfacesnippets[#{snpname}]"
        buildApp( "org.eclipse.jface.snippets", "src", "res", "", args.explicit_snp, nil, libnames )
    else
        allsnippets.each do | snp |
            if snp =~ /.*[\\\/](\w+)\.d$/
                snpname = $1
                puts "Building jfacesnippets[#{snpname}]"
                if !snps_exclude.include? snpname
                    buildApp( "org.eclipse.jface.snippets", "src", "res", "", snpname, nil, libnames )
                end
            else
                puts snp
                raise "Name does not match #{snp}"
            end
        end
    end
end