From fab6ac22ffc33a22d638c0f05c911a9532e5c4d1 Mon Sep 17 00:00:00 2001 From: Shohei YOSHIDA Date: Mon, 23 Mar 2026 11:38:41 +0900 Subject: [PATCH 1/2] Add cpm completion --- src/_cpm | 121 +++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 121 insertions(+) create mode 100644 src/_cpm diff --git a/src/_cpm b/src/_cpm new file mode 100644 index 0000000..8965933 --- /dev/null +++ b/src/_cpm @@ -0,0 +1,121 @@ +#compdef cpm +# ------------------------------------------------------------------------------ +# Copyright (c) 2026 Github zsh-users - https://github.com/zsh-users +# +# Permission is hereby granted, free of charge, to any person obtaining +# a copy of this software and associated documentation files (the +# "Software"), to deal in the Software without restriction, including +# without limitation the rights to use, copy, modify, merge, publish, +# distribute, sublicense, and/or sell copies of the Software, and to +# permit persons to whom the Software is furnished to do so, subject to +# the following conditions: +# +# The above copyright notice and this permission notice shall be included +# in all copies or substantial portions of the Software. +# +# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS +# OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, +# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL +# THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR +# OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, +# ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR +# OTHER DEALINGS IN THE SOFTWARE. +# ------------------------------------------------------------------------------ +# Description +# ----------- +# +# Completion script for cpm 0.998003 (https://github.com/skaji/cpm) +# +# ------------------------------------------------------------------------------ +# Authors +# ------- +# +# * Shohei Yoshida (https://github.com/syohex) +# +# ------------------------------------------------------------------------------ + +_cpm() { + typeset -A opt_args + local context state line + local curcontext="$curcontext" + local ret=1 + + _arguments -C \ + '(- *)'{-h,--help}'[Show help message]' \ + '(- *)--version[Show version and exit]' \ + '(-v --verbose)'{-v,--verbose}'[Enable debug mode]' \ + '1: :_cpm_subcommands' \ + '*::arg:->args' && ret=0 + + case $state in + (args) + case $words[1] in + (install) + _arguments \ + '(-w --workers)'{-w,--workers=}'[number of workers(default=5)]:num' \ + '(-L --local-lib-contained)'{-L,--local-lib-contained=}'[directory to install module into, default=local/]: :_files -/' \ + '(-g --global)'{-g,--global}'[install modules into current @INC instead of local/]' \ + '(-v --verbose)'{-v,--verbose}'[verbose mode]' \ + '(--prebuilt --no-prebuilt)--prebuilt[save builds for CPAN distributions and later install the prebuilts if available]' \ + '(--prebuilt --no-prebuilt)--no-prebuilt[no prebuilt]' \ + '--target-perl=[install modules as if version is your perl is VERSION]:version' \ + '--mirror[base URL for the CPAN mirror to use]:url' \ + '(--pp --pureperl-only)'{--pp,--pureperl-only}'[prefer pureperl only build]' \ + '(--static-install --no-static-install)--static-install[enable the static install]' \ + '(--static-install --no-static-install)--no-static-install[disable the static install]' \ + \*{-r,--resolver=}'[specify resolvers]:resolver' \ + '--no-defult-resolvers[Use default resolvers if you specify --resolver option]' \ + '--reinstall[reinstall the distribution even if you already have the latest version installed]' \ + '--dev[resolve TRIAL distributions too]' \ + '(--color --no-color)--color[turn on color output]' \ + '(--color --no-color)--no-color[turn off color output]' \ + '(--test --no-test)--test[run test cases]' \ + '(--test --no-test)--no-test[do not run test cases]' \ + '--man-pages[generate man pages]' \ + '(--retry --no-retry)--retry[retry configure/build/test/install if fails]' \ + '(--retry --no-retry)--no-retry[do not retry]' \ + '--show-build-log-on-failure[show build.log on failure]' \ + '--configure-timeout=[specify configure timeout second]:sec' \ + '--build-timeout=[specify build timeout second]:sec' \ + '--test-timeout=[specify test timeout second]:sec' \ + '(--show-progress --no-show-progress)--show-progress[show progress]' \ + '(--show-progress --no-show-progress)--no-show-progress[do not show progress]' \ + '--cpmfile=[specify cpmfile path]: :_files' \ + '--cpanfile=[specify cpanfile path]: :_files' \ + '--metafile=[specify META file path]: :_files' \ + '--snapshot=[specify cpanfile.snapshot path]: :_files' \ + '(- *)'{-V,--version}'[show version]' \ + '(- *)'{-h,--help}'[show help message]' \ + '*--feature=[specify the feature to enable in cpanfile]:feature' \ + '*:modules' \ + && ret=0 + ;; + (*) + ret=0 + ;; + esac + esac + + return ret +} + +(( $+functions[_cpm_subcommands] )) || +_cpm_subcommands() { + local -a commands=( + "install:Install modules" + "help:Show help" + "version:Show version" + ) + + _describe -t subcommands "subcommands" commands +} + +_cpm "$@" + +# Local Variables: +# mode: Shell-Script +# sh-indentation: 2 +# indent-tabs-mode: nil +# sh-basic-offset: 2 +# End: +# vim: ft=zsh sw=2 ts=2 et From 9c0e68a83bee5257d7284987d711ee0f2de6c406 Mon Sep 17 00:00:00 2001 From: Shohei YOSHIDA Date: Mon, 23 Mar 2026 11:38:56 +0900 Subject: [PATCH 2/2] Add cpanm completion --- src/_cpanm | 103 +++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 103 insertions(+) create mode 100644 src/_cpanm diff --git a/src/_cpanm b/src/_cpanm new file mode 100644 index 0000000..d1e8733 --- /dev/null +++ b/src/_cpanm @@ -0,0 +1,103 @@ +#compdef cpanm +# ------------------------------------------------------------------------------ +# Copyright (c) 2026 Github zsh-users - https://github.com/zsh-users +# +# Permission is hereby granted, free of charge, to any person obtaining +# a copy of this software and associated documentation files (the +# "Software"), to deal in the Software without restriction, including +# without limitation the rights to use, copy, modify, merge, publish, +# distribute, sublicense, and/or sell copies of the Software, and to +# permit persons to whom the Software is furnished to do so, subject to +# the following conditions: +# +# The above copyright notice and this permission notice shall be included +# in all copies or substantial portions of the Software. +# +# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS +# OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, +# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL +# THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR +# OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, +# ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR +# OTHER DEALINGS IN THE SOFTWARE. +# ------------------------------------------------------------------------------ +# Description +# ----------- +# +# Completion script for cpanm 1.7049 (https://github.com/miyagawa/cpanminus) +# +# ------------------------------------------------------------------------------ +# Authors +# ------- +# +# * Shohei Yoshida (https://github.com/syohex) +# +# ------------------------------------------------------------------------------ + +_arguments -n -C -s \ + '(-i --install)'{-i,--install}'[Install the modules]' \ + '--self-upgrade[Upgrades itself]' \ + '--info[Displays the distribution information in "AUTHOR/Dist-Name-ver.tar.gz" format in the stdout]' \ + "--installdeps[Installs the dependencies of the target distribution but won't build itself]" \ + '--look[Download and unpack the distribution and then open the directory with your shell]' \ + '(- *)'{-h,--help}'[Display the help message]' \ + '(- *)'{-V,--version}'[Display the version number]' \ + '(-f --force)'{-f,--force}'[Force install modules even when testing failed]' \ + '(-n --notest)'{-n,--notest}'[Skip the testing of modules]' \ + '--test-only[Run the tests only]' \ + '(-S --sudo)'{-S,--sudo}'[Switch to the root user with "sudo" when installing modules]' \ + '(-v --verbose)'{-v,--verbose}'[Makes the output verbose]' \ + '(-q --quiet)'{-q,--quiet}'[Makes the output even more quiet than the default]' \ + '(-l --local-lib)'{-l,--local-lib}'[Sets the local::lib compatible path to install modules to]' \ + '(-L --local-lib-contained)'{-L,--local-lib-contained}'[Same with "--local-lib" but with --self-contained set]' \ + '--self-contained[When examining the dependencies, assume no non-core modules are installed on the system]' \ + "--exclude-vendor[Don't include module installed under the 'vendor' paths]" \ + '--mirror=[Specifies the base URL for the CPAN mirror to use]:mirror' \ + "--mirror-only[Download the mirror's index file instead of querying the CPAN Meta DB]" \ + '(-M --from)'{-M,--from}='[Use the given mirror URL and its index as the only source to search and download modules from]' \ + '--mirror-index[Specifies the file path to "02packages.details.txt" for module search index]' \ + '--cpanmetadb[Specifies an alternate URI for CPAN MetaDB index lookups]' \ + '--metacpan[Prefers MetaCPAN API over CPAN MetaDB]' \ + '--cpanfile=[Specified an alternate path for cpanfile]: :_files' \ + "--prompt[Prompts when a test fails so that you can skip, force install, retry or look what's going wrong]" \ + '--dev[Search for a newer developer release as well]' \ + '--reinstall[Reinstall even if your locally installed version is latest]' \ + '--interactive[Makes the configuration interactive]' \ + '(--pp --pureperl)'{--pp,--pureperl}'[Prefer Pure perl build of modules]' \ + '--with-recommends[Installs dependencies declared as "recommends"]' \ + '--with-suggests[Installs dependencies declared as "suggests"]' \ + '--with-develop[Install develop phase dependencies in "cpanfile"]' \ + '--with-configure[Installs configure phase dependencies in "cpanfile"]' \ + '--with-feature=[Specifies the feature to enable]::feature' \ + '--without-feature=[Not specifies the feature to enable]::feature' \ + '--with-all-feature[Specifies the all features to enable]' \ + '--configure-timeout=[Specify the timeout length to wait for the configure]' \ + '--build-timeout=[Specify the timeout length to wait for the build]' \ + '--test-timeout=[Specify the timeout length to wait for the test]' \ + '--configure-args=[Pass arguments for configure]:args' \ + '--build-args=[Pass arguments for build]:args' \ + '--test-args=[Pass arguments for test]:args' \ + '--install-args=[Pass arguments for install]:args' \ + '--scandeps[Scans the dependencies of given modules and output the tree in a text format]' \ + '--format=[Determines what format to display the scanned dependency tree]:fmt:(tree json yaml dists)' \ + '--save-dist=[Specifies the optional directory path to copy downloaded tarballs]: :_files -/' \ + '(-U --uninstall)'{-U,--uninstall}'[Uninstalls a module from the library path]' \ + '--cascade-search[Specifies whether to cascade search when you specify multiple mirrors]' \ + '--skip-installed[Skip install if specified module is already installed]' \ + '--skip-satisfies[Skip install if specified module and version is already installed]' \ + '--verify[Verify the integrity of distribution files]' \ + '--report-perl-version[Report perl version as port of User-Agent]' \ + '--auto-cleanup[Specifies the number of days in which cpanm work directories expire]::days' \ + '--man-pages[Generate man pages for executables(man1) and libraries(man3)]' \ + '--lwp[Uses LWP module to download stuff over HTTP]' \ + '--wget[Uses GNU Wget(if available) to download stuff]' \ + '--curl[Uses cURL(if available) to download stuff]' \ + && return 0 + +# Local Variables: +# mode: Shell-Script +# sh-indentation: 2 +# indent-tabs-mode: nil +# sh-basic-offset: 2 +# End: +# vim: ft=zsh sw=2 ts=2 et