By default gets the config from sway, unless config or config path is provided via stdin or command option.


Then parses the config and prints the requested output as JSON.


use v6.d;

use Pod::Contents:auth<zef:CIAvash>;

use Sway::Config:auth($?DISTRIBUTION.meta<auth>);

unit module Sway::Config::CLI:auth($?DISTRIBUTION.meta<auth>):ver(v0.1.0);



NAME

sway-config - Parses Sway config and prints the specified section


TITLE

DESCRIPTION


my Sway::Config $config;

my $app_name        = $

.&join_pod_contents_of: 'NAME';
my $app_title       = $=pod.&join_pod_contents_of: 'TITLE';
my $app_description = $=pod.&join_pod_contents_of: 'DESCRIPTION';



constant $app_version   = $?MODULE.^ver;
constant $app_copyright = q:to/END/;
Copyright (C) 2021 Siavash Askari Nasr.

License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>.
This is free software: you are free to change and redistribute it.
This program comes with NO WARRANTY.
END

#| Prints configs, variables, modes, key_bindings as JSON
proto MAIN (Bool :i(:$stdin), Str :c(:$config-path), |) is export {
    $config = do if $stdin {
        Sway::Config.new: config => $*IN.slurp, config_path => $config-path;
    } elsif $config-path {
        Sway::Config.new: config_path => $config-path;
    } else {
        Sway::Config.new;
    }
    {*}
}

#| Prints version
multi MAIN (Bool:D :v(:$version)!) {
    put "$app_name v$app_version\n";

    print $app_copyright;
}

#| Prints configs, variables, modes and key_bindings as JSON
multi MAIN ('all', Bool :i(:$stdin), Str :c(:$config-path)) {
    put $config.all: :json;
}

#| Prints configs as JSON
multi MAIN ('configs', Bool :i(:$stdin), Str :c(:$config-path)) {
    put $config.configs: :json;
}

#| Prints raw match as JSON
multi MAIN ('match', Bool :i(:$stdin), Str :c(:$config-path)) {
    put $config.match: :json;
}

#| Prints variables as JSON
multi MAIN ('variable', Bool :i(:$stdin), Str :c(:$config-path)) {
    put $config.variable: :json;
}

#| Prints modes as JSON
multi MAIN ('mode', Bool :i(:$stdin), Str :c(:$config-path)) {
    put $config.mode: :json;
}

#| Prints key bindings as JSON (Object/Hash)
multi MAIN ('key_binding', Bool :i(:$stdin), Str :c(:$config-path)) {
    put $config.key_binding: :json;
}

#| Prints key bindings as JSON (Array)
multi MAIN ('key_bindings', Bool :i(:$stdin), Str :c(:$config-path)) {
    put $config.key_bindings: :json;
}

sub USAGE is export {
    put $app_title, "\n";
    put $app_description, "\n";

    put $*USAGE;
}



L<https://github.com/CIAvash/Sway-Config/>


REPOSITORY

L<https://github.com/CIAvash/Sway-Config/issues>


Siavash Askari Nasr - L<https://www.ciavash.name>


AUTHOR

COPYRIGHT

sway-config is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.


sway-config is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.


You should have received a copy of the GNU General Public License
along with sway-config.  If not, see <http://www.gnu.org/licenses/>.


LICENSE

root

Grammar

Actions

React

=begin React :component<HeaderCol> :id<menu> 
=para L<Documentation|/doc/introduction>
=para L<Modules| /mods>
=para L<Examples| file:../examples/index.podlite>
=para L<Download |file:../download/index.podlite>
=para L<About|file:../about/index.podlite>
=para 🔍 K<⌘K>/K<ctrl-K>
=end React


=begin React :component<HeaderCol> :id<footer>  
=begin nested :!nested
=item1 B<Language>
    =item2 L<Get started|file:../getting-started/getting-started.podlite>
    =item2 L<Why Raku?|/doc/language/faq#Why-should-I-learn-Raku-What's-so-great-about-it>
    =item2 L<Try Raku|https://glot.io/new/raku>
    =item2 L<Raku cheat sheet|https://github.com/Raku/mu/blob/master/docs/Perl6/Cheatsheet/cheatsheet.txt>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<Raku on Exercism|https://exercism.org/tracks/raku>
    =item2 L<Wikipedia|https://en.wikipedia.org/wiki/Raku_(programming_language)>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>

=end nested
=begin nested :!nested

=item1 B<L<Documentation|/doc>>
    =item2 L<Getting started, Migration guides from other languages, & Tutorials | file:../doc/introduction.podlite>
    =item2 L<Language References|file:../doc/reference.podlite>
    =item2 L<Type Reference| file:../doc/types.podlite>
    =item2 L<Miscellaneous| file:../doc/miscellaneous.podlite>
    =item2 L<FAQs (Frequently Asked Questions)|/doc/language/faq>
    =item2 L<Community|/doc/language/community>
    =item2 L<The list of all documents|file:../doc/index.podlite>

=item1 B<Resources>
    =item2 L<The Raku Guide|https://raku.guide/>
    =item2 L<Books |https://perl6book.com/>
    =item2 L<Rosetta Code | https://www.raku.org/community/rosettacode>

=end nested
=begin nested :!nested

=item1 B<Resoures>
    =item2 L<Download | file:../download/index.podlite>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>

=item1 B<Learning>
    =item2 L<The Raku Guide|https://raku.guide/>
    =item2 L<Wikibook |https://en.wikibooks.org/wiki/Raku_Programming>
    =item2 L<Books |https://perl6book.com/>
    =item2 L<Rosetta Code | https://www.raku.org/community/rosettacode>
    =item2 L<Learn Raku in Y minutes|https://learnxinyminutes.com/docs/raku/>
    =item2 L<Golfing |https://github.com/AlexDaniel/raku-golf-cheatsheet>
=end nested
=begin nested :!nested

=item1 B<Explore>
    =item2 L<Raku Blog Aggregator|https://planet.raku.org/>
    =item2 L<Rakudo Weekly|https://rakudoweekly.blog/>
    =item2 L<The Weekly Challenge |https://perlweeklychallenge.org/>
    =item2 L<Raku Advent Calendar|https://raku-advent.blog/>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>

=end nested
=end React


=begin React :component<CookieConsent> :id<CookieConsent> :buttonCaption("Got it!")
=para
This website uses cookies for analytics.
=end React


sway-config - Parses Sway config and prints the specified section

NAME

REPOSITORY

BUG

AUTHOR

COPYRIGHT

LICENSE

Sway::Config v0.1.0

Authors

License

Dependencies

Test Dependencies

Provides

Documentation