source: trunk/Documentation/idldoc/search-template @ 60

var URL         = 0;
var FILENAME    = 1;
var DESCRIPTION = 2;
var CONTENTS    = 3;
var MATCH_TYPE  = 4;
var N_MATCHES   = 5;
var SCORE       = 6;
var i = 7;
var MATCHES     = 8;

var html;

var searchString;
var wildcard;
var invalidSearchString;
var origSearchString;

FILENAME_SCORE_ORDER    = 0;
URL_SCORE_ORDER         = 1;
DESCRIPTION_SCORE_ORDER = 2;
CONTENT_SCORE_ORDER     = 3;

SCORE_PER_TYPE = 15000;

var sortResultsByType = true;
var omitDescriptions = false;
var addMatchSummary = true;

var searchTitles = true;
var searchDescriptions = true;
var searchContent = true;

var footer = "";

function isAlnumAmp(ch) {
    if ((ch >= "a" && ch <= "z") || (ch == "&") ||(ch >= "A" && ch <= "Z") || (ch >= "0" && ch <="9")) {
        return true;
    } else {
        return false;
    }
}

function searchElement(fileNumber, matchType, upperSearchString) {
    var element = a[fileNumber][matchType].toUpperCase();
    var w, x, y;
    var z = 0;

    a[fileNumber][N_MATCHES] = 0;
    w = element.indexOf(upperSearchString);
    while (w >= 0){
        z = z + w + 1;
        if ((wildcard == -2) || (wildcard == -5)) {
            x = false;
        } else {
            if (w == 0) {
                x = false;
            } else {
                x = isAlnumAmp(element.charAt(w - 1));
            }
        }
        if ((wildcard == -3) || (wildcard == -5)) {
            y = false;
        } else {
            if (element.length - w == upperSearchString.length) {
                y = false;
            } else {
                y = isAlnumAmp(element.charAt(w + upperSearchString.length));
            }
        }
        if (!x && !y) {
            a[fileNumber][MATCHES + a[fileNumber][N_MATCHES]] = z - 1;
            a[fileNumber][N_MATCHES]++;
        }
        element = element.substring(w + 1, element.length);
        while (isAlnumAmp(element.charAt(0)) && element.length > 0) {
            element = element.substring(1, element.length);
            z++;
        }
        w = element.indexOf(upperSearchString);
    }
}

function searchFile(fileNumber, upperSearchString) {
    var matchIndex = -1, matchType;

    a[fileNumber][MATCH_TYPE] = -1;

    while (++matchIndex <= CONTENTS && a[fileNumber][MATCH_TYPE] == -1) {
        matchType = matchIndex == 0 ? FILENAME : (matchIndex == 1 ? DESCRIPTION : (matchIndex == 2 ? URL : CONTENTS));
        if ((matchType == FILENAME || matchType == URL) && !searchTitles) {
                continue;
        }

        if (matchType == DESCRIPTION && !searchDescriptions) {
                continue;
        }

        if (matchType == CONTENTS && !searchContent) {
                continue;
        }

        searchElement(fileNumber, matchType, upperSearchString);
        if (a[fileNumber][N_MATCHES] > 0) {
            a[fileNumber][MATCH_TYPE] = matchType;
        }
    }
}

function sortResults() {
    var fileNumber, t, tempScore, E;

    for (fileNumber = 1; fileNumber < a.length; fileNumber++) {
        a[fileNumber][i] = fileNumber;
    }

    if (sortResultsByType) {
        for (fileNumber = 1; fileNumber < a.length; fileNumber++) {
            if (a[fileNumber][MATCH_TYPE] == FILENAME) {
                a[fileNumber][SCORE] = (4 - FILENAME_SCORE_ORDER) * SCORE_PER_TYPE;
            } else if (a[fileNumber][MATCH_TYPE] == DESCRIPTION) {
                a[fileNumber][SCORE] = (4 - DESCRIPTION_SCORE_ORDER) * SCORE_PER_TYPE;
            } else if (a[fileNumber][MATCH_TYPE] == URL) {
                a[fileNumber][SCORE] = (4 - URL_SCORE_ORDER) * SCORE_PER_TYPE;
            } else {
                a[fileNumber][SCORE] = (4 - CONTENT_SCORE_ORDER) * SCORE_PER_TYPE + a[fileNumber][N_MATCHES];
            }
        }
        for (fileNumber = 2; fileNumber < a.length; fileNumber++) {
            tempScore = a[fileNumber][SCORE];
            E = a[fileNumber][i];
            for (t = fileNumber; t > 1 && tempScore > a[t-1][SCORE]; t--) {
                a[t][SCORE] = a[t-1][SCORE];
                a[t][i] = a[t-1][i];
            }
            a[t][SCORE] = tempScore;
            a[t][i] = E;
        }
    }
}

