Function findOptions

packages/cli/src/internal/options.ts:1599–1664

(
  input: ReadonlyArray<string>,
  options: ReadonlyArray<ParseableInstruction>,
  config: CliConfig.CliConfig
)

 * first argument with its values if it corresponds to an option flag.
 */
const findOptions = (
  input: ReadonlyArray<string>,
  options: ReadonlyArray<ParseableInstruction>,
  config: CliConfig.CliConfig
): Effect.Effect<
  [
    ReadonlyArray<string>,
    ReadonlyArray<ParseableInstruction>,
    HashMap.HashMap<string, ReadonlyArray<string>>
  ],
  ValidationError.ValidationError
> =>
  Arr.matchLeft(options, {
    onEmpty: () => Effect.succeed([input, Arr.empty(), HashMap.empty()]),
    onNonEmpty: (head, tail) =>
      parseCommandLine(head, input, config).pipe(
        Effect.flatMap(({ leftover, parsed }) =>
          Option.match(parsed, {
            onNone: () =>
              findOptions(leftover, tail, config).pipe(Effect.map(([nextArgs, nextOptions, map]) =>
                [nextArgs, Arr.prepend(nextOptions, head), map] as [
                  ReadonlyArray<string>,
                  ReadonlyArray<ParseableInstruction>,
                  HashMap.HashMap<string, ReadonlyArray<string>>
                ]
              )),
            onSome: ({ name, values }) =>
              Effect.succeed([leftover, tail, HashMap.make([name, values])] as [
                ReadonlyArray<string>,
                ReadonlyArray<ParseableInstruction>,
                HashMap.HashMap<string, ReadonlyArray<string>>
              ])
          })
        ),
        Effect.catchTags({
          CorrectedFlag: (e) =>
            findOptions(input, tail, config).pipe(
              Effect.catchSome(() => Option.some(Effect.fail(e))),
              Effect.flatMap(([otherArgs, otherOptions, map]) =>
                Effect.fail(e).pipe(
                  Effect.when(() => HashMap.isEmpty(map)),
                  Effect.as([otherArgs, Arr.prepend(otherOptions, head), map] as [
                    ReadonlyArray<string>,
                    ReadonlyArray<ParseableInstruction>,
                    HashMap.HashMap<string, ReadonlyArray<string>>
                  ])
                )
              )
            ),
          MissingFlag: () =>
            findOptions(input, tail, config).pipe(
              Effect.map(([otherArgs, otherOptions, map]) =>
                [otherArgs, Arr.prepend(otherOptions, head), map] as [
                  ReadonlyArray<string>,
                  ReadonlyArray<ParseableInstruction>,
                  HashMap.HashMap<string, ReadonlyArray<string>>
                ]
              )