Made some basic utilites for cross-plattform usage, as well as for unified and simplified usage.
Reused and wraped RudiC's echo_, thanks again
Code:
#
# Some tools
#
swarm.util.isRoot() { #
# Returns TRUE if user ID is 0
# Returns FALSE otherwise
if [[ ${UID:-${EUID:-0}} -eq 0 ]]
then $ECHO true
return 0
else $ECHO false
return 1
fi
}
swarm.util.isGUI() { #
# Returns TRUE if XDG_CURRENT_DESKTOP, DESKTOP_SESSION or XAUTHORITY is set
# Returns FALSE otherwise
if [[ -n "${XDG_CURRENT_DESKTOP:-${DESKTOP_SESSION:-$XAUTHORITY}}" ]]
then $ECHO true
return 0
else $ECHO false
return 1
fi
}
swarm.util.mkdir() { # /path/to/make
# Creates full path structures
#
${isRO:-false} && return 1
# Remove any possible args from ARGS
while [[ "-" == "${1:0:1}" ]] ; do shift ; done
swarm.protect "$FUNCNAME" "${@}" && return 1
# Vars
local dir_done=""
local dir_todo=$($PRINTF "${1:1}" | $SED s,"/","\n",g)
# Start pipe
$PRINTF '%s\n' "$dir_todo" | while read current
do # Prepare next dir
dir_done+="/$current"
# Create if not exist
[[ -d "$dir_done" ]] || $MKDIR "$dir_done"
done
return 0
}
swarm.util.echo() { # [-e|-n|-en|-ne] STRING
# Simple echo's, by RudiC @ unix.com
#
echo_(){
( IFS=" "; $PRINTF "%s\n" "$*" )
}
# Portable echo -n
echo_n() {
( IFS=" "; $PRINTF "%s" "$*" )
}
# Portable echo -e
echo_e() {
( IFS=" "; $PRINTF "%b\n" "$*" )
}
# Portable echo -ne
echo_ne() {
( IFS=" "; $PRINTF "%b" "$*" )
}
case "${1/-}" in
"n") shift ; echo_n "${@}" ;;
"e") shift ; echo_e "${@}" ;;
"en"|"ne")
shift ; echo_ne "${@}" ;;
*) echo_ "${@}" ;;
esac
}
swarm.util.isDir() { # /path/to/dir
# Returns true if passed string is a directory
#
[[ -d "$1" ]]
return $?
}
#
# Short variable access to util functions
# and to keep file usage to a minimum
#
isRoot=$(swarm.util.isRoot)
isGUI=$(swarm.util.isGUI)
isDir="swarm.util.isDir"
MKDIR="swarm.util.mkdir"
ECHO="swarm.util.echo"
But currently I'm still busy in re-thinking/doing the init procedure....
Well, unifying (is that a word??) the procedure of using functions to do different checks, keep/put all variables to RAM while put some essential ones (usage speed increase / customize options) in the 'rc' file.
The specific part of preparing configuration files & folders that are optional - because it must run on a Read-Only system as well, is quite more challenging than making it just in a "must-be-installed" way.
Also, with my... crazy... idea of implementing an optional ramdisk support (as root, for configuration and tempfiles only) didnt make the init procedure any easier.
Further, I need to 'bypass' the (so far hardcoded) use of /root because not all systems have it, thus I have to place the configfile (swarmrc) in another place, like using '/etc' if root has no $HOME.
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)
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)
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)
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)
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)
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)
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)
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
LEARN ABOUT MOJAVE
inline::wrapper::module5.18
Inline::Wrapper::Module(3) User Contributed Perl Documentation Inline::Wrapper::Module(3)NAME
Inline::Wrapper::Module - Internal object wrapper for individual Inline modules.
SYNOPSIS
use Inline::Wrapper::Module;
DESCRIPTION
Inline::Wrapper::Module is used internally by Inline::Wrapper, and should not be used directly. It will croak if you attempt to do so.
It is a descendent class of Inline::Wrapper.
METHODS
new()
Takes the same arguments as "new()" in Inline::Wrapper, but also requires a module_name and lang_ext argument.
Don't use this. It will croak if you try to use it directly.
initialize()
Initialize the object instance.
DESTROY()
Destructor to clean up the object instance, and wipe the private code module namespace created when binding the symbol list.
INHERITANCE
As Inline::Wrapper::Module is an inherited class from Inline::Wrapper, all methods that apply to the base class also apply to objects of
this class.
However, note that this has the following effects, due to the semantics of the load()/run() steps:
auto_reload settings vs. when method effects take place:
auto_reload value: | FALSE TRUE
--------------------+------------------------------------------
set_base_dir() | no effect after next reload / run()
set_language() | no effect after next reload / run()
add_language() | no effect after next reload / run()
Please read through "load()" in Inline::Wrapper and "run()" in Inline::Wrapper for insight into why the implementation works like this.
SEE ALSO
Inline::Wrapper
The Inline documentation.
The Inline-FAQ list.
The examples/ directory of this module's distribution.
AUTHOR
Please kindly read through this documentation and the examples/ thoroughly, before emailing me with questions. Your answer is likely in
here.
Also make sure that your issue is actually with the Inline::Wrapper modules, and not with Inline itself.
Jason McManus (INFIDEL) -- "infidel AT cpan.org"
LICENSE
Copyright (c) Jason McManus
This module may be used, modified, and distributed under the same terms as Perl itself. Please see the license that came with your Perl
distribution for details.
perl v5.18.2 2010-03-10 Inline::Wrapper::Module(3)
04-09-2020
