Fix #8126 (#8712) - Nim - This repository contains the Nim compiler, Nim's stdlib, tools, and documentation. (mirror)

diff options

author	zah <zahary@gmail.com>	2018-08-21 23:14:12 +0300
committer	Andreas Rumpf <rumpf_a@web.de>	2018-08-21 22:14:12 +0200
commit	96de224a63f44e7e5a40004b490519f895d1068d (patch)
tree	6033422293317dcb2553f08c9fd008631a496762 /compiler/pathutils.nim
parent	8e435d7b0c4ec2547023c9a2d4ff60f587601ae5 (diff)
download	Nim-96de224a63f44e7e5a40004b490519f895d1068d.tar.gz

Fix #8126 (#8712)

This is a temporary fix that will be reworked in a follow up commit
that aims to eliminate the tfExplicit flag from the compiler. The
complete and proper fix was considered too risky for inclusion just
before our 0.19 release.

Diffstat (limited to 'compiler/pathutils.nim')

0 files changed, 0 insertions, 0 deletions

# # # The Nim Compiler # (c) Copyright 2017 Contributors # # See the file "copying.txt", included in this # distribution, for details about the copyright. # import ast, renderer, strutils, msgs, options, idents, os import nimblecmd when false: const considerParentDirs = not defined(noParentProjects) considerNimbleDirs = not defined(noNimbleDirs) proc findInNimbleDir(pkg, subdir, dir: string): string = var best = "" var bestv = "" for k, p in os.walkDir(dir, relative=true): if k == pcDir and p.len > pkg.len+1 and p[pkg.len] == '-' and p.startsWith(pkg): let (_, a) = getPathVersion(p) if bestv.len == 0 or bestv < a: bestv = a best = dir / p if best.len > 0: var f: File if open(f, best / changeFileExt(pkg, ".nimble-link")): # the second line contains what we're interested in, see: # https://github.com/nim-lang/nimble#nimble-link var override = "" discard readLine(f, override) discard readLine(f, override) close(f) if not override.isAbsolute(): best = best / override else: best = override let f = if subdir.len == 0: pkg else: subdir let res = addFileExt(best / f, "nim") if best.len > 0 and fileExists(res): result = res const stdlibDirs = [ "pure", "core", "arch", "pure/collections", "pure/concurrency", "impure", "wrappers", "wrappers/linenoise", "windows", "posix", "js"] when false: proc resolveDollar(project, source, pkg, subdir: string; info: TLineInfo): string = template attempt(a) = let x = addFileExt(a, "nim") if fileExists(x): return x case pkg of "stdlib": if subdir.len == 0: return options.libpath else: for candidate in stdlibDirs: attempt(options.libpath / candidate / subdir) of "root": let root = project.splitFile.dir if subdir.len == 0: return root else: attempt(root / subdir) else: when considerParentDirs: var p = parentDir(source.splitFile.dir) # support 'import $karax': let f = if subdir.len == 0: pkg else: subdir while p.len > 0: let dir = p / pkg if dirExists(dir): attempt(dir / f) # 2nd attempt: try to use 'karax/karax' attempt(dir / pkg / f) # 3rd attempt: try to use 'karax/src/karax' attempt(dir / "src" / f) attempt(dir / "src" / pkg / f) p = parentDir(p) when considerNimbleDirs: if not options.gNoNimblePath: var nimbleDir = getEnv("NIMBLE_DIR") if nimbleDir.len == 0: nimbleDir = getHomeDir() / ".nimble" result = findInNimbleDir(pkg, subdir, nimbleDir / "pkgs") if result.len > 0: return result when not defined(windows): result = findInNimbleDir(pkg, subdir, "/opt/nimble/pkgs") if result.len > 0: return result proc scriptableImport(pkg, sub: string; info: TLineInfo): string = result = resolveDollar(gProjectFull, info.toFullPath(), pkg, sub, info) if result.isNil: result = "" proc lookupPackage(pkg, subdir: PNode): string = let sub = if subdir != nil: renderTree(subdir, {renderNoComments}).replace(" ") else: "" case pkg.kind of nkStrLit, nkRStrLit, nkTripleStrLit: result = scriptableImport(pkg.strVal, sub, pkg.info) of nkIdent: result = scriptableImport(pkg.ident.s, sub, pkg.info) else: localError(pkg.info, "package name must be an identifier or string literal") result = "" proc getModuleName*(n: PNode): string = # This returns a short relative module name without the nim extension # e.g. like "system", "importer" or "somepath/module" # The proc won't perform any checks that the path is actually valid case n.kind of nkStrLit, nkRStrLit, nkTripleStrLit: try: result = pathSubs(n.strVal, n.info.toFullPath().splitFile().dir) except ValueError: localError(n.info, "invalid path: " & n.strVal) result = n.strVal of nkIdent: result = n.ident.s of nkSym: result = n.sym.name.s of nkInfix: let n0 = n[0] let n1 = n[1] if n0.kind == nkIdent and n0.ident.id == getIdent("as").id: # XXX hack ahead: n.kind = nkImportAs n.sons[0] = n.sons[1] n.sons[1] = n.sons[2] n.sons.setLen(2) return getModuleName(n.sons[0]) when false: if n1.kind == nkPrefix and n1[0].kind == nkIdent and n1[0].ident.s == "$": if n0.kind == nkIdent and n0.ident.s == "/": result = lookupPackage(n1[1], n[2]) else: localError(n.info, "only '/' supported with $package notation") result = "" else: let modname = getModuleName(n[2]) if $n1 == "std": template attempt(a) = let x = addFileExt(a, "nim") if fileExists(x): return x for candidate in stdlibDirs: attempt(options.libpath / candidate / modname) # hacky way to implement 'x / y /../ z': result = getModuleName(n1) result.add renderTree(n0, {renderNoComments}) result.add modname of nkPrefix: when false: if n.sons[0].kind == nkIdent and n.sons[0].ident.s == "$": result = lookupPackage(n[1], nil) else: discard # hacky way to implement 'x / y /../ z': result = renderTree(n, {renderNoComments}).replace(" ") of nkDotExpr: result = renderTree(n, {renderNoComments}).replace(".", "/") of nkImportAs: result = getModuleName(n.sons[0]) else: localError(n.info, errGenerated, "invalid module name: '$1'" % n.renderTree) result = "" proc checkModuleName*(n: PNode; doLocalError=true): int32 = # This returns the full canonical path for a given module import let modulename = n.getModuleName let fullPath = findModule(modulename, n.info.toFullPath) if fullPath.len == 0: if doLocalError: let m = if modulename.len > 0: modulename else: $n localError(n.info, errCannotOpenFile, m) result = InvalidFileIDX else: result = fullPath.fileInfoIdx


context:
space:
mode: