Moodle開発者フォーラム

　いま，この一括ダウンロードの機能をfs_moodleにも組み込もうとしています．

　いいですね，これはなかなか．クイック評定を行なうだけでなく，学生がアップロードしたファイルのバックアップを取るのにも使えます（スナップショット的にも）．

　少し気になったのはダウンロードするファイル名です．
　いまはsubmission.zipで統一されていますよね．

　ここのところは好みがあるかとは思いますが，

//      header("Content-Disposition: attachment; filename=submission.zip");
        header('Content-Disposition: attachment; filename="'.convert_download_filename_encoding($assignment->name).'.zip"');  // T.Shirai

のように，当方の環境では$assigment->name＋".zip"にしてみました．沢山の課題を次から次へと一括ダウンロードする際に，ファイル名を一つ一つ変える手間が省けます．

　なお，convert_download_filename_encoding()は自作の関数です．少しずつ改良を加え，いまはこのような関数になっています．

// ブラウザに合わせてダウンロードファイル名のフォーマットを変更する
function convert_download_filename_encoding($filename) {
    // Windowsでは使用できない半角文字をアンダーバーに置き換える
    $filename = mb_ereg_replace('[<>"\|:\\/\*\?]', '_', $filename);

    if (check_browser_version('MSIE')) {
        if (strlen(rawurlencode($filename)) > 21 * 3 * 3) {
            $filename = mb_convert_encoding($filename, "SJIS-WIN", "UTF-8");
            $filename = str_replace('#', '%23', $filename);
        } else {
            $filename = rawurlencode($filename);
        }
    } else if (check_browser_version('Safari')) {
        $filename = "";
    }
    return $filename;
}

課題の名前に，':'などを使っているとダウンロードしたファイル名がおかしくなる（化ける訳ではなく，短くなる）ので，それらはアンダーバーに変換しています．

　あぁ，いま気付きましたが，上記の変更だけではSafariは仲間外れ（submission.zipでダウンロードされる）ですね．

＃このディスカッショントピックは非常に長くなってしまい読みにくいので，本件だけ独立するようにトピックスを分割してよろしいでしょうか？

　高度なアップロードの場合，

            $sql = 'FROM '.$CFG->prefix.'user u '.
            'LEFT JOIN '.$CFG->prefix.'assignment_submissions s ON u.id = s.userid AND s.assignment = '.$this->assignment->id.' '.
            'WHERE s.numfiles > 0 AND u.id IN ('.implode(',', $users).') ';

ここで条件に加えている，s.numfiles が，データベースを見てみると（ファイルをアップロードしているにも関わらず）ゼロですね．それでヒットしないようですね．

mdl_assignment_submissionsのレコードは，

• id: 各提出毎に割り振られるidなので非常に大きな数．
• assignment：これが課題の識別に使われるidで同じ課題ならば同じ番号
• userid：その課題を提出した学生のuserid
• timecreated：初めて提出した日時
• timemodified：修正した日時
• numfiles：本来ならばこれが提出されたファイルの数を表すと期待される．
• data1：謎．空欄．
• data2：高度なアップロードで，”下書き”の時は空欄．”提出”したら'submitted'になる．
• grade: 評価点
• submissioncomment：コメント
• format：良く分からないが，”下書き”なのにファイルが一つもない学生（削除した？）は0, それ以外は全て 1．
• teacher： 教師のユーザid．コメントを記入した教師の識別かな？
• timemarked: 多分，コメントを記入した日時でしょうねぇ．
• mailed：教師へのメールか，学生へのメールか，formatが1ならばこれも1，0ならば0．

といったところです．numfilesが（我々の期待する）使われ方をしていないのが気になります．パッと調べた感じでは，”単一ファイルのアップロード”の場合はともかく，”高度なファイルのアップロード”の場合，numfilesを使っては期待した効果が得られなさそうです．

　選択肢は２つあります．

1. formatが1のレコードのみ抽出してアーカイブを作製する．
2. formatが何だろうと，mdl_assignment_submissionにレコードが登録されている以上，”下書き”してから全て消した，ことも情報として含めてアーカイブを作成する．（ただし，その場合は提出課題のtempフォルダへのコピーの際にファイルがコピーできなくてもエラーは出さないようにしないといけない）

個人的には１を選択します．

福山です

開発版の方はメール購読されていなかったためにすっかり見落しておりました。

＞ 課題によっては「申し訳ございません。ファイルが見つかりませんでした。」というエラーになります。
＞ 「課題名」に「+」と「&」が含まれるとこうなる、というところまでつきとめました。

調査した感じで、従来版では常にsubmission.zipとしていたものが(日付)+課題名.zipとなった部分で挙動が乱れているようです。zipの作成をzip_files関数に投げるように変更されていますが、これによりzip_files関数内のclean_filename関数が呼ばれる事になります。これにより多くの文字がアンダーバーに置き換わってzipされますが(ご指摘の「+
」「&」などの他に「()かっこ」なども置き換わります)、元の変数が加工されていない為に copy($zippath, $tmpzippath); が失敗します。

        $zipbasename = mb_ereg_replace('[<>"\|:\\/\*\? ]', '_', $assignment->name);
        $zipbasename = mb_ereg_replace('_+', '_', $zipbasename);
        $zipname     = date("Ymd").'_'.$zipbasename.'.zip';
        $zippath     = $tmpdir.'/'.$zipname;

従いましてこの辺りのコードで行っているアンダーバーの変換はclean_filename関数に投げればそちらで整形されますから、この関数を使ってみてはいかがでしょうか

        $zipbasename = clean_filename($assignment->name);
        // $zipbasename = mb_ereg_replace('[<>"\|:\\/\*\? ]', '_', $assignment->name);
        // $zipbasename = mb_ereg_replace('_+', '_', $zipbasename);
        $zipname     = date("Ymd").'_'.$zipbasename.'.zip';
        $zippath     = $tmpdir.'/'.$zipname;

とすればcleanされた後のファイル名が取得できるので(逆に、この関数を使って予め取得しておかないとclean_filenameされた後のファイル名を取れなそう)、失敗はほぼしないと思われます(厳密にはこのbasenameにひっついてくるprefixやテンポラリディレクトリのパスもclean_filenameした方がいいかもしれませんが、この処理ではまず問題なく失敗する事は無いと思います。

また、現在では

$CFG->unicodecleanfilename = true;

以外の状態で利用した場合、課題に日本語が入っていると失敗してしまいます。この機能を利用する環境は概ねこのフラグがonになっているとは思いますが、これが付いていない状態でclean_filenameするとファイル名が落ちたり大部分のファイル名がアンダーバーに置換されてしまいます。この関数内だけでも強制的に

$CFG->unicodecleanfilename = true;

を立ててからclean_filenameしてやれば課題名に日本語が入っていても正常にzipを吐いてくれると思います。この関数は課題のファイル郡をまとめたzipを吐いて抜けるだけなので、この設定フラグを立てても他への影響は少ないと思われますが、いかがでしょうか。

本筋とは無関係ですが、一部訂正です。

• 誤：貼っていてはいないためではないか
• 正：入っていてはいけないためではないか