Sponsored Content
Top Forums Shell Programming and Scripting Blog-Thread: Creating a Shell Wrapper and Runtime Modifier (SWARM) Post 303046071 by sea on Wednesday 22nd of April 2020 09:16:18 PM
Old 04-22-2020
Since preparing 'translatable' strings for functions is boring, I thought I'd implement some more functions from TUI.

What does one need, when one wants cross-platform-compatible scripts?
A way to reckognize and differ them of course!
Code:
	swarm.os.desktop() { #
	# Returns the name of the DE/WM or terminal application name
	# Assigned to: $DESKTOP
		$PRINTF '%s\n' "${XDG_CURRENT_DESKTOP:-${DESKTOP_SESSION:-${TERM:-TTY}}}"
	}
	swarm.os.distro() { #
	# Returns the name of the distro
	# Assigned to: $DISTRO
        	# This /etc is not as dynamic as I'd like
        	# but its THE absolute standard - as far as I'm aware
        	if [[ ! -f "/etc/os-release" ]] || ! $GREP -E  ^NAME= "/etc/os-release"  | $SED s,"NAME=","",g >&1 
		then	local e=/etc
			local SF="release version"    # Search For

			local results=$(for a in $SF;do \ls "$e"|"$GREP" "$a";done)
			local resultsFiles=$(for each in $results;do [[ -f "$e/$each" ]] && $PRINTF "$each ";done)

			for each in $resultsFiles
			do      strcat="$($GREP -i ^NAME= $e/$each)"
				[[ -n "$strcat" ]] && break
				strcat="$($GREP -i ^id= $e/$each)"
				[[ -n "$strcat" ]] && break
			done
			$PRINTF "${strcat/*=}"|$SED s,'\"','',g
		fi
	}
	swarm.os.based() { #
	# Returns arch, debian, redhat or unknown
	# Assigned to: $BASED
    		out=""
		if [[ -f /etc/redhat-release ]]
		then	out=redhat
		elif [[ -f /etc/arch-release ]]
		then	out=arch
		elif [[ -f /etc/debian_version ]]
		then	out=debian
		else	out=unknown
			# Do further checking
			# Changes according to: https://github.com/icy/pacapt/blob/ng/pacapt (153-180)
			swarm.util.which cave   1>/dev/null 2>/dev/null && out=exherbo
			swarm.util.which emerge 1>/dev/null 2>/dev/null && out=gentoo
			swarm.util.which port   1>/dev/null 2>/dev/null && out=mac
			swarm.util.which brew   1>/dev/null 2>/dev/null && out=mac
			swarm.util.which zypper 1>/dev/null 2>/dev/null && out=opensuse
			# Not sure if i handle these 2 properly
			swarm.util.which pkg 1>/dev/null 2>/dev/null && out=openbsd
			swarm.util.which pkgng 1>/dev/null 2>/dev/null && out=freebsd
		fi
		builtin echo "$out"
	}
	DISTRO="$(swarm.os.distro)"
	DESKTOP="$(swarm.os.desktop)"
	BASED="$(swarm.os.based)"

If you happen to have any recomended additions or changes, please, let me know so.
Have fun! Smilie

Last edited by sea; 04-23-2020 at 11:50 AM.. Reason: code fix for swarm.os.distro
 

9 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

korn shell version at runtime?

How can I check what kornshell version I am using at runtime from within a kornshell script? (3 Replies)
Discussion started by: qanda
3 Replies

2. Shell Programming and Scripting

crontab is not creating runtime files which are in script..

this is the output i am getting here.. cp: cannot create /wls_domains/eoigw/eoigwsA/deliv/cron/MailingScript/eoigwsA_Health_Status_Report.html: Permission denied /wls_domains/eoigw/eoigwsA/deliv/cron/MailingScript/ /wls_domains/eoigw/eoigwsA/deliv/cron/MailingScript/GenerateReport.sh:... (6 Replies)
Discussion started by: surekha268
6 Replies

3. Shell Programming and Scripting

Korn Shell Wrapper script

Hi Guys, I am trying write a wrapper script but I don't have any idea. I have 4 different korn shell scripts and all of them needs some parameters from command line (positional parameter). My script cant be interactive because its supposed to be automated. I am confused how can I write a wrapper... (6 Replies)
Discussion started by: pareshan
6 Replies

4. Web Development

Creating a blog site on a local computer

Hello! I would like to create a blog website on a web domain of mine. The blog will be used for publishing economics-lated articles. I tried to use a few open source packages for blog creation (WorldPress, b2evolution, Movable type) which I wanted to test on a local computer before arranging... (5 Replies)
Discussion started by: degoor
5 Replies

5. Programming

creating multiple threads using single thread id

