Moodle開発者フォーラム

　まだデバッグ中です．デバッグが１日単位なのでなかなか進みません（取り掛かり始めたのは昨日）．
　（fs_moodleでは，１日に１回しか送信されないダイジェストメールの中身をいつでも閲覧できる機能を装備してあるので，実際には１日に何度でも確認できますが，本来のコードをいくつもバイパスしているので，完全に同一の処理ではありません）

　結構簡単だ，と思って昨晩仕掛けた改良の成果を今朝確認したのですがダメでした．ポイントはmod/forum/lib.phpのfunction forum_cron()，後半部です（前半部ではダイジェストメールではなく，都度送信の処理を行っています）．

 

            rs_close($digestposts_rs); /// Finished iteration, let's close the resultset

            // Data collected, start sending out emails to each user
            foreach ($userdiscussions as $userid => $thesediscussions) {

                @set_time_limit(120); // terminate if processing of any account takes longer than 2 minutes

                $USER = $cronuser;
                course_setup(SITEID); // reset cron user language, theme and timezone settings

                mtrace(get_string('processingdigest', 'forum', $userid), '... ');

                // First of all delete all the queue entries for this user
                delete_records_select('forum_queue', "userid = $userid AND timemodified < $digesttime");
                $userto = $users[$userid];

（中略）

// (Shirai170): フォーラム投稿のダイジェストメール内のディスカッショントピックスの並び順を整列させる改良 (2009/10/01)
// (Shirai170): ここから追加
                if (count($thesediscussions) > 1) {
                    $discussions_work = array();
                    foreach ($thesediscussions as $discussionid) {
                        $discussion = $discussions[$discussionid];
                        $forum      = $forums[$discussion->forum];
                        $course     = $courses[$forum->course];
                        $idnumber  = str_pad($course->id,   10, '0', STR_PAD_LEFT);
                        $idnumber .= str_pad($forum->id,    10, '0', STR_PAD_LEFT);
                        $idnumber .= str_pad($discussionid, 10, '0', STR_PAD_LEFT);
                        $discussions_work[$idnumber] = $discussionid;
                    }
                    sort($discussions_work);
                    $thesediscussions = $discussions_work;
                }
// (Shirai170): ここまで追加
                foreach ($thesediscussions as $discussionid) {

                    @set_time_limit(120);   // to be reset for each post

                    $discussion = $discussions[$discussionid];
                    $forum      = $forums[$discussion->forum];
                    $course     = $courses[$forum->course];
                    $cm         = $coursemodules[$forum->id];

                    //override language
                    course_setup($course);

（中略）

                    $postsarray = $discussionposts[$discussionid];
                    sort($postsarray);

                    foreach ($postsarray as $postid) {
                        $post = $posts[$postid];

　青で示したループは，一番外側がユーザごとの処理です．各ユーザの未読投稿をまず収集します．次はそのユーザの未読投稿の属するディスカッショントピックスごとに処理を行います．問題はここで，特にディスカッショントピックスの順番には頓着しないでデータベースから拾ってきた未読投稿の順番か何かで早い者勝ちとしています．そして最後のループがそのディスカッショントピックスに属する未読投稿を抽出して並べなおします．これはsort($pstarray)で行っていますね．多分，postidの順番でしょう（＝投稿日時順）．

　赤い部分が追加したコードです．$thesediscussionsは配列で，キーなしでディスカッショントピックスのIDが格納されています．ディスカッショントピックスのIDはディスカッショントピックスが投稿されるたびにシーケンシャルに生成される独立した整数ですので，コースやフォーラムに無関係です．ですので，このディスカッションIDから辿ってフォーラムID，コースIDを取得しています．それを元にして10文字×３の30文字のユニークなＩＤ（コースＩＤ１０文字＋フォーラムID１０文字＋ディスカッショントピックスID１０文字）を生成します．それをキーとした配列に$thesediscussionsの中に格納されている$discussionidを格納し，ユニークなIDでソートします．ユニークなIDの上位の桁がコースID，その次がフォーラムIDですので，まずコースごと，その次にフォーラムごとに並ぶはずです．ソートし終えたディスカッショントピックスIDの配列を$thesediscussionsにコピーして戻せばきちんと整列された順番でメール本文が作成されるはず，と睨んだわけです．

　昨日の日中にデバッグした時はOKだったのに，今朝届いたメールでは期待した順番に並んでいませんでした．まだ何か見落としがあったのかどうか．デバッグのためにはあちこちのコースに沢山の投稿をしないといけないので大変です^^;

　でも，成功したら効果は大きいですね．