Press n or j to go to the next uncovered block, b, p or k for the previous block.
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 | 1x 1x 1x 1x 1x 1x 1x 1x 21788x 21788x 21788x 1x 10897x 10897x 10897x 10897x 10897x 32491x 32491x 32491x 32491x 32491x 32491x 32491x 32491x 32491x 32491x 32491x 10897x 10897x 264x 264x 264x 10897x 10897x 10349x 10349x 10349x 10349x 10897x 10897x 258x 258x 10897x 10897x 3x 3x 3x 3x 3x 10897x 10897x 330x 63x 63x 267x 267x 330x 28x 28x 239x 239x 239x 239x 330x 246x 246x 1365x 1365x 1359x 1365x 6x 6x 1365x 6x 1365x 1365x 1x 1x 1x 5x 5x 5x 1365x 5x 5x 5x 5x 1365x 8x 2x 2x 2x 6x 6x 5x 1365x 2x 2x 2x 2x 2x 2x 2x 2x 5x 1365x 3x 3x 3x 1365x 246x 239x 239x 239x 10897x 10897x 5x 5x 5x 10897x 10897x | import {Issue} from "../issue";
import {BasicRuleConfig} from "./_basic_rule_config";
import {IRule, IRuleMetadata, RuleTag} from "./_irule";
import {ABAPFile, ABAPObject, Comment, Expressions, IObject, IRegistry, ISpaghettiScope, Position, Statements, SyntaxLogic} from "..";
import {Table} from "../objects";
import {StatementNode} from "../abap/nodes";
import {EditHelper} from "../edit_helper";
export class SelectSingleFullKeyConf extends BasicRuleConfig {
public allowPseudo = true;
}
export class SelectSingleFullKey implements IRule {
private reg: IRegistry;
private conf = new SelectSingleFullKeyConf();
public getMetadata(): IRuleMetadata {
return {
key: "select_single_full_key",
title: "Detect SELECT SINGLE which are possibily not unique",
shortDescription: `Detect SELECT SINGLE which are possibily not unique`,
extendedInformation: `Table definitions must be known, ie. inside the errorNamespace
If the statement contains a JOIN it is not checked`,
pseudoComment: "EC CI_NOORDER",
tags: [RuleTag.Quickfix],
};
}
public initialize(reg: IRegistry) {
this.reg = reg;
return this;
}
public getConfig() {
if (this.conf === undefined) {
this.conf = {
allowPseudo: true,
};
}
if (this.conf.allowPseudo === undefined) {
this.conf.allowPseudo = true;
}
return this.conf;
}
public setConfig(conf: SelectSingleFullKeyConf) {
this.conf = conf;
}
private buildFix(file: ABAPFile, statement: StatementNode) {
return {
description: `Add "#EC CI_NOORDER`,
edit: EditHelper.insertAt(file, statement.getLastToken().getStart(), ` "#EC CI_NOORDER`),
};
}
public run(obj: IObject): readonly Issue[] {
if (!(obj instanceof ABAPObject)) {
return [];
}
const syntax = new SyntaxLogic(this.reg, obj).run();
if (syntax.issues.length > 0) {
return [];
}
const issues: Issue[] = [];
const message = "SELECT SINGLE possibily not unique";
for (const file of obj.getABAPFiles()) {
const statements = file.getStatements();
for (let i = 0; i < statements.length; i++) {
const s = statements[i];
if (!(s.get() instanceof Statements.Select)) {
continue;
} else if (s.findFirstExpression(Expressions.SQLJoin)) {
continue;
} else if (s.findTokenSequencePosition("SELECT", "SINGLE") === undefined) {
continue;
}
const databaseTable = s.findFirstExpression(Expressions.DatabaseTable);
if (databaseTable === undefined) {
continue;
}
const next = statements[i + 1];
if (next?.get() instanceof Comment
&& next.concatTokens().includes(this.getMetadata().pseudoComment + "")) {
if (this.getConfig().allowPseudo !== true) {
issues.push(Issue.atStatement(file, s, "Pseudo comment not allowed", this.getMetadata().key, this.getConfig().severity));
}
continue;
}
const tabl = this.findReference(databaseTable.getFirstToken().getStart(), syntax.spaghetti, file);
const table = this.reg.getObject("TABL", tabl) as Table | undefined;
if (table === undefined) {
continue;
}
const keys = table.listKeys(this.reg);
const cond = s.findFirstExpression(Expressions.SQLCond);
const set = new Set<string>();
for (const key of keys) {
if (key === "MANDT") {
// todo, it should check for the correct type instead
continue;
}
set.add(key);
}
for (const compare of cond?.findAllExpressionsRecursive(Expressions.SQLCompare) || []) {
if (compare.getChildren().length === 3) {
const fname = compare.findDirectExpression(Expressions.SQLFieldName)?.concatTokens().toUpperCase();
const operator = compare.findDirectExpression(Expressions.SQLCompareOperator)?.concatTokens().toUpperCase();
if (fname && (operator === "=" || operator === "EQ")) {
set.delete(fname);
}
}
}
if (set.size > 0) {
const fix = this.buildFix(file, s);
issues.push(Issue.atStatement(file, s, message, this.getMetadata().key, this.getConfig().severity, undefined, [fix]));
}
}
}
return issues;
}
private findReference(position: Position, spaghetti: ISpaghettiScope, file: ABAPFile) {
const scope = spaghetti.lookupPosition(position, file.getFilename());
return scope?.findTableReference(position);
}
}
|