tinycm view plugins/keygen/keygen.cgi @ rev 33
Tiny edits
| author | Paul Issott <paul@slitaz.org> |
|---|---|
| date | Mon Jan 06 21:22:04 2014 +0000 (2014-01-06) |
| parents | 5a088f7c5850 |
| children | 6dfd1c3a2fdf |
line source
1 #!/bin/sh
2 #
3 # TinyCM Plugin - Key generator
4 #
5 . /usr/lib/slitaz/httphelper
7 case " $(GET) " in
8 *\ keygen\ *)
9 d="Keygen"
10 keygen="$(GET keygen)"
11 header
12 html_header
13 user_box
14 cat << EOT
15 <h2>$(gettext "Key generator")</h2>
17 <div style="text-align: center; padding: 20px 0;">
18 <form method="get" action="$script">
19 <input type="text" name="keygen"
20 placeholder="$(gettext "Random or personal string")" />
21 <div>
22 <input type="submit" name="encryption" value="base64" />
23 <input type="submit" name="encryption" value="md5sum" />
24 <input type="submit" name="encryption" value="sha256sum" />
25 <input type="submit" name="encryption" value="sha512sum" />
26 </div>
27 </form>
28 </div>
30 <pre>
31 EOT
32 # Random key if empty string
33 if [ ! "$keygen" ];then
34 keygen="$(date +%s | md5sum | base64 | head -c 10)"
35 fi
36 case " $(GET encryption) " in
37 *\ base64\ *) echo "$keygen" | base64 ;;
38 *\ md5sum\ *) echo "$keygen" | md5sum | awk '{print $1}' ;;
39 *\ sha256sum\ *) echo "$keygen" | sha256sum | awk '{print $1}' ;;
40 *\ sha512sum\ *) echo "$keygen" | sha512sum | awk '{print $1}' ;;
41 *) gettext "Encrypted key" ;;
42 esac
43 # Random password
44 cat << EOT
45 </pre>
47 <h3>$(gettext "Random password")</h3>
49 <div>
50 <form method="get" action="$script">
51 <div>
52 <input type="hidden" name="keygen" value="passwd" />
53 <input type="submit" name="random" value="$(gettext "generate")" />
54 </div>
55 </form>
56 </div>
57 <pre>
58 EOT
60 if [ "$(GET keygen)" == "passwd" ]; then
61 < /dev/urandom tr -dc '/()?!@#$%+-_A-Z-a-z-0-9' | head -c 10; echo ""
62 #date +%s | sha256sum | base64 | head -c 10 ; echo ""
63 else
64 echo "--"
65 fi
66 echo "</pre>"
67 html_footer && exit 0 ;;
68 esac