<?php i18n_http_output("SJIS"); ?>
<?php 
    
/*    PHP Test#05 : Talk SSTP
        Programmed by FUKAYA Takashi 2001.01.03-

    */

    
include "ftsstp.php3";

    
// ==================== PHP DEFINES ====================


    // ==================== PHP FUNCTIONS ====================

    // 変数一覧を表示(デバッグ用)
    
function prtvars() {
        echo 
"<HR>\n";
        echo 
"<B>変数一覧 (" count($GLOBALS) . ")</B><BR>\n";
        
reset$GLOBALS );
        while( list( 
$key$value ) = each$GLOBALS ) ) {
               echo 
"$key = $value<br>\n";
        }
         echo 
"<HR>\n";
    } 

    
// ==================== PHP STARTUP CODE ====================
//    $dbmid = dbmopen ("dbmemo.dbm", "w");


    
if ( $Submit == "発言する" && $txtMsg != "" ) {
        
// 発言する (SSTPリクエスト)
        
$msg "";
        if ( 
$rbTalker != "" $msg .= "\\" $rbTalker;
        if ( ((int)
$selSerface)>=$msg .= "\\s" $selSerface;

        
$msg .= stripslashes($txtMsg);

        
$sstp = new FTSSTP();
        
$result $sstp->Send($msg);

        
$resultStr $sstp->lastresult;

        include 
"talksstp_lm.php3";
    }


?>


<html lang="ja">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=Shift_JIS">
<META content=F/T,深谷崇,PHP,PHP3,偽春菜,SSTP,何か。 name=keywords>
<META content=SSTPによる偽春菜制御実験 name=description>
<link rev="made" href="mailto:fukaya@dokokano.com">
<title>PHP TEST#05 : Talk SSTP</title>
</head>

<body bgcolor="#000000" text="#ffffff" topmargin="0" link="#9999FF" vlink="#FF66FF" alink="#CCCCFF">

<!-- 本文 --> 




        
<div align="center"> 
  <table width="360" border="0" background="bgTile05r.gif" height="120" >
    <tr valign="middle"> 
      <td> 
        <h1 align="center">PHP TEST#05<BR>
          Talk SSTP</h1>
    </tr>
  </table>
  
  <p>SSTPでお手元の 何か。(仮) をしゃべらせます。<br>
    SSTP Classのテスト<br>
    <?php 
    $tm 
time();
    echo 
"(ただいまの時刻は " date("Y/m/d H:i:s",$tm) . ")"
  
?> </p>
</div>

<div align="center">
    <form method="post" action="">

        <?php if ( $msg != "" ) { ?>        
        <table border="0" width="90%">
            <tr bgcolor="#666666">
                <td colspan="2"><font size="-1">前回の発言内容</font></td>
            </tr>
            <tr bgcolor="#333333">
                <td width="20%"><font size="-1">内容</font></td>
                <td><font size="-1"><pre><?php echo $msg ?></pre></font></td>
            </tr>
            <tr bgcolor="#333333">
                <td width="20%"><font size="-1">結果コード</font></td>
                <td><font size="-1">
                <?php 
                    
echo $result " (";
                    switch ( 
$result ) {
                    case -
1: echo "接続失敗 - 偽春菜が起動してない、Firewallの中などが原因とおもわれます"; break;
                    case -
2: echo "不正応答 - 接続はできましたが、SSTPのものではない応答が返ってきました"; break;
                    case 
200: echo "成功"; break;
                    default: echo 
"エラー - $resultStr"; break;
                    }
                    echo 
")";
                
?>
                </font></td>
            </tr>
        </table>


        <br>
        <table width="70%" border="0" bgcolor="#333333" cellpadding="0" cellspacing="0">
            <tr>
                <td width="50%" bgcolor="#000000"> </td>
                <td nowrap>
                    <p><font size="-1">&lt;?php<br>
                            // FTSSTP利用サンプル<br>
                            include "<a href="ftsstp.phps">ftsstp.php3</a>";<br>
                                    $sstp = new FTSSTP();<br>
                            $result = $sstp->Send(&quot;<?php echo $msg ?>&quot;);<br>
                        ?&gt;
</font>                        
                    </p>
                </td>
            </tr>
        </table>
        
        <br>
        <?php ?>

        <table border="0" width="90%">
            <tr bgcolor="#666666">
                <td colspan="2"><font size="-1">発言内容</font></td>
            </tr>
            <tr bgcolor="#333333">
                <td width="20%"><font size="-1">内容</font></td>
                <td>
                    <font size="-1">
                    <textarea name="txtMsg" cols="64" rows="2"><?php echo stripslashes($txtMsg?></textarea>
                    <br>
                    (\eタグは不要です)
                </font></td>
            </tr>
            <tr bgcolor="#333333">
                <td width="20%"><font size="-1">発言者</font></td>
                <td>
                    <font size="-1">
                    <input type="radio" name="rbTalker" value="">
                    未指定 
                    <input type="radio" name="rbTalker" value="h" checked>
          偽春奈  
          <input type="radio" name="rbTalker" value="u">
                    うにゅう 
                    
                    
                </font></td>
            </tr>
            <tr bgcolor="#333333">
                <td width="20%"><font size="-1">サーフェイス</font></td>
                <td>
                    <font size="-1">
                    <select name="selSerface">
                        <option value="-1" selected>(未指定)</option>
                        <option value="0">0:通常</option>
                        <option value="1">1:どきどき</option>
                        <option value="2">2:びっくり</option>
                        <option value="3">3:ふあん</option>
                        <option value="4">4:がっくり</option>
                        <option value="5">5:(通常)</option>
                        <option value="6">6:まばたき</option>
                        <option value="7">7:ぷんぷん</option>
                        <option value="8">8:おいおい</option>
                        <option value="9">9:?</option>
                    </select>
                </font></td>
            </tr>
        </table>    <br>
        
        <input type="submit" name="Submit" value="発言する">
    </form>
    <br>
    
    <table width="90%" border="0">
        <tr>
            <td>
                
        <div align="right"><a href="./">戻る</a></div>
            </td>
        </tr>
        <tr>
            
      <td> <font size="-1">● 「何か。(仮)」関連リンク<br>
        さくらみかげ (ここでダウンロードできます)<br>
                 
                 <a href="http://sakura.tomoyo.mikage.to:8080/">http://sakura.tomoyo.mikage.to:8080/</a><br>
                スクリプトリファレンス (発言内容中のメタ文字仕様)<br>
                 
<a href="http://sakura.tomoyo.mikage.to:8080/sakurascript.html">http://sakura.tomoyo.mikage.to:8080/sakurascript.html    </a><br>
                SSTPプロトコル通信 (このプロトコルで通信しています)<br>
                 <a href="http://sakura.tomoyo.mikage.to:8080/sstp.html">http://sakura.tomoyo.mikage.to:8080/sstp.html</a>                

                </font>                        </td>
        </tr>
    </table>
    
    <br>
    




<!-- 本文終端 --> 


<?php 
    
if ( $debug prtvars();
    if ( 
$src ) {
        echo 
"phps作成 結果:" copy"talksstp.php3" "talksstp.phps" )  . "," copy"ftsstp.php3" "ftsstp.phps" );
    } 
?>
<BR>

</div>



<BR>

<div>
<table align="center" background="bgCir01.gif" width="90%" border="0" cellspacing="0" >
        <tr><td height="3" bgcolor="#ff0000" ></td></tr>
        <tr>
      <td align="right" > <font size="-1" color="#ff0000"> <a href="http://www.dokokano.com/ftlabo/"><img src="linkFTLabo01.gif" align="right" height="31" width="88" hspace="0" vspace="0" border="0"></a> 
        PHP TEST#05 : Talk SSTP [2001/01/03]&nbsp;&nbsp;<BR>
            Programmed by FUKAYA Takashi(F/T)&nbsp;&nbsp;<BR><BR>
            </font>
        </td></tr>

        </table>
        <div align="right">
            <SCRIPT Language="JavaScript">
            <!--
            document.write("<img src='http://www.dokokano.com/cgi-bin/ftcount.cgi?dokokanoFTLaboTest05:"+document.referrer+"' height='1' width='32'");
            // -->
            </SCRIPT>
        </div>
</div>

<?php
    
// ==================== PHP TARMINATE CODE ====================
//    dbmclose ($dbmid);
    


?>

</body>
</html>