mirror of
https://github.com/github/semantic.git
synced 2024-11-24 00:42:33 +03:00
Add template syntax support
This commit is contained in:
parent
13c615731e
commit
7809618716
@ -102,24 +102,31 @@ runAddSubmodule repoUrl repoPath = do
|
||||
-- | Also appends the JSONTestCases generated to the test case file defined by
|
||||
-- | the syntaxes.
|
||||
runCommitsAndTestCasesGeneration :: GeneratorArgs -> JSONMetaRepo -> IO ()
|
||||
runCommitsAndTestCasesGeneration opts JSONMetaRepo{..} =
|
||||
runCommitsAndTestCasesGeneration opts metaRepo@JSONMetaRepo{..} =
|
||||
for_ syntaxes generate
|
||||
where generate :: JSONMetaSyntax -> IO ()
|
||||
generate metaSyntax = do
|
||||
_ <- runInitialCommitForSyntax repoPath metaSyntax
|
||||
_ <- runInitialCommitForSyntax metaRepo metaSyntax
|
||||
runSetupTestCaseFile metaSyntax
|
||||
runCommitAndTestCaseGeneration opts language repoPath metaSyntax
|
||||
runCommitAndTestCaseGeneration opts language metaRepo metaSyntax
|
||||
runCloseTestCaseFile metaSyntax
|
||||
|
||||
-- | For a syntax, we want the initial commit to be an empty file.
|
||||
-- | This function performs a touch and commits the empty file.
|
||||
runInitialCommitForSyntax :: FilePath -> JSONMetaSyntax -> IO ()
|
||||
runInitialCommitForSyntax repoPath JSONMetaSyntax{..} = do
|
||||
runInitialCommitForSyntax :: JSONMetaRepo -> JSONMetaSyntax -> IO ()
|
||||
runInitialCommitForSyntax metaRepo@JSONMetaRepo{..} metaSyntax@JSONMetaSyntax{..} = do
|
||||
Prelude.putStrLn $ "Generating initial commit for " <> syntax <> " syntax."
|
||||
result <- try . executeCommand repoPath $ touchCommand repoFilePath <> commitCommand syntax "Initial commit"
|
||||
case ( result :: Either Prelude.IOError String) of
|
||||
Left error -> Prelude.putStrLn $ "Initializing the " <> repoFilePath <> " failed with: " <> show error <> ". " <> "Possible reason: file already initialized. \nProceeding to the next step."
|
||||
Right _ -> pure ()
|
||||
Right _ -> runAddTemplateForSyntax metaRepo metaSyntax
|
||||
|
||||
runAddTemplateForSyntax :: JSONMetaRepo -> JSONMetaSyntax -> IO ()
|
||||
runAddTemplateForSyntax JSONMetaRepo{..} JSONMetaSyntax{..} = case templateText of
|
||||
Just templateText -> do
|
||||
_ <- executeCommand repoPath $ fileWriteCommand repoFilePath templateText <> commitCommand syntax ("Add " <> repoFilePath <> " template text.")
|
||||
pure ()
|
||||
Nothing -> pure ()
|
||||
|
||||
-- | Initializes the test case file where JSONTestCase examples are written to.
|
||||
-- | This manually inserts a "[" to open a JSON array.
|
||||
@ -129,9 +136,9 @@ runSetupTestCaseFile metaSyntax = do
|
||||
DL.writeFile (testCaseFilePath metaSyntax) "["
|
||||
|
||||
-- | For each command constructed for a given metaSyntax, execute the system commands.
|
||||
runCommitAndTestCaseGeneration :: GeneratorArgs -> String -> FilePath -> JSONMetaSyntax -> IO ()
|
||||
runCommitAndTestCaseGeneration opts language repoPath metaSyntax@JSONMetaSyntax{..} =
|
||||
traverse_ (runGenerateCommitAndTestCase opts language repoPath) (commands metaSyntax)
|
||||
runCommitAndTestCaseGeneration :: GeneratorArgs -> String -> JSONMetaRepo -> JSONMetaSyntax -> IO ()
|
||||
runCommitAndTestCaseGeneration opts language metaRepo metaSyntax@JSONMetaSyntax{..} =
|
||||
traverse_ (runGenerateCommitAndTestCase opts language (repoPath metaRepo)) (commands metaRepo metaSyntax)
|
||||
|
||||
maybeMapSummary :: [R.Output] -> [Maybe (Map Text (Map Text [Value]))]
|
||||
maybeMapSummary = fmap $ \case
|
||||
@ -184,18 +191,19 @@ runMaybeSummaries beforeSha afterSha repoPath repoFilePath GeneratorArgs{..}
|
||||
|
||||
-- | Commands represent the various combination of patches (insert, delete, replacement)
|
||||
-- | for a given syntax.
|
||||
commands :: JSONMetaSyntax -> [(JSONMetaSyntax, String, String, String)]
|
||||
commands metaSyntax@JSONMetaSyntax{..} =
|
||||
[ (metaSyntax, "insert", commaSeperator, fileWriteCommand repoFilePath insert <> commitCommand syntax "insert")
|
||||
, (metaSyntax, "replacement-insert", commaSeperator, fileWriteCommand repoFilePath (Prologue.intercalate "\n" [replacement, insert, insert]) <> commitCommand syntax "replacement + insert + insert")
|
||||
, (metaSyntax, "delete-insert", commaSeperator, fileWriteCommand repoFilePath (Prologue.intercalate "\n" [insert, insert, insert]) <> commitCommand syntax "delete + insert")
|
||||
, (metaSyntax, "replacement", commaSeperator, fileWriteCommand repoFilePath (Prologue.intercalate "\n" [replacement, insert, insert]) <> commitCommand syntax "replacement")
|
||||
, (metaSyntax, "delete-replacement", commaSeperator, fileWriteCommand repoFilePath (Prologue.intercalate "\n" [insert, replacement]) <> commitCommand syntax "delete + replacement")
|
||||
, (metaSyntax, "delete", commaSeperator, fileWriteCommand repoFilePath replacement <> commitCommand syntax "delete")
|
||||
, (metaSyntax, "delete-rest", spaceSeperator, removeCommand repoFilePath <> touchCommand repoFilePath <> commitCommand syntax "delete rest")
|
||||
commands :: JSONMetaRepo -> JSONMetaSyntax -> [(JSONMetaSyntax, String, String, String)]
|
||||
commands metaRepo metaSyntax@JSONMetaSyntax{..} =
|
||||
[ (metaSyntax, "insert", commaSeperator, fileAppendCommand repoFilePath insert <> commitCommand syntax "insert")
|
||||
, (metaSyntax, "replacement-insert", commaSeperator, fileWriteCommand repoFilePath templateText' <> fileAppendCommand repoFilePath (Prologue.intercalate "\n" [replacement, insert, insert]) <> commitCommand syntax "replacement + insert + insert")
|
||||
, (metaSyntax, "delete-insert", commaSeperator, fileWriteCommand repoFilePath templateText' <> fileAppendCommand repoFilePath (Prologue.intercalate "\n" [insert, insert, insert]) <> commitCommand syntax "delete + insert")
|
||||
, (metaSyntax, "replacement", commaSeperator, fileWriteCommand repoFilePath templateText' <> fileAppendCommand repoFilePath (Prologue.intercalate "\n" [replacement, insert, insert]) <> commitCommand syntax "replacement")
|
||||
, (metaSyntax, "delete-replacement", commaSeperator, fileWriteCommand repoFilePath templateText' <> fileAppendCommand repoFilePath (Prologue.intercalate "\n" [insert, replacement]) <> commitCommand syntax "delete + replacement")
|
||||
, (metaSyntax, "delete", commaSeperator, fileWriteCommand repoFilePath templateText' <> fileAppendCommand repoFilePath replacement <> commitCommand syntax "delete")
|
||||
, (metaSyntax, "delete-rest", spaceSeperator, fileWriteCommand repoFilePath templateText' <> commitCommand syntax "delete rest")
|
||||
]
|
||||
where commaSeperator = "\n,"
|
||||
spaceSeperator = ""
|
||||
templateText' = fromMaybe "" (templateText metaRepo)
|
||||
|
||||
-- | Attempts to pull from the git repository's remote repository.
|
||||
-- | If the pull fails, the exception is caught and continues to the next step.
|
||||
@ -260,6 +268,12 @@ fileWriteCommand repoFilePath contents = "echo \"" <> (escapeBackticks . escapeD
|
||||
escapeBackticks = DSUtils.replace "`" "\\`"
|
||||
escapeDoubleQuotes = DSUtils.replace "\"" "\\\""
|
||||
|
||||
fileAppendCommand :: FilePath -> String -> String
|
||||
fileAppendCommand repoFilePath contents = "echo \"" <> (escapeBackticks . escapeDoubleQuotes) contents <> "\" >> " <> repoFilePath <> ";"
|
||||
where
|
||||
escapeBackticks = DSUtils.replace "`" "\\`"
|
||||
escapeDoubleQuotes = DSUtils.replace "\"" "\\\""
|
||||
|
||||
commitCommand :: String -> String -> String
|
||||
commitCommand syntax commitMessage = "git add .; git commit -m \"" <> syntax <> ": " <> commitMessage <> "\"" <> ";"
|
||||
|
||||
|
@ -10,6 +10,7 @@ data JSONMetaRepo = JSONMetaRepo { repoPath :: !String
|
||||
, repoUrl :: !String
|
||||
, language :: !String
|
||||
, syntaxes :: ![JSONMetaSyntax]
|
||||
, templateText :: !(Maybe String)
|
||||
} deriving (Show, Generic, FromJSON)
|
||||
|
||||
data JSONMetaSyntax = JSONMetaSyntax { syntax :: !String
|
||||
|
@ -5,18 +5,30 @@
|
||||
"assignment.go": [
|
||||
{
|
||||
"span": {
|
||||
"insert": {
|
||||
"replace": [
|
||||
{
|
||||
"start": [
|
||||
1,
|
||||
1
|
||||
],
|
||||
"end": [
|
||||
1,
|
||||
17
|
||||
13
|
||||
]
|
||||
},
|
||||
{
|
||||
"start": [
|
||||
1,
|
||||
1
|
||||
],
|
||||
"end": [
|
||||
5,
|
||||
1
|
||||
]
|
||||
}
|
||||
]
|
||||
},
|
||||
"summary": "Added the 'foo' assignment"
|
||||
"summary": "Replaced the 'package main' source_file with the 'package main\n\n\nvar foo int = 42\n' source_file"
|
||||
}
|
||||
]
|
||||
},
|
||||
@ -25,9 +37,9 @@
|
||||
"filePaths": [
|
||||
"assignment.go"
|
||||
],
|
||||
"sha1": "e5c03dd2dec45eb07530e422c3037cbb3215f2c8",
|
||||
"sha1": "b9da8acec42374295d1e2c8ef4e718a71674b5c8",
|
||||
"gitDir": "test/corpus/repos/go",
|
||||
"sha2": "f24e7162d5add6f51ef328f9810a510ea8dc1779"
|
||||
"sha2": "78d912e517fdbf5bf094f2eb42416144c7bd6ba9"
|
||||
}
|
||||
,{
|
||||
"testCaseDescription": "go-assignment-replacement-insert-test",
|
||||
@ -43,8 +55,8 @@
|
||||
1
|
||||
],
|
||||
"end": [
|
||||
1,
|
||||
17
|
||||
5,
|
||||
1
|
||||
]
|
||||
},
|
||||
{
|
||||
@ -53,13 +65,13 @@
|
||||
1
|
||||
],
|
||||
"end": [
|
||||
4,
|
||||
7,
|
||||
1
|
||||
]
|
||||
}
|
||||
]
|
||||
},
|
||||
"summary": "Replaced the 'foo' assignment with the 'bar' assignment"
|
||||
"summary": "Replaced the 'package main\n\n\nvar foo int = 42\n' source_file with the 'package main\n\n\nvar bar string = \"hello\"\nvar foo int = 42\nvar foo int = 42\n' source_file"
|
||||
}
|
||||
]
|
||||
},
|
||||
@ -68,9 +80,9 @@
|
||||
"filePaths": [
|
||||
"assignment.go"
|
||||
],
|
||||
"sha1": "f24e7162d5add6f51ef328f9810a510ea8dc1779",
|
||||
"sha1": "78d912e517fdbf5bf094f2eb42416144c7bd6ba9",
|
||||
"gitDir": "test/corpus/repos/go",
|
||||
"sha2": "32ed6d330fd778f40d75859c4bc2b41110ccea7d"
|
||||
"sha2": "46b7a84458c868398bc8b288598385b7ecb00c31"
|
||||
}
|
||||
,{
|
||||
"testCaseDescription": "go-assignment-delete-insert-test",
|
||||
@ -86,7 +98,7 @@
|
||||
1
|
||||
],
|
||||
"end": [
|
||||
4,
|
||||
7,
|
||||
1
|
||||
]
|
||||
},
|
||||
@ -96,13 +108,13 @@
|
||||
1
|
||||
],
|
||||
"end": [
|
||||
4,
|
||||
7,
|
||||
1
|
||||
]
|
||||
}
|
||||
]
|
||||
},
|
||||
"summary": "Replaced the 'bar' assignment with the 'foo' assignment"
|
||||
"summary": "Replaced the 'package main\n\n\nvar bar string = \"hello\"\nvar foo int = 42\nvar foo int = 42\n' source_file with the 'package main\n\n\nvar foo int = 42\nvar foo int = 42\nvar foo int = 42\n' source_file"
|
||||
}
|
||||
]
|
||||
},
|
||||
@ -111,9 +123,9 @@
|
||||
"filePaths": [
|
||||
"assignment.go"
|
||||
],
|
||||
"sha1": "32ed6d330fd778f40d75859c4bc2b41110ccea7d",
|
||||
"sha1": "46b7a84458c868398bc8b288598385b7ecb00c31",
|
||||
"gitDir": "test/corpus/repos/go",
|
||||
"sha2": "69f46ae90b9ac56d897f6ca46d84e05593983cac"
|
||||
"sha2": "0660fdb214202450d7cce4f515f3a60ef9c10490"
|
||||
}
|
||||
,{
|
||||
"testCaseDescription": "go-assignment-replacement-test",
|
||||
@ -129,7 +141,7 @@
|
||||
1
|
||||
],
|
||||
"end": [
|
||||
4,
|
||||
7,
|
||||
1
|
||||
]
|
||||
},
|
||||
@ -139,13 +151,13 @@
|
||||
1
|
||||
],
|
||||
"end": [
|
||||
4,
|
||||
7,
|
||||
1
|
||||
]
|
||||
}
|
||||
]
|
||||
},
|
||||
"summary": "Replaced the 'bar' assignment with the 'foo' assignment"
|
||||
"summary": "Replaced the 'package main\n\n\nvar foo int = 42\nvar foo int = 42\nvar foo int = 42\n' source_file with the 'package main\n\n\nvar bar string = \"hello\"\nvar foo int = 42\nvar foo int = 42\n' source_file"
|
||||
}
|
||||
]
|
||||
},
|
||||
@ -154,9 +166,9 @@
|
||||
"filePaths": [
|
||||
"assignment.go"
|
||||
],
|
||||
"sha1": "69f46ae90b9ac56d897f6ca46d84e05593983cac",
|
||||
"sha1": "0660fdb214202450d7cce4f515f3a60ef9c10490",
|
||||
"gitDir": "test/corpus/repos/go",
|
||||
"sha2": "15c297fbbb50bebdaabb08a83d97fc00235a6655"
|
||||
"sha2": "f97f9b8acec8b3ff1d5ed77d9bc13c2666a6de4d"
|
||||
}
|
||||
,{
|
||||
"testCaseDescription": "go-assignment-delete-replacement-test",
|
||||
@ -172,7 +184,7 @@
|
||||
1
|
||||
],
|
||||
"end": [
|
||||
4,
|
||||
7,
|
||||
1
|
||||
]
|
||||
},
|
||||
@ -182,13 +194,13 @@
|
||||
1
|
||||
],
|
||||
"end": [
|
||||
3,
|
||||
6,
|
||||
1
|
||||
]
|
||||
}
|
||||
]
|
||||
},
|
||||
"summary": "Replaced the 'bar' assignment with the 'foo' assignment"
|
||||
"summary": "Replaced the 'package main\n\n\nvar bar string = \"hello\"\nvar foo int = 42\nvar foo int = 42\n' source_file with the 'package main\n\n\nvar foo int = 42\nvar bar string = \"hello\"\n' source_file"
|
||||
}
|
||||
]
|
||||
},
|
||||
@ -197,9 +209,9 @@
|
||||
"filePaths": [
|
||||
"assignment.go"
|
||||
],
|
||||
"sha1": "15c297fbbb50bebdaabb08a83d97fc00235a6655",
|
||||
"sha1": "f97f9b8acec8b3ff1d5ed77d9bc13c2666a6de4d",
|
||||
"gitDir": "test/corpus/repos/go",
|
||||
"sha2": "b166f37106251a0b4244cb96caa2c4115699c65f"
|
||||
"sha2": "26a079f5798bcd44defb40ff55f6e8a2691d3f85"
|
||||
}
|
||||
,{
|
||||
"testCaseDescription": "go-assignment-delete-test",
|
||||
@ -215,7 +227,7 @@
|
||||
1
|
||||
],
|
||||
"end": [
|
||||
3,
|
||||
6,
|
||||
1
|
||||
]
|
||||
},
|
||||
@ -225,13 +237,13 @@
|
||||
1
|
||||
],
|
||||
"end": [
|
||||
1,
|
||||
25
|
||||
5,
|
||||
1
|
||||
]
|
||||
}
|
||||
]
|
||||
},
|
||||
"summary": "Replaced the 'var bar string = \"hello\"\nvar foo int = 42\nvar foo int = 42\n' ERROR with the 'var foo int = 42\nvar bar string = \"hello\"\n' ERROR"
|
||||
"summary": "Replaced the 'package main\n\n\nvar foo int = 42\nvar bar string = \"hello\"\n' source_file with the 'package main\n\n\nvar bar string = \"hello\"\n' source_file"
|
||||
}
|
||||
]
|
||||
},
|
||||
@ -240,9 +252,9 @@
|
||||
"filePaths": [
|
||||
"assignment.go"
|
||||
],
|
||||
"sha1": "b166f37106251a0b4244cb96caa2c4115699c65f",
|
||||
"sha1": "26a079f5798bcd44defb40ff55f6e8a2691d3f85",
|
||||
"gitDir": "test/corpus/repos/go",
|
||||
"sha2": "8b609bd3d2e63b59cd2f4dbb0ef28d8a901a4016"
|
||||
"sha2": "7df173e52ab3790631e6c3f946896d283fbc433e"
|
||||
}
|
||||
,{
|
||||
"testCaseDescription": "go-assignment-delete-rest-test",
|
||||
@ -251,18 +263,30 @@
|
||||
"assignment.go": [
|
||||
{
|
||||
"span": {
|
||||
"delete": {
|
||||
"replace": [
|
||||
{
|
||||
"start": [
|
||||
1,
|
||||
1
|
||||
],
|
||||
"end": [
|
||||
5,
|
||||
1
|
||||
]
|
||||
},
|
||||
{
|
||||
"start": [
|
||||
1,
|
||||
1
|
||||
],
|
||||
"end": [
|
||||
1,
|
||||
25
|
||||
13
|
||||
]
|
||||
}
|
||||
]
|
||||
},
|
||||
"summary": "Deleted the 'bar' assignment"
|
||||
"summary": "Replaced the 'package main\n\n\nvar bar string = \"hello\"\n' source_file with the 'package main' source_file"
|
||||
}
|
||||
]
|
||||
},
|
||||
@ -271,7 +295,7 @@
|
||||
"filePaths": [
|
||||
"assignment.go"
|
||||
],
|
||||
"sha1": "8b609bd3d2e63b59cd2f4dbb0ef28d8a901a4016",
|
||||
"sha1": "7df173e52ab3790631e6c3f946896d283fbc433e",
|
||||
"gitDir": "test/corpus/repos/go",
|
||||
"sha2": "f6aae483e1a28331a6c388755ca93f8007caddff"
|
||||
"sha2": "d3fa479c4d82673363dbcee77472346afb069504"
|
||||
}]
|
||||
|
@ -3,6 +3,7 @@
|
||||
"repoPath": "test/corpus/repos/go",
|
||||
"repoUrl": "https://github.com/joshvera/go.git",
|
||||
"language": "go",
|
||||
"templateText": "package main\n",
|
||||
"syntaxes": [
|
||||
{
|
||||
"syntax": "assignment",
|
||||
|
@ -1 +1 @@
|
||||
Subproject commit f6aae483e1a28331a6c388755ca93f8007caddff
|
||||
Subproject commit d3fa479c4d82673363dbcee77472346afb069504
|
Loading…
Reference in New Issue
Block a user