mirror of
https://github.com/irmen/prog8.git
synced 2024-12-25 23:29:55 +00:00
330 lines
15 KiB
Kotlin
330 lines
15 KiB
Kotlin
package prog8tests
|
|
|
|
import com.github.michaelbull.result.getErrorOrElse
|
|
import com.github.michaelbull.result.getOrElse
|
|
import org.hamcrest.MatcherAssert.assertThat
|
|
import org.hamcrest.Matchers.equalTo
|
|
import org.hamcrest.Matchers.nullValue
|
|
import org.hamcrest.core.Is
|
|
import org.junit.jupiter.api.*
|
|
import prog8.ast.Program
|
|
import prog8.ast.internedStringsModuleName
|
|
import prog8.compiler.ModuleImporter
|
|
import prog8.compilerinterface.IErrorReporter
|
|
import prog8.parser.ParseError
|
|
import prog8.parser.SourceCode
|
|
import prog8tests.ast.helpers.*
|
|
import prog8tests.helpers.ErrorReporterForTests
|
|
import prog8tests.helpers.DummyFunctions
|
|
import prog8tests.helpers.DummyMemsizer
|
|
import prog8tests.helpers.DummyStringEncoder
|
|
import kotlin.io.path.*
|
|
import kotlin.test.assertContains
|
|
import kotlin.test.assertFailsWith
|
|
import kotlin.test.assertFalse
|
|
import kotlin.test.fail
|
|
|
|
|
|
@TestInstance(TestInstance.Lifecycle.PER_CLASS)
|
|
class TestModuleImporter {
|
|
private val count = listOf("1st", "2nd", "3rd", "4th", "5th")
|
|
|
|
private lateinit var program: Program
|
|
@BeforeEach
|
|
fun beforeEach() {
|
|
program = Program("foo", DummyFunctions, DummyMemsizer, DummyStringEncoder)
|
|
}
|
|
|
|
private fun makeImporter(errors: IErrorReporter?, vararg searchIn: String): ModuleImporter {
|
|
return makeImporter(errors, searchIn.asList())
|
|
}
|
|
|
|
private fun makeImporter(errors: IErrorReporter? = null, searchIn: Iterable<String>) =
|
|
ModuleImporter(program, "blah", errors ?: ErrorReporterForTests(false), searchIn.toList())
|
|
|
|
@Nested
|
|
inner class Constructor {
|
|
|
|
@Test
|
|
@Disabled("TODO: invalid entries in search list")
|
|
fun testInvalidEntriesInSearchList() {}
|
|
|
|
@Test
|
|
@Disabled("TODO: literal duplicates in search list")
|
|
fun testLiteralDuplicatesInSearchList() {}
|
|
|
|
@Test
|
|
@Disabled("TODO: factual duplicates in search list")
|
|
fun testFactualDuplicatesInSearchList() {}
|
|
}
|
|
|
|
@Nested
|
|
inner class ImportModule {
|
|
|
|
@Nested
|
|
inner class WithInvalidPath {
|
|
@Test
|
|
fun testNonexisting() {
|
|
val dirRel = assumeDirectory(".", workingDir.relativize(fixturesDir))
|
|
val importer = makeImporter(null, dirRel.invariantSeparatorsPathString)
|
|
val srcPathRel = assumeNotExists(dirRel, "i_do_not_exist")
|
|
val srcPathAbs = srcPathRel.absolute()
|
|
val error1 = importer.importModule(srcPathRel).getErrorOrElse { fail("should have import error") }
|
|
assertThat(
|
|
".file should be normalized",
|
|
"${error1.file}", equalTo("${error1.file.normalize()}")
|
|
)
|
|
assertThat(
|
|
".file should point to specified path",
|
|
error1.file.absolutePath, equalTo("${srcPathAbs.normalize()}")
|
|
)
|
|
assertThat(program.modules.size, equalTo(1))
|
|
|
|
val error2 = importer.importModule(srcPathAbs).getErrorOrElse { fail("should have import error") }
|
|
assertThat(
|
|
".file should be normalized",
|
|
"${error2.file}", equalTo("${error2.file.normalize()}")
|
|
)
|
|
assertThat(
|
|
".file should point to specified path",
|
|
error2.file.absolutePath, equalTo("${srcPathAbs.normalize()}")
|
|
)
|
|
assertThat(program.modules.size, equalTo(1))
|
|
}
|
|
|
|
@Test
|
|
fun testDirectory() {
|
|
val srcPathRel = assumeDirectory(workingDir.relativize(fixturesDir))
|
|
val srcPathAbs = srcPathRel.absolute()
|
|
val searchIn = Path(".", "$srcPathRel").invariantSeparatorsPathString
|
|
val importer = makeImporter(null, searchIn)
|
|
|
|
assertFailsWith<AccessDeniedException> { importer.importModule(srcPathRel) }
|
|
.let {
|
|
assertThat(
|
|
".file should be normalized",
|
|
"${it.file}", equalTo("${it.file.normalize()}")
|
|
)
|
|
assertThat(
|
|
".file should point to specified path",
|
|
it.file.absolutePath, equalTo("${srcPathAbs.normalize()}")
|
|
)
|
|
}
|
|
assertThat(program.modules.size, equalTo(1))
|
|
|
|
assertFailsWith<AccessDeniedException> { importer.importModule(srcPathAbs) }
|
|
.let {
|
|
assertThat(
|
|
".file should be normalized",
|
|
"${it.file}", equalTo("${it.file.normalize()}")
|
|
)
|
|
assertThat(
|
|
".file should point to specified path",
|
|
it.file.absolutePath, equalTo("${srcPathAbs.normalize()}")
|
|
)
|
|
}
|
|
assertThat(program.modules.size, equalTo(1))
|
|
}
|
|
}
|
|
|
|
@Nested
|
|
inner class WithValidPath {
|
|
|
|
@Test
|
|
fun testAbsolute() {
|
|
val searchIn = listOf(
|
|
Path(".").div(workingDir.relativize(fixturesDir)), // we do want a dot "." in front
|
|
).map { it.invariantSeparatorsPathString }
|
|
val importer = makeImporter(null, searchIn)
|
|
val fileName = "simple_main.p8"
|
|
val path = assumeReadableFile(searchIn[0], fileName)
|
|
|
|
val module = importer.importModule(path.absolute()).getOrElse { throw it }
|
|
assertThat(program.modules.size, equalTo(2))
|
|
assertContains(program.modules, module)
|
|
assertThat(module.program, equalTo(program))
|
|
}
|
|
|
|
@Test
|
|
fun testRelativeToWorkingDir() {
|
|
val searchIn = listOf(
|
|
Path(".").div(workingDir.relativize(fixturesDir)), // we do want a dot "." in front
|
|
).map { it.invariantSeparatorsPathString }
|
|
val importer = makeImporter(null, searchIn)
|
|
val fileName = "simple_main.p8"
|
|
val path = assumeReadableFile(searchIn[0], fileName)
|
|
assertThat("sanity check: path should NOT be absolute", path.isAbsolute, equalTo(false))
|
|
|
|
val module = importer.importModule(path).getOrElse { throw it }
|
|
assertThat(program.modules.size, equalTo(2))
|
|
assertContains(program.modules, module)
|
|
assertThat(module.program, equalTo(program))
|
|
}
|
|
|
|
@Test
|
|
fun testRelativeTo1stDirInSearchList() {
|
|
val searchIn = Path(".")
|
|
.div(workingDir.relativize(fixturesDir))
|
|
.invariantSeparatorsPathString
|
|
val importer = makeImporter(null, searchIn)
|
|
val fileName = "simple_main.p8"
|
|
val path = Path(".", fileName)
|
|
assumeReadableFile(searchIn, path)
|
|
|
|
val module = importer.importModule(path).getOrElse { throw it }
|
|
assertThat(program.modules.size, equalTo(2))
|
|
assertContains(program.modules, module)
|
|
assertThat(module.program, equalTo(program))
|
|
}
|
|
|
|
@Test
|
|
@Disabled("TODO: relative to 2nd in search list")
|
|
fun testRelativeTo2ndDirInSearchList() {}
|
|
|
|
@Test
|
|
@Disabled("TODO: ambiguous - 2 or more really different candidates")
|
|
fun testAmbiguousCandidates() {}
|
|
|
|
@Nested
|
|
inner class WithBadFile {
|
|
@Test
|
|
fun testWithSyntaxError() {
|
|
val searchIn = assumeDirectory("./", workingDir.relativize(fixturesDir))
|
|
val importer = makeImporter(null, searchIn.invariantSeparatorsPathString)
|
|
val srcPath = assumeReadableFile(fixturesDir, "file_with_syntax_error.p8")
|
|
|
|
val act = { importer.importModule(srcPath) }
|
|
|
|
repeat(2) { n ->
|
|
assertFailsWith<ParseError>(count[n] + " call") { act() }.let {
|
|
assertThat(it.position.file, equalTo(SourceCode.relative(srcPath).toString()))
|
|
assertThat("line; should be 1-based", it.position.line, equalTo(2))
|
|
assertThat("startCol; should be 0-based", it.position.startCol, equalTo(6))
|
|
assertThat("endCol; should be 0-based", it.position.endCol, equalTo(6))
|
|
}
|
|
assertThat(program.modules.size, equalTo(1))
|
|
}
|
|
}
|
|
|
|
@Test
|
|
fun testImportingFileWithSyntaxError_once() {
|
|
doTestImportingFileWithSyntaxError(1)
|
|
}
|
|
|
|
@Test
|
|
fun testImportingFileWithSyntaxError_twice() {
|
|
doTestImportingFileWithSyntaxError(2)
|
|
}
|
|
|
|
private fun doTestImportingFileWithSyntaxError(repetitions: Int) {
|
|
val searchIn = assumeDirectory("./", workingDir.relativize(fixturesDir))
|
|
val importer = makeImporter(null, searchIn.invariantSeparatorsPathString)
|
|
val importing = assumeReadableFile(fixturesDir, "import_file_with_syntax_error.p8")
|
|
val imported = assumeReadableFile(fixturesDir, "file_with_syntax_error.p8")
|
|
|
|
val act = { importer.importModule(importing) }
|
|
|
|
repeat(repetitions) { n ->
|
|
assertFailsWith<ParseError>(count[n] + " call") { act() }.let {
|
|
assertThat(it.position.file, equalTo(SourceCode.relative(imported).toString()))
|
|
assertThat("line; should be 1-based", it.position.line, equalTo(2))
|
|
assertThat("startCol; should be 0-based", it.position.startCol, equalTo(6))
|
|
assertThat("endCol; should be 0-based", it.position.endCol, equalTo(6))
|
|
}
|
|
assertThat("imported module with error in it should not be present", program.modules.size, equalTo(1))
|
|
assertThat(program.modules[0].name, equalTo(internedStringsModuleName))
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
@Nested
|
|
inner class ImportLibraryModule {
|
|
@Nested
|
|
inner class WithInvalidName {
|
|
@Test
|
|
fun testWithNonExistingName() {
|
|
val searchIn = assumeDirectory("./", workingDir.relativize(fixturesDir))
|
|
val errors = ErrorReporterForTests(false)
|
|
val importer = makeImporter(errors, searchIn.invariantSeparatorsPathString)
|
|
val filenameNoExt = assumeNotExists(fixturesDir, "i_do_not_exist").name
|
|
val filenameWithExt = assumeNotExists(fixturesDir, "i_do_not_exist.p8").name
|
|
|
|
repeat(2) { n ->
|
|
val result = importer.importLibraryModule(filenameNoExt)
|
|
assertThat(count[n] + " call / NO .p8 extension", result, Is(nullValue()))
|
|
assertFalse(errors.noErrors(), count[n] + " call / NO .p8 extension")
|
|
assertContains(errors.errors.single(), "0:0: no module found with name i_do_not_exist")
|
|
errors.report()
|
|
assertThat(program.modules.size, equalTo(1))
|
|
|
|
val result2 = importer.importLibraryModule(filenameWithExt)
|
|
assertThat(count[n] + " call / with .p8 extension", result2, Is(nullValue()))
|
|
assertFalse(importer.errors.noErrors(), count[n] + " call / with .p8 extension")
|
|
assertContains(errors.errors.single(), "0:0: no module found with name i_do_not_exist.p8")
|
|
errors.report()
|
|
assertThat(program.modules.size, equalTo(1))
|
|
}
|
|
}
|
|
}
|
|
|
|
@Nested
|
|
inner class WithValidName {
|
|
@Nested
|
|
inner class WithBadFile {
|
|
@Test
|
|
fun testWithSyntaxError() {
|
|
val searchIn = assumeDirectory("./", workingDir.relativize(fixturesDir))
|
|
val importer = makeImporter(null, searchIn.invariantSeparatorsPathString)
|
|
val srcPath = assumeReadableFile(fixturesDir, "file_with_syntax_error.p8")
|
|
|
|
repeat(2) { n ->
|
|
assertFailsWith<ParseError>(count[n] + " call")
|
|
{ importer.importLibraryModule(srcPath.nameWithoutExtension) }.let {
|
|
assertThat(it.position.file, equalTo(SourceCode.relative(srcPath).toString()))
|
|
assertThat("line; should be 1-based", it.position.line, equalTo(2))
|
|
assertThat("startCol; should be 0-based", it.position.startCol, equalTo(6))
|
|
assertThat("endCol; should be 0-based", it.position.endCol, equalTo(6))
|
|
}
|
|
assertThat(program.modules.size, equalTo(1))
|
|
}
|
|
}
|
|
|
|
|
|
private fun doTestImportingFileWithSyntaxError(repetitions: Int) {
|
|
val searchIn = assumeDirectory("./", workingDir.relativize(fixturesDir))
|
|
val importer = makeImporter(null, searchIn.invariantSeparatorsPathString)
|
|
val importing = assumeReadableFile(fixturesDir, "import_file_with_syntax_error.p8")
|
|
val imported = assumeReadableFile(fixturesDir, "file_with_syntax_error.p8")
|
|
|
|
val act = { importer.importLibraryModule(importing.nameWithoutExtension) }
|
|
|
|
repeat(repetitions) { n ->
|
|
assertFailsWith<ParseError>(count[n] + " call") { act() }.let {
|
|
assertThat(it.position.file, equalTo(SourceCode.relative(imported).toString()))
|
|
assertThat("line; should be 1-based", it.position.line, equalTo(2))
|
|
assertThat("startCol; should be 0-based", it.position.startCol, equalTo(6))
|
|
assertThat("endCol; should be 0-based", it.position.endCol, equalTo(6))
|
|
}
|
|
assertThat("imported module with error in it should not be present", program.modules.size, equalTo(1))
|
|
assertThat(program.modules[0].name, equalTo(internedStringsModuleName))
|
|
importer.errors.report()
|
|
}
|
|
}
|
|
|
|
@Test
|
|
fun testImportingFileWithSyntaxError_once() {
|
|
doTestImportingFileWithSyntaxError(1)
|
|
}
|
|
|
|
@Test
|
|
fun testImportingFileWithSyntaxError_twice() {
|
|
doTestImportingFileWithSyntaxError(2)
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|