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 DEBIAN
me_util
grammar::me::util(3tcl) Grammar operations and usage grammar::me::util(3tcl)__________________________________________________________________________________________________________________________________________________NAME
grammar::me::util - AST utilities
SYNOPSIS
package require Tcl 8.4
package require grammar::me::util ?0.1?
::grammar::me::util::ast2tree ast tree ?root?
::grammar::me::util::ast2etree ast mcmd tree ?root?
mcmd lc location
mcmd tok from ?to?
::grammar::me::util::tree2ast tree ?root?
_________________________________________________________________DESCRIPTION
This package provides a number of utility command for the conversion between the various representations of abstract syntax trees as speci-
fied in the document grammar::me_ast.
::grammar::me::util::ast2tree ast tree ?root?
This command converts an ast from value to object representation. All nodes in the ast will be converted into nodes of this tree,
with the root of the AST a child of the node root. If this node is not explicitly specified the root of the tree is used. Existing
content of tree is not touched, i.e. neither removed nor changed, with the exception of the specified root node, which will gain a
new child.
::grammar::me::util::ast2etree ast mcmd tree ?root?
This command is like ::grammar::me::util::ast2tree, except that the result is in the extended object representation of the input
AST. The source of the extended information is the command prefix mcmd. It has to understand two methods, lc, and tok, with the
semantics specified below.
mcmd lc location
Takes the location of a token given as offset in the input stream and return a 2-element list containing the associated line
number and column index, in this order.
mcmd tok from ?to?
Takes one or two locations from and to as offset in the input stream and returns a Tcl list containing the specified part of
the input stream. Both location are inclusive. If to is not specified it will default to the value of from.
Each element of the returned list is a list containing the token, its associated lexeme, the line number, and column index,
in this order.
Both the ensemble command ::grammar::me::tcl provided by the package grammar::me::tcl and the objects command created by the package
::grammar::me::cpu fit the above specification.
::grammar::me::util::tree2ast tree ?root?
This command converts an ast in (extended) object representation into a value and returns it. If a root node is specified the AST
is generated from that node downward. Otherwise the root of the tree object is used as the starting point.
BUGS, IDEAS, FEEDBACK
This document, and the package it describes, will undoubtedly contain bugs and other problems. Please report such in the category gram-
mar_me of the Tcllib SF Trackers [http://sourceforge.net/tracker/?group_id=12883]. Please also report any ideas for enhancements you may
have for either package and/or documentation.
KEYWORDS
abstract syntax tree, syntax tree, tree
CATEGORY
Grammars and finite automata
COPYRIGHT
Copyright (c) 2005 Andreas Kupries <andreas_kupries@users.sourceforge.net>
grammar_me 0.1 grammar::me::util(3tcl)
04-09-2020
