tinycm annotate plugins/export/export.cgi @ rev 48
Bunch of small fixes and improvments
author | Christophe Lincoln <pankso@slitaz.org> |
---|---|
date | Sun Jan 19 15:53:39 2014 +0100 (2014-01-19) |
parents | 4521322899ee |
children | 9df47b19131b |
rev | line source |
---|---|
pankso@6 | 1 #!/bin/sh |
pankso@6 | 2 # |
pankso@6 | 3 # TinyCM Plugin - Export to static content |
pankso@6 | 4 # |
pankso@6 | 5 . /usr/lib/slitaz/httphelper |
pankso@6 | 6 |
pankso@28 | 7 # |
paul@33 | 8 # NOTE: Exporting wiki and making all urls work is a bit tricky and |
paul@33 | 9 # actually doesn't work as expected. The goal is to have a SliTaz codex |
paul@33 | 10 # online that can be included on the ISO, so we could have an export |
pankso@28 | 11 # including a small CGI script to simply display wiki pages via HTTPd |
pankso@28 | 12 # knowing that with HTML we must also deal with ../../ |
pankso@28 | 13 # |
pankso@28 | 14 |
pankso@6 | 15 if [ "$(GET export)" ]; then |
pankso@6 | 16 d="Export" |
pankso@6 | 17 date=$(date "+%Y%m%d") |
pankso@6 | 18 tmpdir="$tmp/export/$$/wiki-$date" |
pankso@6 | 19 header |
pankso@6 | 20 html_header |
pankso@6 | 21 user_box |
pankso@6 | 22 cat << EOT |
pankso@6 | 23 <h2>Export</h2> |
pankso@6 | 24 <p> |
pankso@28 | 25 $(gettext "EXPERIMENTAL: Export to HTML and create a tarball of your text |
pankso@28 | 26 content or plugins files.") |
pankso@6 | 27 </p> |
pankso@6 | 28 <form method="get" action="$WEB_URL"> |
pankso@6 | 29 <select name="export"> |
pankso@6 | 30 EOT |
pankso@6 | 31 for c in $(ls -1 content/) |
pankso@6 | 32 do |
pankso@6 | 33 echo "<option value="$c">$c</option>" |
pankso@6 | 34 done |
pankso@6 | 35 cat << EOT |
pankso@6 | 36 </select> |
pankso@6 | 37 <input type="submit" value="$(gettext "Export")" /> |
pankso@6 | 38 </form> |
pankso@6 | 39 EOT |
pankso@6 | 40 # Functions |
pankso@6 | 41 css_path() { |
pankso@6 | 42 # Sed CSS style path in all documents |
pankso@6 | 43 sed -i s'/style.css/..\/style.css/' */*.html |
pankso@6 | 44 sed -i s'/style.css/..\/..\/style.css/' */*/*.html |
pankso@6 | 45 sed -i s'/style.css/..\/..\/..\/style.css/' */*/*/*.html |
pankso@6 | 46 } |
pankso@6 | 47 gen_tarball() { |
pankso@6 | 48 gettext "Creating tarball"; echo -n ": " |
pankso@7 | 49 cd $tmpdir && mkdir $tiny/$cache/export |
pankso@6 | 50 # Clean cache |
pankso@7 | 51 find $tiny/$cache/export -mtime +1 | xargs rm -rf |
pankso@7 | 52 tar czf $tiny/$cache/export/$export-$date.tar.gz $export |
pankso@7 | 53 cd $tiny/$cache/export && du -sh $export-$date.tar.gz |
pankso@6 | 54 } |
pankso@6 | 55 dl_link() { |
pankso@6 | 56 gettext "Download"; echo \ |
pankso@6 | 57 ": <a href='cache/export/$export-$date.tar.gz'>$export-$date.tar.gz</a>" |
pankso@6 | 58 } |
pankso@6 | 59 # Export requested content |
pankso@6 | 60 case " $(GET export) " in |
pankso@28 | 61 *\ cloud\ *) |
pankso@28 | 62 export="cloud" |
pankso@6 | 63 tmpdir="content" |
pankso@6 | 64 echo '<pre>' |
pankso@6 | 65 gettext "Exporting:"; echo " $export" |
pankso@6 | 66 gen_tarball |
pankso@6 | 67 echo '</pre>' |
pankso@6 | 68 dl_link ;; |
pankso@28 | 69 *\ wiki\ *) |
pankso@28 | 70 export="wiki" |
pankso@6 | 71 echo '<pre>' |
pankso@6 | 72 gettext "Exporting:"; echo " $export" |
pankso@6 | 73 mkdir -p $tmpdir/$export |
pankso@6 | 74 gettext "Copying CSS style and images..."; echo |
pankso@6 | 75 cp -a style.css images $tmpdir/$export |
pankso@6 | 76 cd $content/$export |
pankso@6 | 77 for d in $(find . -type f | sed s'!./!!') |
pankso@6 | 78 do |
pankso@6 | 79 d=${d%.txt} |
pankso@28 | 80 [ "$d" == "en/help" ] && continue |
pankso@6 | 81 gettext "Exporting: "; echo "$d.txt" |
pankso@6 | 82 mkdir -p $tmpdir/$export/$(dirname $d) |
pankso@6 | 83 f=$tmpdir/$export/$d.html |
pankso@28 | 84 html_header > ${f} |
pankso@28 | 85 sed -i '/functions.js/'d ${f} |
pankso@28 | 86 sed -i '/favicon.ico/'d ${f} |
pankso@28 | 87 sed -i s'/index.cgi/index.html/'/ ${f} |
pankso@28 | 88 doc="[0-9a-zA-Z\.\#/~\_%=\?\&,\+\:@;!\(\)\*\$'\-]*" |
pankso@28 | 89 # |
paul@33 | 90 # The sed from wiki urls to html bug if there is 2 links |
pankso@28 | 91 # on same line: [test|Test] tralala [en/index|English] |
pankso@28 | 92 # |
pankso@6 | 93 cat $d.txt | wiki_parser | sed \ |
pankso@28 | 94 s"#href='\([^]]*\)?d=\($doc\)'>#href='\2.html'>#"g >> ${f} |
pankso@28 | 95 html_footer >> ${f} |
pankso@6 | 96 done |
pankso@6 | 97 cd $tmpdir/$export |
pankso@28 | 98 css_path |
pankso@6 | 99 gen_tarball |
pankso@6 | 100 rm -rf $tmp/export/$$ |
pankso@6 | 101 echo '</pre>' |
pankso@6 | 102 dl_link ;; |
pankso@48 | 103 *\ export\ ) |
pankso@48 | 104 html_footer && exit 0 ;; |
pankso@28 | 105 *) |
pankso@28 | 106 echo '<pre>' |
pankso@28 | 107 gettext "Export not yet implemented for"; echo ": $(GET export)" |
pankso@28 | 108 echo '</pre>' ;; |
pankso@6 | 109 esac |
pankso@6 | 110 |
pankso@28 | 111 html_footer && exit 0 |
pankso@6 | 112 fi |