function putMatchSummary(fileNumber) {
    var pluralSuffix = a[fileNumber][N_MATCHES]==1 ? "" : "es";

    html += "";
    html += "<font color=gray>";
    if (a[fileNumber][MATCH_TYPE] == FILENAME) {
        html += " - matched title";
    } else {
        if (a[fileNumber][MATCH_TYPE] == DESCRIPTION) {
            html += " - matched description";
        } else {
            if (a[fileNumber][MATCH_TYPE] == URL) {
                html += " - matched URL";
            } else {
                html += " - " + a[fileNumber][N_MATCHES] + " match" + pluralSuffix + "";
            }
        }
    }
    html += "</font>";
    html += "";
}

function putMatchDescription(fileNumber, curMatch) {
    var matchLocation = a[fileNumber][MATCHES + curMatch - 1];
    var matchStart = matchLocation < 35 ? 0 : matchLocation - 35;
    var matchEnd = (matchLocation + 35 > a[fileNumber][CONTENTS].length) ? a[fileNumber][CONTENTS].length : matchLocation + 35;

    var Q = false;
    while ((matchStart >= 0) && !Q) {
        if (isAlnumAmp(a[fileNumber][CONTENTS].charAt(matchStart))) {
            matchStart--;
        } else {
            Q = true;
        }
    }
    matchStart++;

    Q = false;
    while ((matchEnd > matchLocation) && !Q) {
        if (isAlnumAmp(a[fileNumber][CONTENTS].charAt(matchEnd))) {
            matchEnd--;
        } else {
            Q = true;
        }
    }

    html += "<BR>\".. " + a[fileNumber][CONTENTS].substring(matchStart, matchLocation);
    html += "<B>" + a[fileNumber][CONTENTS].substring(matchLocation, matchLocation + searchString.length) + "</B>";
    html += a[fileNumber][CONTENTS].substring(matchLocation + searchString.length, matchEnd) + " ..\"";
}

function putAllMatchDescriptions(fileNumber) {
    if (omitDescriptions == false) {
        var curMatch = 1;
        while ((curMatch < 4) && (curMatch <= a[fileNumber][N_MATCHES])) {
            putMatchDescription(fileNumber, curMatch);
            curMatch++;
        }
    }
}

function putFoundString(v, R) {
    html += v.substring(0, R);
    html += "<B>" + v.substring(R, R + searchString.length) + "</B>";
    html += v.substring(R + searchString.length, v.length);
}

function putItem(fileNumber, itemNumber) {
    html += "<p>" + itemNumber + ". ";
    html += "<A href=\"" + a[fileNumber][URL] + "\" target=\"file_frame\">" + a[fileNumber][FILENAME] + "</a>";

    if (a[fileNumber][MATCH_TYPE] == CONTENTS) {
        putAllMatchDescriptions(fileNumber);
    } else {
        html += "";
    }

    if (a[fileNumber][MATCH_TYPE] == DESCRIPTION) {
        html += "<font color=gray>";
        html += "<br>Description: ";
        html += "</font>";
        html += "";
        putFoundString(a[fileNumber][DESCRIPTION], a[fileNumber][MATCHES]);
    } else {
        if( a[fileNumber][DESCRIPTION].length > 0 ) {
            html += "<font color=gray>";
            html += "<br>Description: ";
            html += "</font>";
            html += "" + a[fileNumber][DESCRIPTION];
        } else {
        }
    }
    html += "<br>";
    html += "<font color=#005500>";
    if (a[fileNumber][MATCH_TYPE] == URL) {
        putFoundString(a[fileNumber][URL], a[fileNumber][MATCHES]);
    } else {
        html += a[fileNumber][URL];
    }
    html += "</font>";
    if (addMatchSummary) {
        putMatchSummary(fileNumber);
    }
    html += "<br>";
}

