Crash Monitoring for Oracle Siebel CRM (Configure)

importClass(com.germainsoftware.data.Checksum);
importClass(com.germainsoftware.apm.storage.categorization.siebel.SiebelCoreCrashParserUtils);

var errorCodesWithoutCoreCrash = {
    'SBL-SMI-00062': true,  // Internal: No more process (multithreaded server) slots available
    'SBL-SVR-09127': true,  // Internal: Fail to initialize the shared memory resource for the process
};

try {
    var supportingFactIdentifiers = fact.details ? fact.details.split('|') : [];
    var coreCrash;
    var knownErrorCode;
    for (var i=0; i<supportingFactIdentifiers.length; i++) {
        var identifier = supportingFactIdentifiers[i].split(';');
        var factClassName = identifier[0];
        var factId = identifier[1];
        var factType = identifier[2];

        if (factType === 'Siebel:Enterprise Crash') {
            var errorCode = identifier[3];
            if (errorCode && (errorCodesWithoutCoreCrash[errorCode] || errorCode.indexOf('SBL-GEN-') === 0)) {
                knownErrorCode = errorCode;
            }
        } else if (factType === 'Siebel:Core Crash') {
            coreCrash = queryService.findById(factClassName, factId);
        }
    }

    if (knownErrorCode) {
        // If this crash is caused by an error that is known to not generate a Core Crash,
        // perform matching based only on error code, since this is all we have
        log.debug('FactID: {} - Categorizing based on Error code', fact.id, knownErrorCode);
        result.exactMatch = Checksum.calculate(knownErrorCode);
        result.fuzzyMatch = '';
    } else if (coreCrash) { 
        // If we have a Core Crash, use that to determine similarity of crashes
        log.debug('FactID: {} - Categorizing based on Core Crash', fact.id);
        var uninformativeFunctions = [
            { fileName: '/app/siebel/siebsrvr/lib/libsslcosd.so', method: '+0x7185' },
            { fileName: '/app/siebel/siebsrvr/lib/libsslcosd.so', method: '+0x797e' },
            { fileName: '/app/siebel/siebsrvr/lib/libsscdo90.so', method: '_ZN15CSSOraSqlCursorD1Ev+0x3f' },
            { fileName: '/app/siebel/siebsrvr/lib/libsscdo90.so', method: '_ZN15CSSOraSqlCursorD0Ev+0x22' },
            { fileName: '/app/siebel/siebsrvr/lib/libsscfdm.so', method: '_ZN16CSSLockSqlCursorD2Ev+0x77' },
            { fileName: '/app/siebel/siebsrvr/lib/libsscfdm.so', method: '_ZN16CSSLockSqlCursorD0Ev+0x22' },
        ];
        var ignore = {};
        uninformativeFunctions.forEach(function(f) { ignore[stackElementId(f, false)] = true; });

        // Remove recursion in the stack trace, and any generic functions that are not distinctive
        var stacktrace = SiebelCoreCrashParserUtils.parse(coreCrash.details);
        stacktrace = SiebelCoreCrashParserUtils.removeRecursion(stacktrace);
        stacktrace = stacktrace.filter(function(s) {
            return s.fileName && s.method
                && s.fileName.indexOf('/app/siebel/') === 0
                && !ignore[stackElementId(s, false)];
        });

        // Categorize stacktraces based on:
        // 1. Exact match of top 5 function calls
        // 2. Fuzzy matching of top 10 function calls (including location)
        var stacktraceId = stacktrace
            .map(function(s) { return stackElementId(s, false); })
            .slice(0, 5)
            .join('|');
        result.exactMatch = Checksum.calculate(stacktraceId);
        result.fuzzyMatch = stacktrace
            .map(function(s) { return stackElementId(s, true); })
            .slice(0, 10)
            .join('|');
    }
} catch (error) {
    log.error('Error during categorization: {}', error.message);
}

function stackElementId(element, includeLocation) {
    if (includeLocation) {
        return element.fileName + ';' + element.method + ';' + element.location;
    }
    return element.fileName + ';' + element.method;
}