aboutsummaryrefslogtreecommitdiff
path: root/cobol/internal
diff options
context:
space:
mode:
Diffstat (limited to 'cobol/internal')
-rw-r--r--cobol/internal/BUILD0
-rw-r--r--cobol/internal/actions.bzl23
-rw-r--r--cobol/internal/rules.bzl30
3 files changed, 53 insertions, 0 deletions
diff --git a/cobol/internal/BUILD b/cobol/internal/BUILD
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/cobol/internal/BUILD
diff --git a/cobol/internal/actions.bzl b/cobol/internal/actions.bzl
new file mode 100644
index 0000000..a57bd58
--- /dev/null
+++ b/cobol/internal/actions.bzl
@@ -0,0 +1,23 @@
+"""Common functions for creating actions to build COBOL programs"""
+
+load("@bazel_skylib//lib:shell.bzl", "shell")
+
+def cobol_compile_executable(ctx, srcs, out):
+ """Compiles a single COBOL program from sources
+
+ Args:
+ ctx: the build context
+ srcs: the source files to compile
+ out: the output file
+ """
+
+ ctx.actions.run_shell(
+ outputs = [out],
+ inputs = srcs,
+ command = "cobc -x -o {out} {srcs}".format(
+ out = shell.quote(out.path),
+ srcs = " ".join([shell.quote(src.path) for src in srcs]),
+ ),
+ mnemonic = "COBOLCompile",
+ use_default_shell_env = True,
+ )
diff --git a/cobol/internal/rules.bzl b/cobol/internal/rules.bzl
new file mode 100644
index 0000000..8dac747
--- /dev/null
+++ b/cobol/internal/rules.bzl
@@ -0,0 +1,30 @@
+"Rules for building COBOL programs"
+
+load(":actions.bzl", "cobol_compile_executable")
+
+def _cobol_binary_impl(ctx):
+ prefix = ctx.label.name + "%/"
+ executable = ctx.actions.declare_file(prefix + ctx.label.name)
+
+ cobol_compile_executable(
+ ctx,
+ srcs = ctx.files.srcs,
+ out = executable,
+ )
+
+ return [DefaultInfo(
+ files = depset([executable]),
+ executable = executable,
+ )]
+
+cobol_binary = rule(
+ _cobol_binary_impl,
+ attrs = {
+ "srcs": attr.label_list(
+ allow_files = True,
+ doc = "The COBOL source files to compile for this binary",
+ ),
+ },
+ doc = "Builds an executable program from COBOL source code",
+ executable = True,
+)