function putResults() {
    var itemNumber = 0;

    if (!(invalidSearchString)) {
        for (var fileNumber = 1; fileNumber < a.length; fileNumber++) {
            if (a[a[fileNumber][i]][N_MATCHES] > 0) {
                putItem(a[fileNumber][i], ++itemNumber);
            }
        }
    } else {
        if (wildcard == -4) {
            html += "<P><B>ERROR:</B>&nbsp;The wildcard chararcter (*) must be at the beginning or end of the text.";
        }
    }
}

function putHeader() {
    html += "<html><head><title>Search results for \"" + origSearchString + "\"</title>"
    html += getStyles();
    html += "</head><body>";
    html += "<table CELLPADDING=\"3\" CELLSPACING=\"0\" CLASS=\"listing\">"
    html += "<tr><td CLASS=\"title\">Search Results</td></tr>"
    html += "</table>"
    html += "<p>You searched for <b>" + origSearchString +".</b>";
}

function putFooter() {
    var nMatches = 0;

    if (!(invalidSearchString)) {
        for (var fileNumber = 1; fileNumber < a.length; fileNumber++) {
            if (a[fileNumber][N_MATCHES] > 0) {
                nMatches++;
            }
        }
    }

    if (nMatches == 0) {
        html += "<P>No pages matched your search.&nbsp;&nbsp;";
    } else {
        var G = nMatches == 1 ? "" : "s";
        html += "<P><FONT CLASS=\"list_tagline\">" + nMatches + " page" + G + " listed.</FONT>&nbsp;&nbsp;";
    }
    html += footer;
    html += "</p></body></html>";
}

function launchBrowser() {
    var htmlCode = html;

    iu = open("", "Object", "resizable=yes,scrollbars=yes,toolbar=no,menubar=no,location=no,directories=no,width=475,height=600");

    if ((navigator.appName.indexOf("Microsoft")!=-1) && (navigator.appVersion.indexOf("3.0") != -1)) {
        alert("Click to see results");
    }

    iu.document.open();
    iu.document.write(htmlCode);
    iu.document.close();
}

function replaceSpecialChars(str) {
    var returnStr = "";

    for (var index = 0; index < str.length; index++) {
        if (str.charAt(index) == "<") {
            returnStr += "&lt;";
        } else if (str.charAt(index) == ">") {
            returnStr += "&gt;";
        } else if (str.charAt(index) == "\"") {
            returnStr += "&quot;";
        } else {
            returnStr += str.charAt(index);
        }
    }
    return(returnStr);
}

function checkSearchString() {
    wildcard = searchString.indexOf("*");
    if (wildcard == 0) {
        wildcard = -2;
        invalidSearchString = false;
    } else if (wildcard == searchString.length -1) {
        wildcard = -3;
        invalidSearchString = false;
    } else if (wildcard > 0 ) {
        wildcard = -4;
        invalidSearchString = true;
    } else {
        invalidSearchString = false;
    }

    if (searchString.indexOf("*") != searchString.lastIndexOf("*")) {
        if (wildcard == -2) {
            if (searchString.lastIndexOf("*") == searchString.length - 1) {
                wildcard = -5;
            } else {
                wildcard = -4;
                invalidSearchString = true;
            }
        }
    }

    if ((wildcard == -2) || (wildcard == -5)) {
        searchString = searchString.substring(1, searchString.length);
    }

    if ((wildcard == -3) || (wildcard == -5)) {
        searchString = searchString.substring(0, searchString.length - 1);
    }
}

function toggleOmitDescriptions() {
    omitDescriptions = !omitDescriptions;
}

function toggleSortResults() {
    sortResultsByType = !sortResultsByType;
}

function toggleMatchSummary() {
    addMatchSummary = !addMatchSummary;
}

function toggleSearchTitles() {
    searchTitles = !searchTitles;
}

function toggleSearchDescriptions() {
    searchDescriptions = !searchDescriptions;
}

function toggleSearchContent() {
    searchContent = !searchContent;
}

function startsearch() {
    var upperSearchString;
    searchString = document.formSearch.txtSearch.value;

    if ((searchString.length > 0) && (searchString != "*")) {
        html = "";
        origSearchString = searchString;
        searchString = replaceSpecialChars(searchString);
        checkSearchString();
        upperSearchString = searchString.toUpperCase();
        if (!(invalidSearchString)) {
            for (var fileNumber = 1; fileNumber < a.length; fileNumber++) {
                searchFile(fileNumber, upperSearchString);
            }
            sortResults();
        }
        putHeader();
        putResults();
        putFooter();
        launchBrowser();
    }
}