Hi all, Can I create multiple threads using single thread_id like pthread_t thread_id; pthread_create(&thread_id, NULL, &print_xs, NULL); pthread_create(&thread_id, NULL, &print_ys, NULL); pthread_create(&thread_id, NULL, &print_zs, NULL); pthread_join(thread_id, NULL); what... (2 Replies)
Discussion started by: zing_foru
2 Replies

6. Shell Programming and Scripting

Shell Runtime Statistics

Hi, I am trying to capture runtime stats of a shell script (c shell). Are there system variables to call? Or should I create a date variable at the start of the script and at the end of the script? I am trying to capture the time if the script stops or ends with error. Please help. ... (4 Replies)
Discussion started by: CKT_newbie88
4 Replies

7. Shell Programming and Scripting

Wrapper Script in Perl Or shell

Hello, My requirement is based on Oracle where we run a perl script and it asked some questions.I want to write a wrapper which will answer all these questions. How is it possible. Thanks (16 Replies)
Discussion started by: cotton
16 Replies

8. Homework & Coursework Questions

Shell Script average runtime

Use and complete the template provided. The entire template must be completed. If you don't, your post may be deleted! 1. The problem statement, all variables and given/known data: Make a bash script that calculates average runtime for the first two scripts you made. The average should be... (17 Replies)
Discussion started by: navlelo
17 Replies

9. Shell Programming and Scripting

Shell Script and Progress Bar or GUI Wrapper

Hi, I have shell script that I am running under Ubuntu as root. Is it possible to hide the command window and show the user some sort of progress /random progress bar / or other form of GUI interaction? On MAC, I have been using Platypus but on Ubuntu I am not sure what to do. (4 Replies)
Discussion started by: naveedanwar4u
4 Replies
Locale::Script(3)					User Contributed Perl Documentation					 Locale::Script(3)

NAME
Locale::Script - standard codes for script identification SYNOPSIS
use Locale::Script; $script = code2script('phnx'); # 'Phoenician' $code = script2code('Phoenician'); # 'Phnx' $code = script2code('Phoenician', LOCALE_CODE_NUMERIC); # 115 @codes = all_script_codes(); @scripts = all_script_names(); DESCRIPTION
The "Locale::Script" module provides access to standards codes used for identifying scripts, such as those defined in ISO 15924. Most of the routines take an optional additional argument which specifies the code set to use. If not specified, the default ISO 15924 four-letter codes will be used. SUPPORTED CODE SETS
There are several different code sets you can use for identifying scripts. A code set may be specified using either a name, or a constant that is automatically exported by this module. For example, the two are equivalent: $script = code2script('phnx','alpha'); $script = code2script('phnx',LOCALE_SCRIPT_ALPHA); The codesets currently supported are: alpha, LOCALE_SCRIPT_ALPHA This is a set of four-letter (capitalized) codes from ISO 15924 such as 'Phnx' for Phoenician. It also includes additions to this set included in the IANA language registry. The Zxxx, Zyyy, and Zzzz codes are not used. This is the default code set. num, LOCALE_SCRIPT_NUMERIC This is a set of three-digit numeric codes from ISO 15924 such as 115 for Phoenician. ROUTINES
code2script ( CODE [,CODESET] ) script2code ( NAME [,CODESET] ) script_code2code ( CODE ,CODESET ,CODESET2 ) all_script_codes ( [CODESET] ) all_script_names ( [CODESET] ) Locale::Script::rename_script ( CODE ,NEW_NAME [,CODESET] ) Locale::Script::add_script ( CODE ,NAME [,CODESET] ) Locale::Script::delete_script ( CODE [,CODESET] ) Locale::Script::add_script_alias ( NAME ,NEW_NAME ) Locale::Script::delete_script_alias ( NAME ) Locale::Script::rename_script_code ( CODE ,NEW_CODE [,CODESET] ) Locale::Script::add_script_code_alias ( CODE ,NEW_CODE [,CODESET] ) Locale::Script::delete_script_code_alias ( CODE [,CODESET] ) These routines are all documented in the Locale::Codes::API man page. SEE ALSO
Locale::Codes The Locale-Codes distribution. Locale::Codes::API The list of functions supported by this module. http://www.unicode.org/iso15924/ Home page for ISO 15924. http://www.iana.org/assignments/language-subtag-registry The IANA language subtag registry. AUTHOR
See Locale::Codes for full author history. Currently maintained by Sullivan Beck (sbeck@cpan.org). COPYRIGHT
Copyright (c) 1997-2001 Canon Research Centre Europe (CRE). Copyright (c) 2001-2010 Neil Bowers Copyright (c) 2010-2013 Sullivan Beck This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. perl v5.16.3 2013-06-03 Locale::Script(3)
All times are GMT -4. The time now is 10:06 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy