ronan / scripts_pub

Commit ad7eb5fb911452febe4b2e24f42097e730474193

Authored by root over 8 years ago

Exists in master

5b41ddd2-1859-447b-8f3a-2c2b760a6b95

Showing 3 changed files with 138 additions and 11 deletions

README.md
functions.inc
functions.inc.asc

...	...	@@ -34,8 +34,8 @@
34	34	3bc9fd6d5d92c84c6b7672ee1db4e9f97c3bf34eb9176c6ca393a29e2bb9b311 ronan@quennec.fr.gpg
35	35	0694b4cff027ac727eaad1ce9cac481c10d542d3375f03a220bd7a0312d7800a syllabes.sh
36	36	df2dfd675abb0742ff838fe0467776f3c1d06c6829bfd905dbd663356640c18a syllabes.sh.asc
37		-c30a4343a66aeef47c6bd6a9dfefa3e0d618e8c960a64878d643bdb3378eb936 functions.inc
38		-afa9d91fac7b8317c47d18f054f512107cd5034de4c69b5672962e6b1d564103 functions.inc.asc
	37	+5946130e2b8ec21c03af713705264f5d2be6312263a0c83fea56145a975144f0 functions.inc
	38	+8a25429706cee8d2de47cee059b25cfebc58ec63b205c75b9d0e6907e50a7c1b functions.inc.asc
39	39	5b745b2c7897c0c07bd33d7467adb837588bd412d4eea107b758586e2c0522b2 fibonacci.php
40	40	2b917506ec9732c1272df4345a16bfecd0dce54754fd7c40eb7830a3653a4818 fibonacci.php.asc
41	41	d41722d8fb508f584b063d7bf0e8d1c19a119d62deba46245f8afdd4766ef391 fibonacci.py

...	...	@@ -87,7 +87,7 @@
87	87	typeset VAR=("$@")
88	88	if empty ${VAR[*]}; then
89	89	return 1
90		- elif [ ${#VAR[*]} -ge 1 ]; then
	90	+ elif [ ${#VAR[*]} -gt 1 ]; then
91	91	return 0
92	92	else
93	93	return 1
94	94
...	...	@@ -396,11 +396,138 @@
396	396	#
397	397	# RETOUR
398	398	# ======
399		- # Retourne la valeur sans les espaces à gaucheet à droite et le code retour 0.
	399	+ # Retourne la valeur sans les espaces à gauche et à droite et le code retour 0.
400	400	#
401	401	typeset VAR="$1"
402	402	VAR=$(ltrim "$VAR")
403	403	VAR=$(rtrim "$VAR")
404	404	echo "$VAR" && return 0
	405	+}
	406	+
	407	+gettype(){
	408	+ # Retourne le type de la variable.
	409	+ #
	410	+ # Les typespouvant être retournés (Par ordre de détermination)
	411	+ # 0 - empty
	412	+ # 1 - booléen
	413	+ # 2 - integer
	414	+ # 3 - double
	415	+ # 4 - array
	416	+ # 5 - string
	417	+ #
	418	+ # EXECUTION
	419	+ # =========
	420	+ # gettype "$var"
	421	+ #
	422	+ # RETOUR
	423	+ # ======
	424	+ # Retourne le type de la variable et le code retour 0.
	425	+ #
	426	+ if empty "$1"; then
	427	+ echo "empty"
	428	+ elif is_bool "$1"; then
	429	+ echo "boolean"
	430	+ elif is_int "$1"; then
	431	+ echo "integer"
	432	+ elif is_float "$1"; then
	433	+ echo "double"
	434	+ elif is_array "$@"; then
	435	+ echo "array"
	436	+ else
	437	+ echo "string"
	438	+ fi
	439	+ return 0
	440	+}
	441	+
	442	+abs(){
	443	+ # Retourne la valeur absolue du nombre "$var".
	444	+ #
	445	+ # EXECUTION
	446	+ # =========
	447	+ # abs "$var"
	448	+ #
	449	+ # RETOUR
	450	+ # ======
	451	+ # Retourne la valeur absolue et le code retour 0.
	452	+ # Ou 0 et le code retour 1 en cas d'erreur
	453	+ #
	454	+ if is_numeric "$1"; then
	455	+ typeset VAR=$(sed "s/^-//g" <<< "$1")
	456	+ echo "$VAR" && return 0
	457	+ fi
	458	+ echo 0 && return 1
	459	+}
	460	+
	461	+ceil(){
	462	+ # Retourne la valeur arrondie à l'entier supérieur
	463	+ #
	464	+ # EXECUTION
	465	+ # =========
	466	+ # ceil "$var"
	467	+ #
	468	+ # RETOUR
	469	+ # ======
	470	+ # Retourne la valeur arrondie à l'entier supérieur et le code retour 0.
	471	+ # Ou 0 et le code retour 1 en cas d'erreur
	472	+ #
	473	+ if is_numeric "$1"; then
	474	+ typeset VAR=$(sed "s/\.0*$//g" <<< "$1")
	475	+ typeset ENT=$(intval "$VAR")
	476	+ if [ $(calcul "$VAR<0") -eq 1 ]; then
	477	+ VAR="$ENT"
	478	+ fi
	479	+ if is_float "$VAR"; then
	480	+ VAR=$(calcul "$ENT+1")
	481	+ fi
	482	+ echo "$VAR"
	483	+ return 0
	484	+ fi
	485	+ echo 0 && return 1
	486	+}
	487	+
	488	+floor(){
	489	+ # Retourne la valeur arrondie à l'entier inférieur
	490	+ #
	491	+ # EXECUTION
	492	+ # =========
	493	+ # floor "$num"
	494	+ #
	495	+ # RETOUR
	496	+ # ======
	497	+ # Retourne la valeur arrondie à l'entier inférieur et le code retour 0.
	498	+ # Ou 0 et le code retour 1 en cas d'erreur
	499	+ #
	500	+ if is_numeric "$1"; then
	501	+ typeset VAR=$(sed "s/\.0*$//g" <<< "$1")
	502	+ typeset ENT=$(intval "$VAR")
	503	+ if [ $(calcul "$VAR<0") -eq 1 ]; then
	504	+ VAR=$(calcul "$ENT-1")
	505	+ fi
	506	+ if is_float "$VAR"; then
	507	+ VAR="$ENT"
	508	+ fi
	509	+ echo "$VAR"
	510	+ return 0
	511	+ fi
	512	+ echo 0 && return 1
	513	+}
	514	+
	515	+fmod(){
	516	+ # Retourne le reste de la division
	517	+ #
	518	+ # EXECUTION
	519	+ # =========
	520	+ # fmod "$num1" "$num2"
	521	+ #
	522	+ # RETOUR
	523	+ # ======
	524	+ # Retourne le reste de la division et le code retour 0.
	525	+ # Ou 0 et le code retour 1 en cas d'erreur
	526	+ #
	527	+ if is_numeric "$1" && is_numeric "$2"; then
	528	+ calcul "scale=0; $1%$2"
	529	+ return 0
	530	+ fi
	531	+ echo 0 && return 1
405	532	}

1	1	-----BEGIN PGP SIGNATURE-----
2	2	Version: GnuPG v1
3	3
4		-iQEcBAABAgAGBQJV7URzAAoJEIgCKezOqEu6wscH/iiyzfQif5MltRLWy0I9q9CZ
5		-UIKk0v73Xhj7Xh5NRtJp7r9hgk1kSwVPAvBXTJJDLNhNQ8xN5WodMFGQn701SPk2
6		-wEGBMaimPu3KtczeW7zcsIZOc10YQ/k1J6Ovkj/aUlKDX8FzbTLfmJWF+hjI7OcW
7		-cYHwjzIK5WvPjzzfA8EsHxrsEhLI0LmVaLzcnGWuRGLLaG1ImzzB0VGycf2PHlQL
8		-eoSjx8G0p7LDevHLNlndBPlHlpiEFDFgHX6OFhj6tJjcjwpWxcbOxOqhGuxZw/Nu
9		-RLuI2TBh3iBu1s8rZNrX5gfrWqzWYZrYw1P7vkZWupNEqI77RlE6DtpgXCGiLJg=
10		-=IW1q
	4	+iQEcBAABAgAGBQJV7bn2AAoJEIgCKezOqEu61a0H/jnt3r2nxnfvREpnPZqkBhc1
	5	+/nISaHlUuiR78QFknpeCIE87fb9eumR66ddGyJf7GtsVeyFLgIzQQV51Hrp9SLKH
	6	+HHHBGo7OsNM1uXg0aNhicNksyHx7xvkjc8XQ7eR7BeajPIajhZAYJvuZPiepnUFJ
	7	+IPSdTE0jzjMSROyDetoAcRlwVYcwmtrCkL+g8QGy19E9XiTyfbZTeb8bOG0/x/DP
	8	+7faMTwPYrJ13Md7uCTGOFjxAFdHm+fI52H6Yt+y9a516GIgvhF+f2nVY5CKxy6Dn
	9	+yfvr98gx558MOsq/bzmgKJfIQV7p7v1Fn9ag7/W7qjk6whdNiwCtLw2tuA/yXew=
	10	+=8lQa
11	11	-----END PGP SIGNATURE-----