コード例 #1
0
ファイル: dict-2.php プロジェクト: kjk/noah-palm
function serve_get_word($cookie, $word, $reg_code)
{
    global $f_check_limits;
    /*
        if ( $word=='wl' )
        {
            write_WORDLIST( "word one\nand another\nand even more\nword three\ntest\nsample\n" );
            exit;
        }
    
        if ( $word=='tm' )
        {
            write_MSG( "This is a test message. Do you hear me now?" );
            exit;
        }
    */
    $requests_left = -1;
    if (!$reg_code && $f_check_limits) {
        $total_requests = get_total_requests_for_cookie($cookie);
        $requests_left = TOTAL_REQUESTS_LIMIT - $total_requests + DAILY_REQUESTS_LIMIT;
        if ($requests_left <= 0) {
            $today_requests = get_today_requests_for_cookie($cookie);
            $requests_left = DAILY_REQUESTS_LIMIT - $today_requests;
            if ($requests_left <= 0) {
                report_no_lookups_left();
            }
        } else {
            $requests_left = TOTAL_REQUESTS_LIMIT - $total_requests + DAILY_REQUESTS_LIMIT;
        }
    }
    log_get_word_request($cookie, $word, $reg_code);
    $word_row = get_word_row_try_stemming($word);
    if ($word_row) {
        write_DEF($word_row->word, $word_row->pron, $word_row->def, $requests_left);
    } else {
        write_MSG("Definition of word '{$word}' has not been found");
    }
    exit;
}
コード例 #2
0
ファイル: palm.php プロジェクト: kjk/noah-palm
function serve_get_word($cookie, $word)
{
    /*
        if ( $word=='wl' )
        {
            write_WORDLIST( "word one\nand another\nand even more\nword three\ntest\nsample\n" );
            exit;
        }
    
        if ( $word=='tm' )
        {
            write_MSG( "This is a test message. Do you hear me now?" );
            exit;
        }
    */
    $orig_word = $word;
    log_get_word_request($cookie, $word);
    $word_row = get_word_row($word);
    if ($word_row) {
        write_DEF($word, $word_row->pron, $word_row->def);
        exit;
    }
    # didnt find the exact word, so try a few heuristics
    # if word ends with "s", try to find word without it e.g. "strings" => "string"
    if ("s" == substr($word, strlen($word) - 1)) {
        $word = substr($word, 0, strlen($word) - 1);
        $word_row = get_word_row($word);
        if ($word_row) {
            write_DEF($word, $word_row->pron, $word_row->def);
            exit;
        }
    }
    # if word ends with "ed", try to find word without it e.g. "glued" => "glue"
    if ("ed" == substr($word, strlen($word) - 2)) {
        $word = substr($word, 0, strlen($word) - 2);
        $word_row = get_word_row($word);
        if ($word_row) {
            write_DEF($word, $word_row->pron, $word_row->def);
            exit;
        }
    }
    # if word ends with "ing", try to find word without it e.g. "working" => "work"
    if ("ing" == substr($word, strlen($word) - 3)) {
        $word = substr($word, 0, strlen($word) - 3);
        $word_row = get_word_row($word);
        if ($word_row) {
            write_DEF($word, $word_row->pron, $word_row->def);
            exit;
        }
    }
    # didnt find the word
    write_MSG("Definition of word '{$orig_word}' has not been found");
    exit;
}