compile.jl

#!/usr/bin/julia

# Date : 2022-07-01
# A script to compile Library cgraph in Unix-like and Windows Platforms
# gets source files iteratively from Directory src

PRO = "cgraph"
DIR = "."
INC = joinpath(DIR, "include")
SRC = joinpath(DIR, "src")
SRC_TYPE = joinpath(SRC, "type")
TST = joinpath(DIR, "tests")
LIB = joinpath(DIR, "lib")

CC = "cc"
CFLAGS = split("-std=c89 -Wall -pedantic -fPIC", " ")
CSFLAGS = "-shared"

MODE = "debug"
if MODE == "debug"
  push!(CFLAGS, "-g")
  push!(CFLAGS, "-DDEBUG")
elseif MODE == "release"
  push!(CFLAGS, "-static")
  push!(CFLAGS, "-O2")
end

# package shared library
AR = "ar"
ARFLAGS = "-rcs"

if Sys.iswindows()
  # target files
  LIBSHARED = joinpath(LIB, "lib$PRO.dll")
  LIBSTATIC = joinpath(LIB, "lib$PRO.lib")
  # test files
  TSTFILE = joinpath(TST, "$PRO.c")
  TSTTARGET = joinpath(TST, "$PRO.exe")
else
  # target files
  LIBSHARED = joinpath(LIB, "lib$PRO.so")
  LIBSTATIC = joinpath(LIB, "lib$PRO.a")
  # test files
  TSTFILE = joinpath(TST, "$PRO.c")
  TSTTARGET = joinpath(TST, PRO)
end

# source files
# get all subdirectories
function getsubdirs(path, dirs)
  for item in readdir(path)
    subpath = joinpath(path, item)
    if isdir(subpath) && nothing == match(r"^\.", item)
      push!(dirs, subpath)
      getsubdirs(subpath, dirs)
    end
  end
end

SRCS = []
getsubdirs(SRC, SRCS)

# get all source files from subdirectories
CFILES = []
for dir in SRCS
  for item in readdir(dir)
    subpath = joinpath(dir, item)
    if isfile(subpath) && nothing != match(r"^((?!\.).)*\.c$", item)
      push!(CFILES, subpath)
    end
  end
end

args = ARGS
if length(args) == 0
  mkpath(LIB)
  OFILES = []
  for file in CFILES
    obj = replace(file, r"\.c$"=>".o")
    dep = replace(file, r"\.c$"=>".d")
    println("compile $file to $obj")
    run(`$CC $CFLAGS -I$INC -I$SRC_TYPE -c $file -o $obj -MD -MF $dep`)
    push!(OFILES, obj)
  end
  println("compile $LIBSHARED")
  run(`$CC $CSFLAGS -o $LIBSHARED $OFILES`)
  println("compile $LIBSTATIC")
  run(`$AR $ARFLAGS $LIBSTATIC $OFILES`)
elseif args[1] == "test"
  println("compile $TSTFILE to $TSTTARGET")
  run(`$CC $CFLAGS -I$INC -o $TSTTARGET $TSTFILE -L$LIB -static -l$PRO -lm`)
  tst_path = joinpath(TST, "elements.csv")
  println("test $TSTTARGET with $tst_path")
  run(`$TSTTARGET $tst_path`)
elseif args[1] == "clean"
  for file in CFILES
    obj = replace(file, r"\.c$"=>".o")
    println("clean ", obj)
    rm(obj, force=true)
    dep = replace(file, r"\.c$"=>".d")
    println("clean ", dep)
    rm(dep, force=true)
  end
  println("clean $LIBSTATIC")
  rm(LIBSTATIC, force=true)
  println("clean $LIBSHARED")
  rm(LIBSHARED, force=true)
  println("clean $TSTTARGET")
  rm(TSTTARGET, force=true)
elseif args[1] == "distclean"
  for file in CFILES
    obj = replace(file, r"\.c$"=>".o")
    println("clean ", obj)
    rm(obj, force=true)
    dep = replace(file, r"\.c$"=>".d")
    println("clean ", dep)
    rm(dep, force=true)
  end
  println("clean $LIBSTATIC")
  rm(LIBSTATIC, force=true)
  println("clean $LIBSHARED")
  rm(LIBSHARED, force=true)
  println("clean $LIB")
  rm(LIB, force=true)
  println("clean $TSTTARGET")
  rm(TSTTARGET, force=true)
elseif args[1] == "help"
  println("$PROGRAM_FILE    <target>")
  println("<target>: ")
  println("                    compile cgraph")
  println("          test      test cgraph")
  println("          clean     clean all the generated files")
  println("          distclean clean all the generated files and directories")
  println("          help      commands to this program")
else
  println(args[1], " is an unsupported command")
  println("use \"$PROGRAM_FILE help\" to know all supported commands")
end