1*e7be843bSPierre Pronchery#! /usr/bin/env perl 2*e7be843bSPierre Pronchery# Copyright 2023 The OpenSSL Project Authors. All Rights Reserved. 3*e7be843bSPierre Pronchery# 4*e7be843bSPierre Pronchery# Licensed under the Apache License 2.0 (the "License"). You may not use 5*e7be843bSPierre Pronchery# this file except in compliance with the License. You can obtain a copy 6*e7be843bSPierre Pronchery# in the file LICENSE in the source distribution or at 7*e7be843bSPierre Pronchery# https://www.openssl.org/source/license.html 8*e7be843bSPierre Pronchery 9*e7be843bSPierre Proncherydie "No input files" if scalar @ARGV == 0; 10*e7be843bSPierre Pronchery$FS = ':.*##'; 11*e7be843bSPierre Proncheryprintf "\nUsage:\n make <OPTIONS> \033[36m<target>\033[0m\n"; 12*e7be843bSPierre Pronchery 13*e7be843bSPierre Proncherywhile (<>) { 14*e7be843bSPierre Pronchery chomp; # strip record separator 15*e7be843bSPierre Pronchery @Fld = split($FS, $_, -1); 16*e7be843bSPierre Pronchery if (/^[a-zA-Z0-9_\-]+:.*?##/) { 17*e7be843bSPierre Pronchery printf " \033[36m%-15s\033[0m %s\n", $Fld[0], $Fld[1] 18*e7be843bSPierre Pronchery } 19*e7be843bSPierre Pronchery if (/^##@/) { 20*e7be843bSPierre Pronchery printf "\n\033[1m%s\033[0m\n", substr($Fld[$_], (5)-1); 21*e7be843bSPierre Pronchery } 22*e7be843bSPierre Pronchery} 23*e7be843bSPierre Pronchery 24*e7be843bSPierre Proncheryprintf "\nNote: This list is not all-inclusive\n"; 25*e7be843bSPierre Pronchery 26