#!/usr/bin/env php
<?php
// 
// This script license is GPLv2.
//
//--- From pukiwiki source ----------------------------------------------//
// Encode page-name
function encode($key)
{
  return ($key == '') ? '' : strtoupper(bin2hex($key));
  // Equal to strtoupper(join('', unpack('H*0', $key)));
  // But PHP 4.3.10 says 'Warning: unpack(): Type H: outside of string in ...'
}

// Decode page name
function decode($key)
{
  return hex2bin($key);
}

// Inversion of bin2hex()
function hex2bin($hex_string)
{
  // preg_match : Avoid warning : pack(): Type H: illegal hex digit ...
  // (string)   : Always treat as string (not int etc). See BugTrack2/31
  return preg_match('/^[0-9a-f]+$/i', $hex_string) ?
    pack('H*', (string)$hex_string) : $hex_string;
}

//--- End of pukiwiki source -------------------------------------------//

function getKey($url){
  $c = stripos($url, "?");
  if ($c == FALSE)
    return;
  return substr($url, $c+1);
}

function getFilename($url){
  $url = rawurldecode($url);
  return encode(getKey($url));
}

function testFunc($url, $ans){
  $res = getFilename($url);
  if ($res != $ans)
    printf("B: %s\n  res:%s\n  ans:%s\n", $url, $res, $ans);
}

function http_get($url, $proxyhost=null){
  $curl = curl_init($url);

  curl_setopt($curl, CURLOPT_HTTPGET, true);
  curl_setopt($curl, CURLOPT_RETURNTRANSFER, true);
  curl_setopt($curl, CURLOPT_FOLLOWLOCATION, true);
  curl_setopt($curl, CURLOPT_HEADER, false);
  curl_setopt($curl, CURLOPT_POST, false);

  if ($proxyhost != null){
    curl_setopt($curl, CURLOPT_PROXYTYPE, CURLPROXY_HTTP);
    curl_setopt($ch, CURLOPT_PROXY, $proxyhost);
  }

  $ret = curl_exec($curl);
  curl_close($curl);

  return $ret;
}

function getList($url, $proxyhost=null){
  $body =  http_get($url, $proxyhost);

  preg_match_all("/\<li\>\<a href=\"(.+?)\"\>(.+?)<\/a>/", $body, $list);
  return ($list[2]);
}

if (sizeof($argv) < 2){
  echo "USAGE:". $argv[0] ."  <pukiwiki-url>\n";
  exit(0);
}

$wikiurl = $argv[1];
echo "Get from :".$wikiurl."\n";
$listurl = $wikiurl."?cmd=list";

$list = getList($listurl);

foreach ($list as $key){
  $url = $wikiurl . "?cmd=edit&page=". rawurlencode($key) ;

  $body = http_get($url);
#  preg_match_all("/style=\"display:none\"\>(.+?)\<\/textarea/smi", $body, $text);
  preg_match_all("/\<textarea name=\"msg\" rows=\"20\" cols=\"80\"\>(.+?)\<\/textarea/smi", $body, $text);
  $file = encode($key).".txt";
  echo "File: ". $file ."\n";
  $fp = fopen($file, "w");
  $l = mb_convert_encoding($text[1][0], "EUC-JP", "UTF-8");
  fwrite($fp, html_entity_decode($l));
}

?>