~zinigor/cardano-node/trunk

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
{ lib
, stdenv

, cabal-install
, graphviz
, jq
, moreutils
, makeWrapper
, runCommand

## Default to pure Nix-iness:
, useCabalRun ? false
, workbenchDevMode ? false

, cardano-cli
, cardano-topology
}:

with lib;

let
  nixWbMode =
    if useCabalRun
    then "cabal-exes+nix-wb"
    else "nix-exes+nix-wb";

  workbench =
    stdenv.mkDerivation {
      pname = "workbench";

      version = "0.1";

      src = ./.;

      buildInputs = [ jq makeWrapper ];

      buildPhase = ''
        patchShebangs .
      '';

      postFixup = ''
        wrapProgram "$out/bin/wb" --argv0 wb --add-flags "--set-mode ${nixWbMode}" --prefix PATH ":" ${stdenv.lib.makeBinPath
          [ graphviz
            jq
            moreutils

            cardano-cli
            cardano-topology
          ]}
      '';

      installPhase = ''
        mkdir -p         $out/bin
        cp -a wb profiles *.sh *.jq $out/bin
      '';

      dontStrip = true;
    };

  runWorkbench =
    name: command:
    runCommand name {} ''
      ${workbench}/bin/wb ${command} > $out
    '';

  runJq =
    name: args: query:
    runCommand name {} ''
      args=(${args})
      ${jq}/bin/jq '${query}' "''${args[@]}" > $out
    '';

  exeCabalOp = op: exe:
    toString [ "${cabal-install}/bin/cabal" op "${exe}" "--"];

  checkoutWbMode =
    if useCabalRun
    then "cabal-exes+checkout-wb"
    else "nix-exes+checkout-wb";

  shellHook = ''
    ${optionalString workbenchDevMode
    ''
    echo 'workbench:  dev mode enabled, calling wb directly from checkout (instead of using Nix store)' >&2

    workbench_cardano_node_repo_root=$(git rev-parse --show-toplevel)
    workbench_extra_flags=

    function wb() {
      $workbench_cardano_node_repo_root/nix/workbench/wb --set-mode ${checkoutWbMode} $workbench_extra_flags "$@"
    }

    export workbench_cardano_node_repo_root workbench_extra_flags
    export -f wb

    ''}

    ${optionalString useCabalRun
    ''
    ./scripts/cabal-inside-nix-shell.sh

    echo 'workbench:  cabal-inside-nix-shell mode enabled, calling cardano-* via 'cabal run' (instead of using Nix store)' >&2

    function cardano-cli() {
      ${exeCabalOp "exec" "cardano-cli"} "$@"
    }

    function cardano-node() {
      ${exeCabalOp "exec" "cardano-node"} "$@"
    }

    function cardano-topology() {
      ${exeCabalOp "exec" "cardano-topology"} "$@"
    }

    export -f cardano-cli cardano-node cardano-topology

    ''}

    function workbench-prebuild-executables() {
      ${optionalString useCabalRun
        ''
      echo -n "workbench:  prebuilding executables (because of useCabalRun):"
      for exe in cardano-cli cardano-node cardano-topology
      do echo -n " $exe"
         cabal -v0 build exe:$exe >/dev/null || return 1
      done
      echo
        ''}
      true
    }
    export -f workbench-prebuild-executables

    '';

  generateProfiles =
    { pkgs

    ## The backend is an attrset of AWS/supervisord-specific methods and parameters.
    , backend

    ## Environmental settings:
    ##   - either affect semantics on all backends equally,
    ##   - or have no semantic effect
    , environment
    }:
    rec {
      profile-names-json =
        runWorkbench "profile-names.json" "profiles list";

      profile-names =
        __fromJSON (__readFile profile-names-json);

      mkProfile =
        profileName:
        pkgs.callPackage ./profiles
          { inherit
              pkgs
              runWorkbench runJq workbench
              backend
              environment
              profileName;
          };

      profiles = genAttrs profile-names mkProfile;

      profilesJSON =
        runWorkbench "all-profiles.json" "profiles generate-all";
    };
in
{
  inherit workbench runWorkbench runJq;

  inherit generateProfiles shellHook;
}