Compare commits
	
		
			68 Commits
		
	
	
		
			feature/is
			...
			6419ad471e
		
	
	| Author | SHA1 | Date | |
|---|---|---|---|
| 6419ad471e | |||
| 759061b569 | |||
| 2115e9ceae | |||
| 2bea95c1a7 | |||
| 7001b693ae | |||
| e6f11081eb | |||
| 09db0cd35d | |||
| 980c8031c3 | |||
| b86d7a517d | |||
| b7478965ab | |||
| bf4a6deb86 | |||
| ffe730219d | |||
| 60c926c921 | |||
| 9371a09b71 | |||
| 4c3a7386b0 | |||
| 82c26acfc8 | |||
| 3a86f4f9de | |||
| 74ff1d455a | |||
| aa12e93177 | |||
| ae4322c1b9 | |||
| 9180ad1f9c | |||
| ee6a068b06 | |||
| b9b165465d | |||
| b97853ff5a | |||
| b7f023756e | |||
| 2095ac985b | |||
| 3fb8fe765a | |||
| 5fd226b670 | |||
| 417076f8e6 | |||
| 70839bbbf2 | |||
| 8db0cc5d05 | |||
| 212fb1c8ff | |||
| f74f98f361 | |||
| f074092a78 | |||
| 633c0d21a0 | |||
| 51f6fbe0dd | |||
| de45d06878 | |||
| c7038cafa5 | |||
| 40f50b0ec0 | |||
| b360fc2c75 | |||
| e21f8dc379 | |||
| 8ee3ac90f7 | |||
| d5763d2f36 | |||
| b5d915f389 | |||
| 813b40409d | |||
| c8a4a4c736 | |||
| 18e08cfc50 | |||
| 20e920338c | |||
| e151416f58 | |||
| 24de2bbdf5 | |||
| e68f9c573f | |||
| f38cc7d8b9 | |||
| 7af7e040da | |||
| 6e52af168b | |||
| bd0d15f3a2 | |||
| c78026b720 | |||
| edba497fa1 | |||
| 94e46b9968 | |||
| 9459632f6c | |||
| a0ca3cdfa5 | |||
| 720236ec3f | |||
| 957145ca84 | |||
| 0b719a4b57 | |||
| 57da07eb17 | |||
| b4b03f7850 | |||
| 145a0cf68b | |||
| 1cef7de8c7 | |||
| e95f422aab | 
| @@ -1,4 +1,3 @@ | |||||||
| --- |  | ||||||
| Language:        Cpp | Language:        Cpp | ||||||
| # BasedOnStyle:  LLVM | # BasedOnStyle:  LLVM | ||||||
| # should be in line with IndentWidth | # should be in line with IndentWidth | ||||||
| @@ -13,8 +12,8 @@ AllowAllParametersOfDeclarationOnNextLine: true | |||||||
| AllowShortBlocksOnASingleLine: false | AllowShortBlocksOnASingleLine: false | ||||||
| AllowShortCaseLabelsOnASingleLine: false | AllowShortCaseLabelsOnASingleLine: false | ||||||
| AllowShortFunctionsOnASingleLine: All | AllowShortFunctionsOnASingleLine: All | ||||||
| AllowShortIfStatementsOnASingleLine: true | AllowShortIfStatementsOnASingleLine: false | ||||||
| AllowShortLoopsOnASingleLine: true | AllowShortLoopsOnASingleLine: false | ||||||
| AlwaysBreakAfterDefinitionReturnType: None | AlwaysBreakAfterDefinitionReturnType: None | ||||||
| AlwaysBreakAfterReturnType: None | AlwaysBreakAfterReturnType: None | ||||||
| AlwaysBreakBeforeMultilineStrings: false | AlwaysBreakBeforeMultilineStrings: false | ||||||
| @@ -39,8 +38,8 @@ BreakBeforeTernaryOperators: true | |||||||
| BreakConstructorInitializersBeforeComma: true | BreakConstructorInitializersBeforeComma: true | ||||||
| BreakAfterJavaFieldAnnotations: false | BreakAfterJavaFieldAnnotations: false | ||||||
| BreakStringLiterals: true | BreakStringLiterals: true | ||||||
| ColumnLimit:     120 | ColumnLimit:     140 | ||||||
| CommentPragmas:  '^ IWYU pragma:' | CommentPragmas:  '^( IWYU pragma:| @suppress)' | ||||||
| ConstructorInitializerAllOnOneLineOrOnePerLine: false | ConstructorInitializerAllOnOneLineOrOnePerLine: false | ||||||
| ConstructorInitializerIndentWidth: 0 | ConstructorInitializerIndentWidth: 0 | ||||||
| ContinuationIndentWidth: 4 | ContinuationIndentWidth: 4 | ||||||
| @@ -76,13 +75,13 @@ PenaltyBreakFirstLessLess: 120 | |||||||
| PenaltyBreakString: 1000 | PenaltyBreakString: 1000 | ||||||
| PenaltyExcessCharacter: 1000000 | PenaltyExcessCharacter: 1000000 | ||||||
| PenaltyReturnTypeOnItsOwnLine: 60 | PenaltyReturnTypeOnItsOwnLine: 60 | ||||||
| PointerAlignment: Right | PointerAlignment: Left | ||||||
| ReflowComments:  true | ReflowComments:  true | ||||||
| SortIncludes:    true | SortIncludes:    true | ||||||
| SpaceAfterCStyleCast: false | SpaceAfterCStyleCast: false | ||||||
| SpaceAfterTemplateKeyword: true | SpaceAfterTemplateKeyword: true | ||||||
| SpaceBeforeAssignmentOperators: true | SpaceBeforeAssignmentOperators: true | ||||||
| SpaceBeforeParens: ControlStatements | SpaceBeforeParens: Never | ||||||
| SpaceInEmptyParentheses: false | SpaceInEmptyParentheses: false | ||||||
| SpacesBeforeTrailingComments: 1 | SpacesBeforeTrailingComments: 1 | ||||||
| SpacesInAngles:  false | SpacesInAngles:  false | ||||||
|   | |||||||
							
								
								
									
										2
									
								
								.gitignore
									
									
									
									
										vendored
									
									
								
							
							
						
						
									
										2
									
								
								.gitignore
									
									
									
									
										vendored
									
									
								
							| @@ -1,5 +1,6 @@ | |||||||
| .DS_Store | .DS_Store | ||||||
| /*.il | /*.il | ||||||
|  | /.settings | ||||||
| /avr-instr.html | /avr-instr.html | ||||||
| /blink.S | /blink.S | ||||||
| /flash.* | /flash.* | ||||||
| @@ -14,7 +15,6 @@ | |||||||
| /*.ods | /*.ods | ||||||
| /build*/ | /build*/ | ||||||
| /*.logs | /*.logs | ||||||
| language.settings.xml |  | ||||||
| /*.gtkw | /*.gtkw | ||||||
| /Debug wo LLVM/ | /Debug wo LLVM/ | ||||||
| /*.txdb | /*.txdb | ||||||
|   | |||||||
| @@ -1,73 +0,0 @@ | |||||||
| eclipse.preferences.version=1 |  | ||||||
| org.eclipse.cdt.codan.checkers.errnoreturn=Warning |  | ||||||
| org.eclipse.cdt.codan.checkers.errnoreturn.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"No return\\")",implicit\=>false} |  | ||||||
| org.eclipse.cdt.codan.checkers.errreturnvalue=Error |  | ||||||
| org.eclipse.cdt.codan.checkers.errreturnvalue.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Unused return value\\")"} |  | ||||||
| org.eclipse.cdt.codan.checkers.nocommentinside=-Error |  | ||||||
| org.eclipse.cdt.codan.checkers.nocommentinside.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Nesting comments\\")"} |  | ||||||
| org.eclipse.cdt.codan.checkers.nolinecomment=-Error |  | ||||||
| org.eclipse.cdt.codan.checkers.nolinecomment.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Line comments\\")"} |  | ||||||
| org.eclipse.cdt.codan.checkers.noreturn=Error |  | ||||||
| org.eclipse.cdt.codan.checkers.noreturn.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"No return value\\")",implicit\=>false} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.AbstractClassCreation=Error |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.AbstractClassCreation.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Abstract class cannot be instantiated\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.AmbiguousProblem=Error |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.AmbiguousProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Ambiguous problem\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.AssignmentInConditionProblem=Warning |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.AssignmentInConditionProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Assignment in condition\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.AssignmentToItselfProblem=Error |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.AssignmentToItselfProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Assignment to itself\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.CaseBreakProblem=Warning |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.CaseBreakProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"No break at end of case\\")",no_break_comment\=>"no break",last_case_param\=>false,empty_case_param\=>false,enable_fallthrough_quickfix_param\=>false} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.CatchByReference=Warning |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.CatchByReference.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Catching by reference is recommended\\")",unknown\=>false,exceptions\=>()} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.CircularReferenceProblem=Error |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.CircularReferenceProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Circular inheritance\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.ClassMembersInitialization=Warning |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.ClassMembersInitialization.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Class members should be properly initialized\\")",skip\=>true} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.DecltypeAutoProblem=Error |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.DecltypeAutoProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Invalid 'decltype(auto)' specifier\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.FieldResolutionProblem=Error |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.FieldResolutionProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Field cannot be resolved\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.FunctionResolutionProblem=Error |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.FunctionResolutionProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Function cannot be resolved\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.InvalidArguments=Error |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.InvalidArguments.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Invalid arguments\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.InvalidTemplateArgumentsProblem=Error |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.InvalidTemplateArgumentsProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Invalid template argument\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.LabelStatementNotFoundProblem=Error |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.LabelStatementNotFoundProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Label statement not found\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.MemberDeclarationNotFoundProblem=Error |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.MemberDeclarationNotFoundProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Member declaration not found\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.MethodResolutionProblem=Error |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.MethodResolutionProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Method cannot be resolved\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.NamingConventionFunctionChecker=-Info |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.NamingConventionFunctionChecker.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Name convention for function\\")",pattern\=>"^[a-z]",macro\=>true,exceptions\=>()} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.NonVirtualDestructorProblem=Warning |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.NonVirtualDestructorProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Class has a virtual method and non-virtual destructor\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.OverloadProblem=Error |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.OverloadProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Invalid overload\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.RedeclarationProblem=Error |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.RedeclarationProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Invalid redeclaration\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.RedefinitionProblem=Error |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.RedefinitionProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Invalid redefinition\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.ReturnStyleProblem=-Warning |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.ReturnStyleProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Return with parenthesis\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.ScanfFormatStringSecurityProblem=-Warning |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.ScanfFormatStringSecurityProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Format String Vulnerability\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.StatementHasNoEffectProblem=Warning |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.StatementHasNoEffectProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Statement has no effect\\")",macro\=>true,exceptions\=>()} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.SuggestedParenthesisProblem=Warning |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.SuggestedParenthesisProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Suggested parenthesis around expression\\")",paramNot\=>false} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.SuspiciousSemicolonProblem=Warning |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.SuspiciousSemicolonProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Suspicious semicolon\\")",else\=>false,afterelse\=>false} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.TypeResolutionProblem=Error |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.TypeResolutionProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Type cannot be resolved\\")"} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.UnusedFunctionDeclarationProblem=Warning |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.UnusedFunctionDeclarationProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Unused function declaration\\")",macro\=>true} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.UnusedStaticFunctionProblem=Warning |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.UnusedStaticFunctionProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Unused static function\\")",macro\=>true} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.UnusedVariableDeclarationProblem=Warning |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.UnusedVariableDeclarationProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Unused variable declaration in file scope\\")",macro\=>true,exceptions\=>("@(\#)","$Id")} |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.VariableResolutionProblem=Error |  | ||||||
| org.eclipse.cdt.codan.internal.checkers.VariableResolutionProblem.params={launchModes\=>{RUN_ON_FULL_BUILD\=>true,RUN_ON_INC_BUILD\=>true,RUN_ON_FILE_OPEN\=>false,RUN_ON_FILE_SAVE\=>false,RUN_AS_YOU_TYPE\=>true,RUN_ON_DEMAND\=>true},suppression_comment\=>"@suppress(\\"Symbol is not resolved\\")"} |  | ||||||
| @@ -1,13 +0,0 @@ | |||||||
| eclipse.preferences.version=1 |  | ||||||
| environment/project/cdt.managedbuild.config.gnu.exe.debug.1751741082/append=true |  | ||||||
| environment/project/cdt.managedbuild.config.gnu.exe.debug.1751741082/appendContributed=true |  | ||||||
| environment/project/cdt.managedbuild.config.gnu.exe.release.1745230171.1259602404/LLVM_HOME/delimiter=\: |  | ||||||
| environment/project/cdt.managedbuild.config.gnu.exe.release.1745230171.1259602404/LLVM_HOME/operation=append |  | ||||||
| environment/project/cdt.managedbuild.config.gnu.exe.release.1745230171.1259602404/LLVM_HOME/value=/usr/lib/llvm-6.0 |  | ||||||
| environment/project/cdt.managedbuild.config.gnu.exe.release.1745230171.1259602404/append=true |  | ||||||
| environment/project/cdt.managedbuild.config.gnu.exe.release.1745230171.1259602404/appendContributed=true |  | ||||||
| environment/project/cdt.managedbuild.config.gnu.exe.release.1745230171/LLVM_HOME/delimiter=\: |  | ||||||
| environment/project/cdt.managedbuild.config.gnu.exe.release.1745230171/LLVM_HOME/operation=append |  | ||||||
| environment/project/cdt.managedbuild.config.gnu.exe.release.1745230171/LLVM_HOME/value=/usr/lib/llvm-6.0 |  | ||||||
| environment/project/cdt.managedbuild.config.gnu.exe.release.1745230171/append=true |  | ||||||
| environment/project/cdt.managedbuild.config.gnu.exe.release.1745230171/appendContributed=true |  | ||||||
| @@ -1,37 +0,0 @@ | |||||||
| eclipse.preferences.version=1 |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.debug.1751741082/CPATH/delimiter=\: |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.debug.1751741082/CPATH/operation=remove |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.debug.1751741082/CPLUS_INCLUDE_PATH/delimiter=\: |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.debug.1751741082/CPLUS_INCLUDE_PATH/operation=remove |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.debug.1751741082/C_INCLUDE_PATH/delimiter=\: |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.debug.1751741082/C_INCLUDE_PATH/operation=remove |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.debug.1751741082/append=true |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.debug.1751741082/appendContributed=true |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.release.1745230171.1259602404/CPATH/delimiter=\: |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.release.1745230171.1259602404/CPATH/operation=remove |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.release.1745230171.1259602404/CPLUS_INCLUDE_PATH/delimiter=\: |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.release.1745230171.1259602404/CPLUS_INCLUDE_PATH/operation=remove |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.release.1745230171.1259602404/C_INCLUDE_PATH/delimiter=\: |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.release.1745230171.1259602404/C_INCLUDE_PATH/operation=remove |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.release.1745230171.1259602404/append=true |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.release.1745230171.1259602404/appendContributed=true |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.release.1745230171/CPATH/delimiter=\: |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.release.1745230171/CPATH/operation=remove |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.release.1745230171/CPLUS_INCLUDE_PATH/delimiter=\: |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.release.1745230171/CPLUS_INCLUDE_PATH/operation=remove |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.release.1745230171/C_INCLUDE_PATH/delimiter=\: |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.release.1745230171/C_INCLUDE_PATH/operation=remove |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.release.1745230171/append=true |  | ||||||
| environment/buildEnvironmentInclude/cdt.managedbuild.config.gnu.exe.release.1745230171/appendContributed=true |  | ||||||
| environment/buildEnvironmentLibrary/cdt.managedbuild.config.gnu.exe.debug.1751741082/LIBRARY_PATH/delimiter=\: |  | ||||||
| environment/buildEnvironmentLibrary/cdt.managedbuild.config.gnu.exe.debug.1751741082/LIBRARY_PATH/operation=remove |  | ||||||
| environment/buildEnvironmentLibrary/cdt.managedbuild.config.gnu.exe.debug.1751741082/append=true |  | ||||||
| environment/buildEnvironmentLibrary/cdt.managedbuild.config.gnu.exe.debug.1751741082/appendContributed=true |  | ||||||
| environment/buildEnvironmentLibrary/cdt.managedbuild.config.gnu.exe.release.1745230171.1259602404/LIBRARY_PATH/delimiter=\: |  | ||||||
| environment/buildEnvironmentLibrary/cdt.managedbuild.config.gnu.exe.release.1745230171.1259602404/LIBRARY_PATH/operation=remove |  | ||||||
| environment/buildEnvironmentLibrary/cdt.managedbuild.config.gnu.exe.release.1745230171.1259602404/append=true |  | ||||||
| environment/buildEnvironmentLibrary/cdt.managedbuild.config.gnu.exe.release.1745230171.1259602404/appendContributed=true |  | ||||||
| environment/buildEnvironmentLibrary/cdt.managedbuild.config.gnu.exe.release.1745230171/LIBRARY_PATH/delimiter=\: |  | ||||||
| environment/buildEnvironmentLibrary/cdt.managedbuild.config.gnu.exe.release.1745230171/LIBRARY_PATH/operation=remove |  | ||||||
| environment/buildEnvironmentLibrary/cdt.managedbuild.config.gnu.exe.release.1745230171/append=true |  | ||||||
| environment/buildEnvironmentLibrary/cdt.managedbuild.config.gnu.exe.release.1745230171/appendContributed=true |  | ||||||
							
								
								
									
										194
									
								
								CMakeLists.txt
									
									
									
									
									
								
							
							
						
						
									
										194
									
								
								CMakeLists.txt
									
									
									
									
									
								
							| @@ -1,114 +1,106 @@ | |||||||
| cmake_minimum_required(VERSION 3.12) | cmake_minimum_required(VERSION 3.12) | ||||||
|  | list(APPEND CMAKE_MODULE_PATH ${CMAKE_CURRENT_SOURCE_DIR}/cmake) | ||||||
| ############################################################################### | ############################################################################### | ||||||
| # | # | ||||||
| ############################################################################### | ############################################################################### | ||||||
| project(dbt-rise-tgc VERSION 1.0.0) | project(dbt-rise-tgc VERSION 1.0.0) | ||||||
|  |  | ||||||
| include(GNUInstallDirs) | include(GNUInstallDirs) | ||||||
|  | include(flink) | ||||||
|  |  | ||||||
| find_package(elfio QUIET) | find_package(elfio QUIET) | ||||||
| find_package(Boost COMPONENTS coroutine) |  | ||||||
| find_package(jsoncpp) | find_package(jsoncpp) | ||||||
|  | find_package(Boost COMPONENTS coroutine REQUIRED) | ||||||
| if(WITH_LLVM) |  | ||||||
|     if(DEFINED ENV{LLVM_HOME}) |  | ||||||
|         find_path (LLVM_DIR LLVM-Config.cmake $ENV{LLVM_HOME}/lib/cmake/llvm) |  | ||||||
|     endif(DEFINED ENV{LLVM_HOME}) |  | ||||||
|     find_package(LLVM REQUIRED CONFIG) |  | ||||||
|     message(STATUS "Found LLVM ${LLVM_PACKAGE_VERSION}") |  | ||||||
|     message(STATUS "Using LLVMConfig.cmake in: ${LLVM_DIR}") |  | ||||||
|     llvm_map_components_to_libnames(llvm_libs support core mcjit x86codegen x86asmparser) |  | ||||||
| endif() |  | ||||||
|  |  | ||||||
| #Mac needed variables (adapt for your needs - http://www.cmake.org/Wiki/CMake_RPATH_handling#Mac_OS_X_and_the_RPATH) |  | ||||||
| #set(CMAKE_MACOSX_RPATH ON) |  | ||||||
| #set(CMAKE_SKIP_BUILD_RPATH FALSE) |  | ||||||
| #set(CMAKE_BUILD_WITH_INSTALL_RPATH FALSE) |  | ||||||
| #set(CMAKE_INSTALL_RPATH "${CMAKE_INSTALL_PREFIX}/lib") |  | ||||||
| #set(CMAKE_INSTALL_RPATH_USE_LINK_PATH TRUE) |  | ||||||
|  |  | ||||||
| add_subdirectory(softfloat) | add_subdirectory(softfloat) | ||||||
|  |  | ||||||
| set(LIB_SOURCES  | set(LIB_SOURCES  | ||||||
|     src/iss/plugin/instruction_count.cpp |     src/iss/plugin/instruction_count.cpp | ||||||
| 	src/iss/arch/tgc_c.cpp | 	src/iss/arch/tgc5c.cpp | ||||||
| 	src/vm/interp/vm_tgc_c.cpp | 	src/vm/interp/vm_tgc5c.cpp | ||||||
| 	src/vm/fp_functions.cpp | 	src/vm/fp_functions.cpp | ||||||
| ) | ) | ||||||
|  | if(WITH_TCC) | ||||||
|  | 	list(APPEND LIB_SOURCES | ||||||
|  | 	   src/vm/tcc/vm_tgc5c.cpp | ||||||
|  |     ) | ||||||
|  | endif() | ||||||
|  | if(WITH_LLVM) | ||||||
|  | 	list(APPEND LIB_SOURCES | ||||||
|  | 		src/vm/llvm/vm_tgc5c.cpp | ||||||
|  | 		src/vm/llvm/fp_impl.cpp | ||||||
|  | 	) | ||||||
|  | endif() | ||||||
|  | if(WITH_ASMJIT) | ||||||
|  | 	list(APPEND LIB_SOURCES | ||||||
|  | 	   src/vm/asmjit/vm_tgc5c.cpp | ||||||
|  |     ) | ||||||
|  | endif() | ||||||
| # library files | # library files | ||||||
| if(TARGET ${CORE_NAME}_cpp) | FILE(GLOB GEN_ISS_SOURCES ${CMAKE_CURRENT_SOURCE_DIR}/src-gen/iss/arch/*.cpp) | ||||||
|     list(APPEND LIB_SOURCES ${${CORE_NAME}_OUTPUT_FILES}) | FILE(GLOB GEN_VM_SOURCES ${CMAKE_CURRENT_SOURCE_DIR}/src-gen/vm/interp/vm_*.cpp) | ||||||
| else() | FILE(GLOB GEN_YAML_SOURCES ${CMAKE_CURRENT_SOURCE_DIR}/contrib/instr/*.yaml) | ||||||
|     FILE(GLOB GEN_ISS_SOURCES ${CMAKE_CURRENT_SOURCE_DIR}/src-gen/iss/arch/*.cpp) | list(APPEND LIB_SOURCES ${GEN_ISS_SOURCES} ${GEN_VM_SOURCES}) | ||||||
|     FILE(GLOB GEN_VM_SOURCES ${CMAKE_CURRENT_SOURCE_DIR}/src-gen/vm/interp/vm_*.cpp) | foreach(FILEPATH ${GEN_ISS_SOURCES}) | ||||||
|     list(APPEND LIB_SOURCES ${GEN_ISS_SOURCES} ${GEN_VM_SOURCES}) |     get_filename_component(CORE ${FILEPATH} NAME_WE) | ||||||
|     foreach(FILEPATH ${GEN_ISS_SOURCES}) |     string(TOUPPER ${CORE} CORE) | ||||||
|         get_filename_component(CORE ${FILEPATH} NAME_WE) |     list(APPEND LIB_DEFINES CORE_${CORE}) | ||||||
|         string(TOUPPER ${CORE} CORE) | endforeach() | ||||||
|         list(APPEND LIB_DEFINES CORE_${CORE}) | message(STATUS "Core defines are ${LIB_DEFINES}") | ||||||
|     endforeach() |  | ||||||
|     message("Defines are ${LIB_DEFINES}") |  | ||||||
| endif() |  | ||||||
|  |  | ||||||
| if(TARGET RapidJSON OR TARGET RapidJSON::RapidJSON) |  | ||||||
|     list(APPEND LIB_SOURCES src/iss/plugin/cycle_estimate.cpp src/iss/plugin/pctrace.cpp) |  | ||||||
| endif() |  | ||||||
|  |  | ||||||
| if(WITH_LLVM) | if(WITH_LLVM) | ||||||
| 	FILE(GLOB LLVM_GEN_SOURCES | 	FILE(GLOB LLVM_GEN_SOURCES ${CMAKE_CURRENT_SOURCE_DIR}/src-gen/vm/llvm/vm_*.cpp) | ||||||
| 	    ${CMAKE_CURRENT_SOURCE_DIR}/src-gen/vm/llvm/vm_*.cpp |  | ||||||
| 	) |  | ||||||
| 	list(APPEND LIB_SOURCES ${LLVM_GEN_SOURCES}) | 	list(APPEND LIB_SOURCES ${LLVM_GEN_SOURCES}) | ||||||
| endif() | endif() | ||||||
|  |  | ||||||
| if(WITH_TCC) | if(WITH_TCC) | ||||||
| 	FILE(GLOB TCC_GEN_SOURCES | 	FILE(GLOB TCC_GEN_SOURCES ${CMAKE_CURRENT_SOURCE_DIR}/src-gen/vm/tcc/vm_*.cpp) | ||||||
| 	    ${CMAKE_CURRENT_SOURCE_DIR}/src/vm/tcc/vm_*.cpp |  | ||||||
| 	) |  | ||||||
| 	list(APPEND LIB_SOURCES ${TCC_GEN_SOURCES}) | 	list(APPEND LIB_SOURCES ${TCC_GEN_SOURCES}) | ||||||
| endif() | endif() | ||||||
|  | if(WITH_ASMJIT) | ||||||
| # Define the library | 	FILE(GLOB TCC_GEN_SOURCES ${CMAKE_CURRENT_SOURCE_DIR}/src-gen/vm/asmjit/vm_*.cpp) | ||||||
| add_library(${PROJECT_NAME} ${LIB_SOURCES}) | 	list(APPEND LIB_SOURCES ${TCC_GEN_SOURCES}) | ||||||
| # list code gen dependencies |  | ||||||
| if(TARGET ${CORE_NAME}_cpp) |  | ||||||
|     add_dependencies(${PROJECT_NAME} ${CORE_NAME}_cpp) |  | ||||||
| endif() | endif() | ||||||
|  | if(TARGET yaml-cpp::yaml-cpp) | ||||||
|  |     list(APPEND LIB_SOURCES  | ||||||
|  |     	src/iss/plugin/cycle_estimate.cpp | ||||||
|  | 	    src/iss/plugin/instruction_count.cpp | ||||||
|  |     ) | ||||||
|  | endif() | ||||||
|  | # Define the library | ||||||
|  | add_library(${PROJECT_NAME} SHARED ${LIB_SOURCES}) | ||||||
|  |  | ||||||
| if("${CMAKE_CXX_COMPILER_ID}" STREQUAL "GNU") | if("${CMAKE_CXX_COMPILER_ID}" STREQUAL "GNU") | ||||||
|      target_compile_options(${PROJECT_NAME} PRIVATE -Wno-shift-count-overflow) |     target_compile_options(${PROJECT_NAME} PRIVATE -Wno-shift-count-overflow) | ||||||
| elseif("${CMAKE_CXX_COMPILER_ID}" STREQUAL "MSVC") | elseif("${CMAKE_CXX_COMPILER_ID}" STREQUAL "MSVC") | ||||||
|     target_compile_options(${PROJECT_NAME} PRIVATE /wd4293) |     target_compile_options(${PROJECT_NAME} PRIVATE /wd4293) | ||||||
| endif() | endif() | ||||||
| target_include_directories(${PROJECT_NAME} PUBLIC src) | target_include_directories(${PROJECT_NAME} PUBLIC src) | ||||||
| target_include_directories(${PROJECT_NAME} PUBLIC src-gen) | target_include_directories(${PROJECT_NAME} PUBLIC src-gen) | ||||||
| target_link_libraries(${PROJECT_NAME} PUBLIC softfloat scc-util Boost::coroutine) |  | ||||||
| if(TARGET jsoncpp::jsoncpp) | target_force_link_libraries(${PROJECT_NAME} PRIVATE dbt-rise-core) | ||||||
| 	target_link_libraries(${PROJECT_NAME} PUBLIC jsoncpp::jsoncpp) | # only re-export the include paths | ||||||
| else() | get_target_property(DBT_CORE_INCL dbt-rise-core INTERFACE_INCLUDE_DIRECTORIES) | ||||||
| 	target_link_libraries(${PROJECT_NAME} PUBLIC jsoncpp) | target_include_directories(${PROJECT_NAME} INTERFACE ${DBT_CORE_INCL}) | ||||||
| endif() | get_target_property(DBT_CORE_DEFS dbt-rise-core INTERFACE_COMPILE_DEFINITIONS) | ||||||
| if("${CMAKE_CXX_COMPILER_ID}" STREQUAL "GNU" AND BUILD_SHARED_LIBS) | if(NOT (DBT_CORE_DEFS STREQUAL DBT_CORE_DEFS-NOTFOUND)) | ||||||
|     target_link_libraries(${PROJECT_NAME} PUBLIC -Wl,--whole-archive dbt-rise-core -Wl,--no-whole-archive) | 	target_compile_definitions(${PROJECT_NAME} INTERFACE ${DBT_CORE_DEFS}) | ||||||
| else() |  | ||||||
|     target_link_libraries(${PROJECT_NAME} PUBLIC dbt-rise-core) |  | ||||||
| endif() |  | ||||||
| if(TARGET elfio::elfio) |  | ||||||
|     target_link_libraries(${PROJECT_NAME} PUBLIC elfio::elfio) |  | ||||||
| else() |  | ||||||
|     message(FATAL_ERROR "No elfio library found, maybe a find_package() call is missing") |  | ||||||
| endif() |  | ||||||
| if(TARGET lz4::lz4) |  | ||||||
|     target_compile_definitions(${PROJECT_NAME} PUBLIC WITH_LZ4) |  | ||||||
|     target_link_libraries(${PROJECT_NAME} PUBLIC lz4::lz4) |  | ||||||
| endif() |  | ||||||
| if(TARGET RapidJSON::RapidJSON) |  | ||||||
|     target_link_libraries(${PROJECT_NAME} PUBLIC RapidJSON::RapidJSON) |  | ||||||
| elseif(TARGET RapidJSON) |  | ||||||
|     target_link_libraries(${PROJECT_NAME} PUBLIC RapidJSON) |  | ||||||
| endif() | endif() | ||||||
|  |  | ||||||
|  | target_link_libraries(${PROJECT_NAME} PUBLIC elfio::elfio softfloat scc-util Boost::coroutine) | ||||||
|  | if(TARGET yaml-cpp::yaml-cpp) | ||||||
|  | 	target_compile_definitions(${PROJECT_NAME} PUBLIC WITH_PLUGINS) | ||||||
|  | 	target_link_libraries(${PROJECT_NAME} PUBLIC yaml-cpp::yaml-cpp) | ||||||
|  | endif() | ||||||
|  |  | ||||||
|  | if(WITH_LLVM) | ||||||
|  |     find_package(LLVM) | ||||||
|  | 	target_compile_definitions(${PROJECT_NAME} PUBLIC ${LLVM_DEFINITIONS}) | ||||||
|  | 	target_include_directories(${PROJECT_NAME} PUBLIC ${LLVM_INCLUDE_DIRS}) | ||||||
|  | 	if(BUILD_SHARED_LIBS) | ||||||
|  | 		target_link_libraries( ${PROJECT_NAME} PUBLIC ${LLVM_LIBRARIES}) | ||||||
|  | 	endif() | ||||||
|  | endif() | ||||||
|  |  | ||||||
| set_target_properties(${PROJECT_NAME} PROPERTIES | set_target_properties(${PROJECT_NAME} PROPERTIES | ||||||
|   VERSION ${PROJECT_VERSION} |   VERSION ${PROJECT_VERSION} | ||||||
| @@ -128,9 +120,11 @@ install(DIRECTORY ${CMAKE_CURRENT_SOURCE_DIR}/incl/iss COMPONENT ${PROJECT_NAME} | |||||||
|         FILES_MATCHING # install only matched files |         FILES_MATCHING # install only matched files | ||||||
|         PATTERN "*.h" # select header files |         PATTERN "*.h" # select header files | ||||||
|         ) |         ) | ||||||
|  | install(FILES ${GEN_YAML_SOURCES} DESTINATION share/tgc-vp) | ||||||
| ############################################################################### | ############################################################################### | ||||||
| # | # | ||||||
| ############################################################################### | ############################################################################### | ||||||
|  | set(CMAKE_INSTALL_RPATH $ORIGIN/../${CMAKE_INSTALL_LIBDIR}) | ||||||
| project(tgc-sim) | project(tgc-sim) | ||||||
| find_package(Boost COMPONENTS program_options thread REQUIRED) | find_package(Boost COMPONENTS program_options thread REQUIRED) | ||||||
|  |  | ||||||
| @@ -153,15 +147,16 @@ foreach(F IN LISTS TGC_SOURCES) | |||||||
|     endif() |     endif() | ||||||
| endforeach() | endforeach() | ||||||
|  |  | ||||||
| if(WITH_LLVM) | #if(WITH_LLVM) | ||||||
|     target_compile_definitions(${PROJECT_NAME} PRIVATE WITH_LLVM) | #    target_compile_definitions(${PROJECT_NAME} PRIVATE WITH_LLVM) | ||||||
|     target_link_libraries(${PROJECT_NAME} PUBLIC ${llvm_libs}) | #    #target_link_libraries(${PROJECT_NAME} PUBLIC ${llvm_libs}) | ||||||
| endif() | #endif() | ||||||
| if(WITH_TCC) | #if(WITH_TCC) | ||||||
|     target_compile_definitions(${PROJECT_NAME} PRIVATE WITH_TCC) | #    target_compile_definitions(${PROJECT_NAME} PRIVATE WITH_TCC) | ||||||
| endif() | #endif() | ||||||
| # Links the target exe against the libraries |  | ||||||
| target_link_libraries(${PROJECT_NAME} PUBLIC dbt-rise-tgc) | target_link_libraries(${PROJECT_NAME} PUBLIC dbt-rise-tgc fmt::fmt) | ||||||
|  |  | ||||||
| if(TARGET Boost::program_options) | if(TARGET Boost::program_options) | ||||||
|     target_link_libraries(${PROJECT_NAME} PUBLIC Boost::program_options) |     target_link_libraries(${PROJECT_NAME} PUBLIC Boost::program_options) | ||||||
| else() | else() | ||||||
| @@ -181,15 +176,36 @@ install(TARGETS tgc-sim | |||||||
|   PUBLIC_HEADER DESTINATION ${CMAKE_INSTALL_INCLUDEDIR}/${PROJECT_NAME}  # headers for mac (note the different component -> different package) |   PUBLIC_HEADER DESTINATION ${CMAKE_INSTALL_INCLUDEDIR}/${PROJECT_NAME}  # headers for mac (note the different component -> different package) | ||||||
|   INCLUDES DESTINATION ${CMAKE_INSTALL_INCLUDEDIR}             # headers |   INCLUDES DESTINATION ${CMAKE_INSTALL_INCLUDEDIR}             # headers | ||||||
| ) | ) | ||||||
|  |  | ||||||
|  | if(BUILD_TESTING) | ||||||
|  |   	# ... CMake code to create tests ... | ||||||
|  | 	add_test(NAME tgc-sim-interp | ||||||
|  | 	         COMMAND tgc-sim -f ${CMAKE_BINARY_DIR}/../../Firmwares/hello-world/hello --backend interp) | ||||||
|  | 	if(WITH_TCC) | ||||||
|  | 	add_test(NAME tgc-sim-tcc | ||||||
|  | 	         COMMAND tgc-sim -f ${CMAKE_BINARY_DIR}/../../Firmwares/hello-world/hello --backend tcc) | ||||||
|  | 	endif() | ||||||
|  | 	if(WITH_LLVM) | ||||||
|  | 	add_test(NAME tgc-sim-llvm | ||||||
|  | 	         COMMAND tgc-sim -f ${CMAKE_BINARY_DIR}/../../Firmwares/hello-world/hello --backend llvm) | ||||||
|  | 	endif() | ||||||
|  |     if(WITH_ASMJIT) | ||||||
|  | 	add_test(NAME tgc-sim-asmjit | ||||||
|  | 	         COMMAND tgc-sim -f ${CMAKE_BINARY_DIR}/../../Firmwares/hello-world/hello --backend asmjit) | ||||||
|  | 	endif() | ||||||
|  | endif() | ||||||
| ############################################################################### | ############################################################################### | ||||||
| # | # | ||||||
| ############################################################################### | ############################################################################### | ||||||
| if(TARGET scc-sysc) | if(TARGET scc-sysc) | ||||||
| 	project(dbt-rise-tgc_sc VERSION 1.0.0) | 	project(dbt-rise-tgc_sc VERSION 1.0.0) | ||||||
|     add_library(${PROJECT_NAME}  | 	set(LIB_SOURCES  | ||||||
|     	src/sysc/core_complex.cpp |     	src/sysc/core_complex.cpp | ||||||
|     	src/sysc/register_tgc_c.cpp |     	src/sysc/register_tgc_c.cpp | ||||||
|     ) | 	) | ||||||
|  | 	FILE(GLOB GEN_SC_SOURCES ${CMAKE_CURRENT_SOURCE_DIR}/src-gen/sysc/register_*.cpp) | ||||||
|  | 	list(APPEND LIB_SOURCES ${GEN_SC_SOURCES}) | ||||||
|  |     add_library(${PROJECT_NAME} ${LIB_SOURCES}) | ||||||
|     target_compile_definitions(${PROJECT_NAME} PUBLIC WITH_SYSTEMC) |     target_compile_definitions(${PROJECT_NAME} PUBLIC WITH_SYSTEMC) | ||||||
|     target_compile_definitions(${PROJECT_NAME} PRIVATE CORE_${CORE_NAME}) |     target_compile_definitions(${PROJECT_NAME} PRIVATE CORE_${CORE_NAME}) | ||||||
|     foreach(F IN LISTS TGC_SOURCES) |     foreach(F IN LISTS TGC_SOURCES) | ||||||
| @@ -200,9 +216,9 @@ if(TARGET scc-sysc) | |||||||
|         endif() |         endif() | ||||||
|     endforeach() |     endforeach() | ||||||
|     target_link_libraries(${PROJECT_NAME} PUBLIC dbt-rise-tgc scc-sysc) |     target_link_libraries(${PROJECT_NAME} PUBLIC dbt-rise-tgc scc-sysc) | ||||||
|     if(WITH_LLVM) | #    if(WITH_LLVM) | ||||||
|         target_link_libraries(${PROJECT_NAME} PUBLIC ${llvm_libs}) | #        target_link_libraries(${PROJECT_NAME} PUBLIC ${llvm_libs}) | ||||||
|     endif() | #    endif() | ||||||
|      |      | ||||||
| 	set(LIB_HEADERS ${CMAKE_CURRENT_SOURCE_DIR}/src/sysc/core_complex.h) | 	set(LIB_HEADERS ${CMAKE_CURRENT_SOURCE_DIR}/src/sysc/core_complex.h) | ||||||
|     set_target_properties(${PROJECT_NAME} PROPERTIES |     set_target_properties(${PROJECT_NAME} PROPERTIES | ||||||
|   | |||||||
							
								
								
									
										35
									
								
								cmake/flink.cmake
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										35
									
								
								cmake/flink.cmake
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,35 @@ | |||||||
|  | # according to https://github.com/horance-liu/flink.cmake/tree/master | ||||||
|  | # SPDX-License-Identifier: Apache-2.0 | ||||||
|  |  | ||||||
|  | include(CMakeParseArguments) | ||||||
|  |  | ||||||
|  | function(target_do_force_link_libraries target visibility lib) | ||||||
|  |   if(MSVC) | ||||||
|  |     target_link_libraries(${target} ${visibility} "/WHOLEARCHIVE:${lib}") | ||||||
|  |   elseif(APPLE) | ||||||
|  |     target_link_libraries(${target} ${visibility} -Wl,-force_load ${lib}) | ||||||
|  |   else() | ||||||
|  |     target_link_libraries(${target} ${visibility} -Wl,--whole-archive ${lib} -Wl,--no-whole-archive) | ||||||
|  |   endif() | ||||||
|  | endfunction() | ||||||
|  |  | ||||||
|  | function(target_force_link_libraries target) | ||||||
|  |   cmake_parse_arguments(FLINK | ||||||
|  |     "" | ||||||
|  |     "" | ||||||
|  |     "PUBLIC;INTERFACE;PRIVATE" | ||||||
|  |     ${ARGN} | ||||||
|  |   ) | ||||||
|  |    | ||||||
|  |   foreach(lib IN LISTS FLINK_PUBLIC) | ||||||
|  |     target_do_force_link_libraries(${target} PUBLIC ${lib}) | ||||||
|  |   endforeach() | ||||||
|  |  | ||||||
|  |   foreach(lib IN LISTS FLINK_INTERFACE) | ||||||
|  |     target_do_force_link_libraries(${target} INTERFACE ${lib}) | ||||||
|  |   endforeach() | ||||||
|  |    | ||||||
|  |   foreach(lib IN LISTS FLINK_PRIVATE) | ||||||
|  |     target_do_force_link_libraries(${target} PRIVATE ${lib}) | ||||||
|  |   endforeach() | ||||||
|  | endfunction() | ||||||
							
								
								
									
										1
									
								
								contrib/instr/.gitignore
									
									
									
									
										vendored
									
									
										Normal file
									
								
							
							
						
						
									
										1
									
								
								contrib/instr/.gitignore
									
									
									
									
										vendored
									
									
										Normal file
									
								
							| @@ -0,0 +1 @@ | |||||||
|  | /*.yaml | ||||||
| @@ -1,307 +1,348 @@ | |||||||
| 
 | 
 | ||||||
| RV32I:  | RV32I:  | ||||||
|   - LUI: |   LUI: | ||||||
|  |     index: 0 | ||||||
|     encoding: 0b00000000000000000000000000110111 |     encoding: 0b00000000000000000000000000110111 | ||||||
|     mask: 0b00000000000000000000000001111111 |     mask: 0b00000000000000000000000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - AUIPC: |   AUIPC: | ||||||
|  |     index: 1 | ||||||
|     encoding: 0b00000000000000000000000000010111 |     encoding: 0b00000000000000000000000000010111 | ||||||
|     mask: 0b00000000000000000000000001111111 |     mask: 0b00000000000000000000000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - JAL: |   JAL: | ||||||
|  |     index: 2 | ||||||
|     encoding: 0b00000000000000000000000001101111 |     encoding: 0b00000000000000000000000001101111 | ||||||
|     mask: 0b00000000000000000000000001111111 |     mask: 0b00000000000000000000000001111111 | ||||||
|     attributes: [[name:no_cont]] |  | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   true |     branch:   true | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - JALR: |   JALR: | ||||||
|  |     index: 3 | ||||||
|     encoding: 0b00000000000000000000000001100111 |     encoding: 0b00000000000000000000000001100111 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     attributes: [[name:no_cont]] |  | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   true |     branch:   true | ||||||
|     delay:   1 |     delay:   [1,2] | ||||||
|   - BEQ: |   BEQ: | ||||||
|  |     index: 4 | ||||||
|     encoding: 0b00000000000000000000000001100011 |     encoding: 0b00000000000000000000000001100011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     attributes: [[name:no_cont], [name:cond]] |  | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   true |     branch:   true | ||||||
|     delay:   [1,1] |     delay:   [1,2] | ||||||
|   - BNE: |   BNE: | ||||||
|  |     index: 5 | ||||||
|     encoding: 0b00000000000000000001000001100011 |     encoding: 0b00000000000000000001000001100011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     attributes: [[name:no_cont], [name:cond]] |  | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   true |     branch:   true | ||||||
|     delay:   [1,1] |     delay:   [1,2] | ||||||
|   - BLT: |   BLT: | ||||||
|  |     index: 6 | ||||||
|     encoding: 0b00000000000000000100000001100011 |     encoding: 0b00000000000000000100000001100011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     attributes: [[name:no_cont], [name:cond]] |  | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   true |     branch:   true | ||||||
|     delay:   [1,1] |     delay:   [1,2] | ||||||
|   - BGE: |   BGE: | ||||||
|  |     index: 7 | ||||||
|     encoding: 0b00000000000000000101000001100011 |     encoding: 0b00000000000000000101000001100011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     attributes: [[name:no_cont], [name:cond]] |  | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   true |     branch:   true | ||||||
|     delay:   [1,1] |     delay:   [1,2] | ||||||
|   - BLTU: |   BLTU: | ||||||
|  |     index: 8 | ||||||
|     encoding: 0b00000000000000000110000001100011 |     encoding: 0b00000000000000000110000001100011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     attributes: [[name:no_cont], [name:cond]] |  | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   true |     branch:   true | ||||||
|     delay:   [1,1] |     delay:   [1,2] | ||||||
|   - BGEU: |   BGEU: | ||||||
|  |     index: 9 | ||||||
|     encoding: 0b00000000000000000111000001100011 |     encoding: 0b00000000000000000111000001100011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     attributes: [[name:no_cont], [name:cond]] |  | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   true |     branch:   true | ||||||
|     delay:   [1,1] |     delay:   [1,2] | ||||||
|   - LB: |   LB: | ||||||
|  |     index: 10 | ||||||
|     encoding: 0b00000000000000000000000000000011 |     encoding: 0b00000000000000000000000000000011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   2 | ||||||
|   - LH: |   LH: | ||||||
|  |     index: 11 | ||||||
|     encoding: 0b00000000000000000001000000000011 |     encoding: 0b00000000000000000001000000000011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   2 | ||||||
|   - LW: |   LW: | ||||||
|  |     index: 12 | ||||||
|     encoding: 0b00000000000000000010000000000011 |     encoding: 0b00000000000000000010000000000011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   2 | ||||||
|   - LBU: |   LBU: | ||||||
|  |     index: 13 | ||||||
|     encoding: 0b00000000000000000100000000000011 |     encoding: 0b00000000000000000100000000000011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   2 | ||||||
|   - LHU: |   LHU: | ||||||
|  |     index: 14 | ||||||
|     encoding: 0b00000000000000000101000000000011 |     encoding: 0b00000000000000000101000000000011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   2 | ||||||
|   - SB: |   SB: | ||||||
|  |     index: 15 | ||||||
|     encoding: 0b00000000000000000000000000100011 |     encoding: 0b00000000000000000000000000100011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - SH: |   SH: | ||||||
|  |     index: 16 | ||||||
|     encoding: 0b00000000000000000001000000100011 |     encoding: 0b00000000000000000001000000100011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - SW: |   SW: | ||||||
|  |     index: 17 | ||||||
|     encoding: 0b00000000000000000010000000100011 |     encoding: 0b00000000000000000010000000100011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - ADDI: |   ADDI: | ||||||
|  |     index: 18 | ||||||
|     encoding: 0b00000000000000000000000000010011 |     encoding: 0b00000000000000000000000000010011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - SLTI: |   SLTI: | ||||||
|  |     index: 19 | ||||||
|     encoding: 0b00000000000000000010000000010011 |     encoding: 0b00000000000000000010000000010011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - SLTIU: |   SLTIU: | ||||||
|  |     index: 20 | ||||||
|     encoding: 0b00000000000000000011000000010011 |     encoding: 0b00000000000000000011000000010011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - XORI: |   XORI: | ||||||
|  |     index: 21 | ||||||
|     encoding: 0b00000000000000000100000000010011 |     encoding: 0b00000000000000000100000000010011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - ORI: |   ORI: | ||||||
|  |     index: 22 | ||||||
|     encoding: 0b00000000000000000110000000010011 |     encoding: 0b00000000000000000110000000010011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - ANDI: |   ANDI: | ||||||
|  |     index: 23 | ||||||
|     encoding: 0b00000000000000000111000000010011 |     encoding: 0b00000000000000000111000000010011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - SLLI: |   SLLI: | ||||||
|  |     index: 24 | ||||||
|     encoding: 0b00000000000000000001000000010011 |     encoding: 0b00000000000000000001000000010011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - SRLI: |   SRLI: | ||||||
|  |     index: 25 | ||||||
|     encoding: 0b00000000000000000101000000010011 |     encoding: 0b00000000000000000101000000010011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - SRAI: |   SRAI: | ||||||
|  |     index: 26 | ||||||
|     encoding: 0b01000000000000000101000000010011 |     encoding: 0b01000000000000000101000000010011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - ADD: |   ADD: | ||||||
|  |     index: 27 | ||||||
|     encoding: 0b00000000000000000000000000110011 |     encoding: 0b00000000000000000000000000110011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - SUB: |   SUB: | ||||||
|  |     index: 28 | ||||||
|     encoding: 0b01000000000000000000000000110011 |     encoding: 0b01000000000000000000000000110011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - SLL: |   SLL: | ||||||
|  |     index: 29 | ||||||
|     encoding: 0b00000000000000000001000000110011 |     encoding: 0b00000000000000000001000000110011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - SLT: |   SLT: | ||||||
|  |     index: 30 | ||||||
|     encoding: 0b00000000000000000010000000110011 |     encoding: 0b00000000000000000010000000110011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - SLTU: |   SLTU: | ||||||
|  |     index: 31 | ||||||
|     encoding: 0b00000000000000000011000000110011 |     encoding: 0b00000000000000000011000000110011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - XOR: |   XOR: | ||||||
|  |     index: 32 | ||||||
|     encoding: 0b00000000000000000100000000110011 |     encoding: 0b00000000000000000100000000110011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - SRL: |   SRL: | ||||||
|  |     index: 33 | ||||||
|     encoding: 0b00000000000000000101000000110011 |     encoding: 0b00000000000000000101000000110011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - SRA: |   SRA: | ||||||
|  |     index: 34 | ||||||
|     encoding: 0b01000000000000000101000000110011 |     encoding: 0b01000000000000000101000000110011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - OR: |   OR: | ||||||
|  |     index: 35 | ||||||
|     encoding: 0b00000000000000000110000000110011 |     encoding: 0b00000000000000000110000000110011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - AND: |   AND: | ||||||
|  |     index: 36 | ||||||
|     encoding: 0b00000000000000000111000000110011 |     encoding: 0b00000000000000000111000000110011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - FENCE: |   FENCE: | ||||||
|  |     index: 37 | ||||||
|     encoding: 0b00000000000000000000000000001111 |     encoding: 0b00000000000000000000000000001111 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - ECALL: |   ECALL: | ||||||
|  |     index: 38 | ||||||
|     encoding: 0b00000000000000000000000001110011 |     encoding: 0b00000000000000000000000001110011 | ||||||
|     mask: 0b11111111111111111111111111111111 |     mask: 0b11111111111111111111111111111111 | ||||||
|     attributes: [[name:no_cont]] |     attributes: [[name:no_cont]] | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - EBREAK: |   EBREAK: | ||||||
|  |     index: 39 | ||||||
|     encoding: 0b00000000000100000000000001110011 |     encoding: 0b00000000000100000000000001110011 | ||||||
|     mask: 0b11111111111111111111111111111111 |     mask: 0b11111111111111111111111111111111 | ||||||
|     attributes: [[name:no_cont]] |     attributes: [[name:no_cont]] | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - MRET: |   MRET: | ||||||
|  |     index: 40 | ||||||
|     encoding: 0b00110000001000000000000001110011 |     encoding: 0b00110000001000000000000001110011 | ||||||
|     mask: 0b11111111111111111111111111111111 |     mask: 0b11111111111111111111111111111111 | ||||||
|     attributes: [[name:no_cont]] |     attributes: [[name:no_cont]] | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - WFI: |   WFI: | ||||||
|  |     index: 41 | ||||||
|     encoding: 0b00010000010100000000000001110011 |     encoding: 0b00010000010100000000000001110011 | ||||||
|     mask: 0b11111111111111111111111111111111 |     mask: 0b11111111111111111111111111111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
| Zicsr:  | Zicsr:  | ||||||
|   - CSRRW: |   CSRRW: | ||||||
|  |     index: 42 | ||||||
|     encoding: 0b00000000000000000001000001110011 |     encoding: 0b00000000000000000001000001110011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CSRRS: |   CSRRS: | ||||||
|  |     index: 43 | ||||||
|     encoding: 0b00000000000000000010000001110011 |     encoding: 0b00000000000000000010000001110011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CSRRC: |   CSRRC: | ||||||
|  |     index: 44 | ||||||
|     encoding: 0b00000000000000000011000001110011 |     encoding: 0b00000000000000000011000001110011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CSRRWI: |   CSRRWI: | ||||||
|  |     index: 45 | ||||||
|     encoding: 0b00000000000000000101000001110011 |     encoding: 0b00000000000000000101000001110011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CSRRSI: |   CSRRSI: | ||||||
|  |     index: 46 | ||||||
|     encoding: 0b00000000000000000110000001110011 |     encoding: 0b00000000000000000110000001110011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CSRRCI: |   CSRRCI: | ||||||
|  |     index: 47 | ||||||
|     encoding: 0b00000000000000000111000001110011 |     encoding: 0b00000000000000000111000001110011 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
| Zifencei:  | Zifencei:  | ||||||
|   - FENCE_I: |   FENCE_I: | ||||||
|  |     index: 48 | ||||||
|     encoding: 0b00000000000000000001000000001111 |     encoding: 0b00000000000000000001000000001111 | ||||||
|     mask: 0b00000000000000000111000001111111 |     mask: 0b00000000000000000111000001111111 | ||||||
|     attributes: [[name:flush]] |     attributes: [[name:flush]] | ||||||
| @@ -309,228 +350,274 @@ Zifencei: | |||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
| RV32M:  | RV32M:  | ||||||
|   - MUL: |   MUL: | ||||||
|  |     index: 49 | ||||||
|     encoding: 0b00000010000000000000000000110011 |     encoding: 0b00000010000000000000000000110011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   2 | ||||||
|   - MULH: |   MULH: | ||||||
|  |     index: 50 | ||||||
|     encoding: 0b00000010000000000001000000110011 |     encoding: 0b00000010000000000001000000110011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   2 | ||||||
|   - MULHSU: |   MULHSU: | ||||||
|  |     index: 51 | ||||||
|     encoding: 0b00000010000000000010000000110011 |     encoding: 0b00000010000000000010000000110011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   2 | ||||||
|   - MULHU: |   MULHU: | ||||||
|  |     index: 52 | ||||||
|     encoding: 0b00000010000000000011000000110011 |     encoding: 0b00000010000000000011000000110011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   2 | ||||||
|   - DIV: |   DIV: | ||||||
|  |     index: 53 | ||||||
|     encoding: 0b00000010000000000100000000110011 |     encoding: 0b00000010000000000100000000110011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   17 | ||||||
|   - DIVU: |   DIVU: | ||||||
|  |     index: 54 | ||||||
|     encoding: 0b00000010000000000101000000110011 |     encoding: 0b00000010000000000101000000110011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   17 | ||||||
|   - REM: |   REM: | ||||||
|  |     index: 55 | ||||||
|     encoding: 0b00000010000000000110000000110011 |     encoding: 0b00000010000000000110000000110011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   17 | ||||||
|   - REMU: |   REMU: | ||||||
|  |     index: 56 | ||||||
|     encoding: 0b00000010000000000111000000110011 |     encoding: 0b00000010000000000111000000110011 | ||||||
|     mask: 0b11111110000000000111000001111111 |     mask: 0b11111110000000000111000001111111 | ||||||
|     size:   32 |     size:   32 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   17 | ||||||
| RV32IC:  | Zca:  | ||||||
|   - CADDI4SPN: |   C__ADDI4SPN: | ||||||
|  |     index: 57 | ||||||
|     encoding: 0b0000000000000000 |     encoding: 0b0000000000000000 | ||||||
|     mask: 0b1110000000000011 |     mask: 0b1110000000000011 | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CLW: |   C__LW: | ||||||
|  |     index: 58 | ||||||
|     encoding: 0b0100000000000000 |     encoding: 0b0100000000000000 | ||||||
|     mask: 0b1110000000000011 |     mask: 0b1110000000000011 | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   2 | ||||||
|   - CSW: |   C__SW: | ||||||
|  |     index: 59 | ||||||
|     encoding: 0b1100000000000000 |     encoding: 0b1100000000000000 | ||||||
|     mask: 0b1110000000000011 |     mask: 0b1110000000000011 | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CADDI: |   C__ADDI: | ||||||
|  |     index: 60 | ||||||
|     encoding: 0b0000000000000001 |     encoding: 0b0000000000000001 | ||||||
|     mask: 0b1110000000000011 |     mask: 0b1110000000000011 | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CNOP: |   C__NOP: | ||||||
|  |     index: 61 | ||||||
|     encoding: 0b0000000000000001 |     encoding: 0b0000000000000001 | ||||||
|     mask: 0b1110111110000011 |     mask: 0b1110111110000011 | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CJAL: |   C__JAL: | ||||||
|  |     index: 62 | ||||||
|     encoding: 0b0010000000000001 |     encoding: 0b0010000000000001 | ||||||
|     mask: 0b1110000000000011 |     mask: 0b1110000000000011 | ||||||
|     attributes: [[name:no_cont]] |     attributes: [[name:enable, value:1]] | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   true |     branch:   true | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CLI: |   C__LI: | ||||||
|  |     index: 63 | ||||||
|     encoding: 0b0100000000000001 |     encoding: 0b0100000000000001 | ||||||
|     mask: 0b1110000000000011 |     mask: 0b1110000000000011 | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CLUI: |   C__LUI: | ||||||
|  |     index: 64 | ||||||
|     encoding: 0b0110000000000001 |     encoding: 0b0110000000000001 | ||||||
|     mask: 0b1110000000000011 |     mask: 0b1110000000000011 | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CADDI16SP: |   C__ADDI16SP: | ||||||
|  |     index: 65 | ||||||
|     encoding: 0b0110000100000001 |     encoding: 0b0110000100000001 | ||||||
|     mask: 0b1110111110000011 |     mask: 0b1110111110000011 | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CSRLI: |   __reserved_clui: | ||||||
|  |     index: 66 | ||||||
|  |     encoding: 0b0110000000000001 | ||||||
|  |     mask: 0b1111000001111111 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   C__SRLI: | ||||||
|  |     index: 67 | ||||||
|     encoding: 0b1000000000000001 |     encoding: 0b1000000000000001 | ||||||
|     mask: 0b1111110000000011 |     mask: 0b1111110000000011 | ||||||
|  |     attributes: [[name:enable, value:1]] | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CSRAI: |   C__SRAI: | ||||||
|  |     index: 68 | ||||||
|     encoding: 0b1000010000000001 |     encoding: 0b1000010000000001 | ||||||
|     mask: 0b1111110000000011 |     mask: 0b1111110000000011 | ||||||
|  |     attributes: [[name:enable, value:1]] | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CANDI: |   C__ANDI: | ||||||
|  |     index: 69 | ||||||
|     encoding: 0b1000100000000001 |     encoding: 0b1000100000000001 | ||||||
|     mask: 0b1110110000000011 |     mask: 0b1110110000000011 | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CSUB: |   C__SUB: | ||||||
|  |     index: 70 | ||||||
|     encoding: 0b1000110000000001 |     encoding: 0b1000110000000001 | ||||||
|     mask: 0b1111110001100011 |     mask: 0b1111110001100011 | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CXOR: |   C__XOR: | ||||||
|  |     index: 71 | ||||||
|     encoding: 0b1000110000100001 |     encoding: 0b1000110000100001 | ||||||
|     mask: 0b1111110001100011 |     mask: 0b1111110001100011 | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - COR: |   C__OR: | ||||||
|  |     index: 72 | ||||||
|     encoding: 0b1000110001000001 |     encoding: 0b1000110001000001 | ||||||
|     mask: 0b1111110001100011 |     mask: 0b1111110001100011 | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CAND: |   C__AND: | ||||||
|  |     index: 73 | ||||||
|     encoding: 0b1000110001100001 |     encoding: 0b1000110001100001 | ||||||
|     mask: 0b1111110001100011 |     mask: 0b1111110001100011 | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CJ: |   C__J: | ||||||
|  |     index: 74 | ||||||
|     encoding: 0b1010000000000001 |     encoding: 0b1010000000000001 | ||||||
|     mask: 0b1110000000000011 |     mask: 0b1110000000000011 | ||||||
|     attributes: [[name:no_cont]] |  | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   true |     branch:   true | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CBEQZ: |   C__BEQZ: | ||||||
|  |     index: 75 | ||||||
|     encoding: 0b1100000000000001 |     encoding: 0b1100000000000001 | ||||||
|     mask: 0b1110000000000011 |     mask: 0b1110000000000011 | ||||||
|     attributes: [[name:no_cont], [name:cond]] |  | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   true |     branch:   true | ||||||
|     delay:   [1,1] |     delay:   [1,2] | ||||||
|   - CBNEZ: |   C__BNEZ: | ||||||
|  |     index: 76 | ||||||
|     encoding: 0b1110000000000001 |     encoding: 0b1110000000000001 | ||||||
|     mask: 0b1110000000000011 |     mask: 0b1110000000000011 | ||||||
|     attributes: [[name:no_cont], [name:cond]] |  | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   true |     branch:   true | ||||||
|     delay:   [1,1] |     delay:   [1,2] | ||||||
|   - CSLLI: |   C__SLLI: | ||||||
|  |     index: 77 | ||||||
|     encoding: 0b0000000000000010 |     encoding: 0b0000000000000010 | ||||||
|     mask: 0b1111000000000011 |     mask: 0b1111000000000011 | ||||||
|  |     attributes: [[name:enable, value:1]] | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CLWSP: |   C__LWSP: | ||||||
|  |     index: 78 | ||||||
|     encoding: 0b0100000000000010 |     encoding: 0b0100000000000010 | ||||||
|     mask: 0b1110000000000011 |     mask: 0b1110000000000011 | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   2 | ||||||
|   - CMV: |   C__MV: | ||||||
|  |     index: 79 | ||||||
|     encoding: 0b1000000000000010 |     encoding: 0b1000000000000010 | ||||||
|     mask: 0b1111000000000011 |     mask: 0b1111000000000011 | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CJR: |   C__JR: | ||||||
|  |     index: 80 | ||||||
|     encoding: 0b1000000000000010 |     encoding: 0b1000000000000010 | ||||||
|     mask: 0b1111000001111111 |     mask: 0b1111000001111111 | ||||||
|     attributes: [[name:no_cont]] |  | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   true |     branch:   true | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CADD: |   __reserved_cmv: | ||||||
|  |     index: 81 | ||||||
|  |     encoding: 0b1000000000000010 | ||||||
|  |     mask: 0b1111111111111111 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   C__ADD: | ||||||
|  |     index: 82 | ||||||
|     encoding: 0b1001000000000010 |     encoding: 0b1001000000000010 | ||||||
|     mask: 0b1111000000000011 |     mask: 0b1111000000000011 | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CJALR: |   C__JALR: | ||||||
|  |     index: 83 | ||||||
|     encoding: 0b1001000000000010 |     encoding: 0b1001000000000010 | ||||||
|     mask: 0b1111000001111111 |     mask: 0b1111000001111111 | ||||||
|     attributes: [[name:no_cont]] |  | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   true |     branch:   true | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CEBREAK: |   C__EBREAK: | ||||||
|  |     index: 84 | ||||||
|     encoding: 0b1001000000000010 |     encoding: 0b1001000000000010 | ||||||
|     mask: 0b1111111111111111 |     mask: 0b1111111111111111 | ||||||
|     attributes: [[name:no_cont]] |  | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - CSWSP: |   C__SWSP: | ||||||
|  |     index: 85 | ||||||
|     encoding: 0b1100000000000010 |     encoding: 0b1100000000000010 | ||||||
|     mask: 0b1110000000000011 |     mask: 0b1110000000000011 | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
|   - DII: |   DII: | ||||||
|  |     index: 86 | ||||||
|     encoding: 0b0000000000000000 |     encoding: 0b0000000000000000 | ||||||
|     mask: 0b1111111111111111 |     mask: 0b1111111111111111 | ||||||
|     attributes: [[name:no_cont]] |  | ||||||
|     size:   16 |     size:   16 | ||||||
|     branch:   false |     branch:   false | ||||||
|     delay:   1 |     delay:   1 | ||||||
							
								
								
									
										624
									
								
								contrib/instr/TGC5C_slow.yaml
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										624
									
								
								contrib/instr/TGC5C_slow.yaml
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,624 @@ | |||||||
|  |  | ||||||
|  | RV32I:  | ||||||
|  |   LUI: | ||||||
|  |     index: 0 | ||||||
|  |     encoding: 0b00000000000000000000000000110111 | ||||||
|  |     mask: 0b00000000000000000000000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   AUIPC: | ||||||
|  |     index: 1 | ||||||
|  |     encoding: 0b00000000000000000000000000010111 | ||||||
|  |     mask: 0b00000000000000000000000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   JAL: | ||||||
|  |     index: 2 | ||||||
|  |     encoding: 0b00000000000000000000000001101111 | ||||||
|  |     mask: 0b00000000000000000000000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   true | ||||||
|  |     delay:   1 | ||||||
|  |   JALR: | ||||||
|  |     index: 3 | ||||||
|  |     encoding: 0b00000000000000000000000001100111 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   true | ||||||
|  |     delay:   [1,2] | ||||||
|  |   BEQ: | ||||||
|  |     index: 4 | ||||||
|  |     encoding: 0b00000000000000000000000001100011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   true | ||||||
|  |     delay:   [1,2] | ||||||
|  |   BNE: | ||||||
|  |     index: 5 | ||||||
|  |     encoding: 0b00000000000000000001000001100011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   true | ||||||
|  |     delay:   [1,2] | ||||||
|  |   BLT: | ||||||
|  |     index: 6 | ||||||
|  |     encoding: 0b00000000000000000100000001100011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   true | ||||||
|  |     delay:   [1,2] | ||||||
|  |   BGE: | ||||||
|  |     index: 7 | ||||||
|  |     encoding: 0b00000000000000000101000001100011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   true | ||||||
|  |     delay:   [1,2] | ||||||
|  |   BLTU: | ||||||
|  |     index: 8 | ||||||
|  |     encoding: 0b00000000000000000110000001100011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   true | ||||||
|  |     delay:   [1,2] | ||||||
|  |   BGEU: | ||||||
|  |     index: 9 | ||||||
|  |     encoding: 0b00000000000000000111000001100011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   true | ||||||
|  |     delay:   [1,2] | ||||||
|  |   LB: | ||||||
|  |     index: 10 | ||||||
|  |     encoding: 0b00000000000000000000000000000011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   2 | ||||||
|  |   LH: | ||||||
|  |     index: 11 | ||||||
|  |     encoding: 0b00000000000000000001000000000011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   2 | ||||||
|  |   LW: | ||||||
|  |     index: 12 | ||||||
|  |     encoding: 0b00000000000000000010000000000011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   2 | ||||||
|  |   LBU: | ||||||
|  |     index: 13 | ||||||
|  |     encoding: 0b00000000000000000100000000000011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   2 | ||||||
|  |   LHU: | ||||||
|  |     index: 14 | ||||||
|  |     encoding: 0b00000000000000000101000000000011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   2 | ||||||
|  |   SB: | ||||||
|  |     index: 15 | ||||||
|  |     encoding: 0b00000000000000000000000000100011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   SH: | ||||||
|  |     index: 16 | ||||||
|  |     encoding: 0b00000000000000000001000000100011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   SW: | ||||||
|  |     index: 17 | ||||||
|  |     encoding: 0b00000000000000000010000000100011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   ADDI: | ||||||
|  |     index: 18 | ||||||
|  |     encoding: 0b00000000000000000000000000010011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   SLTI: | ||||||
|  |     index: 19 | ||||||
|  |     encoding: 0b00000000000000000010000000010011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   SLTIU: | ||||||
|  |     index: 20 | ||||||
|  |     encoding: 0b00000000000000000011000000010011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   XORI: | ||||||
|  |     index: 21 | ||||||
|  |     encoding: 0b00000000000000000100000000010011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   ORI: | ||||||
|  |     index: 22 | ||||||
|  |     encoding: 0b00000000000000000110000000010011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   ANDI: | ||||||
|  |     index: 23 | ||||||
|  |     encoding: 0b00000000000000000111000000010011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   SLLI: | ||||||
|  |     index: 24 | ||||||
|  |     encoding: 0b00000000000000000001000000010011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   "u_24:20" | ||||||
|  |   SRLI: | ||||||
|  |     index: 25 | ||||||
|  |     encoding: 0b00000000000000000101000000010011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   "u_24:20" | ||||||
|  |   SRAI: | ||||||
|  |     index: 26 | ||||||
|  |     encoding: 0b01000000000000000101000000010011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   "u_24:20" | ||||||
|  |   ADD: | ||||||
|  |     index: 27 | ||||||
|  |     encoding: 0b00000000000000000000000000110011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   SUB: | ||||||
|  |     index: 28 | ||||||
|  |     encoding: 0b01000000000000000000000000110011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   SLL: | ||||||
|  |     index: 29 | ||||||
|  |     encoding: 0b00000000000000000001000000110011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   "X_24:20" | ||||||
|  |   SLT: | ||||||
|  |     index: 30 | ||||||
|  |     encoding: 0b00000000000000000010000000110011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   SLTU: | ||||||
|  |     index: 31 | ||||||
|  |     encoding: 0b00000000000000000011000000110011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   XOR: | ||||||
|  |     index: 32 | ||||||
|  |     encoding: 0b00000000000000000100000000110011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   SRL: | ||||||
|  |     index: 33 | ||||||
|  |     encoding: 0b00000000000000000101000000110011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   "X_24:20" | ||||||
|  |   SRA: | ||||||
|  |     index: 34 | ||||||
|  |     encoding: 0b01000000000000000101000000110011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   "X_24:20" | ||||||
|  |   OR: | ||||||
|  |     index: 35 | ||||||
|  |     encoding: 0b00000000000000000110000000110011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   AND: | ||||||
|  |     index: 36 | ||||||
|  |     encoding: 0b00000000000000000111000000110011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   FENCE: | ||||||
|  |     index: 37 | ||||||
|  |     encoding: 0b00000000000000000000000000001111 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   ECALL: | ||||||
|  |     index: 38 | ||||||
|  |     encoding: 0b00000000000000000000000001110011 | ||||||
|  |     mask: 0b11111111111111111111111111111111 | ||||||
|  |     attributes: [[name:no_cont]] | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   EBREAK: | ||||||
|  |     index: 39 | ||||||
|  |     encoding: 0b00000000000100000000000001110011 | ||||||
|  |     mask: 0b11111111111111111111111111111111 | ||||||
|  |     attributes: [[name:no_cont]] | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   MRET: | ||||||
|  |     index: 40 | ||||||
|  |     encoding: 0b00110000001000000000000001110011 | ||||||
|  |     mask: 0b11111111111111111111111111111111 | ||||||
|  |     attributes: [[name:no_cont]] | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   WFI: | ||||||
|  |     index: 41 | ||||||
|  |     encoding: 0b00010000010100000000000001110011 | ||||||
|  |     mask: 0b11111111111111111111111111111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  | Zicsr:  | ||||||
|  |   CSRRW: | ||||||
|  |     index: 42 | ||||||
|  |     encoding: 0b00000000000000000001000001110011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   CSRRS: | ||||||
|  |     index: 43 | ||||||
|  |     encoding: 0b00000000000000000010000001110011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   CSRRC: | ||||||
|  |     index: 44 | ||||||
|  |     encoding: 0b00000000000000000011000001110011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   CSRRWI: | ||||||
|  |     index: 45 | ||||||
|  |     encoding: 0b00000000000000000101000001110011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   CSRRSI: | ||||||
|  |     index: 46 | ||||||
|  |     encoding: 0b00000000000000000110000001110011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   CSRRCI: | ||||||
|  |     index: 47 | ||||||
|  |     encoding: 0b00000000000000000111000001110011 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  | Zifencei:  | ||||||
|  |   FENCE_I: | ||||||
|  |     index: 48 | ||||||
|  |     encoding: 0b00000000000000000001000000001111 | ||||||
|  |     mask: 0b00000000000000000111000001111111 | ||||||
|  |     attributes: [[name:flush]] | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  | RV32M:  | ||||||
|  |   MUL: | ||||||
|  |     index: 49 | ||||||
|  |     encoding: 0b00000010000000000000000000110011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   32 | ||||||
|  |   MULH: | ||||||
|  |     index: 50 | ||||||
|  |     encoding: 0b00000010000000000001000000110011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   32 | ||||||
|  |   MULHSU: | ||||||
|  |     index: 51 | ||||||
|  |     encoding: 0b00000010000000000010000000110011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   32 | ||||||
|  |   MULHU: | ||||||
|  |     index: 52 | ||||||
|  |     encoding: 0b00000010000000000011000000110011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   32 | ||||||
|  |   DIV: | ||||||
|  |     index: 53 | ||||||
|  |     encoding: 0b00000010000000000100000000110011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   33 | ||||||
|  |   DIVU: | ||||||
|  |     index: 54 | ||||||
|  |     encoding: 0b00000010000000000101000000110011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   33 | ||||||
|  |   REM: | ||||||
|  |     index: 55 | ||||||
|  |     encoding: 0b00000010000000000110000000110011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   33 | ||||||
|  |   REMU: | ||||||
|  |     index: 56 | ||||||
|  |     encoding: 0b00000010000000000111000000110011 | ||||||
|  |     mask: 0b11111110000000000111000001111111 | ||||||
|  |     size:   32 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   33 | ||||||
|  | Zca:  | ||||||
|  |   C__ADDI4SPN: | ||||||
|  |     index: 57 | ||||||
|  |     encoding: 0b0000000000000000 | ||||||
|  |     mask: 0b1110000000000011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   C__LW: | ||||||
|  |     index: 58 | ||||||
|  |     encoding: 0b0100000000000000 | ||||||
|  |     mask: 0b1110000000000011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   2 | ||||||
|  |   C__SW: | ||||||
|  |     index: 59 | ||||||
|  |     encoding: 0b1100000000000000 | ||||||
|  |     mask: 0b1110000000000011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   C__ADDI: | ||||||
|  |     index: 60 | ||||||
|  |     encoding: 0b0000000000000001 | ||||||
|  |     mask: 0b1110000000000011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   C__NOP: | ||||||
|  |     index: 61 | ||||||
|  |     encoding: 0b0000000000000001 | ||||||
|  |     mask: 0b1110111110000011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   C__JAL: | ||||||
|  |     index: 62 | ||||||
|  |     encoding: 0b0010000000000001 | ||||||
|  |     mask: 0b1110000000000011 | ||||||
|  |     attributes: [[name:enable, value:1]] | ||||||
|  |     size:   16 | ||||||
|  |     branch:   true | ||||||
|  |     delay:   1 | ||||||
|  |   C__LI: | ||||||
|  |     index: 63 | ||||||
|  |     encoding: 0b0100000000000001 | ||||||
|  |     mask: 0b1110000000000011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   C__LUI: | ||||||
|  |     index: 64 | ||||||
|  |     encoding: 0b0110000000000001 | ||||||
|  |     mask: 0b1110000000000011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   C__ADDI16SP: | ||||||
|  |     index: 65 | ||||||
|  |     encoding: 0b0110000100000001 | ||||||
|  |     mask: 0b1110111110000011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   __reserved_clui: | ||||||
|  |     index: 66 | ||||||
|  |     encoding: 0b0110000000000001 | ||||||
|  |     mask: 0b1111000001111111 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   C__SRLI: | ||||||
|  |     index: 67 | ||||||
|  |     encoding: 0b1000000000000001 | ||||||
|  |     mask: 0b1111110000000011 | ||||||
|  |     attributes: [[name:enable, value:1]] | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   "u_12:12*16+u_6:2" | ||||||
|  |   C__SRAI: | ||||||
|  |     index: 68 | ||||||
|  |     encoding: 0b1000010000000001 | ||||||
|  |     mask: 0b1111110000000011 | ||||||
|  |     attributes: [[name:enable, value:1]] | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   "u_12:12*16+u_6:2" | ||||||
|  |   C__ANDI: | ||||||
|  |     index: 69 | ||||||
|  |     encoding: 0b1000100000000001 | ||||||
|  |     mask: 0b1110110000000011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   C__SUB: | ||||||
|  |     index: 70 | ||||||
|  |     encoding: 0b1000110000000001 | ||||||
|  |     mask: 0b1111110001100011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   C__XOR: | ||||||
|  |     index: 71 | ||||||
|  |     encoding: 0b1000110000100001 | ||||||
|  |     mask: 0b1111110001100011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   C__OR: | ||||||
|  |     index: 72 | ||||||
|  |     encoding: 0b1000110001000001 | ||||||
|  |     mask: 0b1111110001100011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   C__AND: | ||||||
|  |     index: 73 | ||||||
|  |     encoding: 0b1000110001100001 | ||||||
|  |     mask: 0b1111110001100011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   C__J: | ||||||
|  |     index: 74 | ||||||
|  |     encoding: 0b1010000000000001 | ||||||
|  |     mask: 0b1110000000000011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   true | ||||||
|  |     delay:   1 | ||||||
|  |   C__BEQZ: | ||||||
|  |     index: 75 | ||||||
|  |     encoding: 0b1100000000000001 | ||||||
|  |     mask: 0b1110000000000011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   true | ||||||
|  |     delay:   [1,2] | ||||||
|  |   C__BNEZ: | ||||||
|  |     index: 76 | ||||||
|  |     encoding: 0b1110000000000001 | ||||||
|  |     mask: 0b1110000000000011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   true | ||||||
|  |     delay:   [1,2] | ||||||
|  |   C__SLLI: | ||||||
|  |     index: 77 | ||||||
|  |     encoding: 0b0000000000000010 | ||||||
|  |     mask: 0b1111000000000011 | ||||||
|  |     attributes: [[name:enable, value:1]] | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   "u_12:12*16+u_6:2" | ||||||
|  |   C__LWSP: | ||||||
|  |     index: 78 | ||||||
|  |     encoding: 0b0100000000000010 | ||||||
|  |     mask: 0b1110000000000011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   2 | ||||||
|  |   C__MV: | ||||||
|  |     index: 79 | ||||||
|  |     encoding: 0b1000000000000010 | ||||||
|  |     mask: 0b1111000000000011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   C__JR: | ||||||
|  |     index: 80 | ||||||
|  |     encoding: 0b1000000000000010 | ||||||
|  |     mask: 0b1111000001111111 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   true | ||||||
|  |     delay:   1 | ||||||
|  |   __reserved_cmv: | ||||||
|  |     index: 81 | ||||||
|  |     encoding: 0b1000000000000010 | ||||||
|  |     mask: 0b1111111111111111 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   C__ADD: | ||||||
|  |     index: 82 | ||||||
|  |     encoding: 0b1001000000000010 | ||||||
|  |     mask: 0b1111000000000011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   C__JALR: | ||||||
|  |     index: 83 | ||||||
|  |     encoding: 0b1001000000000010 | ||||||
|  |     mask: 0b1111000001111111 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   true | ||||||
|  |     delay:   1 | ||||||
|  |   C__EBREAK: | ||||||
|  |     index: 84 | ||||||
|  |     encoding: 0b1001000000000010 | ||||||
|  |     mask: 0b1111111111111111 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   C__SWSP: | ||||||
|  |     index: 85 | ||||||
|  |     encoding: 0b1100000000000010 | ||||||
|  |     mask: 0b1110000000000011 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |   DII: | ||||||
|  |     index: 86 | ||||||
|  |     encoding: 0b0000000000000000 | ||||||
|  |     mask: 0b1111111111111111 | ||||||
|  |     size:   16 | ||||||
|  |     branch:   false | ||||||
|  |     delay:   1 | ||||||
|  |  | ||||||
| @@ -19,7 +19,7 @@ setenv CXX $COWAREHOME/SLS/linux/common/bin/g++ | |||||||
| cmake -S . -B build/PA -DCMAKE_BUILD_TYPE=Debug -DUSE_CWR_SYSTEMC=ON -DBUILD_SHARED_LIBS=ON \ | cmake -S . -B build/PA -DCMAKE_BUILD_TYPE=Debug -DUSE_CWR_SYSTEMC=ON -DBUILD_SHARED_LIBS=ON \ | ||||||
|     -DCODEGEN=OFF -DCMAKE_INSTALL_PREFIX=${TGFS_INSTALL_ROOT} |     -DCODEGEN=OFF -DCMAKE_INSTALL_PREFIX=${TGFS_INSTALL_ROOT} | ||||||
| cmake --build build/PA --target install -j16 | cmake --build build/PA --target install -j16 | ||||||
| cd dbt-rise-tgc/contrib | cd dbt-rise-tgc/contrib/pa | ||||||
| # import the TGC core itself | # import the TGC core itself | ||||||
| pct tgc_import_tb.tcl | pct tgc_import_tb.tcl | ||||||
| ``` | ``` | ||||||
| @@ -37,7 +37,7 @@ export CXX=$COWAREHOME/SLS/linux/common/bin/g++ | |||||||
| cmake -S . -B build/PA -DCMAKE_BUILD_TYPE=Debug -DUSE_CWR_SYSTEMC=ON -DBUILD_SHARED_LIBS=ON \ | cmake -S . -B build/PA -DCMAKE_BUILD_TYPE=Debug -DUSE_CWR_SYSTEMC=ON -DBUILD_SHARED_LIBS=ON \ | ||||||
|     -DCODEGEN=OFF -DCMAKE_INSTALL_PREFIX=${TGFS_INSTALL_ROOT} |     -DCODEGEN=OFF -DCMAKE_INSTALL_PREFIX=${TGFS_INSTALL_ROOT} | ||||||
| cmake --build build/PA --target install -j16 | cmake --build build/PA --target install -j16 | ||||||
| cd dbt-rise-tgc/contrib | cd dbt-rise-tgc/contrib/pa | ||||||
| # import the TGC core itself | # import the TGC core itself | ||||||
| pct tgc_import_tb.tcl | pct tgc_import_tb.tcl | ||||||
| ``` | ``` | ||||||
| Before Width: | Height: | Size: 25 KiB After Width: | Height: | Size: 25 KiB | 
| @@ -1,8 +1,8 @@ | |||||||
| import "ISA/RV32I.core_desc" | import "ISA/RVI.core_desc" | ||||||
| import "ISA/RVM.core_desc" | import "ISA/RVM.core_desc" | ||||||
| import "ISA/RVC.core_desc" | import "ISA/RVC.core_desc" | ||||||
| 
 | 
 | ||||||
| Core TGC_C provides RV32I, Zicsr, Zifencei, RV32M, RV32IC { | Core TGC5C provides RV32I, Zicsr, Zifencei, RV32M, RV32IC { | ||||||
|     architectural_state { |     architectural_state { | ||||||
|         XLEN=32; |         XLEN=32; | ||||||
|         // definitions for the architecture wrapper |         // definitions for the architecture wrapper | ||||||
| @@ -70,7 +70,7 @@ uint8_t *${coreDef.name.toLowerCase()}::get_regs_base_ptr() { | |||||||
| 	return reinterpret_cast<uint8_t*>(®); | 	return reinterpret_cast<uint8_t*>(®); | ||||||
| } | } | ||||||
|  |  | ||||||
| ${coreDef.name.toLowerCase()}::phys_addr_t ${coreDef.name.toLowerCase()}::virt2phys(const iss::addr_t &pc) { | ${coreDef.name.toLowerCase()}::phys_addr_t ${coreDef.name.toLowerCase()}::virt2phys(const iss::addr_t &addr) { | ||||||
|     return phys_addr_t(pc); // change logical address to physical address |     return phys_addr_t(addr.access, addr.space, addr.val&traits<${coreDef.name.toLowerCase()}>::addr_mask); | ||||||
| } | } | ||||||
|  |  | ||||||
|   | |||||||
| @@ -55,7 +55,7 @@ def byteSize(int size){ | |||||||
|     return 128; |     return 128; | ||||||
| } | } | ||||||
| def getCString(def val){ | def getCString(def val){ | ||||||
|     return val.toString() |     return val.toString()+'ULL' | ||||||
| } | } | ||||||
| %> | %> | ||||||
| #ifndef _${coreDef.name.toUpperCase()}_H_ | #ifndef _${coreDef.name.toUpperCase()}_H_ | ||||||
| @@ -76,10 +76,10 @@ template <> struct traits<${coreDef.name.toLowerCase()}> { | |||||||
|     constexpr static char const* const core_type = "${coreDef.name}"; |     constexpr static char const* const core_type = "${coreDef.name}"; | ||||||
|      |      | ||||||
|     static constexpr std::array<const char*, ${registers.size}> reg_names{ |     static constexpr std::array<const char*, ${registers.size}> reg_names{ | ||||||
|         {"${registers.collect{it.name}.join('", "')}"}}; |         {"${registers.collect{it.name.toLowerCase()}.join('", "')}"}}; | ||||||
|   |   | ||||||
|     static constexpr std::array<const char*, ${registers.size}> reg_aliases{ |     static constexpr std::array<const char*, ${registers.size}> reg_aliases{ | ||||||
|         {"${registers.collect{it.alias}.join('", "')}"}}; |         {"${registers.collect{it.alias.toLowerCase()}.join('", "')}"}}; | ||||||
|  |  | ||||||
|     enum constants {${constants.collect{c -> c.name+"="+getCString(c.value)}.join(', ')}}; |     enum constants {${constants.collect{c -> c.name+"="+getCString(c.value)}.join(', ')}}; | ||||||
|  |  | ||||||
| @@ -137,14 +137,6 @@ struct ${coreDef.name.toLowerCase()}: public arch_if { | |||||||
|  |  | ||||||
|     inline uint64_t stop_code() { return interrupt_sim; } |     inline uint64_t stop_code() { return interrupt_sim; } | ||||||
|  |  | ||||||
|     inline phys_addr_t v2p(const iss::addr_t& addr){ |  | ||||||
|         if (addr.space != traits<${coreDef.name.toLowerCase()}>::MEM || addr.type == iss::address_type::PHYSICAL || |  | ||||||
|                 addr_mode[static_cast<uint16_t>(addr.access)&0x3]==address_type::PHYSICAL) { |  | ||||||
|             return phys_addr_t(addr.access, addr.space, addr.val&traits<${coreDef.name.toLowerCase()}>::addr_mask); |  | ||||||
|         } else |  | ||||||
|             return virt2phys(addr); |  | ||||||
|     } |  | ||||||
|  |  | ||||||
|     virtual phys_addr_t virt2phys(const iss::addr_t& addr); |     virtual phys_addr_t virt2phys(const iss::addr_t& addr); | ||||||
|  |  | ||||||
|     virtual iss::sync_type needed_sync() const { return iss::NO_SYNC; } |     virtual iss::sync_type needed_sync() const { return iss::NO_SYNC; } | ||||||
|   | |||||||
| @@ -1,86 +0,0 @@ | |||||||
| #include "${coreDef.name.toLowerCase()}.h" |  | ||||||
| #include <vector> |  | ||||||
| #include <array> |  | ||||||
| #include <cstdlib> |  | ||||||
| #include <algorithm> |  | ||||||
|  |  | ||||||
| namespace iss { |  | ||||||
| namespace arch { |  | ||||||
| namespace { |  | ||||||
| // according to |  | ||||||
| // https://stackoverflow.com/questions/8871204/count-number-of-1s-in-binary-representation |  | ||||||
| #ifdef __GCC__ |  | ||||||
| constexpr size_t bit_count(uint32_t u) { return __builtin_popcount(u); } |  | ||||||
| #elif __cplusplus < 201402L |  | ||||||
| constexpr size_t uCount(uint32_t u) { return u - ((u >> 1) & 033333333333) - ((u >> 2) & 011111111111); } |  | ||||||
| constexpr size_t bit_count(uint32_t u) { return ((uCount(u) + (uCount(u) >> 3)) & 030707070707) % 63; } |  | ||||||
| #else |  | ||||||
| constexpr size_t bit_count(uint32_t u) { |  | ||||||
|     size_t uCount = u - ((u >> 1) & 033333333333) - ((u >> 2) & 011111111111); |  | ||||||
|     return ((uCount + (uCount >> 3)) & 030707070707) % 63; |  | ||||||
| } |  | ||||||
| #endif |  | ||||||
|  |  | ||||||
| using opcode_e = traits<${coreDef.name.toLowerCase()}>::opcode_e; |  | ||||||
|  |  | ||||||
| /**************************************************************************** |  | ||||||
|  * start opcode definitions |  | ||||||
|  ****************************************************************************/ |  | ||||||
| struct instruction_desriptor { |  | ||||||
|     size_t length; |  | ||||||
|     uint32_t value; |  | ||||||
|     uint32_t mask; |  | ||||||
|     opcode_e op; |  | ||||||
| }; |  | ||||||
|  |  | ||||||
| const std::array<instruction_desriptor, ${instructions.size}> instr_descr = {{ |  | ||||||
|      /* entries are: size, valid value, valid mask, function ptr */<%instructions.each{instr -> %> |  | ||||||
|     {${instr.length}, ${instr.encoding}, ${instr.mask}, opcode_e::${instr.instruction.name}},<%}%> |  | ||||||
| }}; |  | ||||||
|  |  | ||||||
| } |  | ||||||
|  |  | ||||||
| template<> |  | ||||||
| struct instruction_decoder<${coreDef.name.toLowerCase()}> { |  | ||||||
|     using opcode_e = traits<${coreDef.name.toLowerCase()}>::opcode_e; |  | ||||||
|     using code_word_t=traits<${coreDef.name.toLowerCase()}>::code_word_t; |  | ||||||
|  |  | ||||||
|     struct instruction_pattern { |  | ||||||
|         uint32_t value; |  | ||||||
|         uint32_t mask; |  | ||||||
|         opcode_e id; |  | ||||||
|     }; |  | ||||||
|  |  | ||||||
|     std::array<std::vector<instruction_pattern>, 4> qlut; |  | ||||||
|  |  | ||||||
|     template<typename T> |  | ||||||
|     unsigned decode_instruction(T); |  | ||||||
|  |  | ||||||
|     instruction_decoder() { |  | ||||||
|         for (auto instr : instr_descr) { |  | ||||||
|             auto quadrant = instr.value & 0x3; |  | ||||||
|             qlut[quadrant].push_back(instruction_pattern{instr.value, instr.mask, instr.op}); |  | ||||||
|         } |  | ||||||
|         for(auto& lut: qlut){ |  | ||||||
|             std::sort(std::begin(lut), std::end(lut), [](instruction_pattern const& a, instruction_pattern const& b){ |  | ||||||
|                 return bit_count(a.mask) < bit_count(b.mask); |  | ||||||
|             }); |  | ||||||
|         } |  | ||||||
|     } |  | ||||||
| }; |  | ||||||
|  |  | ||||||
| template<> |  | ||||||
| unsigned instruction_decoder<${coreDef.name.toLowerCase()}>::decode_instruction<traits<${coreDef.name.toLowerCase()}>::code_word_t>(traits<${coreDef.name.toLowerCase()}>::code_word_t instr){ |  | ||||||
|     auto res = std::find_if(std::begin(qlut[instr&0x3]), std::end(qlut[instr&0x3]), [instr](instruction_pattern const& e){ |  | ||||||
|         return !((instr&e.mask) ^ e.value ); |  | ||||||
|     }); |  | ||||||
|     return static_cast<unsigned>(res!=std::end(qlut[instr&0x3])? res->id : opcode_e::MAX_OPCODE); |  | ||||||
| } |  | ||||||
|  |  | ||||||
|  |  | ||||||
| std::unique_ptr<instruction_decoder<${coreDef.name.toLowerCase()}>> traits<${coreDef.name.toLowerCase()}>::get_decoder(){ |  | ||||||
|     return std::make_unique<instruction_decoder<${coreDef.name.toLowerCase()}>>(); |  | ||||||
| } |  | ||||||
|  |  | ||||||
| } |  | ||||||
| } |  | ||||||
| @@ -8,9 +8,10 @@ | |||||||
|         instrGroups[groupName]+=it; |         instrGroups[groupName]+=it; | ||||||
|     } |     } | ||||||
|     instrGroups |     instrGroups | ||||||
| }%><%getInstructionGroups().each{name, instrList -> %> | }%><%int index = 0; getInstructionGroups().each{name, instrList -> %> | ||||||
| ${name}: <% instrList.findAll{!it.instruction.name.startsWith("__")}.each { %> | ${name}: <% instrList.each { %> | ||||||
|   - ${it.instruction.name}: |   ${it.instruction.name}: | ||||||
|  |     index: ${index++} | ||||||
|     encoding: ${it.encoding} |     encoding: ${it.encoding} | ||||||
|     mask: ${it.mask}<%if(it.attributes.size) {%> |     mask: ${it.mask}<%if(it.attributes.size) {%> | ||||||
|     attributes: ${it.attributes}<%}%> |     attributes: ${it.attributes}<%}%> | ||||||
|   | |||||||
							
								
								
									
										130
									
								
								gen_input/templates/CORENAME_sysc.cpp.gtl
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										130
									
								
								gen_input/templates/CORENAME_sysc.cpp.gtl
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,130 @@ | |||||||
|  | /******************************************************************************* | ||||||
|  |  * Copyright (C) 2023 MINRES Technologies GmbH | ||||||
|  |  * All rights reserved. | ||||||
|  |  * | ||||||
|  |  * Redistribution and use in source and binary forms, with or without | ||||||
|  |  * modification, are permitted provided that the following conditions are met: | ||||||
|  |  * | ||||||
|  |  * 1. Redistributions of source code must retain the above copyright notice, | ||||||
|  |  *    this list of conditions and the following disclaimer. | ||||||
|  |  * | ||||||
|  |  * 2. Redistributions in binary form must reproduce the above copyright notice, | ||||||
|  |  *    this list of conditions and the following disclaimer in the documentation | ||||||
|  |  *    and/or other materials provided with the distribution. | ||||||
|  |  * | ||||||
|  |  * 3. Neither the name of the copyright holder nor the names of its contributors | ||||||
|  |  *    may be used to endorse or promote products derived from this software | ||||||
|  |  *    without specific prior written permission. | ||||||
|  |  * | ||||||
|  |  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" | ||||||
|  |  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||||||
|  |  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||||||
|  |  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE | ||||||
|  |  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR | ||||||
|  |  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF | ||||||
|  |  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS | ||||||
|  |  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN | ||||||
|  |  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | ||||||
|  |  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE | ||||||
|  |  * POSSIBILITY OF SUCH DAMAGE. | ||||||
|  |  * | ||||||
|  |  *******************************************************************************/ | ||||||
|  |  | ||||||
|  | #include <sysc/iss_factory.h> | ||||||
|  | #include <iss/arch/${coreDef.name.toLowerCase()}.h> | ||||||
|  | #include <iss/arch/riscv_hart_m_p.h> | ||||||
|  | #include <iss/arch/riscv_hart_mu_p.h> | ||||||
|  | #include <sysc/sc_core_adapter.h> | ||||||
|  | #include <sysc/core_complex.h> | ||||||
|  | #include <array> | ||||||
|  | <% | ||||||
|  | def array_count = coreDef.name.toLowerCase()=="tgc5d" || coreDef.name.toLowerCase()=="tgc5e"? 3 : 2; | ||||||
|  | %> | ||||||
|  | namespace iss { | ||||||
|  | namespace interp { | ||||||
|  | using namespace sysc; | ||||||
|  | volatile std::array<bool, ${array_count}> ${coreDef.name.toLowerCase()}_init = { | ||||||
|  |         iss_factory::instance().register_creator("${coreDef.name.toLowerCase()}|m_p|interp", [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|  |             auto* cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|  |             auto* cpu = new sc_core_adapter<arch::riscv_hart_m_p<arch::${coreDef.name.toLowerCase()}>>(cc); | ||||||
|  |             return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::${coreDef.name.toLowerCase()}*>(cpu), gdb_port)}}; | ||||||
|  |         }), | ||||||
|  |         iss_factory::instance().register_creator("${coreDef.name.toLowerCase()}|mu_p|interp", [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|  |             auto* cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|  |             auto* cpu = new sc_core_adapter<arch::riscv_hart_mu_p<arch::${coreDef.name.toLowerCase()}>>(cc); | ||||||
|  |             return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::${coreDef.name.toLowerCase()}*>(cpu), gdb_port)}}; | ||||||
|  |         })<%if(coreDef.name.toLowerCase()=="tgc5d" || coreDef.name.toLowerCase()=="tgc5e") {%>, | ||||||
|  |         iss_factory::instance().register_creator("${coreDef.name.toLowerCase()}|mu_p_clic_pmp|interp", [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|  |             auto* cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|  |             auto* cpu = new sc_core_adapter<arch::riscv_hart_mu_p<arch::${coreDef.name.toLowerCase()}, (iss::arch::features_e)(iss::arch::FEAT_PMP | iss::arch::FEAT_EXT_N | iss::arch::FEAT_CLIC)>>(cc); | ||||||
|  |             return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::${coreDef.name.toLowerCase()}*>(cpu), gdb_port)}}; | ||||||
|  |         })<%}%> | ||||||
|  | }; | ||||||
|  | } | ||||||
|  | #if defined(WITH_LLVM) | ||||||
|  | namespace llvm { | ||||||
|  | using namespace sysc; | ||||||
|  | volatile std::array<bool, ${array_count}> ${coreDef.name.toLowerCase()}_init = { | ||||||
|  |         iss_factory::instance().register_creator("${coreDef.name.toLowerCase()}|m_p|llvm", [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|  |             auto* cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|  |             auto* cpu = new sc_core_adapter<arch::riscv_hart_m_p<arch::${coreDef.name.toLowerCase()}>>(cc); | ||||||
|  |             return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::${coreDef.name.toLowerCase()}*>(cpu), gdb_port)}}; | ||||||
|  |         }), | ||||||
|  |         iss_factory::instance().register_creator("${coreDef.name.toLowerCase()}|mu_p|llvm", [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|  |             auto* cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|  |             auto* cpu = new sc_core_adapter<arch::riscv_hart_mu_p<arch::${coreDef.name.toLowerCase()}>>(cc); | ||||||
|  |             return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::${coreDef.name.toLowerCase()}*>(cpu), gdb_port)}}; | ||||||
|  |         })<%if(coreDef.name.toLowerCase()=="tgc5d" || coreDef.name.toLowerCase()=="tgc5e") {%>, | ||||||
|  |         iss_factory::instance().register_creator("${coreDef.name.toLowerCase()}|mu_p_clic_pmp|llvm", [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|  |             auto* cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|  |             auto* cpu = new sc_core_adapter<arch::riscv_hart_mu_p<arch::${coreDef.name.toLowerCase()}, (iss::arch::features_e)(iss::arch::FEAT_PMP | iss::arch::FEAT_EXT_N | iss::arch::FEAT_CLIC)>>(cc); | ||||||
|  |             return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::${coreDef.name.toLowerCase()}*>(cpu), gdb_port)}}; | ||||||
|  |         })<%}%> | ||||||
|  | }; | ||||||
|  | } | ||||||
|  | #endif | ||||||
|  | #if defined(WITH_TCC) | ||||||
|  | namespace tcc { | ||||||
|  | using namespace sysc; | ||||||
|  | volatile std::array<bool, ${array_count}> ${coreDef.name.toLowerCase()}_init = { | ||||||
|  |         iss_factory::instance().register_creator("${coreDef.name.toLowerCase()}|m_p|tcc", [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|  |             auto* cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|  |             auto* cpu = new sc_core_adapter<arch::riscv_hart_m_p<arch::${coreDef.name.toLowerCase()}>>(cc); | ||||||
|  |             return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::${coreDef.name.toLowerCase()}*>(cpu), gdb_port)}}; | ||||||
|  |         }), | ||||||
|  |         iss_factory::instance().register_creator("${coreDef.name.toLowerCase()}|mu_p|tcc", [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|  |             auto* cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|  |             auto* cpu = new sc_core_adapter<arch::riscv_hart_mu_p<arch::${coreDef.name.toLowerCase()}>>(cc); | ||||||
|  |             return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::${coreDef.name.toLowerCase()}*>(cpu), gdb_port)}}; | ||||||
|  |         })<%if(coreDef.name.toLowerCase()=="tgc5d" || coreDef.name.toLowerCase()=="tgc5e") {%>, | ||||||
|  |         iss_factory::instance().register_creator("${coreDef.name.toLowerCase()}|mu_p_clic_pmp|tcc", [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|  |             auto* cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|  |             auto* cpu = new sc_core_adapter<arch::riscv_hart_mu_p<arch::${coreDef.name.toLowerCase()}, (iss::arch::features_e)(iss::arch::FEAT_PMP | iss::arch::FEAT_EXT_N | iss::arch::FEAT_CLIC)>>(cc); | ||||||
|  |             return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::${coreDef.name.toLowerCase()}*>(cpu), gdb_port)}}; | ||||||
|  |         })<%}%> | ||||||
|  | }; | ||||||
|  | } | ||||||
|  | #endif | ||||||
|  | #if defined(WITH_ASMJIT) | ||||||
|  | namespace asmjit { | ||||||
|  | using namespace sysc; | ||||||
|  | volatile std::array<bool, ${array_count}> ${coreDef.name.toLowerCase()}_init = { | ||||||
|  |         iss_factory::instance().register_creator("${coreDef.name.toLowerCase()}|m_p|asmjit", [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|  |             auto* cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|  |             auto* cpu = new sc_core_adapter<arch::riscv_hart_m_p<arch::${coreDef.name.toLowerCase()}>>(cc); | ||||||
|  |             return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::${coreDef.name.toLowerCase()}*>(cpu), gdb_port)}}; | ||||||
|  |         }), | ||||||
|  |         iss_factory::instance().register_creator("${coreDef.name.toLowerCase()}|mu_p|asmjit", [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|  |             auto* cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|  |             auto* cpu = new sc_core_adapter<arch::riscv_hart_mu_p<arch::${coreDef.name.toLowerCase()}>>(cc); | ||||||
|  |             return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::${coreDef.name.toLowerCase()}*>(cpu), gdb_port)}}; | ||||||
|  |         })<%if(coreDef.name.toLowerCase()=="tgc5d" || coreDef.name.toLowerCase()=="tgc5e") {%>, | ||||||
|  |         iss_factory::instance().register_creator("${coreDef.name.toLowerCase()}|mu_p_clic_pmp|asmjit", [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|  |             auto* cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|  |             auto* cpu = new sc_core_adapter<arch::riscv_hart_mu_p<arch::${coreDef.name.toLowerCase()}, (iss::arch::features_e)(iss::arch::FEAT_PMP | iss::arch::FEAT_EXT_N | iss::arch::FEAT_CLIC)>>(cc); | ||||||
|  |             return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::${coreDef.name.toLowerCase()}*>(cpu), gdb_port)}}; | ||||||
|  |         })<%}%> | ||||||
|  | }; | ||||||
|  | } | ||||||
|  | #endif | ||||||
|  | } | ||||||
							
								
								
									
										280
									
								
								gen_input/templates/asmjit/CORENAME.cpp.gtl
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										280
									
								
								gen_input/templates/asmjit/CORENAME.cpp.gtl
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,280 @@ | |||||||
|  | /******************************************************************************* | ||||||
|  |  * Copyright (C) 2017, 2023 MINRES Technologies GmbH | ||||||
|  |  * All rights reserved. | ||||||
|  |  * | ||||||
|  |  * Redistribution and use in source and binary forms, with or without | ||||||
|  |  * modification, are permitted provided that the following conditions are met: | ||||||
|  |  * | ||||||
|  |  * 1. Redistributions of source code must retain the above copyright notice, | ||||||
|  |  *    this list of conditions and the following disclaimer. | ||||||
|  |  * | ||||||
|  |  * 2. Redistributions in binary form must reproduce the above copyright notice, | ||||||
|  |  *    this list of conditions and the following disclaimer in the documentation | ||||||
|  |  *    and/or other materials provided with the distribution. | ||||||
|  |  * | ||||||
|  |  * 3. Neither the name of the copyright holder nor the names of its contributors | ||||||
|  |  *    may be used to endorse or promote products derived from this software | ||||||
|  |  *    without specific prior written permission. | ||||||
|  |  * | ||||||
|  |  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" | ||||||
|  |  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||||||
|  |  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||||||
|  |  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE | ||||||
|  |  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR | ||||||
|  |  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF | ||||||
|  |  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS | ||||||
|  |  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN | ||||||
|  |  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | ||||||
|  |  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE | ||||||
|  |  * POSSIBILITY OF SUCH DAMAGE. | ||||||
|  |  * | ||||||
|  |  *******************************************************************************/ | ||||||
|  |  | ||||||
|  | #include <iss/arch/${coreDef.name.toLowerCase()}.h> | ||||||
|  | #include <iss/debugger/gdb_session.h> | ||||||
|  | #include <iss/debugger/server.h> | ||||||
|  | #include <iss/iss.h> | ||||||
|  | #include <iss/asmjit/vm_base.h> | ||||||
|  | #include <asmjit/asmjit.h> | ||||||
|  | #include <util/logging.h> | ||||||
|  | #include <fp_functions.h> | ||||||
|  | #ifndef FMT_HEADER_ONLY | ||||||
|  | #define FMT_HEADER_ONLY | ||||||
|  | #endif | ||||||
|  | #include <fmt/format.h> | ||||||
|  |  | ||||||
|  | #include <array> | ||||||
|  | #include <iss/debugger/riscv_target_adapter.h> | ||||||
|  |  | ||||||
|  | namespace iss { | ||||||
|  | namespace asmjit { | ||||||
|  |  | ||||||
|  |  | ||||||
|  | namespace ${coreDef.name.toLowerCase()} { | ||||||
|  | using namespace ::asmjit; | ||||||
|  | using namespace iss::arch; | ||||||
|  | using namespace iss::debugger; | ||||||
|  |  | ||||||
|  | template <typename ARCH> class vm_impl : public iss::asmjit::vm_base<ARCH> { | ||||||
|  | public: | ||||||
|  |     using traits = arch::traits<ARCH>; | ||||||
|  |     using super = typename iss::asmjit::vm_base<ARCH>; | ||||||
|  |     using virt_addr_t = typename super::virt_addr_t; | ||||||
|  |     using phys_addr_t = typename super::phys_addr_t; | ||||||
|  |     using code_word_t = typename super::code_word_t; | ||||||
|  |     using mem_type_e = typename super::mem_type_e; | ||||||
|  |     using addr_t = typename super::addr_t; | ||||||
|  |  | ||||||
|  |     vm_impl(); | ||||||
|  |  | ||||||
|  |     vm_impl(ARCH &core, unsigned core_id = 0, unsigned cluster_id = 0); | ||||||
|  |  | ||||||
|  |     void enableDebug(bool enable) { super::sync_exec = super::ALL_SYNC; } | ||||||
|  |  | ||||||
|  |     target_adapter_if *accquire_target_adapter(server_if *srv) override { | ||||||
|  |         debugger_if::dbg_enabled = true; | ||||||
|  |         if (vm_base<ARCH>::tgt_adapter == nullptr) | ||||||
|  |             vm_base<ARCH>::tgt_adapter = new riscv_target_adapter<ARCH>(srv, this->get_arch()); | ||||||
|  |         return vm_base<ARCH>::tgt_adapter; | ||||||
|  |     } | ||||||
|  |  | ||||||
|  | protected: | ||||||
|  |     using vm_base<ARCH>::get_reg_ptr; | ||||||
|  |     using this_class = vm_impl<ARCH>; | ||||||
|  |     using compile_func = continuation_e (this_class::*)(virt_addr_t&, code_word_t, jit_holder&); | ||||||
|  |  | ||||||
|  |     continuation_e gen_single_inst_behavior(virt_addr_t&, unsigned int &, jit_holder&) override; | ||||||
|  |     inline const char *name(size_t index){return traits::reg_aliases.at(index);} | ||||||
|  |  | ||||||
|  |     template<unsigned W, typename U, typename S = typename std::make_signed<U>::type> | ||||||
|  |     inline S sext(U from) { | ||||||
|  |         auto mask = (1ULL<<W) - 1; | ||||||
|  |         auto sign_mask = 1ULL<<(W-1); | ||||||
|  |         return (from & mask) | ((from & sign_mask) ? ~mask : 0); | ||||||
|  |     }  | ||||||
|  | #include "helper_func.h" | ||||||
|  |  | ||||||
|  | private: | ||||||
|  |     /**************************************************************************** | ||||||
|  |      * start opcode definitions | ||||||
|  |      ****************************************************************************/ | ||||||
|  |     struct instruction_descriptor { | ||||||
|  |         size_t length; | ||||||
|  |         uint32_t value; | ||||||
|  |         uint32_t mask; | ||||||
|  |         compile_func op; | ||||||
|  |     }; | ||||||
|  |     struct decoding_tree_node{ | ||||||
|  |         std::vector<instruction_descriptor> instrs; | ||||||
|  |         std::vector<decoding_tree_node*> children; | ||||||
|  |         uint32_t submask = std::numeric_limits<uint32_t>::max(); | ||||||
|  |         uint32_t value; | ||||||
|  |         decoding_tree_node(uint32_t value) : value(value){} | ||||||
|  |     }; | ||||||
|  |  | ||||||
|  |     decoding_tree_node* root {nullptr}; | ||||||
|  |  | ||||||
|  |     const std::array<instruction_descriptor, ${instructions.size}> instr_descr = {{ | ||||||
|  |          /* entries are: size, valid value, valid mask, function ptr */<%instructions.each{instr -> %> | ||||||
|  |         /* instruction ${instr.instruction.name}, encoding '${instr.encoding}' */ | ||||||
|  |         {${instr.length}, ${instr.encoding}, ${instr.mask}, &this_class::__${generator.functionName(instr.name)}},<%}%> | ||||||
|  |     }}; | ||||||
|  |   | ||||||
|  |     /* instruction definitions */<%instructions.eachWithIndex{instr, idx -> %> | ||||||
|  |     /* instruction ${idx}: ${instr.name} */ | ||||||
|  |     continuation_e __${generator.functionName(instr.name)}(virt_addr_t& pc, code_word_t instr, jit_holder& jh){ | ||||||
|  |         uint64_t PC = pc.val; | ||||||
|  |         <%instr.fields.eachLine{%>${it} | ||||||
|  |         <%}%>if(this->disass_enabled){ | ||||||
|  |             /* generate disass */ | ||||||
|  |         } | ||||||
|  |         x86::Compiler& cc = jh.cc; | ||||||
|  |         //ideally only do this if necessary (someone / plugin needs it) | ||||||
|  |         cc.mov(jh.pc,PC); | ||||||
|  |         cc.comment(fmt::format("\\n${instr.name}_{:#x}:",pc.val).c_str()); | ||||||
|  |         this->gen_sync(jh, PRE_SYNC, ${idx}); | ||||||
|  |         pc=pc+ ${instr.length/8}; | ||||||
|  |         | ||||||
|  |         gen_instr_prologue(jh, pc.val); | ||||||
|  |         cc.comment("\\n//behavior:"); | ||||||
|  |         /*generate behavior*/ | ||||||
|  |         <%instr.behavior.eachLine{%>${it} | ||||||
|  |         <%}%> | ||||||
|  |         gen_instr_epilogue(jh); | ||||||
|  |         this->gen_sync(jh, POST_SYNC, ${idx}); | ||||||
|  |     	return returnValue;         | ||||||
|  |     } | ||||||
|  |     <%}%> | ||||||
|  |     /**************************************************************************** | ||||||
|  |      * end opcode definitions | ||||||
|  |      ****************************************************************************/ | ||||||
|  |     continuation_e illegal_intruction(virt_addr_t &pc, code_word_t instr, jit_holder& jh ) { | ||||||
|  |  | ||||||
|  |         return BRANCH; | ||||||
|  |     }     | ||||||
|  |     //decoding functionality | ||||||
|  |  | ||||||
|  |     void populate_decoding_tree(decoding_tree_node* root){ | ||||||
|  |         //create submask | ||||||
|  |         for(auto instr: root->instrs){ | ||||||
|  |             root->submask &= instr.mask; | ||||||
|  |         } | ||||||
|  |         //put each instr according to submask&encoding into children | ||||||
|  |         for(auto instr: root->instrs){ | ||||||
|  |             bool foundMatch = false; | ||||||
|  |             for(auto child: root->children){ | ||||||
|  |                 //use value as identifying trait | ||||||
|  |                 if(child->value == (instr.value&root->submask)){ | ||||||
|  |                     child->instrs.push_back(instr); | ||||||
|  |                     foundMatch = true; | ||||||
|  |                 } | ||||||
|  |             } | ||||||
|  |             if(!foundMatch){ | ||||||
|  |                 decoding_tree_node* child = new decoding_tree_node(instr.value&root->submask); | ||||||
|  |                 child->instrs.push_back(instr); | ||||||
|  |                 root->children.push_back(child); | ||||||
|  |             } | ||||||
|  |         } | ||||||
|  |         root->instrs.clear(); | ||||||
|  |         //call populate_decoding_tree for all children | ||||||
|  |         if(root->children.size() >1) | ||||||
|  |             for(auto child: root->children){ | ||||||
|  |                 populate_decoding_tree(child);       | ||||||
|  |             } | ||||||
|  |         else{ | ||||||
|  |             //sort instrs by value of the mask, this works bc we want to have the least restrictive one last | ||||||
|  |             std::sort(root->children[0]->instrs.begin(), root->children[0]->instrs.end(), [](const instruction_descriptor& instr1, const instruction_descriptor& instr2) { | ||||||
|  |             return instr1.mask > instr2.mask; | ||||||
|  |             });  | ||||||
|  |         } | ||||||
|  |     } | ||||||
|  |     compile_func decode_instr(decoding_tree_node* node, code_word_t word){ | ||||||
|  |         if(!node->children.size()){ | ||||||
|  |             if(node->instrs.size() == 1) return node->instrs[0].op; | ||||||
|  |             for(auto instr : node->instrs){ | ||||||
|  |                 if((instr.mask&word) == instr.value) return instr.op; | ||||||
|  |             } | ||||||
|  |         } | ||||||
|  |         else{ | ||||||
|  |             for(auto child : node->children){ | ||||||
|  |                 if (child->value == (node->submask&word)){ | ||||||
|  |                     return decode_instr(child, word); | ||||||
|  |                 }   | ||||||
|  |             }   | ||||||
|  |         } | ||||||
|  |         return nullptr; | ||||||
|  |     } | ||||||
|  | }; | ||||||
|  |  | ||||||
|  | template <typename CODE_WORD> void debug_fn(CODE_WORD instr) { | ||||||
|  |     volatile CODE_WORD x = instr; | ||||||
|  |     instr = 2 * x; | ||||||
|  | } | ||||||
|  |  | ||||||
|  | template <typename ARCH> vm_impl<ARCH>::vm_impl() { this(new ARCH()); } | ||||||
|  |  | ||||||
|  | template <typename ARCH> | ||||||
|  | vm_impl<ARCH>::vm_impl(ARCH &core, unsigned core_id, unsigned cluster_id) | ||||||
|  | : vm_base<ARCH>(core, core_id, cluster_id) { | ||||||
|  |     root = new decoding_tree_node(std::numeric_limits<uint32_t>::max()); | ||||||
|  |     for(auto instr: instr_descr){ | ||||||
|  |         root->instrs.push_back(instr); | ||||||
|  |     } | ||||||
|  |     populate_decoding_tree(root); | ||||||
|  | } | ||||||
|  |  | ||||||
|  | template <typename ARCH> | ||||||
|  | continuation_e | ||||||
|  | vm_impl<ARCH>::gen_single_inst_behavior(virt_addr_t &pc, unsigned int &inst_cnt, jit_holder& jh) { | ||||||
|  |     enum {TRAP_ID=1<<16}; | ||||||
|  |     code_word_t instr = 0; | ||||||
|  |     phys_addr_t paddr(pc); | ||||||
|  |     auto *const data = (uint8_t *)&instr; | ||||||
|  |     if(this->core.has_mmu()) | ||||||
|  |         paddr = this->core.virt2phys(pc); | ||||||
|  |     auto res = this->core.read(paddr, 4, data); | ||||||
|  |     if (res != iss::Ok) | ||||||
|  |         throw trap_access(TRAP_ID, pc.val); | ||||||
|  |     if (instr == 0x0000006f || (instr&0xffff)==0xa001) | ||||||
|  |         throw simulation_stopped(0); // 'J 0' or 'C.J 0' | ||||||
|  |     ++inst_cnt; | ||||||
|  |     auto f = decode_instr(root, instr); | ||||||
|  |     if (f == nullptr)  | ||||||
|  |         f = &this_class::illegal_intruction; | ||||||
|  |     return (this->*f)(pc, instr, jh); | ||||||
|  | } | ||||||
|  |  | ||||||
|  |  | ||||||
|  |  | ||||||
|  | } // namespace ${coreDef.name.toLowerCase()} | ||||||
|  |  | ||||||
|  | template <> | ||||||
|  | std::unique_ptr<vm_if> create<arch::${coreDef.name.toLowerCase()}>(arch::${coreDef.name.toLowerCase()} *core, unsigned short port, bool dump) { | ||||||
|  |     auto ret = new ${coreDef.name.toLowerCase()}::vm_impl<arch::${coreDef.name.toLowerCase()}>(*core, dump); | ||||||
|  |     if (port != 0) debugger::server<debugger::gdb_session>::run_server(ret, port); | ||||||
|  |     return std::unique_ptr<vm_if>(ret); | ||||||
|  | } | ||||||
|  | } // namespace asmjit | ||||||
|  | } // namespace iss | ||||||
|  |  | ||||||
|  | #include <iss/factory.h> | ||||||
|  | #include <iss/arch/riscv_hart_m_p.h> | ||||||
|  | #include <iss/arch/riscv_hart_mu_p.h> | ||||||
|  | namespace iss { | ||||||
|  | namespace { | ||||||
|  | volatile std::array<bool, 2> dummy = { | ||||||
|  |         core_factory::instance().register_creator("${coreDef.name.toLowerCase()}|m_p|asmjit", [](unsigned port, void*) -> std::tuple<cpu_ptr, vm_ptr>{ | ||||||
|  |             auto* cpu = new iss::arch::riscv_hart_m_p<iss::arch::${coreDef.name.toLowerCase()}>(); | ||||||
|  |             auto* vm = new asmjit::${coreDef.name.toLowerCase()}::vm_impl<arch::${coreDef.name.toLowerCase()}>(*cpu, false); | ||||||
|  |             if (port != 0) debugger::server<debugger::gdb_session>::run_server(vm, port); | ||||||
|  |             return {cpu_ptr{cpu}, vm_ptr{vm}}; | ||||||
|  |         }), | ||||||
|  |         core_factory::instance().register_creator("${coreDef.name.toLowerCase()}|mu_p|asmjit", [](unsigned port, void*) -> std::tuple<cpu_ptr, vm_ptr>{ | ||||||
|  |             auto* cpu = new iss::arch::riscv_hart_mu_p<iss::arch::${coreDef.name.toLowerCase()}>(); | ||||||
|  |             auto* vm = new asmjit::${coreDef.name.toLowerCase()}::vm_impl<arch::${coreDef.name.toLowerCase()}>(*cpu, false); | ||||||
|  |             if (port != 0) debugger::server<debugger::gdb_session>::run_server(vm, port); | ||||||
|  |             return {cpu_ptr{cpu}, vm_ptr{vm}}; | ||||||
|  |         }) | ||||||
|  | }; | ||||||
|  | } | ||||||
|  | } | ||||||
| @@ -39,10 +39,13 @@ def nativeTypeSize(int size){ | |||||||
| #include <iss/debugger/server.h> | #include <iss/debugger/server.h> | ||||||
| #include <iss/iss.h> | #include <iss/iss.h> | ||||||
| #include <iss/interp/vm_base.h> | #include <iss/interp/vm_base.h> | ||||||
|  | #include <vm/fp_functions.h> | ||||||
| #include <util/logging.h> | #include <util/logging.h> | ||||||
| #include <sstream> |  | ||||||
| #include <boost/coroutine2/all.hpp> | #include <boost/coroutine2/all.hpp> | ||||||
| #include <functional> | #include <functional> | ||||||
|  | #include <exception> | ||||||
|  | #include <vector> | ||||||
|  | #include <sstream> | ||||||
|  |  | ||||||
| #ifndef FMT_HEADER_ONLY | #ifndef FMT_HEADER_ONLY | ||||||
| #define FMT_HEADER_ONLY | #define FMT_HEADER_ONLY | ||||||
| @@ -59,6 +62,10 @@ using namespace iss::arch; | |||||||
| using namespace iss::debugger; | using namespace iss::debugger; | ||||||
| using namespace std::placeholders; | using namespace std::placeholders; | ||||||
|  |  | ||||||
|  | struct memory_access_exception : public std::exception{ | ||||||
|  |     memory_access_exception(){} | ||||||
|  | }; | ||||||
|  |  | ||||||
| template <typename ARCH> class vm_impl : public iss::interp::vm_base<ARCH> { | template <typename ARCH> class vm_impl : public iss::interp::vm_base<ARCH> { | ||||||
| public: | public: | ||||||
|     using traits = arch::traits<ARCH>; |     using traits = arch::traits<ARCH>; | ||||||
| @@ -91,30 +98,9 @@ protected: | |||||||
|  |  | ||||||
|     inline const char *name(size_t index){return index<traits::reg_aliases.size()?traits::reg_aliases[index]:"illegal";} |     inline const char *name(size_t index){return index<traits::reg_aliases.size()?traits::reg_aliases[index]:"illegal";} | ||||||
|  |  | ||||||
|     typename arch::traits<ARCH>::opcode_e decode_inst_id(code_word_t instr); |  | ||||||
|     virt_addr_t execute_inst(finish_cond_e cond, virt_addr_t start, uint64_t icount_limit) override; |     virt_addr_t execute_inst(finish_cond_e cond, virt_addr_t start, uint64_t icount_limit) override; | ||||||
|  |  | ||||||
|     // some compile time constants |     // some compile time constants | ||||||
|     // enum { MASK16 = 0b1111110001100011, MASK32 = 0b11111111111100000111000001111111 }; |  | ||||||
|     enum { MASK16 = 0b1111111111111111, MASK32 = 0b11111111111100000111000001111111 }; |  | ||||||
|     enum { EXTR_MASK16 = MASK16 >> 2, EXTR_MASK32 = MASK32 >> 2 }; |  | ||||||
|     enum { |  | ||||||
|         LUT_SIZE = 1 << util::bit_count(static_cast<uint32_t>(EXTR_MASK32)), |  | ||||||
|         LUT_SIZE_C = 1 << util::bit_count(static_cast<uint32_t>(EXTR_MASK16)) |  | ||||||
|     }; |  | ||||||
|  |  | ||||||
|     std::array<compile_func, LUT_SIZE> lut; |  | ||||||
|  |  | ||||||
|     std::array<compile_func, LUT_SIZE_C> lut_00, lut_01, lut_10; |  | ||||||
|     std::array<compile_func, LUT_SIZE> lut_11; |  | ||||||
|  |  | ||||||
|     struct instruction_pattern { |  | ||||||
|         uint32_t value; |  | ||||||
|         uint32_t mask; |  | ||||||
|         typename arch::traits<ARCH>::opcode_e id; |  | ||||||
|     }; |  | ||||||
|  |  | ||||||
|     std::array<std::vector<instruction_pattern>, 4> qlut; |  | ||||||
|  |  | ||||||
|     inline void raise(uint16_t trap_id, uint16_t cause){ |     inline void raise(uint16_t trap_id, uint16_t cause){ | ||||||
|         auto trap_val =  0x80ULL << 24 | (cause << 16) | trap_id; |         auto trap_val =  0x80ULL << 24 | (cause << 16) | trap_id; | ||||||
| @@ -158,30 +144,96 @@ private: | |||||||
|     /**************************************************************************** |     /**************************************************************************** | ||||||
|      * start opcode definitions |      * start opcode definitions | ||||||
|      ****************************************************************************/ |      ****************************************************************************/ | ||||||
|     struct InstructionDesriptor { |     struct instruction_descriptor { | ||||||
|         size_t length; |         size_t length; | ||||||
|         uint32_t value; |         uint32_t value; | ||||||
|         uint32_t mask; |         uint32_t mask; | ||||||
|         typename arch::traits<ARCH>::opcode_e op; |         typename arch::traits<ARCH>::opcode_e op; | ||||||
|     }; |     }; | ||||||
|  |     struct decoding_tree_node{ | ||||||
|  |         std::vector<instruction_descriptor> instrs; | ||||||
|  |         std::vector<decoding_tree_node*> children; | ||||||
|  |         uint32_t submask = std::numeric_limits<uint32_t>::max(); | ||||||
|  |         uint32_t value; | ||||||
|  |         decoding_tree_node(uint32_t value) : value(value){} | ||||||
|  |     }; | ||||||
|  |  | ||||||
|     const std::array<InstructionDesriptor, ${instructions.size}> instr_descr = {{ |     decoding_tree_node* root {nullptr}; | ||||||
|  |     const std::array<instruction_descriptor, ${instructions.size}> instr_descr = {{ | ||||||
|          /* entries are: size, valid value, valid mask, function ptr */<%instructions.each{instr -> %> |          /* entries are: size, valid value, valid mask, function ptr */<%instructions.each{instr -> %> | ||||||
|         {${instr.length}, ${instr.encoding}, ${instr.mask}, arch::traits<ARCH>::opcode_e::${instr.instruction.name}},<%}%> |         {${instr.length}, ${instr.encoding}, ${instr.mask}, arch::traits<ARCH>::opcode_e::${instr.instruction.name}},<%}%> | ||||||
|     }}; |     }}; | ||||||
|  |  | ||||||
|     //static constexpr typename traits::addr_t upper_bits = ~traits::PGMASK; |  | ||||||
|     iss::status fetch_ins(virt_addr_t pc, uint8_t * data){ |     iss::status fetch_ins(virt_addr_t pc, uint8_t * data){ | ||||||
|         auto phys_pc = this->core.v2p(pc); |         if(this->core.has_mmu()) { | ||||||
|         //if ((pc.val & upper_bits) != ((pc.val + 2) & upper_bits)) { // we may cross a page boundary |             auto phys_pc = this->core.virt2phys(pc); | ||||||
|         //    if (this->core.read(phys_pc, 2, data) != iss::Ok) return iss::Err; | //            if ((pc.val & upper_bits) != ((pc.val + 2) & upper_bits)) { // we may cross a page boundary | ||||||
|         //    if ((data[0] & 0x3) == 0x3) // this is a 32bit instruction | //                if (this->core.read(phys_pc, 2, data) != iss::Ok) return iss::Err; | ||||||
|         //        if (this->core.read(this->core.v2p(pc + 2), 2, data + 2) != iss::Ok) return iss::Err; | //                if ((data[0] & 0x3) == 0x3) // this is a 32bit instruction | ||||||
|         //} else { | //                    if (this->core.read(this->core.v2p(pc + 2), 2, data + 2) != iss::Ok) | ||||||
|             if (this->core.read(phys_pc, 4, data) != iss::Ok)  return iss::Err; | //                        return iss::Err; | ||||||
|         //} | //            } else { | ||||||
|  |                 if (this->core.read(phys_pc, 4, data) != iss::Ok) | ||||||
|  |                     return iss::Err; | ||||||
|  | //            } | ||||||
|  |         } else { | ||||||
|  |             if (this->core.read(phys_addr_t(pc.access, pc.space, pc.val), 4, data) != iss::Ok) | ||||||
|  |                 return iss::Err; | ||||||
|  |  | ||||||
|  |         } | ||||||
|         return iss::Ok; |         return iss::Ok; | ||||||
|     } |     } | ||||||
|  |      | ||||||
|  |     void populate_decoding_tree(decoding_tree_node* root){ | ||||||
|  |         //create submask | ||||||
|  |         for(auto instr: root->instrs){ | ||||||
|  |             root->submask &= instr.mask; | ||||||
|  |         } | ||||||
|  |         //put each instr according to submask&encoding into children | ||||||
|  |         for(auto instr: root->instrs){ | ||||||
|  |             bool foundMatch = false; | ||||||
|  |             for(auto child: root->children){ | ||||||
|  |                 //use value as identifying trait | ||||||
|  |                 if(child->value == (instr.value&root->submask)){ | ||||||
|  |                     child->instrs.push_back(instr); | ||||||
|  |                     foundMatch = true; | ||||||
|  |                 } | ||||||
|  |             } | ||||||
|  |             if(!foundMatch){ | ||||||
|  |                 decoding_tree_node* child = new decoding_tree_node(instr.value&root->submask); | ||||||
|  |                 child->instrs.push_back(instr); | ||||||
|  |                 root->children.push_back(child); | ||||||
|  |             } | ||||||
|  |         } | ||||||
|  |         root->instrs.clear(); | ||||||
|  |         //call populate_decoding_tree for all children | ||||||
|  |         if(root->children.size() >1) | ||||||
|  |             for(auto child: root->children){ | ||||||
|  |                 populate_decoding_tree(child);       | ||||||
|  |             } | ||||||
|  |         else{ | ||||||
|  |             //sort instrs by value of the mask, this works bc we want to have the least restrictive one last | ||||||
|  |             std::sort(root->children[0]->instrs.begin(), root->children[0]->instrs.end(), [](const instruction_descriptor& instr1, const instruction_descriptor& instr2) { | ||||||
|  |             return instr1.mask > instr2.mask; | ||||||
|  |             });  | ||||||
|  |         } | ||||||
|  |     } | ||||||
|  |     typename arch::traits<ARCH>::opcode_e  decode_instr(decoding_tree_node* node, code_word_t word){ | ||||||
|  |         if(!node->children.size()){ | ||||||
|  |             if(node->instrs.size() == 1) return node->instrs[0].op; | ||||||
|  |             for(auto instr : node->instrs){ | ||||||
|  |                 if((instr.mask&word) == instr.value) return instr.op; | ||||||
|  |             } | ||||||
|  |         } | ||||||
|  |         else{ | ||||||
|  |             for(auto child : node->children){ | ||||||
|  |                 if (child->value == (node->submask&word)){ | ||||||
|  |                     return decode_instr(child, word); | ||||||
|  |                 }   | ||||||
|  |             }   | ||||||
|  |         } | ||||||
|  |         return arch::traits<ARCH>::opcode_e::MAX_OPCODE; | ||||||
|  |     } | ||||||
| }; | }; | ||||||
|  |  | ||||||
| template <typename CODE_WORD> void debug_fn(CODE_WORD insn) { | template <typename CODE_WORD> void debug_fn(CODE_WORD insn) { | ||||||
| @@ -208,16 +260,11 @@ constexpr size_t bit_count(uint32_t u) { | |||||||
| template <typename ARCH> | template <typename ARCH> | ||||||
| vm_impl<ARCH>::vm_impl(ARCH &core, unsigned core_id, unsigned cluster_id) | vm_impl<ARCH>::vm_impl(ARCH &core, unsigned core_id, unsigned cluster_id) | ||||||
| : vm_base<ARCH>(core, core_id, cluster_id) { | : vm_base<ARCH>(core, core_id, cluster_id) { | ||||||
|     unsigned id=0; |     root = new decoding_tree_node(std::numeric_limits<uint32_t>::max()); | ||||||
|     for (auto instr : instr_descr) { |     for(auto instr:instr_descr){ | ||||||
|         auto quadrant = instr.value & 0x3; |         root->instrs.push_back(instr); | ||||||
|         qlut[quadrant].push_back(instruction_pattern{instr.value, instr.mask, instr.op}); |  | ||||||
|     } |  | ||||||
|     for(auto& lut: qlut){ |  | ||||||
|         std::sort(std::begin(lut), std::end(lut), [](instruction_pattern const& a, instruction_pattern const& b){ |  | ||||||
|             return bit_count(a.mask) > bit_count(b.mask); |  | ||||||
|         }); |  | ||||||
|     } |     } | ||||||
|  |     populate_decoding_tree(root); | ||||||
| } | } | ||||||
|  |  | ||||||
| inline bool is_count_limit_enabled(finish_cond_e cond){ | inline bool is_count_limit_enabled(finish_cond_e cond){ | ||||||
| @@ -228,14 +275,6 @@ inline bool is_jump_to_self_enabled(finish_cond_e cond){ | |||||||
|     return (cond & finish_cond_e::JUMP_TO_SELF) == finish_cond_e::JUMP_TO_SELF; |     return (cond & finish_cond_e::JUMP_TO_SELF) == finish_cond_e::JUMP_TO_SELF; | ||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> |  | ||||||
| typename arch::traits<ARCH>::opcode_e vm_impl<ARCH>::decode_inst_id(code_word_t instr){ |  | ||||||
|     for(auto& e: qlut[instr&0x3]){ |  | ||||||
|         if(!((instr&e.mask) ^ e.value )) return e.id; |  | ||||||
|     } |  | ||||||
|     return arch::traits<ARCH>::opcode_e::MAX_OPCODE; |  | ||||||
| } |  | ||||||
|  |  | ||||||
| template <typename ARCH> | template <typename ARCH> | ||||||
| typename vm_base<ARCH>::virt_addr_t vm_impl<ARCH>::execute_inst(finish_cond_e cond, virt_addr_t start, uint64_t icount_limit){ | typename vm_base<ARCH>::virt_addr_t vm_impl<ARCH>::execute_inst(finish_cond_e cond, virt_addr_t start, uint64_t icount_limit){ | ||||||
|     auto pc=start; |     auto pc=start; | ||||||
| @@ -257,32 +296,34 @@ typename vm_base<ARCH>::virt_addr_t vm_impl<ARCH>::execute_inst(finish_cond_e co | |||||||
|         } else { |         } else { | ||||||
|             if (is_jump_to_self_enabled(cond) && |             if (is_jump_to_self_enabled(cond) && | ||||||
|                     (instr == 0x0000006f || (instr&0xffff)==0xa001)) throw simulation_stopped(0); // 'J 0' or 'C.J 0' |                     (instr == 0x0000006f || (instr&0xffff)==0xa001)) throw simulation_stopped(0); // 'J 0' or 'C.J 0' | ||||||
|             auto inst_id = decode_inst_id(instr); |             auto inst_id = decode_instr(root, instr); | ||||||
|             // pre execution stuff |             // pre execution stuff | ||||||
|              this->core.reg.last_branch = 0; |              this->core.reg.last_branch = 0; | ||||||
|             if(this->sync_exec && PRE_SYNC) this->do_sync(PRE_SYNC, static_cast<unsigned>(inst_id)); |             if(this->sync_exec && PRE_SYNC) this->do_sync(PRE_SYNC, static_cast<unsigned>(inst_id)); | ||||||
|             switch(inst_id){<%instructions.eachWithIndex{instr, idx -> %> |             try{ | ||||||
|             case arch::traits<ARCH>::opcode_e::${instr.name}: { |                 switch(inst_id){<%instructions.eachWithIndex{instr, idx -> %> | ||||||
|                 <%instr.fields.eachLine{%>${it} |                 case arch::traits<ARCH>::opcode_e::${instr.name}: { | ||||||
|                 <%}%>if(this->disass_enabled){ |                     <%instr.fields.eachLine{%>${it} | ||||||
|                     /* generate console output when executing the command */<%instr.disass.eachLine{%> |                     <%}%>if(this->disass_enabled){ | ||||||
|  |                         /* generate console output when executing the command */<%instr.disass.eachLine{%> | ||||||
|  |                         ${it}<%}%> | ||||||
|  |                     } | ||||||
|  |                     // used registers<%instr.usedVariables.each{ k,v-> | ||||||
|  |                     if(v.isArray) {%> | ||||||
|  |                     auto* ${k} = reinterpret_cast<uint${nativeTypeSize(v.type.size)}_t*>(this->regs_base_ptr+arch::traits<ARCH>::reg_byte_offsets[arch::traits<ARCH>::${k}0]);<% }else{ %>  | ||||||
|  |                     auto* ${k} = reinterpret_cast<uint${nativeTypeSize(v.type.size)}_t*>(this->regs_base_ptr+arch::traits<ARCH>::reg_byte_offsets[arch::traits<ARCH>::${k}]); | ||||||
|  |                     <%}}%>// calculate next pc value | ||||||
|  |                     *NEXT_PC = *PC + ${instr.length/8}; | ||||||
|  |                     // execute instruction<%instr.behavior.eachLine{%> | ||||||
|                     ${it}<%}%> |                     ${it}<%}%> | ||||||
|  |                     break; | ||||||
|  |                 }// @suppress("No break at end of case")<%}%> | ||||||
|  |                 default: { | ||||||
|  |                     *NEXT_PC = *PC + ((instr & 3) == 3 ? 4 : 2); | ||||||
|  |                     raise(0,  2); | ||||||
|                 } |                 } | ||||||
|                 // used registers<%instr.usedVariables.each{ k,v-> |                 } | ||||||
|                 if(v.isArray) {%> |             }catch(memory_access_exception& e){} | ||||||
|                 auto* ${k} = reinterpret_cast<uint${nativeTypeSize(v.type.size)}_t*>(this->regs_base_ptr+arch::traits<ARCH>::reg_byte_offsets[arch::traits<ARCH>::${k}0]);<% }else{ %>  |  | ||||||
|                 auto* ${k} = reinterpret_cast<uint${nativeTypeSize(v.type.size)}_t*>(this->regs_base_ptr+arch::traits<ARCH>::reg_byte_offsets[arch::traits<ARCH>::${k}]); |  | ||||||
|                 <%}}%>// calculate next pc value |  | ||||||
|                 *NEXT_PC = *PC + ${instr.length/8}; |  | ||||||
|                 // execute instruction<%instr.behavior.eachLine{%> |  | ||||||
|                 ${it}<%}%> |  | ||||||
|                 TRAP_${instr.name}:break; |  | ||||||
|             }// @suppress("No break at end of case")<%}%> |  | ||||||
|             default: { |  | ||||||
|                 *NEXT_PC = *PC + ((instr & 3) == 3 ? 4 : 2); |  | ||||||
|                 raise(0,  2); |  | ||||||
|             } |  | ||||||
|             } |  | ||||||
|             // post execution stuff |             // post execution stuff | ||||||
|             process_spawn_blocks(); |             process_spawn_blocks(); | ||||||
|             if(this->sync_exec && POST_SYNC) this->do_sync(POST_SYNC, static_cast<unsigned>(inst_id)); |             if(this->sync_exec && POST_SYNC) this->do_sync(POST_SYNC, static_cast<unsigned>(inst_id)); | ||||||
| @@ -304,7 +345,7 @@ typename vm_base<ARCH>::virt_addr_t vm_impl<ARCH>::execute_inst(finish_cond_e co | |||||||
|     return pc; |     return pc; | ||||||
| } | } | ||||||
|  |  | ||||||
| } | } // namespace ${coreDef.name.toLowerCase()} | ||||||
|  |  | ||||||
| template <> | template <> | ||||||
| std::unique_ptr<vm_if> create<arch::${coreDef.name.toLowerCase()}>(arch::${coreDef.name.toLowerCase()} *core, unsigned short port, bool dump) { | std::unique_ptr<vm_if> create<arch::${coreDef.name.toLowerCase()}>(arch::${coreDef.name.toLowerCase()} *core, unsigned short port, bool dump) { | ||||||
| @@ -320,7 +361,7 @@ std::unique_ptr<vm_if> create<arch::${coreDef.name.toLowerCase()}>(arch::${coreD | |||||||
| #include <iss/arch/riscv_hart_mu_p.h> | #include <iss/arch/riscv_hart_mu_p.h> | ||||||
| namespace iss { | namespace iss { | ||||||
| namespace { | namespace { | ||||||
| std::array<bool, 2> dummy = { | volatile std::array<bool, 2> dummy = { | ||||||
|         core_factory::instance().register_creator("${coreDef.name.toLowerCase()}|m_p|interp", [](unsigned port, void*) -> std::tuple<cpu_ptr, vm_ptr>{ |         core_factory::instance().register_creator("${coreDef.name.toLowerCase()}|m_p|interp", [](unsigned port, void*) -> std::tuple<cpu_ptr, vm_ptr>{ | ||||||
|             auto* cpu = new iss::arch::riscv_hart_m_p<iss::arch::${coreDef.name.toLowerCase()}>(); |             auto* cpu = new iss::arch::riscv_hart_m_p<iss::arch::${coreDef.name.toLowerCase()}>(); | ||||||
| 		    auto vm = new interp::${coreDef.name.toLowerCase()}::vm_impl<arch::${coreDef.name.toLowerCase()}>(*cpu, false); | 		    auto vm = new interp::${coreDef.name.toLowerCase()}::vm_impl<arch::${coreDef.name.toLowerCase()}>(*cpu, false); | ||||||
| @@ -336,8 +377,3 @@ std::array<bool, 2> dummy = { | |||||||
| }; | }; | ||||||
| } | } | ||||||
| } | } | ||||||
| extern "C" { |  | ||||||
| 	bool* get_${coreDef.name.toLowerCase()}_interp_creators() { |  | ||||||
| 		return iss::dummy.data(); |  | ||||||
| 	} |  | ||||||
| } |  | ||||||
| @@ -30,10 +30,9 @@ | |||||||
|  * |  * | ||||||
|  *******************************************************************************/ |  *******************************************************************************/ | ||||||
| 
 | 
 | ||||||
|  | #include <iss/arch/${coreDef.name.toLowerCase()}.h> | ||||||
| #include <iss/debugger/gdb_session.h> | #include <iss/debugger/gdb_session.h> | ||||||
| #include <iss/debugger/server.h> | #include <iss/debugger/server.h> | ||||||
| #include <iss/arch/${coreDef.name.toLowerCase()}.h> |  | ||||||
| #include <iss/arch/riscv_hart_m_p.h> |  | ||||||
| #include <iss/iss.h> | #include <iss/iss.h> | ||||||
| #include <iss/llvm/vm_base.h> | #include <iss/llvm/vm_base.h> | ||||||
| #include <util/logging.h> | #include <util/logging.h> | ||||||
| @@ -59,6 +58,7 @@ using namespace iss::debugger; | |||||||
| 
 | 
 | ||||||
| template <typename ARCH> class vm_impl : public iss::llvm::vm_base<ARCH> { | template <typename ARCH> class vm_impl : public iss::llvm::vm_base<ARCH> { | ||||||
| public: | public: | ||||||
|  |     using traits = arch::traits<ARCH>; | ||||||
|     using super = typename iss::llvm::vm_base<ARCH>; |     using super = typename iss::llvm::vm_base<ARCH>; | ||||||
|     using virt_addr_t = typename super::virt_addr_t; |     using virt_addr_t = typename super::virt_addr_t; | ||||||
|     using phys_addr_t = typename super::phys_addr_t; |     using phys_addr_t = typename super::phys_addr_t; | ||||||
| @@ -81,7 +81,7 @@ public: | |||||||
| protected: | protected: | ||||||
|     using vm_base<ARCH>::get_reg_ptr; |     using vm_base<ARCH>::get_reg_ptr; | ||||||
| 
 | 
 | ||||||
|     inline const char *name(size_t index){return traits<ARCH>::reg_aliases.at(index);} |     inline const char *name(size_t index){return traits::reg_aliases.at(index);} | ||||||
| 
 | 
 | ||||||
|     template <typename T> inline ConstantInt *size(T type) { |     template <typename T> inline ConstantInt *size(T type) { | ||||||
|         return ConstantInt::get(getContext(), APInt(32, type->getType()->getScalarSizeInBits())); |         return ConstantInt::get(getContext(), APInt(32, type->getType()->getScalarSizeInBits())); | ||||||
| @@ -89,7 +89,7 @@ protected: | |||||||
| 
 | 
 | ||||||
|     void setup_module(Module* m) override { |     void setup_module(Module* m) override { | ||||||
|         super::setup_module(m); |         super::setup_module(m); | ||||||
|         iss::llvm::fp_impl::add_fp_functions_2_module(m, traits<ARCH>::FP_REGS_SIZE, traits<ARCH>::XLEN); |         iss::llvm::fp_impl::add_fp_functions_2_module(m, traits::FP_REGS_SIZE, traits::XLEN); | ||||||
|     } |     } | ||||||
| 
 | 
 | ||||||
|     inline Value *gen_choose(Value *cond, Value *trueVal, Value *falseVal, unsigned size) { |     inline Value *gen_choose(Value *cond, Value *trueVal, Value *falseVal, unsigned size) { | ||||||
| @@ -111,92 +111,74 @@ protected: | |||||||
|     void gen_trap_check(BasicBlock *bb); |     void gen_trap_check(BasicBlock *bb); | ||||||
| 
 | 
 | ||||||
|     inline Value *gen_reg_load(unsigned i, unsigned level = 0) { |     inline Value *gen_reg_load(unsigned i, unsigned level = 0) { | ||||||
|         return this->builder.CreateLoad(get_reg_ptr(i), false); |         return this->builder.CreateLoad(this->get_typeptr(i), get_reg_ptr(i), false); | ||||||
|     } |     } | ||||||
| 
 | 
 | ||||||
|     inline void gen_set_pc(virt_addr_t pc, unsigned reg_num) { |     inline void gen_set_pc(virt_addr_t pc, unsigned reg_num) { | ||||||
|         Value *next_pc_v = this->builder.CreateSExtOrTrunc(this->gen_const(traits<ARCH>::XLEN, pc.val), |         Value *next_pc_v = this->builder.CreateSExtOrTrunc(this->gen_const(traits::XLEN, pc.val), | ||||||
|                                                            this->get_type(traits<ARCH>::XLEN)); |                                                            this->get_type(traits::XLEN)); | ||||||
|         this->builder.CreateStore(next_pc_v, get_reg_ptr(reg_num), true); |         this->builder.CreateStore(next_pc_v, get_reg_ptr(reg_num), true); | ||||||
|     } |     } | ||||||
| 
 | 
 | ||||||
|     // some compile time constants |     // some compile time constants | ||||||
|     // enum { MASK16 = 0b1111110001100011, MASK32 = 0b11111111111100000111000001111111 }; |  | ||||||
|     enum { MASK16 = 0b1111111111111111, MASK32 = 0b11111111111100000111000001111111 }; |  | ||||||
|     enum { EXTR_MASK16 = MASK16 >> 2, EXTR_MASK32 = MASK32 >> 2 }; |  | ||||||
|     enum { LUT_SIZE = 1 << util::bit_count(EXTR_MASK32), LUT_SIZE_C = 1 << util::bit_count(EXTR_MASK16) }; |  | ||||||
| 
 | 
 | ||||||
|     using this_class = vm_impl<ARCH>; |     using this_class = vm_impl<ARCH>; | ||||||
|     using compile_func = std::tuple<continuation_e, BasicBlock *> (this_class::*)(virt_addr_t &pc, |     using compile_func = std::tuple<continuation_e, BasicBlock *> (this_class::*)(virt_addr_t &pc, | ||||||
|                                                                                   code_word_t instr, |                                                                                   code_word_t instr, | ||||||
|                                                                                   BasicBlock *bb); |                                                                                   BasicBlock *bb); | ||||||
|     std::array<compile_func, LUT_SIZE> lut; |     template<unsigned W, typename U, typename S = typename std::make_signed<U>::type> | ||||||
| 
 |     inline S sext(U from) { | ||||||
|     std::array<compile_func, LUT_SIZE_C> lut_00, lut_01, lut_10; |         auto mask = (1ULL<<W) - 1; | ||||||
|     std::array<compile_func, LUT_SIZE> lut_11; |         auto sign_mask = 1ULL<<(W-1); | ||||||
| 
 |         return (from & mask) | ((from & sign_mask) ? ~mask : 0); | ||||||
| 	std::array<compile_func *, 4> qlut; |     }    | ||||||
| 
 |  | ||||||
| 	std::array<const uint32_t, 4> lutmasks = {{EXTR_MASK16, EXTR_MASK16, EXTR_MASK16, EXTR_MASK32}}; |  | ||||||
| 
 |  | ||||||
|     void expand_bit_mask(int pos, uint32_t mask, uint32_t value, uint32_t valid, uint32_t idx, compile_func lut[], |  | ||||||
|                          compile_func f) { |  | ||||||
|         if (pos < 0) { |  | ||||||
|             lut[idx] = f; |  | ||||||
|         } else { |  | ||||||
|             auto bitmask = 1UL << pos; |  | ||||||
|             if ((mask & bitmask) == 0) { |  | ||||||
|                 expand_bit_mask(pos - 1, mask, value, valid, idx, lut, f); |  | ||||||
|             } else { |  | ||||||
|                 if ((valid & bitmask) == 0) { |  | ||||||
|                     expand_bit_mask(pos - 1, mask, value, valid, (idx << 1), lut, f); |  | ||||||
|                     expand_bit_mask(pos - 1, mask, value, valid, (idx << 1) + 1, lut, f); |  | ||||||
|                 } else { |  | ||||||
|                     auto new_val = idx << 1; |  | ||||||
|                     if ((value & bitmask) != 0) new_val++; |  | ||||||
|                     expand_bit_mask(pos - 1, mask, value, valid, new_val, lut, f); |  | ||||||
|                 } |  | ||||||
|             } |  | ||||||
|         } |  | ||||||
|     } |  | ||||||
| 
 |  | ||||||
|     inline uint32_t extract_fields(uint32_t val) { return extract_fields(29, val >> 2, lutmasks[val & 0x3], 0); } |  | ||||||
| 
 |  | ||||||
|     uint32_t extract_fields(int pos, uint32_t val, uint32_t mask, uint32_t lut_val) { |  | ||||||
|         if (pos >= 0) { |  | ||||||
|             auto bitmask = 1UL << pos; |  | ||||||
|             if ((mask & bitmask) == 0) { |  | ||||||
|                 lut_val = extract_fields(pos - 1, val, mask, lut_val); |  | ||||||
|             } else { |  | ||||||
|                 auto new_val = lut_val << 1; |  | ||||||
|                 if ((val & bitmask) != 0) new_val++; |  | ||||||
|                 lut_val = extract_fields(pos - 1, val, mask, new_val); |  | ||||||
|             } |  | ||||||
|         } |  | ||||||
|         return lut_val; |  | ||||||
|     } |  | ||||||
| 
 | 
 | ||||||
| private: | private: | ||||||
|     /**************************************************************************** |     /**************************************************************************** | ||||||
|      * start opcode definitions |      * start opcode definitions | ||||||
|      ****************************************************************************/ |      ****************************************************************************/ | ||||||
|     struct InstructionDesriptor { |     struct instruction_descriptor { | ||||||
|         size_t length; |         size_t length; | ||||||
|         uint32_t value; |         uint32_t value; | ||||||
|         uint32_t mask; |         uint32_t mask; | ||||||
|         compile_func op; |         compile_func op; | ||||||
|     }; |     }; | ||||||
|  |     struct decoding_tree_node{ | ||||||
|  |         std::vector<instruction_descriptor> instrs; | ||||||
|  |         std::vector<decoding_tree_node*> children; | ||||||
|  |         uint32_t submask = std::numeric_limits<uint32_t>::max(); | ||||||
|  |         uint32_t value; | ||||||
|  |         decoding_tree_node(uint32_t value) : value(value){} | ||||||
|  |     }; | ||||||
| 
 | 
 | ||||||
|     const std::array<InstructionDesriptor, ${instructions.size}> instr_descr = {{ |     decoding_tree_node* root {nullptr}; | ||||||
|  | 
 | ||||||
|  |     const std::array<instruction_descriptor, ${instructions.size}> instr_descr = {{ | ||||||
|          /* entries are: size, valid value, valid mask, function ptr */<%instructions.each{instr -> %> |          /* entries are: size, valid value, valid mask, function ptr */<%instructions.each{instr -> %> | ||||||
|         /* instruction ${instr.instruction.name} */ |         /* instruction ${instr.instruction.name}, encoding '${instr.encoding}' */ | ||||||
|         {${instr.length}, ${instr.value}, ${instr.mask}, &this_class::__${generator.functionName(instr.name)}},<%}%> |         {${instr.length}, ${instr.encoding}, ${instr.mask}, &this_class::__${generator.functionName(instr.name)}},<%}%> | ||||||
|     }}; |     }}; | ||||||
|   |   | ||||||
|     /* instruction definitions */<%instructions.eachWithIndex{instr, idx -> %> |     /* instruction definitions */<%instructions.eachWithIndex{instr, idx -> %> | ||||||
|     /* instruction ${idx}: ${instr.name} */ |     /* instruction ${idx}: ${instr.name} */ | ||||||
|     std::tuple<continuation_e, BasicBlock*> __${generator.functionName(instr.name)}(virt_addr_t& pc, code_word_t instr, BasicBlock* bb){<%instr.code.eachLine{%> |     std::tuple<continuation_e, BasicBlock*> __${generator.functionName(instr.name)}(virt_addr_t& pc, code_word_t instr, BasicBlock* bb){ | ||||||
|     	${it}<%}%> |         bb->setName(fmt::format("${instr.name}_0x{:X}",pc.val)); | ||||||
|  |         this->gen_sync(PRE_SYNC,${idx}); | ||||||
|  |         uint64_t PC = pc.val; | ||||||
|  |         <%instr.fields.eachLine{%>${it} | ||||||
|  |         <%}%>if(this->disass_enabled){ | ||||||
|  |             /* generate console output when executing the command */<%instr.disass.eachLine{%> | ||||||
|  |             ${it}<%}%> | ||||||
|  |         } | ||||||
|  |         auto cur_pc_val = this->gen_const(32,pc.val); | ||||||
|  |         pc=pc+ ${instr.length/8}; | ||||||
|  |         this->gen_set_pc(pc, traits::NEXT_PC); | ||||||
|  |         <%instr.behavior.eachLine{%>${it} | ||||||
|  |         <%}%> | ||||||
|  |         this->gen_trap_check(bb); | ||||||
|  |     	this->gen_sync(POST_SYNC, ${idx}); | ||||||
|  |         this->builder.CreateBr(bb); | ||||||
|  |     	return returnValue;         | ||||||
|     } |     } | ||||||
|     <%}%> |     <%}%> | ||||||
|     /**************************************************************************** |     /**************************************************************************** | ||||||
| @@ -204,23 +186,75 @@ private: | |||||||
|      ****************************************************************************/ |      ****************************************************************************/ | ||||||
|     std::tuple<continuation_e, BasicBlock *> illegal_intruction(virt_addr_t &pc, code_word_t instr, BasicBlock *bb) { |     std::tuple<continuation_e, BasicBlock *> illegal_intruction(virt_addr_t &pc, code_word_t instr, BasicBlock *bb) { | ||||||
| 		this->gen_sync(iss::PRE_SYNC, instr_descr.size()); | 		this->gen_sync(iss::PRE_SYNC, instr_descr.size()); | ||||||
|         this->builder.CreateStore(this->builder.CreateLoad(get_reg_ptr(traits<ARCH>::NEXT_PC), true), |         this->builder.CreateStore(this->builder.CreateLoad(this->get_typeptr(traits::NEXT_PC), get_reg_ptr(traits::NEXT_PC), true), | ||||||
|                                    get_reg_ptr(traits<ARCH>::PC), true); |                                    get_reg_ptr(traits::PC), true); | ||||||
|         this->builder.CreateStore( |         this->builder.CreateStore( | ||||||
|             this->builder.CreateAdd(this->builder.CreateLoad(get_reg_ptr(traits<ARCH>::ICOUNT), true), |             this->builder.CreateAdd(this->builder.CreateLoad(this->get_typeptr(traits::ICOUNT), get_reg_ptr(traits::ICOUNT), true), | ||||||
|                                      this->gen_const(64U, 1)), |                                      this->gen_const(64U, 1)), | ||||||
|             get_reg_ptr(traits<ARCH>::ICOUNT), true); |             get_reg_ptr(traits::ICOUNT), true); | ||||||
|         pc = pc + ((instr & 3) == 3 ? 4 : 2); |         pc = pc + ((instr & 3) == 3 ? 4 : 2); | ||||||
|         this->gen_raise_trap(0, 2);     // illegal instruction trap |         this->gen_raise_trap(0, 2);     // illegal instruction trap | ||||||
| 		this->gen_sync(iss::POST_SYNC, instr_descr.size()); | 		this->gen_sync(iss::POST_SYNC, instr_descr.size()); | ||||||
|         this->gen_trap_check(this->leave_blk); |         this->gen_trap_check(this->leave_blk); | ||||||
|         return std::make_tuple(BRANCH, nullptr); |         return std::make_tuple(BRANCH, nullptr); | ||||||
|  |     }     | ||||||
|  |     //decoding functionality | ||||||
|  | 
 | ||||||
|  |     void populate_decoding_tree(decoding_tree_node* root){ | ||||||
|  |         //create submask | ||||||
|  |         for(auto instr: root->instrs){ | ||||||
|  |             root->submask &= instr.mask; | ||||||
|  |         } | ||||||
|  |         //put each instr according to submask&encoding into children | ||||||
|  |         for(auto instr: root->instrs){ | ||||||
|  |             bool foundMatch = false; | ||||||
|  |             for(auto child: root->children){ | ||||||
|  |                 //use value as identifying trait | ||||||
|  |                 if(child->value == (instr.value&root->submask)){ | ||||||
|  |                     child->instrs.push_back(instr); | ||||||
|  |                     foundMatch = true; | ||||||
|  |                 } | ||||||
|  |             } | ||||||
|  |             if(!foundMatch){ | ||||||
|  |                 decoding_tree_node* child = new decoding_tree_node(instr.value&root->submask); | ||||||
|  |                 child->instrs.push_back(instr); | ||||||
|  |                 root->children.push_back(child); | ||||||
|  |             } | ||||||
|  |         } | ||||||
|  |         root->instrs.clear(); | ||||||
|  |         //call populate_decoding_tree for all children | ||||||
|  |         if(root->children.size() >1) | ||||||
|  |             for(auto child: root->children){ | ||||||
|  |                 populate_decoding_tree(child);       | ||||||
|  |             } | ||||||
|  |         else{ | ||||||
|  |             //sort instrs by value of the mask, this works bc we want to have the least restrictive one last | ||||||
|  |             std::sort(root->children[0]->instrs.begin(), root->children[0]->instrs.end(), [](const instruction_descriptor& instr1, const instruction_descriptor& instr2) { | ||||||
|  |             return instr1.mask > instr2.mask; | ||||||
|  |             });  | ||||||
|  |         } | ||||||
|  |     } | ||||||
|  |     compile_func decode_instr(decoding_tree_node* node, code_word_t word){ | ||||||
|  |         if(!node->children.size()){ | ||||||
|  |             if(node->instrs.size() == 1) return node->instrs[0].op; | ||||||
|  |             for(auto instr : node->instrs){ | ||||||
|  |                 if((instr.mask&word) == instr.value) return instr.op; | ||||||
|  |             } | ||||||
|  |         } | ||||||
|  |         else{ | ||||||
|  |             for(auto child : node->children){ | ||||||
|  |                 if (child->value == (node->submask&word)){ | ||||||
|  |                     return decode_instr(child, word); | ||||||
|  |                 }   | ||||||
|  |             }   | ||||||
|  |         } | ||||||
|  |         return nullptr; | ||||||
|     } |     } | ||||||
| }; | }; | ||||||
| 
 | 
 | ||||||
| template <typename CODE_WORD> void debug_fn(CODE_WORD insn) { | template <typename CODE_WORD> void debug_fn(CODE_WORD instr) { | ||||||
|     volatile CODE_WORD x = insn; |     volatile CODE_WORD x = instr; | ||||||
|     insn = 2 * x; |     instr = 2 * x; | ||||||
| } | } | ||||||
| 
 | 
 | ||||||
| template <typename ARCH> vm_impl<ARCH>::vm_impl() { this(new ARCH()); } | template <typename ARCH> vm_impl<ARCH>::vm_impl() { this(new ARCH()); } | ||||||
| @@ -228,14 +262,11 @@ template <typename ARCH> vm_impl<ARCH>::vm_impl() { this(new ARCH()); } | |||||||
| template <typename ARCH> | template <typename ARCH> | ||||||
| vm_impl<ARCH>::vm_impl(ARCH &core, unsigned core_id, unsigned cluster_id) | vm_impl<ARCH>::vm_impl(ARCH &core, unsigned core_id, unsigned cluster_id) | ||||||
| : vm_base<ARCH>(core, core_id, cluster_id) { | : vm_base<ARCH>(core, core_id, cluster_id) { | ||||||
|     qlut[0] = lut_00.data(); |     root = new decoding_tree_node(std::numeric_limits<uint32_t>::max()); | ||||||
|     qlut[1] = lut_01.data(); |     for(auto instr:instr_descr){ | ||||||
|     qlut[2] = lut_10.data(); |         root->instrs.push_back(instr); | ||||||
|     qlut[3] = lut_11.data(); |  | ||||||
|     for (auto instr : instr_descr) { |  | ||||||
|         auto quantrant = instr.value & 0x3; |  | ||||||
|         expand_bit_mask(29, lutmasks[quantrant], instr.value >> 2, instr.mask >> 2, 0, qlut[quantrant], instr.op); |  | ||||||
|     } |     } | ||||||
|  |     populate_decoding_tree(root); | ||||||
| } | } | ||||||
| 
 | 
 | ||||||
| template <typename ARCH> | template <typename ARCH> | ||||||
| @@ -243,49 +274,50 @@ std::tuple<continuation_e, BasicBlock *> | |||||||
| vm_impl<ARCH>::gen_single_inst_behavior(virt_addr_t &pc, unsigned int &inst_cnt, BasicBlock *this_block) { | vm_impl<ARCH>::gen_single_inst_behavior(virt_addr_t &pc, unsigned int &inst_cnt, BasicBlock *this_block) { | ||||||
|     // we fetch at max 4 byte, alignment is 2 |     // we fetch at max 4 byte, alignment is 2 | ||||||
|     enum {TRAP_ID=1<<16}; |     enum {TRAP_ID=1<<16}; | ||||||
|     code_word_t insn = 0; |     code_word_t instr = 0; | ||||||
|     const typename traits<ARCH>::addr_t upper_bits = ~traits<ARCH>::PGMASK; |     // const typename traits::addr_t upper_bits = ~traits::PGMASK; | ||||||
|     phys_addr_t paddr(pc); |     phys_addr_t paddr(pc); | ||||||
|     auto *const data = (uint8_t *)&insn; |     auto *const data = (uint8_t *)&instr; | ||||||
|     paddr = this->core.v2p(pc); |     if(this->core.has_mmu()) | ||||||
|     if ((pc.val & upper_bits) != ((pc.val + 2) & upper_bits)) { // we may cross a page boundary |         paddr = this->core.virt2phys(pc); | ||||||
|         auto res = this->core.read(paddr, 2, data); |     //TODO: re-add page handling | ||||||
|         if (res != iss::Ok) throw trap_access(TRAP_ID, pc.val); | //    if ((pc.val & upper_bits) != ((pc.val + 2) & upper_bits)) { // we may cross a page boundary | ||||||
|         if ((insn & 0x3) == 0x3) { // this is a 32bit instruction | //        auto res = this->core.read(paddr, 2, data); | ||||||
|             res = this->core.read(this->core.v2p(pc + 2), 2, data + 2); | //        if (res != iss::Ok) throw trap_access(TRAP_ID, pc.val); | ||||||
|         } | //        if ((instr & 0x3) == 0x3) { // this is a 32bit instruction | ||||||
|     } else { | //            res = this->core.read(this->core.v2p(pc + 2), 2, data + 2); | ||||||
|  | //        } | ||||||
|  | //    } else { | ||||||
|         auto res = this->core.read(paddr, 4, data); |         auto res = this->core.read(paddr, 4, data); | ||||||
|         if (res != iss::Ok) throw trap_access(TRAP_ID, pc.val); |         if (res != iss::Ok) throw trap_access(TRAP_ID, pc.val); | ||||||
|     } | //    } | ||||||
|     if (insn == 0x0000006f || (insn&0xffff)==0xa001) throw simulation_stopped(0); // 'J 0' or 'C.J 0' |     if (instr == 0x0000006f || (instr&0xffff)==0xa001) throw simulation_stopped(0); // 'J 0' or 'C.J 0' | ||||||
|     // curr pc on stack |     // curr pc on stack | ||||||
|     ++inst_cnt; |     ++inst_cnt; | ||||||
|     auto lut_val = extract_fields(insn); |     auto f = decode_instr(root, instr); | ||||||
|     auto f = qlut[insn & 0x3][lut_val]; |  | ||||||
|     if (f == nullptr) { |     if (f == nullptr) { | ||||||
|         f = &this_class::illegal_intruction; |         f = &this_class::illegal_intruction; | ||||||
|     } |     } | ||||||
|     return (this->*f)(pc, insn, this_block); |     return (this->*f)(pc, instr, this_block); | ||||||
| } | } | ||||||
| 
 | 
 | ||||||
| template <typename ARCH> void vm_impl<ARCH>::gen_leave_behavior(BasicBlock *leave_blk) { | template <typename ARCH> void vm_impl<ARCH>::gen_leave_behavior(BasicBlock *leave_blk) { | ||||||
|     this->builder.SetInsertPoint(leave_blk); |     this->builder.SetInsertPoint(leave_blk); | ||||||
|     this->builder.CreateRet(this->builder.CreateLoad(get_reg_ptr(arch::traits<ARCH>::NEXT_PC), false)); |     this->builder.CreateRet(this->builder.CreateLoad(this->get_typeptr(traits::NEXT_PC),get_reg_ptr(traits::NEXT_PC), false)); | ||||||
| } | } | ||||||
| 
 | 
 | ||||||
| template <typename ARCH> void vm_impl<ARCH>::gen_raise_trap(uint16_t trap_id, uint16_t cause) { | template <typename ARCH> void vm_impl<ARCH>::gen_raise_trap(uint16_t trap_id, uint16_t cause) { | ||||||
|     auto *TRAP_val = this->gen_const(32, 0x80 << 24 | (cause << 16) | trap_id); |     auto *TRAP_val = this->gen_const(32, 0x80 << 24 | (cause << 16) | trap_id); | ||||||
|     this->builder.CreateStore(TRAP_val, get_reg_ptr(traits<ARCH>::TRAP_STATE), true); |     this->builder.CreateStore(TRAP_val, get_reg_ptr(traits::TRAP_STATE), true); | ||||||
|     this->builder.CreateStore(this->gen_const(32U, std::numeric_limits<uint32_t>::max()), get_reg_ptr(traits<ARCH>::LAST_BRANCH), false); |     this->builder.CreateStore(this->gen_const(32U, std::numeric_limits<uint32_t>::max()), get_reg_ptr(traits::LAST_BRANCH), false); | ||||||
| } | } | ||||||
| 
 | 
 | ||||||
| template <typename ARCH> void vm_impl<ARCH>::gen_leave_trap(unsigned lvl) { | template <typename ARCH> void vm_impl<ARCH>::gen_leave_trap(unsigned lvl) { | ||||||
|     std::vector<Value *> args{ this->core_ptr, ConstantInt::get(getContext(), APInt(64, lvl)) }; |     std::vector<Value *> args{ this->core_ptr, ConstantInt::get(getContext(), APInt(64, lvl)) }; | ||||||
|     this->builder.CreateCall(this->mod->getFunction("leave_trap"), args); |     this->builder.CreateCall(this->mod->getFunction("leave_trap"), args); | ||||||
|     auto *PC_val = this->gen_read_mem(traits<ARCH>::CSR, (lvl << 8) + 0x41, traits<ARCH>::XLEN / 8); |     auto *PC_val = this->gen_read_mem(traits::CSR, (lvl << 8) + 0x41, traits::XLEN / 8); | ||||||
|     this->builder.CreateStore(PC_val, get_reg_ptr(traits<ARCH>::NEXT_PC), false); |     this->builder.CreateStore(PC_val, get_reg_ptr(traits::NEXT_PC), false); | ||||||
|     this->builder.CreateStore(this->gen_const(32U, std::numeric_limits<uint32_t>::max()), get_reg_ptr(traits<ARCH>::LAST_BRANCH), false); |     this->builder.CreateStore(this->gen_const(32U, std::numeric_limits<uint32_t>::max()), get_reg_ptr(traits::LAST_BRANCH), false); | ||||||
| } | } | ||||||
| 
 | 
 | ||||||
| template <typename ARCH> void vm_impl<ARCH>::gen_wait(unsigned type) { | template <typename ARCH> void vm_impl<ARCH>::gen_wait(unsigned type) { | ||||||
| @@ -295,22 +327,25 @@ template <typename ARCH> void vm_impl<ARCH>::gen_wait(unsigned type) { | |||||||
| 
 | 
 | ||||||
| template <typename ARCH> void vm_impl<ARCH>::gen_trap_behavior(BasicBlock *trap_blk) { | template <typename ARCH> void vm_impl<ARCH>::gen_trap_behavior(BasicBlock *trap_blk) { | ||||||
|     this->builder.SetInsertPoint(trap_blk); |     this->builder.SetInsertPoint(trap_blk); | ||||||
|     auto *trap_state_val = this->builder.CreateLoad(get_reg_ptr(traits<ARCH>::TRAP_STATE), true); |     this->gen_sync(POST_SYNC, -1); //TODO get right InstrId | ||||||
|  |     auto *trap_state_val = this->builder.CreateLoad(this->get_typeptr(traits::TRAP_STATE), get_reg_ptr(traits::TRAP_STATE), true); | ||||||
|     this->builder.CreateStore(this->gen_const(32U, std::numeric_limits<uint32_t>::max()), |     this->builder.CreateStore(this->gen_const(32U, std::numeric_limits<uint32_t>::max()), | ||||||
|                               get_reg_ptr(traits<ARCH>::LAST_BRANCH), false); |                               get_reg_ptr(traits::LAST_BRANCH), false); | ||||||
|     std::vector<Value *> args{this->core_ptr, this->adj_to64(trap_state_val), |     std::vector<Value *> args{this->core_ptr, this->adj_to64(trap_state_val), | ||||||
|                               this->adj_to64(this->builder.CreateLoad(get_reg_ptr(traits<ARCH>::PC), false))}; |                               this->adj_to64(this->builder.CreateLoad(this->get_typeptr(traits::PC), get_reg_ptr(traits::PC), false))}; | ||||||
|     this->builder.CreateCall(this->mod->getFunction("enter_trap"), args); |     this->builder.CreateCall(this->mod->getFunction("enter_trap"), args); | ||||||
|     auto *trap_addr_val = this->builder.CreateLoad(get_reg_ptr(traits<ARCH>::NEXT_PC), false); |     auto *trap_addr_val = this->builder.CreateLoad(this->get_typeptr(traits::NEXT_PC), get_reg_ptr(traits::NEXT_PC), false); | ||||||
|     this->builder.CreateRet(trap_addr_val); |     this->builder.CreateRet(trap_addr_val); | ||||||
| } | } | ||||||
| 
 | 
 | ||||||
| template <typename ARCH> inline void vm_impl<ARCH>::gen_trap_check(BasicBlock *bb) { | template <typename ARCH> inline void vm_impl<ARCH>::gen_trap_check(BasicBlock *bb) { | ||||||
|     auto *v = this->builder.CreateLoad(get_reg_ptr(arch::traits<ARCH>::TRAP_STATE), true); |     auto* target_bb = BasicBlock::Create(this->mod->getContext(), "", this->func, bb); | ||||||
|  |     auto *v = this->builder.CreateLoad(this->get_typeptr(traits::TRAP_STATE), get_reg_ptr(traits::TRAP_STATE), true); | ||||||
|     this->gen_cond_branch(this->builder.CreateICmp( |     this->gen_cond_branch(this->builder.CreateICmp( | ||||||
|                               ICmpInst::ICMP_EQ, v, |                               ICmpInst::ICMP_EQ, v, | ||||||
|                               ConstantInt::get(getContext(), APInt(v->getType()->getIntegerBitWidth(), 0))), |                               ConstantInt::get(getContext(), APInt(v->getType()->getIntegerBitWidth(), 0))), | ||||||
|                           bb, this->trap_blk, 1); |                           target_bb, this->trap_blk, 1); | ||||||
|  |     this->builder.SetInsertPoint(target_bb); | ||||||
| } | } | ||||||
| 
 | 
 | ||||||
| } // namespace ${coreDef.name.toLowerCase()} | } // namespace ${coreDef.name.toLowerCase()} | ||||||
| @@ -323,3 +358,25 @@ std::unique_ptr<vm_if> create<arch::${coreDef.name.toLowerCase()}>(arch::${coreD | |||||||
| } | } | ||||||
| } // namespace llvm | } // namespace llvm | ||||||
| } // namespace iss | } // namespace iss | ||||||
|  | 
 | ||||||
|  | #include <iss/factory.h> | ||||||
|  | #include <iss/arch/riscv_hart_m_p.h> | ||||||
|  | #include <iss/arch/riscv_hart_mu_p.h> | ||||||
|  | namespace iss { | ||||||
|  | namespace { | ||||||
|  | volatile std::array<bool, 2> dummy = { | ||||||
|  |         core_factory::instance().register_creator("${coreDef.name.toLowerCase()}|m_p|llvm", [](unsigned port, void*) -> std::tuple<cpu_ptr, vm_ptr>{ | ||||||
|  |             auto* cpu = new iss::arch::riscv_hart_m_p<iss::arch::${coreDef.name.toLowerCase()}>(); | ||||||
|  |             auto* vm = new llvm::${coreDef.name.toLowerCase()}::vm_impl<arch::${coreDef.name.toLowerCase()}>(*cpu, false); | ||||||
|  |             if (port != 0) debugger::server<debugger::gdb_session>::run_server(vm, port); | ||||||
|  |             return {cpu_ptr{cpu}, vm_ptr{vm}}; | ||||||
|  |         }), | ||||||
|  |         core_factory::instance().register_creator("${coreDef.name.toLowerCase()}|mu_p|llvm", [](unsigned port, void*) -> std::tuple<cpu_ptr, vm_ptr>{ | ||||||
|  |             auto* cpu = new iss::arch::riscv_hart_mu_p<iss::arch::${coreDef.name.toLowerCase()}>(); | ||||||
|  |             auto* vm = new llvm::${coreDef.name.toLowerCase()}::vm_impl<arch::${coreDef.name.toLowerCase()}>(*cpu, false); | ||||||
|  |             if (port != 0) debugger::server<debugger::gdb_session>::run_server(vm, port); | ||||||
|  |             return {cpu_ptr{cpu}, vm_ptr{vm}}; | ||||||
|  |         }) | ||||||
|  | }; | ||||||
|  | } | ||||||
|  | } | ||||||
| @@ -1,9 +0,0 @@ | |||||||
| {  |  | ||||||
| 	"${coreDef.name}" : [<%instructions.eachWithIndex{instr,index -> %>${index==0?"":","} |  | ||||||
| 		{ |  | ||||||
| 			"name"  : "${instr.name}", |  | ||||||
| 			"size"  : ${instr.length}, |  | ||||||
| 			"delay" : ${generator.hasAttribute(instr.instruction, com.minres.coredsl.coreDsl.InstrAttribute.COND)?[1,1]:1} |  | ||||||
| 		}<%}%> |  | ||||||
| 	] |  | ||||||
| } |  | ||||||
| @@ -1,223 +0,0 @@ | |||||||
| /******************************************************************************* |  | ||||||
|  * Copyright (C) 2017, 2018 MINRES Technologies GmbH |  | ||||||
|  * All rights reserved. |  | ||||||
|  * |  | ||||||
|  * Redistribution and use in source and binary forms, with or without |  | ||||||
|  * modification, are permitted provided that the following conditions are met: |  | ||||||
|  * |  | ||||||
|  * 1. Redistributions of source code must retain the above copyright notice, |  | ||||||
|  *    this list of conditions and the following disclaimer. |  | ||||||
|  * |  | ||||||
|  * 2. Redistributions in binary form must reproduce the above copyright notice, |  | ||||||
|  *    this list of conditions and the following disclaimer in the documentation |  | ||||||
|  *    and/or other materials provided with the distribution. |  | ||||||
|  * |  | ||||||
|  * 3. Neither the name of the copyright holder nor the names of its contributors |  | ||||||
|  *    may be used to endorse or promote products derived from this software |  | ||||||
|  *    without specific prior written permission. |  | ||||||
|  * |  | ||||||
|  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" |  | ||||||
|  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |  | ||||||
|  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |  | ||||||
|  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE |  | ||||||
|  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR |  | ||||||
|  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF |  | ||||||
|  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS |  | ||||||
|  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN |  | ||||||
|  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) |  | ||||||
|  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE |  | ||||||
|  * POSSIBILITY OF SUCH DAMAGE. |  | ||||||
|  * |  | ||||||
|  *******************************************************************************/ |  | ||||||
|  |  | ||||||
| <%  |  | ||||||
| import com.minres.coredsl.coreDsl.Register |  | ||||||
| import com.minres.coredsl.coreDsl.RegisterFile |  | ||||||
| import com.minres.coredsl.coreDsl.RegisterAlias |  | ||||||
| def getTypeSize(size){ |  | ||||||
| 	if(size > 32) 64 else if(size > 16) 32 else if(size > 8) 16 else 8 |  | ||||||
| } |  | ||||||
| def getOriginalName(reg){ |  | ||||||
|     if( reg.original instanceof RegisterFile) { |  | ||||||
|     	if( reg.index != null ) { |  | ||||||
|         	return reg.original.name+generator.generateHostCode(reg.index) |  | ||||||
|         } else { |  | ||||||
|         	return reg.original.name |  | ||||||
|         } |  | ||||||
|     } else if(reg.original instanceof Register){ |  | ||||||
|         return reg.original.name |  | ||||||
|     } |  | ||||||
| } |  | ||||||
| def getRegisterNames(){ |  | ||||||
| 	def regNames = [] |  | ||||||
|  	allRegs.each { reg ->  |  | ||||||
| 		if( reg instanceof RegisterFile) { |  | ||||||
| 			(reg.range.right..reg.range.left).each{ |  | ||||||
|     			regNames+=reg.name.toLowerCase()+it |  | ||||||
|             } |  | ||||||
|         } else if(reg instanceof Register){ |  | ||||||
|     		regNames+=reg.name.toLowerCase() |  | ||||||
|         } |  | ||||||
|     } |  | ||||||
|     return regNames |  | ||||||
| } |  | ||||||
| def getRegisterAliasNames(){ |  | ||||||
| 	def regMap = allRegs.findAll{it instanceof RegisterAlias }.collectEntries {[getOriginalName(it), it.name]} |  | ||||||
|  	return allRegs.findAll{it instanceof Register || it instanceof RegisterFile}.collect{reg -> |  | ||||||
| 		if( reg instanceof RegisterFile) { |  | ||||||
| 			return (reg.range.right..reg.range.left).collect{ (regMap[reg.name]?:regMap[reg.name+it]?:reg.name.toLowerCase()+it).toLowerCase() } |  | ||||||
|         } else if(reg instanceof Register){ |  | ||||||
|     		regMap[reg.name]?:reg.name.toLowerCase() |  | ||||||
|         } |  | ||||||
|  	}.flatten() |  | ||||||
| } |  | ||||||
| %> |  | ||||||
| #ifndef _${coreDef.name.toUpperCase()}_H_ |  | ||||||
| #define _${coreDef.name.toUpperCase()}_H_ |  | ||||||
|  |  | ||||||
| #include <array> |  | ||||||
| #include <iss/arch/traits.h> |  | ||||||
| #include <iss/arch_if.h> |  | ||||||
| #include <iss/vm_if.h> |  | ||||||
|  |  | ||||||
| namespace iss { |  | ||||||
| namespace arch { |  | ||||||
|  |  | ||||||
| struct ${coreDef.name.toLowerCase()}; |  | ||||||
|  |  | ||||||
| template <> struct traits<${coreDef.name.toLowerCase()}> { |  | ||||||
|  |  | ||||||
| 	constexpr static char const* const core_type = "${coreDef.name}"; |  | ||||||
|      |  | ||||||
|   	static constexpr std::array<const char*, ${getRegisterNames().size}> reg_names{ |  | ||||||
|  		{"${getRegisterNames().join("\", \"")}"}}; |  | ||||||
|   |  | ||||||
|   	static constexpr std::array<const char*, ${getRegisterAliasNames().size}> reg_aliases{ |  | ||||||
|  		{"${getRegisterAliasNames().join("\", \"")}"}}; |  | ||||||
|  |  | ||||||
|     enum constants {${coreDef.constants.collect{c -> c.name+"="+c.value}.join(', ')}}; |  | ||||||
|  |  | ||||||
|     constexpr static unsigned FP_REGS_SIZE = ${coreDef.constants.find {it.name=='FLEN'}?.value?:0}; |  | ||||||
|  |  | ||||||
|     enum reg_e {<% |  | ||||||
|      	allRegs.each { reg ->  |  | ||||||
|     		if( reg instanceof RegisterFile) { |  | ||||||
|     			(reg.range.right..reg.range.left).each{%> |  | ||||||
|         ${reg.name}${it},<% |  | ||||||
|                 } |  | ||||||
|             } else if(reg instanceof Register){ %> |  | ||||||
|         ${reg.name},<%   |  | ||||||
|             } |  | ||||||
|         }%> |  | ||||||
|         NUM_REGS, |  | ||||||
|         NEXT_${pc.name}=NUM_REGS, |  | ||||||
|         TRAP_STATE, |  | ||||||
|         PENDING_TRAP, |  | ||||||
|         MACHINE_STATE, |  | ||||||
|         LAST_BRANCH, |  | ||||||
|         ICOUNT<%  |  | ||||||
|      	allRegs.each { reg ->  |  | ||||||
|     		if(reg instanceof RegisterAlias){ def aliasname=getOriginalName(reg)%>, |  | ||||||
|         ${reg.name} = ${aliasname}<% |  | ||||||
|             } |  | ||||||
|         }%> |  | ||||||
|     }; |  | ||||||
|  |  | ||||||
|     using reg_t = uint${regDataWidth}_t; |  | ||||||
|  |  | ||||||
|     using addr_t = uint${addrDataWidth}_t; |  | ||||||
|  |  | ||||||
|     using code_word_t = uint${addrDataWidth}_t; //TODO: check removal |  | ||||||
|  |  | ||||||
|     using virt_addr_t = iss::typed_addr_t<iss::address_type::VIRTUAL>; |  | ||||||
|  |  | ||||||
|     using phys_addr_t = iss::typed_addr_t<iss::address_type::PHYSICAL>; |  | ||||||
|  |  | ||||||
|  	static constexpr std::array<const uint32_t, ${regSizes.size}> reg_bit_widths{ |  | ||||||
|  		{${regSizes.join(",")}}}; |  | ||||||
|  |  | ||||||
|     static constexpr std::array<const uint32_t, ${regOffsets.size}> reg_byte_offsets{ |  | ||||||
|     	{${regOffsets.join(",")}}}; |  | ||||||
|  |  | ||||||
|     static const uint64_t addr_mask = (reg_t(1) << (XLEN - 1)) | ((reg_t(1) << (XLEN - 1)) - 1); |  | ||||||
|  |  | ||||||
|     enum sreg_flag_e { FLAGS }; |  | ||||||
|  |  | ||||||
|     enum mem_type_e { ${allSpaces.collect{s -> s.name}.join(', ')} }; |  | ||||||
| }; |  | ||||||
|  |  | ||||||
| struct ${coreDef.name.toLowerCase()}: public arch_if { |  | ||||||
|  |  | ||||||
|     using virt_addr_t = typename traits<${coreDef.name.toLowerCase()}>::virt_addr_t; |  | ||||||
|     using phys_addr_t = typename traits<${coreDef.name.toLowerCase()}>::phys_addr_t; |  | ||||||
|     using reg_t =  typename traits<${coreDef.name.toLowerCase()}>::reg_t; |  | ||||||
|     using addr_t = typename traits<${coreDef.name.toLowerCase()}>::addr_t; |  | ||||||
|  |  | ||||||
|     ${coreDef.name.toLowerCase()}(); |  | ||||||
|     ~${coreDef.name.toLowerCase()}(); |  | ||||||
|  |  | ||||||
|     void reset(uint64_t address=0) override; |  | ||||||
|  |  | ||||||
|     uint8_t* get_regs_base_ptr() override; |  | ||||||
|     /// deprecated |  | ||||||
|     void get_reg(short idx, std::vector<uint8_t>& value) override {} |  | ||||||
|     void set_reg(short idx, const std::vector<uint8_t>& value) override {} |  | ||||||
|     /// deprecated |  | ||||||
|     bool get_flag(int flag) override {return false;} |  | ||||||
|     void set_flag(int, bool value) override {}; |  | ||||||
|     /// deprecated |  | ||||||
|     void update_flags(operations op, uint64_t opr1, uint64_t opr2) override {}; |  | ||||||
|  |  | ||||||
|     inline uint64_t get_icount() { return reg.icount; } |  | ||||||
|  |  | ||||||
|     inline bool should_stop() { return interrupt_sim; } |  | ||||||
|  |  | ||||||
|     inline uint64_t stop_code() { return interrupt_sim; } |  | ||||||
|  |  | ||||||
|     inline phys_addr_t v2p(const iss::addr_t& addr){ |  | ||||||
|         if (addr.space != traits<${coreDef.name.toLowerCase()}>::MEM || addr.type == iss::address_type::PHYSICAL || |  | ||||||
|                 addr_mode[static_cast<uint16_t>(addr.access)&0x3]==address_type::PHYSICAL) { |  | ||||||
|             return phys_addr_t(addr.access, addr.space, addr.val&traits<${coreDef.name.toLowerCase()}>::addr_mask); |  | ||||||
|         } else |  | ||||||
|             return virt2phys(addr); |  | ||||||
|     } |  | ||||||
|  |  | ||||||
|     virtual phys_addr_t virt2phys(const iss::addr_t& addr); |  | ||||||
|  |  | ||||||
|     virtual iss::sync_type needed_sync() const { return iss::NO_SYNC; } |  | ||||||
|  |  | ||||||
|     inline uint32_t get_last_branch() { return reg.last_branch; } |  | ||||||
|  |  | ||||||
| protected: |  | ||||||
|     struct ${coreDef.name}_regs {<% |  | ||||||
|      	allRegs.each { reg ->  |  | ||||||
|     		if( reg instanceof RegisterFile) { |  | ||||||
|     			(reg.range.right..reg.range.left).each{%> |  | ||||||
|         uint${generator.getSize(reg)}_t ${reg.name}${it} = 0;<% |  | ||||||
|                 } |  | ||||||
|             } else if(reg instanceof Register){ %> |  | ||||||
|         uint${generator.getSize(reg)}_t ${reg.name} = 0;<% |  | ||||||
|             } |  | ||||||
|         }%> |  | ||||||
|         uint${generator.getSize(pc)}_t NEXT_${pc.name} = 0; |  | ||||||
|         uint32_t trap_state = 0, pending_trap = 0, machine_state = 0, last_branch = 0; |  | ||||||
|         uint64_t icount = 0; |  | ||||||
|     } reg; |  | ||||||
|  |  | ||||||
|     std::array<address_type, 4> addr_mode; |  | ||||||
|      |  | ||||||
|     uint64_t interrupt_sim=0; |  | ||||||
| <% |  | ||||||
| def fcsr = allRegs.find {it.name=='FCSR'} |  | ||||||
| if(fcsr != null) {%> |  | ||||||
| 	uint${generator.getSize(fcsr)}_t get_fcsr(){return reg.FCSR;} |  | ||||||
| 	void set_fcsr(uint${generator.getSize(fcsr)}_t val){reg.FCSR = val;}		 |  | ||||||
| <%} else { %> |  | ||||||
| 	uint32_t get_fcsr(){return 0;} |  | ||||||
| 	void set_fcsr(uint32_t val){} |  | ||||||
| <%}%> |  | ||||||
| }; |  | ||||||
|  |  | ||||||
| } |  | ||||||
| }             |  | ||||||
| #endif /* _${coreDef.name.toUpperCase()}_H_ */ |  | ||||||
| @@ -1,107 +0,0 @@ | |||||||
| /******************************************************************************* |  | ||||||
|  * Copyright (C) 2017, 2018 MINRES Technologies GmbH |  | ||||||
|  * All rights reserved. |  | ||||||
|  * |  | ||||||
|  * Redistribution and use in source and binary forms, with or without |  | ||||||
|  * modification, are permitted provided that the following conditions are met: |  | ||||||
|  * |  | ||||||
|  * 1. Redistributions of source code must retain the above copyright notice, |  | ||||||
|  *    this list of conditions and the following disclaimer. |  | ||||||
|  * |  | ||||||
|  * 2. Redistributions in binary form must reproduce the above copyright notice, |  | ||||||
|  *    this list of conditions and the following disclaimer in the documentation |  | ||||||
|  *    and/or other materials provided with the distribution. |  | ||||||
|  * |  | ||||||
|  * 3. Neither the name of the copyright holder nor the names of its contributors |  | ||||||
|  *    may be used to endorse or promote products derived from this software |  | ||||||
|  *    without specific prior written permission. |  | ||||||
|  * |  | ||||||
|  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" |  | ||||||
|  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |  | ||||||
|  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |  | ||||||
|  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE |  | ||||||
|  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR |  | ||||||
|  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF |  | ||||||
|  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS |  | ||||||
|  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN |  | ||||||
|  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) |  | ||||||
|  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE |  | ||||||
|  * POSSIBILITY OF SUCH DAMAGE. |  | ||||||
|  * |  | ||||||
|  *******************************************************************************/ |  | ||||||
|  <%  |  | ||||||
| import com.minres.coredsl.coreDsl.Register |  | ||||||
| import com.minres.coredsl.coreDsl.RegisterFile |  | ||||||
| import com.minres.coredsl.coreDsl.RegisterAlias |  | ||||||
| def getOriginalName(reg){ |  | ||||||
|     if( reg.original instanceof RegisterFile) { |  | ||||||
|     	if( reg.index != null ) { |  | ||||||
|         	return reg.original.name+generator.generateHostCode(reg.index) |  | ||||||
|         } else { |  | ||||||
|         	return reg.original.name |  | ||||||
|         } |  | ||||||
|     } else if(reg.original instanceof Register){ |  | ||||||
|         return reg.original.name |  | ||||||
|     } |  | ||||||
| } |  | ||||||
| def getRegisterNames(){ |  | ||||||
| 	def regNames = [] |  | ||||||
|  	allRegs.each { reg ->  |  | ||||||
| 		if( reg instanceof RegisterFile) { |  | ||||||
| 			(reg.range.right..reg.range.left).each{ |  | ||||||
|     			regNames+=reg.name.toLowerCase()+it |  | ||||||
|             } |  | ||||||
|         } else if(reg instanceof Register){ |  | ||||||
|     		regNames+=reg.name.toLowerCase() |  | ||||||
|         } |  | ||||||
|     } |  | ||||||
|     return regNames |  | ||||||
| } |  | ||||||
| def getRegisterAliasNames(){ |  | ||||||
| 	def regMap = allRegs.findAll{it instanceof RegisterAlias }.collectEntries {[getOriginalName(it), it.name]} |  | ||||||
|  	return allRegs.findAll{it instanceof Register || it instanceof RegisterFile}.collect{reg -> |  | ||||||
| 		if( reg instanceof RegisterFile) { |  | ||||||
| 			return (reg.range.right..reg.range.left).collect{ (regMap[reg.name]?:regMap[reg.name+it]?:reg.name.toLowerCase()+it).toLowerCase() } |  | ||||||
|         } else if(reg instanceof Register){ |  | ||||||
|     		regMap[reg.name]?:reg.name.toLowerCase() |  | ||||||
|         } |  | ||||||
|  	}.flatten() |  | ||||||
| } |  | ||||||
| %> |  | ||||||
| #include "util/ities.h" |  | ||||||
| #include <util/logging.h> |  | ||||||
| #include <iss/arch/${coreDef.name.toLowerCase()}.h> |  | ||||||
| #include <cstdio> |  | ||||||
| #include <cstring> |  | ||||||
| #include <fstream> |  | ||||||
|  |  | ||||||
| using namespace iss::arch; |  | ||||||
|  |  | ||||||
| constexpr std::array<const char*, ${getRegisterNames().size}>    iss::arch::traits<iss::arch::${coreDef.name.toLowerCase()}>::reg_names; |  | ||||||
| constexpr std::array<const char*, ${getRegisterAliasNames().size}>    iss::arch::traits<iss::arch::${coreDef.name.toLowerCase()}>::reg_aliases; |  | ||||||
| constexpr std::array<const uint32_t, ${regSizes.size}> iss::arch::traits<iss::arch::${coreDef.name.toLowerCase()}>::reg_bit_widths; |  | ||||||
| constexpr std::array<const uint32_t, ${regOffsets.size}> iss::arch::traits<iss::arch::${coreDef.name.toLowerCase()}>::reg_byte_offsets; |  | ||||||
|  |  | ||||||
| ${coreDef.name.toLowerCase()}::${coreDef.name.toLowerCase()}() { |  | ||||||
|     reg.icount = 0; |  | ||||||
| } |  | ||||||
|  |  | ||||||
| ${coreDef.name.toLowerCase()}::~${coreDef.name.toLowerCase()}() = default; |  | ||||||
|  |  | ||||||
| void ${coreDef.name.toLowerCase()}::reset(uint64_t address) { |  | ||||||
|     for(size_t i=0; i<traits<${coreDef.name.toLowerCase()}>::NUM_REGS; ++i) set_reg(i, std::vector<uint8_t>(sizeof(traits<${coreDef.name.toLowerCase()}>::reg_t),0)); |  | ||||||
|     reg.PC=address; |  | ||||||
|     reg.NEXT_PC=reg.PC; |  | ||||||
|     reg.trap_state=0; |  | ||||||
|     reg.machine_state=0x3; |  | ||||||
|     reg.icount=0; |  | ||||||
| } |  | ||||||
|  |  | ||||||
| uint8_t *${coreDef.name.toLowerCase()}::get_regs_base_ptr() { |  | ||||||
| 	return reinterpret_cast<uint8_t*>(®); |  | ||||||
| } |  | ||||||
|  |  | ||||||
| ${coreDef.name.toLowerCase()}::phys_addr_t ${coreDef.name.toLowerCase()}::virt2phys(const iss::addr_t &pc) { |  | ||||||
|     return phys_addr_t(pc); // change logical address to physical address |  | ||||||
| } |  | ||||||
|  |  | ||||||
| @@ -120,57 +120,7 @@ protected: | |||||||
|         } |         } | ||||||
|     } |     } | ||||||
|  |  | ||||||
|     // some compile time constants |      | ||||||
|     // enum { MASK16 = 0b1111110001100011, MASK32 = 0b11111111111100000111000001111111 }; |  | ||||||
|     enum { MASK16 = 0b1111111111111111, MASK32 = 0b11111111111100000111000001111111 }; |  | ||||||
|     enum { EXTR_MASK16 = MASK16 >> 2, EXTR_MASK32 = MASK32 >> 2 }; |  | ||||||
|     enum { LUT_SIZE = 1 << util::bit_count(static_cast<uint32_t>(EXTR_MASK32)), LUT_SIZE_C = 1 << util::bit_count(static_cast<uint32_t>(EXTR_MASK16)) }; |  | ||||||
|  |  | ||||||
|     std::array<compile_func, LUT_SIZE> lut; |  | ||||||
|  |  | ||||||
|     std::array<compile_func, LUT_SIZE_C> lut_00, lut_01, lut_10; |  | ||||||
|     std::array<compile_func, LUT_SIZE> lut_11; |  | ||||||
|  |  | ||||||
|     std::array<compile_func *, 4> qlut; |  | ||||||
|  |  | ||||||
|     std::array<const uint32_t, 4> lutmasks = {{EXTR_MASK16, EXTR_MASK16, EXTR_MASK16, EXTR_MASK32}}; |  | ||||||
|  |  | ||||||
|     void expand_bit_mask(int pos, uint32_t mask, uint32_t value, uint32_t valid, uint32_t idx, compile_func lut[], |  | ||||||
|                          compile_func f) { |  | ||||||
|         if (pos < 0) { |  | ||||||
|             lut[idx] = f; |  | ||||||
|         } else { |  | ||||||
|             auto bitmask = 1UL << pos; |  | ||||||
|             if ((mask & bitmask) == 0) { |  | ||||||
|                 expand_bit_mask(pos - 1, mask, value, valid, idx, lut, f); |  | ||||||
|             } else { |  | ||||||
|                 if ((valid & bitmask) == 0) { |  | ||||||
|                     expand_bit_mask(pos - 1, mask, value, valid, (idx << 1), lut, f); |  | ||||||
|                     expand_bit_mask(pos - 1, mask, value, valid, (idx << 1) + 1, lut, f); |  | ||||||
|                 } else { |  | ||||||
|                     auto new_val = idx << 1; |  | ||||||
|                     if ((value & bitmask) != 0) new_val++; |  | ||||||
|                     expand_bit_mask(pos - 1, mask, value, valid, new_val, lut, f); |  | ||||||
|                 } |  | ||||||
|             } |  | ||||||
|         } |  | ||||||
|     } |  | ||||||
|  |  | ||||||
|     inline uint32_t extract_fields(uint32_t val) { return extract_fields(29, val >> 2, lutmasks[val & 0x3], 0); } |  | ||||||
|  |  | ||||||
|     uint32_t extract_fields(int pos, uint32_t val, uint32_t mask, uint32_t lut_val) { |  | ||||||
|         if (pos >= 0) { |  | ||||||
|             auto bitmask = 1UL << pos; |  | ||||||
|             if ((mask & bitmask) == 0) { |  | ||||||
|                 lut_val = extract_fields(pos - 1, val, mask, lut_val); |  | ||||||
|             } else { |  | ||||||
|                 auto new_val = lut_val << 1; |  | ||||||
|                 if ((val & bitmask) != 0) new_val++; |  | ||||||
|                 lut_val = extract_fields(pos - 1, val, mask, new_val); |  | ||||||
|             } |  | ||||||
|         } |  | ||||||
|         return lut_val; |  | ||||||
|     } |  | ||||||
|     template<unsigned W, typename U, typename S = typename std::make_signed<U>::type> |     template<unsigned W, typename U, typename S = typename std::make_signed<U>::type> | ||||||
|     inline S sext(U from) { |     inline S sext(U from) { | ||||||
|         auto mask = (1ULL<<W) - 1; |         auto mask = (1ULL<<W) - 1; | ||||||
| @@ -182,14 +132,23 @@ private: | |||||||
|     /**************************************************************************** |     /**************************************************************************** | ||||||
|      * start opcode definitions |      * start opcode definitions | ||||||
|      ****************************************************************************/ |      ****************************************************************************/ | ||||||
|     struct InstructionDesriptor { |     struct instruction_descriptor { | ||||||
|         size_t length; |         size_t length; | ||||||
|         uint32_t value; |         uint32_t value; | ||||||
|         uint32_t mask; |         uint32_t mask; | ||||||
|         compile_func op; |         compile_func op; | ||||||
|     }; |     }; | ||||||
|  |     struct decoding_tree_node{ | ||||||
|  |         std::vector<instruction_descriptor> instrs; | ||||||
|  |         std::vector<decoding_tree_node*> children; | ||||||
|  |         uint32_t submask = std::numeric_limits<uint32_t>::max(); | ||||||
|  |         uint32_t value; | ||||||
|  |         decoding_tree_node(uint32_t value) : value(value){} | ||||||
|  |     }; | ||||||
|  |  | ||||||
|     const std::array<InstructionDesriptor, ${instructions.size}> instr_descr = {{ |     decoding_tree_node* root {nullptr}; | ||||||
|  |  | ||||||
|  |     const std::array<instruction_descriptor, ${instructions.size}> instr_descr = {{ | ||||||
|          /* entries are: size, valid value, valid mask, function ptr */<%instructions.each{instr -> %> |          /* entries are: size, valid value, valid mask, function ptr */<%instructions.each{instr -> %> | ||||||
|         /* instruction ${instr.instruction.name}, encoding '${instr.encoding}' */ |         /* instruction ${instr.instruction.name}, encoding '${instr.encoding}' */ | ||||||
|         {${instr.length}, ${instr.encoding}, ${instr.mask}, &this_class::__${generator.functionName(instr.name)}},<%}%> |         {${instr.length}, ${instr.encoding}, ${instr.mask}, &this_class::__${generator.functionName(instr.name)}},<%}%> | ||||||
| @@ -200,6 +159,7 @@ private: | |||||||
|     compile_ret_t __${generator.functionName(instr.name)}(virt_addr_t& pc, code_word_t instr, tu_builder& tu){ |     compile_ret_t __${generator.functionName(instr.name)}(virt_addr_t& pc, code_word_t instr, tu_builder& tu){ | ||||||
|         tu("${instr.name}_{:#010x}:", pc.val); |         tu("${instr.name}_{:#010x}:", pc.val); | ||||||
|         vm_base<ARCH>::gen_sync(tu, PRE_SYNC,${idx}); |         vm_base<ARCH>::gen_sync(tu, PRE_SYNC,${idx}); | ||||||
|  |         uint64_t PC = pc.val; | ||||||
|         <%instr.fields.eachLine{%>${it} |         <%instr.fields.eachLine{%>${it} | ||||||
|         <%}%>if(this->disass_enabled){ |         <%}%>if(this->disass_enabled){ | ||||||
|             /* generate console output when executing the command */<%instr.disass.eachLine{%> |             /* generate console output when executing the command */<%instr.disass.eachLine{%> | ||||||
| @@ -208,11 +168,12 @@ private: | |||||||
|         auto cur_pc_val = tu.constant(pc.val, traits::reg_bit_widths[traits::PC]); |         auto cur_pc_val = tu.constant(pc.val, traits::reg_bit_widths[traits::PC]); | ||||||
|         pc=pc+ ${instr.length/8}; |         pc=pc+ ${instr.length/8}; | ||||||
|         gen_set_pc(tu, pc, traits::NEXT_PC); |         gen_set_pc(tu, pc, traits::NEXT_PC); | ||||||
|         tu.open_scope();<%instr.behavior.eachLine{%> |         tu.open_scope(); | ||||||
|         ${it}<%}%> |         <%instr.behavior.eachLine{%>${it} | ||||||
|  |         <%}%> | ||||||
|         tu.close_scope(); |         tu.close_scope(); | ||||||
|  |         gen_trap_check(tu);         | ||||||
|         vm_base<ARCH>::gen_sync(tu, POST_SYNC,${idx}); |         vm_base<ARCH>::gen_sync(tu, POST_SYNC,${idx}); | ||||||
|         gen_trap_check(tu); |  | ||||||
|         return returnValue; |         return returnValue; | ||||||
|     } |     } | ||||||
|     <%}%> |     <%}%> | ||||||
| @@ -227,11 +188,64 @@ private: | |||||||
|         vm_impl::gen_trap_check(tu); |         vm_impl::gen_trap_check(tu); | ||||||
|         return BRANCH; |         return BRANCH; | ||||||
|     } |     } | ||||||
|  |      | ||||||
|  |     //decoding functionality | ||||||
|  |  | ||||||
|  |     void populate_decoding_tree(decoding_tree_node* root){ | ||||||
|  |         //create submask | ||||||
|  |         for(auto instr: root->instrs){ | ||||||
|  |             root->submask &= instr.mask; | ||||||
|  |         } | ||||||
|  |         //put each instr according to submask&encoding into children | ||||||
|  |         for(auto instr: root->instrs){ | ||||||
|  |             bool foundMatch = false; | ||||||
|  |             for(auto child: root->children){ | ||||||
|  |                 //use value as identifying trait | ||||||
|  |                 if(child->value == (instr.value&root->submask)){ | ||||||
|  |                     child->instrs.push_back(instr); | ||||||
|  |                     foundMatch = true; | ||||||
|  |                 } | ||||||
|  |             } | ||||||
|  |             if(!foundMatch){ | ||||||
|  |                 decoding_tree_node* child = new decoding_tree_node(instr.value&root->submask); | ||||||
|  |                 child->instrs.push_back(instr); | ||||||
|  |                 root->children.push_back(child); | ||||||
|  |             } | ||||||
|  |         } | ||||||
|  |         root->instrs.clear(); | ||||||
|  |         //call populate_decoding_tree for all children | ||||||
|  |         if(root->children.size() >1) | ||||||
|  |             for(auto child: root->children){ | ||||||
|  |                 populate_decoding_tree(child);       | ||||||
|  |             } | ||||||
|  |         else{ | ||||||
|  |             //sort instrs by value of the mask, this works bc we want to have the least restrictive one last | ||||||
|  |             std::sort(root->children[0]->instrs.begin(), root->children[0]->instrs.end(), [](const instruction_descriptor& instr1, const instruction_descriptor& instr2) { | ||||||
|  |             return instr1.mask > instr2.mask; | ||||||
|  |             });  | ||||||
|  |         } | ||||||
|  |     } | ||||||
|  |     compile_func decode_instr(decoding_tree_node* node, code_word_t word){ | ||||||
|  |         if(!node->children.size()){ | ||||||
|  |             if(node->instrs.size() == 1) return node->instrs[0].op; | ||||||
|  |             for(auto instr : node->instrs){ | ||||||
|  |                 if((instr.mask&word) == instr.value) return instr.op; | ||||||
|  |             } | ||||||
|  |         } | ||||||
|  |         else{ | ||||||
|  |             for(auto child : node->children){ | ||||||
|  |                 if (child->value == (node->submask&word)){ | ||||||
|  |                     return decode_instr(child, word); | ||||||
|  |                 }   | ||||||
|  |             }   | ||||||
|  |         } | ||||||
|  |         return nullptr; | ||||||
|  |     } | ||||||
| }; | }; | ||||||
|  |  | ||||||
| template <typename CODE_WORD> void debug_fn(CODE_WORD insn) { | template <typename CODE_WORD> void debug_fn(CODE_WORD instr) { | ||||||
|     volatile CODE_WORD x = insn; |     volatile CODE_WORD x = instr; | ||||||
|     insn = 2 * x; |     instr = 2 * x; | ||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> vm_impl<ARCH>::vm_impl() { this(new ARCH()); } | template <typename ARCH> vm_impl<ARCH>::vm_impl() { this(new ARCH()); } | ||||||
| @@ -239,14 +253,11 @@ template <typename ARCH> vm_impl<ARCH>::vm_impl() { this(new ARCH()); } | |||||||
| template <typename ARCH> | template <typename ARCH> | ||||||
| vm_impl<ARCH>::vm_impl(ARCH &core, unsigned core_id, unsigned cluster_id) | vm_impl<ARCH>::vm_impl(ARCH &core, unsigned core_id, unsigned cluster_id) | ||||||
| : vm_base<ARCH>(core, core_id, cluster_id) { | : vm_base<ARCH>(core, core_id, cluster_id) { | ||||||
|     qlut[0] = lut_00.data(); |     root = new decoding_tree_node(std::numeric_limits<uint32_t>::max()); | ||||||
|     qlut[1] = lut_01.data(); |     for(auto instr:instr_descr){ | ||||||
|     qlut[2] = lut_10.data(); |         root->instrs.push_back(instr); | ||||||
|     qlut[3] = lut_11.data(); |  | ||||||
|     for (auto instr : instr_descr) { |  | ||||||
|         auto quantrant = instr.value & 0x3; |  | ||||||
|         expand_bit_mask(29, lutmasks[quantrant], instr.value >> 2, instr.mask >> 2, 0, qlut[quantrant], instr.op); |  | ||||||
|     } |     } | ||||||
|  |     populate_decoding_tree(root); | ||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> | template <typename ARCH> | ||||||
| @@ -254,11 +265,11 @@ std::tuple<continuation_e> | |||||||
| vm_impl<ARCH>::gen_single_inst_behavior(virt_addr_t &pc, unsigned int &inst_cnt, tu_builder& tu) { | vm_impl<ARCH>::gen_single_inst_behavior(virt_addr_t &pc, unsigned int &inst_cnt, tu_builder& tu) { | ||||||
|     // we fetch at max 4 byte, alignment is 2 |     // we fetch at max 4 byte, alignment is 2 | ||||||
|     enum {TRAP_ID=1<<16}; |     enum {TRAP_ID=1<<16}; | ||||||
|     code_word_t insn = 0; |     code_word_t instr = 0; | ||||||
|     // const typename traits::addr_t upper_bits = ~traits::PGMASK; |  | ||||||
|     phys_addr_t paddr(pc); |     phys_addr_t paddr(pc); | ||||||
|     auto *const data = (uint8_t *)&insn; |     if(this->core.has_mmu()) | ||||||
|     paddr = this->core.v2p(pc); |         paddr = this->core.virt2phys(pc); | ||||||
|  |     //TODO: re-add page handling | ||||||
| //    if ((pc.val & upper_bits) != ((pc.val + 2) & upper_bits)) { // we may cross a page boundary | //    if ((pc.val & upper_bits) != ((pc.val + 2) & upper_bits)) { // we may cross a page boundary | ||||||
| //        auto res = this->core.read(paddr, 2, data); | //        auto res = this->core.read(paddr, 2, data); | ||||||
| //        if (res != iss::Ok) throw trap_access(TRAP_ID, pc.val); | //        if (res != iss::Ok) throw trap_access(TRAP_ID, pc.val); | ||||||
| @@ -266,18 +277,17 @@ vm_impl<ARCH>::gen_single_inst_behavior(virt_addr_t &pc, unsigned int &inst_cnt, | |||||||
| //            res = this->core.read(this->core.v2p(pc + 2), 2, data + 2); | //            res = this->core.read(this->core.v2p(pc + 2), 2, data + 2); | ||||||
| //        } | //        } | ||||||
| //    } else { | //    } else { | ||||||
|         auto res = this->core.read(paddr, 4, data); |         auto res = this->core.read(paddr, 4, reinterpret_cast<uint8_t*>(&instr)); | ||||||
|         if (res != iss::Ok) throw trap_access(TRAP_ID, pc.val); |         if (res != iss::Ok) throw trap_access(TRAP_ID, pc.val); | ||||||
| //    } | //    } | ||||||
|     if (insn == 0x0000006f || (insn&0xffff)==0xa001) throw simulation_stopped(0); // 'J 0' or 'C.J 0' |     if (instr == 0x0000006f || (instr&0xffff)==0xa001) throw simulation_stopped(0); // 'J 0' or 'C.J 0' | ||||||
|     // curr pc on stack |     // curr pc on stack | ||||||
|     ++inst_cnt; |     ++inst_cnt; | ||||||
|     auto lut_val = extract_fields(insn); |     auto f = decode_instr(root, instr); | ||||||
|     auto f = qlut[insn & 0x3][lut_val]; |  | ||||||
|     if (f == nullptr) { |     if (f == nullptr) { | ||||||
|         f = &this_class::illegal_intruction; |         f = &this_class::illegal_intruction; | ||||||
|     } |     } | ||||||
|     return (this->*f)(pc, insn, tu); |     return (this->*f)(pc, instr, tu); | ||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> void vm_impl<ARCH>::gen_raise_trap(tu_builder& tu, uint16_t trap_id, uint16_t cause) { | template <typename ARCH> void vm_impl<ARCH>::gen_raise_trap(tu_builder& tu, uint16_t trap_id, uint16_t cause) { | ||||||
| @@ -296,12 +306,13 @@ template <typename ARCH> void vm_impl<ARCH>::gen_wait(tu_builder& tu, unsigned t | |||||||
|  |  | ||||||
| template <typename ARCH> void vm_impl<ARCH>::gen_trap_behavior(tu_builder& tu) { | template <typename ARCH> void vm_impl<ARCH>::gen_trap_behavior(tu_builder& tu) { | ||||||
|     tu("trap_entry:"); |     tu("trap_entry:"); | ||||||
|  |     this->gen_sync(tu, POST_SYNC, -1);     | ||||||
|     tu("enter_trap(core_ptr, *trap_state, *pc, 0);"); |     tu("enter_trap(core_ptr, *trap_state, *pc, 0);"); | ||||||
|     tu.store(traits::LAST_BRANCH, tu.constant(std::numeric_limits<uint32_t>::max(),32)); |     tu.store(traits::LAST_BRANCH, tu.constant(std::numeric_limits<uint32_t>::max(),32)); | ||||||
|     tu("return *next_pc;"); |     tu("return *next_pc;"); | ||||||
| } | } | ||||||
|  |  | ||||||
| } // namespace mnrv32 | } // namespace ${coreDef.name.toLowerCase()} | ||||||
|  |  | ||||||
| template <> | template <> | ||||||
| std::unique_ptr<vm_if> create<arch::${coreDef.name.toLowerCase()}>(arch::${coreDef.name.toLowerCase()} *core, unsigned short port, bool dump) { | std::unique_ptr<vm_if> create<arch::${coreDef.name.toLowerCase()}>(arch::${coreDef.name.toLowerCase()} *core, unsigned short port, bool dump) { | ||||||
| @@ -317,7 +328,7 @@ std::unique_ptr<vm_if> create<arch::${coreDef.name.toLowerCase()}>(arch::${coreD | |||||||
| #include <iss/arch/riscv_hart_mu_p.h> | #include <iss/arch/riscv_hart_mu_p.h> | ||||||
| namespace iss { | namespace iss { | ||||||
| namespace { | namespace { | ||||||
| std::array<bool, 2> dummy = { | volatile std::array<bool, 2> dummy = { | ||||||
|         core_factory::instance().register_creator("${coreDef.name.toLowerCase()}|m_p|tcc", [](unsigned port, void*) -> std::tuple<cpu_ptr, vm_ptr>{ |         core_factory::instance().register_creator("${coreDef.name.toLowerCase()}|m_p|tcc", [](unsigned port, void*) -> std::tuple<cpu_ptr, vm_ptr>{ | ||||||
|             auto* cpu = new iss::arch::riscv_hart_m_p<iss::arch::${coreDef.name.toLowerCase()}>(); |             auto* cpu = new iss::arch::riscv_hart_m_p<iss::arch::${coreDef.name.toLowerCase()}>(); | ||||||
| 		    auto vm = new tcc::${coreDef.name.toLowerCase()}::vm_impl<arch::${coreDef.name.toLowerCase()}>(*cpu, false); | 		    auto vm = new tcc::${coreDef.name.toLowerCase()}::vm_impl<arch::${coreDef.name.toLowerCase()}>(*cpu, false); | ||||||
| @@ -333,8 +344,3 @@ std::array<bool, 2> dummy = { | |||||||
| }; | }; | ||||||
| } | } | ||||||
| } | } | ||||||
| extern "C" { |  | ||||||
| 	bool* get_${coreDef.name.toLowerCase()}_tcc_creators() { |  | ||||||
| 		return iss::dummy.data(); |  | ||||||
| 	} |  | ||||||
| } |  | ||||||
| @@ -35,11 +35,11 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| =============================================================================*/ | =============================================================================*/ | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define LITTLEENDIAN 1 | #define LITTLEENDIAN 1 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #ifdef __GNUC_STDC_INLINE__ | #ifdef __GNUC_STDC_INLINE__ | ||||||
| #define INLINE inline | #define INLINE inline | ||||||
| #else | #else | ||||||
| @@ -47,7 +47,6 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| #endif | #endif | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define SOFTFLOAT_BUILTIN_CLZ 1 | #define SOFTFLOAT_BUILTIN_CLZ 1 | ||||||
| #include "opts-GCC.h" | #include "opts-GCC.h" | ||||||
|  |  | ||||||
|   | |||||||
| @@ -35,11 +35,11 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| =============================================================================*/ | =============================================================================*/ | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define LITTLEENDIAN 1 | #define LITTLEENDIAN 1 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #ifdef __GNUC_STDC_INLINE__ | #ifdef __GNUC_STDC_INLINE__ | ||||||
| #define INLINE inline | #define INLINE inline | ||||||
| #else | #else | ||||||
| @@ -47,7 +47,6 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| #endif | #endif | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define SOFTFLOAT_BUILTIN_CLZ 1 | #define SOFTFLOAT_BUILTIN_CLZ 1 | ||||||
| #include "opts-GCC.h" | #include "opts-GCC.h" | ||||||
|  |  | ||||||
|   | |||||||
| @@ -35,11 +35,11 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| =============================================================================*/ | =============================================================================*/ | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define LITTLEENDIAN 1 | #define LITTLEENDIAN 1 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #ifdef __GNUC_STDC_INLINE__ | #ifdef __GNUC_STDC_INLINE__ | ||||||
| #define INLINE inline | #define INLINE inline | ||||||
| #else | #else | ||||||
| @@ -47,7 +47,6 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| #endif | #endif | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define SOFTFLOAT_BUILTIN_CLZ 1 | #define SOFTFLOAT_BUILTIN_CLZ 1 | ||||||
| #include "opts-GCC.h" | #include "opts-GCC.h" | ||||||
|  |  | ||||||
|   | |||||||
| @@ -35,11 +35,11 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| =============================================================================*/ | =============================================================================*/ | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define LITTLEENDIAN 1 | #define LITTLEENDIAN 1 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #ifdef __GNUC_STDC_INLINE__ | #ifdef __GNUC_STDC_INLINE__ | ||||||
| //#define INLINE inline | //#define INLINE inline | ||||||
| #define INLINE static | #define INLINE static | ||||||
| @@ -48,10 +48,9 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| #endif | #endif | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #ifdef __GNUC__ | #ifdef __GNUC__ | ||||||
| #define SOFTFLOAT_BUILTIN_CLZ 1 | #define SOFTFLOAT_BUILTIN_CLZ 1 | ||||||
| #define SOFTFLOAT_INTRINSIC_INT128 1 | #define SOFTFLOAT_INTRINSIC_INT128 1 | ||||||
| #endif | #endif | ||||||
| #include "opts-GCC.h" | #include "opts-GCC.h" | ||||||
|  |  | ||||||
|   | |||||||
| @@ -35,11 +35,11 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| =============================================================================*/ | =============================================================================*/ | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define LITTLEENDIAN 1 | #define LITTLEENDIAN 1 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #ifdef __GNUC_STDC_INLINE__ | #ifdef __GNUC_STDC_INLINE__ | ||||||
| #define INLINE inline | #define INLINE inline | ||||||
| #else | #else | ||||||
| @@ -47,7 +47,6 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| #endif | #endif | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define SOFTFLOAT_BUILTIN_CLZ 1 | #define SOFTFLOAT_BUILTIN_CLZ 1 | ||||||
| #include "opts-GCC.h" | #include "opts-GCC.h" | ||||||
|  |  | ||||||
|   | |||||||
| @@ -35,11 +35,11 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| =============================================================================*/ | =============================================================================*/ | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define LITTLEENDIAN 1 | #define LITTLEENDIAN 1 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #ifdef __GNUC_STDC_INLINE__ | #ifdef __GNUC_STDC_INLINE__ | ||||||
| #define INLINE inline | #define INLINE inline | ||||||
| #else | #else | ||||||
| @@ -47,7 +47,6 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| #endif | #endif | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define SOFTFLOAT_BUILTIN_CLZ 1 | #define SOFTFLOAT_BUILTIN_CLZ 1 | ||||||
| #include "opts-GCC.h" | #include "opts-GCC.h" | ||||||
|  |  | ||||||
|   | |||||||
| @@ -35,11 +35,11 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| =============================================================================*/ | =============================================================================*/ | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define LITTLEENDIAN 1 | #define LITTLEENDIAN 1 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #ifdef __GNUC_STDC_INLINE__ | #ifdef __GNUC_STDC_INLINE__ | ||||||
| #define INLINE inline | #define INLINE inline | ||||||
| #else | #else | ||||||
| @@ -47,8 +47,7 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| #endif | #endif | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define SOFTFLOAT_BUILTIN_CLZ 1 | #define SOFTFLOAT_BUILTIN_CLZ 1 | ||||||
| #define SOFTFLOAT_INTRINSIC_INT128 1 | #define SOFTFLOAT_INTRINSIC_INT128 1 | ||||||
| #include "opts-GCC.h" | #include "opts-GCC.h" | ||||||
|  |  | ||||||
|   | |||||||
| @@ -37,14 +37,13 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| // Edit lines marked with `==>'.  See "SoftFloat-source.html". | // Edit lines marked with `==>'.  See "SoftFloat-source.html". | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| ==> #define LITTLEENDIAN 1 | == > #define LITTLEENDIAN 1 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- |     /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |      *----------------------------------------------------------------------------*/ | ||||||
| ==> #define INLINE inline |     == > #define INLINE inline | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- |  | ||||||
| *----------------------------------------------------------------------------*/ |  | ||||||
| ==> #define THREAD_LOCAL _Thread_local |  | ||||||
|  |  | ||||||
|  |     /*---------------------------------------------------------------------------- | ||||||
|  |      *----------------------------------------------------------------------------*/ | ||||||
|  |     == > #define THREAD_LOCAL _Thread_local | ||||||
|   | |||||||
| @@ -37,14 +37,13 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| // Edit lines marked with `==>'.  See "SoftFloat-source.html". | // Edit lines marked with `==>'.  See "SoftFloat-source.html". | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| ==> #define LITTLEENDIAN 1 | == > #define LITTLEENDIAN 1 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- |     /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |      *----------------------------------------------------------------------------*/ | ||||||
| ==> #define INLINE inline |     == > #define INLINE inline | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- |  | ||||||
| *----------------------------------------------------------------------------*/ |  | ||||||
| ==> #define THREAD_LOCAL _Thread_local |  | ||||||
|  |  | ||||||
|  |     /*---------------------------------------------------------------------------- | ||||||
|  |      *----------------------------------------------------------------------------*/ | ||||||
|  |     == > #define THREAD_LOCAL _Thread_local | ||||||
|   | |||||||
| @@ -37,10 +37,10 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| #ifndef specialize_h | #ifndef specialize_h | ||||||
| #define specialize_h 1 | #define specialize_h 1 | ||||||
|  |  | ||||||
| #include <stdbool.h> |  | ||||||
| #include <stdint.h> |  | ||||||
| #include "primitiveTypes.h" | #include "primitiveTypes.h" | ||||||
| #include "softfloat.h" | #include "softfloat.h" | ||||||
|  | #include <stdbool.h> | ||||||
|  | #include <stdint.h> | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Default value for 'softfloat_detectTininess'. | | Default value for 'softfloat_detectTininess'. | ||||||
| @@ -53,21 +53,21 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define ui32_fromPosOverflow 0xFFFFFFFF | #define ui32_fromPosOverflow 0xFFFFFFFF | ||||||
| #define ui32_fromNegOverflow 0xFFFFFFFF | #define ui32_fromNegOverflow 0xFFFFFFFF | ||||||
| #define ui32_fromNaN         0xFFFFFFFF | #define ui32_fromNaN 0xFFFFFFFF | ||||||
| #define i32_fromPosOverflow  (-0x7FFFFFFF - 1) | #define i32_fromPosOverflow (-0x7FFFFFFF - 1) | ||||||
| #define i32_fromNegOverflow  (-0x7FFFFFFF - 1) | #define i32_fromNegOverflow (-0x7FFFFFFF - 1) | ||||||
| #define i32_fromNaN          (-0x7FFFFFFF - 1) | #define i32_fromNaN (-0x7FFFFFFF - 1) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The values to return on conversions to 64-bit integer formats that raise an | | The values to return on conversions to 64-bit integer formats that raise an | ||||||
| | invalid exception. | | invalid exception. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define ui64_fromPosOverflow UINT64_C( 0xFFFFFFFFFFFFFFFF ) | #define ui64_fromPosOverflow UINT64_C(0xFFFFFFFFFFFFFFFF) | ||||||
| #define ui64_fromNegOverflow UINT64_C( 0xFFFFFFFFFFFFFFFF ) | #define ui64_fromNegOverflow UINT64_C(0xFFFFFFFFFFFFFFFF) | ||||||
| #define ui64_fromNaN         UINT64_C( 0xFFFFFFFFFFFFFFFF ) | #define ui64_fromNaN UINT64_C(0xFFFFFFFFFFFFFFFF) | ||||||
| #define i64_fromPosOverflow  (-INT64_C( 0x7FFFFFFFFFFFFFFF ) - 1) | #define i64_fromPosOverflow (-INT64_C(0x7FFFFFFFFFFFFFFF) - 1) | ||||||
| #define i64_fromNegOverflow  (-INT64_C( 0x7FFFFFFFFFFFFFFF ) - 1) | #define i64_fromNegOverflow (-INT64_C(0x7FFFFFFFFFFFFFFF) - 1) | ||||||
| #define i64_fromNaN          (-INT64_C( 0x7FFFFFFFFFFFFFFF ) - 1) | #define i64_fromNaN (-INT64_C(0x7FFFFFFFFFFFFFFF) - 1) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | "Common NaN" structure, used to transfer NaN representations from one format | | "Common NaN" structure, used to transfer NaN representations from one format | ||||||
| @@ -92,7 +92,7 @@ struct commonNaN { | |||||||
| | 16-bit floating-point signaling NaN. | | 16-bit floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its argument more than once. | | Note:  This macro evaluates its argument more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF16UI( uiA ) ((((uiA) & 0x7E00) == 0x7C00) && ((uiA) & 0x01FF)) | #define softfloat_isSigNaNF16UI(uiA) ((((uiA)&0x7E00) == 0x7C00) && ((uiA)&0x01FF)) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming 'uiA' has the bit pattern of a 16-bit floating-point NaN, converts | | Assuming 'uiA' has the bit pattern of a 16-bit floating-point NaN, converts | ||||||
| @@ -100,13 +100,13 @@ struct commonNaN { | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void softfloat_f16UIToCommonNaN( uint_fast16_t uiA, struct commonNaN *zPtr ); | void softfloat_f16UIToCommonNaN(uint_fast16_t uiA, struct commonNaN* zPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 16-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 16-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast16_t softfloat_commonNaNToF16UI( const struct commonNaN *aPtr ); | uint_fast16_t softfloat_commonNaNToF16UI(const struct commonNaN* aPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting 'uiA' and 'uiB' as the bit patterns of two 16-bit floating- | | Interpreting 'uiA' and 'uiB' as the bit patterns of two 16-bit floating- | ||||||
| @@ -114,8 +114,7 @@ uint_fast16_t softfloat_commonNaNToF16UI( const struct commonNaN *aPtr ); | |||||||
| | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | ||||||
| | signaling NaN, the invalid exception is raised. | | signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast16_t | uint_fast16_t softfloat_propagateNaNF16UI(uint_fast16_t uiA, uint_fast16_t uiB); | ||||||
|  softfloat_propagateNaNF16UI( uint_fast16_t uiA, uint_fast16_t uiB ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 32-bit floating-point NaN. | | The bit pattern for a default generated 32-bit floating-point NaN. | ||||||
| @@ -127,7 +126,7 @@ uint_fast16_t | |||||||
| | 32-bit floating-point signaling NaN. | | 32-bit floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its argument more than once. | | Note:  This macro evaluates its argument more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF32UI( uiA ) ((((uiA) & 0x7FC00000) == 0x7F800000) && ((uiA) & 0x003FFFFF)) | #define softfloat_isSigNaNF32UI(uiA) ((((uiA)&0x7FC00000) == 0x7F800000) && ((uiA)&0x003FFFFF)) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming 'uiA' has the bit pattern of a 32-bit floating-point NaN, converts | | Assuming 'uiA' has the bit pattern of a 32-bit floating-point NaN, converts | ||||||
| @@ -135,13 +134,13 @@ uint_fast16_t | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void softfloat_f32UIToCommonNaN( uint_fast32_t uiA, struct commonNaN *zPtr ); | void softfloat_f32UIToCommonNaN(uint_fast32_t uiA, struct commonNaN* zPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 32-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 32-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast32_t softfloat_commonNaNToF32UI( const struct commonNaN *aPtr ); | uint_fast32_t softfloat_commonNaNToF32UI(const struct commonNaN* aPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting 'uiA' and 'uiB' as the bit patterns of two 32-bit floating- | | Interpreting 'uiA' and 'uiB' as the bit patterns of two 32-bit floating- | ||||||
| @@ -149,20 +148,20 @@ uint_fast32_t softfloat_commonNaNToF32UI( const struct commonNaN *aPtr ); | |||||||
| | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | ||||||
| | signaling NaN, the invalid exception is raised. | | signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast32_t | uint_fast32_t softfloat_propagateNaNF32UI(uint_fast32_t uiA, uint_fast32_t uiB); | ||||||
|  softfloat_propagateNaNF32UI( uint_fast32_t uiA, uint_fast32_t uiB ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 64-bit floating-point NaN. | | The bit pattern for a default generated 64-bit floating-point NaN. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define defaultNaNF64UI UINT64_C( 0xFFF8000000000000 ) | #define defaultNaNF64UI UINT64_C(0xFFF8000000000000) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Returns true when 64-bit unsigned integer 'uiA' has the bit pattern of a | | Returns true when 64-bit unsigned integer 'uiA' has the bit pattern of a | ||||||
| | 64-bit floating-point signaling NaN. | | 64-bit floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its argument more than once. | | Note:  This macro evaluates its argument more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF64UI( uiA ) ((((uiA) & UINT64_C( 0x7FF8000000000000 )) == UINT64_C( 0x7FF0000000000000 )) && ((uiA) & UINT64_C( 0x0007FFFFFFFFFFFF ))) | #define softfloat_isSigNaNF64UI(uiA)                                                                                                       \ | ||||||
|  |     ((((uiA)&UINT64_C(0x7FF8000000000000)) == UINT64_C(0x7FF0000000000000)) && ((uiA)&UINT64_C(0x0007FFFFFFFFFFFF))) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming 'uiA' has the bit pattern of a 64-bit floating-point NaN, converts | | Assuming 'uiA' has the bit pattern of a 64-bit floating-point NaN, converts | ||||||
| @@ -170,13 +169,13 @@ uint_fast32_t | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void softfloat_f64UIToCommonNaN( uint_fast64_t uiA, struct commonNaN *zPtr ); | void softfloat_f64UIToCommonNaN(uint_fast64_t uiA, struct commonNaN* zPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 64-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 64-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast64_t softfloat_commonNaNToF64UI( const struct commonNaN *aPtr ); | uint_fast64_t softfloat_commonNaNToF64UI(const struct commonNaN* aPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting 'uiA' and 'uiB' as the bit patterns of two 64-bit floating- | | Interpreting 'uiA' and 'uiB' as the bit patterns of two 64-bit floating- | ||||||
| @@ -184,14 +183,13 @@ uint_fast64_t softfloat_commonNaNToF64UI( const struct commonNaN *aPtr ); | |||||||
| | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | ||||||
| | signaling NaN, the invalid exception is raised. | | signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast64_t | uint_fast64_t softfloat_propagateNaNF64UI(uint_fast64_t uiA, uint_fast64_t uiB); | ||||||
|  softfloat_propagateNaNF64UI( uint_fast64_t uiA, uint_fast64_t uiB ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 80-bit extended floating-point NaN. | | The bit pattern for a default generated 80-bit extended floating-point NaN. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define defaultNaNExtF80UI64 0xFFFF | #define defaultNaNExtF80UI64 0xFFFF | ||||||
| #define defaultNaNExtF80UI0  UINT64_C( 0xC000000000000000 ) | #define defaultNaNExtF80UI0 UINT64_C(0xC000000000000000) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Returns true when the 80-bit unsigned integer formed from concatenating | | Returns true when the 80-bit unsigned integer formed from concatenating | ||||||
| @@ -199,7 +197,8 @@ uint_fast64_t | |||||||
| | floating-point signaling NaN. | | floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its arguments more than once. | | Note:  This macro evaluates its arguments more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNExtF80UI( uiA64, uiA0 ) ((((uiA64) & 0x7FFF) == 0x7FFF) && ! ((uiA0) & UINT64_C( 0x4000000000000000 )) && ((uiA0) & UINT64_C( 0x3FFFFFFFFFFFFFFF ))) | #define softfloat_isSigNaNExtF80UI(uiA64, uiA0)                                                                                            \ | ||||||
|  |     ((((uiA64)&0x7FFF) == 0x7FFF) && !((uiA0)&UINT64_C(0x4000000000000000)) && ((uiA0)&UINT64_C(0x3FFFFFFFFFFFFFFF))) | ||||||
|  |  | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
|  |  | ||||||
| @@ -215,16 +214,14 @@ uint_fast64_t | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_extF80UIToCommonNaN(uint_fast16_t uiA64, uint_fast64_t uiA0, struct commonNaN* zPtr); | ||||||
|  softfloat_extF80UIToCommonNaN( |  | ||||||
|      uint_fast16_t uiA64, uint_fast64_t uiA0, struct commonNaN *zPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | ||||||
| | floating-point NaN, and returns the bit pattern of this value as an unsigned | | floating-point NaN, and returns the bit pattern of this value as an unsigned | ||||||
| | integer. | | integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 softfloat_commonNaNToExtF80UI( const struct commonNaN *aPtr ); | struct uint128 softfloat_commonNaNToExtF80UI(const struct commonNaN* aPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting the unsigned integer formed from concatenating 'uiA64' and | | Interpreting the unsigned integer formed from concatenating 'uiA64' and | ||||||
| @@ -235,19 +232,13 @@ struct uint128 softfloat_commonNaNToExtF80UI( const struct commonNaN *aPtr ); | |||||||
| | result.  If either original floating-point value is a signaling NaN, the | | result.  If either original floating-point value is a signaling NaN, the | ||||||
| | invalid exception is raised. | | invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 | struct uint128 softfloat_propagateNaNExtF80UI(uint_fast16_t uiA64, uint_fast64_t uiA0, uint_fast16_t uiB64, uint_fast64_t uiB0); | ||||||
|  softfloat_propagateNaNExtF80UI( |  | ||||||
|      uint_fast16_t uiA64, |  | ||||||
|      uint_fast64_t uiA0, |  | ||||||
|      uint_fast16_t uiB64, |  | ||||||
|      uint_fast64_t uiB0 |  | ||||||
|  ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 128-bit floating-point NaN. | | The bit pattern for a default generated 128-bit floating-point NaN. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define defaultNaNF128UI64 UINT64_C( 0xFFFF800000000000 ) | #define defaultNaNF128UI64 UINT64_C(0xFFFF800000000000) | ||||||
| #define defaultNaNF128UI0  UINT64_C( 0 ) | #define defaultNaNF128UI0 UINT64_C(0) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Returns true when the 128-bit unsigned integer formed from concatenating | | Returns true when the 128-bit unsigned integer formed from concatenating | ||||||
| @@ -255,7 +246,8 @@ struct uint128 | |||||||
| | point signaling NaN. | | point signaling NaN. | ||||||
| | Note:  This macro evaluates its arguments more than once. | | Note:  This macro evaluates its arguments more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF128UI( uiA64, uiA0 ) ((((uiA64) & UINT64_C( 0x7FFF800000000000 )) == UINT64_C( 0x7FFF000000000000 )) && ((uiA0) || ((uiA64) & UINT64_C( 0x00007FFFFFFFFFFF )))) | #define softfloat_isSigNaNF128UI(uiA64, uiA0)                                                                                              \ | ||||||
|  |     ((((uiA64)&UINT64_C(0x7FFF800000000000)) == UINT64_C(0x7FFF000000000000)) && ((uiA0) || ((uiA64)&UINT64_C(0x00007FFFFFFFFFFF)))) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming the unsigned integer formed from concatenating 'uiA64' and 'uiA0' | | Assuming the unsigned integer formed from concatenating 'uiA64' and 'uiA0' | ||||||
| @@ -264,15 +256,13 @@ struct uint128 | |||||||
| | pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid exception | | pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid exception | ||||||
| | is raised. | | is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_f128UIToCommonNaN(uint_fast64_t uiA64, uint_fast64_t uiA0, struct commonNaN* zPtr); | ||||||
|  softfloat_f128UIToCommonNaN( |  | ||||||
|      uint_fast64_t uiA64, uint_fast64_t uiA0, struct commonNaN *zPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 softfloat_commonNaNToF128UI( const struct commonNaN * ); | struct uint128 softfloat_commonNaNToF128UI(const struct commonNaN*); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting the unsigned integer formed from concatenating 'uiA64' and | | Interpreting the unsigned integer formed from concatenating 'uiA64' and | ||||||
| @@ -283,13 +273,7 @@ struct uint128 softfloat_commonNaNToF128UI( const struct commonNaN * ); | |||||||
| | If either original floating-point value is a signaling NaN, the invalid | | If either original floating-point value is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 | struct uint128 softfloat_propagateNaNF128UI(uint_fast64_t uiA64, uint_fast64_t uiA0, uint_fast64_t uiB64, uint_fast64_t uiB0); | ||||||
|  softfloat_propagateNaNF128UI( |  | ||||||
|      uint_fast64_t uiA64, |  | ||||||
|      uint_fast64_t uiA0, |  | ||||||
|      uint_fast64_t uiB64, |  | ||||||
|      uint_fast64_t uiB0 |  | ||||||
|  ); |  | ||||||
|  |  | ||||||
| #else | #else | ||||||
|  |  | ||||||
| @@ -304,18 +288,14 @@ struct uint128 | |||||||
| | common NaN at the location pointed to by 'zPtr'.  If the NaN is a signaling | | common NaN at the location pointed to by 'zPtr'.  If the NaN is a signaling | ||||||
| | NaN, the invalid exception is raised. | | NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_extF80MToCommonNaN(const struct extFloat80M* aSPtr, struct commonNaN* zPtr); | ||||||
|  softfloat_extF80MToCommonNaN( |  | ||||||
|      const struct extFloat80M *aSPtr, struct commonNaN *zPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | ||||||
| | floating-point NaN, and stores this NaN at the location pointed to by | | floating-point NaN, and stores this NaN at the location pointed to by | ||||||
| | 'zSPtr'. | | 'zSPtr'. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_commonNaNToExtF80M(const struct commonNaN* aPtr, struct extFloat80M* zSPtr); | ||||||
|  softfloat_commonNaNToExtF80M( |  | ||||||
|      const struct commonNaN *aPtr, struct extFloat80M *zSPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming at least one of the two 80-bit extended floating-point values | | Assuming at least one of the two 80-bit extended floating-point values | ||||||
| @@ -323,12 +303,7 @@ void | |||||||
| | at the location pointed to by 'zSPtr'.  If either original floating-point | | at the location pointed to by 'zSPtr'.  If either original floating-point | ||||||
| | value is a signaling NaN, the invalid exception is raised. | | value is a signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_propagateNaNExtF80M(const struct extFloat80M* aSPtr, const struct extFloat80M* bSPtr, struct extFloat80M* zSPtr); | ||||||
|  softfloat_propagateNaNExtF80M( |  | ||||||
|      const struct extFloat80M *aSPtr, |  | ||||||
|      const struct extFloat80M *bSPtr, |  | ||||||
|      struct extFloat80M *zSPtr |  | ||||||
|  ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 128-bit floating-point NaN. | | The bit pattern for a default generated 128-bit floating-point NaN. | ||||||
| @@ -336,7 +311,7 @@ void | |||||||
| #define defaultNaNF128UI96 0xFFFF8000 | #define defaultNaNF128UI96 0xFFFF8000 | ||||||
| #define defaultNaNF128UI64 0 | #define defaultNaNF128UI64 0 | ||||||
| #define defaultNaNF128UI32 0 | #define defaultNaNF128UI32 0 | ||||||
| #define defaultNaNF128UI0  0 | #define defaultNaNF128UI0 0 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming the 128-bit floating-point value pointed to by 'aWPtr' is a NaN, | | Assuming the 128-bit floating-point value pointed to by 'aWPtr' is a NaN, | ||||||
| @@ -346,8 +321,7 @@ void | |||||||
| | four 32-bit elements that concatenate in the platform's normal endian order | | four 32-bit elements that concatenate in the platform's normal endian order | ||||||
| | to form a 128-bit floating-point value. | | to form a 128-bit floating-point value. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_f128MToCommonNaN(const uint32_t* aWPtr, struct commonNaN* zPtr); | ||||||
|  softfloat_f128MToCommonNaN( const uint32_t *aWPtr, struct commonNaN *zPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | ||||||
| @@ -355,8 +329,7 @@ void | |||||||
| | 'zWPtr' points to an array of four 32-bit elements that concatenate in the | | 'zWPtr' points to an array of four 32-bit elements that concatenate in the | ||||||
| | platform's normal endian order to form a 128-bit floating-point value. | | platform's normal endian order to form a 128-bit floating-point value. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_commonNaNToF128M(const struct commonNaN* aPtr, uint32_t* zWPtr); | ||||||
|  softfloat_commonNaNToF128M( const struct commonNaN *aPtr, uint32_t *zWPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming at least one of the two 128-bit floating-point values pointed to by | | Assuming at least one of the two 128-bit floating-point values pointed to by | ||||||
| @@ -366,11 +339,8 @@ void | |||||||
| | and 'zWPtr' points to an array of four 32-bit elements that concatenate in | | and 'zWPtr' points to an array of four 32-bit elements that concatenate in | ||||||
| | the platform's normal endian order to form a 128-bit floating-point value. | | the platform's normal endian order to form a 128-bit floating-point value. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_propagateNaNF128M(const uint32_t* aWPtr, const uint32_t* bWPtr, uint32_t* zWPtr); | ||||||
|  softfloat_propagateNaNF128M( |  | ||||||
|      const uint32_t *aWPtr, const uint32_t *bWPtr, uint32_t *zWPtr ); |  | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
|   | |||||||
| @@ -37,10 +37,10 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| #ifndef specialize_h | #ifndef specialize_h | ||||||
| #define specialize_h 1 | #define specialize_h 1 | ||||||
|  |  | ||||||
| #include <stdbool.h> |  | ||||||
| #include <stdint.h> |  | ||||||
| #include "primitiveTypes.h" | #include "primitiveTypes.h" | ||||||
| #include "softfloat.h" | #include "softfloat.h" | ||||||
|  | #include <stdbool.h> | ||||||
|  | #include <stdint.h> | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Default value for 'softfloat_detectTininess'. | | Default value for 'softfloat_detectTininess'. | ||||||
| @@ -53,21 +53,21 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define ui32_fromPosOverflow 0xFFFFFFFF | #define ui32_fromPosOverflow 0xFFFFFFFF | ||||||
| #define ui32_fromNegOverflow 0xFFFFFFFF | #define ui32_fromNegOverflow 0xFFFFFFFF | ||||||
| #define ui32_fromNaN         0xFFFFFFFF | #define ui32_fromNaN 0xFFFFFFFF | ||||||
| #define i32_fromPosOverflow  (-0x7FFFFFFF - 1) | #define i32_fromPosOverflow (-0x7FFFFFFF - 1) | ||||||
| #define i32_fromNegOverflow  (-0x7FFFFFFF - 1) | #define i32_fromNegOverflow (-0x7FFFFFFF - 1) | ||||||
| #define i32_fromNaN          (-0x7FFFFFFF - 1) | #define i32_fromNaN (-0x7FFFFFFF - 1) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The values to return on conversions to 64-bit integer formats that raise an | | The values to return on conversions to 64-bit integer formats that raise an | ||||||
| | invalid exception. | | invalid exception. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define ui64_fromPosOverflow UINT64_C( 0xFFFFFFFFFFFFFFFF ) | #define ui64_fromPosOverflow UINT64_C(0xFFFFFFFFFFFFFFFF) | ||||||
| #define ui64_fromNegOverflow UINT64_C( 0xFFFFFFFFFFFFFFFF ) | #define ui64_fromNegOverflow UINT64_C(0xFFFFFFFFFFFFFFFF) | ||||||
| #define ui64_fromNaN         UINT64_C( 0xFFFFFFFFFFFFFFFF ) | #define ui64_fromNaN UINT64_C(0xFFFFFFFFFFFFFFFF) | ||||||
| #define i64_fromPosOverflow  (-INT64_C( 0x7FFFFFFFFFFFFFFF ) - 1) | #define i64_fromPosOverflow (-INT64_C(0x7FFFFFFFFFFFFFFF) - 1) | ||||||
| #define i64_fromNegOverflow  (-INT64_C( 0x7FFFFFFFFFFFFFFF ) - 1) | #define i64_fromNegOverflow (-INT64_C(0x7FFFFFFFFFFFFFFF) - 1) | ||||||
| #define i64_fromNaN          (-INT64_C( 0x7FFFFFFFFFFFFFFF ) - 1) | #define i64_fromNaN (-INT64_C(0x7FFFFFFFFFFFFFFF) - 1) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | "Common NaN" structure, used to transfer NaN representations from one format | | "Common NaN" structure, used to transfer NaN representations from one format | ||||||
| @@ -92,7 +92,7 @@ struct commonNaN { | |||||||
| | 16-bit floating-point signaling NaN. | | 16-bit floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its argument more than once. | | Note:  This macro evaluates its argument more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF16UI( uiA ) ((((uiA) & 0x7E00) == 0x7C00) && ((uiA) & 0x01FF)) | #define softfloat_isSigNaNF16UI(uiA) ((((uiA)&0x7E00) == 0x7C00) && ((uiA)&0x01FF)) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming 'uiA' has the bit pattern of a 16-bit floating-point NaN, converts | | Assuming 'uiA' has the bit pattern of a 16-bit floating-point NaN, converts | ||||||
| @@ -100,13 +100,13 @@ struct commonNaN { | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void softfloat_f16UIToCommonNaN( uint_fast16_t uiA, struct commonNaN *zPtr ); | void softfloat_f16UIToCommonNaN(uint_fast16_t uiA, struct commonNaN* zPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 16-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 16-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast16_t softfloat_commonNaNToF16UI( const struct commonNaN *aPtr ); | uint_fast16_t softfloat_commonNaNToF16UI(const struct commonNaN* aPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting 'uiA' and 'uiB' as the bit patterns of two 16-bit floating- | | Interpreting 'uiA' and 'uiB' as the bit patterns of two 16-bit floating- | ||||||
| @@ -114,8 +114,7 @@ uint_fast16_t softfloat_commonNaNToF16UI( const struct commonNaN *aPtr ); | |||||||
| | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | ||||||
| | signaling NaN, the invalid exception is raised. | | signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast16_t | uint_fast16_t softfloat_propagateNaNF16UI(uint_fast16_t uiA, uint_fast16_t uiB); | ||||||
|  softfloat_propagateNaNF16UI( uint_fast16_t uiA, uint_fast16_t uiB ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 32-bit floating-point NaN. | | The bit pattern for a default generated 32-bit floating-point NaN. | ||||||
| @@ -127,7 +126,7 @@ uint_fast16_t | |||||||
| | 32-bit floating-point signaling NaN. | | 32-bit floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its argument more than once. | | Note:  This macro evaluates its argument more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF32UI( uiA ) ((((uiA) & 0x7FC00000) == 0x7F800000) && ((uiA) & 0x003FFFFF)) | #define softfloat_isSigNaNF32UI(uiA) ((((uiA)&0x7FC00000) == 0x7F800000) && ((uiA)&0x003FFFFF)) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming 'uiA' has the bit pattern of a 32-bit floating-point NaN, converts | | Assuming 'uiA' has the bit pattern of a 32-bit floating-point NaN, converts | ||||||
| @@ -135,13 +134,13 @@ uint_fast16_t | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void softfloat_f32UIToCommonNaN( uint_fast32_t uiA, struct commonNaN *zPtr ); | void softfloat_f32UIToCommonNaN(uint_fast32_t uiA, struct commonNaN* zPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 32-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 32-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast32_t softfloat_commonNaNToF32UI( const struct commonNaN *aPtr ); | uint_fast32_t softfloat_commonNaNToF32UI(const struct commonNaN* aPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting 'uiA' and 'uiB' as the bit patterns of two 32-bit floating- | | Interpreting 'uiA' and 'uiB' as the bit patterns of two 32-bit floating- | ||||||
| @@ -149,20 +148,20 @@ uint_fast32_t softfloat_commonNaNToF32UI( const struct commonNaN *aPtr ); | |||||||
| | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | ||||||
| | signaling NaN, the invalid exception is raised. | | signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast32_t | uint_fast32_t softfloat_propagateNaNF32UI(uint_fast32_t uiA, uint_fast32_t uiB); | ||||||
|  softfloat_propagateNaNF32UI( uint_fast32_t uiA, uint_fast32_t uiB ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 64-bit floating-point NaN. | | The bit pattern for a default generated 64-bit floating-point NaN. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define defaultNaNF64UI UINT64_C( 0xFFF8000000000000 ) | #define defaultNaNF64UI UINT64_C(0xFFF8000000000000) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Returns true when 64-bit unsigned integer 'uiA' has the bit pattern of a | | Returns true when 64-bit unsigned integer 'uiA' has the bit pattern of a | ||||||
| | 64-bit floating-point signaling NaN. | | 64-bit floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its argument more than once. | | Note:  This macro evaluates its argument more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF64UI( uiA ) ((((uiA) & UINT64_C( 0x7FF8000000000000 )) == UINT64_C( 0x7FF0000000000000 )) && ((uiA) & UINT64_C( 0x0007FFFFFFFFFFFF ))) | #define softfloat_isSigNaNF64UI(uiA)                                                                                                       \ | ||||||
|  |     ((((uiA)&UINT64_C(0x7FF8000000000000)) == UINT64_C(0x7FF0000000000000)) && ((uiA)&UINT64_C(0x0007FFFFFFFFFFFF))) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming 'uiA' has the bit pattern of a 64-bit floating-point NaN, converts | | Assuming 'uiA' has the bit pattern of a 64-bit floating-point NaN, converts | ||||||
| @@ -170,13 +169,13 @@ uint_fast32_t | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void softfloat_f64UIToCommonNaN( uint_fast64_t uiA, struct commonNaN *zPtr ); | void softfloat_f64UIToCommonNaN(uint_fast64_t uiA, struct commonNaN* zPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 64-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 64-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast64_t softfloat_commonNaNToF64UI( const struct commonNaN *aPtr ); | uint_fast64_t softfloat_commonNaNToF64UI(const struct commonNaN* aPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting 'uiA' and 'uiB' as the bit patterns of two 64-bit floating- | | Interpreting 'uiA' and 'uiB' as the bit patterns of two 64-bit floating- | ||||||
| @@ -184,14 +183,13 @@ uint_fast64_t softfloat_commonNaNToF64UI( const struct commonNaN *aPtr ); | |||||||
| | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | ||||||
| | signaling NaN, the invalid exception is raised. | | signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast64_t | uint_fast64_t softfloat_propagateNaNF64UI(uint_fast64_t uiA, uint_fast64_t uiB); | ||||||
|  softfloat_propagateNaNF64UI( uint_fast64_t uiA, uint_fast64_t uiB ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 80-bit extended floating-point NaN. | | The bit pattern for a default generated 80-bit extended floating-point NaN. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define defaultNaNExtF80UI64 0xFFFF | #define defaultNaNExtF80UI64 0xFFFF | ||||||
| #define defaultNaNExtF80UI0  UINT64_C( 0xC000000000000000 ) | #define defaultNaNExtF80UI0 UINT64_C(0xC000000000000000) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Returns true when the 80-bit unsigned integer formed from concatenating | | Returns true when the 80-bit unsigned integer formed from concatenating | ||||||
| @@ -199,7 +197,8 @@ uint_fast64_t | |||||||
| | floating-point signaling NaN. | | floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its arguments more than once. | | Note:  This macro evaluates its arguments more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNExtF80UI( uiA64, uiA0 ) ((((uiA64) & 0x7FFF) == 0x7FFF) && ! ((uiA0) & UINT64_C( 0x4000000000000000 )) && ((uiA0) & UINT64_C( 0x3FFFFFFFFFFFFFFF ))) | #define softfloat_isSigNaNExtF80UI(uiA64, uiA0)                                                                                            \ | ||||||
|  |     ((((uiA64)&0x7FFF) == 0x7FFF) && !((uiA0)&UINT64_C(0x4000000000000000)) && ((uiA0)&UINT64_C(0x3FFFFFFFFFFFFFFF))) | ||||||
|  |  | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
|  |  | ||||||
| @@ -215,16 +214,14 @@ uint_fast64_t | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_extF80UIToCommonNaN(uint_fast16_t uiA64, uint_fast64_t uiA0, struct commonNaN* zPtr); | ||||||
|  softfloat_extF80UIToCommonNaN( |  | ||||||
|      uint_fast16_t uiA64, uint_fast64_t uiA0, struct commonNaN *zPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | ||||||
| | floating-point NaN, and returns the bit pattern of this value as an unsigned | | floating-point NaN, and returns the bit pattern of this value as an unsigned | ||||||
| | integer. | | integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 softfloat_commonNaNToExtF80UI( const struct commonNaN *aPtr ); | struct uint128 softfloat_commonNaNToExtF80UI(const struct commonNaN* aPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting the unsigned integer formed from concatenating 'uiA64' and | | Interpreting the unsigned integer formed from concatenating 'uiA64' and | ||||||
| @@ -235,19 +232,13 @@ struct uint128 softfloat_commonNaNToExtF80UI( const struct commonNaN *aPtr ); | |||||||
| | result.  If either original floating-point value is a signaling NaN, the | | result.  If either original floating-point value is a signaling NaN, the | ||||||
| | invalid exception is raised. | | invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 | struct uint128 softfloat_propagateNaNExtF80UI(uint_fast16_t uiA64, uint_fast64_t uiA0, uint_fast16_t uiB64, uint_fast64_t uiB0); | ||||||
|  softfloat_propagateNaNExtF80UI( |  | ||||||
|      uint_fast16_t uiA64, |  | ||||||
|      uint_fast64_t uiA0, |  | ||||||
|      uint_fast16_t uiB64, |  | ||||||
|      uint_fast64_t uiB0 |  | ||||||
|  ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 128-bit floating-point NaN. | | The bit pattern for a default generated 128-bit floating-point NaN. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define defaultNaNF128UI64 UINT64_C( 0xFFFF800000000000 ) | #define defaultNaNF128UI64 UINT64_C(0xFFFF800000000000) | ||||||
| #define defaultNaNF128UI0  UINT64_C( 0 ) | #define defaultNaNF128UI0 UINT64_C(0) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Returns true when the 128-bit unsigned integer formed from concatenating | | Returns true when the 128-bit unsigned integer formed from concatenating | ||||||
| @@ -255,7 +246,8 @@ struct uint128 | |||||||
| | point signaling NaN. | | point signaling NaN. | ||||||
| | Note:  This macro evaluates its arguments more than once. | | Note:  This macro evaluates its arguments more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF128UI( uiA64, uiA0 ) ((((uiA64) & UINT64_C( 0x7FFF800000000000 )) == UINT64_C( 0x7FFF000000000000 )) && ((uiA0) || ((uiA64) & UINT64_C( 0x00007FFFFFFFFFFF )))) | #define softfloat_isSigNaNF128UI(uiA64, uiA0)                                                                                              \ | ||||||
|  |     ((((uiA64)&UINT64_C(0x7FFF800000000000)) == UINT64_C(0x7FFF000000000000)) && ((uiA0) || ((uiA64)&UINT64_C(0x00007FFFFFFFFFFF)))) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming the unsigned integer formed from concatenating 'uiA64' and 'uiA0' | | Assuming the unsigned integer formed from concatenating 'uiA64' and 'uiA0' | ||||||
| @@ -264,15 +256,13 @@ struct uint128 | |||||||
| | pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid exception | | pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid exception | ||||||
| | is raised. | | is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_f128UIToCommonNaN(uint_fast64_t uiA64, uint_fast64_t uiA0, struct commonNaN* zPtr); | ||||||
|  softfloat_f128UIToCommonNaN( |  | ||||||
|      uint_fast64_t uiA64, uint_fast64_t uiA0, struct commonNaN *zPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 softfloat_commonNaNToF128UI( const struct commonNaN * ); | struct uint128 softfloat_commonNaNToF128UI(const struct commonNaN*); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting the unsigned integer formed from concatenating 'uiA64' and | | Interpreting the unsigned integer formed from concatenating 'uiA64' and | ||||||
| @@ -283,13 +273,7 @@ struct uint128 softfloat_commonNaNToF128UI( const struct commonNaN * ); | |||||||
| | If either original floating-point value is a signaling NaN, the invalid | | If either original floating-point value is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 | struct uint128 softfloat_propagateNaNF128UI(uint_fast64_t uiA64, uint_fast64_t uiA0, uint_fast64_t uiB64, uint_fast64_t uiB0); | ||||||
|  softfloat_propagateNaNF128UI( |  | ||||||
|      uint_fast64_t uiA64, |  | ||||||
|      uint_fast64_t uiA0, |  | ||||||
|      uint_fast64_t uiB64, |  | ||||||
|      uint_fast64_t uiB0 |  | ||||||
|  ); |  | ||||||
|  |  | ||||||
| #else | #else | ||||||
|  |  | ||||||
| @@ -304,18 +288,14 @@ struct uint128 | |||||||
| | common NaN at the location pointed to by 'zPtr'.  If the NaN is a signaling | | common NaN at the location pointed to by 'zPtr'.  If the NaN is a signaling | ||||||
| | NaN, the invalid exception is raised. | | NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_extF80MToCommonNaN(const struct extFloat80M* aSPtr, struct commonNaN* zPtr); | ||||||
|  softfloat_extF80MToCommonNaN( |  | ||||||
|      const struct extFloat80M *aSPtr, struct commonNaN *zPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | ||||||
| | floating-point NaN, and stores this NaN at the location pointed to by | | floating-point NaN, and stores this NaN at the location pointed to by | ||||||
| | 'zSPtr'. | | 'zSPtr'. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_commonNaNToExtF80M(const struct commonNaN* aPtr, struct extFloat80M* zSPtr); | ||||||
|  softfloat_commonNaNToExtF80M( |  | ||||||
|      const struct commonNaN *aPtr, struct extFloat80M *zSPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming at least one of the two 80-bit extended floating-point values | | Assuming at least one of the two 80-bit extended floating-point values | ||||||
| @@ -323,12 +303,7 @@ void | |||||||
| | at the location pointed to by 'zSPtr'.  If either original floating-point | | at the location pointed to by 'zSPtr'.  If either original floating-point | ||||||
| | value is a signaling NaN, the invalid exception is raised. | | value is a signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_propagateNaNExtF80M(const struct extFloat80M* aSPtr, const struct extFloat80M* bSPtr, struct extFloat80M* zSPtr); | ||||||
|  softfloat_propagateNaNExtF80M( |  | ||||||
|      const struct extFloat80M *aSPtr, |  | ||||||
|      const struct extFloat80M *bSPtr, |  | ||||||
|      struct extFloat80M *zSPtr |  | ||||||
|  ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 128-bit floating-point NaN. | | The bit pattern for a default generated 128-bit floating-point NaN. | ||||||
| @@ -336,7 +311,7 @@ void | |||||||
| #define defaultNaNF128UI96 0xFFFF8000 | #define defaultNaNF128UI96 0xFFFF8000 | ||||||
| #define defaultNaNF128UI64 0 | #define defaultNaNF128UI64 0 | ||||||
| #define defaultNaNF128UI32 0 | #define defaultNaNF128UI32 0 | ||||||
| #define defaultNaNF128UI0  0 | #define defaultNaNF128UI0 0 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming the 128-bit floating-point value pointed to by 'aWPtr' is a NaN, | | Assuming the 128-bit floating-point value pointed to by 'aWPtr' is a NaN, | ||||||
| @@ -346,8 +321,7 @@ void | |||||||
| | four 32-bit elements that concatenate in the platform's normal endian order | | four 32-bit elements that concatenate in the platform's normal endian order | ||||||
| | to form a 128-bit floating-point value. | | to form a 128-bit floating-point value. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_f128MToCommonNaN(const uint32_t* aWPtr, struct commonNaN* zPtr); | ||||||
|  softfloat_f128MToCommonNaN( const uint32_t *aWPtr, struct commonNaN *zPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | ||||||
| @@ -355,8 +329,7 @@ void | |||||||
| | 'zWPtr' points to an array of four 32-bit elements that concatenate in the | | 'zWPtr' points to an array of four 32-bit elements that concatenate in the | ||||||
| | platform's normal endian order to form a 128-bit floating-point value. | | platform's normal endian order to form a 128-bit floating-point value. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_commonNaNToF128M(const struct commonNaN* aPtr, uint32_t* zWPtr); | ||||||
|  softfloat_commonNaNToF128M( const struct commonNaN *aPtr, uint32_t *zWPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming at least one of the two 128-bit floating-point values pointed to by | | Assuming at least one of the two 128-bit floating-point values pointed to by | ||||||
| @@ -366,11 +339,8 @@ void | |||||||
| | and 'zWPtr' points to an array of four 32-bit elements that concatenate in | | and 'zWPtr' points to an array of four 32-bit elements that concatenate in | ||||||
| | the platform's normal endian order to form a 128-bit floating-point value. | | the platform's normal endian order to form a 128-bit floating-point value. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_propagateNaNF128M(const uint32_t* aWPtr, const uint32_t* bWPtr, uint32_t* zWPtr); | ||||||
|  softfloat_propagateNaNF128M( |  | ||||||
|      const uint32_t *aWPtr, const uint32_t *bWPtr, uint32_t *zWPtr ); |  | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
|   | |||||||
| @@ -37,10 +37,10 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| #ifndef specialize_h | #ifndef specialize_h | ||||||
| #define specialize_h 1 | #define specialize_h 1 | ||||||
|  |  | ||||||
| #include <stdbool.h> |  | ||||||
| #include <stdint.h> |  | ||||||
| #include "primitiveTypes.h" | #include "primitiveTypes.h" | ||||||
| #include "softfloat.h" | #include "softfloat.h" | ||||||
|  | #include <stdbool.h> | ||||||
|  | #include <stdint.h> | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Default value for 'softfloat_detectTininess'. | | Default value for 'softfloat_detectTininess'. | ||||||
| @@ -53,27 +53,29 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define ui32_fromPosOverflow 0xFFFFFFFF | #define ui32_fromPosOverflow 0xFFFFFFFF | ||||||
| #define ui32_fromNegOverflow 0 | #define ui32_fromNegOverflow 0 | ||||||
| #define ui32_fromNaN         0 | #define ui32_fromNaN 0 | ||||||
| #define i32_fromPosOverflow  0x7FFFFFFF | #define i32_fromPosOverflow 0x7FFFFFFF | ||||||
| #define i32_fromNegOverflow  (-0x7FFFFFFF - 1) | #define i32_fromNegOverflow (-0x7FFFFFFF - 1) | ||||||
| #define i32_fromNaN          0 | #define i32_fromNaN 0 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The values to return on conversions to 64-bit integer formats that raise an | | The values to return on conversions to 64-bit integer formats that raise an | ||||||
| | invalid exception. | | invalid exception. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define ui64_fromPosOverflow UINT64_C( 0xFFFFFFFFFFFFFFFF ) | #define ui64_fromPosOverflow UINT64_C(0xFFFFFFFFFFFFFFFF) | ||||||
| #define ui64_fromNegOverflow 0 | #define ui64_fromNegOverflow 0 | ||||||
| #define ui64_fromNaN         0 | #define ui64_fromNaN 0 | ||||||
| #define i64_fromPosOverflow  INT64_C( 0x7FFFFFFFFFFFFFFF ) | #define i64_fromPosOverflow INT64_C(0x7FFFFFFFFFFFFFFF) | ||||||
| #define i64_fromNegOverflow  (-INT64_C( 0x7FFFFFFFFFFFFFFF ) - 1) | #define i64_fromNegOverflow (-INT64_C(0x7FFFFFFFFFFFFFFF) - 1) | ||||||
| #define i64_fromNaN          0 | #define i64_fromNaN 0 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | "Common NaN" structure, used to transfer NaN representations from one format | | "Common NaN" structure, used to transfer NaN representations from one format | ||||||
| | to another. | | to another. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct commonNaN { char _unused; }; | struct commonNaN { | ||||||
|  |     char _unused; | ||||||
|  | }; | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 16-bit floating-point NaN. | | The bit pattern for a default generated 16-bit floating-point NaN. | ||||||
| @@ -85,7 +87,7 @@ struct commonNaN { char _unused; }; | |||||||
| | 16-bit floating-point signaling NaN. | | 16-bit floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its argument more than once. | | Note:  This macro evaluates its argument more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF16UI( uiA ) ((((uiA) & 0x7E00) == 0x7C00) && ((uiA) & 0x01FF)) | #define softfloat_isSigNaNF16UI(uiA) ((((uiA)&0x7E00) == 0x7C00) && ((uiA)&0x01FF)) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming 'uiA' has the bit pattern of a 16-bit floating-point NaN, converts | | Assuming 'uiA' has the bit pattern of a 16-bit floating-point NaN, converts | ||||||
| @@ -93,13 +95,15 @@ struct commonNaN { char _unused; }; | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_f16UIToCommonNaN( uiA, zPtr ) if ( ! ((uiA) & 0x0200) ) softfloat_raiseFlags( softfloat_flag_invalid ) | #define softfloat_f16UIToCommonNaN(uiA, zPtr)                                                                                              \ | ||||||
|  |     if(!((uiA)&0x0200))                                                                                                                    \ | ||||||
|  |     softfloat_raiseFlags(softfloat_flag_invalid) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 16-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 16-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_commonNaNToF16UI( aPtr ) ((uint_fast16_t) defaultNaNF16UI) | #define softfloat_commonNaNToF16UI(aPtr) ((uint_fast16_t)defaultNaNF16UI) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting 'uiA' and 'uiB' as the bit patterns of two 16-bit floating- | | Interpreting 'uiA' and 'uiB' as the bit patterns of two 16-bit floating- | ||||||
| @@ -107,8 +111,7 @@ struct commonNaN { char _unused; }; | |||||||
| | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | ||||||
| | signaling NaN, the invalid exception is raised. | | signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast16_t | uint_fast16_t softfloat_propagateNaNF16UI(uint_fast16_t uiA, uint_fast16_t uiB); | ||||||
|  softfloat_propagateNaNF16UI( uint_fast16_t uiA, uint_fast16_t uiB ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 32-bit floating-point NaN. | | The bit pattern for a default generated 32-bit floating-point NaN. | ||||||
| @@ -120,7 +123,7 @@ uint_fast16_t | |||||||
| | 32-bit floating-point signaling NaN. | | 32-bit floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its argument more than once. | | Note:  This macro evaluates its argument more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF32UI( uiA ) ((((uiA) & 0x7FC00000) == 0x7F800000) && ((uiA) & 0x003FFFFF)) | #define softfloat_isSigNaNF32UI(uiA) ((((uiA)&0x7FC00000) == 0x7F800000) && ((uiA)&0x003FFFFF)) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming 'uiA' has the bit pattern of a 32-bit floating-point NaN, converts | | Assuming 'uiA' has the bit pattern of a 32-bit floating-point NaN, converts | ||||||
| @@ -128,13 +131,15 @@ uint_fast16_t | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_f32UIToCommonNaN( uiA, zPtr ) if ( ! ((uiA) & 0x00400000) ) softfloat_raiseFlags( softfloat_flag_invalid ) | #define softfloat_f32UIToCommonNaN(uiA, zPtr)                                                                                              \ | ||||||
|  |     if(!((uiA)&0x00400000))                                                                                                                \ | ||||||
|  |     softfloat_raiseFlags(softfloat_flag_invalid) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 32-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 32-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_commonNaNToF32UI( aPtr ) ((uint_fast32_t) defaultNaNF32UI) | #define softfloat_commonNaNToF32UI(aPtr) ((uint_fast32_t)defaultNaNF32UI) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting 'uiA' and 'uiB' as the bit patterns of two 32-bit floating- | | Interpreting 'uiA' and 'uiB' as the bit patterns of two 32-bit floating- | ||||||
| @@ -142,20 +147,20 @@ uint_fast16_t | |||||||
| | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | ||||||
| | signaling NaN, the invalid exception is raised. | | signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast32_t | uint_fast32_t softfloat_propagateNaNF32UI(uint_fast32_t uiA, uint_fast32_t uiB); | ||||||
|  softfloat_propagateNaNF32UI( uint_fast32_t uiA, uint_fast32_t uiB ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 64-bit floating-point NaN. | | The bit pattern for a default generated 64-bit floating-point NaN. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define defaultNaNF64UI UINT64_C( 0x7FF8000000000000 ) | #define defaultNaNF64UI UINT64_C(0x7FF8000000000000) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Returns true when 64-bit unsigned integer 'uiA' has the bit pattern of a | | Returns true when 64-bit unsigned integer 'uiA' has the bit pattern of a | ||||||
| | 64-bit floating-point signaling NaN. | | 64-bit floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its argument more than once. | | Note:  This macro evaluates its argument more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF64UI( uiA ) ((((uiA) & UINT64_C( 0x7FF8000000000000 )) == UINT64_C( 0x7FF0000000000000 )) && ((uiA) & UINT64_C( 0x0007FFFFFFFFFFFF ))) | #define softfloat_isSigNaNF64UI(uiA)                                                                                                       \ | ||||||
|  |     ((((uiA)&UINT64_C(0x7FF8000000000000)) == UINT64_C(0x7FF0000000000000)) && ((uiA)&UINT64_C(0x0007FFFFFFFFFFFF))) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming 'uiA' has the bit pattern of a 64-bit floating-point NaN, converts | | Assuming 'uiA' has the bit pattern of a 64-bit floating-point NaN, converts | ||||||
| @@ -163,13 +168,15 @@ uint_fast32_t | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_f64UIToCommonNaN( uiA, zPtr ) if ( ! ((uiA) & UINT64_C( 0x0008000000000000 )) ) softfloat_raiseFlags( softfloat_flag_invalid ) | #define softfloat_f64UIToCommonNaN(uiA, zPtr)                                                                                              \ | ||||||
|  |     if(!((uiA)&UINT64_C(0x0008000000000000)))                                                                                              \ | ||||||
|  |     softfloat_raiseFlags(softfloat_flag_invalid) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 64-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 64-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_commonNaNToF64UI( aPtr ) ((uint_fast64_t) defaultNaNF64UI) | #define softfloat_commonNaNToF64UI(aPtr) ((uint_fast64_t)defaultNaNF64UI) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting 'uiA' and 'uiB' as the bit patterns of two 64-bit floating- | | Interpreting 'uiA' and 'uiB' as the bit patterns of two 64-bit floating- | ||||||
| @@ -177,14 +184,13 @@ uint_fast32_t | |||||||
| | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | ||||||
| | signaling NaN, the invalid exception is raised. | | signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast64_t | uint_fast64_t softfloat_propagateNaNF64UI(uint_fast64_t uiA, uint_fast64_t uiB); | ||||||
|  softfloat_propagateNaNF64UI( uint_fast64_t uiA, uint_fast64_t uiB ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 80-bit extended floating-point NaN. | | The bit pattern for a default generated 80-bit extended floating-point NaN. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define defaultNaNExtF80UI64 0x7FFF | #define defaultNaNExtF80UI64 0x7FFF | ||||||
| #define defaultNaNExtF80UI0  UINT64_C( 0xC000000000000000 ) | #define defaultNaNExtF80UI0 UINT64_C(0xC000000000000000) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Returns true when the 80-bit unsigned integer formed from concatenating | | Returns true when the 80-bit unsigned integer formed from concatenating | ||||||
| @@ -192,7 +198,8 @@ uint_fast64_t | |||||||
| | floating-point signaling NaN. | | floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its arguments more than once. | | Note:  This macro evaluates its arguments more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNExtF80UI( uiA64, uiA0 ) ((((uiA64) & 0x7FFF) == 0x7FFF) && ! ((uiA0) & UINT64_C( 0x4000000000000000 )) && ((uiA0) & UINT64_C( 0x3FFFFFFFFFFFFFFF ))) | #define softfloat_isSigNaNExtF80UI(uiA64, uiA0)                                                                                            \ | ||||||
|  |     ((((uiA64)&0x7FFF) == 0x7FFF) && !((uiA0)&UINT64_C(0x4000000000000000)) && ((uiA0)&UINT64_C(0x3FFFFFFFFFFFFFFF))) | ||||||
|  |  | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
|  |  | ||||||
| @@ -208,24 +215,25 @@ uint_fast64_t | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_extF80UIToCommonNaN( uiA64, uiA0, zPtr ) if ( ! ((uiA0) & UINT64_C( 0x4000000000000000 )) ) softfloat_raiseFlags( softfloat_flag_invalid ) | #define softfloat_extF80UIToCommonNaN(uiA64, uiA0, zPtr)                                                                                   \ | ||||||
|  |     if(!((uiA0)&UINT64_C(0x4000000000000000)))                                                                                             \ | ||||||
|  |     softfloat_raiseFlags(softfloat_flag_invalid) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | ||||||
| | floating-point NaN, and returns the bit pattern of this value as an unsigned | | floating-point NaN, and returns the bit pattern of this value as an unsigned | ||||||
| | integer. | | integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE && ! defined softfloat_commonNaNToExtF80UI | #if defined INLINE && !defined softfloat_commonNaNToExtF80UI | ||||||
| INLINE | INLINE | ||||||
| struct uint128 softfloat_commonNaNToExtF80UI( const struct commonNaN *aPtr ) | struct uint128 softfloat_commonNaNToExtF80UI(const struct commonNaN* aPtr) { | ||||||
| { |  | ||||||
|     struct uint128 uiZ; |     struct uint128 uiZ; | ||||||
|     uiZ.v64 = defaultNaNExtF80UI64; |     uiZ.v64 = defaultNaNExtF80UI64; | ||||||
|     uiZ.v0  = defaultNaNExtF80UI0; |     uiZ.v0 = defaultNaNExtF80UI0; | ||||||
|     return uiZ; |     return uiZ; | ||||||
| } | } | ||||||
| #else | #else | ||||||
| struct uint128 softfloat_commonNaNToExtF80UI( const struct commonNaN *aPtr ); | struct uint128 softfloat_commonNaNToExtF80UI(const struct commonNaN* aPtr); | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| @@ -237,19 +245,13 @@ struct uint128 softfloat_commonNaNToExtF80UI( const struct commonNaN *aPtr ); | |||||||
| | result.  If either original floating-point value is a signaling NaN, the | | result.  If either original floating-point value is a signaling NaN, the | ||||||
| | invalid exception is raised. | | invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 | struct uint128 softfloat_propagateNaNExtF80UI(uint_fast16_t uiA64, uint_fast64_t uiA0, uint_fast16_t uiB64, uint_fast64_t uiB0); | ||||||
|  softfloat_propagateNaNExtF80UI( |  | ||||||
|      uint_fast16_t uiA64, |  | ||||||
|      uint_fast64_t uiA0, |  | ||||||
|      uint_fast16_t uiB64, |  | ||||||
|      uint_fast64_t uiB0 |  | ||||||
|  ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 128-bit floating-point NaN. | | The bit pattern for a default generated 128-bit floating-point NaN. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define defaultNaNF128UI64 UINT64_C( 0x7FFF800000000000 ) | #define defaultNaNF128UI64 UINT64_C(0x7FFF800000000000) | ||||||
| #define defaultNaNF128UI0  UINT64_C( 0 ) | #define defaultNaNF128UI0 UINT64_C(0) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Returns true when the 128-bit unsigned integer formed from concatenating | | Returns true when the 128-bit unsigned integer formed from concatenating | ||||||
| @@ -257,7 +259,8 @@ struct uint128 | |||||||
| | point signaling NaN. | | point signaling NaN. | ||||||
| | Note:  This macro evaluates its arguments more than once. | | Note:  This macro evaluates its arguments more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF128UI( uiA64, uiA0 ) ((((uiA64) & UINT64_C( 0x7FFF800000000000 )) == UINT64_C( 0x7FFF000000000000 )) && ((uiA0) || ((uiA64) & UINT64_C( 0x00007FFFFFFFFFFF )))) | #define softfloat_isSigNaNF128UI(uiA64, uiA0)                                                                                              \ | ||||||
|  |     ((((uiA64)&UINT64_C(0x7FFF800000000000)) == UINT64_C(0x7FFF000000000000)) && ((uiA0) || ((uiA64)&UINT64_C(0x00007FFFFFFFFFFF)))) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming the unsigned integer formed from concatenating 'uiA64' and 'uiA0' | | Assuming the unsigned integer formed from concatenating 'uiA64' and 'uiA0' | ||||||
| @@ -266,23 +269,24 @@ struct uint128 | |||||||
| | pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid exception | | pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid exception | ||||||
| | is raised. | | is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_f128UIToCommonNaN( uiA64, uiA0, zPtr ) if ( ! ((uiA64) & UINT64_C( 0x0000800000000000 )) ) softfloat_raiseFlags( softfloat_flag_invalid ) | #define softfloat_f128UIToCommonNaN(uiA64, uiA0, zPtr)                                                                                     \ | ||||||
|  |     if(!((uiA64)&UINT64_C(0x0000800000000000)))                                                                                            \ | ||||||
|  |     softfloat_raiseFlags(softfloat_flag_invalid) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE && ! defined softfloat_commonNaNToF128UI | #if defined INLINE && !defined softfloat_commonNaNToF128UI | ||||||
| INLINE | INLINE | ||||||
| struct uint128 softfloat_commonNaNToF128UI( const struct commonNaN *aPtr ) | struct uint128 softfloat_commonNaNToF128UI(const struct commonNaN* aPtr) { | ||||||
| { |  | ||||||
|     struct uint128 uiZ; |     struct uint128 uiZ; | ||||||
|     uiZ.v64 = defaultNaNF128UI64; |     uiZ.v64 = defaultNaNF128UI64; | ||||||
|     uiZ.v0  = defaultNaNF128UI0; |     uiZ.v0 = defaultNaNF128UI0; | ||||||
|     return uiZ; |     return uiZ; | ||||||
| } | } | ||||||
| #else | #else | ||||||
| struct uint128 softfloat_commonNaNToF128UI( const struct commonNaN * ); | struct uint128 softfloat_commonNaNToF128UI(const struct commonNaN*); | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| @@ -294,13 +298,7 @@ struct uint128 softfloat_commonNaNToF128UI( const struct commonNaN * ); | |||||||
| | If either original floating-point value is a signaling NaN, the invalid | | If either original floating-point value is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 | struct uint128 softfloat_propagateNaNF128UI(uint_fast64_t uiA64, uint_fast64_t uiA0, uint_fast64_t uiB64, uint_fast64_t uiB0); | ||||||
|  softfloat_propagateNaNF128UI( |  | ||||||
|      uint_fast64_t uiA64, |  | ||||||
|      uint_fast64_t uiA0, |  | ||||||
|      uint_fast64_t uiB64, |  | ||||||
|      uint_fast64_t uiB0 |  | ||||||
|  ); |  | ||||||
|  |  | ||||||
| #else | #else | ||||||
|  |  | ||||||
| @@ -315,26 +313,23 @@ struct uint128 | |||||||
| | common NaN at the location pointed to by 'zPtr'.  If the NaN is a signaling | | common NaN at the location pointed to by 'zPtr'.  If the NaN is a signaling | ||||||
| | NaN, the invalid exception is raised. | | NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_extF80MToCommonNaN( aSPtr, zPtr ) if ( ! ((aSPtr)->signif & UINT64_C( 0x4000000000000000 )) ) softfloat_raiseFlags( softfloat_flag_invalid ) | #define softfloat_extF80MToCommonNaN(aSPtr, zPtr)                                                                                          \ | ||||||
|  |     if(!((aSPtr)->signif & UINT64_C(0x4000000000000000)))                                                                                  \ | ||||||
|  |     softfloat_raiseFlags(softfloat_flag_invalid) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | ||||||
| | floating-point NaN, and stores this NaN at the location pointed to by | | floating-point NaN, and stores this NaN at the location pointed to by | ||||||
| | 'zSPtr'. | | 'zSPtr'. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE && ! defined softfloat_commonNaNToExtF80M | #if defined INLINE && !defined softfloat_commonNaNToExtF80M | ||||||
| INLINE | INLINE | ||||||
| void | void softfloat_commonNaNToExtF80M(const struct commonNaN* aPtr, struct extFloat80M* zSPtr) { | ||||||
|  softfloat_commonNaNToExtF80M( |  | ||||||
|      const struct commonNaN *aPtr, struct extFloat80M *zSPtr ) |  | ||||||
| { |  | ||||||
|     zSPtr->signExp = defaultNaNExtF80UI64; |     zSPtr->signExp = defaultNaNExtF80UI64; | ||||||
|     zSPtr->signif  = defaultNaNExtF80UI0; |     zSPtr->signif = defaultNaNExtF80UI0; | ||||||
| } | } | ||||||
| #else | #else | ||||||
| void | void softfloat_commonNaNToExtF80M(const struct commonNaN* aPtr, struct extFloat80M* zSPtr); | ||||||
|  softfloat_commonNaNToExtF80M( |  | ||||||
|      const struct commonNaN *aPtr, struct extFloat80M *zSPtr ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| @@ -343,12 +338,7 @@ void | |||||||
| | at the location pointed to by 'zSPtr'.  If either original floating-point | | at the location pointed to by 'zSPtr'.  If either original floating-point | ||||||
| | value is a signaling NaN, the invalid exception is raised. | | value is a signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_propagateNaNExtF80M(const struct extFloat80M* aSPtr, const struct extFloat80M* bSPtr, struct extFloat80M* zSPtr); | ||||||
|  softfloat_propagateNaNExtF80M( |  | ||||||
|      const struct extFloat80M *aSPtr, |  | ||||||
|      const struct extFloat80M *bSPtr, |  | ||||||
|      struct extFloat80M *zSPtr |  | ||||||
|  ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 128-bit floating-point NaN. | | The bit pattern for a default generated 128-bit floating-point NaN. | ||||||
| @@ -356,7 +346,7 @@ void | |||||||
| #define defaultNaNF128UI96 0x7FFF8000 | #define defaultNaNF128UI96 0x7FFF8000 | ||||||
| #define defaultNaNF128UI64 0 | #define defaultNaNF128UI64 0 | ||||||
| #define defaultNaNF128UI32 0 | #define defaultNaNF128UI32 0 | ||||||
| #define defaultNaNF128UI0  0 | #define defaultNaNF128UI0 0 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming the 128-bit floating-point value pointed to by 'aWPtr' is a NaN, | | Assuming the 128-bit floating-point value pointed to by 'aWPtr' is a NaN, | ||||||
| @@ -366,7 +356,9 @@ void | |||||||
| | four 32-bit elements that concatenate in the platform's normal endian order | | four 32-bit elements that concatenate in the platform's normal endian order | ||||||
| | to form a 128-bit floating-point value. | | to form a 128-bit floating-point value. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_f128MToCommonNaN( aWPtr, zPtr ) if ( ! ((aWPtr)[indexWordHi( 4 )] & UINT64_C( 0x0000800000000000 )) ) softfloat_raiseFlags( softfloat_flag_invalid ) | #define softfloat_f128MToCommonNaN(aWPtr, zPtr)                                                                                            \ | ||||||
|  |     if(!((aWPtr)[indexWordHi(4)] & UINT64_C(0x0000800000000000)))                                                                          \ | ||||||
|  |     softfloat_raiseFlags(softfloat_flag_invalid) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | ||||||
| @@ -374,19 +366,16 @@ void | |||||||
| | 'zWPtr' points to an array of four 32-bit elements that concatenate in the | | 'zWPtr' points to an array of four 32-bit elements that concatenate in the | ||||||
| | platform's normal endian order to form a 128-bit floating-point value. | | platform's normal endian order to form a 128-bit floating-point value. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE && ! defined softfloat_commonNaNToF128M | #if defined INLINE && !defined softfloat_commonNaNToF128M | ||||||
| INLINE | INLINE | ||||||
| void | void softfloat_commonNaNToF128M(const struct commonNaN* aPtr, uint32_t* zWPtr) { | ||||||
|  softfloat_commonNaNToF128M( const struct commonNaN *aPtr, uint32_t *zWPtr ) |     zWPtr[indexWord(4, 3)] = defaultNaNF128UI96; | ||||||
| { |     zWPtr[indexWord(4, 2)] = defaultNaNF128UI64; | ||||||
|     zWPtr[indexWord( 4, 3 )] = defaultNaNF128UI96; |     zWPtr[indexWord(4, 1)] = defaultNaNF128UI32; | ||||||
|     zWPtr[indexWord( 4, 2 )] = defaultNaNF128UI64; |     zWPtr[indexWord(4, 0)] = defaultNaNF128UI0; | ||||||
|     zWPtr[indexWord( 4, 1 )] = defaultNaNF128UI32; |  | ||||||
|     zWPtr[indexWord( 4, 0 )] = defaultNaNF128UI0; |  | ||||||
| } | } | ||||||
| #else | #else | ||||||
| void | void softfloat_commonNaNToF128M(const struct commonNaN* aPtr, uint32_t* zWPtr); | ||||||
|  softfloat_commonNaNToF128M( const struct commonNaN *aPtr, uint32_t *zWPtr ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| @@ -397,11 +386,8 @@ void | |||||||
| | and 'zWPtr' points to an array of four 32-bit elements that concatenate in | | and 'zWPtr' points to an array of four 32-bit elements that concatenate in | ||||||
| | the platform's normal endian order to form a 128-bit floating-point value. | | the platform's normal endian order to form a 128-bit floating-point value. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_propagateNaNF128M(const uint32_t* aWPtr, const uint32_t* bWPtr, uint32_t* zWPtr); | ||||||
|  softfloat_propagateNaNF128M( |  | ||||||
|      const uint32_t *aWPtr, const uint32_t *bWPtr, uint32_t *zWPtr ); |  | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
|   | |||||||
| @@ -37,10 +37,10 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| #ifndef specialize_h | #ifndef specialize_h | ||||||
| #define specialize_h 1 | #define specialize_h 1 | ||||||
|  |  | ||||||
| #include <stdbool.h> |  | ||||||
| #include <stdint.h> |  | ||||||
| #include "primitiveTypes.h" | #include "primitiveTypes.h" | ||||||
| #include "softfloat.h" | #include "softfloat.h" | ||||||
|  | #include <stdbool.h> | ||||||
|  | #include <stdint.h> | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Default value for 'softfloat_detectTininess'. | | Default value for 'softfloat_detectTininess'. | ||||||
| @@ -53,21 +53,21 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define ui32_fromPosOverflow 0xFFFFFFFF | #define ui32_fromPosOverflow 0xFFFFFFFF | ||||||
| #define ui32_fromNegOverflow 0 | #define ui32_fromNegOverflow 0 | ||||||
| #define ui32_fromNaN         0 | #define ui32_fromNaN 0 | ||||||
| #define i32_fromPosOverflow  0x7FFFFFFF | #define i32_fromPosOverflow 0x7FFFFFFF | ||||||
| #define i32_fromNegOverflow  (-0x7FFFFFFF - 1) | #define i32_fromNegOverflow (-0x7FFFFFFF - 1) | ||||||
| #define i32_fromNaN          0 | #define i32_fromNaN 0 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The values to return on conversions to 64-bit integer formats that raise an | | The values to return on conversions to 64-bit integer formats that raise an | ||||||
| | invalid exception. | | invalid exception. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define ui64_fromPosOverflow UINT64_C( 0xFFFFFFFFFFFFFFFF ) | #define ui64_fromPosOverflow UINT64_C(0xFFFFFFFFFFFFFFFF) | ||||||
| #define ui64_fromNegOverflow 0 | #define ui64_fromNegOverflow 0 | ||||||
| #define ui64_fromNaN         0 | #define ui64_fromNaN 0 | ||||||
| #define i64_fromPosOverflow  INT64_C( 0x7FFFFFFFFFFFFFFF ) | #define i64_fromPosOverflow INT64_C(0x7FFFFFFFFFFFFFFF) | ||||||
| #define i64_fromNegOverflow  (-INT64_C( 0x7FFFFFFFFFFFFFFF ) - 1) | #define i64_fromNegOverflow (-INT64_C(0x7FFFFFFFFFFFFFFF) - 1) | ||||||
| #define i64_fromNaN          0 | #define i64_fromNaN 0 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | "Common NaN" structure, used to transfer NaN representations from one format | | "Common NaN" structure, used to transfer NaN representations from one format | ||||||
| @@ -92,7 +92,7 @@ struct commonNaN { | |||||||
| | 16-bit floating-point signaling NaN. | | 16-bit floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its argument more than once. | | Note:  This macro evaluates its argument more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF16UI( uiA ) ((((uiA) & 0x7E00) == 0x7C00) && ((uiA) & 0x01FF)) | #define softfloat_isSigNaNF16UI(uiA) ((((uiA)&0x7E00) == 0x7C00) && ((uiA)&0x01FF)) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming 'uiA' has the bit pattern of a 16-bit floating-point NaN, converts | | Assuming 'uiA' has the bit pattern of a 16-bit floating-point NaN, converts | ||||||
| @@ -100,13 +100,13 @@ struct commonNaN { | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void softfloat_f16UIToCommonNaN( uint_fast16_t uiA, struct commonNaN *zPtr ); | void softfloat_f16UIToCommonNaN(uint_fast16_t uiA, struct commonNaN* zPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 16-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 16-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast16_t softfloat_commonNaNToF16UI( const struct commonNaN *aPtr ); | uint_fast16_t softfloat_commonNaNToF16UI(const struct commonNaN* aPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting 'uiA' and 'uiB' as the bit patterns of two 16-bit floating- | | Interpreting 'uiA' and 'uiB' as the bit patterns of two 16-bit floating- | ||||||
| @@ -114,8 +114,7 @@ uint_fast16_t softfloat_commonNaNToF16UI( const struct commonNaN *aPtr ); | |||||||
| | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | ||||||
| | signaling NaN, the invalid exception is raised. | | signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast16_t | uint_fast16_t softfloat_propagateNaNF16UI(uint_fast16_t uiA, uint_fast16_t uiB); | ||||||
|  softfloat_propagateNaNF16UI( uint_fast16_t uiA, uint_fast16_t uiB ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 32-bit floating-point NaN. | | The bit pattern for a default generated 32-bit floating-point NaN. | ||||||
| @@ -127,7 +126,7 @@ uint_fast16_t | |||||||
| | 32-bit floating-point signaling NaN. | | 32-bit floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its argument more than once. | | Note:  This macro evaluates its argument more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF32UI( uiA ) ((((uiA) & 0x7FC00000) == 0x7F800000) && ((uiA) & 0x003FFFFF)) | #define softfloat_isSigNaNF32UI(uiA) ((((uiA)&0x7FC00000) == 0x7F800000) && ((uiA)&0x003FFFFF)) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming 'uiA' has the bit pattern of a 32-bit floating-point NaN, converts | | Assuming 'uiA' has the bit pattern of a 32-bit floating-point NaN, converts | ||||||
| @@ -135,13 +134,13 @@ uint_fast16_t | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void softfloat_f32UIToCommonNaN( uint_fast32_t uiA, struct commonNaN *zPtr ); | void softfloat_f32UIToCommonNaN(uint_fast32_t uiA, struct commonNaN* zPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 32-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 32-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast32_t softfloat_commonNaNToF32UI( const struct commonNaN *aPtr ); | uint_fast32_t softfloat_commonNaNToF32UI(const struct commonNaN* aPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting 'uiA' and 'uiB' as the bit patterns of two 32-bit floating- | | Interpreting 'uiA' and 'uiB' as the bit patterns of two 32-bit floating- | ||||||
| @@ -149,20 +148,20 @@ uint_fast32_t softfloat_commonNaNToF32UI( const struct commonNaN *aPtr ); | |||||||
| | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | ||||||
| | signaling NaN, the invalid exception is raised. | | signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast32_t | uint_fast32_t softfloat_propagateNaNF32UI(uint_fast32_t uiA, uint_fast32_t uiB); | ||||||
|  softfloat_propagateNaNF32UI( uint_fast32_t uiA, uint_fast32_t uiB ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 64-bit floating-point NaN. | | The bit pattern for a default generated 64-bit floating-point NaN. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define defaultNaNF64UI UINT64_C( 0x7FF8000000000000 ) | #define defaultNaNF64UI UINT64_C(0x7FF8000000000000) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Returns true when 64-bit unsigned integer 'uiA' has the bit pattern of a | | Returns true when 64-bit unsigned integer 'uiA' has the bit pattern of a | ||||||
| | 64-bit floating-point signaling NaN. | | 64-bit floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its argument more than once. | | Note:  This macro evaluates its argument more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF64UI( uiA ) ((((uiA) & UINT64_C( 0x7FF8000000000000 )) == UINT64_C( 0x7FF0000000000000 )) && ((uiA) & UINT64_C( 0x0007FFFFFFFFFFFF ))) | #define softfloat_isSigNaNF64UI(uiA)                                                                                                       \ | ||||||
|  |     ((((uiA)&UINT64_C(0x7FF8000000000000)) == UINT64_C(0x7FF0000000000000)) && ((uiA)&UINT64_C(0x0007FFFFFFFFFFFF))) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming 'uiA' has the bit pattern of a 64-bit floating-point NaN, converts | | Assuming 'uiA' has the bit pattern of a 64-bit floating-point NaN, converts | ||||||
| @@ -170,13 +169,13 @@ uint_fast32_t | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void softfloat_f64UIToCommonNaN( uint_fast64_t uiA, struct commonNaN *zPtr ); | void softfloat_f64UIToCommonNaN(uint_fast64_t uiA, struct commonNaN* zPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 64-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 64-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast64_t softfloat_commonNaNToF64UI( const struct commonNaN *aPtr ); | uint_fast64_t softfloat_commonNaNToF64UI(const struct commonNaN* aPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting 'uiA' and 'uiB' as the bit patterns of two 64-bit floating- | | Interpreting 'uiA' and 'uiB' as the bit patterns of two 64-bit floating- | ||||||
| @@ -184,14 +183,13 @@ uint_fast64_t softfloat_commonNaNToF64UI( const struct commonNaN *aPtr ); | |||||||
| | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | ||||||
| | signaling NaN, the invalid exception is raised. | | signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast64_t | uint_fast64_t softfloat_propagateNaNF64UI(uint_fast64_t uiA, uint_fast64_t uiB); | ||||||
|  softfloat_propagateNaNF64UI( uint_fast64_t uiA, uint_fast64_t uiB ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 80-bit extended floating-point NaN. | | The bit pattern for a default generated 80-bit extended floating-point NaN. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define defaultNaNExtF80UI64 0x7FFF | #define defaultNaNExtF80UI64 0x7FFF | ||||||
| #define defaultNaNExtF80UI0  UINT64_C( 0xC000000000000000 ) | #define defaultNaNExtF80UI0 UINT64_C(0xC000000000000000) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Returns true when the 80-bit unsigned integer formed from concatenating | | Returns true when the 80-bit unsigned integer formed from concatenating | ||||||
| @@ -199,7 +197,8 @@ uint_fast64_t | |||||||
| | floating-point signaling NaN. | | floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its arguments more than once. | | Note:  This macro evaluates its arguments more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNExtF80UI( uiA64, uiA0 ) ((((uiA64) & 0x7FFF) == 0x7FFF) && ! ((uiA0) & UINT64_C( 0x4000000000000000 )) && ((uiA0) & UINT64_C( 0x3FFFFFFFFFFFFFFF ))) | #define softfloat_isSigNaNExtF80UI(uiA64, uiA0)                                                                                            \ | ||||||
|  |     ((((uiA64)&0x7FFF) == 0x7FFF) && !((uiA0)&UINT64_C(0x4000000000000000)) && ((uiA0)&UINT64_C(0x3FFFFFFFFFFFFFFF))) | ||||||
|  |  | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
|  |  | ||||||
| @@ -215,16 +214,14 @@ uint_fast64_t | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_extF80UIToCommonNaN(uint_fast16_t uiA64, uint_fast64_t uiA0, struct commonNaN* zPtr); | ||||||
|  softfloat_extF80UIToCommonNaN( |  | ||||||
|      uint_fast16_t uiA64, uint_fast64_t uiA0, struct commonNaN *zPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | ||||||
| | floating-point NaN, and returns the bit pattern of this value as an unsigned | | floating-point NaN, and returns the bit pattern of this value as an unsigned | ||||||
| | integer. | | integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 softfloat_commonNaNToExtF80UI( const struct commonNaN *aPtr ); | struct uint128 softfloat_commonNaNToExtF80UI(const struct commonNaN* aPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting the unsigned integer formed from concatenating 'uiA64' and | | Interpreting the unsigned integer formed from concatenating 'uiA64' and | ||||||
| @@ -235,19 +232,13 @@ struct uint128 softfloat_commonNaNToExtF80UI( const struct commonNaN *aPtr ); | |||||||
| | result.  If either original floating-point value is a signaling NaN, the | | result.  If either original floating-point value is a signaling NaN, the | ||||||
| | invalid exception is raised. | | invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 | struct uint128 softfloat_propagateNaNExtF80UI(uint_fast16_t uiA64, uint_fast64_t uiA0, uint_fast16_t uiB64, uint_fast64_t uiB0); | ||||||
|  softfloat_propagateNaNExtF80UI( |  | ||||||
|      uint_fast16_t uiA64, |  | ||||||
|      uint_fast64_t uiA0, |  | ||||||
|      uint_fast16_t uiB64, |  | ||||||
|      uint_fast64_t uiB0 |  | ||||||
|  ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 128-bit floating-point NaN. | | The bit pattern for a default generated 128-bit floating-point NaN. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define defaultNaNF128UI64 UINT64_C( 0x7FFF800000000000 ) | #define defaultNaNF128UI64 UINT64_C(0x7FFF800000000000) | ||||||
| #define defaultNaNF128UI0  UINT64_C( 0 ) | #define defaultNaNF128UI0 UINT64_C(0) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Returns true when the 128-bit unsigned integer formed from concatenating | | Returns true when the 128-bit unsigned integer formed from concatenating | ||||||
| @@ -255,7 +246,8 @@ struct uint128 | |||||||
| | point signaling NaN. | | point signaling NaN. | ||||||
| | Note:  This macro evaluates its arguments more than once. | | Note:  This macro evaluates its arguments more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF128UI( uiA64, uiA0 ) ((((uiA64) & UINT64_C( 0x7FFF800000000000 )) == UINT64_C( 0x7FFF000000000000 )) && ((uiA0) || ((uiA64) & UINT64_C( 0x00007FFFFFFFFFFF )))) | #define softfloat_isSigNaNF128UI(uiA64, uiA0)                                                                                              \ | ||||||
|  |     ((((uiA64)&UINT64_C(0x7FFF800000000000)) == UINT64_C(0x7FFF000000000000)) && ((uiA0) || ((uiA64)&UINT64_C(0x00007FFFFFFFFFFF)))) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming the unsigned integer formed from concatenating 'uiA64' and 'uiA0' | | Assuming the unsigned integer formed from concatenating 'uiA64' and 'uiA0' | ||||||
| @@ -264,15 +256,13 @@ struct uint128 | |||||||
| | pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid exception | | pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid exception | ||||||
| | is raised. | | is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_f128UIToCommonNaN(uint_fast64_t uiA64, uint_fast64_t uiA0, struct commonNaN* zPtr); | ||||||
|  softfloat_f128UIToCommonNaN( |  | ||||||
|      uint_fast64_t uiA64, uint_fast64_t uiA0, struct commonNaN *zPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 softfloat_commonNaNToF128UI( const struct commonNaN * ); | struct uint128 softfloat_commonNaNToF128UI(const struct commonNaN*); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting the unsigned integer formed from concatenating 'uiA64' and | | Interpreting the unsigned integer formed from concatenating 'uiA64' and | ||||||
| @@ -283,13 +273,7 @@ struct uint128 softfloat_commonNaNToF128UI( const struct commonNaN * ); | |||||||
| | If either original floating-point value is a signaling NaN, the invalid | | If either original floating-point value is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 | struct uint128 softfloat_propagateNaNF128UI(uint_fast64_t uiA64, uint_fast64_t uiA0, uint_fast64_t uiB64, uint_fast64_t uiB0); | ||||||
|  softfloat_propagateNaNF128UI( |  | ||||||
|      uint_fast64_t uiA64, |  | ||||||
|      uint_fast64_t uiA0, |  | ||||||
|      uint_fast64_t uiB64, |  | ||||||
|      uint_fast64_t uiB0 |  | ||||||
|  ); |  | ||||||
|  |  | ||||||
| #else | #else | ||||||
|  |  | ||||||
| @@ -304,18 +288,14 @@ struct uint128 | |||||||
| | common NaN at the location pointed to by 'zPtr'.  If the NaN is a signaling | | common NaN at the location pointed to by 'zPtr'.  If the NaN is a signaling | ||||||
| | NaN, the invalid exception is raised. | | NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_extF80MToCommonNaN(const struct extFloat80M* aSPtr, struct commonNaN* zPtr); | ||||||
|  softfloat_extF80MToCommonNaN( |  | ||||||
|      const struct extFloat80M *aSPtr, struct commonNaN *zPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | ||||||
| | floating-point NaN, and stores this NaN at the location pointed to by | | floating-point NaN, and stores this NaN at the location pointed to by | ||||||
| | 'zSPtr'. | | 'zSPtr'. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_commonNaNToExtF80M(const struct commonNaN* aPtr, struct extFloat80M* zSPtr); | ||||||
|  softfloat_commonNaNToExtF80M( |  | ||||||
|      const struct commonNaN *aPtr, struct extFloat80M *zSPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming at least one of the two 80-bit extended floating-point values | | Assuming at least one of the two 80-bit extended floating-point values | ||||||
| @@ -323,12 +303,7 @@ void | |||||||
| | at the location pointed to by 'zSPtr'.  If either original floating-point | | at the location pointed to by 'zSPtr'.  If either original floating-point | ||||||
| | value is a signaling NaN, the invalid exception is raised. | | value is a signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_propagateNaNExtF80M(const struct extFloat80M* aSPtr, const struct extFloat80M* bSPtr, struct extFloat80M* zSPtr); | ||||||
|  softfloat_propagateNaNExtF80M( |  | ||||||
|      const struct extFloat80M *aSPtr, |  | ||||||
|      const struct extFloat80M *bSPtr, |  | ||||||
|      struct extFloat80M *zSPtr |  | ||||||
|  ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 128-bit floating-point NaN. | | The bit pattern for a default generated 128-bit floating-point NaN. | ||||||
| @@ -336,7 +311,7 @@ void | |||||||
| #define defaultNaNF128UI96 0x7FFF8000 | #define defaultNaNF128UI96 0x7FFF8000 | ||||||
| #define defaultNaNF128UI64 0 | #define defaultNaNF128UI64 0 | ||||||
| #define defaultNaNF128UI32 0 | #define defaultNaNF128UI32 0 | ||||||
| #define defaultNaNF128UI0  0 | #define defaultNaNF128UI0 0 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming the 128-bit floating-point value pointed to by 'aWPtr' is a NaN, | | Assuming the 128-bit floating-point value pointed to by 'aWPtr' is a NaN, | ||||||
| @@ -346,8 +321,7 @@ void | |||||||
| | four 32-bit elements that concatenate in the platform's normal endian order | | four 32-bit elements that concatenate in the platform's normal endian order | ||||||
| | to form a 128-bit floating-point value. | | to form a 128-bit floating-point value. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_f128MToCommonNaN(const uint32_t* aWPtr, struct commonNaN* zPtr); | ||||||
|  softfloat_f128MToCommonNaN( const uint32_t *aWPtr, struct commonNaN *zPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | ||||||
| @@ -355,8 +329,7 @@ void | |||||||
| | 'zWPtr' points to an array of four 32-bit elements that concatenate in the | | 'zWPtr' points to an array of four 32-bit elements that concatenate in the | ||||||
| | platform's normal endian order to form a 128-bit floating-point value. | | platform's normal endian order to form a 128-bit floating-point value. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_commonNaNToF128M(const struct commonNaN* aPtr, uint32_t* zWPtr); | ||||||
|  softfloat_commonNaNToF128M( const struct commonNaN *aPtr, uint32_t *zWPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming at least one of the two 128-bit floating-point values pointed to by | | Assuming at least one of the two 128-bit floating-point values pointed to by | ||||||
| @@ -366,11 +339,8 @@ void | |||||||
| | and 'zWPtr' points to an array of four 32-bit elements that concatenate in | | and 'zWPtr' points to an array of four 32-bit elements that concatenate in | ||||||
| | the platform's normal endian order to form a 128-bit floating-point value. | | the platform's normal endian order to form a 128-bit floating-point value. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_propagateNaNF128M(const uint32_t* aWPtr, const uint32_t* bWPtr, uint32_t* zWPtr); | ||||||
|  softfloat_propagateNaNF128M( |  | ||||||
|      const uint32_t *aWPtr, const uint32_t *bWPtr, uint32_t *zWPtr ); |  | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
|   | |||||||
| @@ -37,10 +37,10 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| #ifndef specialize_h | #ifndef specialize_h | ||||||
| #define specialize_h 1 | #define specialize_h 1 | ||||||
|  |  | ||||||
| #include <stdbool.h> |  | ||||||
| #include <stdint.h> |  | ||||||
| #include "primitiveTypes.h" | #include "primitiveTypes.h" | ||||||
| #include "softfloat.h" | #include "softfloat.h" | ||||||
|  | #include <stdbool.h> | ||||||
|  | #include <stdint.h> | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Default value for 'softfloat_detectTininess'. | | Default value for 'softfloat_detectTininess'. | ||||||
| @@ -53,21 +53,21 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define ui32_fromPosOverflow UINT32_C(0xFFFFFFFF) | #define ui32_fromPosOverflow UINT32_C(0xFFFFFFFF) | ||||||
| #define ui32_fromNegOverflow UINT32_C(0x0) | #define ui32_fromNegOverflow UINT32_C(0x0) | ||||||
| #define ui32_fromNaN         UINT32_C(0xFFFFFFFF) | #define ui32_fromNaN UINT32_C(0xFFFFFFFF) | ||||||
| #define i32_fromPosOverflow   INT64_C(0x7FFFFFFF) | #define i32_fromPosOverflow INT64_C(0x7FFFFFFF) | ||||||
| #define i32_fromNegOverflow  (-INT64_C(0x7FFFFFFF)-1) | #define i32_fromNegOverflow (-INT64_C(0x7FFFFFFF) - 1) | ||||||
| #define i32_fromNaN           INT64_C(0x7FFFFFFF) | #define i32_fromNaN INT64_C(0x7FFFFFFF) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The values to return on conversions to 64-bit integer formats that raise an | | The values to return on conversions to 64-bit integer formats that raise an | ||||||
| | invalid exception. | | invalid exception. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define ui64_fromPosOverflow UINT64_C( 0xFFFFFFFFFFFFFFFF ) | #define ui64_fromPosOverflow UINT64_C(0xFFFFFFFFFFFFFFFF) | ||||||
| #define ui64_fromNegOverflow UINT64_C( 0x0 ) | #define ui64_fromNegOverflow UINT64_C(0x0) | ||||||
| #define ui64_fromNaN         UINT64_C( 0xFFFFFFFFFFFFFFFF) | #define ui64_fromNaN UINT64_C(0xFFFFFFFFFFFFFFFF) | ||||||
| #define i64_fromPosOverflow   INT64_C( 0x7FFFFFFFFFFFFFFF) | #define i64_fromPosOverflow INT64_C(0x7FFFFFFFFFFFFFFF) | ||||||
| #define i64_fromNegOverflow  (-INT64_C( 0x7FFFFFFFFFFFFFFF)-1) | #define i64_fromNegOverflow (-INT64_C(0x7FFFFFFFFFFFFFFF) - 1) | ||||||
| #define i64_fromNaN           INT64_C( 0x7FFFFFFFFFFFFFFF) | #define i64_fromNaN INT64_C(0x7FFFFFFFFFFFFFFF) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | "Common NaN" structure, used to transfer NaN representations from one format | | "Common NaN" structure, used to transfer NaN representations from one format | ||||||
| @@ -92,7 +92,7 @@ struct commonNaN { | |||||||
| | 16-bit floating-point signaling NaN. | | 16-bit floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its argument more than once. | | Note:  This macro evaluates its argument more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF16UI( uiA ) ((((uiA) & 0x7E00) == 0x7C00) && ((uiA) & 0x01FF)) | #define softfloat_isSigNaNF16UI(uiA) ((((uiA)&0x7E00) == 0x7C00) && ((uiA)&0x01FF)) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming 'uiA' has the bit pattern of a 16-bit floating-point NaN, converts | | Assuming 'uiA' has the bit pattern of a 16-bit floating-point NaN, converts | ||||||
| @@ -100,13 +100,13 @@ struct commonNaN { | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void softfloat_f16UIToCommonNaN( uint_fast16_t uiA, struct commonNaN *zPtr ); | void softfloat_f16UIToCommonNaN(uint_fast16_t uiA, struct commonNaN* zPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 16-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 16-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast16_t softfloat_commonNaNToF16UI( const struct commonNaN *aPtr ); | uint_fast16_t softfloat_commonNaNToF16UI(const struct commonNaN* aPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting 'uiA' and 'uiB' as the bit patterns of two 16-bit floating- | | Interpreting 'uiA' and 'uiB' as the bit patterns of two 16-bit floating- | ||||||
| @@ -114,8 +114,7 @@ uint_fast16_t softfloat_commonNaNToF16UI( const struct commonNaN *aPtr ); | |||||||
| | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | ||||||
| | signaling NaN, the invalid exception is raised. | | signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast16_t | uint_fast16_t softfloat_propagateNaNF16UI(uint_fast16_t uiA, uint_fast16_t uiB); | ||||||
|  softfloat_propagateNaNF16UI( uint_fast16_t uiA, uint_fast16_t uiB ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 32-bit floating-point NaN. | | The bit pattern for a default generated 32-bit floating-point NaN. | ||||||
| @@ -127,7 +126,7 @@ uint_fast16_t | |||||||
| | 32-bit floating-point signaling NaN. | | 32-bit floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its argument more than once. | | Note:  This macro evaluates its argument more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF32UI( uiA ) ((((uiA) & 0x7FC00000) == 0x7F800000) && ((uiA) & 0x003FFFFF)) | #define softfloat_isSigNaNF32UI(uiA) ((((uiA)&0x7FC00000) == 0x7F800000) && ((uiA)&0x003FFFFF)) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming 'uiA' has the bit pattern of a 32-bit floating-point NaN, converts | | Assuming 'uiA' has the bit pattern of a 32-bit floating-point NaN, converts | ||||||
| @@ -135,13 +134,13 @@ uint_fast16_t | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void softfloat_f32UIToCommonNaN( uint_fast32_t uiA, struct commonNaN *zPtr ); | void softfloat_f32UIToCommonNaN(uint_fast32_t uiA, struct commonNaN* zPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 32-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 32-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast32_t softfloat_commonNaNToF32UI( const struct commonNaN *aPtr ); | uint_fast32_t softfloat_commonNaNToF32UI(const struct commonNaN* aPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting 'uiA' and 'uiB' as the bit patterns of two 32-bit floating- | | Interpreting 'uiA' and 'uiB' as the bit patterns of two 32-bit floating- | ||||||
| @@ -149,20 +148,20 @@ uint_fast32_t softfloat_commonNaNToF32UI( const struct commonNaN *aPtr ); | |||||||
| | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | ||||||
| | signaling NaN, the invalid exception is raised. | | signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast32_t | uint_fast32_t softfloat_propagateNaNF32UI(uint_fast32_t uiA, uint_fast32_t uiB); | ||||||
|  softfloat_propagateNaNF32UI( uint_fast32_t uiA, uint_fast32_t uiB ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 64-bit floating-point NaN. | | The bit pattern for a default generated 64-bit floating-point NaN. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define defaultNaNF64UI UINT64_C( 0x7FF8000000000000 ) | #define defaultNaNF64UI UINT64_C(0x7FF8000000000000) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Returns true when 64-bit unsigned integer 'uiA' has the bit pattern of a | | Returns true when 64-bit unsigned integer 'uiA' has the bit pattern of a | ||||||
| | 64-bit floating-point signaling NaN. | | 64-bit floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its argument more than once. | | Note:  This macro evaluates its argument more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF64UI( uiA ) ((((uiA) & UINT64_C( 0x7FF8000000000000 )) == UINT64_C( 0x7FF0000000000000 )) && ((uiA) & UINT64_C( 0x0007FFFFFFFFFFFF ))) | #define softfloat_isSigNaNF64UI(uiA)                                                                                                       \ | ||||||
|  |     ((((uiA)&UINT64_C(0x7FF8000000000000)) == UINT64_C(0x7FF0000000000000)) && ((uiA)&UINT64_C(0x0007FFFFFFFFFFFF))) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming 'uiA' has the bit pattern of a 64-bit floating-point NaN, converts | | Assuming 'uiA' has the bit pattern of a 64-bit floating-point NaN, converts | ||||||
| @@ -170,13 +169,13 @@ uint_fast32_t | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void softfloat_f64UIToCommonNaN( uint_fast64_t uiA, struct commonNaN *zPtr ); | void softfloat_f64UIToCommonNaN(uint_fast64_t uiA, struct commonNaN* zPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 64-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 64-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast64_t softfloat_commonNaNToF64UI( const struct commonNaN *aPtr ); | uint_fast64_t softfloat_commonNaNToF64UI(const struct commonNaN* aPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting 'uiA' and 'uiB' as the bit patterns of two 64-bit floating- | | Interpreting 'uiA' and 'uiB' as the bit patterns of two 64-bit floating- | ||||||
| @@ -184,14 +183,13 @@ uint_fast64_t softfloat_commonNaNToF64UI( const struct commonNaN *aPtr ); | |||||||
| | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | | the combined NaN result.  If either 'uiA' or 'uiB' has the pattern of a | ||||||
| | signaling NaN, the invalid exception is raised. | | signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast64_t | uint_fast64_t softfloat_propagateNaNF64UI(uint_fast64_t uiA, uint_fast64_t uiB); | ||||||
|  softfloat_propagateNaNF64UI( uint_fast64_t uiA, uint_fast64_t uiB ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 80-bit extended floating-point NaN. | | The bit pattern for a default generated 80-bit extended floating-point NaN. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define defaultNaNExtF80UI64 0xFFFF | #define defaultNaNExtF80UI64 0xFFFF | ||||||
| #define defaultNaNExtF80UI0  UINT64_C( 0xC000000000000000 ) | #define defaultNaNExtF80UI0 UINT64_C(0xC000000000000000) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Returns true when the 80-bit unsigned integer formed from concatenating | | Returns true when the 80-bit unsigned integer formed from concatenating | ||||||
| @@ -199,7 +197,8 @@ uint_fast64_t | |||||||
| | floating-point signaling NaN. | | floating-point signaling NaN. | ||||||
| | Note:  This macro evaluates its arguments more than once. | | Note:  This macro evaluates its arguments more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNExtF80UI( uiA64, uiA0 ) ((((uiA64) & 0x7FFF) == 0x7FFF) && ! ((uiA0) & UINT64_C( 0x4000000000000000 )) && ((uiA0) & UINT64_C( 0x3FFFFFFFFFFFFFFF ))) | #define softfloat_isSigNaNExtF80UI(uiA64, uiA0)                                                                                            \ | ||||||
|  |     ((((uiA64)&0x7FFF) == 0x7FFF) && !((uiA0)&UINT64_C(0x4000000000000000)) && ((uiA0)&UINT64_C(0x3FFFFFFFFFFFFFFF))) | ||||||
|  |  | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
|  |  | ||||||
| @@ -215,16 +214,14 @@ uint_fast64_t | |||||||
| | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | | location pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_extF80UIToCommonNaN(uint_fast16_t uiA64, uint_fast64_t uiA0, struct commonNaN* zPtr); | ||||||
|  softfloat_extF80UIToCommonNaN( |  | ||||||
|      uint_fast16_t uiA64, uint_fast64_t uiA0, struct commonNaN *zPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | ||||||
| | floating-point NaN, and returns the bit pattern of this value as an unsigned | | floating-point NaN, and returns the bit pattern of this value as an unsigned | ||||||
| | integer. | | integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 softfloat_commonNaNToExtF80UI( const struct commonNaN *aPtr ); | struct uint128 softfloat_commonNaNToExtF80UI(const struct commonNaN* aPtr); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting the unsigned integer formed from concatenating 'uiA64' and | | Interpreting the unsigned integer formed from concatenating 'uiA64' and | ||||||
| @@ -235,19 +232,13 @@ struct uint128 softfloat_commonNaNToExtF80UI( const struct commonNaN *aPtr ); | |||||||
| | result.  If either original floating-point value is a signaling NaN, the | | result.  If either original floating-point value is a signaling NaN, the | ||||||
| | invalid exception is raised. | | invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 | struct uint128 softfloat_propagateNaNExtF80UI(uint_fast16_t uiA64, uint_fast64_t uiA0, uint_fast16_t uiB64, uint_fast64_t uiB0); | ||||||
|  softfloat_propagateNaNExtF80UI( |  | ||||||
|      uint_fast16_t uiA64, |  | ||||||
|      uint_fast64_t uiA0, |  | ||||||
|      uint_fast16_t uiB64, |  | ||||||
|      uint_fast64_t uiB0 |  | ||||||
|  ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 128-bit floating-point NaN. | | The bit pattern for a default generated 128-bit floating-point NaN. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define defaultNaNF128UI64 UINT64_C( 0xFFFF800000000000 ) | #define defaultNaNF128UI64 UINT64_C(0xFFFF800000000000) | ||||||
| #define defaultNaNF128UI0  UINT64_C( 0 ) | #define defaultNaNF128UI0 UINT64_C(0) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Returns true when the 128-bit unsigned integer formed from concatenating | | Returns true when the 128-bit unsigned integer formed from concatenating | ||||||
| @@ -255,7 +246,8 @@ struct uint128 | |||||||
| | point signaling NaN. | | point signaling NaN. | ||||||
| | Note:  This macro evaluates its arguments more than once. | | Note:  This macro evaluates its arguments more than once. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_isSigNaNF128UI( uiA64, uiA0 ) ((((uiA64) & UINT64_C( 0x7FFF800000000000 )) == UINT64_C( 0x7FFF000000000000 )) && ((uiA0) || ((uiA64) & UINT64_C( 0x00007FFFFFFFFFFF )))) | #define softfloat_isSigNaNF128UI(uiA64, uiA0)                                                                                              \ | ||||||
|  |     ((((uiA64)&UINT64_C(0x7FFF800000000000)) == UINT64_C(0x7FFF000000000000)) && ((uiA0) || ((uiA64)&UINT64_C(0x00007FFFFFFFFFFF)))) | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming the unsigned integer formed from concatenating 'uiA64' and 'uiA0' | | Assuming the unsigned integer formed from concatenating 'uiA64' and 'uiA0' | ||||||
| @@ -264,15 +256,13 @@ struct uint128 | |||||||
| | pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid exception | | pointed to by 'zPtr'.  If the NaN is a signaling NaN, the invalid exception | ||||||
| | is raised. | | is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_f128UIToCommonNaN(uint_fast64_t uiA64, uint_fast64_t uiA0, struct commonNaN* zPtr); | ||||||
|  softfloat_f128UIToCommonNaN( |  | ||||||
|      uint_fast64_t uiA64, uint_fast64_t uiA0, struct commonNaN *zPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | ||||||
| | NaN, and returns the bit pattern of this value as an unsigned integer. | | NaN, and returns the bit pattern of this value as an unsigned integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 softfloat_commonNaNToF128UI( const struct commonNaN * ); | struct uint128 softfloat_commonNaNToF128UI(const struct commonNaN*); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Interpreting the unsigned integer formed from concatenating 'uiA64' and | | Interpreting the unsigned integer formed from concatenating 'uiA64' and | ||||||
| @@ -283,13 +273,7 @@ struct uint128 softfloat_commonNaNToF128UI( const struct commonNaN * ); | |||||||
| | If either original floating-point value is a signaling NaN, the invalid | | If either original floating-point value is a signaling NaN, the invalid | ||||||
| | exception is raised. | | exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 | struct uint128 softfloat_propagateNaNF128UI(uint_fast64_t uiA64, uint_fast64_t uiA0, uint_fast64_t uiB64, uint_fast64_t uiB0); | ||||||
|  softfloat_propagateNaNF128UI( |  | ||||||
|      uint_fast64_t uiA64, |  | ||||||
|      uint_fast64_t uiA0, |  | ||||||
|      uint_fast64_t uiB64, |  | ||||||
|      uint_fast64_t uiB0 |  | ||||||
|  ); |  | ||||||
|  |  | ||||||
| #else | #else | ||||||
|  |  | ||||||
| @@ -304,18 +288,14 @@ struct uint128 | |||||||
| | common NaN at the location pointed to by 'zPtr'.  If the NaN is a signaling | | common NaN at the location pointed to by 'zPtr'.  If the NaN is a signaling | ||||||
| | NaN, the invalid exception is raised. | | NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_extF80MToCommonNaN(const struct extFloat80M* aSPtr, struct commonNaN* zPtr); | ||||||
|  softfloat_extF80MToCommonNaN( |  | ||||||
|      const struct extFloat80M *aSPtr, struct commonNaN *zPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | | Converts the common NaN pointed to by 'aPtr' into an 80-bit extended | ||||||
| | floating-point NaN, and stores this NaN at the location pointed to by | | floating-point NaN, and stores this NaN at the location pointed to by | ||||||
| | 'zSPtr'. | | 'zSPtr'. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_commonNaNToExtF80M(const struct commonNaN* aPtr, struct extFloat80M* zSPtr); | ||||||
|  softfloat_commonNaNToExtF80M( |  | ||||||
|      const struct commonNaN *aPtr, struct extFloat80M *zSPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming at least one of the two 80-bit extended floating-point values | | Assuming at least one of the two 80-bit extended floating-point values | ||||||
| @@ -323,12 +303,7 @@ void | |||||||
| | at the location pointed to by 'zSPtr'.  If either original floating-point | | at the location pointed to by 'zSPtr'.  If either original floating-point | ||||||
| | value is a signaling NaN, the invalid exception is raised. | | value is a signaling NaN, the invalid exception is raised. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_propagateNaNExtF80M(const struct extFloat80M* aSPtr, const struct extFloat80M* bSPtr, struct extFloat80M* zSPtr); | ||||||
|  softfloat_propagateNaNExtF80M( |  | ||||||
|      const struct extFloat80M *aSPtr, |  | ||||||
|      const struct extFloat80M *bSPtr, |  | ||||||
|      struct extFloat80M *zSPtr |  | ||||||
|  ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The bit pattern for a default generated 128-bit floating-point NaN. | | The bit pattern for a default generated 128-bit floating-point NaN. | ||||||
| @@ -336,7 +311,7 @@ void | |||||||
| #define defaultNaNF128UI96 0xFFFF8000 | #define defaultNaNF128UI96 0xFFFF8000 | ||||||
| #define defaultNaNF128UI64 0 | #define defaultNaNF128UI64 0 | ||||||
| #define defaultNaNF128UI32 0 | #define defaultNaNF128UI32 0 | ||||||
| #define defaultNaNF128UI0  0 | #define defaultNaNF128UI0 0 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming the 128-bit floating-point value pointed to by 'aWPtr' is a NaN, | | Assuming the 128-bit floating-point value pointed to by 'aWPtr' is a NaN, | ||||||
| @@ -346,8 +321,7 @@ void | |||||||
| | four 32-bit elements that concatenate in the platform's normal endian order | | four 32-bit elements that concatenate in the platform's normal endian order | ||||||
| | to form a 128-bit floating-point value. | | to form a 128-bit floating-point value. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_f128MToCommonNaN(const uint32_t* aWPtr, struct commonNaN* zPtr); | ||||||
|  softfloat_f128MToCommonNaN( const uint32_t *aWPtr, struct commonNaN *zPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | | Converts the common NaN pointed to by 'aPtr' into a 128-bit floating-point | ||||||
| @@ -355,8 +329,7 @@ void | |||||||
| | 'zWPtr' points to an array of four 32-bit elements that concatenate in the | | 'zWPtr' points to an array of four 32-bit elements that concatenate in the | ||||||
| | platform's normal endian order to form a 128-bit floating-point value. | | platform's normal endian order to form a 128-bit floating-point value. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_commonNaNToF128M(const struct commonNaN* aPtr, uint32_t* zWPtr); | ||||||
|  softfloat_commonNaNToF128M( const struct commonNaN *aPtr, uint32_t *zWPtr ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Assuming at least one of the two 128-bit floating-point values pointed to by | | Assuming at least one of the two 128-bit floating-point values pointed to by | ||||||
| @@ -366,11 +339,8 @@ void | |||||||
| | and 'zWPtr' points to an array of four 32-bit elements that concatenate in | | and 'zWPtr' points to an array of four 32-bit elements that concatenate in | ||||||
| | the platform's normal endian order to form a 128-bit floating-point value. | | the platform's normal endian order to form a 128-bit floating-point value. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_propagateNaNF128M(const uint32_t* aWPtr, const uint32_t* bWPtr, uint32_t* zWPtr); | ||||||
|  softfloat_propagateNaNF128M( |  | ||||||
|      const uint32_t *aWPtr, const uint32_t *bWPtr, uint32_t *zWPtr ); |  | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
|   | |||||||
| @@ -37,242 +37,205 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| #ifndef internals_h | #ifndef internals_h | ||||||
| #define internals_h 1 | #define internals_h 1 | ||||||
|  |  | ||||||
| #include <stdbool.h> |  | ||||||
| #include <stdint.h> |  | ||||||
| #include "primitives.h" | #include "primitives.h" | ||||||
| #include "softfloat_types.h" | #include "softfloat_types.h" | ||||||
|  | #include <stdbool.h> | ||||||
|  | #include <stdint.h> | ||||||
|  |  | ||||||
| union ui16_f16 { uint16_t ui; float16_t f; }; | union ui16_f16 { | ||||||
| union ui32_f32 { uint32_t ui; float32_t f; }; |     uint16_t ui; | ||||||
| union ui64_f64 { uint64_t ui; float64_t f; }; |     float16_t f; | ||||||
|  | }; | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | union ui32_f32 { | ||||||
| union extF80M_extF80 { struct extFloat80M fM; extFloat80_t f; }; |     uint32_t ui; | ||||||
| union ui128_f128 { struct uint128 ui; float128_t f; }; |     float32_t f; | ||||||
| #endif | }; | ||||||
|  | union ui64_f64 { | ||||||
| enum { |     uint64_t ui; | ||||||
|     softfloat_mulAdd_subC    = 1, |     float64_t f; | ||||||
|     softfloat_mulAdd_subProd = 2 |  | ||||||
| }; | }; | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- |  | ||||||
| *----------------------------------------------------------------------------*/ |  | ||||||
| uint_fast32_t softfloat_roundToUI32( bool, uint_fast64_t, uint_fast8_t, bool ); |  | ||||||
|  |  | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
| uint_fast64_t | union extF80M_extF80 { | ||||||
|  softfloat_roundToUI64( |     struct extFloat80M fM; | ||||||
|      bool, uint_fast64_t, uint_fast64_t, uint_fast8_t, bool ); |     extFloat80_t f; | ||||||
| #else | }; | ||||||
| uint_fast64_t softfloat_roundMToUI64( bool, uint32_t *, uint_fast8_t, bool ); | union ui128_f128 { | ||||||
|  |     struct uint128 ui; | ||||||
|  |     float128_t f; | ||||||
|  | }; | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| int_fast32_t softfloat_roundToI32( bool, uint_fast64_t, uint_fast8_t, bool ); | enum { softfloat_mulAdd_subC = 1, softfloat_mulAdd_subProd = 2 }; | ||||||
|  |  | ||||||
|  | /*---------------------------------------------------------------------------- | ||||||
|  |  *----------------------------------------------------------------------------*/ | ||||||
|  | uint_fast32_t softfloat_roundToUI32(bool, uint_fast64_t, uint_fast8_t, bool); | ||||||
|  |  | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
| int_fast64_t | uint_fast64_t softfloat_roundToUI64(bool, uint_fast64_t, uint_fast64_t, uint_fast8_t, bool); | ||||||
|  softfloat_roundToI64( |  | ||||||
|      bool, uint_fast64_t, uint_fast64_t, uint_fast8_t, bool ); |  | ||||||
| #else | #else | ||||||
| int_fast64_t softfloat_roundMToI64( bool, uint32_t *, uint_fast8_t, bool ); | uint_fast64_t softfloat_roundMToUI64(bool, uint32_t*, uint_fast8_t, bool); | ||||||
|  | #endif | ||||||
|  |  | ||||||
|  | int_fast32_t softfloat_roundToI32(bool, uint_fast64_t, uint_fast8_t, bool); | ||||||
|  |  | ||||||
|  | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
|  | int_fast64_t softfloat_roundToI64(bool, uint_fast64_t, uint_fast64_t, uint_fast8_t, bool); | ||||||
|  | #else | ||||||
|  | int_fast64_t softfloat_roundMToI64(bool, uint32_t*, uint_fast8_t, bool); | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define signF16UI( a ) ((bool) ((uint16_t) (a)>>15)) | #define signF16UI(a) ((bool)((uint16_t)(a) >> 15)) | ||||||
| #define expF16UI( a ) ((int_fast8_t) ((a)>>10) & 0x1F) | #define expF16UI(a) ((int_fast8_t)((a) >> 10) & 0x1F) | ||||||
| #define fracF16UI( a ) ((a) & 0x03FF) | #define fracF16UI(a) ((a)&0x03FF) | ||||||
| #define packToF16UI( sign, exp, sig ) (((uint16_t) (sign)<<15) + ((uint16_t) (exp)<<10) + (sig)) | #define packToF16UI(sign, exp, sig) (((uint16_t)(sign) << 15) + ((uint16_t)(exp) << 10) + (sig)) | ||||||
|  |  | ||||||
| #define isNaNF16UI( a ) (((~(a) & 0x7C00) == 0) && ((a) & 0x03FF)) | #define isNaNF16UI(a) (((~(a)&0x7C00) == 0) && ((a)&0x03FF)) | ||||||
|  |  | ||||||
| struct exp8_sig16 { int_fast8_t exp; uint_fast16_t sig; }; | struct exp8_sig16 { | ||||||
| struct exp8_sig16 softfloat_normSubnormalF16Sig( uint_fast16_t ); |     int_fast8_t exp; | ||||||
|  |     uint_fast16_t sig; | ||||||
|  | }; | ||||||
|  | struct exp8_sig16 softfloat_normSubnormalF16Sig(uint_fast16_t); | ||||||
|  |  | ||||||
| float16_t softfloat_roundPackToF16( bool, int_fast16_t, uint_fast16_t ); | float16_t softfloat_roundPackToF16(bool, int_fast16_t, uint_fast16_t); | ||||||
| float16_t softfloat_normRoundPackToF16( bool, int_fast16_t, uint_fast16_t ); | float16_t softfloat_normRoundPackToF16(bool, int_fast16_t, uint_fast16_t); | ||||||
|  |  | ||||||
| float16_t softfloat_addMagsF16( uint_fast16_t, uint_fast16_t ); | float16_t softfloat_addMagsF16(uint_fast16_t, uint_fast16_t); | ||||||
| float16_t softfloat_subMagsF16( uint_fast16_t, uint_fast16_t ); | float16_t softfloat_subMagsF16(uint_fast16_t, uint_fast16_t); | ||||||
| float16_t | float16_t softfloat_mulAddF16(uint_fast16_t, uint_fast16_t, uint_fast16_t, uint_fast8_t); | ||||||
|  softfloat_mulAddF16( |  | ||||||
|      uint_fast16_t, uint_fast16_t, uint_fast16_t, uint_fast8_t ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define signF32UI( a ) ((bool) ((uint32_t) (a)>>31)) | #define signF32UI(a) ((bool)((uint32_t)(a) >> 31)) | ||||||
| #define expF32UI( a ) ((int_fast16_t) ((a)>>23) & 0xFF) | #define expF32UI(a) ((int_fast16_t)((a) >> 23) & 0xFF) | ||||||
| #define fracF32UI( a ) ((a) & 0x007FFFFF) | #define fracF32UI(a) ((a)&0x007FFFFF) | ||||||
| #define packToF32UI( sign, exp, sig ) (((uint32_t) (sign)<<31) + ((uint32_t) (exp)<<23) + (sig)) | #define packToF32UI(sign, exp, sig) (((uint32_t)(sign) << 31) + ((uint32_t)(exp) << 23) + (sig)) | ||||||
|  |  | ||||||
| #define isNaNF32UI( a ) (((~(a) & 0x7F800000) == 0) && ((a) & 0x007FFFFF)) | #define isNaNF32UI(a) (((~(a)&0x7F800000) == 0) && ((a)&0x007FFFFF)) | ||||||
|  |  | ||||||
| struct exp16_sig32 { int_fast16_t exp; uint_fast32_t sig; }; | struct exp16_sig32 { | ||||||
| struct exp16_sig32 softfloat_normSubnormalF32Sig( uint_fast32_t ); |     int_fast16_t exp; | ||||||
|  |     uint_fast32_t sig; | ||||||
|  | }; | ||||||
|  | struct exp16_sig32 softfloat_normSubnormalF32Sig(uint_fast32_t); | ||||||
|  |  | ||||||
| float32_t softfloat_roundPackToF32( bool, int_fast16_t, uint_fast32_t ); | float32_t softfloat_roundPackToF32(bool, int_fast16_t, uint_fast32_t); | ||||||
| float32_t softfloat_normRoundPackToF32( bool, int_fast16_t, uint_fast32_t ); | float32_t softfloat_normRoundPackToF32(bool, int_fast16_t, uint_fast32_t); | ||||||
|  |  | ||||||
| float32_t softfloat_addMagsF32( uint_fast32_t, uint_fast32_t ); | float32_t softfloat_addMagsF32(uint_fast32_t, uint_fast32_t); | ||||||
| float32_t softfloat_subMagsF32( uint_fast32_t, uint_fast32_t ); | float32_t softfloat_subMagsF32(uint_fast32_t, uint_fast32_t); | ||||||
| float32_t | float32_t softfloat_mulAddF32(uint_fast32_t, uint_fast32_t, uint_fast32_t, uint_fast8_t); | ||||||
|  softfloat_mulAddF32( |  | ||||||
|      uint_fast32_t, uint_fast32_t, uint_fast32_t, uint_fast8_t ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define signF64UI( a ) ((bool) ((uint64_t) (a)>>63)) | #define signF64UI(a) ((bool)((uint64_t)(a) >> 63)) | ||||||
| #define expF64UI( a ) ((int_fast16_t) ((a)>>52) & 0x7FF) | #define expF64UI(a) ((int_fast16_t)((a) >> 52) & 0x7FF) | ||||||
| #define fracF64UI( a ) ((a) & UINT64_C( 0x000FFFFFFFFFFFFF )) | #define fracF64UI(a) ((a)&UINT64_C(0x000FFFFFFFFFFFFF)) | ||||||
| #define packToF64UI( sign, exp, sig ) ((uint64_t) (((uint_fast64_t) (sign)<<63) + ((uint_fast64_t) (exp)<<52) + (sig))) | #define packToF64UI(sign, exp, sig) ((uint64_t)(((uint_fast64_t)(sign) << 63) + ((uint_fast64_t)(exp) << 52) + (sig))) | ||||||
|  |  | ||||||
| #define isNaNF64UI( a ) (((~(a) & UINT64_C( 0x7FF0000000000000 )) == 0) && ((a) & UINT64_C( 0x000FFFFFFFFFFFFF ))) | #define isNaNF64UI(a) (((~(a)&UINT64_C(0x7FF0000000000000)) == 0) && ((a)&UINT64_C(0x000FFFFFFFFFFFFF))) | ||||||
|  |  | ||||||
| struct exp16_sig64 { int_fast16_t exp; uint_fast64_t sig; }; | struct exp16_sig64 { | ||||||
| struct exp16_sig64 softfloat_normSubnormalF64Sig( uint_fast64_t ); |     int_fast16_t exp; | ||||||
|  |     uint_fast64_t sig; | ||||||
|  | }; | ||||||
|  | struct exp16_sig64 softfloat_normSubnormalF64Sig(uint_fast64_t); | ||||||
|  |  | ||||||
| float64_t softfloat_roundPackToF64( bool, int_fast16_t, uint_fast64_t ); | float64_t softfloat_roundPackToF64(bool, int_fast16_t, uint_fast64_t); | ||||||
| float64_t softfloat_normRoundPackToF64( bool, int_fast16_t, uint_fast64_t ); | float64_t softfloat_normRoundPackToF64(bool, int_fast16_t, uint_fast64_t); | ||||||
|  |  | ||||||
| float64_t softfloat_addMagsF64( uint_fast64_t, uint_fast64_t, bool ); | float64_t softfloat_addMagsF64(uint_fast64_t, uint_fast64_t, bool); | ||||||
| float64_t softfloat_subMagsF64( uint_fast64_t, uint_fast64_t, bool ); | float64_t softfloat_subMagsF64(uint_fast64_t, uint_fast64_t, bool); | ||||||
| float64_t | float64_t softfloat_mulAddF64(uint_fast64_t, uint_fast64_t, uint_fast64_t, uint_fast8_t); | ||||||
|  softfloat_mulAddF64( |  | ||||||
|      uint_fast64_t, uint_fast64_t, uint_fast64_t, uint_fast8_t ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define signExtF80UI64( a64 ) ((bool) ((uint16_t) (a64)>>15)) | #define signExtF80UI64(a64) ((bool)((uint16_t)(a64) >> 15)) | ||||||
| #define expExtF80UI64( a64 ) ((a64) & 0x7FFF) | #define expExtF80UI64(a64) ((a64)&0x7FFF) | ||||||
| #define packToExtF80UI64( sign, exp ) ((uint_fast16_t) (sign)<<15 | (exp)) | #define packToExtF80UI64(sign, exp) ((uint_fast16_t)(sign) << 15 | (exp)) | ||||||
|  |  | ||||||
| #define isNaNExtF80UI( a64, a0 ) ((((a64) & 0x7FFF) == 0x7FFF) && ((a0) & UINT64_C( 0x7FFFFFFFFFFFFFFF ))) | #define isNaNExtF80UI(a64, a0) ((((a64)&0x7FFF) == 0x7FFF) && ((a0)&UINT64_C(0x7FFFFFFFFFFFFFFF))) | ||||||
|  |  | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
|  |  | ||||||
| struct exp32_sig64 { int_fast32_t exp; uint64_t sig; }; | struct exp32_sig64 { | ||||||
| struct exp32_sig64 softfloat_normSubnormalExtF80Sig( uint_fast64_t ); |     int_fast32_t exp; | ||||||
|  |     uint64_t sig; | ||||||
|  | }; | ||||||
|  | struct exp32_sig64 softfloat_normSubnormalExtF80Sig(uint_fast64_t); | ||||||
|  |  | ||||||
| extFloat80_t | extFloat80_t softfloat_roundPackToExtF80(bool, int_fast32_t, uint_fast64_t, uint_fast64_t, uint_fast8_t); | ||||||
|  softfloat_roundPackToExtF80( | extFloat80_t softfloat_normRoundPackToExtF80(bool, int_fast32_t, uint_fast64_t, uint_fast64_t, uint_fast8_t); | ||||||
|      bool, int_fast32_t, uint_fast64_t, uint_fast64_t, uint_fast8_t ); |  | ||||||
| extFloat80_t |  | ||||||
|  softfloat_normRoundPackToExtF80( |  | ||||||
|      bool, int_fast32_t, uint_fast64_t, uint_fast64_t, uint_fast8_t ); |  | ||||||
|  |  | ||||||
| extFloat80_t | extFloat80_t softfloat_addMagsExtF80(uint_fast16_t, uint_fast64_t, uint_fast16_t, uint_fast64_t, bool); | ||||||
|  softfloat_addMagsExtF80( | extFloat80_t softfloat_subMagsExtF80(uint_fast16_t, uint_fast64_t, uint_fast16_t, uint_fast64_t, bool); | ||||||
|      uint_fast16_t, uint_fast64_t, uint_fast16_t, uint_fast64_t, bool ); |  | ||||||
| extFloat80_t |  | ||||||
|  softfloat_subMagsExtF80( |  | ||||||
|      uint_fast16_t, uint_fast64_t, uint_fast16_t, uint_fast64_t, bool ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define signF128UI64( a64 ) ((bool) ((uint64_t) (a64)>>63)) | #define signF128UI64(a64) ((bool)((uint64_t)(a64) >> 63)) | ||||||
| #define expF128UI64( a64 ) ((int_fast32_t) ((a64)>>48) & 0x7FFF) | #define expF128UI64(a64) ((int_fast32_t)((a64) >> 48) & 0x7FFF) | ||||||
| #define fracF128UI64( a64 ) ((a64) & UINT64_C( 0x0000FFFFFFFFFFFF )) | #define fracF128UI64(a64) ((a64)&UINT64_C(0x0000FFFFFFFFFFFF)) | ||||||
| #define packToF128UI64( sign, exp, sig64 ) (((uint_fast64_t) (sign)<<63) + ((uint_fast64_t) (exp)<<48) + (sig64)) | #define packToF128UI64(sign, exp, sig64) (((uint_fast64_t)(sign) << 63) + ((uint_fast64_t)(exp) << 48) + (sig64)) | ||||||
|  |  | ||||||
| #define isNaNF128UI( a64, a0 ) (((~(a64) & UINT64_C( 0x7FFF000000000000 )) == 0) && (a0 || ((a64) & UINT64_C( 0x0000FFFFFFFFFFFF )))) | #define isNaNF128UI(a64, a0) (((~(a64)&UINT64_C(0x7FFF000000000000)) == 0) && (a0 || ((a64)&UINT64_C(0x0000FFFFFFFFFFFF)))) | ||||||
|  |  | ||||||
| struct exp32_sig128 { int_fast32_t exp; struct uint128 sig; }; | struct exp32_sig128 { | ||||||
| struct exp32_sig128 |     int_fast32_t exp; | ||||||
|  softfloat_normSubnormalF128Sig( uint_fast64_t, uint_fast64_t ); |     struct uint128 sig; | ||||||
|  | }; | ||||||
|  | struct exp32_sig128 softfloat_normSubnormalF128Sig(uint_fast64_t, uint_fast64_t); | ||||||
|  |  | ||||||
| float128_t | float128_t softfloat_roundPackToF128(bool, int_fast32_t, uint_fast64_t, uint_fast64_t, uint_fast64_t); | ||||||
|  softfloat_roundPackToF128( | float128_t softfloat_normRoundPackToF128(bool, int_fast32_t, uint_fast64_t, uint_fast64_t); | ||||||
|      bool, int_fast32_t, uint_fast64_t, uint_fast64_t, uint_fast64_t ); |  | ||||||
| float128_t |  | ||||||
|  softfloat_normRoundPackToF128( |  | ||||||
|      bool, int_fast32_t, uint_fast64_t, uint_fast64_t ); |  | ||||||
|  |  | ||||||
| float128_t | float128_t softfloat_addMagsF128(uint_fast64_t, uint_fast64_t, uint_fast64_t, uint_fast64_t, bool); | ||||||
|  softfloat_addMagsF128( | float128_t softfloat_subMagsF128(uint_fast64_t, uint_fast64_t, uint_fast64_t, uint_fast64_t, bool); | ||||||
|      uint_fast64_t, uint_fast64_t, uint_fast64_t, uint_fast64_t, bool ); | float128_t softfloat_mulAddF128(uint_fast64_t, uint_fast64_t, uint_fast64_t, uint_fast64_t, uint_fast64_t, uint_fast64_t, uint_fast8_t); | ||||||
| float128_t |  | ||||||
|  softfloat_subMagsF128( |  | ||||||
|      uint_fast64_t, uint_fast64_t, uint_fast64_t, uint_fast64_t, bool ); |  | ||||||
| float128_t |  | ||||||
|  softfloat_mulAddF128( |  | ||||||
|      uint_fast64_t, |  | ||||||
|      uint_fast64_t, |  | ||||||
|      uint_fast64_t, |  | ||||||
|      uint_fast64_t, |  | ||||||
|      uint_fast64_t, |  | ||||||
|      uint_fast64_t, |  | ||||||
|      uint_fast8_t |  | ||||||
|  ); |  | ||||||
|  |  | ||||||
| #else | #else | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
|  |  | ||||||
| bool | bool softfloat_tryPropagateNaNExtF80M(const struct extFloat80M*, const struct extFloat80M*, struct extFloat80M*); | ||||||
|  softfloat_tryPropagateNaNExtF80M( | void softfloat_invalidExtF80M(struct extFloat80M*); | ||||||
|      const struct extFloat80M *, |  | ||||||
|      const struct extFloat80M *, |  | ||||||
|      struct extFloat80M * |  | ||||||
|  ); |  | ||||||
| void softfloat_invalidExtF80M( struct extFloat80M * ); |  | ||||||
|  |  | ||||||
| int softfloat_normExtF80SigM( uint64_t * ); | int softfloat_normExtF80SigM(uint64_t*); | ||||||
|  |  | ||||||
| void | void softfloat_roundPackMToExtF80M(bool, int32_t, uint32_t*, uint_fast8_t, struct extFloat80M*); | ||||||
|  softfloat_roundPackMToExtF80M( | void softfloat_normRoundPackMToExtF80M(bool, int32_t, uint32_t*, uint_fast8_t, struct extFloat80M*); | ||||||
|      bool, int32_t, uint32_t *, uint_fast8_t, struct extFloat80M * ); |  | ||||||
| void |  | ||||||
|  softfloat_normRoundPackMToExtF80M( |  | ||||||
|      bool, int32_t, uint32_t *, uint_fast8_t, struct extFloat80M * ); |  | ||||||
|  |  | ||||||
| void | void softfloat_addExtF80M(const struct extFloat80M*, const struct extFloat80M*, struct extFloat80M*, bool); | ||||||
|  softfloat_addExtF80M( |  | ||||||
|      const struct extFloat80M *, |  | ||||||
|      const struct extFloat80M *, |  | ||||||
|      struct extFloat80M *, |  | ||||||
|      bool |  | ||||||
|  ); |  | ||||||
|  |  | ||||||
| int | int softfloat_compareNonnormExtF80M(const struct extFloat80M*, const struct extFloat80M*); | ||||||
|  softfloat_compareNonnormExtF80M( |  | ||||||
|      const struct extFloat80M *, const struct extFloat80M * ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| *----------------------------------------------------------------------------*/ |  *----------------------------------------------------------------------------*/ | ||||||
| #define signF128UI96( a96 ) ((bool) ((uint32_t) (a96)>>31)) | #define signF128UI96(a96) ((bool)((uint32_t)(a96) >> 31)) | ||||||
| #define expF128UI96( a96 ) ((int32_t) ((a96)>>16) & 0x7FFF) | #define expF128UI96(a96) ((int32_t)((a96) >> 16) & 0x7FFF) | ||||||
| #define fracF128UI96( a96 ) ((a96) & 0x0000FFFF) | #define fracF128UI96(a96) ((a96)&0x0000FFFF) | ||||||
| #define packToF128UI96( sign, exp, sig96 ) (((uint32_t) (sign)<<31) + ((uint32_t) (exp)<<16) + (sig96)) | #define packToF128UI96(sign, exp, sig96) (((uint32_t)(sign) << 31) + ((uint32_t)(exp) << 16) + (sig96)) | ||||||
|  |  | ||||||
| bool softfloat_isNaNF128M( const uint32_t * ); | bool softfloat_isNaNF128M(const uint32_t*); | ||||||
|  |  | ||||||
| bool | bool softfloat_tryPropagateNaNF128M(const uint32_t*, const uint32_t*, uint32_t*); | ||||||
|  softfloat_tryPropagateNaNF128M( | void softfloat_invalidF128M(uint32_t*); | ||||||
|      const uint32_t *, const uint32_t *, uint32_t * ); |  | ||||||
| void softfloat_invalidF128M( uint32_t * ); |  | ||||||
|  |  | ||||||
| int softfloat_shiftNormSigF128M( const uint32_t *, uint_fast8_t, uint32_t * ); | int softfloat_shiftNormSigF128M(const uint32_t*, uint_fast8_t, uint32_t*); | ||||||
|  |  | ||||||
| void softfloat_roundPackMToF128M( bool, int32_t, uint32_t *, uint32_t * ); | void softfloat_roundPackMToF128M(bool, int32_t, uint32_t*, uint32_t*); | ||||||
| void softfloat_normRoundPackMToF128M( bool, int32_t, uint32_t *, uint32_t * ); | void softfloat_normRoundPackMToF128M(bool, int32_t, uint32_t*, uint32_t*); | ||||||
|  |  | ||||||
| void | void softfloat_addF128M(const uint32_t*, const uint32_t*, uint32_t*, bool); | ||||||
|  softfloat_addF128M( const uint32_t *, const uint32_t *, uint32_t *, bool ); | void softfloat_mulAddF128M(const uint32_t*, const uint32_t*, const uint32_t*, uint32_t*, uint_fast8_t); | ||||||
| void |  | ||||||
|  softfloat_mulAddF128M( |  | ||||||
|      const uint32_t *, |  | ||||||
|      const uint32_t *, |  | ||||||
|      const uint32_t *, |  | ||||||
|      uint32_t *, |  | ||||||
|      uint_fast8_t |  | ||||||
|  ); |  | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
|   | |||||||
| @@ -39,70 +39,70 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
|  |  | ||||||
| #ifdef INLINE | #ifdef INLINE | ||||||
|  |  | ||||||
| #include <stdint.h> |  | ||||||
| #include "primitiveTypes.h" | #include "primitiveTypes.h" | ||||||
|  | #include <stdint.h> | ||||||
|  |  | ||||||
| #ifdef SOFTFLOAT_BUILTIN_CLZ | #ifdef SOFTFLOAT_BUILTIN_CLZ | ||||||
|  |  | ||||||
| INLINE uint_fast8_t softfloat_countLeadingZeros16( uint16_t a ) | INLINE uint_fast8_t softfloat_countLeadingZeros16(uint16_t a) { return a ? __builtin_clz(a) - 16 : 16; } | ||||||
|     { return a ? __builtin_clz( a ) - 16 : 16; } |  | ||||||
| #define softfloat_countLeadingZeros16 softfloat_countLeadingZeros16 | #define softfloat_countLeadingZeros16 softfloat_countLeadingZeros16 | ||||||
|  |  | ||||||
| INLINE uint_fast8_t softfloat_countLeadingZeros32( uint32_t a ) | INLINE uint_fast8_t softfloat_countLeadingZeros32(uint32_t a) { return a ? __builtin_clz(a) : 32; } | ||||||
|     { return a ? __builtin_clz( a ) : 32; } |  | ||||||
| #define softfloat_countLeadingZeros32 softfloat_countLeadingZeros32 | #define softfloat_countLeadingZeros32 softfloat_countLeadingZeros32 | ||||||
|  |  | ||||||
| INLINE uint_fast8_t softfloat_countLeadingZeros64( uint64_t a ) | INLINE uint_fast8_t softfloat_countLeadingZeros64(uint64_t a) { return a ? __builtin_clzll(a) : 64; } | ||||||
|     { return a ? __builtin_clzll( a ) : 64; } |  | ||||||
| #define softfloat_countLeadingZeros64 softfloat_countLeadingZeros64 | #define softfloat_countLeadingZeros64 softfloat_countLeadingZeros64 | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifdef SOFTFLOAT_INTRINSIC_INT128 | #ifdef SOFTFLOAT_INTRINSIC_INT128 | ||||||
|  |  | ||||||
| INLINE struct uint128 softfloat_mul64ByShifted32To128( uint64_t a, uint32_t b ) | INLINE struct uint128 softfloat_mul64ByShifted32To128(uint64_t a, uint32_t b) { | ||||||
| { |     union { | ||||||
|     union { unsigned __int128 ui; struct uint128 s; } uZ; |         unsigned __int128 ui; | ||||||
|     uZ.ui = (unsigned __int128) a * ((uint_fast64_t) b<<32); |         struct uint128 s; | ||||||
|  |     } uZ; | ||||||
|  |     uZ.ui = (unsigned __int128)a * ((uint_fast64_t)b << 32); | ||||||
|     return uZ.s; |     return uZ.s; | ||||||
| } | } | ||||||
| #define softfloat_mul64ByShifted32To128 softfloat_mul64ByShifted32To128 | #define softfloat_mul64ByShifted32To128 softfloat_mul64ByShifted32To128 | ||||||
|  |  | ||||||
| INLINE struct uint128 softfloat_mul64To128( uint64_t a, uint64_t b ) | INLINE struct uint128 softfloat_mul64To128(uint64_t a, uint64_t b) { | ||||||
| { |     union { | ||||||
|     union { unsigned __int128 ui; struct uint128 s; } uZ; |         unsigned __int128 ui; | ||||||
|     uZ.ui = (unsigned __int128) a * b; |         struct uint128 s; | ||||||
|  |     } uZ; | ||||||
|  |     uZ.ui = (unsigned __int128)a * b; | ||||||
|     return uZ.s; |     return uZ.s; | ||||||
| } | } | ||||||
| #define softfloat_mul64To128 softfloat_mul64To128 | #define softfloat_mul64To128 softfloat_mul64To128 | ||||||
|  |  | ||||||
| INLINE | INLINE | ||||||
| struct uint128 softfloat_mul128By32( uint64_t a64, uint64_t a0, uint32_t b ) | struct uint128 softfloat_mul128By32(uint64_t a64, uint64_t a0, uint32_t b) { | ||||||
| { |     union { | ||||||
|     union { unsigned __int128 ui; struct uint128 s; } uZ; |         unsigned __int128 ui; | ||||||
|     uZ.ui = ((unsigned __int128) a64<<64 | a0) * b; |         struct uint128 s; | ||||||
|  |     } uZ; | ||||||
|  |     uZ.ui = ((unsigned __int128)a64 << 64 | a0) * b; | ||||||
|     return uZ.s; |     return uZ.s; | ||||||
| } | } | ||||||
| #define softfloat_mul128By32 softfloat_mul128By32 | #define softfloat_mul128By32 softfloat_mul128By32 | ||||||
|  |  | ||||||
| INLINE | INLINE | ||||||
| void | void softfloat_mul128To256M(uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0, uint64_t* zPtr) { | ||||||
|  softfloat_mul128To256M( |  | ||||||
|      uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0, uint64_t *zPtr ) |  | ||||||
| { |  | ||||||
|     unsigned __int128 z0, mid1, mid, z128; |     unsigned __int128 z0, mid1, mid, z128; | ||||||
|     z0 = (unsigned __int128) a0 * b0; |     z0 = (unsigned __int128)a0 * b0; | ||||||
|     mid1 = (unsigned __int128) a64 * b0; |     mid1 = (unsigned __int128)a64 * b0; | ||||||
|     mid = mid1 + (unsigned __int128) a0 * b64; |     mid = mid1 + (unsigned __int128)a0 * b64; | ||||||
|     z128 = (unsigned __int128) a64 * b64; |     z128 = (unsigned __int128)a64 * b64; | ||||||
|     z128 += (unsigned __int128) (mid < mid1)<<64 | mid>>64; |     z128 += (unsigned __int128)(mid < mid1) << 64 | mid >> 64; | ||||||
|     mid <<= 64; |     mid <<= 64; | ||||||
|     z0 += mid; |     z0 += mid; | ||||||
|     z128 += (z0 < mid); |     z128 += (z0 < mid); | ||||||
|     zPtr[indexWord( 4, 0 )] = z0; |     zPtr[indexWord(4, 0)] = z0; | ||||||
|     zPtr[indexWord( 4, 1 )] = z0>>64; |     zPtr[indexWord(4, 1)] = z0 >> 64; | ||||||
|     zPtr[indexWord( 4, 2 )] = z128; |     zPtr[indexWord(4, 2)] = z128; | ||||||
|     zPtr[indexWord( 4, 3 )] = z128>>64; |     zPtr[indexWord(4, 3)] = z128 >> 64; | ||||||
| } | } | ||||||
| #define softfloat_mul128To256M softfloat_mul128To256M | #define softfloat_mul128To256M softfloat_mul128To256M | ||||||
|  |  | ||||||
| @@ -111,4 +111,3 @@ void | |||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
|   | |||||||
| @@ -42,13 +42,27 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
|  |  | ||||||
| #ifdef LITTLEENDIAN | #ifdef LITTLEENDIAN | ||||||
| struct uint128 { uint64_t v0, v64; }; | struct uint128 { | ||||||
| struct uint64_extra { uint64_t extra, v; }; |     uint64_t v0, v64; | ||||||
| struct uint128_extra { uint64_t extra; struct uint128 v; }; | }; | ||||||
|  | struct uint64_extra { | ||||||
|  |     uint64_t extra, v; | ||||||
|  | }; | ||||||
|  | struct uint128_extra { | ||||||
|  |     uint64_t extra; | ||||||
|  |     struct uint128 v; | ||||||
|  | }; | ||||||
| #else | #else | ||||||
| struct uint128 { uint64_t v64, v0; }; | struct uint128 { | ||||||
| struct uint64_extra { uint64_t v, extra; }; |     uint64_t v64, v0; | ||||||
| struct uint128_extra { struct uint128 v; uint64_t extra; }; | }; | ||||||
|  | struct uint64_extra { | ||||||
|  |     uint64_t v, extra; | ||||||
|  | }; | ||||||
|  | struct uint128_extra { | ||||||
|  |     struct uint128 v; | ||||||
|  |     uint64_t extra; | ||||||
|  | }; | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
| @@ -59,27 +73,28 @@ struct uint128_extra { struct uint128 v; uint64_t extra; }; | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #ifdef LITTLEENDIAN | #ifdef LITTLEENDIAN | ||||||
| #define wordIncr 1 | #define wordIncr 1 | ||||||
| #define indexWord( total, n ) (n) | #define indexWord(total, n) (n) | ||||||
| #define indexWordHi( total ) ((total) - 1) | #define indexWordHi(total) ((total)-1) | ||||||
| #define indexWordLo( total ) 0 | #define indexWordLo(total) 0 | ||||||
| #define indexMultiword( total, m, n ) (n) | #define indexMultiword(total, m, n) (n) | ||||||
| #define indexMultiwordHi( total, n ) ((total) - (n)) | #define indexMultiwordHi(total, n) ((total) - (n)) | ||||||
| #define indexMultiwordLo( total, n ) 0 | #define indexMultiwordLo(total, n) 0 | ||||||
| #define indexMultiwordHiBut( total, n ) (n) | #define indexMultiwordHiBut(total, n) (n) | ||||||
| #define indexMultiwordLoBut( total, n ) 0 | #define indexMultiwordLoBut(total, n) 0 | ||||||
| #define INIT_UINTM4( v3, v2, v1, v0 ) { v0, v1, v2, v3 } | #define INIT_UINTM4(v3, v2, v1, v0)                                                                                                        \ | ||||||
|  |     { v0, v1, v2, v3 } | ||||||
| #else | #else | ||||||
| #define wordIncr -1 | #define wordIncr -1 | ||||||
| #define indexWord( total, n ) ((total) - 1 - (n)) | #define indexWord(total, n) ((total)-1 - (n)) | ||||||
| #define indexWordHi( total ) 0 | #define indexWordHi(total) 0 | ||||||
| #define indexWordLo( total ) ((total) - 1) | #define indexWordLo(total) ((total)-1) | ||||||
| #define indexMultiword( total, m, n ) ((total) - 1 - (m)) | #define indexMultiword(total, m, n) ((total)-1 - (m)) | ||||||
| #define indexMultiwordHi( total, n ) 0 | #define indexMultiwordHi(total, n) 0 | ||||||
| #define indexMultiwordLo( total, n ) ((total) - (n)) | #define indexMultiwordLo(total, n) ((total) - (n)) | ||||||
| #define indexMultiwordHiBut( total, n ) 0 | #define indexMultiwordHiBut(total, n) 0 | ||||||
| #define indexMultiwordLoBut( total, n ) (n) | #define indexMultiwordLoBut(total, n) (n) | ||||||
| #define INIT_UINTM4( v3, v2, v1, v0 ) { v3, v2, v1, v0 } | #define INIT_UINTM4(v3, v2, v1, v0)                                                                                                        \ | ||||||
|  |     { v3, v2, v1, v0 } | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
|   | |||||||
| @@ -37,9 +37,9 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| #ifndef primitives_h | #ifndef primitives_h | ||||||
| #define primitives_h 1 | #define primitives_h 1 | ||||||
|  |  | ||||||
|  | #include "primitiveTypes.h" | ||||||
| #include <stdbool.h> | #include <stdbool.h> | ||||||
| #include <stdint.h> | #include <stdint.h> | ||||||
| #include "primitiveTypes.h" |  | ||||||
|  |  | ||||||
| #ifndef softfloat_shortShiftRightJam64 | #ifndef softfloat_shortShiftRightJam64 | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| @@ -50,10 +50,9 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | ||||||
| INLINE | INLINE | ||||||
| uint64_t softfloat_shortShiftRightJam64( uint64_t a, uint_fast8_t dist ) | uint64_t softfloat_shortShiftRightJam64(uint64_t a, uint_fast8_t dist) { return a >> dist | ((a & (((uint_fast64_t)1 << dist) - 1)) != 0); } | ||||||
|     { return a>>dist | ((a & (((uint_fast64_t) 1<<dist) - 1)) != 0); } |  | ||||||
| #else | #else | ||||||
| uint64_t softfloat_shortShiftRightJam64( uint64_t a, uint_fast8_t dist ); | uint64_t softfloat_shortShiftRightJam64(uint64_t a, uint_fast8_t dist); | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -68,13 +67,11 @@ uint64_t softfloat_shortShiftRightJam64( uint64_t a, uint_fast8_t dist ); | |||||||
| | is zero or nonzero. | | is zero or nonzero. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | ||||||
| INLINE uint32_t softfloat_shiftRightJam32( uint32_t a, uint_fast16_t dist ) | INLINE uint32_t softfloat_shiftRightJam32(uint32_t a, uint_fast16_t dist) { | ||||||
| { |     return (dist < 31) ? a >> dist | ((uint32_t)(a << (-dist & 31)) != 0) : (a != 0); | ||||||
|     return |  | ||||||
|         (dist < 31) ? a>>dist | ((uint32_t) (a<<(-dist & 31)) != 0) : (a != 0); |  | ||||||
| } | } | ||||||
| #else | #else | ||||||
| uint32_t softfloat_shiftRightJam32( uint32_t a, uint_fast16_t dist ); | uint32_t softfloat_shiftRightJam32(uint32_t a, uint_fast16_t dist); | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -89,13 +86,11 @@ uint32_t softfloat_shiftRightJam32( uint32_t a, uint_fast16_t dist ); | |||||||
| | is zero or nonzero. | | is zero or nonzero. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (3 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (3 <= INLINE_LEVEL) | ||||||
| INLINE uint64_t softfloat_shiftRightJam64( uint64_t a, uint_fast32_t dist ) | INLINE uint64_t softfloat_shiftRightJam64(uint64_t a, uint_fast32_t dist) { | ||||||
| { |     return (dist < 63) ? a >> dist | ((uint64_t)(a << (-dist & 63)) != 0) : (a != 0); | ||||||
|     return |  | ||||||
|         (dist < 63) ? a>>dist | ((uint64_t) (a<<(-dist & 63)) != 0) : (a != 0); |  | ||||||
| } | } | ||||||
| #else | #else | ||||||
| uint64_t softfloat_shiftRightJam64( uint64_t a, uint_fast32_t dist ); | uint64_t softfloat_shiftRightJam64(uint64_t a, uint_fast32_t dist); | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -112,10 +107,9 @@ extern const uint_least8_t softfloat_countLeadingZeros8[256]; | |||||||
| | 'a'.  If 'a' is zero, 16 is returned. | | 'a'.  If 'a' is zero, 16 is returned. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | ||||||
| INLINE uint_fast8_t softfloat_countLeadingZeros16( uint16_t a ) | INLINE uint_fast8_t softfloat_countLeadingZeros16(uint16_t a) { | ||||||
| { |  | ||||||
|     uint_fast8_t count = 8; |     uint_fast8_t count = 8; | ||||||
|     if ( 0x100 <= a ) { |     if(0x100 <= a) { | ||||||
|         count = 0; |         count = 0; | ||||||
|         a >>= 8; |         a >>= 8; | ||||||
|     } |     } | ||||||
| @@ -123,7 +117,7 @@ INLINE uint_fast8_t softfloat_countLeadingZeros16( uint16_t a ) | |||||||
|     return count; |     return count; | ||||||
| } | } | ||||||
| #else | #else | ||||||
| uint_fast8_t softfloat_countLeadingZeros16( uint16_t a ); | uint_fast8_t softfloat_countLeadingZeros16(uint16_t a); | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -133,22 +127,21 @@ uint_fast8_t softfloat_countLeadingZeros16( uint16_t a ); | |||||||
| | 'a'.  If 'a' is zero, 32 is returned. | | 'a'.  If 'a' is zero, 32 is returned. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (3 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (3 <= INLINE_LEVEL) | ||||||
| INLINE uint_fast8_t softfloat_countLeadingZeros32( uint32_t a ) | INLINE uint_fast8_t softfloat_countLeadingZeros32(uint32_t a) { | ||||||
| { |  | ||||||
|     uint_fast8_t count = 0; |     uint_fast8_t count = 0; | ||||||
|     if ( a < 0x10000 ) { |     if(a < 0x10000) { | ||||||
|         count = 16; |         count = 16; | ||||||
|         a <<= 16; |         a <<= 16; | ||||||
|     } |     } | ||||||
|     if ( a < 0x1000000 ) { |     if(a < 0x1000000) { | ||||||
|         count += 8; |         count += 8; | ||||||
|         a <<= 8; |         a <<= 8; | ||||||
|     } |     } | ||||||
|     count += softfloat_countLeadingZeros8[a>>24]; |     count += softfloat_countLeadingZeros8[a >> 24]; | ||||||
|     return count; |     return count; | ||||||
| } | } | ||||||
| #else | #else | ||||||
| uint_fast8_t softfloat_countLeadingZeros32( uint32_t a ); | uint_fast8_t softfloat_countLeadingZeros32(uint32_t a); | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -157,7 +150,7 @@ uint_fast8_t softfloat_countLeadingZeros32( uint32_t a ); | |||||||
| | Returns the number of leading 0 bits before the most-significant 1 bit of | | Returns the number of leading 0 bits before the most-significant 1 bit of | ||||||
| | 'a'.  If 'a' is zero, 64 is returned. | | 'a'.  If 'a' is zero, 64 is returned. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast8_t softfloat_countLeadingZeros64( uint64_t a ); | uint_fast8_t softfloat_countLeadingZeros64(uint64_t a); | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| extern const uint16_t softfloat_approxRecip_1k0s[16]; | extern const uint16_t softfloat_approxRecip_1k0s[16]; | ||||||
| @@ -176,9 +169,9 @@ extern const uint16_t softfloat_approxRecip_1k1s[16]; | |||||||
| | (units in the last place). | | (units in the last place). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #ifdef SOFTFLOAT_FAST_DIV64TO32 | #ifdef SOFTFLOAT_FAST_DIV64TO32 | ||||||
| #define softfloat_approxRecip32_1( a ) ((uint32_t) (UINT64_C( 0x7FFFFFFFFFFFFFFF ) / (uint32_t) (a))) | #define softfloat_approxRecip32_1(a) ((uint32_t)(UINT64_C(0x7FFFFFFFFFFFFFFF) / (uint32_t)(a))) | ||||||
| #else | #else | ||||||
| uint32_t softfloat_approxRecip32_1( uint32_t a ); | uint32_t softfloat_approxRecip32_1(uint32_t a); | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -204,7 +197,7 @@ extern const uint16_t softfloat_approxRecipSqrt_1k1s[16]; | |||||||
| | returned is also always within the range 0.5 to 1; thus, the most- | | returned is also always within the range 0.5 to 1; thus, the most- | ||||||
| | significant bit of the result is always set. | | significant bit of the result is always set. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint32_t softfloat_approxRecipSqrt32_1( unsigned int oddExpA, uint32_t a ); | uint32_t softfloat_approxRecipSqrt32_1(unsigned int oddExpA, uint32_t a); | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
| @@ -222,10 +215,9 @@ uint32_t softfloat_approxRecipSqrt32_1( unsigned int oddExpA, uint32_t a ); | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (1 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (1 <= INLINE_LEVEL) | ||||||
| INLINE | INLINE | ||||||
| bool softfloat_eq128( uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0 ) | bool softfloat_eq128(uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0) { return (a64 == b64) && (a0 == b0); } | ||||||
|     { return (a64 == b64) && (a0 == b0); } |  | ||||||
| #else | #else | ||||||
| bool softfloat_eq128( uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0 ); | bool softfloat_eq128(uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0); | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -237,10 +229,9 @@ bool softfloat_eq128( uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0 ); | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | ||||||
| INLINE | INLINE | ||||||
| bool softfloat_le128( uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0 ) | bool softfloat_le128(uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0) { return (a64 < b64) || ((a64 == b64) && (a0 <= b0)); } | ||||||
|     { return (a64 < b64) || ((a64 == b64) && (a0 <= b0)); } |  | ||||||
| #else | #else | ||||||
| bool softfloat_le128( uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0 ); | bool softfloat_le128(uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0); | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -252,10 +243,9 @@ bool softfloat_le128( uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0 ); | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | ||||||
| INLINE | INLINE | ||||||
| bool softfloat_lt128( uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0 ) | bool softfloat_lt128(uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0) { return (a64 < b64) || ((a64 == b64) && (a0 < b0)); } | ||||||
|     { return (a64 < b64) || ((a64 == b64) && (a0 < b0)); } |  | ||||||
| #else | #else | ||||||
| bool softfloat_lt128( uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0 ); | bool softfloat_lt128(uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0); | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -266,17 +256,14 @@ bool softfloat_lt128( uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0 ); | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | ||||||
| INLINE | INLINE | ||||||
| struct uint128 | struct uint128 softfloat_shortShiftLeft128(uint64_t a64, uint64_t a0, uint_fast8_t dist) { | ||||||
|  softfloat_shortShiftLeft128( uint64_t a64, uint64_t a0, uint_fast8_t dist ) |  | ||||||
| { |  | ||||||
|     struct uint128 z; |     struct uint128 z; | ||||||
|     z.v64 = a64<<dist | a0>>(-dist & 63); |     z.v64 = a64 << dist | a0 >> (-dist & 63); | ||||||
|     z.v0 = a0<<dist; |     z.v0 = a0 << dist; | ||||||
|     return z; |     return z; | ||||||
| } | } | ||||||
| #else | #else | ||||||
| struct uint128 | struct uint128 softfloat_shortShiftLeft128(uint64_t a64, uint64_t a0, uint_fast8_t dist); | ||||||
|  softfloat_shortShiftLeft128( uint64_t a64, uint64_t a0, uint_fast8_t dist ); |  | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -287,17 +274,14 @@ struct uint128 | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | ||||||
| INLINE | INLINE | ||||||
| struct uint128 | struct uint128 softfloat_shortShiftRight128(uint64_t a64, uint64_t a0, uint_fast8_t dist) { | ||||||
|  softfloat_shortShiftRight128( uint64_t a64, uint64_t a0, uint_fast8_t dist ) |  | ||||||
| { |  | ||||||
|     struct uint128 z; |     struct uint128 z; | ||||||
|     z.v64 = a64>>dist; |     z.v64 = a64 >> dist; | ||||||
|     z.v0 = a64<<(-dist & 63) | a0>>dist; |     z.v0 = a64 << (-dist & 63) | a0 >> dist; | ||||||
|     return z; |     return z; | ||||||
| } | } | ||||||
| #else | #else | ||||||
| struct uint128 | struct uint128 softfloat_shortShiftRight128(uint64_t a64, uint64_t a0, uint_fast8_t dist); | ||||||
|  softfloat_shortShiftRight128( uint64_t a64, uint64_t a0, uint_fast8_t dist ); |  | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -308,19 +292,14 @@ struct uint128 | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | ||||||
| INLINE | INLINE | ||||||
| struct uint64_extra | struct uint64_extra softfloat_shortShiftRightJam64Extra(uint64_t a, uint64_t extra, uint_fast8_t dist) { | ||||||
|  softfloat_shortShiftRightJam64Extra( |  | ||||||
|      uint64_t a, uint64_t extra, uint_fast8_t dist ) |  | ||||||
| { |  | ||||||
|     struct uint64_extra z; |     struct uint64_extra z; | ||||||
|     z.v = a>>dist; |     z.v = a >> dist; | ||||||
|     z.extra = a<<(-dist & 63) | (extra != 0); |     z.extra = a << (-dist & 63) | (extra != 0); | ||||||
|     return z; |     return z; | ||||||
| } | } | ||||||
| #else | #else | ||||||
| struct uint64_extra | struct uint64_extra softfloat_shortShiftRightJam64Extra(uint64_t a, uint64_t extra, uint_fast8_t dist); | ||||||
|  softfloat_shortShiftRightJam64Extra( |  | ||||||
|      uint64_t a, uint64_t extra, uint_fast8_t dist ); |  | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -334,22 +313,15 @@ struct uint64_extra | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (3 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (3 <= INLINE_LEVEL) | ||||||
| INLINE | INLINE | ||||||
| struct uint128 | struct uint128 softfloat_shortShiftRightJam128(uint64_t a64, uint64_t a0, uint_fast8_t dist) { | ||||||
|  softfloat_shortShiftRightJam128( |  | ||||||
|      uint64_t a64, uint64_t a0, uint_fast8_t dist ) |  | ||||||
| { |  | ||||||
|     uint_fast8_t negDist = -dist; |     uint_fast8_t negDist = -dist; | ||||||
|     struct uint128 z; |     struct uint128 z; | ||||||
|     z.v64 = a64>>dist; |     z.v64 = a64 >> dist; | ||||||
|     z.v0 = |     z.v0 = a64 << (negDist & 63) | a0 >> dist | ((uint64_t)(a0 << (negDist & 63)) != 0); | ||||||
|         a64<<(negDist & 63) | a0>>dist |  | ||||||
|             | ((uint64_t) (a0<<(negDist & 63)) != 0); |  | ||||||
|     return z; |     return z; | ||||||
| } | } | ||||||
| #else | #else | ||||||
| struct uint128 | struct uint128 softfloat_shortShiftRightJam128(uint64_t a64, uint64_t a0, uint_fast8_t dist); | ||||||
|  softfloat_shortShiftRightJam128( |  | ||||||
|      uint64_t a64, uint64_t a0, uint_fast8_t dist ); |  | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -360,21 +332,16 @@ struct uint128 | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (3 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (3 <= INLINE_LEVEL) | ||||||
| INLINE | INLINE | ||||||
| struct uint128_extra | struct uint128_extra softfloat_shortShiftRightJam128Extra(uint64_t a64, uint64_t a0, uint64_t extra, uint_fast8_t dist) { | ||||||
|  softfloat_shortShiftRightJam128Extra( |  | ||||||
|      uint64_t a64, uint64_t a0, uint64_t extra, uint_fast8_t dist ) |  | ||||||
| { |  | ||||||
|     uint_fast8_t negDist = -dist; |     uint_fast8_t negDist = -dist; | ||||||
|     struct uint128_extra z; |     struct uint128_extra z; | ||||||
|     z.v.v64 = a64>>dist; |     z.v.v64 = a64 >> dist; | ||||||
|     z.v.v0 = a64<<(negDist & 63) | a0>>dist; |     z.v.v0 = a64 << (negDist & 63) | a0 >> dist; | ||||||
|     z.extra = a0<<(negDist & 63) | (extra != 0); |     z.extra = a0 << (negDist & 63) | (extra != 0); | ||||||
|     return z; |     return z; | ||||||
| } | } | ||||||
| #else | #else | ||||||
| struct uint128_extra | struct uint128_extra softfloat_shortShiftRightJam128Extra(uint64_t a64, uint64_t a0, uint64_t extra, uint_fast8_t dist); | ||||||
|  softfloat_shortShiftRightJam128Extra( |  | ||||||
|      uint64_t a64, uint64_t a0, uint64_t extra, uint_fast8_t dist ); |  | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -397,14 +364,11 @@ struct uint128_extra | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (4 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (4 <= INLINE_LEVEL) | ||||||
| INLINE | INLINE | ||||||
| struct uint64_extra | struct uint64_extra softfloat_shiftRightJam64Extra(uint64_t a, uint64_t extra, uint_fast32_t dist) { | ||||||
|  softfloat_shiftRightJam64Extra( |  | ||||||
|      uint64_t a, uint64_t extra, uint_fast32_t dist ) |  | ||||||
| { |  | ||||||
|     struct uint64_extra z; |     struct uint64_extra z; | ||||||
|     if ( dist < 64 ) { |     if(dist < 64) { | ||||||
|         z.v = a>>dist; |         z.v = a >> dist; | ||||||
|         z.extra = a<<(-dist & 63); |         z.extra = a << (-dist & 63); | ||||||
|     } else { |     } else { | ||||||
|         z.v = 0; |         z.v = 0; | ||||||
|         z.extra = (dist == 64) ? a : (a != 0); |         z.extra = (dist == 64) ? a : (a != 0); | ||||||
| @@ -413,9 +377,7 @@ struct uint64_extra | |||||||
|     return z; |     return z; | ||||||
| } | } | ||||||
| #else | #else | ||||||
| struct uint64_extra | struct uint64_extra softfloat_shiftRightJam64Extra(uint64_t a, uint64_t extra, uint_fast32_t dist); | ||||||
|  softfloat_shiftRightJam64Extra( |  | ||||||
|      uint64_t a, uint64_t extra, uint_fast32_t dist ); |  | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -430,8 +392,7 @@ struct uint64_extra | |||||||
| | greater than 128, the result will be either 0 or 1, depending on whether the | | greater than 128, the result will be either 0 or 1, depending on whether the | ||||||
| | original 128 bits are all zeros. | | original 128 bits are all zeros. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 | struct uint128 softfloat_shiftRightJam128(uint64_t a64, uint64_t a0, uint_fast32_t dist); | ||||||
|  softfloat_shiftRightJam128( uint64_t a64, uint64_t a0, uint_fast32_t dist ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shiftRightJam128Extra | #ifndef softfloat_shiftRightJam128Extra | ||||||
| @@ -452,9 +413,7 @@ struct uint128 | |||||||
| | is modified as described above and returned in the 'extra' field of the | | is modified as described above and returned in the 'extra' field of the | ||||||
| | result.) | | result.) | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128_extra | struct uint128_extra softfloat_shiftRightJam128Extra(uint64_t a64, uint64_t a0, uint64_t extra, uint_fast32_t dist); | ||||||
|  softfloat_shiftRightJam128Extra( |  | ||||||
|      uint64_t a64, uint64_t a0, uint64_t extra, uint_fast32_t dist ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shiftRightJam256M | #ifndef softfloat_shiftRightJam256M | ||||||
| @@ -470,9 +429,7 @@ struct uint128_extra | |||||||
| | is greater than 256, the stored result will be either 0 or 1, depending on | | is greater than 256, the stored result will be either 0 or 1, depending on | ||||||
| | whether the original 256 bits are all zeros. | | whether the original 256 bits are all zeros. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_shiftRightJam256M(const uint64_t* aPtr, uint_fast32_t dist, uint64_t* zPtr); | ||||||
|  softfloat_shiftRightJam256M( |  | ||||||
|      const uint64_t *aPtr, uint_fast32_t dist, uint64_t *zPtr ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_add128 | #ifndef softfloat_add128 | ||||||
| @@ -483,17 +440,14 @@ void | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | ||||||
| INLINE | INLINE | ||||||
| struct uint128 | struct uint128 softfloat_add128(uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0) { | ||||||
|  softfloat_add128( uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0 ) |  | ||||||
| { |  | ||||||
|     struct uint128 z; |     struct uint128 z; | ||||||
|     z.v0 = a0 + b0; |     z.v0 = a0 + b0; | ||||||
|     z.v64 = a64 + b64 + (z.v0 < a0); |     z.v64 = a64 + b64 + (z.v0 < a0); | ||||||
|     return z; |     return z; | ||||||
| } | } | ||||||
| #else | #else | ||||||
| struct uint128 | struct uint128 softfloat_add128(uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0); | ||||||
|  softfloat_add128( uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0 ); |  | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -505,9 +459,7 @@ struct uint128 | |||||||
| | an array of four 64-bit elements that concatenate in the platform's normal | | an array of four 64-bit elements that concatenate in the platform's normal | ||||||
| | endian order to form a 256-bit integer. | | endian order to form a 256-bit integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_add256M(const uint64_t* aPtr, const uint64_t* bPtr, uint64_t* zPtr); | ||||||
|  softfloat_add256M( |  | ||||||
|      const uint64_t *aPtr, const uint64_t *bPtr, uint64_t *zPtr ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_sub128 | #ifndef softfloat_sub128 | ||||||
| @@ -518,9 +470,7 @@ void | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | ||||||
| INLINE | INLINE | ||||||
| struct uint128 | struct uint128 softfloat_sub128(uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0) { | ||||||
|  softfloat_sub128( uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0 ) |  | ||||||
| { |  | ||||||
|     struct uint128 z; |     struct uint128 z; | ||||||
|     z.v0 = a0 - b0; |     z.v0 = a0 - b0; | ||||||
|     z.v64 = a64 - b64; |     z.v64 = a64 - b64; | ||||||
| @@ -528,8 +478,7 @@ struct uint128 | |||||||
|     return z; |     return z; | ||||||
| } | } | ||||||
| #else | #else | ||||||
| struct uint128 | struct uint128 softfloat_sub128(uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0); | ||||||
|  softfloat_sub128( uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0 ); |  | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -542,9 +491,7 @@ struct uint128 | |||||||
| | 64-bit elements that concatenate in the platform's normal endian order to | | 64-bit elements that concatenate in the platform's normal endian order to | ||||||
| | form a 256-bit integer. | | form a 256-bit integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_sub256M(const uint64_t* aPtr, const uint64_t* bPtr, uint64_t* zPtr); | ||||||
|  softfloat_sub256M( |  | ||||||
|      const uint64_t *aPtr, const uint64_t *bPtr, uint64_t *zPtr ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_mul64ByShifted32To128 | #ifndef softfloat_mul64ByShifted32To128 | ||||||
| @@ -552,17 +499,16 @@ void | |||||||
| | Returns the 128-bit product of 'a', 'b', and 2^32. | | Returns the 128-bit product of 'a', 'b', and 2^32. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (3 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (3 <= INLINE_LEVEL) | ||||||
| INLINE struct uint128 softfloat_mul64ByShifted32To128( uint64_t a, uint32_t b ) | INLINE struct uint128 softfloat_mul64ByShifted32To128(uint64_t a, uint32_t b) { | ||||||
| { |  | ||||||
|     uint_fast64_t mid; |     uint_fast64_t mid; | ||||||
|     struct uint128 z; |     struct uint128 z; | ||||||
|     mid = (uint_fast64_t) (uint32_t) a * b; |     mid = (uint_fast64_t)(uint32_t)a * b; | ||||||
|     z.v0 = mid<<32; |     z.v0 = mid << 32; | ||||||
|     z.v64 = (uint_fast64_t) (uint32_t) (a>>32) * b + (mid>>32); |     z.v64 = (uint_fast64_t)(uint32_t)(a >> 32) * b + (mid >> 32); | ||||||
|     return z; |     return z; | ||||||
| } | } | ||||||
| #else | #else | ||||||
| struct uint128 softfloat_mul64ByShifted32To128( uint64_t a, uint32_t b ); | struct uint128 softfloat_mul64ByShifted32To128(uint64_t a, uint32_t b); | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -570,7 +516,7 @@ struct uint128 softfloat_mul64ByShifted32To128( uint64_t a, uint32_t b ); | |||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Returns the 128-bit product of 'a' and 'b'. | | Returns the 128-bit product of 'a' and 'b'. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| struct uint128 softfloat_mul64To128( uint64_t a, uint64_t b ); | struct uint128 softfloat_mul64To128(uint64_t a, uint64_t b); | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_mul128By32 | #ifndef softfloat_mul128By32 | ||||||
| @@ -581,19 +527,18 @@ struct uint128 softfloat_mul64To128( uint64_t a, uint64_t b ); | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (4 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (4 <= INLINE_LEVEL) | ||||||
| INLINE | INLINE | ||||||
| struct uint128 softfloat_mul128By32( uint64_t a64, uint64_t a0, uint32_t b ) | struct uint128 softfloat_mul128By32(uint64_t a64, uint64_t a0, uint32_t b) { | ||||||
| { |  | ||||||
|     struct uint128 z; |     struct uint128 z; | ||||||
|     uint_fast64_t mid; |     uint_fast64_t mid; | ||||||
|     uint_fast32_t carry; |     uint_fast32_t carry; | ||||||
|     z.v0 = a0 * b; |     z.v0 = a0 * b; | ||||||
|     mid = (uint_fast64_t) (uint32_t) (a0>>32) * b; |     mid = (uint_fast64_t)(uint32_t)(a0 >> 32) * b; | ||||||
|     carry = (uint32_t) ((uint_fast32_t) (z.v0>>32) - (uint_fast32_t) mid); |     carry = (uint32_t)((uint_fast32_t)(z.v0 >> 32) - (uint_fast32_t)mid); | ||||||
|     z.v64 = a64 * b + (uint_fast32_t) ((mid + carry)>>32); |     z.v64 = a64 * b + (uint_fast32_t)((mid + carry) >> 32); | ||||||
|     return z; |     return z; | ||||||
| } | } | ||||||
| #else | #else | ||||||
| struct uint128 softfloat_mul128By32( uint64_t a64, uint64_t a0, uint32_t b ); | struct uint128 softfloat_mul128By32(uint64_t a64, uint64_t a0, uint32_t b); | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -605,9 +550,7 @@ struct uint128 softfloat_mul128By32( uint64_t a64, uint64_t a0, uint32_t b ); | |||||||
| | Argument 'zPtr' points to an array of four 64-bit elements that concatenate | | Argument 'zPtr' points to an array of four 64-bit elements that concatenate | ||||||
| | in the platform's normal endian order to form a 256-bit integer. | | in the platform's normal endian order to form a 256-bit integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_mul128To256M(uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0, uint64_t* zPtr); | ||||||
|  softfloat_mul128To256M( |  | ||||||
|      uint64_t a64, uint64_t a0, uint64_t b64, uint64_t b0, uint64_t *zPtr ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #else | #else | ||||||
| @@ -626,7 +569,7 @@ void | |||||||
| | Each of 'aPtr' and 'bPtr' points to an array of three 32-bit elements that | | Each of 'aPtr' and 'bPtr' points to an array of three 32-bit elements that | ||||||
| | concatenate in the platform's normal endian order to form a 96-bit integer. | | concatenate in the platform's normal endian order to form a 96-bit integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| int_fast8_t softfloat_compare96M( const uint32_t *aPtr, const uint32_t *bPtr ); | int_fast8_t softfloat_compare96M(const uint32_t* aPtr, const uint32_t* bPtr); | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_compare128M | #ifndef softfloat_compare128M | ||||||
| @@ -638,8 +581,7 @@ int_fast8_t softfloat_compare96M( const uint32_t *aPtr, const uint32_t *bPtr ); | |||||||
| | Each of 'aPtr' and 'bPtr' points to an array of four 32-bit elements that | | Each of 'aPtr' and 'bPtr' points to an array of four 32-bit elements that | ||||||
| | concatenate in the platform's normal endian order to form a 128-bit integer. | | concatenate in the platform's normal endian order to form a 128-bit integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| int_fast8_t | int_fast8_t softfloat_compare128M(const uint32_t* aPtr, const uint32_t* bPtr); | ||||||
|  softfloat_compare128M( const uint32_t *aPtr, const uint32_t *bPtr ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shortShiftLeft64To96M | #ifndef softfloat_shortShiftLeft64To96M | ||||||
| @@ -652,19 +594,14 @@ int_fast8_t | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | #if defined INLINE_LEVEL && (2 <= INLINE_LEVEL) | ||||||
| INLINE | INLINE | ||||||
| void | void softfloat_shortShiftLeft64To96M(uint64_t a, uint_fast8_t dist, uint32_t* zPtr) { | ||||||
|  softfloat_shortShiftLeft64To96M( |     zPtr[indexWord(3, 0)] = (uint32_t)a << dist; | ||||||
|      uint64_t a, uint_fast8_t dist, uint32_t *zPtr ) |  | ||||||
| { |  | ||||||
|     zPtr[indexWord( 3, 0 )] = (uint32_t) a<<dist; |  | ||||||
|     a >>= 32 - dist; |     a >>= 32 - dist; | ||||||
|     zPtr[indexWord( 3, 2 )] = a>>32; |     zPtr[indexWord(3, 2)] = a >> 32; | ||||||
|     zPtr[indexWord( 3, 1 )] = a; |     zPtr[indexWord(3, 1)] = a; | ||||||
| } | } | ||||||
| #else | #else | ||||||
| void | void softfloat_shortShiftLeft64To96M(uint64_t a, uint_fast8_t dist, uint32_t* zPtr); | ||||||
|  softfloat_shortShiftLeft64To96M( |  | ||||||
|      uint64_t a, uint_fast8_t dist, uint32_t *zPtr ); |  | ||||||
| #endif | #endif | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| @@ -678,13 +615,7 @@ void | |||||||
| | that concatenate in the platform's normal endian order to form an N-bit | | that concatenate in the platform's normal endian order to form an N-bit | ||||||
| | integer. | | integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_shortShiftLeftM(uint_fast8_t size_words, const uint32_t* aPtr, uint_fast8_t dist, uint32_t* zPtr); | ||||||
|  softfloat_shortShiftLeftM( |  | ||||||
|      uint_fast8_t size_words, |  | ||||||
|      const uint32_t *aPtr, |  | ||||||
|      uint_fast8_t dist, |  | ||||||
|      uint32_t *zPtr |  | ||||||
|  ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shortShiftLeft96M | #ifndef softfloat_shortShiftLeft96M | ||||||
| @@ -692,7 +623,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_shortShiftLeftM' with | | This function or macro is the same as 'softfloat_shortShiftLeftM' with | ||||||
| | 'size_words' = 3 (N = 96). | | 'size_words' = 3 (N = 96). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_shortShiftLeft96M( aPtr, dist, zPtr ) softfloat_shortShiftLeftM( 3, aPtr, dist, zPtr ) | #define softfloat_shortShiftLeft96M(aPtr, dist, zPtr) softfloat_shortShiftLeftM(3, aPtr, dist, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shortShiftLeft128M | #ifndef softfloat_shortShiftLeft128M | ||||||
| @@ -700,7 +631,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_shortShiftLeftM' with | | This function or macro is the same as 'softfloat_shortShiftLeftM' with | ||||||
| | 'size_words' = 4 (N = 128). | | 'size_words' = 4 (N = 128). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_shortShiftLeft128M( aPtr, dist, zPtr ) softfloat_shortShiftLeftM( 4, aPtr, dist, zPtr ) | #define softfloat_shortShiftLeft128M(aPtr, dist, zPtr) softfloat_shortShiftLeftM(4, aPtr, dist, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shortShiftLeft160M | #ifndef softfloat_shortShiftLeft160M | ||||||
| @@ -708,7 +639,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_shortShiftLeftM' with | | This function or macro is the same as 'softfloat_shortShiftLeftM' with | ||||||
| | 'size_words' = 5 (N = 160). | | 'size_words' = 5 (N = 160). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_shortShiftLeft160M( aPtr, dist, zPtr ) softfloat_shortShiftLeftM( 5, aPtr, dist, zPtr ) | #define softfloat_shortShiftLeft160M(aPtr, dist, zPtr) softfloat_shortShiftLeftM(5, aPtr, dist, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shiftLeftM | #ifndef softfloat_shiftLeftM | ||||||
| @@ -722,13 +653,7 @@ void | |||||||
| |   The value of 'dist' can be arbitrarily large.  In particular, if 'dist' is | |   The value of 'dist' can be arbitrarily large.  In particular, if 'dist' is | ||||||
| | greater than N, the stored result will be 0. | | greater than N, the stored result will be 0. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_shiftLeftM(uint_fast8_t size_words, const uint32_t* aPtr, uint32_t dist, uint32_t* zPtr); | ||||||
|  softfloat_shiftLeftM( |  | ||||||
|      uint_fast8_t size_words, |  | ||||||
|      const uint32_t *aPtr, |  | ||||||
|      uint32_t dist, |  | ||||||
|      uint32_t *zPtr |  | ||||||
|  ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shiftLeft96M | #ifndef softfloat_shiftLeft96M | ||||||
| @@ -736,7 +661,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_shiftLeftM' with | | This function or macro is the same as 'softfloat_shiftLeftM' with | ||||||
| | 'size_words' = 3 (N = 96). | | 'size_words' = 3 (N = 96). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_shiftLeft96M( aPtr, dist, zPtr ) softfloat_shiftLeftM( 3, aPtr, dist, zPtr ) | #define softfloat_shiftLeft96M(aPtr, dist, zPtr) softfloat_shiftLeftM(3, aPtr, dist, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shiftLeft128M | #ifndef softfloat_shiftLeft128M | ||||||
| @@ -744,7 +669,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_shiftLeftM' with | | This function or macro is the same as 'softfloat_shiftLeftM' with | ||||||
| | 'size_words' = 4 (N = 128). | | 'size_words' = 4 (N = 128). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_shiftLeft128M( aPtr, dist, zPtr ) softfloat_shiftLeftM( 4, aPtr, dist, zPtr ) | #define softfloat_shiftLeft128M(aPtr, dist, zPtr) softfloat_shiftLeftM(4, aPtr, dist, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shiftLeft160M | #ifndef softfloat_shiftLeft160M | ||||||
| @@ -752,7 +677,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_shiftLeftM' with | | This function or macro is the same as 'softfloat_shiftLeftM' with | ||||||
| | 'size_words' = 5 (N = 160). | | 'size_words' = 5 (N = 160). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_shiftLeft160M( aPtr, dist, zPtr ) softfloat_shiftLeftM( 5, aPtr, dist, zPtr ) | #define softfloat_shiftLeft160M(aPtr, dist, zPtr) softfloat_shiftLeftM(5, aPtr, dist, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shortShiftRightM | #ifndef softfloat_shortShiftRightM | ||||||
| @@ -765,13 +690,7 @@ void | |||||||
| | that concatenate in the platform's normal endian order to form an N-bit | | that concatenate in the platform's normal endian order to form an N-bit | ||||||
| | integer. | | integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_shortShiftRightM(uint_fast8_t size_words, const uint32_t* aPtr, uint_fast8_t dist, uint32_t* zPtr); | ||||||
|  softfloat_shortShiftRightM( |  | ||||||
|      uint_fast8_t size_words, |  | ||||||
|      const uint32_t *aPtr, |  | ||||||
|      uint_fast8_t dist, |  | ||||||
|      uint32_t *zPtr |  | ||||||
|  ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shortShiftRight128M | #ifndef softfloat_shortShiftRight128M | ||||||
| @@ -779,7 +698,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_shortShiftRightM' with | | This function or macro is the same as 'softfloat_shortShiftRightM' with | ||||||
| | 'size_words' = 4 (N = 128). | | 'size_words' = 4 (N = 128). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_shortShiftRight128M( aPtr, dist, zPtr ) softfloat_shortShiftRightM( 4, aPtr, dist, zPtr ) | #define softfloat_shortShiftRight128M(aPtr, dist, zPtr) softfloat_shortShiftRightM(4, aPtr, dist, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shortShiftRight160M | #ifndef softfloat_shortShiftRight160M | ||||||
| @@ -787,7 +706,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_shortShiftRightM' with | | This function or macro is the same as 'softfloat_shortShiftRightM' with | ||||||
| | 'size_words' = 5 (N = 160). | | 'size_words' = 5 (N = 160). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_shortShiftRight160M( aPtr, dist, zPtr ) softfloat_shortShiftRightM( 5, aPtr, dist, zPtr ) | #define softfloat_shortShiftRight160M(aPtr, dist, zPtr) softfloat_shortShiftRightM(5, aPtr, dist, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shortShiftRightJamM | #ifndef softfloat_shortShiftRightJamM | ||||||
| @@ -801,9 +720,7 @@ void | |||||||
| | to a 'size_words'-long array of 32-bit elements that concatenate in the | | to a 'size_words'-long array of 32-bit elements that concatenate in the | ||||||
| | platform's normal endian order to form an N-bit integer. | | platform's normal endian order to form an N-bit integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_shortShiftRightJamM(uint_fast8_t, const uint32_t*, uint_fast8_t, uint32_t*); | ||||||
|  softfloat_shortShiftRightJamM( |  | ||||||
|      uint_fast8_t, const uint32_t *, uint_fast8_t, uint32_t * ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shortShiftRightJam160M | #ifndef softfloat_shortShiftRightJam160M | ||||||
| @@ -811,7 +728,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_shortShiftRightJamM' with | | This function or macro is the same as 'softfloat_shortShiftRightJamM' with | ||||||
| | 'size_words' = 5 (N = 160). | | 'size_words' = 5 (N = 160). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_shortShiftRightJam160M( aPtr, dist, zPtr ) softfloat_shortShiftRightJamM( 5, aPtr, dist, zPtr ) | #define softfloat_shortShiftRightJam160M(aPtr, dist, zPtr) softfloat_shortShiftRightJamM(5, aPtr, dist, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shiftRightM | #ifndef softfloat_shiftRightM | ||||||
| @@ -825,13 +742,7 @@ void | |||||||
| |   The value of 'dist' can be arbitrarily large.  In particular, if 'dist' is | |   The value of 'dist' can be arbitrarily large.  In particular, if 'dist' is | ||||||
| | greater than N, the stored result will be 0. | | greater than N, the stored result will be 0. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_shiftRightM(uint_fast8_t size_words, const uint32_t* aPtr, uint32_t dist, uint32_t* zPtr); | ||||||
|  softfloat_shiftRightM( |  | ||||||
|      uint_fast8_t size_words, |  | ||||||
|      const uint32_t *aPtr, |  | ||||||
|      uint32_t dist, |  | ||||||
|      uint32_t *zPtr |  | ||||||
|  ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shiftRight96M | #ifndef softfloat_shiftRight96M | ||||||
| @@ -839,7 +750,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_shiftRightM' with | | This function or macro is the same as 'softfloat_shiftRightM' with | ||||||
| | 'size_words' = 3 (N = 96). | | 'size_words' = 3 (N = 96). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_shiftRight96M( aPtr, dist, zPtr ) softfloat_shiftRightM( 3, aPtr, dist, zPtr ) | #define softfloat_shiftRight96M(aPtr, dist, zPtr) softfloat_shiftRightM(3, aPtr, dist, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shiftRightJamM | #ifndef softfloat_shiftRightJamM | ||||||
| @@ -856,13 +767,7 @@ void | |||||||
| | is greater than N, the stored result will be either 0 or 1, depending on | | is greater than N, the stored result will be either 0 or 1, depending on | ||||||
| | whether the original N bits are all zeros. | | whether the original N bits are all zeros. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_shiftRightJamM(uint_fast8_t size_words, const uint32_t* aPtr, uint32_t dist, uint32_t* zPtr); | ||||||
|  softfloat_shiftRightJamM( |  | ||||||
|      uint_fast8_t size_words, |  | ||||||
|      const uint32_t *aPtr, |  | ||||||
|      uint32_t dist, |  | ||||||
|      uint32_t *zPtr |  | ||||||
|  ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shiftRightJam96M | #ifndef softfloat_shiftRightJam96M | ||||||
| @@ -870,7 +775,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_shiftRightJamM' with | | This function or macro is the same as 'softfloat_shiftRightJamM' with | ||||||
| | 'size_words' = 3 (N = 96). | | 'size_words' = 3 (N = 96). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_shiftRightJam96M( aPtr, dist, zPtr ) softfloat_shiftRightJamM( 3, aPtr, dist, zPtr ) | #define softfloat_shiftRightJam96M(aPtr, dist, zPtr) softfloat_shiftRightJamM(3, aPtr, dist, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shiftRightJam128M | #ifndef softfloat_shiftRightJam128M | ||||||
| @@ -878,7 +783,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_shiftRightJamM' with | | This function or macro is the same as 'softfloat_shiftRightJamM' with | ||||||
| | 'size_words' = 4 (N = 128). | | 'size_words' = 4 (N = 128). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_shiftRightJam128M( aPtr, dist, zPtr ) softfloat_shiftRightJamM( 4, aPtr, dist, zPtr ) | #define softfloat_shiftRightJam128M(aPtr, dist, zPtr) softfloat_shiftRightJamM(4, aPtr, dist, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_shiftRightJam160M | #ifndef softfloat_shiftRightJam160M | ||||||
| @@ -886,7 +791,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_shiftRightJamM' with | | This function or macro is the same as 'softfloat_shiftRightJamM' with | ||||||
| | 'size_words' = 5 (N = 160). | | 'size_words' = 5 (N = 160). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_shiftRightJam160M( aPtr, dist, zPtr ) softfloat_shiftRightJamM( 5, aPtr, dist, zPtr ) | #define softfloat_shiftRightJam160M(aPtr, dist, zPtr) softfloat_shiftRightJamM(5, aPtr, dist, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_addM | #ifndef softfloat_addM | ||||||
| @@ -898,13 +803,7 @@ void | |||||||
| | elements that concatenate in the platform's normal endian order to form an | | elements that concatenate in the platform's normal endian order to form an | ||||||
| | N-bit integer. | | N-bit integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_addM(uint_fast8_t size_words, const uint32_t* aPtr, const uint32_t* bPtr, uint32_t* zPtr); | ||||||
|  softfloat_addM( |  | ||||||
|      uint_fast8_t size_words, |  | ||||||
|      const uint32_t *aPtr, |  | ||||||
|      const uint32_t *bPtr, |  | ||||||
|      uint32_t *zPtr |  | ||||||
|  ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_add96M | #ifndef softfloat_add96M | ||||||
| @@ -912,7 +811,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_addM' with 'size_words' | | This function or macro is the same as 'softfloat_addM' with 'size_words' | ||||||
| | = 3 (N = 96). | | = 3 (N = 96). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_add96M( aPtr, bPtr, zPtr ) softfloat_addM( 3, aPtr, bPtr, zPtr ) | #define softfloat_add96M(aPtr, bPtr, zPtr) softfloat_addM(3, aPtr, bPtr, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_add128M | #ifndef softfloat_add128M | ||||||
| @@ -920,7 +819,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_addM' with 'size_words' | | This function or macro is the same as 'softfloat_addM' with 'size_words' | ||||||
| | = 4 (N = 128). | | = 4 (N = 128). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_add128M( aPtr, bPtr, zPtr ) softfloat_addM( 4, aPtr, bPtr, zPtr ) | #define softfloat_add128M(aPtr, bPtr, zPtr) softfloat_addM(4, aPtr, bPtr, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_add160M | #ifndef softfloat_add160M | ||||||
| @@ -928,7 +827,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_addM' with 'size_words' | | This function or macro is the same as 'softfloat_addM' with 'size_words' | ||||||
| | = 5 (N = 160). | | = 5 (N = 160). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_add160M( aPtr, bPtr, zPtr ) softfloat_addM( 5, aPtr, bPtr, zPtr ) | #define softfloat_add160M(aPtr, bPtr, zPtr) softfloat_addM(5, aPtr, bPtr, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_addCarryM | #ifndef softfloat_addCarryM | ||||||
| @@ -940,14 +839,7 @@ void | |||||||
| | points to a 'size_words'-long array of 32-bit elements that concatenate in | | points to a 'size_words'-long array of 32-bit elements that concatenate in | ||||||
| | the platform's normal endian order to form an N-bit integer. | | the platform's normal endian order to form an N-bit integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast8_t | uint_fast8_t softfloat_addCarryM(uint_fast8_t size_words, const uint32_t* aPtr, const uint32_t* bPtr, uint_fast8_t carry, uint32_t* zPtr); | ||||||
|  softfloat_addCarryM( |  | ||||||
|      uint_fast8_t size_words, |  | ||||||
|      const uint32_t *aPtr, |  | ||||||
|      const uint32_t *bPtr, |  | ||||||
|      uint_fast8_t carry, |  | ||||||
|      uint32_t *zPtr |  | ||||||
|  ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_addComplCarryM | #ifndef softfloat_addComplCarryM | ||||||
| @@ -956,14 +848,8 @@ uint_fast8_t | |||||||
| | the value of the unsigned integer pointed to by 'bPtr' is bit-wise completed | | the value of the unsigned integer pointed to by 'bPtr' is bit-wise completed | ||||||
| | before the addition. | | before the addition. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast8_t | uint_fast8_t softfloat_addComplCarryM(uint_fast8_t size_words, const uint32_t* aPtr, const uint32_t* bPtr, uint_fast8_t carry, | ||||||
|  softfloat_addComplCarryM( |                                       uint32_t* zPtr); | ||||||
|      uint_fast8_t size_words, |  | ||||||
|      const uint32_t *aPtr, |  | ||||||
|      const uint32_t *bPtr, |  | ||||||
|      uint_fast8_t carry, |  | ||||||
|      uint32_t *zPtr |  | ||||||
|  ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_addComplCarry96M | #ifndef softfloat_addComplCarry96M | ||||||
| @@ -971,7 +857,7 @@ uint_fast8_t | |||||||
| | This function or macro is the same as 'softfloat_addComplCarryM' with | | This function or macro is the same as 'softfloat_addComplCarryM' with | ||||||
| | 'size_words' = 3 (N = 96). | | 'size_words' = 3 (N = 96). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_addComplCarry96M( aPtr, bPtr, carry, zPtr ) softfloat_addComplCarryM( 3, aPtr, bPtr, carry, zPtr ) | #define softfloat_addComplCarry96M(aPtr, bPtr, carry, zPtr) softfloat_addComplCarryM(3, aPtr, bPtr, carry, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_negXM | #ifndef softfloat_negXM | ||||||
| @@ -981,7 +867,7 @@ uint_fast8_t | |||||||
| | points to a 'size_words'-long array of 32-bit elements that concatenate in | | points to a 'size_words'-long array of 32-bit elements that concatenate in | ||||||
| | the platform's normal endian order to form an N-bit integer. | | the platform's normal endian order to form an N-bit integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void softfloat_negXM( uint_fast8_t size_words, uint32_t *zPtr ); | void softfloat_negXM(uint_fast8_t size_words, uint32_t* zPtr); | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_negX96M | #ifndef softfloat_negX96M | ||||||
| @@ -989,7 +875,7 @@ void softfloat_negXM( uint_fast8_t size_words, uint32_t *zPtr ); | |||||||
| | This function or macro is the same as 'softfloat_negXM' with 'size_words' | | This function or macro is the same as 'softfloat_negXM' with 'size_words' | ||||||
| | = 3 (N = 96). | | = 3 (N = 96). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_negX96M( zPtr ) softfloat_negXM( 3, zPtr ) | #define softfloat_negX96M(zPtr) softfloat_negXM(3, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_negX128M | #ifndef softfloat_negX128M | ||||||
| @@ -997,7 +883,7 @@ void softfloat_negXM( uint_fast8_t size_words, uint32_t *zPtr ); | |||||||
| | This function or macro is the same as 'softfloat_negXM' with 'size_words' | | This function or macro is the same as 'softfloat_negXM' with 'size_words' | ||||||
| | = 4 (N = 128). | | = 4 (N = 128). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_negX128M( zPtr ) softfloat_negXM( 4, zPtr ) | #define softfloat_negX128M(zPtr) softfloat_negXM(4, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_negX160M | #ifndef softfloat_negX160M | ||||||
| @@ -1005,7 +891,7 @@ void softfloat_negXM( uint_fast8_t size_words, uint32_t *zPtr ); | |||||||
| | This function or macro is the same as 'softfloat_negXM' with 'size_words' | | This function or macro is the same as 'softfloat_negXM' with 'size_words' | ||||||
| | = 5 (N = 160). | | = 5 (N = 160). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_negX160M( zPtr ) softfloat_negXM( 5, zPtr ) | #define softfloat_negX160M(zPtr) softfloat_negXM(5, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_negX256M | #ifndef softfloat_negX256M | ||||||
| @@ -1013,7 +899,7 @@ void softfloat_negXM( uint_fast8_t size_words, uint32_t *zPtr ); | |||||||
| | This function or macro is the same as 'softfloat_negXM' with 'size_words' | | This function or macro is the same as 'softfloat_negXM' with 'size_words' | ||||||
| | = 8 (N = 256). | | = 8 (N = 256). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_negX256M( zPtr ) softfloat_negXM( 8, zPtr ) | #define softfloat_negX256M(zPtr) softfloat_negXM(8, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_sub1XM | #ifndef softfloat_sub1XM | ||||||
| @@ -1024,7 +910,7 @@ void softfloat_negXM( uint_fast8_t size_words, uint32_t *zPtr ); | |||||||
| | elements that concatenate in the platform's normal endian order to form an | | elements that concatenate in the platform's normal endian order to form an | ||||||
| | N-bit integer. | | N-bit integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void softfloat_sub1XM( uint_fast8_t size_words, uint32_t *zPtr ); | void softfloat_sub1XM(uint_fast8_t size_words, uint32_t* zPtr); | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_sub1X96M | #ifndef softfloat_sub1X96M | ||||||
| @@ -1032,7 +918,7 @@ void softfloat_sub1XM( uint_fast8_t size_words, uint32_t *zPtr ); | |||||||
| | This function or macro is the same as 'softfloat_sub1XM' with 'size_words' | | This function or macro is the same as 'softfloat_sub1XM' with 'size_words' | ||||||
| | = 3 (N = 96). | | = 3 (N = 96). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_sub1X96M( zPtr ) softfloat_sub1XM( 3, zPtr ) | #define softfloat_sub1X96M(zPtr) softfloat_sub1XM(3, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_sub1X160M | #ifndef softfloat_sub1X160M | ||||||
| @@ -1040,7 +926,7 @@ void softfloat_sub1XM( uint_fast8_t size_words, uint32_t *zPtr ); | |||||||
| | This function or macro is the same as 'softfloat_sub1XM' with 'size_words' | | This function or macro is the same as 'softfloat_sub1XM' with 'size_words' | ||||||
| | = 5 (N = 160). | | = 5 (N = 160). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_sub1X160M( zPtr ) softfloat_sub1XM( 5, zPtr ) | #define softfloat_sub1X160M(zPtr) softfloat_sub1XM(5, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_subM | #ifndef softfloat_subM | ||||||
| @@ -1052,13 +938,7 @@ void softfloat_sub1XM( uint_fast8_t size_words, uint32_t *zPtr ); | |||||||
| | array of 32-bit elements that concatenate in the platform's normal endian | | array of 32-bit elements that concatenate in the platform's normal endian | ||||||
| | order to form an N-bit integer. | | order to form an N-bit integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_subM(uint_fast8_t size_words, const uint32_t* aPtr, const uint32_t* bPtr, uint32_t* zPtr); | ||||||
|  softfloat_subM( |  | ||||||
|      uint_fast8_t size_words, |  | ||||||
|      const uint32_t *aPtr, |  | ||||||
|      const uint32_t *bPtr, |  | ||||||
|      uint32_t *zPtr |  | ||||||
|  ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_sub96M | #ifndef softfloat_sub96M | ||||||
| @@ -1066,7 +946,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_subM' with 'size_words' | | This function or macro is the same as 'softfloat_subM' with 'size_words' | ||||||
| | = 3 (N = 96). | | = 3 (N = 96). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_sub96M( aPtr, bPtr, zPtr ) softfloat_subM( 3, aPtr, bPtr, zPtr ) | #define softfloat_sub96M(aPtr, bPtr, zPtr) softfloat_subM(3, aPtr, bPtr, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_sub128M | #ifndef softfloat_sub128M | ||||||
| @@ -1074,7 +954,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_subM' with 'size_words' | | This function or macro is the same as 'softfloat_subM' with 'size_words' | ||||||
| | = 4 (N = 128). | | = 4 (N = 128). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_sub128M( aPtr, bPtr, zPtr ) softfloat_subM( 4, aPtr, bPtr, zPtr ) | #define softfloat_sub128M(aPtr, bPtr, zPtr) softfloat_subM(4, aPtr, bPtr, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_sub160M | #ifndef softfloat_sub160M | ||||||
| @@ -1082,7 +962,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_subM' with 'size_words' | | This function or macro is the same as 'softfloat_subM' with 'size_words' | ||||||
| | = 5 (N = 160). | | = 5 (N = 160). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_sub160M( aPtr, bPtr, zPtr ) softfloat_subM( 5, aPtr, bPtr, zPtr ) | #define softfloat_sub160M(aPtr, bPtr, zPtr) softfloat_subM(5, aPtr, bPtr, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_mul64To128M | #ifndef softfloat_mul64To128M | ||||||
| @@ -1092,7 +972,7 @@ void | |||||||
| | elements that concatenate in the platform's normal endian order to form a | | elements that concatenate in the platform's normal endian order to form a | ||||||
| | 128-bit integer. | | 128-bit integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void softfloat_mul64To128M( uint64_t a, uint64_t b, uint32_t *zPtr ); | void softfloat_mul64To128M(uint64_t a, uint64_t b, uint32_t* zPtr); | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_mul128MTo256M | #ifndef softfloat_mul128MTo256M | ||||||
| @@ -1104,9 +984,7 @@ void softfloat_mul64To128M( uint64_t a, uint64_t b, uint32_t *zPtr ); | |||||||
| | Argument 'zPtr' points to an array of eight 32-bit elements that concatenate | | Argument 'zPtr' points to an array of eight 32-bit elements that concatenate | ||||||
| | to form a 256-bit integer. | | to form a 256-bit integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_mul128MTo256M(const uint32_t* aPtr, const uint32_t* bPtr, uint32_t* zPtr); | ||||||
|  softfloat_mul128MTo256M( |  | ||||||
|      const uint32_t *aPtr, const uint32_t *bPtr, uint32_t *zPtr ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_remStepMBy32 | #ifndef softfloat_remStepMBy32 | ||||||
| @@ -1119,15 +997,8 @@ void | |||||||
| | to a 'size_words'-long array of 32-bit elements that concatenate in the | | to a 'size_words'-long array of 32-bit elements that concatenate in the | ||||||
| | platform's normal endian order to form an N-bit integer. | | platform's normal endian order to form an N-bit integer. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void | void softfloat_remStepMBy32(uint_fast8_t size_words, const uint32_t* remPtr, uint_fast8_t dist, const uint32_t* bPtr, uint32_t q, | ||||||
|  softfloat_remStepMBy32( |                             uint32_t* zPtr); | ||||||
|      uint_fast8_t size_words, |  | ||||||
|      const uint32_t *remPtr, |  | ||||||
|      uint_fast8_t dist, |  | ||||||
|      const uint32_t *bPtr, |  | ||||||
|      uint32_t q, |  | ||||||
|      uint32_t *zPtr |  | ||||||
|  ); |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_remStep96MBy32 | #ifndef softfloat_remStep96MBy32 | ||||||
| @@ -1135,7 +1006,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_remStepMBy32' with | | This function or macro is the same as 'softfloat_remStepMBy32' with | ||||||
| | 'size_words' = 3 (N = 96). | | 'size_words' = 3 (N = 96). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_remStep96MBy32( remPtr, dist, bPtr, q, zPtr ) softfloat_remStepMBy32( 3, remPtr, dist, bPtr, q, zPtr ) | #define softfloat_remStep96MBy32(remPtr, dist, bPtr, q, zPtr) softfloat_remStepMBy32(3, remPtr, dist, bPtr, q, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_remStep128MBy32 | #ifndef softfloat_remStep128MBy32 | ||||||
| @@ -1143,7 +1014,7 @@ void | |||||||
| | This function or macro is the same as 'softfloat_remStepMBy32' with | | This function or macro is the same as 'softfloat_remStepMBy32' with | ||||||
| | 'size_words' = 4 (N = 128). | | 'size_words' = 4 (N = 128). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_remStep128MBy32( remPtr, dist, bPtr, q, zPtr ) softfloat_remStepMBy32( 4, remPtr, dist, bPtr, q, zPtr ) | #define softfloat_remStep128MBy32(remPtr, dist, bPtr, q, zPtr) softfloat_remStepMBy32(4, remPtr, dist, bPtr, q, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #ifndef softfloat_remStep160MBy32 | #ifndef softfloat_remStep160MBy32 | ||||||
| @@ -1151,10 +1022,9 @@ void | |||||||
| | This function or macro is the same as 'softfloat_remStepMBy32' with | | This function or macro is the same as 'softfloat_remStepMBy32' with | ||||||
| | 'size_words' = 5 (N = 160). | | 'size_words' = 5 (N = 160). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #define softfloat_remStep160MBy32( remPtr, dist, bPtr, q, zPtr ) softfloat_remStepMBy32( 5, remPtr, dist, bPtr, q, zPtr ) | #define softfloat_remStep160MBy32(remPtr, dist, bPtr, q, zPtr) softfloat_remStepMBy32(5, remPtr, dist, bPtr, q, zPtr) | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
|   | |||||||
| @@ -34,7 +34,6 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
|  |  | ||||||
| =============================================================================*/ | =============================================================================*/ | ||||||
|  |  | ||||||
|  |  | ||||||
| /*============================================================================ | /*============================================================================ | ||||||
| | Note:  If SoftFloat is made available as a general library for programs to | | Note:  If SoftFloat is made available as a general library for programs to | ||||||
| | use, it is strongly recommended that a platform-specific version of this | | use, it is strongly recommended that a platform-specific version of this | ||||||
| @@ -42,13 +41,12 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| | eliminates all dependencies on compile-time macros. | | eliminates all dependencies on compile-time macros. | ||||||
| *============================================================================*/ | *============================================================================*/ | ||||||
|  |  | ||||||
|  |  | ||||||
| #ifndef softfloat_h | #ifndef softfloat_h | ||||||
| #define softfloat_h 1 | #define softfloat_h 1 | ||||||
|  |  | ||||||
|  | #include "softfloat_types.h" | ||||||
| #include <stdbool.h> | #include <stdbool.h> | ||||||
| #include <stdint.h> | #include <stdint.h> | ||||||
| #include "softfloat_types.h" |  | ||||||
|  |  | ||||||
| #ifndef THREAD_LOCAL | #ifndef THREAD_LOCAL | ||||||
| #define THREAD_LOCAL | #define THREAD_LOCAL | ||||||
| @@ -58,10 +56,7 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| | Software floating-point underflow tininess-detection mode. | | Software floating-point underflow tininess-detection mode. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| extern THREAD_LOCAL uint_fast8_t softfloat_detectTininess; | extern THREAD_LOCAL uint_fast8_t softfloat_detectTininess; | ||||||
| enum { | enum { softfloat_tininess_beforeRounding = 0, softfloat_tininess_afterRounding = 1 }; | ||||||
|     softfloat_tininess_beforeRounding = 0, |  | ||||||
|     softfloat_tininess_afterRounding  = 1 |  | ||||||
| }; |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Software floating-point rounding mode.  (Mode "odd" is supported only if | | Software floating-point rounding mode.  (Mode "odd" is supported only if | ||||||
| @@ -69,12 +64,12 @@ enum { | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| extern THREAD_LOCAL uint_fast8_t softfloat_roundingMode; | extern THREAD_LOCAL uint_fast8_t softfloat_roundingMode; | ||||||
| enum { | enum { | ||||||
|     softfloat_round_near_even   = 0, |     softfloat_round_near_even = 0, | ||||||
|     softfloat_round_minMag      = 1, |     softfloat_round_minMag = 1, | ||||||
|     softfloat_round_min         = 2, |     softfloat_round_min = 2, | ||||||
|     softfloat_round_max         = 3, |     softfloat_round_max = 3, | ||||||
|     softfloat_round_near_maxMag = 4, |     softfloat_round_near_maxMag = 4, | ||||||
|     softfloat_round_odd         = 6 |     softfloat_round_odd = 6 | ||||||
| }; | }; | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| @@ -82,162 +77,162 @@ enum { | |||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| extern THREAD_LOCAL uint_fast8_t softfloat_exceptionFlags; | extern THREAD_LOCAL uint_fast8_t softfloat_exceptionFlags; | ||||||
| enum { | enum { | ||||||
|     softfloat_flag_inexact   =  1, |     softfloat_flag_inexact = 1, | ||||||
|     softfloat_flag_underflow =  2, |     softfloat_flag_underflow = 2, | ||||||
|     softfloat_flag_overflow  =  4, |     softfloat_flag_overflow = 4, | ||||||
|     softfloat_flag_infinite  =  8, |     softfloat_flag_infinite = 8, | ||||||
|     softfloat_flag_invalid   = 16 |     softfloat_flag_invalid = 16 | ||||||
| }; | }; | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Routine to raise any or all of the software floating-point exception flags. | | Routine to raise any or all of the software floating-point exception flags. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| void softfloat_raiseFlags( uint_fast8_t ); | void softfloat_raiseFlags(uint_fast8_t); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Integer-to-floating-point conversion routines. | | Integer-to-floating-point conversion routines. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| float16_t ui32_to_f16( uint32_t ); | float16_t ui32_to_f16(uint32_t); | ||||||
| float32_t ui32_to_f32( uint32_t ); | float32_t ui32_to_f32(uint32_t); | ||||||
| float64_t ui32_to_f64( uint32_t ); | float64_t ui32_to_f64(uint32_t); | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
| extFloat80_t ui32_to_extF80( uint32_t ); | extFloat80_t ui32_to_extF80(uint32_t); | ||||||
| float128_t ui32_to_f128( uint32_t ); | float128_t ui32_to_f128(uint32_t); | ||||||
| #endif | #endif | ||||||
| void ui32_to_extF80M( uint32_t, extFloat80_t * ); | void ui32_to_extF80M(uint32_t, extFloat80_t*); | ||||||
| void ui32_to_f128M( uint32_t, float128_t * ); | void ui32_to_f128M(uint32_t, float128_t*); | ||||||
| float16_t ui64_to_f16( uint64_t ); | float16_t ui64_to_f16(uint64_t); | ||||||
| float32_t ui64_to_f32( uint64_t ); | float32_t ui64_to_f32(uint64_t); | ||||||
| float64_t ui64_to_f64( uint64_t ); | float64_t ui64_to_f64(uint64_t); | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
| extFloat80_t ui64_to_extF80( uint64_t ); | extFloat80_t ui64_to_extF80(uint64_t); | ||||||
| float128_t ui64_to_f128( uint64_t ); | float128_t ui64_to_f128(uint64_t); | ||||||
| #endif | #endif | ||||||
| void ui64_to_extF80M( uint64_t, extFloat80_t * ); | void ui64_to_extF80M(uint64_t, extFloat80_t*); | ||||||
| void ui64_to_f128M( uint64_t, float128_t * ); | void ui64_to_f128M(uint64_t, float128_t*); | ||||||
| float16_t i32_to_f16( int32_t ); | float16_t i32_to_f16(int32_t); | ||||||
| float32_t i32_to_f32( int32_t ); | float32_t i32_to_f32(int32_t); | ||||||
| float64_t i32_to_f64( int32_t ); | float64_t i32_to_f64(int32_t); | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
| extFloat80_t i32_to_extF80( int32_t ); | extFloat80_t i32_to_extF80(int32_t); | ||||||
| float128_t i32_to_f128( int32_t ); | float128_t i32_to_f128(int32_t); | ||||||
| #endif | #endif | ||||||
| void i32_to_extF80M( int32_t, extFloat80_t * ); | void i32_to_extF80M(int32_t, extFloat80_t*); | ||||||
| void i32_to_f128M( int32_t, float128_t * ); | void i32_to_f128M(int32_t, float128_t*); | ||||||
| float16_t i64_to_f16( int64_t ); | float16_t i64_to_f16(int64_t); | ||||||
| float32_t i64_to_f32( int64_t ); | float32_t i64_to_f32(int64_t); | ||||||
| float64_t i64_to_f64( int64_t ); | float64_t i64_to_f64(int64_t); | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
| extFloat80_t i64_to_extF80( int64_t ); | extFloat80_t i64_to_extF80(int64_t); | ||||||
| float128_t i64_to_f128( int64_t ); | float128_t i64_to_f128(int64_t); | ||||||
| #endif | #endif | ||||||
| void i64_to_extF80M( int64_t, extFloat80_t * ); | void i64_to_extF80M(int64_t, extFloat80_t*); | ||||||
| void i64_to_f128M( int64_t, float128_t * ); | void i64_to_f128M(int64_t, float128_t*); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | 16-bit (half-precision) floating-point operations. | | 16-bit (half-precision) floating-point operations. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast32_t f16_to_ui32( float16_t, uint_fast8_t, bool ); | uint_fast32_t f16_to_ui32(float16_t, uint_fast8_t, bool); | ||||||
| uint_fast64_t f16_to_ui64( float16_t, uint_fast8_t, bool ); | uint_fast64_t f16_to_ui64(float16_t, uint_fast8_t, bool); | ||||||
| int_fast32_t f16_to_i32( float16_t, uint_fast8_t, bool ); | int_fast32_t f16_to_i32(float16_t, uint_fast8_t, bool); | ||||||
| int_fast64_t f16_to_i64( float16_t, uint_fast8_t, bool ); | int_fast64_t f16_to_i64(float16_t, uint_fast8_t, bool); | ||||||
| uint_fast32_t f16_to_ui32_r_minMag( float16_t, bool ); | uint_fast32_t f16_to_ui32_r_minMag(float16_t, bool); | ||||||
| uint_fast64_t f16_to_ui64_r_minMag( float16_t, bool ); | uint_fast64_t f16_to_ui64_r_minMag(float16_t, bool); | ||||||
| int_fast32_t f16_to_i32_r_minMag( float16_t, bool ); | int_fast32_t f16_to_i32_r_minMag(float16_t, bool); | ||||||
| int_fast64_t f16_to_i64_r_minMag( float16_t, bool ); | int_fast64_t f16_to_i64_r_minMag(float16_t, bool); | ||||||
| float32_t f16_to_f32( float16_t ); | float32_t f16_to_f32(float16_t); | ||||||
| float64_t f16_to_f64( float16_t ); | float64_t f16_to_f64(float16_t); | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
| extFloat80_t f16_to_extF80( float16_t ); | extFloat80_t f16_to_extF80(float16_t); | ||||||
| float128_t f16_to_f128( float16_t ); | float128_t f16_to_f128(float16_t); | ||||||
| #endif | #endif | ||||||
| void f16_to_extF80M( float16_t, extFloat80_t * ); | void f16_to_extF80M(float16_t, extFloat80_t*); | ||||||
| void f16_to_f128M( float16_t, float128_t * ); | void f16_to_f128M(float16_t, float128_t*); | ||||||
| float16_t f16_roundToInt( float16_t, uint_fast8_t, bool ); | float16_t f16_roundToInt(float16_t, uint_fast8_t, bool); | ||||||
| float16_t f16_add( float16_t, float16_t ); | float16_t f16_add(float16_t, float16_t); | ||||||
| float16_t f16_sub( float16_t, float16_t ); | float16_t f16_sub(float16_t, float16_t); | ||||||
| float16_t f16_mul( float16_t, float16_t ); | float16_t f16_mul(float16_t, float16_t); | ||||||
| float16_t f16_mulAdd( float16_t, float16_t, float16_t ); | float16_t f16_mulAdd(float16_t, float16_t, float16_t); | ||||||
| float16_t f16_div( float16_t, float16_t ); | float16_t f16_div(float16_t, float16_t); | ||||||
| float16_t f16_rem( float16_t, float16_t ); | float16_t f16_rem(float16_t, float16_t); | ||||||
| float16_t f16_sqrt( float16_t ); | float16_t f16_sqrt(float16_t); | ||||||
| bool f16_eq( float16_t, float16_t ); | bool f16_eq(float16_t, float16_t); | ||||||
| bool f16_le( float16_t, float16_t ); | bool f16_le(float16_t, float16_t); | ||||||
| bool f16_lt( float16_t, float16_t ); | bool f16_lt(float16_t, float16_t); | ||||||
| bool f16_eq_signaling( float16_t, float16_t ); | bool f16_eq_signaling(float16_t, float16_t); | ||||||
| bool f16_le_quiet( float16_t, float16_t ); | bool f16_le_quiet(float16_t, float16_t); | ||||||
| bool f16_lt_quiet( float16_t, float16_t ); | bool f16_lt_quiet(float16_t, float16_t); | ||||||
| bool f16_isSignalingNaN( float16_t ); | bool f16_isSignalingNaN(float16_t); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | 32-bit (single-precision) floating-point operations. | | 32-bit (single-precision) floating-point operations. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast32_t f32_to_ui32( float32_t, uint_fast8_t, bool ); | uint_fast32_t f32_to_ui32(float32_t, uint_fast8_t, bool); | ||||||
| uint_fast64_t f32_to_ui64( float32_t, uint_fast8_t, bool ); | uint_fast64_t f32_to_ui64(float32_t, uint_fast8_t, bool); | ||||||
| int_fast32_t f32_to_i32( float32_t, uint_fast8_t, bool ); | int_fast32_t f32_to_i32(float32_t, uint_fast8_t, bool); | ||||||
| int_fast64_t f32_to_i64( float32_t, uint_fast8_t, bool ); | int_fast64_t f32_to_i64(float32_t, uint_fast8_t, bool); | ||||||
| uint_fast32_t f32_to_ui32_r_minMag( float32_t, bool ); | uint_fast32_t f32_to_ui32_r_minMag(float32_t, bool); | ||||||
| uint_fast64_t f32_to_ui64_r_minMag( float32_t, bool ); | uint_fast64_t f32_to_ui64_r_minMag(float32_t, bool); | ||||||
| int_fast32_t f32_to_i32_r_minMag( float32_t, bool ); | int_fast32_t f32_to_i32_r_minMag(float32_t, bool); | ||||||
| int_fast64_t f32_to_i64_r_minMag( float32_t, bool ); | int_fast64_t f32_to_i64_r_minMag(float32_t, bool); | ||||||
| float16_t f32_to_f16( float32_t ); | float16_t f32_to_f16(float32_t); | ||||||
| float64_t f32_to_f64( float32_t ); | float64_t f32_to_f64(float32_t); | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
| extFloat80_t f32_to_extF80( float32_t ); | extFloat80_t f32_to_extF80(float32_t); | ||||||
| float128_t f32_to_f128( float32_t ); | float128_t f32_to_f128(float32_t); | ||||||
| #endif | #endif | ||||||
| void f32_to_extF80M( float32_t, extFloat80_t * ); | void f32_to_extF80M(float32_t, extFloat80_t*); | ||||||
| void f32_to_f128M( float32_t, float128_t * ); | void f32_to_f128M(float32_t, float128_t*); | ||||||
| float32_t f32_roundToInt( float32_t, uint_fast8_t, bool ); | float32_t f32_roundToInt(float32_t, uint_fast8_t, bool); | ||||||
| float32_t f32_add( float32_t, float32_t ); | float32_t f32_add(float32_t, float32_t); | ||||||
| float32_t f32_sub( float32_t, float32_t ); | float32_t f32_sub(float32_t, float32_t); | ||||||
| float32_t f32_mul( float32_t, float32_t ); | float32_t f32_mul(float32_t, float32_t); | ||||||
| float32_t f32_mulAdd( float32_t, float32_t, float32_t ); | float32_t f32_mulAdd(float32_t, float32_t, float32_t); | ||||||
| float32_t f32_div( float32_t, float32_t ); | float32_t f32_div(float32_t, float32_t); | ||||||
| float32_t f32_rem( float32_t, float32_t ); | float32_t f32_rem(float32_t, float32_t); | ||||||
| float32_t f32_sqrt( float32_t ); | float32_t f32_sqrt(float32_t); | ||||||
| bool f32_eq( float32_t, float32_t ); | bool f32_eq(float32_t, float32_t); | ||||||
| bool f32_le( float32_t, float32_t ); | bool f32_le(float32_t, float32_t); | ||||||
| bool f32_lt( float32_t, float32_t ); | bool f32_lt(float32_t, float32_t); | ||||||
| bool f32_eq_signaling( float32_t, float32_t ); | bool f32_eq_signaling(float32_t, float32_t); | ||||||
| bool f32_le_quiet( float32_t, float32_t ); | bool f32_le_quiet(float32_t, float32_t); | ||||||
| bool f32_lt_quiet( float32_t, float32_t ); | bool f32_lt_quiet(float32_t, float32_t); | ||||||
| bool f32_isSignalingNaN( float32_t ); | bool f32_isSignalingNaN(float32_t); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | 64-bit (double-precision) floating-point operations. | | 64-bit (double-precision) floating-point operations. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| uint_fast32_t f64_to_ui32( float64_t, uint_fast8_t, bool ); | uint_fast32_t f64_to_ui32(float64_t, uint_fast8_t, bool); | ||||||
| uint_fast64_t f64_to_ui64( float64_t, uint_fast8_t, bool ); | uint_fast64_t f64_to_ui64(float64_t, uint_fast8_t, bool); | ||||||
| int_fast32_t f64_to_i32( float64_t, uint_fast8_t, bool ); | int_fast32_t f64_to_i32(float64_t, uint_fast8_t, bool); | ||||||
| int_fast64_t f64_to_i64( float64_t, uint_fast8_t, bool ); | int_fast64_t f64_to_i64(float64_t, uint_fast8_t, bool); | ||||||
| uint_fast32_t f64_to_ui32_r_minMag( float64_t, bool ); | uint_fast32_t f64_to_ui32_r_minMag(float64_t, bool); | ||||||
| uint_fast64_t f64_to_ui64_r_minMag( float64_t, bool ); | uint_fast64_t f64_to_ui64_r_minMag(float64_t, bool); | ||||||
| int_fast32_t f64_to_i32_r_minMag( float64_t, bool ); | int_fast32_t f64_to_i32_r_minMag(float64_t, bool); | ||||||
| int_fast64_t f64_to_i64_r_minMag( float64_t, bool ); | int_fast64_t f64_to_i64_r_minMag(float64_t, bool); | ||||||
| float16_t f64_to_f16( float64_t ); | float16_t f64_to_f16(float64_t); | ||||||
| float32_t f64_to_f32( float64_t ); | float32_t f64_to_f32(float64_t); | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
| extFloat80_t f64_to_extF80( float64_t ); | extFloat80_t f64_to_extF80(float64_t); | ||||||
| float128_t f64_to_f128( float64_t ); | float128_t f64_to_f128(float64_t); | ||||||
| #endif | #endif | ||||||
| void f64_to_extF80M( float64_t, extFloat80_t * ); | void f64_to_extF80M(float64_t, extFloat80_t*); | ||||||
| void f64_to_f128M( float64_t, float128_t * ); | void f64_to_f128M(float64_t, float128_t*); | ||||||
| float64_t f64_roundToInt( float64_t, uint_fast8_t, bool ); | float64_t f64_roundToInt(float64_t, uint_fast8_t, bool); | ||||||
| float64_t f64_add( float64_t, float64_t ); | float64_t f64_add(float64_t, float64_t); | ||||||
| float64_t f64_sub( float64_t, float64_t ); | float64_t f64_sub(float64_t, float64_t); | ||||||
| float64_t f64_mul( float64_t, float64_t ); | float64_t f64_mul(float64_t, float64_t); | ||||||
| float64_t f64_mulAdd( float64_t, float64_t, float64_t ); | float64_t f64_mulAdd(float64_t, float64_t, float64_t); | ||||||
| float64_t f64_div( float64_t, float64_t ); | float64_t f64_div(float64_t, float64_t); | ||||||
| float64_t f64_rem( float64_t, float64_t ); | float64_t f64_rem(float64_t, float64_t); | ||||||
| float64_t f64_sqrt( float64_t ); | float64_t f64_sqrt(float64_t); | ||||||
| bool f64_eq( float64_t, float64_t ); | bool f64_eq(float64_t, float64_t); | ||||||
| bool f64_le( float64_t, float64_t ); | bool f64_le(float64_t, float64_t); | ||||||
| bool f64_lt( float64_t, float64_t ); | bool f64_lt(float64_t, float64_t); | ||||||
| bool f64_eq_signaling( float64_t, float64_t ); | bool f64_eq_signaling(float64_t, float64_t); | ||||||
| bool f64_le_quiet( float64_t, float64_t ); | bool f64_le_quiet(float64_t, float64_t); | ||||||
| bool f64_lt_quiet( float64_t, float64_t ); | bool f64_lt_quiet(float64_t, float64_t); | ||||||
| bool f64_isSignalingNaN( float64_t ); | bool f64_isSignalingNaN(float64_t); | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | Rounding precision for 80-bit extended double-precision floating-point. | | Rounding precision for 80-bit extended double-precision floating-point. | ||||||
| @@ -249,124 +244,118 @@ extern THREAD_LOCAL uint_fast8_t extF80_roundingPrecision; | |||||||
| | 80-bit extended double-precision floating-point operations. | | 80-bit extended double-precision floating-point operations. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
| uint_fast32_t extF80_to_ui32( extFloat80_t, uint_fast8_t, bool ); | uint_fast32_t extF80_to_ui32(extFloat80_t, uint_fast8_t, bool); | ||||||
| uint_fast64_t extF80_to_ui64( extFloat80_t, uint_fast8_t, bool ); | uint_fast64_t extF80_to_ui64(extFloat80_t, uint_fast8_t, bool); | ||||||
| int_fast32_t extF80_to_i32( extFloat80_t, uint_fast8_t, bool ); | int_fast32_t extF80_to_i32(extFloat80_t, uint_fast8_t, bool); | ||||||
| int_fast64_t extF80_to_i64( extFloat80_t, uint_fast8_t, bool ); | int_fast64_t extF80_to_i64(extFloat80_t, uint_fast8_t, bool); | ||||||
| uint_fast32_t extF80_to_ui32_r_minMag( extFloat80_t, bool ); | uint_fast32_t extF80_to_ui32_r_minMag(extFloat80_t, bool); | ||||||
| uint_fast64_t extF80_to_ui64_r_minMag( extFloat80_t, bool ); | uint_fast64_t extF80_to_ui64_r_minMag(extFloat80_t, bool); | ||||||
| int_fast32_t extF80_to_i32_r_minMag( extFloat80_t, bool ); | int_fast32_t extF80_to_i32_r_minMag(extFloat80_t, bool); | ||||||
| int_fast64_t extF80_to_i64_r_minMag( extFloat80_t, bool ); | int_fast64_t extF80_to_i64_r_minMag(extFloat80_t, bool); | ||||||
| float16_t extF80_to_f16( extFloat80_t ); | float16_t extF80_to_f16(extFloat80_t); | ||||||
| float32_t extF80_to_f32( extFloat80_t ); | float32_t extF80_to_f32(extFloat80_t); | ||||||
| float64_t extF80_to_f64( extFloat80_t ); | float64_t extF80_to_f64(extFloat80_t); | ||||||
| float128_t extF80_to_f128( extFloat80_t ); | float128_t extF80_to_f128(extFloat80_t); | ||||||
| extFloat80_t extF80_roundToInt( extFloat80_t, uint_fast8_t, bool ); | extFloat80_t extF80_roundToInt(extFloat80_t, uint_fast8_t, bool); | ||||||
| extFloat80_t extF80_add( extFloat80_t, extFloat80_t ); | extFloat80_t extF80_add(extFloat80_t, extFloat80_t); | ||||||
| extFloat80_t extF80_sub( extFloat80_t, extFloat80_t ); | extFloat80_t extF80_sub(extFloat80_t, extFloat80_t); | ||||||
| extFloat80_t extF80_mul( extFloat80_t, extFloat80_t ); | extFloat80_t extF80_mul(extFloat80_t, extFloat80_t); | ||||||
| extFloat80_t extF80_div( extFloat80_t, extFloat80_t ); | extFloat80_t extF80_div(extFloat80_t, extFloat80_t); | ||||||
| extFloat80_t extF80_rem( extFloat80_t, extFloat80_t ); | extFloat80_t extF80_rem(extFloat80_t, extFloat80_t); | ||||||
| extFloat80_t extF80_sqrt( extFloat80_t ); | extFloat80_t extF80_sqrt(extFloat80_t); | ||||||
| bool extF80_eq( extFloat80_t, extFloat80_t ); | bool extF80_eq(extFloat80_t, extFloat80_t); | ||||||
| bool extF80_le( extFloat80_t, extFloat80_t ); | bool extF80_le(extFloat80_t, extFloat80_t); | ||||||
| bool extF80_lt( extFloat80_t, extFloat80_t ); | bool extF80_lt(extFloat80_t, extFloat80_t); | ||||||
| bool extF80_eq_signaling( extFloat80_t, extFloat80_t ); | bool extF80_eq_signaling(extFloat80_t, extFloat80_t); | ||||||
| bool extF80_le_quiet( extFloat80_t, extFloat80_t ); | bool extF80_le_quiet(extFloat80_t, extFloat80_t); | ||||||
| bool extF80_lt_quiet( extFloat80_t, extFloat80_t ); | bool extF80_lt_quiet(extFloat80_t, extFloat80_t); | ||||||
| bool extF80_isSignalingNaN( extFloat80_t ); | bool extF80_isSignalingNaN(extFloat80_t); | ||||||
| #endif | #endif | ||||||
| uint_fast32_t extF80M_to_ui32( const extFloat80_t *, uint_fast8_t, bool ); | uint_fast32_t extF80M_to_ui32(const extFloat80_t*, uint_fast8_t, bool); | ||||||
| uint_fast64_t extF80M_to_ui64( const extFloat80_t *, uint_fast8_t, bool ); | uint_fast64_t extF80M_to_ui64(const extFloat80_t*, uint_fast8_t, bool); | ||||||
| int_fast32_t extF80M_to_i32( const extFloat80_t *, uint_fast8_t, bool ); | int_fast32_t extF80M_to_i32(const extFloat80_t*, uint_fast8_t, bool); | ||||||
| int_fast64_t extF80M_to_i64( const extFloat80_t *, uint_fast8_t, bool ); | int_fast64_t extF80M_to_i64(const extFloat80_t*, uint_fast8_t, bool); | ||||||
| uint_fast32_t extF80M_to_ui32_r_minMag( const extFloat80_t *, bool ); | uint_fast32_t extF80M_to_ui32_r_minMag(const extFloat80_t*, bool); | ||||||
| uint_fast64_t extF80M_to_ui64_r_minMag( const extFloat80_t *, bool ); | uint_fast64_t extF80M_to_ui64_r_minMag(const extFloat80_t*, bool); | ||||||
| int_fast32_t extF80M_to_i32_r_minMag( const extFloat80_t *, bool ); | int_fast32_t extF80M_to_i32_r_minMag(const extFloat80_t*, bool); | ||||||
| int_fast64_t extF80M_to_i64_r_minMag( const extFloat80_t *, bool ); | int_fast64_t extF80M_to_i64_r_minMag(const extFloat80_t*, bool); | ||||||
| float16_t extF80M_to_f16( const extFloat80_t * ); | float16_t extF80M_to_f16(const extFloat80_t*); | ||||||
| float32_t extF80M_to_f32( const extFloat80_t * ); | float32_t extF80M_to_f32(const extFloat80_t*); | ||||||
| float64_t extF80M_to_f64( const extFloat80_t * ); | float64_t extF80M_to_f64(const extFloat80_t*); | ||||||
| void extF80M_to_f128M( const extFloat80_t *, float128_t * ); | void extF80M_to_f128M(const extFloat80_t*, float128_t*); | ||||||
| void | void extF80M_roundToInt(const extFloat80_t*, uint_fast8_t, bool, extFloat80_t*); | ||||||
|  extF80M_roundToInt( | void extF80M_add(const extFloat80_t*, const extFloat80_t*, extFloat80_t*); | ||||||
|      const extFloat80_t *, uint_fast8_t, bool, extFloat80_t * ); | void extF80M_sub(const extFloat80_t*, const extFloat80_t*, extFloat80_t*); | ||||||
| void extF80M_add( const extFloat80_t *, const extFloat80_t *, extFloat80_t * ); | void extF80M_mul(const extFloat80_t*, const extFloat80_t*, extFloat80_t*); | ||||||
| void extF80M_sub( const extFloat80_t *, const extFloat80_t *, extFloat80_t * ); | void extF80M_div(const extFloat80_t*, const extFloat80_t*, extFloat80_t*); | ||||||
| void extF80M_mul( const extFloat80_t *, const extFloat80_t *, extFloat80_t * ); | void extF80M_rem(const extFloat80_t*, const extFloat80_t*, extFloat80_t*); | ||||||
| void extF80M_div( const extFloat80_t *, const extFloat80_t *, extFloat80_t * ); | void extF80M_sqrt(const extFloat80_t*, extFloat80_t*); | ||||||
| void extF80M_rem( const extFloat80_t *, const extFloat80_t *, extFloat80_t * ); | bool extF80M_eq(const extFloat80_t*, const extFloat80_t*); | ||||||
| void extF80M_sqrt( const extFloat80_t *, extFloat80_t * ); | bool extF80M_le(const extFloat80_t*, const extFloat80_t*); | ||||||
| bool extF80M_eq( const extFloat80_t *, const extFloat80_t * ); | bool extF80M_lt(const extFloat80_t*, const extFloat80_t*); | ||||||
| bool extF80M_le( const extFloat80_t *, const extFloat80_t * ); | bool extF80M_eq_signaling(const extFloat80_t*, const extFloat80_t*); | ||||||
| bool extF80M_lt( const extFloat80_t *, const extFloat80_t * ); | bool extF80M_le_quiet(const extFloat80_t*, const extFloat80_t*); | ||||||
| bool extF80M_eq_signaling( const extFloat80_t *, const extFloat80_t * ); | bool extF80M_lt_quiet(const extFloat80_t*, const extFloat80_t*); | ||||||
| bool extF80M_le_quiet( const extFloat80_t *, const extFloat80_t * ); | bool extF80M_isSignalingNaN(const extFloat80_t*); | ||||||
| bool extF80M_lt_quiet( const extFloat80_t *, const extFloat80_t * ); |  | ||||||
| bool extF80M_isSignalingNaN( const extFloat80_t * ); |  | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | 128-bit (quadruple-precision) floating-point operations. | | 128-bit (quadruple-precision) floating-point operations. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #ifdef SOFTFLOAT_FAST_INT64 | #ifdef SOFTFLOAT_FAST_INT64 | ||||||
| uint_fast32_t f128_to_ui32( float128_t, uint_fast8_t, bool ); | uint_fast32_t f128_to_ui32(float128_t, uint_fast8_t, bool); | ||||||
| uint_fast64_t f128_to_ui64( float128_t, uint_fast8_t, bool ); | uint_fast64_t f128_to_ui64(float128_t, uint_fast8_t, bool); | ||||||
| int_fast32_t f128_to_i32( float128_t, uint_fast8_t, bool ); | int_fast32_t f128_to_i32(float128_t, uint_fast8_t, bool); | ||||||
| int_fast64_t f128_to_i64( float128_t, uint_fast8_t, bool ); | int_fast64_t f128_to_i64(float128_t, uint_fast8_t, bool); | ||||||
| uint_fast32_t f128_to_ui32_r_minMag( float128_t, bool ); | uint_fast32_t f128_to_ui32_r_minMag(float128_t, bool); | ||||||
| uint_fast64_t f128_to_ui64_r_minMag( float128_t, bool ); | uint_fast64_t f128_to_ui64_r_minMag(float128_t, bool); | ||||||
| int_fast32_t f128_to_i32_r_minMag( float128_t, bool ); | int_fast32_t f128_to_i32_r_minMag(float128_t, bool); | ||||||
| int_fast64_t f128_to_i64_r_minMag( float128_t, bool ); | int_fast64_t f128_to_i64_r_minMag(float128_t, bool); | ||||||
| float16_t f128_to_f16( float128_t ); | float16_t f128_to_f16(float128_t); | ||||||
| float32_t f128_to_f32( float128_t ); | float32_t f128_to_f32(float128_t); | ||||||
| float64_t f128_to_f64( float128_t ); | float64_t f128_to_f64(float128_t); | ||||||
| extFloat80_t f128_to_extF80( float128_t ); | extFloat80_t f128_to_extF80(float128_t); | ||||||
| float128_t f128_roundToInt( float128_t, uint_fast8_t, bool ); | float128_t f128_roundToInt(float128_t, uint_fast8_t, bool); | ||||||
| float128_t f128_add( float128_t, float128_t ); | float128_t f128_add(float128_t, float128_t); | ||||||
| float128_t f128_sub( float128_t, float128_t ); | float128_t f128_sub(float128_t, float128_t); | ||||||
| float128_t f128_mul( float128_t, float128_t ); | float128_t f128_mul(float128_t, float128_t); | ||||||
| float128_t f128_mulAdd( float128_t, float128_t, float128_t ); | float128_t f128_mulAdd(float128_t, float128_t, float128_t); | ||||||
| float128_t f128_div( float128_t, float128_t ); | float128_t f128_div(float128_t, float128_t); | ||||||
| float128_t f128_rem( float128_t, float128_t ); | float128_t f128_rem(float128_t, float128_t); | ||||||
| float128_t f128_sqrt( float128_t ); | float128_t f128_sqrt(float128_t); | ||||||
| bool f128_eq( float128_t, float128_t ); | bool f128_eq(float128_t, float128_t); | ||||||
| bool f128_le( float128_t, float128_t ); | bool f128_le(float128_t, float128_t); | ||||||
| bool f128_lt( float128_t, float128_t ); | bool f128_lt(float128_t, float128_t); | ||||||
| bool f128_eq_signaling( float128_t, float128_t ); | bool f128_eq_signaling(float128_t, float128_t); | ||||||
| bool f128_le_quiet( float128_t, float128_t ); | bool f128_le_quiet(float128_t, float128_t); | ||||||
| bool f128_lt_quiet( float128_t, float128_t ); | bool f128_lt_quiet(float128_t, float128_t); | ||||||
| bool f128_isSignalingNaN( float128_t ); | bool f128_isSignalingNaN(float128_t); | ||||||
| #endif | #endif | ||||||
| uint_fast32_t f128M_to_ui32( const float128_t *, uint_fast8_t, bool ); | uint_fast32_t f128M_to_ui32(const float128_t*, uint_fast8_t, bool); | ||||||
| uint_fast64_t f128M_to_ui64( const float128_t *, uint_fast8_t, bool ); | uint_fast64_t f128M_to_ui64(const float128_t*, uint_fast8_t, bool); | ||||||
| int_fast32_t f128M_to_i32( const float128_t *, uint_fast8_t, bool ); | int_fast32_t f128M_to_i32(const float128_t*, uint_fast8_t, bool); | ||||||
| int_fast64_t f128M_to_i64( const float128_t *, uint_fast8_t, bool ); | int_fast64_t f128M_to_i64(const float128_t*, uint_fast8_t, bool); | ||||||
| uint_fast32_t f128M_to_ui32_r_minMag( const float128_t *, bool ); | uint_fast32_t f128M_to_ui32_r_minMag(const float128_t*, bool); | ||||||
| uint_fast64_t f128M_to_ui64_r_minMag( const float128_t *, bool ); | uint_fast64_t f128M_to_ui64_r_minMag(const float128_t*, bool); | ||||||
| int_fast32_t f128M_to_i32_r_minMag( const float128_t *, bool ); | int_fast32_t f128M_to_i32_r_minMag(const float128_t*, bool); | ||||||
| int_fast64_t f128M_to_i64_r_minMag( const float128_t *, bool ); | int_fast64_t f128M_to_i64_r_minMag(const float128_t*, bool); | ||||||
| float16_t f128M_to_f16( const float128_t * ); | float16_t f128M_to_f16(const float128_t*); | ||||||
| float32_t f128M_to_f32( const float128_t * ); | float32_t f128M_to_f32(const float128_t*); | ||||||
| float64_t f128M_to_f64( const float128_t * ); | float64_t f128M_to_f64(const float128_t*); | ||||||
| void f128M_to_extF80M( const float128_t *, extFloat80_t * ); | void f128M_to_extF80M(const float128_t*, extFloat80_t*); | ||||||
| void f128M_roundToInt( const float128_t *, uint_fast8_t, bool, float128_t * ); | void f128M_roundToInt(const float128_t*, uint_fast8_t, bool, float128_t*); | ||||||
| void f128M_add( const float128_t *, const float128_t *, float128_t * ); | void f128M_add(const float128_t*, const float128_t*, float128_t*); | ||||||
| void f128M_sub( const float128_t *, const float128_t *, float128_t * ); | void f128M_sub(const float128_t*, const float128_t*, float128_t*); | ||||||
| void f128M_mul( const float128_t *, const float128_t *, float128_t * ); | void f128M_mul(const float128_t*, const float128_t*, float128_t*); | ||||||
| void | void f128M_mulAdd(const float128_t*, const float128_t*, const float128_t*, float128_t*); | ||||||
|  f128M_mulAdd( | void f128M_div(const float128_t*, const float128_t*, float128_t*); | ||||||
|      const float128_t *, const float128_t *, const float128_t *, float128_t * | void f128M_rem(const float128_t*, const float128_t*, float128_t*); | ||||||
|  ); | void f128M_sqrt(const float128_t*, float128_t*); | ||||||
| void f128M_div( const float128_t *, const float128_t *, float128_t * ); | bool f128M_eq(const float128_t*, const float128_t*); | ||||||
| void f128M_rem( const float128_t *, const float128_t *, float128_t * ); | bool f128M_le(const float128_t*, const float128_t*); | ||||||
| void f128M_sqrt( const float128_t *, float128_t * ); | bool f128M_lt(const float128_t*, const float128_t*); | ||||||
| bool f128M_eq( const float128_t *, const float128_t * ); | bool f128M_eq_signaling(const float128_t*, const float128_t*); | ||||||
| bool f128M_le( const float128_t *, const float128_t * ); | bool f128M_le_quiet(const float128_t*, const float128_t*); | ||||||
| bool f128M_lt( const float128_t *, const float128_t * ); | bool f128M_lt_quiet(const float128_t*, const float128_t*); | ||||||
| bool f128M_eq_signaling( const float128_t *, const float128_t * ); | bool f128M_isSignalingNaN(const float128_t*); | ||||||
| bool f128M_le_quiet( const float128_t *, const float128_t * ); |  | ||||||
| bool f128M_lt_quiet( const float128_t *, const float128_t * ); |  | ||||||
| bool f128M_isSignalingNaN( const float128_t * ); |  | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
|   | |||||||
| @@ -47,10 +47,18 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||||
| | the types below may, if desired, be defined as aliases for the native types | | the types below may, if desired, be defined as aliases for the native types | ||||||
| | (typically 'float' and 'double', and possibly 'long double'). | | (typically 'float' and 'double', and possibly 'long double'). | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| typedef struct { uint16_t v; } float16_t; | typedef struct { | ||||||
| typedef struct { uint32_t v; } float32_t; |     uint16_t v; | ||||||
| typedef struct { uint64_t v; } float64_t; | } float16_t; | ||||||
| typedef struct { uint64_t v[2]; } float128_t; | typedef struct { | ||||||
|  |     uint32_t v; | ||||||
|  | } float32_t; | ||||||
|  | typedef struct { | ||||||
|  |     uint64_t v; | ||||||
|  | } float64_t; | ||||||
|  | typedef struct { | ||||||
|  |     uint64_t v[2]; | ||||||
|  | } float128_t; | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| | The format of an 80-bit extended floating-point number in memory.  This | | The format of an 80-bit extended floating-point number in memory.  This | ||||||
| @@ -58,9 +66,15 @@ typedef struct { uint64_t v[2]; } float128_t; | |||||||
| | named 'signif'. | | named 'signif'. | ||||||
| *----------------------------------------------------------------------------*/ | *----------------------------------------------------------------------------*/ | ||||||
| #ifdef LITTLEENDIAN | #ifdef LITTLEENDIAN | ||||||
| struct extFloat80M { uint64_t signif; uint16_t signExp; }; | struct extFloat80M { | ||||||
|  |     uint64_t signif; | ||||||
|  |     uint16_t signExp; | ||||||
|  | }; | ||||||
| #else | #else | ||||||
| struct extFloat80M { uint16_t signExp; uint64_t signif; }; | struct extFloat80M { | ||||||
|  |     uint16_t signExp; | ||||||
|  |     uint64_t signif; | ||||||
|  | }; | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| /*---------------------------------------------------------------------------- | /*---------------------------------------------------------------------------- | ||||||
| @@ -78,4 +92,3 @@ struct extFloat80M { uint16_t signExp; uint64_t signif; }; | |||||||
| typedef struct extFloat80M extFloat80_t; | typedef struct extFloat80M extFloat80_t; | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
|   | |||||||
							
								
								
									
										3
									
								
								src-gen/.gitignore
									
									
									
									
										vendored
									
									
								
							
							
						
						
									
										3
									
								
								src-gen/.gitignore
									
									
									
									
										vendored
									
									
								
							| @@ -1,2 +1,3 @@ | |||||||
| /iss | /iss | ||||||
| /vm | /vm | ||||||
|  | /sysc | ||||||
| @@ -46,49 +46,71 @@ public: | |||||||
|     using this_class = hwl<BASE>; |     using this_class = hwl<BASE>; | ||||||
|     using reg_t = typename BASE::reg_t; |     using reg_t = typename BASE::reg_t; | ||||||
|  |  | ||||||
|     hwl(); |     hwl(feature_config cfg = feature_config{}); | ||||||
|     virtual ~hwl() = default; |     virtual ~hwl() = default; | ||||||
|  |  | ||||||
| protected: | protected: | ||||||
|     iss::status read_custom_csr_reg(unsigned addr, reg_t &val) override; |     iss::status read_custom_csr_reg(unsigned addr, reg_t& val) override; | ||||||
|     iss::status write_custom_csr_reg(unsigned addr, reg_t val) override; |     iss::status write_custom_csr_reg(unsigned addr, reg_t val) override; | ||||||
| }; | }; | ||||||
|  |  | ||||||
|  | template <typename BASE> | ||||||
| template<typename BASE> | inline hwl<BASE>::hwl(feature_config cfg) | ||||||
| inline hwl<BASE>::hwl() { | : BASE(cfg) { | ||||||
|     for (unsigned addr = 0x800; addr < 0x803; ++addr){ |     for(unsigned addr = 0x800; addr < 0x803; ++addr) { | ||||||
|         this->register_custom_csr_rd(addr); |         this->register_custom_csr_rd(addr); | ||||||
|         this->register_custom_csr_wr(addr); |         this->register_custom_csr_wr(addr); | ||||||
|     } |     } | ||||||
|     for (unsigned addr = 0x804; addr < 0x807; ++addr){ |     for(unsigned addr = 0x804; addr < 0x807; ++addr) { | ||||||
|         this->register_custom_csr_rd(addr); |         this->register_custom_csr_rd(addr); | ||||||
|         this->register_custom_csr_wr(addr); |         this->register_custom_csr_wr(addr); | ||||||
|     } |     } | ||||||
| } | } | ||||||
|  |  | ||||||
| template<typename BASE> | template <typename BASE> inline iss::status iss::arch::hwl<BASE>::read_custom_csr_reg(unsigned addr, reg_t& val) { | ||||||
| inline iss::status iss::arch::hwl<BASE>::read_custom_csr_reg(unsigned addr, reg_t &val) { |     switch(addr) { | ||||||
|     switch(addr){ |     case 0x800: | ||||||
|     case 0x800: val = this->reg.lpstart0; break; |         val = this->reg.lpstart0; | ||||||
|     case 0x801: val = this->reg.lpend0;   break; |         break; | ||||||
|     case 0x802: val = this->reg.lpcount0; break; |     case 0x801: | ||||||
|     case 0x804: val = this->reg.lpstart1; break; |         val = this->reg.lpend0; | ||||||
|     case 0x805: val = this->reg.lpend1;   break; |         break; | ||||||
|     case 0x806: val = this->reg.lpcount1; break; |     case 0x802: | ||||||
|  |         val = this->reg.lpcount0; | ||||||
|  |         break; | ||||||
|  |     case 0x804: | ||||||
|  |         val = this->reg.lpstart1; | ||||||
|  |         break; | ||||||
|  |     case 0x805: | ||||||
|  |         val = this->reg.lpend1; | ||||||
|  |         break; | ||||||
|  |     case 0x806: | ||||||
|  |         val = this->reg.lpcount1; | ||||||
|  |         break; | ||||||
|     } |     } | ||||||
|     return iss::Ok; |     return iss::Ok; | ||||||
| } | } | ||||||
|  |  | ||||||
| template<typename BASE> | template <typename BASE> inline iss::status iss::arch::hwl<BASE>::write_custom_csr_reg(unsigned addr, reg_t val) { | ||||||
| inline iss::status iss::arch::hwl<BASE>::write_custom_csr_reg(unsigned addr, reg_t val) { |     switch(addr) { | ||||||
|     switch(addr){ |     case 0x800: | ||||||
|     case 0x800: this->reg.lpstart0 = val; break; |         this->reg.lpstart0 = val; | ||||||
|     case 0x801: this->reg.lpend0   = val; break; |         break; | ||||||
|     case 0x802: this->reg.lpcount0 = val; break; |     case 0x801: | ||||||
|     case 0x804: this->reg.lpstart1 = val; break; |         this->reg.lpend0 = val; | ||||||
|     case 0x805: this->reg.lpend1   = val; break; |         break; | ||||||
|     case 0x806: this->reg.lpcount1 = val; break; |     case 0x802: | ||||||
|  |         this->reg.lpcount0 = val; | ||||||
|  |         break; | ||||||
|  |     case 0x804: | ||||||
|  |         this->reg.lpstart1 = val; | ||||||
|  |         break; | ||||||
|  |     case 0x805: | ||||||
|  |         this->reg.lpend1 = val; | ||||||
|  |         break; | ||||||
|  |     case 0x806: | ||||||
|  |         this->reg.lpcount1 = val; | ||||||
|  |         break; | ||||||
|     } |     } | ||||||
|     return iss::Ok; |     return iss::Ok; | ||||||
| } | } | ||||||
| @@ -96,5 +118,4 @@ inline iss::status iss::arch::hwl<BASE>::write_custom_csr_reg(unsigned addr, reg | |||||||
| } // namespace arch | } // namespace arch | ||||||
| } // namespace iss | } // namespace iss | ||||||
|  |  | ||||||
|  |  | ||||||
| #endif /* _RISCV_HART_M_P_H */ | #endif /* _RISCV_HART_M_P_H */ | ||||||
|   | |||||||
| @@ -43,7 +43,7 @@ namespace arch { | |||||||
|  |  | ||||||
| enum { tohost_dflt = 0xF0001000, fromhost_dflt = 0xF0001040 }; | enum { tohost_dflt = 0xF0001000, fromhost_dflt = 0xF0001040 }; | ||||||
|  |  | ||||||
| enum features_e{FEAT_NONE, FEAT_PMP=1, FEAT_EXT_N=2, FEAT_CLIC=4, FEAT_DEBUG=8, FEAT_TCM=16}; | enum features_e { FEAT_NONE, FEAT_PMP = 1, FEAT_EXT_N = 2, FEAT_CLIC = 4, FEAT_DEBUG = 8, FEAT_TCM = 16 }; | ||||||
|  |  | ||||||
| enum riscv_csr { | enum riscv_csr { | ||||||
|     /* user-level CSR */ |     /* user-level CSR */ | ||||||
| @@ -51,17 +51,17 @@ enum riscv_csr { | |||||||
|     ustatus = 0x000, |     ustatus = 0x000, | ||||||
|     uie = 0x004, |     uie = 0x004, | ||||||
|     utvec = 0x005, |     utvec = 0x005, | ||||||
|     utvt = 0x007, //CLIC |     utvt = 0x007, // CLIC | ||||||
|     // User Trap Handling |     // User Trap Handling | ||||||
|     uscratch = 0x040, |     uscratch = 0x040, | ||||||
|     uepc = 0x041, |     uepc = 0x041, | ||||||
|     ucause = 0x042, |     ucause = 0x042, | ||||||
|     utval = 0x043, |     utval = 0x043, | ||||||
|     uip = 0x044, |     uip = 0x044, | ||||||
|     uxnti = 0x045, //CLIC |     uxnti = 0x045,        // CLIC | ||||||
|     uintstatus   = 0xCB1, // MRW Current interrupt levels (CLIC) - addr subject to change |     uintstatus = 0xCB1,   // MRW Current interrupt levels (CLIC) - addr subject to change | ||||||
|     uintthresh   = 0x047, // MRW Interrupt-level threshold (CLIC) - addr subject to change |     uintthresh = 0x047,   // MRW Interrupt-level threshold (CLIC) - addr subject to change | ||||||
|     uscratchcsw  = 0x048, // MRW Conditional scratch swap on priv mode change (CLIC) |     uscratchcsw = 0x048,  // MRW Conditional scratch swap on priv mode change (CLIC) | ||||||
|     uscratchcswl = 0x049, // MRW Conditional scratch swap on level change (CLIC) |     uscratchcswl = 0x049, // MRW Conditional scratch swap on level change (CLIC) | ||||||
|     // User Floating-Point CSRs |     // User Floating-Point CSRs | ||||||
|     fflags = 0x001, |     fflags = 0x001, | ||||||
| @@ -112,17 +112,17 @@ enum riscv_csr { | |||||||
|     mie = 0x304, |     mie = 0x304, | ||||||
|     mtvec = 0x305, |     mtvec = 0x305, | ||||||
|     mcounteren = 0x306, |     mcounteren = 0x306, | ||||||
|     mtvt = 0x307, //CLIC |     mtvt = 0x307, // CLIC | ||||||
|     // Machine Trap Handling |     // Machine Trap Handling | ||||||
|     mscratch = 0x340, |     mscratch = 0x340, | ||||||
|     mepc = 0x341, |     mepc = 0x341, | ||||||
|     mcause = 0x342, |     mcause = 0x342, | ||||||
|     mtval = 0x343, |     mtval = 0x343, | ||||||
|     mip = 0x344, |     mip = 0x344, | ||||||
|     mxnti = 0x345, //CLIC |     mxnti = 0x345,        // CLIC | ||||||
|     mintstatus   = 0xFB1, // MRW Current interrupt levels (CLIC) - addr subject to change |     mintstatus = 0xFB1,   // MRW Current interrupt levels (CLIC) - addr subject to change | ||||||
|     mintthresh   = 0x347, // MRW Interrupt-level threshold (CLIC) - addr subject to change |     mintthresh = 0x347,   // MRW Interrupt-level threshold (CLIC) - addr subject to change | ||||||
|     mscratchcsw  = 0x348, // MRW Conditional scratch swap on priv mode change (CLIC) |     mscratchcsw = 0x348,  // MRW Conditional scratch swap on priv mode change (CLIC) | ||||||
|     mscratchcswl = 0x349, // MRW Conditional scratch swap on level change (CLIC) |     mscratchcswl = 0x349, // MRW Conditional scratch swap on level change (CLIC) | ||||||
|     // Physical Memory Protection |     // Physical Memory Protection | ||||||
|     pmpcfg0 = 0x3A0, |     pmpcfg0 = 0x3A0, | ||||||
| @@ -175,7 +175,6 @@ enum riscv_csr { | |||||||
|     dscratch1 = 0x7B3 |     dscratch1 = 0x7B3 | ||||||
| }; | }; | ||||||
|  |  | ||||||
|  |  | ||||||
| enum { | enum { | ||||||
|     PGSHIFT = 12, |     PGSHIFT = 12, | ||||||
|     PTE_PPN_SHIFT = 10, |     PTE_PPN_SHIFT = 10, | ||||||
| @@ -193,7 +192,7 @@ enum { | |||||||
|  |  | ||||||
| template <typename T> inline bool PTE_TABLE(T PTE) { return (((PTE) & (PTE_V | PTE_R | PTE_W | PTE_X)) == PTE_V); } | template <typename T> inline bool PTE_TABLE(T PTE) { return (((PTE) & (PTE_V | PTE_R | PTE_W | PTE_X)) == PTE_V); } | ||||||
|  |  | ||||||
| enum { PRIV_U = 0, PRIV_S = 1, PRIV_M = 3, PRIV_D = 4}; | enum { PRIV_U = 0, PRIV_S = 1, PRIV_M = 3, PRIV_D = 4 }; | ||||||
|  |  | ||||||
| enum { | enum { | ||||||
|     ISA_A = 1, |     ISA_A = 1, | ||||||
| @@ -226,6 +225,8 @@ struct feature_config { | |||||||
|     unsigned clic_num_trigger{0}; |     unsigned clic_num_trigger{0}; | ||||||
|     uint64_t tcm_base{0x10000000}; |     uint64_t tcm_base{0x10000000}; | ||||||
|     uint64_t tcm_size{0x8000}; |     uint64_t tcm_size{0x8000}; | ||||||
|  |     uint64_t io_address{0xf0000000}; | ||||||
|  |     uint64_t io_addr_mask{0xf0000000}; | ||||||
| }; | }; | ||||||
|  |  | ||||||
| class trap_load_access_fault : public trap_access { | class trap_load_access_fault : public trap_access { | ||||||
| @@ -254,49 +255,49 @@ public: | |||||||
|     : trap_access(15 << 16, badaddr) {} |     : trap_access(15 << 16, badaddr) {} | ||||||
| }; | }; | ||||||
|  |  | ||||||
| inline void read_reg_uint32(uint64_t offs, uint32_t& reg, uint8_t *const data, unsigned length) { | inline void read_reg_uint32(uint64_t offs, uint32_t& reg, uint8_t* const data, unsigned length) { | ||||||
|     auto reg_ptr = reinterpret_cast<uint8_t*>(®); |     auto reg_ptr = reinterpret_cast<uint8_t*>(®); | ||||||
|     switch (offs & 0x3) { |     switch(offs & 0x3) { | ||||||
|     case 0: |     case 0: | ||||||
|         for (auto i = 0U; i < length; ++i) |         for(auto i = 0U; i < length; ++i) | ||||||
|             *(data + i) = *(reg_ptr + i); |             *(data + i) = *(reg_ptr + i); | ||||||
|     break; |         break; | ||||||
|     case 1: |     case 1: | ||||||
|         for (auto i = 0U; i < length; ++i) |         for(auto i = 0U; i < length; ++i) | ||||||
|             *(data + i) = *(reg_ptr + 1 + i); |             *(data + i) = *(reg_ptr + 1 + i); | ||||||
|     break; |         break; | ||||||
|     case 2: |     case 2: | ||||||
|         for (auto i = 0U; i < length; ++i) |         for(auto i = 0U; i < length; ++i) | ||||||
|             *(data + i) = *(reg_ptr + 2 + i); |             *(data + i) = *(reg_ptr + 2 + i); | ||||||
|     break; |         break; | ||||||
|     case 3: |     case 3: | ||||||
|         *data = *(reg_ptr + 3); |         *data = *(reg_ptr + 3); | ||||||
|     break; |         break; | ||||||
|     } |     } | ||||||
| } | } | ||||||
|  |  | ||||||
| inline void write_reg_uint32(uint64_t offs, uint32_t& reg, const uint8_t *const data, unsigned length) { | inline void write_reg_uint32(uint64_t offs, uint32_t& reg, const uint8_t* const data, unsigned length) { | ||||||
|     auto reg_ptr = reinterpret_cast<uint8_t*>(®); |     auto reg_ptr = reinterpret_cast<uint8_t*>(®); | ||||||
|     switch (offs & 0x3) { |     switch(offs & 0x3) { | ||||||
|     case 0: |     case 0: | ||||||
|         for (auto i = 0U; i < length; ++i) |         for(auto i = 0U; i < length; ++i) | ||||||
|             *(reg_ptr + i) = *(data + i); |             *(reg_ptr + i) = *(data + i); | ||||||
|     break; |         break; | ||||||
|     case 1: |     case 1: | ||||||
|         for (auto i = 0U; i < length; ++i) |         for(auto i = 0U; i < length; ++i) | ||||||
|             *(reg_ptr + 1 + i) = *(data + i); |             *(reg_ptr + 1 + i) = *(data + i); | ||||||
|     break; |         break; | ||||||
|     case 2: |     case 2: | ||||||
|         for (auto i = 0U; i < length; ++i) |         for(auto i = 0U; i < length; ++i) | ||||||
|             *(reg_ptr + 2 + i) = *(data + i); |             *(reg_ptr + 2 + i) = *(data + i); | ||||||
|     break; |         break; | ||||||
|     case 3: |     case 3: | ||||||
|         *(reg_ptr + 3) = *data ; |         *(reg_ptr + 3) = *data; | ||||||
|     break; |         break; | ||||||
|     } |     } | ||||||
| } | } | ||||||
|  |  | ||||||
| } | } // namespace arch | ||||||
| } | } // namespace iss | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|   | |||||||
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							| @@ -30,40 +30,37 @@ | |||||||
|  * |  * | ||||||
|  *******************************************************************************/ |  *******************************************************************************/ | ||||||
| 
 | 
 | ||||||
| #include "tgc_c.h" | #include "tgc5c.h" | ||||||
| #include "util/ities.h" | #include "util/ities.h" | ||||||
| #include <util/logging.h> |  | ||||||
| #include <cstdio> | #include <cstdio> | ||||||
| #include <cstring> | #include <cstring> | ||||||
| #include <fstream> | #include <fstream> | ||||||
|  | #include <util/logging.h> | ||||||
| 
 | 
 | ||||||
| using namespace iss::arch; | using namespace iss::arch; | ||||||
| 
 | 
 | ||||||
| constexpr std::array<const char*, 36>    iss::arch::traits<iss::arch::tgc_c>::reg_names; | constexpr std::array<const char*, 36> iss::arch::traits<iss::arch::tgc5c>::reg_names; | ||||||
| constexpr std::array<const char*, 36>    iss::arch::traits<iss::arch::tgc_c>::reg_aliases; | constexpr std::array<const char*, 36> iss::arch::traits<iss::arch::tgc5c>::reg_aliases; | ||||||
| constexpr std::array<const uint32_t, 43> iss::arch::traits<iss::arch::tgc_c>::reg_bit_widths; | constexpr std::array<const uint32_t, 43> iss::arch::traits<iss::arch::tgc5c>::reg_bit_widths; | ||||||
| constexpr std::array<const uint32_t, 43> iss::arch::traits<iss::arch::tgc_c>::reg_byte_offsets; | constexpr std::array<const uint32_t, 43> iss::arch::traits<iss::arch::tgc5c>::reg_byte_offsets; | ||||||
| 
 | 
 | ||||||
| tgc_c::tgc_c()  = default; | tgc5c::tgc5c() = default; | ||||||
| 
 | 
 | ||||||
| tgc_c::~tgc_c() = default; | tgc5c::~tgc5c() = default; | ||||||
| 
 | 
 | ||||||
| void tgc_c::reset(uint64_t address) { | void tgc5c::reset(uint64_t address) { | ||||||
|     auto base_ptr = reinterpret_cast<traits<tgc_c>::reg_t*>(get_regs_base_ptr()); |     auto base_ptr = reinterpret_cast<traits<tgc5c>::reg_t*>(get_regs_base_ptr()); | ||||||
|     for(size_t i=0; i<traits<tgc_c>::NUM_REGS; ++i) |     for(size_t i = 0; i < traits<tgc5c>::NUM_REGS; ++i) | ||||||
|         *(base_ptr+i)=0; |         *(base_ptr + i) = 0; | ||||||
|     reg.PC=address; |     reg.PC = address; | ||||||
|     reg.NEXT_PC=reg.PC; |     reg.NEXT_PC = reg.PC; | ||||||
|     reg.PRIV=0x3; |     reg.PRIV = 0x3; | ||||||
|     reg.trap_state=0; |     reg.trap_state = 0; | ||||||
|     reg.icount=0; |     reg.icount = 0; | ||||||
| } | } | ||||||
| 
 | 
 | ||||||
| uint8_t *tgc_c::get_regs_base_ptr() { | uint8_t* tgc5c::get_regs_base_ptr() { return reinterpret_cast<uint8_t*>(®); } | ||||||
| 	return reinterpret_cast<uint8_t*>(®); |  | ||||||
| } |  | ||||||
| 
 | 
 | ||||||
| tgc_c::phys_addr_t tgc_c::virt2phys(const iss::addr_t &pc) { | tgc5c::phys_addr_t tgc5c::virt2phys(const iss::addr_t& addr) { | ||||||
|     return phys_addr_t(pc); // change logical address to physical address
 |     return phys_addr_t(addr.access, addr.space, addr.val & traits<tgc5c>::addr_mask); | ||||||
| } | } | ||||||
| 
 |  | ||||||
| @@ -30,8 +30,8 @@ | |||||||
|  * |  * | ||||||
|  *******************************************************************************/ |  *******************************************************************************/ | ||||||
| 
 | 
 | ||||||
| #ifndef _TGC_C_H_ | #ifndef _TGC5C_H_ | ||||||
| #define _TGC_C_H_ | #define _TGC5C_H_ | ||||||
| 
 | 
 | ||||||
| #include <array> | #include <array> | ||||||
| #include <iss/arch/traits.h> | #include <iss/arch/traits.h> | ||||||
| @@ -41,48 +41,108 @@ | |||||||
| namespace iss { | namespace iss { | ||||||
| namespace arch { | namespace arch { | ||||||
| 
 | 
 | ||||||
| struct tgc_c; | struct tgc5c; | ||||||
| 
 | 
 | ||||||
| template <> struct traits<tgc_c> { | template <> struct traits<tgc5c> { | ||||||
|  | 
 | ||||||
|  |     constexpr static char const* const core_type = "TGC5C"; | ||||||
|  | 
 | ||||||
|  |     static constexpr std::array<const char*, 36> reg_names{{"x0",  "x1",  "x2",  "x3",  "x4",  "x5",  "x6",      "x7",   "x8", | ||||||
|  |                                                             "x9",  "x10", "x11", "x12", "x13", "x14", "x15",     "x16",  "x17", | ||||||
|  |                                                             "x18", "x19", "x20", "x21", "x22", "x23", "x24",     "x25",  "x26", | ||||||
|  |                                                             "x27", "x28", "x29", "x30", "x31", "pc",  "next_pc", "priv", "dpc"}}; | ||||||
| 
 | 
 | ||||||
|     constexpr static char const* const core_type = "TGC_C"; |  | ||||||
|      |  | ||||||
|     static constexpr std::array<const char*, 36> reg_names{ |  | ||||||
|         {"X0", "X1", "X2", "X3", "X4", "X5", "X6", "X7", "X8", "X9", "X10", "X11", "X12", "X13", "X14", "X15", "X16", "X17", "X18", "X19", "X20", "X21", "X22", "X23", "X24", "X25", "X26", "X27", "X28", "X29", "X30", "X31", "PC", "NEXT_PC", "PRIV", "DPC"}}; |  | ||||||
|   |  | ||||||
|     static constexpr std::array<const char*, 36> reg_aliases{ |     static constexpr std::array<const char*, 36> reg_aliases{ | ||||||
|         {"ZERO", "RA", "SP", "GP", "TP", "T0", "T1", "T2", "S0", "S1", "A0", "A1", "A2", "A3", "A4", "A5", "A6", "A7", "S2", "S3", "S4", "S5", "S6", "S7", "S8", "S9", "S10", "S11", "T3", "T4", "T5", "T6", "PC", "NEXT_PC", "PRIV", "DPC"}}; |         {"zero", "ra", "sp", "gp", "tp", "t0", "t1", "t2", "s0",  "s1",  "a0", "a1", "a2", "a3", "a4", "a5",      "a6",   "a7", | ||||||
|  |          "s2",   "s3", "s4", "s5", "s6", "s7", "s8", "s9", "s10", "s11", "t3", "t4", "t5", "t6", "pc", "next_pc", "priv", "dpc"}}; | ||||||
| 
 | 
 | ||||||
|     enum constants {MISA_VAL=1073746180, MARCHID_VAL=2147483651, XLEN=32, INSTR_ALIGNMENT=2, RFS=32, fence=0, fencei=1, fencevmal=2, fencevmau=3, CSR_SIZE=4096, MUL_LEN=64}; |     enum constants { | ||||||
|  |         MISA_VAL = 1073746180ULL, | ||||||
|  |         MARCHID_VAL = 2147483651ULL, | ||||||
|  |         XLEN = 32ULL, | ||||||
|  |         INSTR_ALIGNMENT = 2ULL, | ||||||
|  |         RFS = 32ULL, | ||||||
|  |         fence = 0ULL, | ||||||
|  |         fencei = 1ULL, | ||||||
|  |         fencevmal = 2ULL, | ||||||
|  |         fencevmau = 3ULL, | ||||||
|  |         CSR_SIZE = 4096ULL, | ||||||
|  |         MUL_LEN = 64ULL | ||||||
|  |     }; | ||||||
| 
 | 
 | ||||||
|     constexpr static unsigned FP_REGS_SIZE = 0; |     constexpr static unsigned FP_REGS_SIZE = 0; | ||||||
| 
 | 
 | ||||||
|     enum reg_e { |     enum reg_e { | ||||||
|         X0, X1, X2, X3, X4, X5, X6, X7, X8, X9, X10, X11, X12, X13, X14, X15, X16, X17, X18, X19, X20, X21, X22, X23, X24, X25, X26, X27, X28, X29, X30, X31, PC, NEXT_PC, PRIV, DPC, NUM_REGS, TRAP_STATE=NUM_REGS, PENDING_TRAP, ICOUNT, CYCLE, INSTRET, INSTRUCTION, LAST_BRANCH |         X0, | ||||||
|  |         X1, | ||||||
|  |         X2, | ||||||
|  |         X3, | ||||||
|  |         X4, | ||||||
|  |         X5, | ||||||
|  |         X6, | ||||||
|  |         X7, | ||||||
|  |         X8, | ||||||
|  |         X9, | ||||||
|  |         X10, | ||||||
|  |         X11, | ||||||
|  |         X12, | ||||||
|  |         X13, | ||||||
|  |         X14, | ||||||
|  |         X15, | ||||||
|  |         X16, | ||||||
|  |         X17, | ||||||
|  |         X18, | ||||||
|  |         X19, | ||||||
|  |         X20, | ||||||
|  |         X21, | ||||||
|  |         X22, | ||||||
|  |         X23, | ||||||
|  |         X24, | ||||||
|  |         X25, | ||||||
|  |         X26, | ||||||
|  |         X27, | ||||||
|  |         X28, | ||||||
|  |         X29, | ||||||
|  |         X30, | ||||||
|  |         X31, | ||||||
|  |         PC, | ||||||
|  |         NEXT_PC, | ||||||
|  |         PRIV, | ||||||
|  |         DPC, | ||||||
|  |         NUM_REGS, | ||||||
|  |         TRAP_STATE = NUM_REGS, | ||||||
|  |         PENDING_TRAP, | ||||||
|  |         ICOUNT, | ||||||
|  |         CYCLE, | ||||||
|  |         INSTRET, | ||||||
|  |         INSTRUCTION, | ||||||
|  |         LAST_BRANCH | ||||||
|     }; |     }; | ||||||
| 
 | 
 | ||||||
|     using reg_t = uint32_t; |     using reg_t = uint32_t; | ||||||
| 
 | 
 | ||||||
|     using addr_t = uint32_t; |     using addr_t = uint32_t; | ||||||
| 
 | 
 | ||||||
|     using code_word_t = uint32_t; //TODO: check removal
 |     using code_word_t = uint32_t; // TODO: check removal
 | ||||||
| 
 | 
 | ||||||
|     using virt_addr_t = iss::typed_addr_t<iss::address_type::VIRTUAL>; |     using virt_addr_t = iss::typed_addr_t<iss::address_type::VIRTUAL>; | ||||||
| 
 | 
 | ||||||
|     using phys_addr_t = iss::typed_addr_t<iss::address_type::PHYSICAL>; |     using phys_addr_t = iss::typed_addr_t<iss::address_type::PHYSICAL>; | ||||||
| 
 | 
 | ||||||
|     static constexpr std::array<const uint32_t, 43> reg_bit_widths{ |     static constexpr std::array<const uint32_t, 43> reg_bit_widths{{32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, | ||||||
|         {32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,8,32,32,32,64,64,64,32,32}}; |                                                                     32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, | ||||||
|  |                                                                     32, 32, 32, 32, 8,  32, 32, 32, 64, 64, 64, 32, 32}}; | ||||||
| 
 | 
 | ||||||
|     static constexpr std::array<const uint32_t, 43> reg_byte_offsets{ |     static constexpr std::array<const uint32_t, 43> reg_byte_offsets{ | ||||||
|         {0,4,8,12,16,20,24,28,32,36,40,44,48,52,56,60,64,68,72,76,80,84,88,92,96,100,104,108,112,116,120,124,128,132,136,137,141,145,149,157,165,173,177}}; |         {0,  4,  8,  12,  16,  20,  24,  28,  32,  36,  40,  44,  48,  52,  56,  60,  64,  68,  72,  76,  80, 84, | ||||||
|  |          88, 92, 96, 100, 104, 108, 112, 116, 120, 124, 128, 132, 136, 137, 141, 145, 149, 157, 165, 173, 177}}; | ||||||
| 
 | 
 | ||||||
|     static const uint64_t addr_mask = (reg_t(1) << (XLEN - 1)) | ((reg_t(1) << (XLEN - 1)) - 1); |     static const uint64_t addr_mask = (reg_t(1) << (XLEN - 1)) | ((reg_t(1) << (XLEN - 1)) - 1); | ||||||
| 
 | 
 | ||||||
|     enum sreg_flag_e { FLAGS }; |     enum sreg_flag_e { FLAGS }; | ||||||
| 
 | 
 | ||||||
|     enum mem_type_e { MEM, FENCE, RES, CSR }; |     enum mem_type_e { MEM, FENCE, RES, CSR }; | ||||||
|      | 
 | ||||||
|     enum class opcode_e { |     enum class opcode_e { | ||||||
|         LUI = 0, |         LUI = 0, | ||||||
|         AUIPC = 1, |         AUIPC = 1, | ||||||
| @@ -141,51 +201,51 @@ template <> struct traits<tgc_c> { | |||||||
|         DIVU = 54, |         DIVU = 54, | ||||||
|         REM = 55, |         REM = 55, | ||||||
|         REMU = 56, |         REMU = 56, | ||||||
|         CADDI4SPN = 57, |         C__ADDI4SPN = 57, | ||||||
|         CLW = 58, |         C__LW = 58, | ||||||
|         CSW = 59, |         C__SW = 59, | ||||||
|         CADDI = 60, |         C__ADDI = 60, | ||||||
|         CNOP = 61, |         C__NOP = 61, | ||||||
|         CJAL = 62, |         C__JAL = 62, | ||||||
|         CLI = 63, |         C__LI = 63, | ||||||
|         CLUI = 64, |         C__LUI = 64, | ||||||
|         CADDI16SP = 65, |         C__ADDI16SP = 65, | ||||||
|         __reserved_clui = 66, |         __reserved_clui = 66, | ||||||
|         CSRLI = 67, |         C__SRLI = 67, | ||||||
|         CSRAI = 68, |         C__SRAI = 68, | ||||||
|         CANDI = 69, |         C__ANDI = 69, | ||||||
|         CSUB = 70, |         C__SUB = 70, | ||||||
|         CXOR = 71, |         C__XOR = 71, | ||||||
|         COR = 72, |         C__OR = 72, | ||||||
|         CAND = 73, |         C__AND = 73, | ||||||
|         CJ = 74, |         C__J = 74, | ||||||
|         CBEQZ = 75, |         C__BEQZ = 75, | ||||||
|         CBNEZ = 76, |         C__BNEZ = 76, | ||||||
|         CSLLI = 77, |         C__SLLI = 77, | ||||||
|         CLWSP = 78, |         C__LWSP = 78, | ||||||
|         CMV = 79, |         C__MV = 79, | ||||||
|         CJR = 80, |         C__JR = 80, | ||||||
|         __reserved_cmv = 81, |         __reserved_cmv = 81, | ||||||
|         CADD = 82, |         C__ADD = 82, | ||||||
|         CJALR = 83, |         C__JALR = 83, | ||||||
|         CEBREAK = 84, |         C__EBREAK = 84, | ||||||
|         CSWSP = 85, |         C__SWSP = 85, | ||||||
|         DII = 86, |         DII = 86, | ||||||
|         MAX_OPCODE |         MAX_OPCODE | ||||||
|     }; |     }; | ||||||
| }; | }; | ||||||
| 
 | 
 | ||||||
| struct tgc_c: public arch_if { | struct tgc5c : public arch_if { | ||||||
| 
 | 
 | ||||||
|     using virt_addr_t = typename traits<tgc_c>::virt_addr_t; |     using virt_addr_t = typename traits<tgc5c>::virt_addr_t; | ||||||
|     using phys_addr_t = typename traits<tgc_c>::phys_addr_t; |     using phys_addr_t = typename traits<tgc5c>::phys_addr_t; | ||||||
|     using reg_t =  typename traits<tgc_c>::reg_t; |     using reg_t = typename traits<tgc5c>::reg_t; | ||||||
|     using addr_t = typename traits<tgc_c>::addr_t; |     using addr_t = typename traits<tgc5c>::addr_t; | ||||||
| 
 | 
 | ||||||
|     tgc_c(); |     tgc5c(); | ||||||
|     ~tgc_c(); |     ~tgc5c(); | ||||||
| 
 | 
 | ||||||
|     void reset(uint64_t address=0) override; |     void reset(uint64_t address = 0) override; | ||||||
| 
 | 
 | ||||||
|     uint8_t* get_regs_base_ptr() override; |     uint8_t* get_regs_base_ptr() override; | ||||||
| 
 | 
 | ||||||
| @@ -195,58 +255,49 @@ struct tgc_c: public arch_if { | |||||||
| 
 | 
 | ||||||
|     inline uint64_t stop_code() { return interrupt_sim; } |     inline uint64_t stop_code() { return interrupt_sim; } | ||||||
| 
 | 
 | ||||||
|     inline phys_addr_t v2p(const iss::addr_t& addr){ |  | ||||||
|         if (addr.space != traits<tgc_c>::MEM || addr.type == iss::address_type::PHYSICAL || |  | ||||||
|                 addr_mode[static_cast<uint16_t>(addr.access)&0x3]==address_type::PHYSICAL) { |  | ||||||
|             return phys_addr_t(addr.access, addr.space, addr.val&traits<tgc_c>::addr_mask); |  | ||||||
|         } else |  | ||||||
|             return virt2phys(addr); |  | ||||||
|     } |  | ||||||
| 
 |  | ||||||
|     virtual phys_addr_t virt2phys(const iss::addr_t& addr); |     virtual phys_addr_t virt2phys(const iss::addr_t& addr); | ||||||
| 
 | 
 | ||||||
|     virtual iss::sync_type needed_sync() const { return iss::NO_SYNC; } |     virtual iss::sync_type needed_sync() const { return iss::NO_SYNC; } | ||||||
| 
 | 
 | ||||||
|     inline uint32_t get_last_branch() { return reg.last_branch; } |     inline uint32_t get_last_branch() { return reg.last_branch; } | ||||||
| 
 | 
 | ||||||
| 
 |  | ||||||
| #pragma pack(push, 1) | #pragma pack(push, 1) | ||||||
|     struct TGC_C_regs {  |     struct TGC5C_regs { | ||||||
|         uint32_t X0 = 0;  |         uint32_t X0 = 0; | ||||||
|         uint32_t X1 = 0;  |         uint32_t X1 = 0; | ||||||
|         uint32_t X2 = 0;  |         uint32_t X2 = 0; | ||||||
|         uint32_t X3 = 0;  |         uint32_t X3 = 0; | ||||||
|         uint32_t X4 = 0;  |         uint32_t X4 = 0; | ||||||
|         uint32_t X5 = 0;  |         uint32_t X5 = 0; | ||||||
|         uint32_t X6 = 0;  |         uint32_t X6 = 0; | ||||||
|         uint32_t X7 = 0;  |         uint32_t X7 = 0; | ||||||
|         uint32_t X8 = 0;  |         uint32_t X8 = 0; | ||||||
|         uint32_t X9 = 0;  |         uint32_t X9 = 0; | ||||||
|         uint32_t X10 = 0;  |         uint32_t X10 = 0; | ||||||
|         uint32_t X11 = 0;  |         uint32_t X11 = 0; | ||||||
|         uint32_t X12 = 0;  |         uint32_t X12 = 0; | ||||||
|         uint32_t X13 = 0;  |         uint32_t X13 = 0; | ||||||
|         uint32_t X14 = 0;  |         uint32_t X14 = 0; | ||||||
|         uint32_t X15 = 0;  |         uint32_t X15 = 0; | ||||||
|         uint32_t X16 = 0;  |         uint32_t X16 = 0; | ||||||
|         uint32_t X17 = 0;  |         uint32_t X17 = 0; | ||||||
|         uint32_t X18 = 0;  |         uint32_t X18 = 0; | ||||||
|         uint32_t X19 = 0;  |         uint32_t X19 = 0; | ||||||
|         uint32_t X20 = 0;  |         uint32_t X20 = 0; | ||||||
|         uint32_t X21 = 0;  |         uint32_t X21 = 0; | ||||||
|         uint32_t X22 = 0;  |         uint32_t X22 = 0; | ||||||
|         uint32_t X23 = 0;  |         uint32_t X23 = 0; | ||||||
|         uint32_t X24 = 0;  |         uint32_t X24 = 0; | ||||||
|         uint32_t X25 = 0;  |         uint32_t X25 = 0; | ||||||
|         uint32_t X26 = 0;  |         uint32_t X26 = 0; | ||||||
|         uint32_t X27 = 0;  |         uint32_t X27 = 0; | ||||||
|         uint32_t X28 = 0;  |         uint32_t X28 = 0; | ||||||
|         uint32_t X29 = 0;  |         uint32_t X29 = 0; | ||||||
|         uint32_t X30 = 0;  |         uint32_t X30 = 0; | ||||||
|         uint32_t X31 = 0;  |         uint32_t X31 = 0; | ||||||
|         uint32_t PC = 0;  |         uint32_t PC = 0; | ||||||
|         uint32_t NEXT_PC = 0;  |         uint32_t NEXT_PC = 0; | ||||||
|         uint8_t PRIV = 0;  |         uint8_t PRIV = 0; | ||||||
|         uint32_t DPC = 0; |         uint32_t DPC = 0; | ||||||
|         uint32_t trap_state = 0, pending_trap = 0; |         uint32_t trap_state = 0, pending_trap = 0; | ||||||
|         uint64_t icount = 0; |         uint64_t icount = 0; | ||||||
| @@ -257,14 +308,13 @@ struct tgc_c: public arch_if { | |||||||
|     } reg; |     } reg; | ||||||
| #pragma pack(pop) | #pragma pack(pop) | ||||||
|     std::array<address_type, 4> addr_mode; |     std::array<address_type, 4> addr_mode; | ||||||
|      |  | ||||||
|     uint64_t interrupt_sim=0; |  | ||||||
| 
 | 
 | ||||||
|     uint32_t get_fcsr(){return 0;} |     uint64_t interrupt_sim = 0; | ||||||
|     void set_fcsr(uint32_t val){} |  | ||||||
| 
 | 
 | ||||||
|  |     uint32_t get_fcsr() { return 0; } | ||||||
|  |     void set_fcsr(uint32_t val) {} | ||||||
| }; | }; | ||||||
| 
 | 
 | ||||||
| } | } // namespace arch
 | ||||||
| }             | } // namespace iss
 | ||||||
| #endif /* _TGC_C_H_ */ | #endif /* _TGC5C_H_ */ | ||||||
| @@ -1,175 +0,0 @@ | |||||||
| #include "tgc_c.h" |  | ||||||
| #include <vector> |  | ||||||
| #include <array> |  | ||||||
| #include <cstdlib> |  | ||||||
| #include <algorithm> |  | ||||||
|  |  | ||||||
| namespace iss { |  | ||||||
| namespace arch { |  | ||||||
| namespace { |  | ||||||
| // according to |  | ||||||
| // https://stackoverflow.com/questions/8871204/count-number-of-1s-in-binary-representation |  | ||||||
| #ifdef __GCC__ |  | ||||||
| constexpr size_t bit_count(uint32_t u) { return __builtin_popcount(u); } |  | ||||||
| #elif __cplusplus < 201402L |  | ||||||
| constexpr size_t uCount(uint32_t u) { return u - ((u >> 1) & 033333333333) - ((u >> 2) & 011111111111); } |  | ||||||
| constexpr size_t bit_count(uint32_t u) { return ((uCount(u) + (uCount(u) >> 3)) & 030707070707) % 63; } |  | ||||||
| #else |  | ||||||
| constexpr size_t bit_count(uint32_t u) { |  | ||||||
|     size_t uCount = u - ((u >> 1) & 033333333333) - ((u >> 2) & 011111111111); |  | ||||||
|     return ((uCount + (uCount >> 3)) & 030707070707) % 63; |  | ||||||
| } |  | ||||||
| #endif |  | ||||||
|  |  | ||||||
| using opcode_e = traits<tgc_c>::opcode_e; |  | ||||||
|  |  | ||||||
| /**************************************************************************** |  | ||||||
|  * start opcode definitions |  | ||||||
|  ****************************************************************************/ |  | ||||||
| struct instruction_desriptor { |  | ||||||
|     size_t length; |  | ||||||
|     uint32_t value; |  | ||||||
|     uint32_t mask; |  | ||||||
|     opcode_e op; |  | ||||||
| }; |  | ||||||
|  |  | ||||||
| const std::array<instruction_desriptor, 90> instr_descr = {{ |  | ||||||
|      /* entries are: size, valid value, valid mask, function ptr */ |  | ||||||
|     {32, 0b00000000000000000000000000110111, 0b00000000000000000000000001111111, opcode_e::LUI}, |  | ||||||
|     {32, 0b00000000000000000000000000010111, 0b00000000000000000000000001111111, opcode_e::AUIPC}, |  | ||||||
|     {32, 0b00000000000000000000000001101111, 0b00000000000000000000000001111111, opcode_e::JAL}, |  | ||||||
|     {32, 0b00000000000000000000000001100111, 0b00000000000000000111000001111111, opcode_e::JALR}, |  | ||||||
|     {32, 0b00000000000000000000000001100011, 0b00000000000000000111000001111111, opcode_e::BEQ}, |  | ||||||
|     {32, 0b00000000000000000001000001100011, 0b00000000000000000111000001111111, opcode_e::BNE}, |  | ||||||
|     {32, 0b00000000000000000100000001100011, 0b00000000000000000111000001111111, opcode_e::BLT}, |  | ||||||
|     {32, 0b00000000000000000101000001100011, 0b00000000000000000111000001111111, opcode_e::BGE}, |  | ||||||
|     {32, 0b00000000000000000110000001100011, 0b00000000000000000111000001111111, opcode_e::BLTU}, |  | ||||||
|     {32, 0b00000000000000000111000001100011, 0b00000000000000000111000001111111, opcode_e::BGEU}, |  | ||||||
|     {32, 0b00000000000000000000000000000011, 0b00000000000000000111000001111111, opcode_e::LB}, |  | ||||||
|     {32, 0b00000000000000000001000000000011, 0b00000000000000000111000001111111, opcode_e::LH}, |  | ||||||
|     {32, 0b00000000000000000010000000000011, 0b00000000000000000111000001111111, opcode_e::LW}, |  | ||||||
|     {32, 0b00000000000000000100000000000011, 0b00000000000000000111000001111111, opcode_e::LBU}, |  | ||||||
|     {32, 0b00000000000000000101000000000011, 0b00000000000000000111000001111111, opcode_e::LHU}, |  | ||||||
|     {32, 0b00000000000000000000000000100011, 0b00000000000000000111000001111111, opcode_e::SB}, |  | ||||||
|     {32, 0b00000000000000000001000000100011, 0b00000000000000000111000001111111, opcode_e::SH}, |  | ||||||
|     {32, 0b00000000000000000010000000100011, 0b00000000000000000111000001111111, opcode_e::SW}, |  | ||||||
|     {32, 0b00000000000000000000000000010011, 0b00000000000000000111000001111111, opcode_e::ADDI}, |  | ||||||
|     {32, 0b00000000000000000010000000010011, 0b00000000000000000111000001111111, opcode_e::SLTI}, |  | ||||||
|     {32, 0b00000000000000000011000000010011, 0b00000000000000000111000001111111, opcode_e::SLTIU}, |  | ||||||
|     {32, 0b00000000000000000100000000010011, 0b00000000000000000111000001111111, opcode_e::XORI}, |  | ||||||
|     {32, 0b00000000000000000110000000010011, 0b00000000000000000111000001111111, opcode_e::ORI}, |  | ||||||
|     {32, 0b00000000000000000111000000010011, 0b00000000000000000111000001111111, opcode_e::ANDI}, |  | ||||||
|     {32, 0b00000000000000000001000000010011, 0b11111110000000000111000001111111, opcode_e::SLLI}, |  | ||||||
|     {32, 0b00000000000000000101000000010011, 0b11111110000000000111000001111111, opcode_e::SRLI}, |  | ||||||
|     {32, 0b01000000000000000101000000010011, 0b11111110000000000111000001111111, opcode_e::SRAI}, |  | ||||||
|     {32, 0b00000000000000000000000000110011, 0b11111110000000000111000001111111, opcode_e::ADD}, |  | ||||||
|     {32, 0b01000000000000000000000000110011, 0b11111110000000000111000001111111, opcode_e::SUB}, |  | ||||||
|     {32, 0b00000000000000000001000000110011, 0b11111110000000000111000001111111, opcode_e::SLL}, |  | ||||||
|     {32, 0b00000000000000000010000000110011, 0b11111110000000000111000001111111, opcode_e::SLT}, |  | ||||||
|     {32, 0b00000000000000000011000000110011, 0b11111110000000000111000001111111, opcode_e::SLTU}, |  | ||||||
|     {32, 0b00000000000000000100000000110011, 0b11111110000000000111000001111111, opcode_e::XOR}, |  | ||||||
|     {32, 0b00000000000000000101000000110011, 0b11111110000000000111000001111111, opcode_e::SRL}, |  | ||||||
|     {32, 0b01000000000000000101000000110011, 0b11111110000000000111000001111111, opcode_e::SRA}, |  | ||||||
|     {32, 0b00000000000000000110000000110011, 0b11111110000000000111000001111111, opcode_e::OR}, |  | ||||||
|     {32, 0b00000000000000000111000000110011, 0b11111110000000000111000001111111, opcode_e::AND}, |  | ||||||
|     {32, 0b00000000000000000000000000001111, 0b00000000000000000111000001111111, opcode_e::FENCE}, |  | ||||||
|     {32, 0b00000000000000000000000001110011, 0b11111111111111111111111111111111, opcode_e::ECALL}, |  | ||||||
|     {32, 0b00000000000100000000000001110011, 0b11111111111111111111111111111111, opcode_e::EBREAK}, |  | ||||||
|     {32, 0b00000000001000000000000001110011, 0b11111111111111111111111111111111, opcode_e::URET}, |  | ||||||
|     {32, 0b00010000001000000000000001110011, 0b11111111111111111111111111111111, opcode_e::SRET}, |  | ||||||
|     {32, 0b00110000001000000000000001110011, 0b11111111111111111111111111111111, opcode_e::MRET}, |  | ||||||
|     {32, 0b00010000010100000000000001110011, 0b11111111111111111111111111111111, opcode_e::WFI}, |  | ||||||
|     {32, 0b01111011001000000000000001110011, 0b11111111111111111111111111111111, opcode_e::DRET}, |  | ||||||
|     {32, 0b00000000000000000001000001110011, 0b00000000000000000111000001111111, opcode_e::CSRRW}, |  | ||||||
|     {32, 0b00000000000000000010000001110011, 0b00000000000000000111000001111111, opcode_e::CSRRS}, |  | ||||||
|     {32, 0b00000000000000000011000001110011, 0b00000000000000000111000001111111, opcode_e::CSRRC}, |  | ||||||
|     {32, 0b00000000000000000101000001110011, 0b00000000000000000111000001111111, opcode_e::CSRRWI}, |  | ||||||
|     {32, 0b00000000000000000110000001110011, 0b00000000000000000111000001111111, opcode_e::CSRRSI}, |  | ||||||
|     {32, 0b00000000000000000111000001110011, 0b00000000000000000111000001111111, opcode_e::CSRRCI}, |  | ||||||
|     {32, 0b00000000000000000001000000001111, 0b00000000000000000111000001111111, opcode_e::FENCE_I}, |  | ||||||
|     {32, 0b00000010000000000000000000110011, 0b11111110000000000111000001111111, opcode_e::MUL}, |  | ||||||
|     {32, 0b00000010000000000001000000110011, 0b11111110000000000111000001111111, opcode_e::MULH}, |  | ||||||
|     {32, 0b00000010000000000010000000110011, 0b11111110000000000111000001111111, opcode_e::MULHSU}, |  | ||||||
|     {32, 0b00000010000000000011000000110011, 0b11111110000000000111000001111111, opcode_e::MULHU}, |  | ||||||
|     {32, 0b00000010000000000100000000110011, 0b11111110000000000111000001111111, opcode_e::DIV}, |  | ||||||
|     {32, 0b00000010000000000101000000110011, 0b11111110000000000111000001111111, opcode_e::DIVU}, |  | ||||||
|     {32, 0b00000010000000000110000000110011, 0b11111110000000000111000001111111, opcode_e::REM}, |  | ||||||
|     {32, 0b00000010000000000111000000110011, 0b11111110000000000111000001111111, opcode_e::REMU}, |  | ||||||
|     {16, 0b0000000000000000, 0b1110000000000011, opcode_e::CADDI4SPN}, |  | ||||||
|     {16, 0b0100000000000000, 0b1110000000000011, opcode_e::CLW}, |  | ||||||
|     {16, 0b1100000000000000, 0b1110000000000011, opcode_e::CSW}, |  | ||||||
|     {16, 0b0000000000000001, 0b1110000000000011, opcode_e::CADDI}, |  | ||||||
|     {16, 0b0000000000000001, 0b1110111110000011, opcode_e::CNOP}, |  | ||||||
|     {16, 0b0010000000000001, 0b1110000000000011, opcode_e::CJAL}, |  | ||||||
|     {16, 0b0100000000000001, 0b1110000000000011, opcode_e::CLI}, |  | ||||||
|     {16, 0b0110000000000001, 0b1110000000000011, opcode_e::CLUI}, |  | ||||||
|     {16, 0b0110000100000001, 0b1110111110000011, opcode_e::CADDI16SP}, |  | ||||||
|     {16, 0b0110000000000001, 0b1111000001111111, opcode_e::__reserved_clui}, |  | ||||||
|     {16, 0b1000000000000001, 0b1111110000000011, opcode_e::CSRLI}, |  | ||||||
|     {16, 0b1000010000000001, 0b1111110000000011, opcode_e::CSRAI}, |  | ||||||
|     {16, 0b1000100000000001, 0b1110110000000011, opcode_e::CANDI}, |  | ||||||
|     {16, 0b1000110000000001, 0b1111110001100011, opcode_e::CSUB}, |  | ||||||
|     {16, 0b1000110000100001, 0b1111110001100011, opcode_e::CXOR}, |  | ||||||
|     {16, 0b1000110001000001, 0b1111110001100011, opcode_e::COR}, |  | ||||||
|     {16, 0b1000110001100001, 0b1111110001100011, opcode_e::CAND}, |  | ||||||
|     {16, 0b1010000000000001, 0b1110000000000011, opcode_e::CJ}, |  | ||||||
|     {16, 0b1100000000000001, 0b1110000000000011, opcode_e::CBEQZ}, |  | ||||||
|     {16, 0b1110000000000001, 0b1110000000000011, opcode_e::CBNEZ}, |  | ||||||
|     {16, 0b0000000000000010, 0b1111000000000011, opcode_e::CSLLI}, |  | ||||||
|     {16, 0b0100000000000010, 0b1110000000000011, opcode_e::CLWSP}, |  | ||||||
|     {16, 0b1000000000000010, 0b1111000000000011, opcode_e::CMV}, |  | ||||||
|     {16, 0b1000000000000010, 0b1111000001111111, opcode_e::CJR}, |  | ||||||
|     {16, 0b1000000000000010, 0b1111111111111111, opcode_e::__reserved_cmv}, |  | ||||||
|     {16, 0b1001000000000010, 0b1111000000000011, opcode_e::CADD}, |  | ||||||
|     {16, 0b1001000000000010, 0b1111000001111111, opcode_e::CJALR}, |  | ||||||
|     {16, 0b1001000000000010, 0b1111111111111111, opcode_e::CEBREAK}, |  | ||||||
|     {16, 0b1100000000000010, 0b1110000000000011, opcode_e::CSWSP}, |  | ||||||
|     {16, 0b0000000000000000, 0b1111111111111111, opcode_e::DII}, |  | ||||||
| }}; |  | ||||||
|  |  | ||||||
| } |  | ||||||
|  |  | ||||||
| template<> |  | ||||||
| struct instruction_decoder<tgc_c> { |  | ||||||
|     using opcode_e = traits<tgc_c>::opcode_e; |  | ||||||
|     using code_word_t=traits<tgc_c>::code_word_t; |  | ||||||
|  |  | ||||||
|     struct instruction_pattern { |  | ||||||
|         uint32_t value; |  | ||||||
|         uint32_t mask; |  | ||||||
|         opcode_e id; |  | ||||||
|     }; |  | ||||||
|  |  | ||||||
|     std::array<std::vector<instruction_pattern>, 4> qlut; |  | ||||||
|  |  | ||||||
|     template<typename T> |  | ||||||
|     unsigned decode_instruction(T); |  | ||||||
|  |  | ||||||
|     instruction_decoder() { |  | ||||||
|         for (auto instr : instr_descr) { |  | ||||||
|             auto quadrant = instr.value & 0x3; |  | ||||||
|             qlut[quadrant].push_back(instruction_pattern{instr.value, instr.mask, instr.op}); |  | ||||||
|         } |  | ||||||
|         for(auto& lut: qlut){ |  | ||||||
|             std::sort(std::begin(lut), std::end(lut), [](instruction_pattern const& a, instruction_pattern const& b){ |  | ||||||
|                 return bit_count(a.mask) > bit_count(b.mask); |  | ||||||
|             }); |  | ||||||
|         } |  | ||||||
|     } |  | ||||||
| }; |  | ||||||
|  |  | ||||||
| template<> |  | ||||||
| unsigned instruction_decoder<tgc_c>::decode_instruction<traits<tgc_c>::code_word_t>(traits<tgc_c>::code_word_t instr){ |  | ||||||
|     auto res = std::find_if(std::begin(qlut[instr&0x3]), std::end(qlut[instr&0x3]), [instr](instruction_pattern const& e){ |  | ||||||
|         return !((instr&e.mask) ^ e.value ); |  | ||||||
|     }); |  | ||||||
|     return static_cast<unsigned>(res!=std::end(qlut[instr&0x3])? res->id : opcode_e::MAX_OPCODE); |  | ||||||
| } |  | ||||||
|  |  | ||||||
|  |  | ||||||
| std::unique_ptr<instruction_decoder<tgc_c>> traits<tgc_c>::get_decoder(){ |  | ||||||
|     return std::make_unique<instruction_decoder<tgc_c>>(); |  | ||||||
| } |  | ||||||
|  |  | ||||||
| } |  | ||||||
| } |  | ||||||
| @@ -2,49 +2,56 @@ | |||||||
| #define _ISS_ARCH_TGC_MAPPER_H | #define _ISS_ARCH_TGC_MAPPER_H | ||||||
|  |  | ||||||
| #include "riscv_hart_m_p.h" | #include "riscv_hart_m_p.h" | ||||||
| #include "tgc_c.h" | #include "tgc5c.h" | ||||||
| using tgc_c_plat_type = iss::arch::riscv_hart_m_p<iss::arch::tgc_c>; | using tgc5c_plat_type = iss::arch::riscv_hart_m_p<iss::arch::tgc5c>; | ||||||
| #ifdef CORE_TGC_A | #ifdef CORE_TGC5A | ||||||
| #include "riscv_hart_m_p.h" | #include "riscv_hart_m_p.h" | ||||||
| #include <iss/arch/tgc_a.h> | #include <iss/arch/tgc5a.h> | ||||||
| using tgc_a_plat_type = iss::arch::riscv_hart_m_p<iss::arch::tgc_a>; | using tgc5a_plat_type = iss::arch::riscv_hart_m_p<iss::arch::tgc5a>; | ||||||
| #endif | #endif | ||||||
| #ifdef CORE_TGC_B | #ifdef CORE_TGC5B | ||||||
| #include "riscv_hart_m_p.h" | #include "riscv_hart_m_p.h" | ||||||
| #include <iss/arch/tgc_b.h> | #include <iss/arch/tgc5b.h> | ||||||
| using tgc_b_plat_type = iss::arch::riscv_hart_m_p<iss::arch::tgc_b>; | using tgc5b_plat_type = iss::arch::riscv_hart_m_p<iss::arch::tgc5b>; | ||||||
| #endif | #endif | ||||||
| #ifdef CORE_TGC_C_XRB_NN | #ifdef CORE_TGC5C_XRB_NN | ||||||
| #include "riscv_hart_m_p.h" |  | ||||||
| #include "hwl.h" | #include "hwl.h" | ||||||
| #include <iss/arch/tgc_c_xrb_nn.h> | #include "riscv_hart_m_p.h" | ||||||
| using tgc_c_xrb_nn_plat_type = iss::arch::hwl<iss::arch::riscv_hart_m_p<iss::arch::tgc_c_xrb_nn>>; | #include <iss/arch/tgc5c_xrb_nn.h> | ||||||
|  | using tgc5c_xrb_nn_plat_type = iss::arch::hwl<iss::arch::riscv_hart_m_p<iss::arch::tgc5c_xrb_nn>>; | ||||||
| #endif | #endif | ||||||
| #ifdef CORE_TGC_D | #ifdef CORE_TGC5D | ||||||
| #include "riscv_hart_mu_p.h" | #include "riscv_hart_mu_p.h" | ||||||
| #include <iss/arch/tgc_d.h> | #include <iss/arch/tgc5d.h> | ||||||
| using tgc_d_plat_type = iss::arch::riscv_hart_mu_p<iss::arch::tgc_d, (iss::arch::features_e)(iss::arch::FEAT_PMP | iss::arch::FEAT_CLIC | iss::arch::FEAT_EXT_N)>; | using tgc5d_plat_type = iss::arch::riscv_hart_mu_p<iss::arch::tgc5d, (iss::arch::features_e)(iss::arch::FEAT_PMP | iss::arch::FEAT_CLIC | | ||||||
|  |                                                                                              iss::arch::FEAT_EXT_N)>; | ||||||
| #endif | #endif | ||||||
| #ifdef CORE_TGC_D_XRB_MAC | #ifdef CORE_TGC5D_XRB_MAC | ||||||
| #include "riscv_hart_mu_p.h" | #include "riscv_hart_mu_p.h" | ||||||
| #include <iss/arch/tgc_d_xrb_mac.h> | #include <iss/arch/tgc5d_xrb_mac.h> | ||||||
| using tgc_d_xrb_mac_plat_type = iss::arch::riscv_hart_mu_p<iss::arch::tgc_d_xrb_mac, (iss::arch::features_e)(iss::arch::FEAT_PMP | iss::arch::FEAT_CLIC | iss::arch::FEAT_EXT_N)>; | using tgc5d_xrb_mac_plat_type = | ||||||
|  |     iss::arch::riscv_hart_mu_p<iss::arch::tgc5d_xrb_mac, | ||||||
|  |                                (iss::arch::features_e)(iss::arch::FEAT_PMP | iss::arch::FEAT_CLIC | iss::arch::FEAT_EXT_N)>; | ||||||
| #endif | #endif | ||||||
| #ifdef CORE_TGC_D_XRB_NN | #ifdef CORE_TGC5D_XRB_NN | ||||||
| #include "riscv_hart_mu_p.h" |  | ||||||
| #include "hwl.h" | #include "hwl.h" | ||||||
| #include <iss/arch/tgc_d_xrb_nn.h> |  | ||||||
| using tgc_d_xrb_nn_plat_type = iss::arch::hwl<iss::arch::riscv_hart_mu_p<iss::arch::tgc_d_xrb_nn, (iss::arch::features_e)(iss::arch::FEAT_PMP | iss::arch::FEAT_CLIC | iss::arch::FEAT_EXT_N)>>; |  | ||||||
| #endif |  | ||||||
| #ifdef CORE_TGC_E |  | ||||||
| #include "riscv_hart_mu_p.h" | #include "riscv_hart_mu_p.h" | ||||||
| #include <iss/arch/tgc_e.h> | #include <iss/arch/tgc5d_xrb_nn.h> | ||||||
| using tgc_e_plat_type = iss::arch::riscv_hart_mu_p<iss::arch::tgc_e, (iss::arch::features_e)(iss::arch::FEAT_PMP | iss::arch::FEAT_CLIC | iss::arch::FEAT_EXT_N)>; | using tgc5d_xrb_nn_plat_type = | ||||||
|  |     iss::arch::hwl<iss::arch::riscv_hart_mu_p<iss::arch::tgc5d_xrb_nn, | ||||||
|  |                                               (iss::arch::features_e)(iss::arch::FEAT_PMP | iss::arch::FEAT_CLIC | iss::arch::FEAT_EXT_N)>>; | ||||||
| #endif | #endif | ||||||
| #ifdef CORE_TGC_X | #ifdef CORE_TGC5E | ||||||
| #include "riscv_hart_mu_p.h" | #include "riscv_hart_mu_p.h" | ||||||
| #include <iss/arch/tgc_x.h> | #include <iss/arch/tgc5e.h> | ||||||
| using tgc_x_plat_type = iss::arch::riscv_hart_mu_p<iss::arch::tgc_x, (iss::arch::features_e)(iss::arch::FEAT_PMP | iss::arch::FEAT_CLIC | iss::arch::FEAT_EXT_N | iss::arch::FEAT_TCM)>; | using tgc5e_plat_type = iss::arch::riscv_hart_mu_p<iss::arch::tgc5e, (iss::arch::features_e)(iss::arch::FEAT_PMP | iss::arch::FEAT_CLIC | | ||||||
|  |                                                                                              iss::arch::FEAT_EXT_N)>; | ||||||
|  | #endif | ||||||
|  | #ifdef CORE_TGC5X | ||||||
|  | #include "riscv_hart_mu_p.h" | ||||||
|  | #include <iss/arch/tgc5x.h> | ||||||
|  | using tgc5x_plat_type = iss::arch::riscv_hart_mu_p<iss::arch::tgc5x, (iss::arch::features_e)(iss::arch::FEAT_PMP | iss::arch::FEAT_CLIC | | ||||||
|  |                                                                                              iss::arch::FEAT_EXT_N | iss::arch::FEAT_TCM)>; | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|   | |||||||
| @@ -36,25 +36,27 @@ | |||||||
| #define _RISCV_HART_M_P_WT_CACHE_H | #define _RISCV_HART_M_P_WT_CACHE_H | ||||||
|  |  | ||||||
| #include <iss/vm_types.h> | #include <iss/vm_types.h> | ||||||
| #include <util/ities.h> |  | ||||||
| #include <vector> |  | ||||||
| #include <map> | #include <map> | ||||||
| #include <memory> | #include <memory> | ||||||
|  | #include <util/ities.h> | ||||||
|  | #include <vector> | ||||||
|  |  | ||||||
| namespace iss { | namespace iss { | ||||||
| namespace arch { | namespace arch { | ||||||
| namespace cache { | namespace cache { | ||||||
|  |  | ||||||
| enum class state { INVALID, VALID}; | enum class state { INVALID, VALID }; | ||||||
| struct line { | struct line { | ||||||
|     uint64_t tag_addr{0}; |     uint64_t tag_addr{0}; | ||||||
|     state st{state::INVALID}; |     state st{state::INVALID}; | ||||||
|     std::vector<uint8_t> data; |     std::vector<uint8_t> data; | ||||||
|     line(unsigned line_sz):  data(line_sz) {} |     line(unsigned line_sz) | ||||||
|  |     : data(line_sz) {} | ||||||
| }; | }; | ||||||
| struct set { | struct set { | ||||||
|     std::vector<line> ways; |     std::vector<line> ways; | ||||||
|     set(unsigned ways_count, line const& l): ways(ways_count, l) {} |     set(unsigned ways_count, line const& l) | ||||||
|  |     : ways(ways_count, l) {} | ||||||
| }; | }; | ||||||
| struct cache { | struct cache { | ||||||
|     std::vector<set> sets; |     std::vector<set> sets; | ||||||
| @@ -62,14 +64,14 @@ struct cache { | |||||||
|     cache(unsigned size, unsigned line_sz, unsigned ways) { |     cache(unsigned size, unsigned line_sz, unsigned ways) { | ||||||
|         line const ref_line{line_sz}; |         line const ref_line{line_sz}; | ||||||
|         set const ref_set{ways, ref_line}; |         set const ref_set{ways, ref_line}; | ||||||
|         sets.resize(size/(ways*line_sz), ref_set); |         sets.resize(size / (ways * line_sz), ref_set); | ||||||
|     } |     } | ||||||
| }; | }; | ||||||
|  |  | ||||||
| struct wt_policy { | struct wt_policy { | ||||||
|     bool is_cacheline_hit(cache& c ); |     bool is_cacheline_hit(cache& c); | ||||||
| }; | }; | ||||||
| } | } // namespace cache | ||||||
|  |  | ||||||
| // write thru, allocate on read, direct mapped or set-associative with round-robin replacement policy | // write thru, allocate on read, direct mapped or set-associative with round-robin replacement policy | ||||||
| template <typename BASE> class wt_cache : public BASE { | template <typename BASE> class wt_cache : public BASE { | ||||||
| @@ -81,7 +83,7 @@ public: | |||||||
|     using mem_write_f = typename BASE::mem_write_f; |     using mem_write_f = typename BASE::mem_write_f; | ||||||
|     using phys_addr_t = typename BASE::phys_addr_t; |     using phys_addr_t = typename BASE::phys_addr_t; | ||||||
|  |  | ||||||
|     wt_cache(); |     wt_cache(feature_config cfg = feature_config{}); | ||||||
|     virtual ~wt_cache() = default; |     virtual ~wt_cache() = default; | ||||||
|  |  | ||||||
|     unsigned size{4096}; |     unsigned size{4096}; | ||||||
| @@ -89,74 +91,73 @@ public: | |||||||
|     unsigned ways{1}; |     unsigned ways{1}; | ||||||
|     uint64_t io_address{0xf0000000}; |     uint64_t io_address{0xf0000000}; | ||||||
|     uint64_t io_addr_mask{0xf0000000}; |     uint64_t io_addr_mask{0xf0000000}; | ||||||
|  |  | ||||||
| protected: | protected: | ||||||
|     iss::status read_cache(phys_addr_t addr, unsigned, uint8_t *const); |     iss::status read_cache(phys_addr_t addr, unsigned, uint8_t* const); | ||||||
|     iss::status write_cache(phys_addr_t addr, unsigned, uint8_t const *const); |     iss::status write_cache(phys_addr_t addr, unsigned, uint8_t const* const); | ||||||
|     std::function<mem_read_f> cache_mem_rd_delegate; |     std::function<mem_read_f> cache_mem_rd_delegate; | ||||||
|     std::function<mem_write_f> cache_mem_wr_delegate; |     std::function<mem_write_f> cache_mem_wr_delegate; | ||||||
|     std::unique_ptr<cache::cache> dcache_ptr; |     std::unique_ptr<cache::cache> dcache_ptr; | ||||||
|     std::unique_ptr<cache::cache> icache_ptr; |     std::unique_ptr<cache::cache> icache_ptr; | ||||||
|     size_t get_way_select() { |     size_t get_way_select() { return 0; } | ||||||
|         return 0; |  | ||||||
|     } |  | ||||||
| }; | }; | ||||||
|  |  | ||||||
|  | template <typename BASE> | ||||||
| template<typename BASE> | inline wt_cache<BASE>::wt_cache(feature_config cfg) | ||||||
| inline wt_cache<BASE>::wt_cache() { | : BASE(cfg) | ||||||
|  | , io_address{cfg.io_address} | ||||||
|  | , io_addr_mask{cfg.io_addr_mask} { | ||||||
|     auto cb = base_class::replace_mem_access( |     auto cb = base_class::replace_mem_access( | ||||||
|             [this](phys_addr_t a, unsigned l, uint8_t* const d) -> iss::status { return read_cache(a, l,d);}, |         [this](phys_addr_t a, unsigned l, uint8_t* const d) -> iss::status { return read_cache(a, l, d); }, | ||||||
|             [this](phys_addr_t a, unsigned l, uint8_t const* const d) -> iss::status { return write_cache(a, l,d);}); |         [this](phys_addr_t a, unsigned l, uint8_t const* const d) -> iss::status { return write_cache(a, l, d); }); | ||||||
|     cache_mem_rd_delegate = cb.first; |     cache_mem_rd_delegate = cb.first; | ||||||
|     cache_mem_wr_delegate = cb.second; |     cache_mem_wr_delegate = cb.second; | ||||||
| } | } | ||||||
|  |  | ||||||
| template<typename BASE> | template <typename BASE> iss::status iss::arch::wt_cache<BASE>::read_cache(phys_addr_t a, unsigned l, uint8_t* const d) { | ||||||
| iss::status iss::arch::wt_cache<BASE>::read_cache(phys_addr_t a, unsigned l, uint8_t* const d) { |  | ||||||
|     if(!icache_ptr) { |     if(!icache_ptr) { | ||||||
|         icache_ptr.reset(new cache::cache(size, line_sz, ways)); |         icache_ptr.reset(new cache::cache(size, line_sz, ways)); | ||||||
|         dcache_ptr.reset(new cache::cache(size, line_sz, ways)); |         dcache_ptr.reset(new cache::cache(size, line_sz, ways)); | ||||||
|     } |     } | ||||||
|     if((a.val&io_addr_mask) != io_address) { |     if((a.val & io_addr_mask) != io_address) { | ||||||
|         auto set_addr=(a.val&(size-1))>>util::ilog2(line_sz*ways); |         auto set_addr = (a.val & (size - 1)) >> util::ilog2(line_sz * ways); | ||||||
|         auto tag_addr=a.val>>util::ilog2(line_sz); |         auto tag_addr = a.val >> util::ilog2(line_sz); | ||||||
|         auto& set = (is_fetch(a.access)?icache_ptr:dcache_ptr)->sets[set_addr]; |         auto& set = (is_fetch(a.access) ? icache_ptr : dcache_ptr)->sets[set_addr]; | ||||||
|         for(auto& cl: set.ways) { |         for(auto& cl : set.ways) { | ||||||
|             if(cl.st==cache::state::VALID && cl.tag_addr==tag_addr) { |             if(cl.st == cache::state::VALID && cl.tag_addr == tag_addr) { | ||||||
|                 auto start_addr = a.val&(line_sz-1); |                 auto start_addr = a.val & (line_sz - 1); | ||||||
|                 for(auto i = 0U; i<l; ++i) |                 for(auto i = 0U; i < l; ++i) | ||||||
|                     d[i] = cl.data[start_addr+i]; |                     d[i] = cl.data[start_addr + i]; | ||||||
|                 return iss::Ok; |                 return iss::Ok; | ||||||
|             } |             } | ||||||
|         } |         } | ||||||
|         auto& cl = set.ways[get_way_select()]; |         auto& cl = set.ways[get_way_select()]; | ||||||
|         phys_addr_t cl_addr{a}; |         phys_addr_t cl_addr{a}; | ||||||
|         cl_addr.val=tag_addr<<util::ilog2(line_sz); |         cl_addr.val = tag_addr << util::ilog2(line_sz); | ||||||
|         cache_mem_rd_delegate(cl_addr, line_sz, cl.data.data()); |         cache_mem_rd_delegate(cl_addr, line_sz, cl.data.data()); | ||||||
|         cl.tag_addr=tag_addr; |         cl.tag_addr = tag_addr; | ||||||
|         cl.st=cache::state::VALID; |         cl.st = cache::state::VALID; | ||||||
|         auto start_addr = a.val&(line_sz-1); |         auto start_addr = a.val & (line_sz - 1); | ||||||
|         for(auto i = 0U; i<l; ++i) |         for(auto i = 0U; i < l; ++i) | ||||||
|             d[i] = cl.data[start_addr+i]; |             d[i] = cl.data[start_addr + i]; | ||||||
|         return iss::Ok; |         return iss::Ok; | ||||||
|     } else |     } else | ||||||
|         return cache_mem_rd_delegate(a, l, d); |         return cache_mem_rd_delegate(a, l, d); | ||||||
| } | } | ||||||
|  |  | ||||||
| template<typename BASE> | template <typename BASE> iss::status iss::arch::wt_cache<BASE>::write_cache(phys_addr_t a, unsigned l, const uint8_t* const d) { | ||||||
| iss::status iss::arch::wt_cache<BASE>::write_cache(phys_addr_t a, unsigned l, const uint8_t* const d) { |  | ||||||
|     if(!dcache_ptr) |     if(!dcache_ptr) | ||||||
|         dcache_ptr.reset(new cache::cache(size, line_sz, ways)); |         dcache_ptr.reset(new cache::cache(size, line_sz, ways)); | ||||||
|     auto res = cache_mem_wr_delegate(a, l, d); |     auto res = cache_mem_wr_delegate(a, l, d); | ||||||
|     if(res == iss::Ok && ((a.val&io_addr_mask) != io_address)) { |     if(res == iss::Ok && ((a.val & io_addr_mask) != io_address)) { | ||||||
|         auto set_addr=(a.val&(size-1))>>util::ilog2(line_sz*ways); |         auto set_addr = (a.val & (size - 1)) >> util::ilog2(line_sz * ways); | ||||||
|         auto tag_addr=a.val>>util::ilog2(line_sz); |         auto tag_addr = a.val >> util::ilog2(line_sz); | ||||||
|         auto& set = dcache_ptr->sets[set_addr]; |         auto& set = dcache_ptr->sets[set_addr]; | ||||||
|         for(auto& cl: set.ways) { |         for(auto& cl : set.ways) { | ||||||
|             if(cl.st==cache::state::VALID && cl.tag_addr==tag_addr) { |             if(cl.st == cache::state::VALID && cl.tag_addr == tag_addr) { | ||||||
|                 auto start_addr = a.val&(line_sz-1); |                 auto start_addr = a.val & (line_sz - 1); | ||||||
|                 for(auto i = 0U; i<l; ++i) |                 for(auto i = 0U; i < l; ++i) | ||||||
|                     cl.data[start_addr+i] = d[i]; |                     cl.data[start_addr + i] = d[i]; | ||||||
|                 break; |                 break; | ||||||
|             } |             } | ||||||
|         } |         } | ||||||
| @@ -164,8 +165,6 @@ iss::status iss::arch::wt_cache<BASE>::write_cache(phys_addr_t a, unsigned l, co | |||||||
|     return res; |     return res; | ||||||
| } | } | ||||||
|  |  | ||||||
|  |  | ||||||
|  |  | ||||||
| } // namespace arch | } // namespace arch | ||||||
| } // namespace iss | } // namespace iss | ||||||
|  |  | ||||||
|   | |||||||
| @@ -53,20 +53,20 @@ using namespace iss::debugger; | |||||||
|  |  | ||||||
| template <typename ARCH> class riscv_target_adapter : public target_adapter_base { | template <typename ARCH> class riscv_target_adapter : public target_adapter_base { | ||||||
| public: | public: | ||||||
|     riscv_target_adapter(server_if *srv, iss::arch_if *core) |     riscv_target_adapter(server_if* srv, iss::arch_if* core) | ||||||
|     : target_adapter_base(srv) |     : target_adapter_base(srv) | ||||||
|     , core(core) {} |     , core(core) {} | ||||||
|  |  | ||||||
|     /*============== Thread Control ===============================*/ |     /*============== Thread Control ===============================*/ | ||||||
|  |  | ||||||
|     /* Set generic thread */ |     /* Set generic thread */ | ||||||
|     status set_gen_thread(rp_thread_ref &thread) override; |     status set_gen_thread(rp_thread_ref& thread) override; | ||||||
|  |  | ||||||
|     /* Set control thread */ |     /* Set control thread */ | ||||||
|     status set_ctrl_thread(rp_thread_ref &thread) override; |     status set_ctrl_thread(rp_thread_ref& thread) override; | ||||||
|  |  | ||||||
|     /* Get thread status */ |     /* Get thread status */ | ||||||
|     status is_thread_alive(rp_thread_ref &thread, bool &alive) override; |     status is_thread_alive(rp_thread_ref& thread, bool& alive) override; | ||||||
|  |  | ||||||
|     /*============= Register Access ================================*/ |     /*============= Register Access ================================*/ | ||||||
|  |  | ||||||
| @@ -74,79 +74,77 @@ public: | |||||||
|      target byte order. If  register is not available |      target byte order. If  register is not available | ||||||
|      corresponding bytes in avail_buf are 0, otherwise |      corresponding bytes in avail_buf are 0, otherwise | ||||||
|      avail buf is 1 */ |      avail buf is 1 */ | ||||||
|     status read_registers(std::vector<uint8_t> &data, std::vector<uint8_t> &avail) override; |     status read_registers(std::vector<uint8_t>& data, std::vector<uint8_t>& avail) override; | ||||||
|  |  | ||||||
|     /* Write all registers. buf is 4-byte aligned and it is in target |     /* Write all registers. buf is 4-byte aligned and it is in target | ||||||
|      byte order */ |      byte order */ | ||||||
|     status write_registers(const std::vector<uint8_t> &data) override; |     status write_registers(const std::vector<uint8_t>& data) override; | ||||||
|  |  | ||||||
|     /* Read one register. buf is 4-byte aligned and it is in |     /* Read one register. buf is 4-byte aligned and it is in | ||||||
|      target byte order. If  register is not available |      target byte order. If  register is not available | ||||||
|      corresponding bytes in avail_buf are 0, otherwise |      corresponding bytes in avail_buf are 0, otherwise | ||||||
|      avail buf is 1 */ |      avail buf is 1 */ | ||||||
|     status read_single_register(unsigned int reg_no, std::vector<uint8_t> &buf, |     status read_single_register(unsigned int reg_no, std::vector<uint8_t>& buf, std::vector<uint8_t>& avail_buf) override; | ||||||
|             std::vector<uint8_t> &avail_buf) override; |  | ||||||
|  |  | ||||||
|     /* Write one register. buf is 4-byte aligned and it is in target byte |     /* Write one register. buf is 4-byte aligned and it is in target byte | ||||||
|      order */ |      order */ | ||||||
|     status write_single_register(unsigned int reg_no, const std::vector<uint8_t> &buf) override; |     status write_single_register(unsigned int reg_no, const std::vector<uint8_t>& buf) override; | ||||||
|  |  | ||||||
|     /*=================== Memory Access =====================*/ |     /*=================== Memory Access =====================*/ | ||||||
|  |  | ||||||
|     /* Read memory, buf is 4-bytes aligned and it is in target |     /* Read memory, buf is 4-bytes aligned and it is in target | ||||||
|      byte order */ |      byte order */ | ||||||
|     status read_mem(uint64_t addr, std::vector<uint8_t> &buf) override; |     status read_mem(uint64_t addr, std::vector<uint8_t>& buf) override; | ||||||
|  |  | ||||||
|     /* Write memory, buf is 4-bytes aligned and it is in target |     /* Write memory, buf is 4-bytes aligned and it is in target | ||||||
|      byte order */ |      byte order */ | ||||||
|     status write_mem(uint64_t addr, const std::vector<uint8_t> &buf) override; |     status write_mem(uint64_t addr, const std::vector<uint8_t>& buf) override; | ||||||
|  |  | ||||||
|     status process_query(unsigned int &mask, const rp_thread_ref &arg, rp_thread_info &info) override; |     status process_query(unsigned int& mask, const rp_thread_ref& arg, rp_thread_info& info) override; | ||||||
|  |  | ||||||
|     status thread_list_query(int first, const rp_thread_ref &arg, std::vector<rp_thread_ref> &result, size_t max_num, |     status thread_list_query(int first, const rp_thread_ref& arg, std::vector<rp_thread_ref>& result, size_t max_num, size_t& num, | ||||||
|             size_t &num, bool &done) override; |                              bool& done) override; | ||||||
|  |  | ||||||
|     status current_thread_query(rp_thread_ref &thread) override; |     status current_thread_query(rp_thread_ref& thread) override; | ||||||
|  |  | ||||||
|     status offsets_query(uint64_t &text, uint64_t &data, uint64_t &bss) override; |     status offsets_query(uint64_t& text, uint64_t& data, uint64_t& bss) override; | ||||||
|  |  | ||||||
|     status crc_query(uint64_t addr, size_t len, uint32_t &val) override; |     status crc_query(uint64_t addr, size_t len, uint32_t& val) override; | ||||||
|  |  | ||||||
|     status raw_query(std::string in_buf, std::string &out_buf) override; |     status raw_query(std::string in_buf, std::string& out_buf) override; | ||||||
|  |  | ||||||
|     status threadinfo_query(int first, std::string &out_buf) override; |     status threadinfo_query(int first, std::string& out_buf) override; | ||||||
|  |  | ||||||
|     status threadextrainfo_query(const rp_thread_ref &thread, std::string &out_buf) override; |     status threadextrainfo_query(const rp_thread_ref& thread, std::string& out_buf) override; | ||||||
|  |  | ||||||
|     status packetsize_query(std::string &out_buf) override; |     status packetsize_query(std::string& out_buf) override; | ||||||
|  |  | ||||||
|     status add_break(break_type type, uint64_t addr, unsigned int length) override; |     status add_break(break_type type, uint64_t addr, unsigned int length) override; | ||||||
|  |  | ||||||
|     status remove_break(break_type type, uint64_t addr, unsigned int length) override; |     status remove_break(break_type type, uint64_t addr, unsigned int length) override; | ||||||
|  |  | ||||||
|     status resume_from_addr(bool step, int sig, uint64_t addr, rp_thread_ref thread, |     status resume_from_addr(bool step, int sig, uint64_t addr, rp_thread_ref thread, std::function<void(unsigned)> stop_callback) override; | ||||||
|             std::function<void(unsigned)> stop_callback) override; |  | ||||||
|  |  | ||||||
|     status target_xml_query(std::string &out_buf) override; |     status target_xml_query(std::string& out_buf) override; | ||||||
|  |  | ||||||
| protected: | protected: | ||||||
|     static inline constexpr addr_t map_addr(const addr_t &i) { return i; } |     static inline constexpr addr_t map_addr(const addr_t& i) { return i; } | ||||||
|  |  | ||||||
|     iss::arch_if *core; |     iss::arch_if* core; | ||||||
|     rp_thread_ref thread_idx; |     rp_thread_ref thread_idx; | ||||||
| }; | }; | ||||||
|  |  | ||||||
| template <typename ARCH> status riscv_target_adapter<ARCH>::set_gen_thread(rp_thread_ref &thread) { | template <typename ARCH> status riscv_target_adapter<ARCH>::set_gen_thread(rp_thread_ref& thread) { | ||||||
|     thread_idx = thread; |     thread_idx = thread; | ||||||
|     return Ok; |     return Ok; | ||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> status riscv_target_adapter<ARCH>::set_ctrl_thread(rp_thread_ref &thread) { | template <typename ARCH> status riscv_target_adapter<ARCH>::set_ctrl_thread(rp_thread_ref& thread) { | ||||||
|     thread_idx = thread; |     thread_idx = thread; | ||||||
|     return Ok; |     return Ok; | ||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> status riscv_target_adapter<ARCH>::is_thread_alive(rp_thread_ref &thread, bool &alive) { | template <typename ARCH> status riscv_target_adapter<ARCH>::is_thread_alive(rp_thread_ref& thread, bool& alive) { | ||||||
|     alive = 1; |     alive = 1; | ||||||
|     return Ok; |     return Ok; | ||||||
| } | } | ||||||
| @@ -158,10 +156,9 @@ template <typename ARCH> status riscv_target_adapter<ARCH>::is_thread_alive(rp_t | |||||||
|  * set if all threads are processed. |  * set if all threads are processed. | ||||||
|  */ |  */ | ||||||
| template <typename ARCH> | template <typename ARCH> | ||||||
| status riscv_target_adapter<ARCH>::thread_list_query(int first, const rp_thread_ref &arg, | status riscv_target_adapter<ARCH>::thread_list_query(int first, const rp_thread_ref& arg, std::vector<rp_thread_ref>& result, | ||||||
|         std::vector<rp_thread_ref> &result, size_t max_num, size_t &num, |                                                      size_t max_num, size_t& num, bool& done) { | ||||||
|         bool &done) { |     if(first == 0) { | ||||||
|     if (first == 0) { |  | ||||||
|         result.clear(); |         result.clear(); | ||||||
|         result.push_back(thread_idx); |         result.push_back(thread_idx); | ||||||
|         num = 1; |         num = 1; | ||||||
| @@ -171,23 +168,22 @@ status riscv_target_adapter<ARCH>::thread_list_query(int first, const rp_thread_ | |||||||
|         return NotSupported; |         return NotSupported; | ||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> status riscv_target_adapter<ARCH>::current_thread_query(rp_thread_ref &thread) { | template <typename ARCH> status riscv_target_adapter<ARCH>::current_thread_query(rp_thread_ref& thread) { | ||||||
|     thread = thread_idx; |     thread = thread_idx; | ||||||
|     return Ok; |     return Ok; | ||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> | template <typename ARCH> status riscv_target_adapter<ARCH>::read_registers(std::vector<uint8_t>& data, std::vector<uint8_t>& avail) { | ||||||
| status riscv_target_adapter<ARCH>::read_registers(std::vector<uint8_t> &data, std::vector<uint8_t> &avail) { |  | ||||||
|     LOG(TRACE) << "reading target registers"; |     LOG(TRACE) << "reading target registers"; | ||||||
|     // return idx<0?:; |     // return idx<0?:; | ||||||
|     data.clear(); |     data.clear(); | ||||||
|     avail.clear(); |     avail.clear(); | ||||||
|     const uint8_t *reg_base = core->get_regs_base_ptr(); |     const uint8_t* reg_base = core->get_regs_base_ptr(); | ||||||
|     auto start_reg=arch::traits<ARCH>::X0; |     auto start_reg = arch::traits<ARCH>::X0; | ||||||
|     for (size_t reg_no = start_reg; reg_no < start_reg+33/*arch::traits<ARCH>::NUM_REGS*/; ++reg_no) { |     for(size_t reg_no = start_reg; reg_no < start_reg + 33 /*arch::traits<ARCH>::NUM_REGS*/; ++reg_no) { | ||||||
|         auto reg_width = arch::traits<ARCH>::reg_bit_widths[reg_no] / 8; |         auto reg_width = arch::traits<ARCH>::reg_bit_widths[reg_no] / 8; | ||||||
|         unsigned offset = traits<ARCH>::reg_byte_offsets[reg_no]; |         unsigned offset = traits<ARCH>::reg_byte_offsets[reg_no]; | ||||||
|         for (size_t j = 0; j < reg_width; ++j) { |         for(size_t j = 0; j < reg_width; ++j) { | ||||||
|             data.push_back(*(reg_base + offset + j)); |             data.push_back(*(reg_base + offset + j)); | ||||||
|             avail.push_back(0xff); |             avail.push_back(0xff); | ||||||
|         } |         } | ||||||
| @@ -210,19 +206,19 @@ status riscv_target_adapter<ARCH>::read_registers(std::vector<uint8_t> &data, st | |||||||
|     return Ok; |     return Ok; | ||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> status riscv_target_adapter<ARCH>::write_registers(const std::vector<uint8_t> &data) { | template <typename ARCH> status riscv_target_adapter<ARCH>::write_registers(const std::vector<uint8_t>& data) { | ||||||
|     auto start_reg=arch::traits<ARCH>::X0; |     auto start_reg = arch::traits<ARCH>::X0; | ||||||
|     auto *reg_base = core->get_regs_base_ptr(); |     auto* reg_base = core->get_regs_base_ptr(); | ||||||
|     auto iter = data.data(); |     auto iter = data.data(); | ||||||
|     bool e_ext = arch::traits<ARCH>::PC<32; |     bool e_ext = arch::traits<ARCH>::PC < 32; | ||||||
|     for (size_t reg_no = 0; reg_no < start_reg+33/*arch::traits<ARCH>::NUM_REGS*/; ++reg_no) { |     for(size_t reg_no = 0; reg_no < start_reg + 33 /*arch::traits<ARCH>::NUM_REGS*/; ++reg_no) { | ||||||
|         if(e_ext && reg_no>15){ |         if(e_ext && reg_no > 15) { | ||||||
|             if(reg_no==32){ |             if(reg_no == 32) { | ||||||
|                 auto reg_width = arch::traits<ARCH>::reg_bit_widths[arch::traits<ARCH>::PC] / 8; |                 auto reg_width = arch::traits<ARCH>::reg_bit_widths[arch::traits<ARCH>::PC] / 8; | ||||||
|                 auto offset = traits<ARCH>::reg_byte_offsets[arch::traits<ARCH>::PC]; |                 auto offset = traits<ARCH>::reg_byte_offsets[arch::traits<ARCH>::PC]; | ||||||
|                 std::copy(iter, iter + reg_width, reg_base); |                 std::copy(iter, iter + reg_width, reg_base); | ||||||
|             } else { |             } else { | ||||||
|                 const uint64_t zero_val=0; |                 const uint64_t zero_val = 0; | ||||||
|                 auto reg_width = arch::traits<ARCH>::reg_bit_widths[15] / 8; |                 auto reg_width = arch::traits<ARCH>::reg_bit_widths[15] / 8; | ||||||
|                 auto iter = (uint8_t*)&zero_val; |                 auto iter = (uint8_t*)&zero_val; | ||||||
|                 std::copy(iter, iter + reg_width, reg_base); |                 std::copy(iter, iter + reg_width, reg_base); | ||||||
| @@ -239,12 +235,11 @@ template <typename ARCH> status riscv_target_adapter<ARCH>::write_registers(cons | |||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> | template <typename ARCH> | ||||||
| status riscv_target_adapter<ARCH>::read_single_register(unsigned int reg_no, std::vector<uint8_t> &data, | status riscv_target_adapter<ARCH>::read_single_register(unsigned int reg_no, std::vector<uint8_t>& data, std::vector<uint8_t>& avail) { | ||||||
|         std::vector<uint8_t> &avail) { |     if(reg_no < 65) { | ||||||
|     if (reg_no < 65) { |  | ||||||
|         // auto reg_size = arch::traits<ARCH>::reg_bit_width(static_cast<typename |         // auto reg_size = arch::traits<ARCH>::reg_bit_width(static_cast<typename | ||||||
|         // arch::traits<ARCH>::reg_e>(reg_no))/8; |         // arch::traits<ARCH>::reg_e>(reg_no))/8; | ||||||
|         auto *reg_base = core->get_regs_base_ptr(); |         auto* reg_base = core->get_regs_base_ptr(); | ||||||
|         auto reg_width = arch::traits<ARCH>::reg_bit_widths[reg_no] / 8; |         auto reg_width = arch::traits<ARCH>::reg_bit_widths[reg_no] / 8; | ||||||
|         data.resize(reg_width); |         data.resize(reg_width); | ||||||
|         avail.resize(reg_width); |         avail.resize(reg_width); | ||||||
| @@ -261,10 +256,9 @@ status riscv_target_adapter<ARCH>::read_single_register(unsigned int reg_no, std | |||||||
|     return data.size() > 0 ? Ok : Err; |     return data.size() > 0 ? Ok : Err; | ||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> | template <typename ARCH> status riscv_target_adapter<ARCH>::write_single_register(unsigned int reg_no, const std::vector<uint8_t>& data) { | ||||||
| status riscv_target_adapter<ARCH>::write_single_register(unsigned int reg_no, const std::vector<uint8_t> &data) { |     if(reg_no < 65) { | ||||||
|     if (reg_no < 65) { |         auto* reg_base = core->get_regs_base_ptr(); | ||||||
|         auto *reg_base = core->get_regs_base_ptr(); |  | ||||||
|         auto reg_width = arch::traits<ARCH>::reg_bit_widths[static_cast<typename arch::traits<ARCH>::reg_e>(reg_no)] / 8; |         auto reg_width = arch::traits<ARCH>::reg_bit_widths[static_cast<typename arch::traits<ARCH>::reg_e>(reg_no)] / 8; | ||||||
|         auto offset = traits<ARCH>::reg_byte_offsets[reg_no]; |         auto offset = traits<ARCH>::reg_byte_offsets[reg_no]; | ||||||
|         std::copy(data.begin(), data.begin() + reg_width, reg_base + offset); |         std::copy(data.begin(), data.begin() + reg_width, reg_base + offset); | ||||||
| @@ -275,41 +269,36 @@ status riscv_target_adapter<ARCH>::write_single_register(unsigned int reg_no, co | |||||||
|     return Ok; |     return Ok; | ||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> status riscv_target_adapter<ARCH>::read_mem(uint64_t addr, std::vector<uint8_t> &data) { | template <typename ARCH> status riscv_target_adapter<ARCH>::read_mem(uint64_t addr, std::vector<uint8_t>& data) { | ||||||
|     auto a = map_addr({iss::access_type::DEBUG_READ, iss::address_type::VIRTUAL, 0, addr}); |     auto a = map_addr({iss::access_type::DEBUG_READ, iss::address_type::VIRTUAL, 0, addr}); | ||||||
|     auto f = [&]() -> status { return core->read(a, data.size(), data.data()); }; |     auto f = [&]() -> status { return core->read(a, data.size(), data.data()); }; | ||||||
|     return srv->execute_syncronized(f); |     return srv->execute_syncronized(f); | ||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> status riscv_target_adapter<ARCH>::write_mem(uint64_t addr, const std::vector<uint8_t> &data) { | template <typename ARCH> status riscv_target_adapter<ARCH>::write_mem(uint64_t addr, const std::vector<uint8_t>& data) { | ||||||
|     auto a = map_addr({iss::access_type::DEBUG_READ, iss::address_type::VIRTUAL, 0, addr}); |     auto a = map_addr({iss::access_type::DEBUG_READ, iss::address_type::VIRTUAL, 0, addr}); | ||||||
|     auto f = [&]() -> status { return core->write(a, data.size(), data.data()); }; |     auto f = [&]() -> status { return core->write(a, data.size(), data.data()); }; | ||||||
|     return srv->execute_syncronized(f); |     return srv->execute_syncronized(f); | ||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> | template <typename ARCH> | ||||||
| status riscv_target_adapter<ARCH>::process_query(unsigned int &mask, const rp_thread_ref &arg, rp_thread_info &info) { | status riscv_target_adapter<ARCH>::process_query(unsigned int& mask, const rp_thread_ref& arg, rp_thread_info& info) { | ||||||
|     return NotSupported; |     return NotSupported; | ||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> | template <typename ARCH> status riscv_target_adapter<ARCH>::offsets_query(uint64_t& text, uint64_t& data, uint64_t& bss) { | ||||||
| status riscv_target_adapter<ARCH>::offsets_query(uint64_t &text, uint64_t &data, uint64_t &bss) { |  | ||||||
|     text = 0; |     text = 0; | ||||||
|     data = 0; |     data = 0; | ||||||
|     bss = 0; |     bss = 0; | ||||||
|     return Ok; |     return Ok; | ||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> status riscv_target_adapter<ARCH>::crc_query(uint64_t addr, size_t len, uint32_t &val) { | template <typename ARCH> status riscv_target_adapter<ARCH>::crc_query(uint64_t addr, size_t len, uint32_t& val) { return NotSupported; } | ||||||
|     return NotSupported; |  | ||||||
| } |  | ||||||
|  |  | ||||||
| template <typename ARCH> status riscv_target_adapter<ARCH>::raw_query(std::string in_buf, std::string &out_buf) { | template <typename ARCH> status riscv_target_adapter<ARCH>::raw_query(std::string in_buf, std::string& out_buf) { return NotSupported; } | ||||||
|     return NotSupported; |  | ||||||
| } |  | ||||||
|  |  | ||||||
| template <typename ARCH> status riscv_target_adapter<ARCH>::threadinfo_query(int first, std::string &out_buf) { | template <typename ARCH> status riscv_target_adapter<ARCH>::threadinfo_query(int first, std::string& out_buf) { | ||||||
|     if (first) { |     if(first) { | ||||||
|         out_buf = fmt::format("m{:x}", thread_idx.val); |         out_buf = fmt::format("m{:x}", thread_idx.val); | ||||||
|     } else { |     } else { | ||||||
|         out_buf = "l"; |         out_buf = "l"; | ||||||
| @@ -317,8 +306,7 @@ template <typename ARCH> status riscv_target_adapter<ARCH>::threadinfo_query(int | |||||||
|     return Ok; |     return Ok; | ||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> | template <typename ARCH> status riscv_target_adapter<ARCH>::threadextrainfo_query(const rp_thread_ref& thread, std::string& out_buf) { | ||||||
| status riscv_target_adapter<ARCH>::threadextrainfo_query(const rp_thread_ref &thread, std::string &out_buf) { |  | ||||||
|     std::array<char, 20> buf; |     std::array<char, 20> buf; | ||||||
|     memset(buf.data(), 0, 20); |     memset(buf.data(), 0, 20); | ||||||
|     sprintf(buf.data(), "%02x%02x%02x%02x%02x%02x%02x%02x%02x", 'R', 'u', 'n', 'n', 'a', 'b', 'l', 'e', 0); |     sprintf(buf.data(), "%02x%02x%02x%02x%02x%02x%02x%02x%02x", 'R', 'u', 'n', 'n', 'a', 'b', 'l', 'e', 0); | ||||||
| @@ -326,7 +314,7 @@ status riscv_target_adapter<ARCH>::threadextrainfo_query(const rp_thread_ref &th | |||||||
|     return Ok; |     return Ok; | ||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> status riscv_target_adapter<ARCH>::packetsize_query(std::string &out_buf) { | template <typename ARCH> status riscv_target_adapter<ARCH>::packetsize_query(std::string& out_buf) { | ||||||
|     out_buf = "PacketSize=1000"; |     out_buf = "PacketSize=1000"; | ||||||
|     return Ok; |     return Ok; | ||||||
| } | } | ||||||
| @@ -340,8 +328,8 @@ template <typename ARCH> status riscv_target_adapter<ARCH>::add_break(break_type | |||||||
|         auto saddr = map_addr({iss::access_type::FETCH, iss::address_type::PHYSICAL, 0, addr}); |         auto saddr = map_addr({iss::access_type::FETCH, iss::address_type::PHYSICAL, 0, addr}); | ||||||
|         auto eaddr = map_addr({iss::access_type::FETCH, iss::address_type::PHYSICAL, 0, addr + length}); |         auto eaddr = map_addr({iss::access_type::FETCH, iss::address_type::PHYSICAL, 0, addr + length}); | ||||||
|         target_adapter_base::bp_lut.addEntry(++target_adapter_base::bp_count, saddr.val, eaddr.val - saddr.val); |         target_adapter_base::bp_lut.addEntry(++target_adapter_base::bp_count, saddr.val, eaddr.val - saddr.val); | ||||||
|         LOG(TRACE) << "Adding breakpoint with handle " << target_adapter_base::bp_count << " for addr 0x" << std::hex |         LOG(TRACE) << "Adding breakpoint with handle " << target_adapter_base::bp_count << " for addr 0x" << std::hex << saddr.val | ||||||
|                 << saddr.val << std::dec; |                    << std::dec; | ||||||
|         LOG(TRACE) << "Now having " << target_adapter_base::bp_lut.size() << " breakpoints"; |         LOG(TRACE) << "Now having " << target_adapter_base::bp_lut.size() << " breakpoints"; | ||||||
|         return Ok; |         return Ok; | ||||||
|     } |     } | ||||||
| @@ -356,9 +344,8 @@ template <typename ARCH> status riscv_target_adapter<ARCH>::remove_break(break_t | |||||||
|     case HW_EXEC: { |     case HW_EXEC: { | ||||||
|         auto saddr = map_addr({iss::access_type::FETCH, iss::address_type::PHYSICAL, 0, addr}); |         auto saddr = map_addr({iss::access_type::FETCH, iss::address_type::PHYSICAL, 0, addr}); | ||||||
|         unsigned handle = target_adapter_base::bp_lut.getEntry(saddr.val); |         unsigned handle = target_adapter_base::bp_lut.getEntry(saddr.val); | ||||||
|         if (handle) { |         if(handle) { | ||||||
|             LOG(TRACE) << "Removing breakpoint with handle " << handle << " for addr 0x" << std::hex << saddr.val |             LOG(TRACE) << "Removing breakpoint with handle " << handle << " for addr 0x" << std::hex << saddr.val << std::dec; | ||||||
|                     << std::dec; |  | ||||||
|             // TODO: check length of addr range |             // TODO: check length of addr range | ||||||
|             target_adapter_base::bp_lut.removeEntry(handle); |             target_adapter_base::bp_lut.removeEntry(handle); | ||||||
|             LOG(TRACE) << "Now having " << target_adapter_base::bp_lut.size() << " breakpoints"; |             LOG(TRACE) << "Now having " << target_adapter_base::bp_lut.size() << " breakpoints"; | ||||||
| @@ -372,53 +359,53 @@ template <typename ARCH> status riscv_target_adapter<ARCH>::remove_break(break_t | |||||||
|  |  | ||||||
| template <typename ARCH> | template <typename ARCH> | ||||||
| status riscv_target_adapter<ARCH>::resume_from_addr(bool step, int sig, uint64_t addr, rp_thread_ref thread, | status riscv_target_adapter<ARCH>::resume_from_addr(bool step, int sig, uint64_t addr, rp_thread_ref thread, | ||||||
|         std::function<void(unsigned)> stop_callback) { |                                                     std::function<void(unsigned)> stop_callback) { | ||||||
|     auto *reg_base = core->get_regs_base_ptr(); |     auto* reg_base = core->get_regs_base_ptr(); | ||||||
|     auto reg_width = arch::traits<ARCH>::reg_bit_widths[arch::traits<ARCH>::PC] / 8; |     auto reg_width = arch::traits<ARCH>::reg_bit_widths[arch::traits<ARCH>::PC] / 8; | ||||||
|     auto offset = traits<ARCH>::reg_byte_offsets[arch::traits<ARCH>::PC]; |     auto offset = traits<ARCH>::reg_byte_offsets[arch::traits<ARCH>::PC]; | ||||||
|     const uint8_t *iter = reinterpret_cast<const uint8_t *>(&addr); |     const uint8_t* iter = reinterpret_cast<const uint8_t*>(&addr); | ||||||
|     std::copy(iter, iter + reg_width, reg_base); |     std::copy(iter, iter + reg_width, reg_base); | ||||||
|     return resume_from_current(step, sig, thread, stop_callback); |     return resume_from_current(step, sig, thread, stop_callback); | ||||||
| } | } | ||||||
|  |  | ||||||
| template <typename ARCH> status riscv_target_adapter<ARCH>::target_xml_query(std::string &out_buf) { | template <typename ARCH> status riscv_target_adapter<ARCH>::target_xml_query(std::string& out_buf) { | ||||||
|     const std::string res{"<?xml version=\"1.0\"?><!DOCTYPE target SYSTEM \"gdb-target.dtd\">" |     const std::string res{"<?xml version=\"1.0\"?><!DOCTYPE target SYSTEM \"gdb-target.dtd\">" | ||||||
|         "<target><architecture>riscv:rv32</architecture>" |                           "<target><architecture>riscv:rv32</architecture>" | ||||||
|         //"  <feature name=\"org.gnu.gdb.riscv.rv32i\">\n" |                           //"  <feature name=\"org.gnu.gdb.riscv.rv32i\">\n" | ||||||
|         //"    <reg name=\"x0\"  bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x0\"  bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x1\"  bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x1\"  bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x2\"  bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x2\"  bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x3\"  bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x3\"  bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x4\"  bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x4\"  bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x5\"  bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x5\"  bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x6\"  bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x6\"  bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x7\"  bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x7\"  bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x8\"  bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x8\"  bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x9\"  bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x9\"  bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x10\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x10\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x11\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x11\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x12\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x12\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x13\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x13\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x14\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x14\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x15\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x15\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x16\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x16\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x17\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x17\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x18\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x18\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x19\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x19\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x20\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x20\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x21\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x21\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x22\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x22\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x23\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x23\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x24\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x24\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x25\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x25\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x26\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x26\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x27\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x27\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x28\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x28\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x29\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x29\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x30\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x30\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"    <reg name=\"x31\" bitsize=\"32\" group=\"general\"/>\n" |                           //"    <reg name=\"x31\" bitsize=\"32\" group=\"general\"/>\n" | ||||||
|         //"  </feature>\n" |                           //"  </feature>\n" | ||||||
|         "</target>"}; |                           "</target>"}; | ||||||
|     out_buf = res; |     out_buf = res; | ||||||
|     return Ok; |     return Ok; | ||||||
| } | } | ||||||
| @@ -468,7 +455,7 @@ template <typename ARCH> status riscv_target_adapter<ARCH>::target_xml_query(std | |||||||
| </target> | </target> | ||||||
|  |  | ||||||
|  */ |  */ | ||||||
| } | } // namespace debugger | ||||||
| } | } // namespace iss | ||||||
|  |  | ||||||
| #endif /* _ISS_DEBUGGER_RISCV_TARGET_ADAPTER_H_ */ | #endif /* _ISS_DEBUGGER_RISCV_TARGET_ADAPTER_H_ */ | ||||||
|   | |||||||
| @@ -33,21 +33,20 @@ | |||||||
| #ifndef _ISS_FACTORY_H_ | #ifndef _ISS_FACTORY_H_ | ||||||
| #define _ISS_FACTORY_H_ | #define _ISS_FACTORY_H_ | ||||||
|  |  | ||||||
|  | #include <algorithm> | ||||||
|  | #include <functional> | ||||||
| #include <iss/iss.h> | #include <iss/iss.h> | ||||||
| #include <memory> | #include <memory> | ||||||
| #include <unordered_map> |  | ||||||
| #include <functional> |  | ||||||
| #include <string> | #include <string> | ||||||
| #include <algorithm> | #include <unordered_map> | ||||||
| #include <vector> | #include <vector> | ||||||
|  |  | ||||||
| namespace iss { | namespace iss { | ||||||
|  |  | ||||||
| using cpu_ptr = std::unique_ptr<iss::arch_if>; | using cpu_ptr = std::unique_ptr<iss::arch_if>; | ||||||
| using vm_ptr= std::unique_ptr<iss::vm_if>; | using vm_ptr = std::unique_ptr<iss::vm_if>; | ||||||
|  |  | ||||||
| template<typename PLAT> | template <typename PLAT> std::tuple<cpu_ptr, vm_ptr> create_cpu(std::string const& backend, unsigned gdb_port) { | ||||||
| std::tuple<cpu_ptr, vm_ptr> create_cpu(std::string const& backend, unsigned gdb_port){ |  | ||||||
|     using core_type = typename PLAT::core; |     using core_type = typename PLAT::core; | ||||||
|     core_type* lcpu = new PLAT(); |     core_type* lcpu = new PLAT(); | ||||||
|     if(backend == "interp") |     if(backend == "interp") | ||||||
| @@ -63,48 +62,45 @@ std::tuple<cpu_ptr, vm_ptr> create_cpu(std::string const& backend, unsigned gdb_ | |||||||
|     return {nullptr, nullptr}; |     return {nullptr, nullptr}; | ||||||
| } | } | ||||||
|  |  | ||||||
|  |  | ||||||
| class core_factory { | class core_factory { | ||||||
|     using cpu_ptr = std::unique_ptr<iss::arch_if>; |     using cpu_ptr = std::unique_ptr<iss::arch_if>; | ||||||
|     using vm_ptr= std::unique_ptr<iss::vm_if>; |     using vm_ptr = std::unique_ptr<iss::vm_if>; | ||||||
|     using base_t = std::tuple<cpu_ptr, vm_ptr>; |     using base_t = std::tuple<cpu_ptr, vm_ptr>; | ||||||
|     using create_fn = std::function<base_t(unsigned, void*) >; |     using create_fn = std::function<base_t(unsigned, void*)>; | ||||||
|     using registry_t = std::unordered_map<std::string, create_fn> ; |     using registry_t = std::unordered_map<std::string, create_fn>; | ||||||
|  |  | ||||||
|     registry_t registry; |     registry_t registry; | ||||||
|  |  | ||||||
|     core_factory() = default; |     core_factory() = default; | ||||||
|     core_factory(const core_factory &) = delete; |     core_factory(const core_factory&) = delete; | ||||||
|     core_factory & operator=(const core_factory &) = delete; |     core_factory& operator=(const core_factory&) = delete; | ||||||
|  |  | ||||||
| public: | public: | ||||||
|     static core_factory & instance() { static core_factory bf; return bf; } |     static core_factory& instance() { | ||||||
|  |         static core_factory bf; | ||||||
|  |         return bf; | ||||||
|  |     } | ||||||
|  |  | ||||||
|     bool register_creator(const std::string &, create_fn const&); |     bool register_creator(const std::string& className, create_fn const& fn) { | ||||||
|  |         registry[className] = fn; | ||||||
|  |         return true; | ||||||
|  |     } | ||||||
|  |  | ||||||
|     base_t create(const std::string &, unsigned gdb_port=0, void* init_data=nullptr) const; |     base_t create(std::string const& className, unsigned gdb_port = 0, void* init_data = nullptr) const { | ||||||
|  |         registry_t::const_iterator regEntry = registry.find(className); | ||||||
|  |         if(regEntry != registry.end()) | ||||||
|  |             return regEntry->second(gdb_port, init_data); | ||||||
|  |         return {nullptr, nullptr}; | ||||||
|  |     } | ||||||
|  |  | ||||||
|     std::vector<std::string> get_names() { |     std::vector<std::string> get_names() { | ||||||
|         std::vector<std::string> keys{registry.size()}; |         std::vector<std::string> keys{registry.size()}; | ||||||
|         std::transform(std::begin(registry), std::end(registry), std::begin(keys), [](std::pair<std::string, create_fn> const& p){ |         std::transform(std::begin(registry), std::end(registry), std::begin(keys), | ||||||
|             return p.first; |                        [](std::pair<std::string, create_fn> const& p) { return p.first; }); | ||||||
|         }); |  | ||||||
|         return keys; |         return keys; | ||||||
|     } |     } | ||||||
| }; | }; | ||||||
|  |  | ||||||
| inline bool core_factory::register_creator(const std::string & className, create_fn const& fn) { | } // namespace iss | ||||||
|     registry[className] = fn; |  | ||||||
|     return true; |  | ||||||
| } |  | ||||||
|  |  | ||||||
| inline core_factory::base_t core_factory::create(const std::string &className, unsigned gdb_port, void* data) const { |  | ||||||
|     registry_t::const_iterator regEntry = registry.find(className); |  | ||||||
|     if (regEntry != registry.end()) |  | ||||||
|         return regEntry->second(gdb_port, data); |  | ||||||
|     return {nullptr, nullptr}; |  | ||||||
| } |  | ||||||
|  |  | ||||||
| } |  | ||||||
|  |  | ||||||
| #endif /* _ISS_FACTORY_H_ */ | #endif /* _ISS_FACTORY_H_ */ | ||||||
|   | |||||||
							
								
								
									
										8
									
								
								src/iss/plugin/README.md
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										8
									
								
								src/iss/plugin/README.md
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,8 @@ | |||||||
|  | # pctrace | ||||||
|  |  | ||||||
|  | Trace functionality to allow visualizing coverage in lcov and cachegrind tools. Use environment variables NOCOMPRES and REGDUMP to toggle functionality. | ||||||
|  | - NOCOMPRES: any value turns off the LZ4 compression | ||||||
|  | - REGDUMP: any value switches to tracing the registers instead. Also turns off compression. | ||||||
|  |  | ||||||
|  | Known Bugs:  | ||||||
|  | - currently does not work correctly with jit backends, the plugin cant tell if instructions are compressed. Additionaly the cost of instrs that raise a trap is not known. It takes the cost of the instrid -1 (0 at the moment). | ||||||
| @@ -33,68 +33,60 @@ | |||||||
|  ******************************************************************************/ |  ******************************************************************************/ | ||||||
|  |  | ||||||
| #include "cycle_estimate.h" | #include "cycle_estimate.h" | ||||||
|  | #include <iss/plugin/calculator.h> | ||||||
|  | #include <yaml-cpp/yaml.h> | ||||||
|  |  | ||||||
|  | #include <fstream> | ||||||
| #include <iss/arch_if.h> | #include <iss/arch_if.h> | ||||||
| #include <util/logging.h> | #include <util/logging.h> | ||||||
| #include <rapidjson/document.h> |  | ||||||
| #include <rapidjson/istreamwrapper.h> |  | ||||||
| #include <rapidjson/writer.h> |  | ||||||
| #include <rapidjson/stringbuffer.h> |  | ||||||
| #include <rapidjson/ostreamwrapper.h> |  | ||||||
| #include <rapidjson/error/en.h> |  | ||||||
| #include <fstream> |  | ||||||
|  |  | ||||||
| using namespace rapidjson; |  | ||||||
| using namespace std; | using namespace std; | ||||||
|  |  | ||||||
| iss::plugin::cycle_estimate::cycle_estimate(string const& config_file_name) | iss::plugin::cycle_estimate::cycle_estimate(string const& config_file_name) | ||||||
| : instr_if(nullptr) | : instr_if(nullptr) | ||||||
| , config_file_name(config_file_name) | , config_file_name(config_file_name) {} | ||||||
| { |  | ||||||
| } |  | ||||||
|  |  | ||||||
| iss::plugin::cycle_estimate::~cycle_estimate() { | iss::plugin::cycle_estimate::~cycle_estimate() = default; | ||||||
| } |  | ||||||
|  |  | ||||||
| bool iss::plugin::cycle_estimate::registration(const char* const version, vm_if& vm) { | bool iss::plugin::cycle_estimate::registration(const char* const version, vm_if& vm) { | ||||||
|     instr_if = vm.get_arch()->get_instrumentation_if(); |     instr_if = vm.get_arch()->get_instrumentation_if(); | ||||||
|     if(!instr_if) return false; |     assert(instr_if && "No instrumentation interface available but callback executed"); | ||||||
|     const string  core_name = instr_if->core_type_name(); |     reg_base_ptr = reinterpret_cast<uint32_t*>(vm.get_arch()->get_regs_base_ptr()); | ||||||
|     if (config_file_name.length() > 0) { |     if(!instr_if) | ||||||
|         ifstream is(config_file_name); |         return false; | ||||||
|         if (is.is_open()) { |     const string core_name = instr_if->core_type_name(); | ||||||
|  |     if(config_file_name.length() > 0) { | ||||||
|  |         std::ifstream is(config_file_name); | ||||||
|  |         if(is.is_open()) { | ||||||
|             try { |             try { | ||||||
|                 IStreamWrapper isw(is); |                 auto root = YAML::LoadAll(is); | ||||||
|                 Document d; |                 if(root.size() != 1) { | ||||||
|                 ParseResult ok = d.ParseStream(isw); |                     LOG(ERR) << "Too many root nodes in YAML file " << config_file_name; | ||||||
|                 if(ok) { |                 } | ||||||
|                     Value& val = d[core_name.c_str()]; |                 for(auto p : root[0]) { | ||||||
|                     if(val.IsArray()){ |                     auto isa_subset = p.first; | ||||||
|                         delays.reserve(val.Size()); |                     auto instructions = p.second; | ||||||
|                         for (auto it = val.Begin(); it != val.End(); ++it) { |                     for(auto const& instr : instructions) { | ||||||
|                             auto& name = (*it)["name"]; |                         auto idx = instr.second["index"].as<unsigned>(); | ||||||
|                             auto& size = (*it)["size"]; |                         if(delays.size() <= idx) | ||||||
|                             auto& delay = (*it)["delay"]; |                             delays.resize(idx + 1); | ||||||
|                             auto& branch = (*it)["branch"]; |                         auto& res = delays[idx]; | ||||||
|                             if(delay.IsArray()) { |                         res.is_branch = instr.second["branch"].as<bool>(); | ||||||
|                                 auto dt = delay[0].Get<unsigned>(); |                         auto delay = instr.second["delay"]; | ||||||
|                                 auto dnt = delay[1].Get<unsigned>(); |                         if(delay.IsSequence()) { | ||||||
|                                 delays.push_back(instr_desc{size.Get<unsigned>(), dt, dnt, branch.Get<bool>()}); |                             res.not_taken = delay[0].as<uint64_t>(); | ||||||
|                             } else if(delay.Is<unsigned>()) { |                             res.taken = delay[1].as<uint64_t>(); | ||||||
|                                 auto d = delay.Get<unsigned>(); |                         } else { | ||||||
|                                 delays.push_back(instr_desc{size.Get<unsigned>(), d, d, branch.Get<bool>()}); |                             try { | ||||||
|                             } else |                                 res.not_taken = delay.as<uint64_t>(); | ||||||
|                                 throw runtime_error("JSON parse error"); |                                 res.taken = res.not_taken; | ||||||
|                        } |                             } catch(const YAML::BadConversion& e) { | ||||||
|                     } else { |                                 res.f = iss::plugin::calculator(reg_base_ptr, delay.as<std::string>()); | ||||||
|                         LOG(ERR)<<"plugin cycle_estimate: could not find an entry for "<<core_name<<" in JSON file"<<endl; |                             } | ||||||
|                         return false; |                         } | ||||||
|                    } |                     } | ||||||
|                 } else { |                 } | ||||||
|                     LOG(ERR)<<"plugin cycle_estimate: could not parse in JSON file at "<< ok.Offset()<<": "<<GetParseError_En(ok.Code())<<endl; |             } catch(YAML::ParserException& e) { | ||||||
|                     return false; |  | ||||||
|                } |  | ||||||
|             } catch (runtime_error &e) { |  | ||||||
|                 LOG(ERR) << "Could not parse input file " << config_file_name << ", reason: " << e.what(); |                 LOG(ERR) << "Could not parse input file " << config_file_name << ", reason: " << e.what(); | ||||||
|                 return false; |                 return false; | ||||||
|             } |             } | ||||||
| @@ -104,15 +96,19 @@ bool iss::plugin::cycle_estimate::registration(const char* const version, vm_if& | |||||||
|         } |         } | ||||||
|     } |     } | ||||||
|     return true; |     return true; | ||||||
|  |  | ||||||
| } | } | ||||||
|  |  | ||||||
| void iss::plugin::cycle_estimate::callback(instr_info_t instr_info) { | void iss::plugin::cycle_estimate::callback(instr_info_t instr_info) { | ||||||
|     assert(instr_if && "No instrumentation interface available but callback executed"); |     size_t instr_id = instr_info.instr_id; | ||||||
|     auto entry = delays[instr_info.instr_id]; |     auto& entry = instr_id < delays.size() ? delays[instr_id] : illegal_desc; | ||||||
|     bool taken = instr_if->is_branch_taken(); |     if(instr_info.phase_id == PRE_SYNC) { | ||||||
|     if (taken && (entry.taken > 1)) |         if(entry.f) | ||||||
|         instr_if->update_last_instr_cycles(entry.taken); |             current_delay = entry.f(instr_if->get_instr_word()); | ||||||
|     else if (entry.not_taken > 1) |     } else { | ||||||
|         instr_if->update_last_instr_cycles(entry.not_taken); |         if(!entry.f) | ||||||
|  |             current_delay = instr_if->is_branch_taken() ? entry.taken : entry.not_taken; | ||||||
|  |         if(current_delay > 1) | ||||||
|  |             instr_if->update_last_instr_cycles(current_delay); | ||||||
|  |         current_delay = 1; | ||||||
|  |     } | ||||||
| } | } | ||||||
|   | |||||||
| @@ -37,6 +37,7 @@ | |||||||
|  |  | ||||||
| #include "iss/instrumentation_if.h" | #include "iss/instrumentation_if.h" | ||||||
| #include "iss/vm_plugin.h" | #include "iss/vm_plugin.h" | ||||||
|  | #include <functional> | ||||||
| #include <string> | #include <string> | ||||||
| #include <unordered_map> | #include <unordered_map> | ||||||
| #include <vector> | #include <vector> | ||||||
| @@ -45,46 +46,44 @@ namespace iss { | |||||||
|  |  | ||||||
| namespace plugin { | namespace plugin { | ||||||
|  |  | ||||||
| class cycle_estimate: public vm_plugin { | class cycle_estimate : public vm_plugin { | ||||||
| 	BEGIN_BF_DECL(instr_desc, uint32_t) |     struct instr_desc { | ||||||
| 		BF_FIELD(taken, 24, 8) |         size_t size{0}; | ||||||
| 		BF_FIELD(not_taken, 16, 8) |         bool is_branch{false}; | ||||||
|         BF_FIELD(is_branch, 8, 8) |         unsigned not_taken{1}; | ||||||
|         BF_FIELD(size, 0, 8) |         unsigned taken{1}; | ||||||
| 		instr_desc(uint32_t size, uint32_t taken, uint32_t not_taken, bool branch): instr_desc() { |         std::function<unsigned(uint64_t)> f; | ||||||
| 			this->size=size; |     }; | ||||||
| 			this->taken=taken; |  | ||||||
| 			this->not_taken=not_taken; |  | ||||||
| 			this->is_branch=branch; |  | ||||||
| 		} |  | ||||||
| 	END_BF_DECL(); |  | ||||||
|  |  | ||||||
| public: | public: | ||||||
|     cycle_estimate() = delete; |     cycle_estimate() = delete; | ||||||
|  |  | ||||||
|     cycle_estimate(const cycle_estimate &) = delete; |     cycle_estimate(const cycle_estimate&) = delete; | ||||||
|  |  | ||||||
|     cycle_estimate(const cycle_estimate &&) = delete; |     cycle_estimate(const cycle_estimate&&) = delete; | ||||||
|  |  | ||||||
|     cycle_estimate(std::string const& config_file_name); |     cycle_estimate(std::string const& config_file_name); | ||||||
|  |  | ||||||
|     virtual ~cycle_estimate(); |     virtual ~cycle_estimate(); | ||||||
|  |  | ||||||
|     cycle_estimate &operator=(const cycle_estimate &) = delete; |     cycle_estimate& operator=(const cycle_estimate&) = delete; | ||||||
|  |  | ||||||
|     cycle_estimate &operator=(const cycle_estimate &&) = delete; |     cycle_estimate& operator=(const cycle_estimate&&) = delete; | ||||||
|  |  | ||||||
|     bool registration(const char *const version, vm_if &arch) override; |     bool registration(const char* const version, vm_if& arch) override; | ||||||
|  |  | ||||||
|     sync_type get_sync() override { return POST_SYNC; }; |     sync_type get_sync() override { return ALL_SYNC; }; | ||||||
|  |  | ||||||
|     void callback(instr_info_t instr_info) override; |     void callback(instr_info_t instr_info) override; | ||||||
|  |  | ||||||
| private: | private: | ||||||
|     iss::instrumentation_if *instr_if; |     iss::instrumentation_if* instr_if{nullptr}; | ||||||
|  |     uint32_t* reg_base_ptr{nullptr}; | ||||||
|  |     instr_desc illegal_desc{}; | ||||||
|     std::vector<instr_desc> delays; |     std::vector<instr_desc> delays; | ||||||
|  |     unsigned current_delay{0}; | ||||||
|     struct pair_hash { |     struct pair_hash { | ||||||
|         size_t operator()(const std::pair<uint64_t, uint64_t> &p) const { |         size_t operator()(const std::pair<uint64_t, uint64_t>& p) const { | ||||||
|             std::hash<uint64_t> hash; |             std::hash<uint64_t> hash; | ||||||
|             return hash(p.first) + hash(p.second); |             return hash(p.first) + hash(p.second); | ||||||
|         } |         } | ||||||
| @@ -92,7 +91,7 @@ private: | |||||||
|     std::unordered_map<std::pair<uint64_t, uint64_t>, uint64_t, pair_hash> blocks; |     std::unordered_map<std::pair<uint64_t, uint64_t>, uint64_t, pair_hash> blocks; | ||||||
|     std::string config_file_name; |     std::string config_file_name; | ||||||
| }; | }; | ||||||
| } | } // namespace plugin | ||||||
| } | } // namespace iss | ||||||
|  |  | ||||||
| #endif /* _ISS_PLUGIN_CYCLE_ESTIMATE_H_ */ | #endif /* _ISS_PLUGIN_CYCLE_ESTIMATE_H_ */ | ||||||
|   | |||||||
| @@ -34,62 +34,63 @@ | |||||||
|  |  | ||||||
| #include "instruction_count.h" | #include "instruction_count.h" | ||||||
| #include <iss/instrumentation_if.h> | #include <iss/instrumentation_if.h> | ||||||
|  | #include <yaml-cpp/yaml.h> | ||||||
|  |  | ||||||
|  | #include <fstream> | ||||||
| #include <iss/arch_if.h> | #include <iss/arch_if.h> | ||||||
| #include <util/logging.h> | #include <util/logging.h> | ||||||
| #include <fstream> |  | ||||||
|  |  | ||||||
| iss::plugin::instruction_count::instruction_count(std::string config_file_name) { | iss::plugin::instruction_count::instruction_count(std::string config_file_name) { | ||||||
|     if (config_file_name.length() > 0) { |     if(config_file_name.length() > 0) { | ||||||
|         std::ifstream is(config_file_name); |         std::ifstream is(config_file_name); | ||||||
|         if (is.is_open()) { |         if(is.is_open()) { | ||||||
|             try { |             try { | ||||||
|                 is >> root; |                 auto root = YAML::LoadAll(is); | ||||||
|             } catch (Json::RuntimeError &e) { |                 if(root.size() != 1) { | ||||||
|                 LOG(ERR) << "Could not parse input file " << config_file_name << ", reason: " << e.what(); |                     LOG(ERR) << "Too many rro nodes in YAML file " << config_file_name; | ||||||
|  |                 } | ||||||
|  |                 for(auto p : root[0]) { | ||||||
|  |                     auto isa_subset = p.first; | ||||||
|  |                     auto instructions = p.second; | ||||||
|  |                     for(auto const& instr : instructions) { | ||||||
|  |                         instr_delay res; | ||||||
|  |                         res.instr_name = instr.first.as<std::string>(); | ||||||
|  |                         res.size = instr.second["encoding"].as<std::string>().size() - 2; // not counting 0b | ||||||
|  |                         auto delay = instr.second["delay"]; | ||||||
|  |                         if(delay.IsSequence()) { | ||||||
|  |                             res.not_taken_delay = delay[0].as<uint64_t>(); | ||||||
|  |                             res.taken_delay = delay[1].as<uint64_t>(); | ||||||
|  |                         } else { | ||||||
|  |                             res.not_taken_delay = delay.as<uint64_t>(); | ||||||
|  |                             res.taken_delay = res.not_taken_delay; | ||||||
|  |                         } | ||||||
|  |                         delays.push_back(std::move(res)); | ||||||
|  |                     } | ||||||
|  |                 } | ||||||
|  |                 rep_counts.resize(delays.size()); | ||||||
|  |             } catch(YAML::ParserException& e) { | ||||||
|  |                 LOG(ERR) << "Could not parse input file " << config_file_name << ", reason: " << e.what(); | ||||||
|             } |             } | ||||||
|         } else { |         } else { | ||||||
|             LOG(ERR) << "Could not open input file " << config_file_name; |             LOG(ERR) << "Could not open input file " << config_file_name; | ||||||
|         } |         } | ||||||
|     } |     } | ||||||
| } | } | ||||||
|  |  | ||||||
| iss::plugin::instruction_count::~instruction_count() { | iss::plugin::instruction_count::~instruction_count() { | ||||||
| 	size_t idx=0; |     size_t idx = 0; | ||||||
| 	for(auto it:delays){ |     for(auto it : delays) { | ||||||
| 		if(rep_counts[idx]>0) |         if(rep_counts[idx] > 0 && it.instr_name.find("__" != 0)) | ||||||
| 			LOG(INFO)<<it.instr_name<<";"<<rep_counts[idx]; |             LOG(INFO) << it.instr_name << ";" << rep_counts[idx]; | ||||||
| 		idx++; |         idx++; | ||||||
| 	} |     } | ||||||
| } | } | ||||||
|  |  | ||||||
| bool iss::plugin::instruction_count::registration(const char* const version, vm_if& vm) { | bool iss::plugin::instruction_count::registration(const char* const version, vm_if& vm) { | ||||||
|     auto instr_if = vm.get_arch()->get_instrumentation_if(); |     auto instr_if = vm.get_arch()->get_instrumentation_if(); | ||||||
|     if(!instr_if) return false; |     if(!instr_if) | ||||||
| 	const std::string  core_name = instr_if->core_type_name(); |         return false; | ||||||
|     Json::Value &val = root[core_name]; |     return true; | ||||||
|     if(!val.isNull() && val.isArray()){ |  | ||||||
|     	delays.reserve(val.size()); |  | ||||||
|     	for(auto it:val){ |  | ||||||
|     		auto name = it["name"]; |  | ||||||
|     		auto size = it["size"]; |  | ||||||
|     		auto delay = it["delay"]; |  | ||||||
|     		if(!name.isString() || !size.isUInt() || !(delay.isUInt() || delay.isArray())) throw std::runtime_error("JSON parse error"); |  | ||||||
|     		if(delay.isUInt()){ |  | ||||||
| 				const instr_delay entry{name.asCString(), size.asUInt(), delay.asUInt(), 0}; |  | ||||||
| 				delays.push_back(entry); |  | ||||||
|     		} else { |  | ||||||
| 				const instr_delay entry{name.asCString(), size.asUInt(), delay[0].asUInt(), delay[1].asUInt()}; |  | ||||||
| 				delays.push_back(entry); |  | ||||||
|     		} |  | ||||||
|     	} |  | ||||||
|     	rep_counts.resize(delays.size()); |  | ||||||
|     } else { |  | ||||||
|         LOG(ERR)<<"plugin instruction_count: could not find an entry for "<<core_name<<" in JSON file"<<std::endl; |  | ||||||
|     } |  | ||||||
| 	return true; |  | ||||||
| } | } | ||||||
|  |  | ||||||
| void iss::plugin::instruction_count::callback(instr_info_t instr_info) { | void iss::plugin::instruction_count::callback(instr_info_t instr_info) { rep_counts[instr_info.instr_id]++; } | ||||||
| 	rep_counts[instr_info.instr_id]++; |  | ||||||
| } |  | ||||||
|   | |||||||
| @@ -36,8 +36,8 @@ | |||||||
| #define _ISS_PLUGIN_INSTRUCTION_COUNTER_H_ | #define _ISS_PLUGIN_INSTRUCTION_COUNTER_H_ | ||||||
|  |  | ||||||
| #include <iss/vm_plugin.h> | #include <iss/vm_plugin.h> | ||||||
| #include <json/json.h> |  | ||||||
| #include <string> | #include <string> | ||||||
|  | #include <vector> | ||||||
|  |  | ||||||
| namespace iss { | namespace iss { | ||||||
| namespace plugin { | namespace plugin { | ||||||
| @@ -53,30 +53,29 @@ class instruction_count : public iss::vm_plugin { | |||||||
| public: | public: | ||||||
|     instruction_count() = delete; |     instruction_count() = delete; | ||||||
|  |  | ||||||
|     instruction_count(const instruction_count &) = delete; |     instruction_count(const instruction_count&) = delete; | ||||||
|  |  | ||||||
|     instruction_count(const instruction_count &&) = delete; |     instruction_count(const instruction_count&&) = delete; | ||||||
|  |  | ||||||
|     instruction_count(std::string config_file_name); |     instruction_count(std::string config_file_name); | ||||||
|  |  | ||||||
|     virtual ~instruction_count(); |     virtual ~instruction_count(); | ||||||
|  |  | ||||||
|     instruction_count &operator=(const instruction_count &) = delete; |     instruction_count& operator=(const instruction_count&) = delete; | ||||||
|  |  | ||||||
|     instruction_count &operator=(const instruction_count &&) = delete; |     instruction_count& operator=(const instruction_count&&) = delete; | ||||||
|  |  | ||||||
|     bool registration(const char *const version, vm_if &arch) override; |     bool registration(const char* const version, vm_if& arch) override; | ||||||
|  |  | ||||||
|     sync_type get_sync() override { return POST_SYNC; }; |     sync_type get_sync() override { return POST_SYNC; }; | ||||||
|  |  | ||||||
|     void callback(instr_info_t) override; |     void callback(instr_info_t) override; | ||||||
|  |  | ||||||
| private: | private: | ||||||
|     Json::Value root; |  | ||||||
|     std::vector<instr_delay> delays; |     std::vector<instr_delay> delays; | ||||||
|     std::vector<uint64_t> rep_counts; |     std::vector<uint64_t> rep_counts; | ||||||
| }; | }; | ||||||
| } | } // namespace plugin | ||||||
| } | } // namespace iss | ||||||
|  |  | ||||||
| #endif /* _ISS_PLUGIN_INSTRUCTION_COUNTER_H_ */ | #endif /* _ISS_PLUGIN_INSTRUCTION_COUNTER_H_ */ | ||||||
|   | |||||||
| @@ -1,214 +0,0 @@ | |||||||
| /******************************************************************************* |  | ||||||
|  * Copyright (C) 2017 - 2023, MINRES Technologies GmbH |  | ||||||
|  * All rights reserved. |  | ||||||
|  * |  | ||||||
|  * Redistribution and use in source and binary forms, with or without |  | ||||||
|  * modification, are permitted provided that the following conditions are met: |  | ||||||
|  * |  | ||||||
|  * 1. Redistributions of source code must retain the above copyright notice, |  | ||||||
|  *    this list of conditions and the following disclaimer. |  | ||||||
|  * |  | ||||||
|  * 2. Redistributions in binary form must reproduce the above copyright notice, |  | ||||||
|  *    this list of conditions and the following disclaimer in the documentation |  | ||||||
|  *    and/or other materials provided with the distribution. |  | ||||||
|  * |  | ||||||
|  * 3. Neither the name of the copyright holder nor the names of its contributors |  | ||||||
|  *    may be used to endorse or promote products derived from this software |  | ||||||
|  *    without specific prior written permission. |  | ||||||
|  * |  | ||||||
|  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" |  | ||||||
|  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |  | ||||||
|  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |  | ||||||
|  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE |  | ||||||
|  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR |  | ||||||
|  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF |  | ||||||
|  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS |  | ||||||
|  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN |  | ||||||
|  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) |  | ||||||
|  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE |  | ||||||
|  * POSSIBILITY OF SUCH DAMAGE. |  | ||||||
|  * |  | ||||||
|  * Contributors: |  | ||||||
|  *       alex.com - initial implementation |  | ||||||
|  ******************************************************************************/ |  | ||||||
|  |  | ||||||
| #include <iss/arch_if.h> |  | ||||||
| #include <iss/plugin/pctrace.h> |  | ||||||
| #include <util/logging.h> |  | ||||||
| #include <util/ities.h> |  | ||||||
| #include <rapidjson/document.h> |  | ||||||
| #include <rapidjson/istreamwrapper.h> |  | ||||||
| #include <rapidjson/writer.h> |  | ||||||
| #include <rapidjson/stringbuffer.h> |  | ||||||
| #include <rapidjson/ostreamwrapper.h> |  | ||||||
| #include <rapidjson/error/en.h> |  | ||||||
| #include <fstream> |  | ||||||
| #include <iostream> |  | ||||||
| #ifdef WITH_LZ4 |  | ||||||
| #include <lz4frame.h> |  | ||||||
| #endif |  | ||||||
|  |  | ||||||
| namespace iss { |  | ||||||
| namespace plugin { |  | ||||||
|  |  | ||||||
| using namespace rapidjson; |  | ||||||
| using namespace std; |  | ||||||
|  |  | ||||||
| #ifdef WITH_LZ4 |  | ||||||
| class lz4compress_steambuf: public std::streambuf { |  | ||||||
| public: |  | ||||||
|     lz4compress_steambuf(const lz4compress_steambuf&) = delete; |  | ||||||
|     lz4compress_steambuf& operator=(const lz4compress_steambuf&) = delete; |  | ||||||
|     lz4compress_steambuf(std::ostream &sink, size_t buf_size) |  | ||||||
|     : sink(sink) |  | ||||||
|     , src_buf(buf_size) |  | ||||||
|     , dest_buf(LZ4F_compressBound(buf_size, nullptr)) |  | ||||||
|     { |  | ||||||
|         auto errCode = LZ4F_createCompressionContext(&ctx, LZ4F_VERSION); |  | ||||||
|         if (LZ4F_isError(errCode) != 0) |  | ||||||
|             throw std::runtime_error(std::string("Failed to create LZ4 context: ") + LZ4F_getErrorName(errCode)); |  | ||||||
|         size_t ret = LZ4F_compressBegin(ctx, &dest_buf.front(), dest_buf.capacity(), nullptr); |  | ||||||
|         if (LZ4F_isError(ret) != 0) |  | ||||||
|             throw std::runtime_error(std::string("Failed to start LZ4 compression: ") + LZ4F_getErrorName(ret)); |  | ||||||
|         setp(src_buf.data(), src_buf.data() + src_buf.size() - 1); |  | ||||||
|         sink.write(dest_buf.data(), ret); |  | ||||||
|     } |  | ||||||
|  |  | ||||||
|     ~lz4compress_steambuf() { |  | ||||||
|         close(); |  | ||||||
|     } |  | ||||||
|  |  | ||||||
|     void close() { |  | ||||||
|         if (closed) |  | ||||||
|             return; |  | ||||||
|         sync(); |  | ||||||
|         auto ret = LZ4F_compressEnd(ctx, dest_buf.data(), dest_buf.capacity(), nullptr); |  | ||||||
|         if (LZ4F_isError(ret) != 0) |  | ||||||
|             throw std::runtime_error(std::string("Failed to finish LZ4 compression: ") + LZ4F_getErrorName(ret)); |  | ||||||
|         sink.write(dest_buf.data(), ret); |  | ||||||
|         LZ4F_freeCompressionContext(ctx); |  | ||||||
|         closed = true; |  | ||||||
|     } |  | ||||||
|  |  | ||||||
| private: |  | ||||||
|     int_type overflow(int_type ch) override { |  | ||||||
|         compress_and_write(); |  | ||||||
|         *pptr() = static_cast<char_type>(ch); |  | ||||||
|         pbump(1); |  | ||||||
|         return ch; |  | ||||||
|     } |  | ||||||
|  |  | ||||||
|     int_type sync() override { |  | ||||||
|         compress_and_write(); |  | ||||||
|         return 0; |  | ||||||
|     } |  | ||||||
|  |  | ||||||
|     void compress_and_write() { |  | ||||||
|         if (closed) |  | ||||||
|             throw std::runtime_error("Cannot write to closed stream"); |  | ||||||
|         if(auto orig_size = pptr() - pbase()){ |  | ||||||
|             auto ret = LZ4F_compressUpdate(ctx, dest_buf.data(), dest_buf.capacity(), pbase(), orig_size, nullptr); |  | ||||||
|             if (LZ4F_isError(ret) != 0) |  | ||||||
|                 throw std::runtime_error(std::string("LZ4 compression failed: ") + LZ4F_getErrorName(ret)); |  | ||||||
|             if(ret) sink.write(dest_buf.data(), ret); |  | ||||||
|             pbump(-orig_size); |  | ||||||
|         } |  | ||||||
|     } |  | ||||||
|  |  | ||||||
|     std::ostream &sink; |  | ||||||
|     std::vector<char> src_buf; |  | ||||||
|     std::vector<char> dest_buf; |  | ||||||
|     LZ4F_compressionContext_t ctx{ nullptr }; |  | ||||||
|     bool closed{ false }; |  | ||||||
| }; |  | ||||||
| #endif |  | ||||||
|  |  | ||||||
| pctrace::pctrace(std::string const &filename) |  | ||||||
| : instr_if(nullptr) |  | ||||||
| , filename(filename) |  | ||||||
| , output("output.trc") |  | ||||||
| #ifdef WITH_LZ4 |  | ||||||
| , strbuf(new lz4compress_steambuf(output, 4096)) |  | ||||||
| , ostr(strbuf.get()) |  | ||||||
| #endif |  | ||||||
| { } |  | ||||||
|  |  | ||||||
| pctrace::~pctrace() { } |  | ||||||
|  |  | ||||||
| bool pctrace::registration(const char *const version, vm_if& vm) { |  | ||||||
|     instr_if = vm.get_arch()->get_instrumentation_if(); |  | ||||||
|     if(!instr_if) return false; |  | ||||||
|     const string  core_name = instr_if->core_type_name(); |  | ||||||
|     if (filename.length() > 0) { |  | ||||||
|         ifstream is(filename); |  | ||||||
|         if (is.is_open()) { |  | ||||||
|             try { |  | ||||||
|                 IStreamWrapper isw(is); |  | ||||||
|                 Document d; |  | ||||||
|                 ParseResult ok = d.ParseStream(isw); |  | ||||||
|                 if(ok) { |  | ||||||
|                     Value& val = d[core_name.c_str()]; |  | ||||||
|                     if(val.IsArray()){ |  | ||||||
|                         delays.reserve(val.Size()); |  | ||||||
|                         for (auto it = val.Begin(); it != val.End(); ++it) { |  | ||||||
|                             auto& name = (*it)["name"]; |  | ||||||
|                             auto& size = (*it)["size"]; |  | ||||||
|                             auto& delay = (*it)["delay"]; |  | ||||||
|                             auto& branch = (*it)["branch"]; |  | ||||||
|                             if(delay.IsArray()) { |  | ||||||
|                                 auto dt = delay[0].Get<unsigned>(); |  | ||||||
|                                 auto dnt = delay[1].Get<unsigned>(); |  | ||||||
|                                 delays.push_back(instr_desc{size.Get<unsigned>(), dt, dnt, branch.Get<bool>()}); |  | ||||||
|                             } else if(delay.Is<unsigned>()) { |  | ||||||
|                                 auto d = delay.Get<unsigned>(); |  | ||||||
|                                 delays.push_back(instr_desc{size.Get<unsigned>(), d, d, branch.Get<bool>()}); |  | ||||||
|                             } else |  | ||||||
|                                 throw runtime_error("JSON parse error"); |  | ||||||
|  |  | ||||||
|                         } |  | ||||||
|                     } else { |  | ||||||
|                         LOG(ERR)<<"plugin cycle_estimate: could not find an entry for "<<core_name<<" in JSON file"<<endl; |  | ||||||
|                         return false; |  | ||||||
|                     } |  | ||||||
|                 } else { |  | ||||||
|                     LOG(ERR)<<"plugin cycle_estimate: could not parse in JSON file at "<< ok.Offset()<<": "<<GetParseError_En(ok.Code())<<endl; |  | ||||||
|                     return false; |  | ||||||
|                 } |  | ||||||
|             } catch (runtime_error &e) { |  | ||||||
|                 LOG(ERR) << "Could not parse input file " << filename << ", reason: " << e.what(); |  | ||||||
|                 return false; |  | ||||||
|             } |  | ||||||
|         } else { |  | ||||||
|             LOG(ERR) << "Could not open input file " << filename; |  | ||||||
|             return false; |  | ||||||
|         } |  | ||||||
|     } |  | ||||||
|     return true; |  | ||||||
| } |  | ||||||
|  |  | ||||||
| void pctrace::callback(instr_info_t iinfo) { |  | ||||||
|     auto delay = 0; |  | ||||||
|     size_t id = iinfo.instr_id; |  | ||||||
|     auto entry = delays[id]; |  | ||||||
|     auto instr = instr_if->get_instr_word(); |  | ||||||
|     auto call = id==65 || id ==86 || ((id==2 || id==3) && bit_sub<7,5>(instr)!=0) ;//not taking care of tail calls (jalr with loading x6) |  | ||||||
|     bool taken = instr_if->is_branch_taken(); |  | ||||||
|     bool compressed = (instr&0x3)!=0x3; |  | ||||||
|     if (taken) { |  | ||||||
|         delay = entry.taken; |  | ||||||
|         if(entry.taken > 1) |  | ||||||
|             instr_if->update_last_instr_cycles(entry.taken); |  | ||||||
|     } else { |  | ||||||
|         delay = entry.not_taken; |  | ||||||
|         if (entry.not_taken > 1) |  | ||||||
|             instr_if->update_last_instr_cycles(entry.not_taken); |  | ||||||
|     } |  | ||||||
| #ifndef WITH_LZ4 |  | ||||||
|     output<<std::hex <<"0x" << instr_if->get_pc() <<"," << delay <<"," << call<<","<<(compressed?2:4) <<"\n"; |  | ||||||
| #else |  | ||||||
|     auto rdbuf=ostr.rdbuf(); |  | ||||||
|     ostr<<std::hex <<"0x" << instr_if->get_pc() <<"," << delay <<"," << call<<","<<(compressed?2:4) <<"\n"; |  | ||||||
| #endif |  | ||||||
| } |  | ||||||
| } |  | ||||||
| } |  | ||||||
							
								
								
									
										445
									
								
								src/main.cpp
									
									
									
									
									
								
							
							
						
						
									
										445
									
								
								src/main.cpp
									
									
									
									
									
								
							| @@ -1,222 +1,223 @@ | |||||||
| /******************************************************************************* | /******************************************************************************* | ||||||
|  * Copyright (C) 2017, 2018 MINRES Technologies GmbH |  * Copyright (C) 2017, 2018 MINRES Technologies GmbH | ||||||
|  * All rights reserved. |  * All rights reserved. | ||||||
|  * |  * | ||||||
|  * Redistribution and use in source and binary forms, with or without |  * Redistribution and use in source and binary forms, with or without | ||||||
|  * modification, are permitted provided that the following conditions are met: |  * modification, are permitted provided that the following conditions are met: | ||||||
|  * |  * | ||||||
|  * 1. Redistributions of source code must retain the above copyright notice, |  * 1. Redistributions of source code must retain the above copyright notice, | ||||||
|  *    this list of conditions and the following disclaimer. |  *    this list of conditions and the following disclaimer. | ||||||
|  * |  * | ||||||
|  * 2. Redistributions in binary form must reproduce the above copyright notice, |  * 2. Redistributions in binary form must reproduce the above copyright notice, | ||||||
|  *    this list of conditions and the following disclaimer in the documentation |  *    this list of conditions and the following disclaimer in the documentation | ||||||
|  *    and/or other materials provided with the distribution. |  *    and/or other materials provided with the distribution. | ||||||
|  * |  * | ||||||
|  * 3. Neither the name of the copyright holder nor the names of its contributors |  * 3. Neither the name of the copyright holder nor the names of its contributors | ||||||
|  *    may be used to endorse or promote products derived from this software |  *    may be used to endorse or promote products derived from this software | ||||||
|  *    without specific prior written permission. |  *    without specific prior written permission. | ||||||
|  * |  * | ||||||
|  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" |  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" | ||||||
|  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||||||
|  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||||||
|  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE |  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE | ||||||
|  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR |  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR | ||||||
|  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF |  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF | ||||||
|  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS |  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS | ||||||
|  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN |  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN | ||||||
|  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) |  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | ||||||
|  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE |  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE | ||||||
|  * POSSIBILITY OF SUCH DAMAGE. |  * POSSIBILITY OF SUCH DAMAGE. | ||||||
|  * |  * | ||||||
|  *******************************************************************************/ |  *******************************************************************************/ | ||||||
|  |  | ||||||
| #include <iostream> | #include <array> | ||||||
| #include <vector> | #include <iostream> | ||||||
| #include <array> | #include <iss/factory.h> | ||||||
| #include <iss/factory.h> | #include <vector> | ||||||
|  |  | ||||||
| #include <boost/lexical_cast.hpp> | #include "iss/arch/tgc_mapper.h" | ||||||
| #include <boost/program_options.hpp> | #include <boost/lexical_cast.hpp> | ||||||
| #include "iss/arch/tgc_mapper.h" | #include <boost/program_options.hpp> | ||||||
| #ifdef WITH_LLVM | #ifdef WITH_LLVM | ||||||
| #include <iss/llvm/jit_helper.h> | #include <iss/llvm/jit_init.h> | ||||||
| #endif | #endif | ||||||
| #include <iss/log_categories.h> | #include "iss/plugin/cycle_estimate.h" | ||||||
| #include "iss/plugin/cycle_estimate.h" | #include "iss/plugin/instruction_count.h" | ||||||
| #include "iss/plugin/instruction_count.h" | #include <iss/log_categories.h> | ||||||
| #include "iss/plugin/pctrace.h" | #ifndef WIN32 | ||||||
| #ifndef WIN32 | #include <iss/plugin/loader.h> | ||||||
| #include <iss/plugin/loader.h> | #endif | ||||||
| #endif | #if defined(HAS_LUA) | ||||||
| #if defined(HAS_LUA) | #include <iss/plugin/lua.h> | ||||||
| #include <iss/plugin/lua.h> | #endif | ||||||
| #endif |  | ||||||
|  | namespace po = boost::program_options; | ||||||
| namespace po = boost::program_options; |  | ||||||
|  | int main(int argc, char* argv[]) { | ||||||
| int main(int argc, char *argv[]) { |     /* | ||||||
|     /* |      *  Define and parse the program options | ||||||
|      *  Define and parse the program options |      */ | ||||||
|      */ |     po::variables_map clim; | ||||||
|     po::variables_map clim; |     po::options_description desc("Options"); | ||||||
|     po::options_description desc("Options"); |     // clang-format off | ||||||
|     // clang-format off |     desc.add_options() | ||||||
|     desc.add_options() |         ("help,h", "Print help message") | ||||||
|         ("help,h", "Print help message") |         ("verbose,v", po::value<int>()->default_value(4), "Sets logging verbosity") | ||||||
|         ("verbose,v", po::value<int>()->default_value(4), "Sets logging verbosity") |         ("logfile,l", po::value<std::string>(), "Sets default log file.") | ||||||
|         ("logfile,l", po::value<std::string>(), "Sets default log file.") |         ("disass,d", po::value<std::string>()->implicit_value(""), "Enables disassembly") | ||||||
|         ("disass,d", po::value<std::string>()->implicit_value(""), "Enables disassembly") |         ("gdb-port,g", po::value<unsigned>()->default_value(0), "enable gdb server and specify port to use") | ||||||
|         ("gdb-port,g", po::value<unsigned>()->default_value(0), "enable gdb server and specify port to use") |         ("instructions,i", po::value<uint64_t>()->default_value(std::numeric_limits<uint64_t>::max()), "max. number of instructions to simulate") | ||||||
|         ("instructions,i", po::value<uint64_t>()->default_value(std::numeric_limits<uint64_t>::max()), "max. number of instructions to simulate") |         ("reset,r", po::value<std::string>(), "reset address") | ||||||
|         ("reset,r", po::value<std::string>(), "reset address") |         ("dump-ir", "dump the intermediate representation") | ||||||
|         ("dump-ir", "dump the intermediate representation") |         ("elf,f", po::value<std::vector<std::string>>(), "ELF file(s) to load") | ||||||
|         ("elf,f", po::value<std::vector<std::string>>(), "ELF file(s) to load") |         ("mem,m", po::value<std::string>(), "the memory input file") | ||||||
|         ("mem,m", po::value<std::string>(), "the memory input file") |         ("plugin,p", po::value<std::vector<std::string>>(), "plugin to activate") | ||||||
|         ("plugin,p", po::value<std::vector<std::string>>(), "plugin to activate") |         ("backend", po::value<std::string>()->default_value("interp"), "the ISS backend to use, options are: interp, tcc") | ||||||
|         ("backend", po::value<std::string>()->default_value("interp"), "the ISS backend to use, options are: interp, tcc") |         ("isa", po::value<std::string>()->default_value("tgc5c"), "core or isa name to use for simulation, use '?' to get list"); | ||||||
|         ("isa", po::value<std::string>()->default_value("tgc_c"), "isa to use for simulation"); |     // clang-format on | ||||||
|     // clang-format on |     auto parsed = po::command_line_parser(argc, argv).options(desc).allow_unregistered().run(); | ||||||
|     auto parsed = po::command_line_parser(argc, argv).options(desc).allow_unregistered().run(); |     try { | ||||||
|     try { |         po::store(parsed, clim); // can throw | ||||||
|         po::store(parsed, clim); // can throw |         // --help option | ||||||
|         // --help option |         if(clim.count("help")) { | ||||||
|         if (clim.count("help")) { |             std::cout << "DBT-RISE-TGC simulator for TGC RISC-V cores" << std::endl << desc << std::endl; | ||||||
|             std::cout << "DBT-RISE-RiscV simulator for RISC-V" << std::endl << desc << std::endl; |             return 0; | ||||||
|             return 0; |         } | ||||||
|         } |         po::notify(clim); // throws on error, so do after help in case | ||||||
|         po::notify(clim); // throws on error, so do after help in case |     } catch(po::error& e) { | ||||||
|     } catch (po::error &e) { |         // there are problems | ||||||
|         // there are problems |         std::cerr << "ERROR: " << e.what() << std::endl << std::endl; | ||||||
|         std::cerr << "ERROR: " << e.what() << std::endl << std::endl; |         std::cerr << desc << std::endl; | ||||||
|         std::cerr << desc << std::endl; |         return 1; | ||||||
|         return 1; |     } | ||||||
|     } |     std::vector<std::string> args = collect_unrecognized(parsed.options, po::include_positional); | ||||||
|     std::vector<std::string> args = collect_unrecognized(parsed.options, po::include_positional); |  | ||||||
|  |     LOGGER(DEFAULT)::print_time() = false; | ||||||
|     LOGGER(DEFAULT)::print_time() = false; |     LOGGER(connection)::print_time() = false; | ||||||
|     LOGGER(connection)::print_time() = false; |     auto l = logging::as_log_level(clim["verbose"].as<int>()); | ||||||
|     auto l = logging::as_log_level(clim["verbose"].as<int>()); |     LOGGER(DEFAULT)::reporting_level() = l; | ||||||
|     LOGGER(DEFAULT)::reporting_level() = l; |     LOGGER(connection)::reporting_level() = l; | ||||||
|     LOGGER(connection)::reporting_level() = l; |     if(clim.count("logfile")) { | ||||||
|     if (clim.count("logfile")) { |         // configure the connection logger | ||||||
|         // configure the connection logger |         auto f = fopen(clim["logfile"].as<std::string>().c_str(), "w"); | ||||||
|         auto f = fopen(clim["logfile"].as<std::string>().c_str(), "w"); |         LOG_OUTPUT(DEFAULT)::stream() = f; | ||||||
|         LOG_OUTPUT(DEFAULT)::stream() = f; |         LOG_OUTPUT(connection)::stream() = f; | ||||||
|         LOG_OUTPUT(connection)::stream() = f; |     } | ||||||
|     } |  | ||||||
|  |     std::vector<iss::vm_plugin*> plugin_list; | ||||||
|     std::vector<iss::vm_plugin *> plugin_list; |     auto res = 0; | ||||||
|     auto res = 0; |     try { | ||||||
|     try { | #ifdef WITH_LLVM | ||||||
| #ifdef WITH_LLVM |         // application code comes here // | ||||||
|         // application code comes here // |         iss::init_jit_debug(argc, argv); | ||||||
|         iss::init_jit_debug(argc, argv); | #endif | ||||||
| #endif |         bool dump = clim.count("dump-ir"); | ||||||
|         bool dump = clim.count("dump-ir"); |         auto& f = iss::core_factory::instance(); | ||||||
|         auto & f = iss::core_factory::instance(); |         // instantiate the simulator | ||||||
|         // instantiate the simulator |         iss::vm_ptr vm{nullptr}; | ||||||
|         iss::vm_ptr vm{nullptr}; |         iss::cpu_ptr cpu{nullptr}; | ||||||
|         iss::cpu_ptr cpu{nullptr}; |         std::string isa_opt(clim["isa"].as<std::string>()); | ||||||
|         std::string isa_opt(clim["isa"].as<std::string>()); |         if(isa_opt.size() == 0 || isa_opt == "?") { | ||||||
|         if(isa_opt.size()==0 || isa_opt == "?") { |             auto list = f.get_names(); | ||||||
|             std::cout<<"Available cores: "<<util::join(f.get_names(), ", ")<<std::endl; |             std::sort(std::begin(list), std::end(list)); | ||||||
|             return 0; |             std::cout << "Available implementations (core|platform|backend):\n  - " << util::join(list, "\n  - ") << std::endl; | ||||||
|         } else if (isa_opt.find('|') != std::string::npos) { |             return 0; | ||||||
|             std::tie(cpu, vm) = f.create(isa_opt+"|"+clim["backend"].as<std::string>(), clim["gdb-port"].as<unsigned>()); |         } else if(isa_opt.find('|') != std::string::npos) { | ||||||
|         } else { |             std::tie(cpu, vm) = f.create(isa_opt + "|" + clim["backend"].as<std::string>(), clim["gdb-port"].as<unsigned>()); | ||||||
|             auto base_isa = isa_opt.substr(0, 5); |         } else { | ||||||
|             if(base_isa=="tgc_d" || base_isa=="tgc_e") { |             auto base_isa = isa_opt.substr(0, 5); | ||||||
|                 isa_opt += "|mu_p_clic_pmp|"+clim["backend"].as<std::string>(); |             if(base_isa == "tgc5d" || base_isa == "tgc5e") { | ||||||
|             } else { |                 isa_opt += "|mu_p_clic_pmp|" + clim["backend"].as<std::string>(); | ||||||
|                 isa_opt += "|m_p|"+clim["backend"].as<std::string>(); |             } else { | ||||||
|             } |                 isa_opt += "|m_p|" + clim["backend"].as<std::string>(); | ||||||
|             std::tie(cpu, vm) = f.create(isa_opt, clim["gdb-port"].as<unsigned>()); |             } | ||||||
|         } |             std::tie(cpu, vm) = f.create(isa_opt, clim["gdb-port"].as<unsigned>()); | ||||||
|         if(!cpu ){ |         } | ||||||
|             LOG(ERR) << "Could not create cpu for isa " << isa_opt << " and backend " <<clim["backend"].as<std::string>()<< std::endl; |         if(!cpu) { | ||||||
|             return 127; |             LOG(ERR) << "Could not create cpu for isa " << isa_opt << " and backend " << clim["backend"].as<std::string>() << std::endl; | ||||||
|         } |             return 127; | ||||||
|         if(!vm ){ |         } | ||||||
|             LOG(ERR) << "Could not create vm for isa " << isa_opt << " and backend " <<clim["backend"].as<std::string>()<< std::endl; |         if(!vm) { | ||||||
|             return 127; |             LOG(ERR) << "Could not create vm for isa " << isa_opt << " and backend " << clim["backend"].as<std::string>() << std::endl; | ||||||
|         } |             return 127; | ||||||
|         if (clim.count("plugin")) { |         } | ||||||
|             for (std::string const& opt_val : clim["plugin"].as<std::vector<std::string>>()) { |         if(clim.count("plugin")) { | ||||||
|                 std::string plugin_name=opt_val; |             for(std::string const& opt_val : clim["plugin"].as<std::vector<std::string>>()) { | ||||||
|                 std::string arg{""}; |                 std::string plugin_name = opt_val; | ||||||
|                 std::size_t found = opt_val.find('='); |                 std::string arg{""}; | ||||||
|                 if (found != std::string::npos) { |                 std::size_t found = opt_val.find('='); | ||||||
|                     plugin_name = opt_val.substr(0, found); |                 if(found != std::string::npos) { | ||||||
|                     arg = opt_val.substr(found + 1, opt_val.size()); |                     plugin_name = opt_val.substr(0, found); | ||||||
|                 } |                     arg = opt_val.substr(found + 1, opt_val.size()); | ||||||
|                 if (plugin_name == "ic") { |                 } | ||||||
|                     auto *ic_plugin = new iss::plugin::instruction_count(arg); | #if defined(WITH_PLUGINS) | ||||||
|                     vm->register_plugin(*ic_plugin); |                 if(plugin_name == "ic") { | ||||||
|                     plugin_list.push_back(ic_plugin); |                     auto* ic_plugin = new iss::plugin::instruction_count(arg); | ||||||
|                 } else if (plugin_name == "ce") { |                     vm->register_plugin(*ic_plugin); | ||||||
|                     auto *ce_plugin = new iss::plugin::cycle_estimate(arg); |                     plugin_list.push_back(ic_plugin); | ||||||
|                     vm->register_plugin(*ce_plugin); |                 } else if(plugin_name == "ce") { | ||||||
|                     plugin_list.push_back(ce_plugin); |                     auto* ce_plugin = new iss::plugin::cycle_estimate(arg); | ||||||
|                 } else if (plugin_name == "pctrace") { |                     vm->register_plugin(*ce_plugin); | ||||||
|                     auto *plugin = new iss::plugin::pctrace(arg); |                     plugin_list.push_back(ce_plugin); | ||||||
|                     vm->register_plugin(*plugin); |                 } else | ||||||
|                     plugin_list.push_back(plugin); | #endif | ||||||
|                } else { |                 { | ||||||
| #ifndef WIN32 | #if !defined(WIN32) | ||||||
|                     std::vector<char const*> a{}; |                     std::vector<char const*> a{}; | ||||||
|                     if(arg.length()) |                     if(arg.length()) | ||||||
|                         a.push_back({arg.c_str()}); |                         a.push_back({arg.c_str()}); | ||||||
|                     iss::plugin::loader l(plugin_name, {{"initPlugin"}}); |                     iss::plugin::loader l(plugin_name, {{"initPlugin"}}); | ||||||
|                     auto* plugin = l.call_function<iss::vm_plugin*>("initPlugin", a.size(), a.data()); |                     auto* plugin = l.call_function<iss::vm_plugin*>("initPlugin", a.size(), a.data()); | ||||||
|                     if(plugin){ |                     if(plugin) { | ||||||
|                         vm->register_plugin(*plugin); |                         vm->register_plugin(*plugin); | ||||||
|                         plugin_list.push_back(plugin); |                         plugin_list.push_back(plugin); | ||||||
|                     } else |                     } else | ||||||
| #endif | #endif | ||||||
|                     { |                     { | ||||||
|                         LOG(ERR) << "Unknown plugin name: " << plugin_name << ", valid names are 'ce', 'ic'" << std::endl; |                         LOG(ERR) << "Unknown plugin name: " << plugin_name << ", valid names are 'ce', 'ic'" << std::endl; | ||||||
|                         return 127; |                         return 127; | ||||||
|                     } |                     } | ||||||
|                 } |                 } | ||||||
|             } |             } | ||||||
|         } |         } | ||||||
|         if (clim.count("disass")) { |         if(clim.count("disass")) { | ||||||
|             vm->setDisassEnabled(true); |             vm->setDisassEnabled(true); | ||||||
|             LOGGER(disass)::reporting_level() = logging::INFO; |             LOGGER(disass)::reporting_level() = logging::INFO; | ||||||
|             LOGGER(disass)::print_time() = false; |             LOGGER(disass)::print_time() = false; | ||||||
|             auto file_name = clim["disass"].as<std::string>(); |             auto file_name = clim["disass"].as<std::string>(); | ||||||
|             if (file_name.length() > 0) { |             if(file_name.length() > 0) { | ||||||
|                 LOG_OUTPUT(disass)::stream() = fopen(file_name.c_str(), "w"); |                 LOG_OUTPUT(disass)::stream() = fopen(file_name.c_str(), "w"); | ||||||
|                 LOGGER(disass)::print_severity() = false; |                 LOGGER(disass)::print_severity() = false; | ||||||
|             } |             } | ||||||
|         } |         } | ||||||
|         uint64_t start_address = 0; |         uint64_t start_address = 0; | ||||||
|         if (clim.count("mem")) |         if(clim.count("mem")) | ||||||
|             vm->get_arch()->load_file(clim["mem"].as<std::string>()); |             vm->get_arch()->load_file(clim["mem"].as<std::string>()); | ||||||
|         if (clim.count("elf")) |         if(clim.count("elf")) | ||||||
|             for (std::string input : clim["elf"].as<std::vector<std::string>>()) { |             for(std::string input : clim["elf"].as<std::vector<std::string>>()) { | ||||||
|                 auto start_addr = vm->get_arch()->load_file(input); |                 auto start_addr = vm->get_arch()->load_file(input); | ||||||
|                 if (start_addr.second) start_address = start_addr.first; |                 if(start_addr.second) | ||||||
|             } |                     start_address = start_addr.first; | ||||||
|         for (std::string input : args) { |             } | ||||||
|             auto start_addr = vm->get_arch()->load_file(input); // treat remaining arguments as elf files |         for(std::string input : args) { | ||||||
|             if (start_addr.second) start_address = start_addr.first; |             auto start_addr = vm->get_arch()->load_file(input); // treat remaining arguments as elf files | ||||||
|         } |             if(start_addr.second) | ||||||
|         if (clim.count("reset")) { |                 start_address = start_addr.first; | ||||||
|             auto str = clim["reset"].as<std::string>(); |         } | ||||||
|             start_address = str.find("0x") == 0 ? std::stoull(str.substr(2), nullptr, 16) : std::stoull(str, nullptr, 10); |         if(clim.count("reset")) { | ||||||
|         } |             auto str = clim["reset"].as<std::string>(); | ||||||
|         vm->reset(start_address); |             start_address = str.find("0x") == 0 ? std::stoull(str.substr(2), nullptr, 16) : std::stoull(str, nullptr, 10); | ||||||
|         auto cycles = clim["instructions"].as<uint64_t>(); |         } | ||||||
|         res = vm->start(cycles, dump); |         vm->reset(start_address); | ||||||
|     } catch (std::exception &e) { |         auto cycles = clim["instructions"].as<uint64_t>(); | ||||||
|         LOG(ERR) << "Unhandled Exception reached the top of main: " << e.what() << ", application will now exit" |         res = vm->start(cycles, dump); | ||||||
|                    << std::endl; |     } catch(std::exception& e) { | ||||||
|         res = 2; |         LOG(ERR) << "Unhandled Exception reached the top of main: " << e.what() << ", application will now exit" << std::endl; | ||||||
|     } |         res = 2; | ||||||
|     // cleanup to let plugins report of needed |     } | ||||||
|     for (auto *p : plugin_list) { |     // cleanup to let plugins report of needed | ||||||
|         delete p; |     for(auto* p : plugin_list) { | ||||||
|     } |         delete p; | ||||||
|     return res; |     } | ||||||
| } |     return res; | ||||||
|  | } | ||||||
|   | |||||||
| @@ -37,25 +37,28 @@ | |||||||
| #include <iss/debugger/target_adapter_if.h> | #include <iss/debugger/target_adapter_if.h> | ||||||
| #include <iss/iss.h> | #include <iss/iss.h> | ||||||
| #include <iss/vm_types.h> | #include <iss/vm_types.h> | ||||||
|  | #include "iss_factory.h" | ||||||
| #ifndef WIN32 | #ifndef WIN32 | ||||||
| #include <iss/plugin/loader.h> | #include <iss/plugin/loader.h> | ||||||
| #endif | #endif | ||||||
| #include "core_complex.h" | #include "sc_core_adapter_if.h" | ||||||
| #include <iss/arch/tgc_mapper.h> | #include <iss/arch/tgc_mapper.h> | ||||||
| #include <scc/report.h> | #include <scc/report.h> | ||||||
| #include <util/ities.h> | #include <util/ities.h> | ||||||
| #include <iostream> | #include <iostream> | ||||||
| #include <sstream> | #include <sstream> | ||||||
| #include <array> | #include <array> | ||||||
|  | #include <numeric> | ||||||
| #include <iss/plugin/cycle_estimate.h> | #include <iss/plugin/cycle_estimate.h> | ||||||
| #include <iss/plugin/instruction_count.h> | #include <iss/plugin/instruction_count.h> | ||||||
| #include <iss/plugin/pctrace.h> |  | ||||||
|  |  | ||||||
| // clang-format on | // clang-format on | ||||||
|  |  | ||||||
| #define STR(X) #X | #define STR(X) #X | ||||||
| #define CREATE_CORE(CN) \ | #define CREATE_CORE(CN)                                                                                                                    \ | ||||||
| if (type == STR(CN)) { std::tie(cpu, vm) = create_core<CN ## _plat_type>(backend, gdb_port, hart_id); } else |     if(type == STR(CN)) {                                                                                                                  \ | ||||||
|  |         std::tie(cpu, vm) = create_core<CN##_plat_type>(backend, gdb_port, hart_id);                                                       \ | ||||||
|  |     } else | ||||||
|  |  | ||||||
| #ifdef HAS_SCV | #ifdef HAS_SCV | ||||||
| #include <scv.h> | #include <scv.h> | ||||||
| @@ -85,151 +88,23 @@ using namespace sc_core; | |||||||
|  |  | ||||||
| namespace { | namespace { | ||||||
| iss::debugger::encoder_decoder encdec; | iss::debugger::encoder_decoder encdec; | ||||||
|  |  | ||||||
| std::array<const char, 4> lvl = {{'U', 'S', 'H', 'M'}}; | std::array<const char, 4> lvl = {{'U', 'S', 'H', 'M'}}; | ||||||
| } | } // namespace | ||||||
|  |  | ||||||
| template<typename PLAT> | int cmd_sysc(int argc, char* argv[], debugger::out_func of, debugger::data_func df, debugger::target_adapter_if* tgt_adapter) { | ||||||
| class core_wrapper_t : public PLAT { |     if(argc > 1) { | ||||||
| public: |         if(strcasecmp(argv[1], "print_time") == 0) { | ||||||
|     using reg_t       = typename arch::traits<typename PLAT::core>::reg_t; |  | ||||||
|     using phys_addr_t = typename arch::traits<typename PLAT::core>::phys_addr_t; |  | ||||||
|     using heart_state_t = typename PLAT::hart_state_type; |  | ||||||
|     core_wrapper_t(core_complex *owner) |  | ||||||
|     : owner(owner) { } |  | ||||||
|  |  | ||||||
|     uint32_t get_mode() { return this->reg.PRIV; } |  | ||||||
|  |  | ||||||
|     inline void set_interrupt_execution(bool v) { this->interrupt_sim = v?1:0; } |  | ||||||
|  |  | ||||||
|     inline bool get_interrupt_execution() { return this->interrupt_sim; } |  | ||||||
|  |  | ||||||
|     heart_state_t &get_state() { return this->state; } |  | ||||||
|  |  | ||||||
|     void notify_phase(iss::arch_if::exec_phase p) override { |  | ||||||
|         if (p == iss::arch_if::ISTART) |  | ||||||
|             owner->sync(this->instr_if.get_total_cycles()); |  | ||||||
|     } |  | ||||||
|  |  | ||||||
|     sync_type needed_sync() const override { return PRE_SYNC; } |  | ||||||
|  |  | ||||||
|     void disass_output(uint64_t pc, const std::string instr) override { |  | ||||||
|         if (!owner->disass_output(pc, instr)) { |  | ||||||
|             std::stringstream s; |  | ||||||
|             s << "[p:" << lvl[this->reg.PRIV] << ";s:0x" << std::hex << std::setfill('0') |  | ||||||
|               << std::setw(sizeof(reg_t) * 2) << (reg_t)this->state.mstatus << std::dec << ";c:" |  | ||||||
|               << this->reg.icount + this->cycle_offset << "]"; |  | ||||||
|             SCCDEBUG(owner->name())<<"disass: " |  | ||||||
|                 << "0x" << std::setw(16) << std::right << std::setfill('0') << std::hex << pc << "\t\t" << std::setw(40) |  | ||||||
|                 << std::setfill(' ') << std::left << instr << s.str(); |  | ||||||
|         } |  | ||||||
|     }; |  | ||||||
|  |  | ||||||
|     status read_mem(phys_addr_t addr, unsigned length, uint8_t *const data) override { |  | ||||||
|         if (addr.access && access_type::DEBUG) |  | ||||||
|             return owner->read_mem_dbg(addr.val, length, data) ? Ok : Err; |  | ||||||
|         else { |  | ||||||
|             return owner->read_mem(addr.val, length, data, is_fetch(addr.access)) ? Ok : Err; |  | ||||||
|         } |  | ||||||
|     } |  | ||||||
|  |  | ||||||
|     status write_mem(phys_addr_t addr, unsigned length, const uint8_t *const data) override { |  | ||||||
|         if (addr.access && access_type::DEBUG) |  | ||||||
|             return owner->write_mem_dbg(addr.val, length, data) ? Ok : Err; |  | ||||||
|         else { |  | ||||||
|             auto res = owner->write_mem(addr.val, length, data) ? Ok : Err; |  | ||||||
|             // clear MTIP on mtimecmp write |  | ||||||
|             if (addr.val == 0x2004000) { |  | ||||||
|                 reg_t val; |  | ||||||
|                 this->read_csr(arch::mip, val); |  | ||||||
|                 if (val & (1ULL << 7)) this->write_csr(arch::mip, val & ~(1ULL << 7)); |  | ||||||
|             } |  | ||||||
|             return res; |  | ||||||
|         } |  | ||||||
|     } |  | ||||||
|  |  | ||||||
|     status read_csr(unsigned addr, reg_t &val) override { |  | ||||||
| #ifndef CWR_SYSTEMC |  | ||||||
|         if((addr==arch::time || addr==arch::timeh) && owner->mtime_o.get_interface(0)){ |  | ||||||
|             uint64_t time_val; |  | ||||||
|             bool ret = owner->mtime_o->nb_peek(time_val); |  | ||||||
|             if (addr == iss::arch::time) { |  | ||||||
|                 val = static_cast<reg_t>(time_val); |  | ||||||
|             } else if (addr == iss::arch::timeh) { |  | ||||||
|                 if (sizeof(reg_t) != 4) return iss::Err; |  | ||||||
|                 val = static_cast<reg_t>(time_val >> 32); |  | ||||||
|             } |  | ||||||
|             return ret?Ok:Err; |  | ||||||
| #else |  | ||||||
| 		if((addr==arch::time || addr==arch::timeh)){ |  | ||||||
| 			uint64_t time_val = owner->mtime_i.read(); |  | ||||||
| 			if (addr == iss::arch::time) { |  | ||||||
| 				val = static_cast<reg_t>(time_val); |  | ||||||
| 			} else if (addr == iss::arch::timeh) { |  | ||||||
| 				if (sizeof(reg_t) != 4) return iss::Err; |  | ||||||
| 				val = static_cast<reg_t>(time_val >> 32); |  | ||||||
| 			} |  | ||||||
| 			return Ok; |  | ||||||
| #endif |  | ||||||
|         } else { |  | ||||||
|             return PLAT::read_csr(addr, val); |  | ||||||
|         } |  | ||||||
|     } |  | ||||||
|  |  | ||||||
|     void wait_until(uint64_t flags) override { |  | ||||||
|         SCCDEBUG(owner->name()) << "Sleeping until interrupt"; |  | ||||||
|         while(this->reg.pending_trap == 0 && (this->csr[arch::mip] & this->csr[arch::mie]) == 0) { |  | ||||||
|             sc_core::wait(wfi_evt); |  | ||||||
|         } |  | ||||||
|         PLAT::wait_until(flags); |  | ||||||
|     } |  | ||||||
|  |  | ||||||
|     void local_irq(short id, bool value) { |  | ||||||
|         reg_t mask = 0; |  | ||||||
|         switch (id) { |  | ||||||
|         case 3: // SW |  | ||||||
|             mask = 1 << 3; |  | ||||||
|             break; |  | ||||||
|         case 7: // timer |  | ||||||
|             mask = 1 << 7; |  | ||||||
|             break; |  | ||||||
|         case 11: // external |  | ||||||
|             mask = 1 << 11; |  | ||||||
|             break; |  | ||||||
|         default: |  | ||||||
|             if(id>15) mask = 1 << id; |  | ||||||
|             break; |  | ||||||
|         } |  | ||||||
|         if (value) { |  | ||||||
|             this->csr[arch::mip] |= mask; |  | ||||||
|             wfi_evt.notify(); |  | ||||||
|         } else |  | ||||||
|             this->csr[arch::mip] &= ~mask; |  | ||||||
|         this->check_interrupt(); |  | ||||||
|         if(value) |  | ||||||
|             SCCTRACE(owner->name()) << "Triggering interrupt " << id << " Pending trap: " << this->reg.pending_trap; |  | ||||||
|     } |  | ||||||
|  |  | ||||||
| private: |  | ||||||
|     core_complex *const owner; |  | ||||||
|     sc_event wfi_evt; |  | ||||||
| }; |  | ||||||
|  |  | ||||||
| int cmd_sysc(int argc, char *argv[], debugger::out_func of, debugger::data_func df, |  | ||||||
|              debugger::target_adapter_if *tgt_adapter) { |  | ||||||
|     if (argc > 1) { |  | ||||||
|         if (strcasecmp(argv[1], "print_time") == 0) { |  | ||||||
|             std::string t = sc_time_stamp().to_string(); |             std::string t = sc_time_stamp().to_string(); | ||||||
|             of(t.c_str()); |             of(t.c_str()); | ||||||
|             std::array<char, 64> buf; |             std::array<char, 64> buf; | ||||||
|             encdec.enc_string(t.c_str(), buf.data(), 63); |             encdec.enc_string(t.c_str(), buf.data(), 63); | ||||||
|             df(buf.data()); |             df(buf.data()); | ||||||
|             return Ok; |             return Ok; | ||||||
|         } else if (strcasecmp(argv[1], "break") == 0) { |         } else if(strcasecmp(argv[1], "break") == 0) { | ||||||
|             sc_time t; |             sc_time t; | ||||||
|             if (argc == 4) { |             if(argc == 4) { | ||||||
|                 t = scc::parse_from_string(argv[2], argv[3]); |                 t = scc::parse_from_string(argv[2], argv[3]); | ||||||
|             } else if (argc == 3) { |             } else if(argc == 3) { | ||||||
|                 t = scc::parse_from_string(argv[2]); |                 t = scc::parse_from_string(argv[2]); | ||||||
|             } else |             } else | ||||||
|                 return Err; |                 return Err; | ||||||
| @@ -246,15 +121,19 @@ int cmd_sysc(int argc, char *argv[], debugger::out_func of, debugger::data_func | |||||||
| } | } | ||||||
|  |  | ||||||
| using cpu_ptr = std::unique_ptr<iss::arch_if>; | using cpu_ptr = std::unique_ptr<iss::arch_if>; | ||||||
| using vm_ptr= std::unique_ptr<iss::vm_if>; | using vm_ptr = std::unique_ptr<iss::vm_if>; | ||||||
|  |  | ||||||
| class core_wrapper { | class core_wrapper { | ||||||
| public: | public: | ||||||
|     core_wrapper(core_complex *owner) : owner(owner) { } |     core_wrapper(core_complex* owner) | ||||||
|  |     : owner(owner) {} | ||||||
|  |  | ||||||
|     void reset(uint64_t addr){vm->reset(addr);} |     void reset(uint64_t addr) { vm->reset(addr); } | ||||||
|     inline void start(){vm->start();} |     inline void start(bool dump = false) { vm->start(std::numeric_limits<uint64_t>::max(), dump); } | ||||||
|     inline std::pair<uint64_t, bool> load_file(std::string const& name){ return cpu->load_file(name);}; |     inline std::pair<uint64_t, bool> load_file(std::string const& name) { | ||||||
|  |         iss::arch_if* cc = cpu->get_arch_if(); | ||||||
|  |         return cc->load_file(name); | ||||||
|  |     }; | ||||||
|  |  | ||||||
|     std::function<unsigned(void)> get_mode; |     std::function<unsigned(void)> get_mode; | ||||||
|     std::function<uint64_t(void)> get_state; |     std::function<uint64_t(void)> get_state; | ||||||
| @@ -262,98 +141,88 @@ public: | |||||||
|     std::function<void(bool)> set_interrupt_execution; |     std::function<void(bool)> set_interrupt_execution; | ||||||
|     std::function<void(short, bool)> local_irq; |     std::function<void(short, bool)> local_irq; | ||||||
|  |  | ||||||
|     template<typename PLAT> |     void create_cpu(std::string const& type, std::string const& backend, unsigned gdb_port, uint32_t hart_id) { | ||||||
|     std::tuple<cpu_ptr, vm_ptr> create_core(std::string const& backend, unsigned gdb_port, uint32_t hart_id){ |         auto& f = sysc::iss_factory::instance(); | ||||||
|         auto* lcpu = new core_wrapper_t<PLAT>(owner); |         if(type.size() == 0 || type == "?") { | ||||||
|         lcpu->set_mhartid(hart_id); |             std::cout << "Available cores: " << util::join(f.get_names(), ", ") << std::endl; | ||||||
|         get_mode = [lcpu]() { return lcpu->get_mode(); }; |             sc_core::sc_stop(); | ||||||
|         get_state = [lcpu]() { return lcpu->get_state().mstatus.backing.val; }; |         } else if(type.find('|') != std::string::npos) { | ||||||
|         get_interrupt_execution = [lcpu]() { return lcpu->get_interrupt_execution(); }; |             std::tie(cpu, vm) = f.create(type + "|" + backend); | ||||||
|         set_interrupt_execution = [lcpu](bool b) { return lcpu->set_interrupt_execution(b); }; |         } else { | ||||||
|         local_irq = [lcpu](short s, bool b) { return lcpu->local_irq(s, b); }; |             auto base_isa = type.substr(0, 5); | ||||||
|         if(backend == "interp") |             if(base_isa == "tgc5d" || base_isa == "tgc5e") { | ||||||
|             return {cpu_ptr{lcpu}, vm_ptr{iss::interp::create(static_cast<typename PLAT::core*>(lcpu), gdb_port)}}; |                 std::tie(cpu, vm) = f.create(type + "|mu_p_clic_pmp|" + backend, gdb_port, owner); | ||||||
| #ifdef WITH_LLVM |             } else { | ||||||
|         if(backend == "llvm") |                 std::tie(cpu, vm) = f.create(type + "|m_p|" + backend, gdb_port, owner); | ||||||
|             return {cpu_ptr{lcpu}, vm_ptr{iss::llvm::create(lcpu, gdb_port)}}; |             } | ||||||
| #endif |  | ||||||
| #ifdef WITH_TCC |  | ||||||
|         if(backend == "tcc") |  | ||||||
|     s        return {cpu_ptr{lcpu}, vm_ptr{iss::tcc::create(lcpu, gdb_port)}}; |  | ||||||
| #endif |  | ||||||
|         return {nullptr, nullptr}; |  | ||||||
|     } |  | ||||||
|  |  | ||||||
|     void create_cpu(std::string const& type, std::string const& backend, unsigned gdb_port, uint32_t hart_id){ |  | ||||||
|         CREATE_CORE(tgc_c) |  | ||||||
| #ifdef CORE_TGC_B |  | ||||||
|         CREATE_CORE(tgc_b) |  | ||||||
| #endif |  | ||||||
| #ifdef CORE_TGC_D |  | ||||||
|         CREATE_CORE(tgc_d) |  | ||||||
| #endif |  | ||||||
| #ifdef CORE_TGC_D_XRB_MAC |  | ||||||
|         CREATE_CORE(tgc_d_xrb_mac) |  | ||||||
| #endif |  | ||||||
| #ifdef CORE_TGC_D_XRB_NN |  | ||||||
|         CREATE_CORE(tgc_d_xrb_nn) |  | ||||||
| #endif |  | ||||||
|         { |  | ||||||
|             LOG(ERR) << "Illegal argument value for core type: " << type << std::endl; |  | ||||||
|         } |         } | ||||||
|         auto *srv = debugger::server<debugger::gdb_session>::get(); |         if(!cpu) { | ||||||
|         if (srv) tgt_adapter = srv->get_target(); |             SCCFATAL() << "Could not create cpu for isa " << type << " and backend " << backend; | ||||||
|         if (tgt_adapter) |         } | ||||||
|             tgt_adapter->add_custom_command( |         if(!vm) { | ||||||
|                 {"sysc", [this](int argc, char *argv[], debugger::out_func of, |             SCCFATAL() << "Could not create vm for isa " << type << " and backend " << backend; | ||||||
|                                 debugger::data_func df) -> int { return cmd_sysc(argc, argv, of, df, tgt_adapter); }, |         } | ||||||
|                  "SystemC sub-commands: break <time>, print_time"}); |         auto* sc_cpu_if = reinterpret_cast<sc_core_adapter_if*>(cpu.get()); | ||||||
|  |         sc_cpu_if->set_mhartid(hart_id); | ||||||
|  |         get_mode = [sc_cpu_if]() { return sc_cpu_if->get_mode(); }; | ||||||
|  |         get_state = [sc_cpu_if]() { return sc_cpu_if->get_state(); }; | ||||||
|  |         get_interrupt_execution = [sc_cpu_if]() { return sc_cpu_if->get_interrupt_execution(); }; | ||||||
|  |         set_interrupt_execution = [sc_cpu_if](bool b) { return sc_cpu_if->set_interrupt_execution(b); }; | ||||||
|  |         local_irq = [sc_cpu_if](short s, bool b) { return sc_cpu_if->local_irq(s, b); }; | ||||||
|  |  | ||||||
|  |         auto* srv = debugger::server<debugger::gdb_session>::get(); | ||||||
|  |         if(srv) | ||||||
|  |             tgt_adapter = srv->get_target(); | ||||||
|  |         if(tgt_adapter) | ||||||
|  |             tgt_adapter->add_custom_command({"sysc", | ||||||
|  |                                              [this](int argc, char* argv[], debugger::out_func of, debugger::data_func df) -> int { | ||||||
|  |                                                  return cmd_sysc(argc, argv, of, df, tgt_adapter); | ||||||
|  |                                              }, | ||||||
|  |                                              "SystemC sub-commands: break <time>, print_time"}); | ||||||
|     } |     } | ||||||
|  |  | ||||||
|     core_complex * const owner; |     core_complex* const owner; | ||||||
|     vm_ptr vm{nullptr}; |     vm_ptr vm{nullptr}; | ||||||
|     cpu_ptr cpu{nullptr}; |     sc_cpu_ptr cpu{nullptr}; | ||||||
|     iss::debugger::target_adapter_if *tgt_adapter{nullptr}; |     iss::debugger::target_adapter_if* tgt_adapter{nullptr}; | ||||||
| }; | }; | ||||||
|  |  | ||||||
| struct core_trace { | struct core_trace { | ||||||
|     //! transaction recording database |     //! transaction recording database | ||||||
|     scv_tr_db *m_db{nullptr}; |     scv_tr_db* m_db{nullptr}; | ||||||
|     //! blocking transaction recording stream handle |     //! blocking transaction recording stream handle | ||||||
|     scv_tr_stream *stream_handle{nullptr}; |     scv_tr_stream* stream_handle{nullptr}; | ||||||
|     //! transaction generator handle for blocking transactions |     //! transaction generator handle for blocking transactions | ||||||
|     scv_tr_generator<_scv_tr_generator_default_data, _scv_tr_generator_default_data> *instr_tr_handle{nullptr}; |     scv_tr_generator<_scv_tr_generator_default_data, _scv_tr_generator_default_data>* instr_tr_handle{nullptr}; | ||||||
|     scv_tr_handle tr_handle; |     scv_tr_handle tr_handle; | ||||||
| }; | }; | ||||||
|  |  | ||||||
| SC_HAS_PROCESS(core_complex);// NOLINT | SC_HAS_PROCESS(core_complex); // NOLINT | ||||||
| #ifndef CWR_SYSTEMC | #ifndef CWR_SYSTEMC | ||||||
| core_complex::core_complex(sc_module_name const& name) | core_complex::core_complex(sc_module_name const& name) | ||||||
| : sc_module(name) | : sc_module(name) | ||||||
| , fetch_lut(tlm_dmi_ext()) | , fetch_lut(tlm_dmi_ext()) | ||||||
| , read_lut(tlm_dmi_ext()) | , read_lut(tlm_dmi_ext()) | ||||||
| , write_lut(tlm_dmi_ext()) | , write_lut(tlm_dmi_ext()) { | ||||||
| { |     init(); | ||||||
| 	init(); |  | ||||||
| } | } | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
| void core_complex::init(){ | void core_complex::init() { | ||||||
| 	trc=new core_trace(); |     trc = new core_trace(); | ||||||
|     ibus.register_invalidate_direct_mem_ptr([=](uint64_t start, uint64_t end) -> void { |     ibus.register_invalidate_direct_mem_ptr([=](uint64_t start, uint64_t end) -> void { | ||||||
|         auto lut_entry = fetch_lut.getEntry(start); |         auto lut_entry = fetch_lut.getEntry(start); | ||||||
|         if (lut_entry.get_granted_access() != tlm::tlm_dmi::DMI_ACCESS_NONE && end <= lut_entry.get_end_address() + 1) { |         if(lut_entry.get_granted_access() != tlm::tlm_dmi::DMI_ACCESS_NONE && end <= lut_entry.get_end_address() + 1) { | ||||||
|             fetch_lut.removeEntry(lut_entry); |             fetch_lut.removeEntry(lut_entry); | ||||||
|         } |         } | ||||||
|     }); |     }); | ||||||
|     dbus.register_invalidate_direct_mem_ptr([=](uint64_t start, uint64_t end) -> void { |     dbus.register_invalidate_direct_mem_ptr([=](uint64_t start, uint64_t end) -> void { | ||||||
|         auto lut_entry = read_lut.getEntry(start); |         auto lut_entry = read_lut.getEntry(start); | ||||||
|         if (lut_entry.get_granted_access() != tlm::tlm_dmi::DMI_ACCESS_NONE && end <= lut_entry.get_end_address() + 1) { |         if(lut_entry.get_granted_access() != tlm::tlm_dmi::DMI_ACCESS_NONE && end <= lut_entry.get_end_address() + 1) { | ||||||
|             read_lut.removeEntry(lut_entry); |             read_lut.removeEntry(lut_entry); | ||||||
|         } |         } | ||||||
|         lut_entry = write_lut.getEntry(start); |         lut_entry = write_lut.getEntry(start); | ||||||
|         if (lut_entry.get_granted_access() != tlm::tlm_dmi::DMI_ACCESS_NONE && end <= lut_entry.get_end_address() + 1) { |         if(lut_entry.get_granted_access() != tlm::tlm_dmi::DMI_ACCESS_NONE && end <= lut_entry.get_end_address() + 1) { | ||||||
|             write_lut.removeEntry(lut_entry); |             write_lut.removeEntry(lut_entry); | ||||||
|         } |         } | ||||||
|     }); |     }); | ||||||
| @@ -368,57 +237,53 @@ void core_complex::init(){ | |||||||
|     SC_METHOD(ext_irq_cb); |     SC_METHOD(ext_irq_cb); | ||||||
|     sensitive << ext_irq_i; |     sensitive << ext_irq_i; | ||||||
|     SC_METHOD(local_irq_cb); |     SC_METHOD(local_irq_cb); | ||||||
|     for(auto pin:local_irq_i) |     for(auto pin : local_irq_i) | ||||||
|         sensitive << pin; |         sensitive << pin; | ||||||
|     trc->m_db=scv_tr_db::get_default_db(); |     trc->m_db = scv_tr_db::get_default_db(); | ||||||
|  |  | ||||||
| 	SC_METHOD(forward); |     SC_METHOD(forward); | ||||||
| #ifndef CWR_SYSTEMC | #ifndef CWR_SYSTEMC | ||||||
| 	sensitive<<clk_i; |     sensitive << clk_i; | ||||||
| #else | #else | ||||||
| 	sensitive<<curr_clk; |     sensitive << curr_clk; | ||||||
| 	t2t.reset(new scc::tick2time{"t2t"}); |     t2t.reset(new scc::tick2time{"t2t"}); | ||||||
| 	t2t->clk_i(clk_i); |     t2t->clk_i(clk_i); | ||||||
| 	t2t->clk_o(curr_clk); |     t2t->clk_o(curr_clk); | ||||||
| #endif | #endif | ||||||
| } | } | ||||||
|  |  | ||||||
| core_complex::~core_complex(){ | core_complex::~core_complex() { | ||||||
|     delete cpu; |     delete cpu; | ||||||
|     delete trc; |     delete trc; | ||||||
|     for (auto *p : plugin_list) |     for(auto* p : plugin_list) | ||||||
|         delete p; |         delete p; | ||||||
| } | } | ||||||
|  |  | ||||||
| void core_complex::trace(sc_trace_file *trf) const {} | void core_complex::trace(sc_trace_file* trf) const {} | ||||||
|  |  | ||||||
| void core_complex::before_end_of_elaboration() { | void core_complex::before_end_of_elaboration() { | ||||||
|     SCCDEBUG(SCMOD)<<"instantiating iss::arch::tgf with "<<GET_PROP_VALUE(backend)<<" backend"; |     SCCDEBUG(SCMOD) << "instantiating iss::arch::tgf with " << GET_PROP_VALUE(backend) << " backend"; | ||||||
|     // cpu = scc::make_unique<core_wrapper>(this); |     // cpu = scc::make_unique<core_wrapper>(this); | ||||||
|     cpu = new core_wrapper(this); |     cpu = new core_wrapper(this); | ||||||
|     cpu->create_cpu(GET_PROP_VALUE(core_type), GET_PROP_VALUE(backend), GET_PROP_VALUE(gdb_server_port), GET_PROP_VALUE(mhartid)); |     cpu->create_cpu(GET_PROP_VALUE(core_type), GET_PROP_VALUE(backend), GET_PROP_VALUE(gdb_server_port), GET_PROP_VALUE(mhartid)); | ||||||
|     sc_assert(cpu->vm!=nullptr); |     sc_assert(cpu->vm != nullptr); | ||||||
|     cpu->vm->setDisassEnabled(GET_PROP_VALUE(enable_disass) || trc->m_db != nullptr); |     cpu->vm->setDisassEnabled(GET_PROP_VALUE(enable_disass) || trc->m_db != nullptr); | ||||||
|     if (GET_PROP_VALUE(plugins).length()) { |     if(GET_PROP_VALUE(plugins).length()) { | ||||||
|         auto p = util::split(GET_PROP_VALUE(plugins), ';'); |         auto p = util::split(GET_PROP_VALUE(plugins), ';'); | ||||||
|         for (std::string const& opt_val : p) { |         for(std::string const& opt_val : p) { | ||||||
|             std::string plugin_name=opt_val; |             std::string plugin_name = opt_val; | ||||||
|             std::string filename{"cycles.txt"}; |             std::string filename{"cycles.txt"}; | ||||||
|             std::size_t found = opt_val.find('='); |             std::size_t found = opt_val.find('='); | ||||||
|             if (found != std::string::npos) { |             if(found != std::string::npos) { | ||||||
|                 plugin_name = opt_val.substr(0, found); |                 plugin_name = opt_val.substr(0, found); | ||||||
|                 filename = opt_val.substr(found + 1, opt_val.size()); |                 filename = opt_val.substr(found + 1, opt_val.size()); | ||||||
|             } |             } | ||||||
|             if (plugin_name == "ic") { |             if(plugin_name == "ic") { | ||||||
|                 auto *plugin = new iss::plugin::instruction_count(filename); |                 auto* plugin = new iss::plugin::instruction_count(filename); | ||||||
|                 cpu->vm->register_plugin(*plugin); |                 cpu->vm->register_plugin(*plugin); | ||||||
|                 plugin_list.push_back(plugin); |                 plugin_list.push_back(plugin); | ||||||
|             } else if (plugin_name == "ce") { |             } else if(plugin_name == "ce") { | ||||||
|                 auto *plugin = new iss::plugin::cycle_estimate(filename); |                 auto* plugin = new iss::plugin::cycle_estimate(filename); | ||||||
|                 cpu->vm->register_plugin(*plugin); |  | ||||||
|                 plugin_list.push_back(plugin); |  | ||||||
|             } else if (plugin_name == "pctrace") { |  | ||||||
|                 auto *plugin = new iss::plugin::pctrace(filename); |  | ||||||
|                 cpu->vm->register_plugin(*plugin); |                 cpu->vm->register_plugin(*plugin); | ||||||
|                 plugin_list.push_back(plugin); |                 plugin_list.push_back(plugin); | ||||||
|             } else { |             } else { | ||||||
| @@ -426,7 +291,7 @@ void core_complex::before_end_of_elaboration() { | |||||||
|                 std::array<char const*, 1> a{{filename.c_str()}}; |                 std::array<char const*, 1> a{{filename.c_str()}}; | ||||||
|                 iss::plugin::loader l(plugin_name, {{"initPlugin"}}); |                 iss::plugin::loader l(plugin_name, {{"initPlugin"}}); | ||||||
|                 auto* plugin = l.call_function<iss::vm_plugin*>("initPlugin", a.size(), a.data()); |                 auto* plugin = l.call_function<iss::vm_plugin*>("initPlugin", a.size(), a.data()); | ||||||
|                 if(plugin){ |                 if(plugin) { | ||||||
|                     cpu->vm->register_plugin(*plugin); |                     cpu->vm->register_plugin(*plugin); | ||||||
|                     plugin_list.push_back(plugin); |                     plugin_list.push_back(plugin); | ||||||
|                 } else |                 } else | ||||||
| @@ -435,26 +300,25 @@ void core_complex::before_end_of_elaboration() { | |||||||
|             } |             } | ||||||
|         } |         } | ||||||
|     } |     } | ||||||
|  |  | ||||||
| } | } | ||||||
|  |  | ||||||
| void core_complex::start_of_simulation() { | void core_complex::start_of_simulation() { | ||||||
|     // quantum_keeper.reset(); |     // quantum_keeper.reset(); | ||||||
|     if (GET_PROP_VALUE(elf_file).size() > 0) { |     if(GET_PROP_VALUE(elf_file).size() > 0) { | ||||||
|         istringstream is(GET_PROP_VALUE(elf_file)); |         istringstream is(GET_PROP_VALUE(elf_file)); | ||||||
|         string s; |         string s; | ||||||
|         while (getline(is, s, ',')) { |         while(getline(is, s, ',')) { | ||||||
|             std::pair<uint64_t, bool> start_addr = cpu->load_file(s); |             std::pair<uint64_t, bool> start_addr = cpu->load_file(s); | ||||||
| #ifndef CWR_SYSTEMC | #ifndef CWR_SYSTEMC | ||||||
|             if (reset_address.is_default_value() && start_addr.second == true) |             if(reset_address.is_default_value() && start_addr.second == true) | ||||||
|                 reset_address.set_value(start_addr.first); |                 reset_address.set_value(start_addr.first); | ||||||
| #else | #else | ||||||
|             if (start_addr.second == true) |             if(start_addr.second == true) | ||||||
|                 reset_address=start_addr.first; |                 reset_address = start_addr.first; | ||||||
| #endif | #endif | ||||||
|         } |         } | ||||||
|     } |     } | ||||||
|     if (trc->m_db != nullptr && trc->stream_handle == nullptr) { |     if(trc->m_db != nullptr && trc->stream_handle == nullptr) { | ||||||
|         string basename(this->name()); |         string basename(this->name()); | ||||||
|         trc->stream_handle = new scv_tr_stream((basename + ".instr").c_str(), "TRANSACTOR", trc->m_db); |         trc->stream_handle = new scv_tr_stream((basename + ".instr").c_str(), "TRANSACTOR", trc->m_db); | ||||||
|         trc->instr_tr_handle = new scv_tr_generator<>("execute", *trc->stream_handle); |         trc->instr_tr_handle = new scv_tr_generator<>("execute", *trc->stream_handle); | ||||||
| @@ -462,8 +326,10 @@ void core_complex::start_of_simulation() { | |||||||
| } | } | ||||||
|  |  | ||||||
| bool core_complex::disass_output(uint64_t pc, const std::string instr_str) { | bool core_complex::disass_output(uint64_t pc, const std::string instr_str) { | ||||||
|     if (trc->m_db == nullptr) return false; |     if(trc->m_db == nullptr) | ||||||
|     if (trc->tr_handle.is_active()) trc->tr_handle.end_transaction(); |         return false; | ||||||
|  |     if(trc->tr_handle.is_active()) | ||||||
|  |         trc->tr_handle.end_transaction(); | ||||||
|     trc->tr_handle = trc->instr_tr_handle->begin_transaction(); |     trc->tr_handle = trc->instr_tr_handle->begin_transaction(); | ||||||
|     trc->tr_handle.record_attribute("PC", pc); |     trc->tr_handle.record_attribute("PC", pc); | ||||||
|     trc->tr_handle.record_attribute("INSTR", instr_str); |     trc->tr_handle.record_attribute("INSTR", instr_str); | ||||||
| @@ -475,20 +341,22 @@ bool core_complex::disass_output(uint64_t pc, const std::string instr_str) { | |||||||
|  |  | ||||||
| void core_complex::forward() { | void core_complex::forward() { | ||||||
| #ifndef CWR_SYSTEMC | #ifndef CWR_SYSTEMC | ||||||
| 	set_clock_period(clk_i.read()); |     set_clock_period(clk_i.read()); | ||||||
| #else | #else | ||||||
| 	set_clock_period(curr_clk.read()); |     set_clock_period(curr_clk.read()); | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
| } | } | ||||||
|  |  | ||||||
| void core_complex::set_clock_period(sc_core::sc_time period) { | void core_complex::set_clock_period(sc_core::sc_time period) { | ||||||
| 	curr_clk = period; |     curr_clk = period; | ||||||
|     if (period == SC_ZERO_TIME) cpu->set_interrupt_execution(true); |     if(period == SC_ZERO_TIME) | ||||||
|  |         cpu->set_interrupt_execution(true); | ||||||
| } | } | ||||||
|  |  | ||||||
| void core_complex::rst_cb() { | void core_complex::rst_cb() { | ||||||
|     if (rst_i.read()) cpu->set_interrupt_execution(true); |     if(rst_i.read()) | ||||||
|  |         cpu->set_interrupt_execution(true); | ||||||
| } | } | ||||||
|  |  | ||||||
| void core_complex::sw_irq_cb() { cpu->local_irq(3, sw_irq_i.read()); } | void core_complex::sw_irq_cb() { cpu->local_irq(3, sw_irq_i.read()); } | ||||||
| @@ -498,9 +366,9 @@ void core_complex::timer_irq_cb() { cpu->local_irq(7, timer_irq_i.read()); } | |||||||
| void core_complex::ext_irq_cb() { cpu->local_irq(11, ext_irq_i.read()); } | void core_complex::ext_irq_cb() { cpu->local_irq(11, ext_irq_i.read()); } | ||||||
|  |  | ||||||
| void core_complex::local_irq_cb() { | void core_complex::local_irq_cb() { | ||||||
|     for(auto i=0U; i<local_irq_i.size(); ++i) { |     for(auto i = 0U; i < local_irq_i.size(); ++i) { | ||||||
|         if(local_irq_i[i].event()) { |         if(local_irq_i[i].event()) { | ||||||
|             cpu->local_irq(16+i, local_irq_i[i].read()); |             cpu->local_irq(16 + i, local_irq_i[i].read()); | ||||||
|         } |         } | ||||||
|     } |     } | ||||||
| } | } | ||||||
| @@ -509,75 +377,82 @@ void core_complex::run() { | |||||||
|     wait(SC_ZERO_TIME); // separate from elaboration phase |     wait(SC_ZERO_TIME); // separate from elaboration phase | ||||||
|     do { |     do { | ||||||
|         wait(SC_ZERO_TIME); |         wait(SC_ZERO_TIME); | ||||||
|         if (rst_i.read()) { |         if(rst_i.read()) { | ||||||
|             cpu->reset(GET_PROP_VALUE(reset_address)); |             cpu->reset(GET_PROP_VALUE(reset_address)); | ||||||
|             wait(rst_i.negedge_event()); |             wait(rst_i.negedge_event()); | ||||||
|         } |         } | ||||||
|         while (curr_clk.read() == SC_ZERO_TIME) { |         while(curr_clk.read() == SC_ZERO_TIME) { | ||||||
|             wait(curr_clk.value_changed_event()); |             wait(curr_clk.value_changed_event()); | ||||||
|         } |         } | ||||||
|         quantum_keeper.reset(); |         quantum_keeper.reset(); | ||||||
|         cpu->set_interrupt_execution(false); |         cpu->set_interrupt_execution(false); | ||||||
|         cpu->start(); |         cpu->start(dump_ir); | ||||||
|     } while (cpu->get_interrupt_execution()); |     } while(cpu->get_interrupt_execution()); | ||||||
|     sc_stop(); |     sc_stop(); | ||||||
| } | } | ||||||
|  |  | ||||||
| bool core_complex::read_mem(uint64_t addr, unsigned length, uint8_t *const data, bool is_fetch) { | bool core_complex::read_mem(uint64_t addr, unsigned length, uint8_t* const data, bool is_fetch) { | ||||||
|     auto& dmi_lut = is_fetch?fetch_lut:read_lut; |     auto& dmi_lut = is_fetch ? fetch_lut : read_lut; | ||||||
|     auto lut_entry = dmi_lut.getEntry(addr); |     auto lut_entry = dmi_lut.getEntry(addr); | ||||||
|     if (lut_entry.get_granted_access() != tlm::tlm_dmi::DMI_ACCESS_NONE && addr + length <= lut_entry.get_end_address() + 1) { |     if(lut_entry.get_granted_access() != tlm::tlm_dmi::DMI_ACCESS_NONE && addr + length <= lut_entry.get_end_address() + 1) { | ||||||
|         auto offset = addr - lut_entry.get_start_address(); |         auto offset = addr - lut_entry.get_start_address(); | ||||||
|         std::copy(lut_entry.get_dmi_ptr() + offset, lut_entry.get_dmi_ptr() + offset + length, data); |         std::copy(lut_entry.get_dmi_ptr() + offset, lut_entry.get_dmi_ptr() + offset + length, data); | ||||||
|         quantum_keeper.inc(lut_entry.get_read_latency()); |         if(is_fetch) | ||||||
|  |             ibus_inc += lut_entry.get_read_latency() / curr_clk; | ||||||
|  |         else | ||||||
|  |             dbus_inc += lut_entry.get_read_latency() / curr_clk; | ||||||
|         return true; |         return true; | ||||||
|     } else { |     } else { | ||||||
|         auto& sckt = is_fetch? ibus : dbus; |         auto& sckt = is_fetch ? ibus : dbus; | ||||||
|         tlm::tlm_generic_payload gp; |         tlm::tlm_generic_payload gp; | ||||||
|         gp.set_command(tlm::TLM_READ_COMMAND); |         gp.set_command(tlm::TLM_READ_COMMAND); | ||||||
|         gp.set_address(addr); |         gp.set_address(addr); | ||||||
|         gp.set_data_ptr(data); |         gp.set_data_ptr(data); | ||||||
|         gp.set_data_length(length); |         gp.set_data_length(length); | ||||||
|         gp.set_streaming_width(length); |         gp.set_streaming_width(length); | ||||||
|         sc_time delay=quantum_keeper.get_local_time(); |         sc_time delay = quantum_keeper.get_local_time(); | ||||||
|         if (trc->m_db != nullptr && trc->tr_handle.is_valid()) { |         if(trc->m_db != nullptr && trc->tr_handle.is_valid()) { | ||||||
|             if (is_fetch && trc->tr_handle.is_active()) { |             if(is_fetch && trc->tr_handle.is_active()) { | ||||||
|                 trc->tr_handle.end_transaction(); |                 trc->tr_handle.end_transaction(); | ||||||
|             } |             } | ||||||
|             auto preExt = new tlm::scc::scv::tlm_recording_extension(trc->tr_handle, this); |             auto preExt = new tlm::scc::scv::tlm_recording_extension(trc->tr_handle, this); | ||||||
|             gp.set_extension(preExt); |             gp.set_extension(preExt); | ||||||
|         } |         } | ||||||
|         sckt->b_transport(gp, delay); |         auto pre_delay = delay; | ||||||
|         auto incr = delay-quantum_keeper.get_local_time(); |         dbus->b_transport(gp, delay); | ||||||
|         if(is_fetch) |         if(pre_delay > delay) { | ||||||
|             ibus_inc+=incr; |             quantum_keeper.reset(); | ||||||
|         else |         } else { | ||||||
|             dbus_inc+=incr; |             auto incr = (delay - quantum_keeper.get_local_time()) / curr_clk; | ||||||
|         SCCTRACE(this->name()) << "[local time: "<<delay<<"]: finish read_mem(0x" << std::hex << addr << ") : 0x" << (length==4?*(uint32_t*)data:length==2?*(uint16_t*)data:(unsigned)*data); |             if(is_fetch) | ||||||
|         if (gp.get_response_status() != tlm::TLM_OK_RESPONSE) { |                 ibus_inc += incr; | ||||||
|  |             else | ||||||
|  |                 dbus_inc += incr; | ||||||
|  |         } | ||||||
|  |         SCCTRACE(this->name()) << "[local time: " << delay << "]: finish read_mem(0x" << std::hex << addr << ") : 0x" | ||||||
|  |                                << (length == 4 ? *(uint32_t*)data : length == 2 ? *(uint16_t*)data : (unsigned)*data); | ||||||
|  |         if(gp.get_response_status() != tlm::TLM_OK_RESPONSE) { | ||||||
|             return false; |             return false; | ||||||
|         } |         } | ||||||
|         if (gp.is_dmi_allowed()) { |         if(gp.is_dmi_allowed() && !GET_PROP_VALUE(disable_dmi)) { | ||||||
|             gp.set_command(tlm::TLM_READ_COMMAND); |             gp.set_command(tlm::TLM_READ_COMMAND); | ||||||
|             gp.set_address(addr); |             gp.set_address(addr); | ||||||
|             tlm_dmi_ext dmi_data; |             tlm_dmi_ext dmi_data; | ||||||
|             if (sckt->get_direct_mem_ptr(gp, dmi_data)) { |             if(sckt->get_direct_mem_ptr(gp, dmi_data)) { | ||||||
|                 if (dmi_data.is_read_allowed()) |                 if(dmi_data.is_read_allowed()) | ||||||
|                     dmi_lut.addEntry(dmi_data, dmi_data.get_start_address(), |                     dmi_lut.addEntry(dmi_data, dmi_data.get_start_address(), dmi_data.get_end_address() - dmi_data.get_start_address() + 1); | ||||||
|                                       dmi_data.get_end_address() - dmi_data.get_start_address() + 1); |  | ||||||
|             } |             } | ||||||
|         } |         } | ||||||
|         return true; |         return true; | ||||||
|     } |     } | ||||||
| } | } | ||||||
|  |  | ||||||
| bool core_complex::write_mem(uint64_t addr, unsigned length, const uint8_t *const data) { | bool core_complex::write_mem(uint64_t addr, unsigned length, const uint8_t* const data) { | ||||||
|     auto lut_entry = write_lut.getEntry(addr); |     auto lut_entry = write_lut.getEntry(addr); | ||||||
|     if (lut_entry.get_granted_access() != tlm::tlm_dmi::DMI_ACCESS_NONE && |     if(lut_entry.get_granted_access() != tlm::tlm_dmi::DMI_ACCESS_NONE && addr + length <= lut_entry.get_end_address() + 1) { | ||||||
|         addr + length <= lut_entry.get_end_address() + 1) { |  | ||||||
|         auto offset = addr - lut_entry.get_start_address(); |         auto offset = addr - lut_entry.get_start_address(); | ||||||
|         std::copy(data, data + length, lut_entry.get_dmi_ptr() + offset); |         std::copy(data, data + length, lut_entry.get_dmi_ptr() + offset); | ||||||
|         quantum_keeper.inc(lut_entry.get_read_latency()); |         dbus_inc += lut_entry.get_write_latency() / curr_clk; | ||||||
|         return true; |         return true; | ||||||
|     } else { |     } else { | ||||||
|         write_buf.resize(length); |         write_buf.resize(length); | ||||||
| @@ -588,23 +463,28 @@ bool core_complex::write_mem(uint64_t addr, unsigned length, const uint8_t *cons | |||||||
|         gp.set_data_ptr(write_buf.data()); |         gp.set_data_ptr(write_buf.data()); | ||||||
|         gp.set_data_length(length); |         gp.set_data_length(length); | ||||||
|         gp.set_streaming_width(length); |         gp.set_streaming_width(length); | ||||||
|         sc_time delay=quantum_keeper.get_local_time(); |         sc_time delay = quantum_keeper.get_local_time(); | ||||||
|         if (trc->m_db != nullptr && trc->tr_handle.is_valid()) { |         if(trc->m_db != nullptr && trc->tr_handle.is_valid()) { | ||||||
|             auto preExt = new tlm::scc::scv::tlm_recording_extension(trc->tr_handle, this); |             auto preExt = new tlm::scc::scv::tlm_recording_extension(trc->tr_handle, this); | ||||||
|             gp.set_extension(preExt); |             gp.set_extension(preExt); | ||||||
|         } |         } | ||||||
|  |         auto pre_delay = delay; | ||||||
|         dbus->b_transport(gp, delay); |         dbus->b_transport(gp, delay); | ||||||
|         dbus_inc+=delay-quantum_keeper.get_local_time(); |         if(pre_delay > delay) | ||||||
|         SCCTRACE() << "[local time: "<<delay<<"]: finish write_mem(0x" << std::hex << addr << ") : 0x" << (length==4?*(uint32_t*)data:length==2?*(uint16_t*)data:(unsigned)*data); |             quantum_keeper.reset(); | ||||||
|         if (gp.get_response_status() != tlm::TLM_OK_RESPONSE) { |         else | ||||||
|  |             dbus_inc += (delay - quantum_keeper.get_local_time()) / curr_clk; | ||||||
|  |         SCCTRACE() << "[local time: " << delay << "]: finish write_mem(0x" << std::hex << addr << ") : 0x" | ||||||
|  |                    << (length == 4 ? *(uint32_t*)data : length == 2 ? *(uint16_t*)data : (unsigned)*data); | ||||||
|  |         if(gp.get_response_status() != tlm::TLM_OK_RESPONSE) { | ||||||
|             return false; |             return false; | ||||||
|         } |         } | ||||||
|         if (gp.is_dmi_allowed()) { |         if(gp.is_dmi_allowed() && !GET_PROP_VALUE(disable_dmi)) { | ||||||
|             gp.set_command(tlm::TLM_READ_COMMAND); |             gp.set_command(tlm::TLM_READ_COMMAND); | ||||||
|             gp.set_address(addr); |             gp.set_address(addr); | ||||||
|             tlm_dmi_ext dmi_data; |             tlm_dmi_ext dmi_data; | ||||||
|             if (dbus->get_direct_mem_ptr(gp, dmi_data)) { |             if(dbus->get_direct_mem_ptr(gp, dmi_data)) { | ||||||
|                 if (dmi_data.is_write_allowed()) |                 if(dmi_data.is_write_allowed()) | ||||||
|                     write_lut.addEntry(dmi_data, dmi_data.get_start_address(), |                     write_lut.addEntry(dmi_data, dmi_data.get_start_address(), | ||||||
|                                        dmi_data.get_end_address() - dmi_data.get_start_address() + 1); |                                        dmi_data.get_end_address() - dmi_data.get_start_address() + 1); | ||||||
|             } |             } | ||||||
| @@ -613,7 +493,7 @@ bool core_complex::write_mem(uint64_t addr, unsigned length, const uint8_t *cons | |||||||
|     } |     } | ||||||
| } | } | ||||||
|  |  | ||||||
| bool core_complex::read_mem_dbg(uint64_t addr, unsigned length, uint8_t *const data) { | bool core_complex::read_mem_dbg(uint64_t addr, unsigned length, uint8_t* const data) { | ||||||
|     tlm::tlm_generic_payload gp; |     tlm::tlm_generic_payload gp; | ||||||
|     gp.set_command(tlm::TLM_READ_COMMAND); |     gp.set_command(tlm::TLM_READ_COMMAND); | ||||||
|     gp.set_address(addr); |     gp.set_address(addr); | ||||||
| @@ -623,7 +503,7 @@ bool core_complex::read_mem_dbg(uint64_t addr, unsigned length, uint8_t *const d | |||||||
|     return dbus->transport_dbg(gp) == length; |     return dbus->transport_dbg(gp) == length; | ||||||
| } | } | ||||||
|  |  | ||||||
| bool core_complex::write_mem_dbg(uint64_t addr, unsigned length, const uint8_t *const data) { | bool core_complex::write_mem_dbg(uint64_t addr, unsigned length, const uint8_t* const data) { | ||||||
|     write_buf.resize(length); |     write_buf.resize(length); | ||||||
|     std::copy(data, data + length, write_buf.begin()); // need to copy as TLM does not guarantee data integrity |     std::copy(data, data + length, write_buf.begin()); // need to copy as TLM does not guarantee data integrity | ||||||
|     tlm::tlm_generic_payload gp; |     tlm::tlm_generic_payload gp; | ||||||
| @@ -634,5 +514,5 @@ bool core_complex::write_mem_dbg(uint64_t addr, unsigned length, const uint8_t * | |||||||
|     gp.set_streaming_width(length); |     gp.set_streaming_width(length); | ||||||
|     return dbus->transport_dbg(gp) == length; |     return dbus->transport_dbg(gp) == length; | ||||||
| } | } | ||||||
| } /* namespace SiFive */ | } /* namespace tgfs */ | ||||||
| } /* namespace sysc */ | } /* namespace sysc */ | ||||||
|   | |||||||
| @@ -33,10 +33,10 @@ | |||||||
| #ifndef _SYSC_CORE_COMPLEX_H_ | #ifndef _SYSC_CORE_COMPLEX_H_ | ||||||
| #define _SYSC_CORE_COMPLEX_H_ | #define _SYSC_CORE_COMPLEX_H_ | ||||||
|  |  | ||||||
| #include <tlm/scc/initiator_mixin.h> |  | ||||||
| #include <scc/traceable.h> |  | ||||||
| #include <scc/tick2time.h> | #include <scc/tick2time.h> | ||||||
|  | #include <scc/traceable.h> | ||||||
| #include <scc/utilities.h> | #include <scc/utilities.h> | ||||||
|  | #include <tlm/scc/initiator_mixin.h> | ||||||
| #include <tlm/scc/scv/tlm_rec_initiator_socket.h> | #include <tlm/scc/scv/tlm_rec_initiator_socket.h> | ||||||
| #ifdef CWR_SYSTEMC | #ifdef CWR_SYSTEMC | ||||||
| #include <scmlinc/scml_property.h> | #include <scmlinc/scml_property.h> | ||||||
| @@ -45,24 +45,24 @@ | |||||||
| #include <cci_configuration> | #include <cci_configuration> | ||||||
| #define SOCKET_WIDTH scc::LT | #define SOCKET_WIDTH scc::LT | ||||||
| #endif | #endif | ||||||
|  | #include <memory> | ||||||
| #include <tlm> | #include <tlm> | ||||||
| #include <tlm_utils/tlm_quantumkeeper.h> | #include <tlm_utils/tlm_quantumkeeper.h> | ||||||
| #include <util/range_lut.h> | #include <util/range_lut.h> | ||||||
| #include <memory> |  | ||||||
|  |  | ||||||
| namespace iss { | namespace iss { | ||||||
|     class vm_plugin; | class vm_plugin; | ||||||
| } | } | ||||||
| namespace sysc { | namespace sysc { | ||||||
|  |  | ||||||
| class tlm_dmi_ext : public tlm::tlm_dmi { | class tlm_dmi_ext : public tlm::tlm_dmi { | ||||||
| public: | public: | ||||||
|     bool operator==(const tlm_dmi_ext &o) const { |     bool operator==(const tlm_dmi_ext& o) const { | ||||||
|         return this->get_granted_access() == o.get_granted_access() && |         return this->get_granted_access() == o.get_granted_access() && this->get_start_address() == o.get_start_address() && | ||||||
|                this->get_start_address() == o.get_start_address() && this->get_end_address() == o.get_end_address(); |                this->get_end_address() == o.get_end_address(); | ||||||
|     } |     } | ||||||
|  |  | ||||||
|     bool operator!=(const tlm_dmi_ext &o) const { return !operator==(o); } |     bool operator!=(const tlm_dmi_ext& o) const { return !operator==(o); } | ||||||
| }; | }; | ||||||
|  |  | ||||||
| namespace tgfs { | namespace tgfs { | ||||||
| @@ -86,7 +86,7 @@ public: | |||||||
|     sc_core::sc_vector<sc_core::sc_in<bool>> local_irq_i{"local_irq_i", 16}; |     sc_core::sc_vector<sc_core::sc_in<bool>> local_irq_i{"local_irq_i", 16}; | ||||||
|  |  | ||||||
| #ifndef CWR_SYSTEMC | #ifndef CWR_SYSTEMC | ||||||
| 	sc_core::sc_in<sc_core::sc_time> clk_i{"clk_i"}; |     sc_core::sc_in<sc_core::sc_time> clk_i{"clk_i"}; | ||||||
|  |  | ||||||
|     sc_core::sc_port<tlm::tlm_peek_if<uint64_t>, 1, sc_core::SC_ZERO_OR_MORE_BOUND> mtime_o{"mtime_o"}; |     sc_core::sc_port<tlm::tlm_peek_if<uint64_t>, 1, sc_core::SC_ZERO_OR_MORE_BOUND> mtime_o{"mtime_o"}; | ||||||
|  |  | ||||||
| @@ -94,9 +94,11 @@ public: | |||||||
|  |  | ||||||
|     cci::cci_param<bool> enable_disass{"enable_disass", false}; |     cci::cci_param<bool> enable_disass{"enable_disass", false}; | ||||||
|  |  | ||||||
|  |     cci::cci_param<bool> disable_dmi{"disable_dmi", false}; | ||||||
|  |  | ||||||
|     cci::cci_param<uint64_t> reset_address{"reset_address", 0ULL}; |     cci::cci_param<uint64_t> reset_address{"reset_address", 0ULL}; | ||||||
|  |  | ||||||
|     cci::cci_param<std::string> core_type{"core_type", "tgc_c"}; |     cci::cci_param<std::string> core_type{"core_type", "tgc5c"}; | ||||||
|  |  | ||||||
|     cci::cci_param<std::string> backend{"backend", "interp"}; |     cci::cci_param<std::string> backend{"backend", "interp"}; | ||||||
|  |  | ||||||
| @@ -111,17 +113,19 @@ public: | |||||||
|     core_complex(sc_core::sc_module_name const& name); |     core_complex(sc_core::sc_module_name const& name); | ||||||
|  |  | ||||||
| #else | #else | ||||||
| 	sc_core::sc_in<bool> clk_i{"clk_i"}; |     sc_core::sc_in<bool> clk_i{"clk_i"}; | ||||||
|  |  | ||||||
| 	sc_core::sc_in<uint64_t> mtime_i{"mtime_i"}; |     sc_core::sc_in<uint64_t> mtime_i{"mtime_i"}; | ||||||
|  |  | ||||||
| 	scml_property<std::string> elf_file{"elf_file", ""}; |     scml_property<std::string> elf_file{"elf_file", ""}; | ||||||
|  |  | ||||||
|     scml_property<bool> enable_disass{"enable_disass", false}; |     scml_property<bool> enable_disass{"enable_disass", false}; | ||||||
|  |  | ||||||
|  |     scml_property<bool> disable_dmi{"disable_dmi", false}; | ||||||
|  |  | ||||||
|     scml_property<unsigned long long> reset_address{"reset_address", 0ULL}; |     scml_property<unsigned long long> reset_address{"reset_address", 0ULL}; | ||||||
|  |  | ||||||
|     scml_property<std::string> core_type{"core_type", "tgc_c"}; |     scml_property<std::string> core_type{"core_type", "tgc5c"}; | ||||||
|  |  | ||||||
|     scml_property<std::string> backend{"backend", "interp"}; |     scml_property<std::string> backend{"backend", "interp"}; | ||||||
|  |  | ||||||
| @@ -139,7 +143,7 @@ public: | |||||||
|     , elf_file{"elf_file", ""} |     , elf_file{"elf_file", ""} | ||||||
|     , enable_disass{"enable_disass", false} |     , enable_disass{"enable_disass", false} | ||||||
|     , reset_address{"reset_address", 0ULL} |     , reset_address{"reset_address", 0ULL} | ||||||
|     , core_type{"core_type", "tgc_c"} |     , core_type{"core_type", "tgc5c"} | ||||||
|     , backend{"backend", "interp"} |     , backend{"backend", "interp"} | ||||||
|     , gdb_server_port{"gdb_server_port", 0} |     , gdb_server_port{"gdb_server_port", 0} | ||||||
|     , dump_ir{"dump_ir", false} |     , dump_ir{"dump_ir", false} | ||||||
| @@ -147,45 +151,48 @@ public: | |||||||
|     , plugins{"plugins", ""} |     , plugins{"plugins", ""} | ||||||
|     , fetch_lut(tlm_dmi_ext()) |     , fetch_lut(tlm_dmi_ext()) | ||||||
|     , read_lut(tlm_dmi_ext()) |     , read_lut(tlm_dmi_ext()) | ||||||
|     , write_lut(tlm_dmi_ext()) |     , write_lut(tlm_dmi_ext()) { | ||||||
|     { |         init(); | ||||||
|     	init(); |  | ||||||
|     } |     } | ||||||
|  |  | ||||||
| #endif | #endif | ||||||
|  |  | ||||||
|     ~core_complex(); |     ~core_complex(); | ||||||
|  |  | ||||||
|  |     inline unsigned get_last_bus_cycles() { | ||||||
|  |         auto mem_incr = std::max(ibus_inc, dbus_inc); | ||||||
|  |         ibus_inc = dbus_inc = 0; | ||||||
|  |         return mem_incr > 1 ? mem_incr : 1; | ||||||
|  |     } | ||||||
|  |  | ||||||
|     inline void sync(uint64_t cycle) { |     inline void sync(uint64_t cycle) { | ||||||
|         auto core_inc = curr_clk * (cycle - last_sync_cycle); |         auto core_inc = curr_clk * (cycle - last_sync_cycle); | ||||||
|         auto incr = std::max(core_inc, std::max(ibus_inc, dbus_inc)); |         quantum_keeper.inc(core_inc); | ||||||
|         quantum_keeper.inc(incr); |         if(quantum_keeper.need_sync()) { | ||||||
|         if (quantum_keeper.need_sync()) { |  | ||||||
|             wait(quantum_keeper.get_local_time()); |             wait(quantum_keeper.get_local_time()); | ||||||
|             quantum_keeper.reset(); |             quantum_keeper.reset(); | ||||||
|         } |         } | ||||||
|         last_sync_cycle = cycle; |         last_sync_cycle = cycle; | ||||||
|         ibus_inc = sc_core::SC_ZERO_TIME; |  | ||||||
|         dbus_inc = sc_core::SC_ZERO_TIME; |  | ||||||
|     } |     } | ||||||
|  |  | ||||||
|     bool read_mem(uint64_t addr, unsigned length, uint8_t *const data, bool is_fetch); |     bool read_mem(uint64_t addr, unsigned length, uint8_t* const data, bool is_fetch); | ||||||
|  |  | ||||||
|     bool write_mem(uint64_t addr, unsigned length, const uint8_t *const data); |     bool write_mem(uint64_t addr, unsigned length, const uint8_t* const data); | ||||||
|  |  | ||||||
|     bool read_mem_dbg(uint64_t addr, unsigned length, uint8_t *const data); |     bool read_mem_dbg(uint64_t addr, unsigned length, uint8_t* const data); | ||||||
|  |  | ||||||
|     bool write_mem_dbg(uint64_t addr, unsigned length, const uint8_t *const data); |     bool write_mem_dbg(uint64_t addr, unsigned length, const uint8_t* const data); | ||||||
|  |  | ||||||
|     void trace(sc_core::sc_trace_file *trf) const override; |     void trace(sc_core::sc_trace_file* trf) const override; | ||||||
|  |  | ||||||
|     bool disass_output(uint64_t pc, const std::string instr); |     bool disass_output(uint64_t pc, const std::string instr); | ||||||
|  |  | ||||||
|     void set_clock_period(sc_core::sc_time period); |     void set_clock_period(sc_core::sc_time period); | ||||||
|  |  | ||||||
| protected: | protected: | ||||||
|     void before_end_of_elaboration() override; |     void before_end_of_elaboration() override; | ||||||
|     void start_of_simulation() override; |     void start_of_simulation() override; | ||||||
| 	void forward(); |     void forward(); | ||||||
|     void run(); |     void run(); | ||||||
|     void rst_cb(); |     void rst_cb(); | ||||||
|     void sw_irq_cb(); |     void sw_irq_cb(); | ||||||
| @@ -198,13 +205,13 @@ protected: | |||||||
|     std::vector<uint8_t> write_buf; |     std::vector<uint8_t> write_buf; | ||||||
|     core_wrapper* cpu{nullptr}; |     core_wrapper* cpu{nullptr}; | ||||||
|     sc_core::sc_signal<sc_core::sc_time> curr_clk; |     sc_core::sc_signal<sc_core::sc_time> curr_clk; | ||||||
|     sc_core::sc_time ibus_inc, dbus_inc; |     uint64_t ibus_inc{0}, dbus_inc{0}; | ||||||
|     core_trace* trc{nullptr}; |     core_trace* trc{nullptr}; | ||||||
|     std::unique_ptr<scc::tick2time> t2t; |     std::unique_ptr<scc::tick2time> t2t; | ||||||
|  |  | ||||||
| private: | private: | ||||||
|     void init(); |     void init(); | ||||||
|     std::vector<iss::vm_plugin *> plugin_list; |     std::vector<iss::vm_plugin*> plugin_list; | ||||||
|  |  | ||||||
| }; | }; | ||||||
| } /* namespace tgfs */ | } /* namespace tgfs */ | ||||||
| } /* namespace sysc */ | } /* namespace sysc */ | ||||||
|   | |||||||
| @@ -1,5 +1,5 @@ | |||||||
| /*******************************************************************************
 | /*******************************************************************************
 | ||||||
|  * Copyright (C) 2017 - 2023, MINRES Technologies GmbH |  * Copyright (C) 2021 MINRES Technologies GmbH | ||||||
|  * All rights reserved. |  * All rights reserved. | ||||||
|  * |  * | ||||||
|  * Redistribution and use in source and binary forms, with or without |  * Redistribution and use in source and binary forms, with or without | ||||||
| @@ -28,75 +28,63 @@ | |||||||
|  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE |  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE | ||||||
|  * POSSIBILITY OF SUCH DAMAGE. |  * POSSIBILITY OF SUCH DAMAGE. | ||||||
|  * |  * | ||||||
|  * Contributors: |  *******************************************************************************/ | ||||||
|  *       eyck@minres.com - initial API and implementation |  | ||||||
|  ******************************************************************************/ |  | ||||||
| 
 | 
 | ||||||
| #ifndef _ISS_PLUGIN_COV_H_ | #ifndef _ISS_FACTORY_H_ | ||||||
| #define _ISS_PLUGIN_COV_H_ | #define _ISS_FACTORY_H_ | ||||||
| 
 | 
 | ||||||
| #include <iss/vm_plugin.h> | #include "sc_core_adapter_if.h" | ||||||
| #include "iss/instrumentation_if.h" | #include <algorithm> | ||||||
| #include <json/json.h> | #include <functional> | ||||||
|  | #include <iss/iss.h> | ||||||
|  | #include <memory> | ||||||
| #include <string> | #include <string> | ||||||
| #include <fstream> | #include <unordered_map> | ||||||
|  | #include <vector> | ||||||
| 
 | 
 | ||||||
|  | namespace sysc { | ||||||
| 
 | 
 | ||||||
| namespace iss { | using sc_cpu_ptr = std::unique_ptr<sc_core_adapter_if>; | ||||||
| namespace plugin { | using vm_ptr = std::unique_ptr<iss::vm_if>; | ||||||
| class lz4compress_steambuf; |  | ||||||
| class pctrace : public iss::vm_plugin { |  | ||||||
|     struct instr_delay { |  | ||||||
|         std::string instr_name; |  | ||||||
|         size_t size; |  | ||||||
|         size_t not_taken_delay; |  | ||||||
|         size_t taken_delay; |  | ||||||
|     }; |  | ||||||
|     BEGIN_BF_DECL(instr_desc, uint32_t) |  | ||||||
|         BF_FIELD(taken, 24, 8) |  | ||||||
|         BF_FIELD(not_taken, 16, 8) |  | ||||||
|         BF_FIELD(is_branch, 8, 8) |  | ||||||
|         BF_FIELD(size, 0, 8) |  | ||||||
|         instr_desc(uint32_t size, uint32_t taken, uint32_t not_taken, bool branch): instr_desc() { |  | ||||||
|             this->size=size; |  | ||||||
|             this->taken=taken; |  | ||||||
|             this->not_taken=not_taken; |  | ||||||
|             this->is_branch=branch; |  | ||||||
|         } |  | ||||||
|     END_BF_DECL(); |  | ||||||
| 
 | 
 | ||||||
|  | class iss_factory { | ||||||
| public: | public: | ||||||
|  |     using base_t = std::tuple<sc_cpu_ptr, vm_ptr>; | ||||||
|  |     using create_fn = std::function<base_t(unsigned, void*)>; | ||||||
|  |     using registry_t = std::unordered_map<std::string, create_fn>; | ||||||
| 
 | 
 | ||||||
|     pctrace(const pctrace &) = delete; |     iss_factory() = default; | ||||||
|  |     iss_factory(const iss_factory&) = delete; | ||||||
|  |     iss_factory& operator=(const iss_factory&) = delete; | ||||||
| 
 | 
 | ||||||
|     pctrace(const pctrace &&) = delete; |     static iss_factory& instance() { | ||||||
|  |         static iss_factory bf; | ||||||
|  |         return bf; | ||||||
|  |     } | ||||||
| 
 | 
 | ||||||
|     pctrace(std::string const &); |     bool register_creator(const std::string& className, create_fn const& fn) { | ||||||
|  |         registry[className] = fn; | ||||||
|  |         return true; | ||||||
|  |     } | ||||||
| 
 | 
 | ||||||
|     virtual ~pctrace(); |     base_t create(std::string const& className, unsigned gdb_port = 0, void* init_data = nullptr) const { | ||||||
|  |         registry_t::const_iterator regEntry = registry.find(className); | ||||||
|  |         if(regEntry != registry.end()) | ||||||
|  |             return regEntry->second(gdb_port, init_data); | ||||||
|  |         return {nullptr, nullptr}; | ||||||
|  |     } | ||||||
| 
 | 
 | ||||||
|     pctrace &operator=(const pctrace &) = delete; |     std::vector<std::string> get_names() { | ||||||
| 
 |         std::vector<std::string> keys{registry.size()}; | ||||||
|     pctrace &operator=(const pctrace &&) = delete; |         std::transform(std::begin(registry), std::end(registry), std::begin(keys), | ||||||
| 
 |                        [](std::pair<std::string, create_fn> const& p) { return p.first; }); | ||||||
|     bool registration(const char *const version, vm_if &arch) override; |         return keys; | ||||||
| 
 |     } | ||||||
|     sync_type get_sync() override { return POST_SYNC; }; |  | ||||||
| 
 |  | ||||||
|     void callback(instr_info_t) override; |  | ||||||
| 
 | 
 | ||||||
| private: | private: | ||||||
|     iss::instrumentation_if *instr_if  {nullptr}; |     registry_t registry; | ||||||
|     std::ofstream output; |  | ||||||
| #ifdef WITH_LZ4 |  | ||||||
|     std::unique_ptr<lz4compress_steambuf> strbuf; |  | ||||||
|     std::ostream ostr; |  | ||||||
| #endif |  | ||||||
|     std::string filename; |  | ||||||
|     std::vector<instr_desc> delays; |  | ||||||
|     bool jumped{false}, first{true}; |  | ||||||
| }; | }; | ||||||
| } |  | ||||||
| } |  | ||||||
| 
 | 
 | ||||||
| #endif /* _ISS_PLUGIN_COV_H_ */ | } // namespace sysc
 | ||||||
|  | 
 | ||||||
|  | #endif /* _ISS_FACTORY_H_ */ | ||||||
| @@ -1,33 +1,108 @@ | |||||||
| /* | /******************************************************************************* | ||||||
|  * register_tgc_c.cpp |  * Copyright (C) 2023 MINRES Technologies GmbH | ||||||
|  |  * All rights reserved. | ||||||
|  * |  * | ||||||
|  *  Created on: Jul 5, 2023 |  * Redistribution and use in source and binary forms, with or without | ||||||
|  *      Author: eyck |  * modification, are permitted provided that the following conditions are met: | ||||||
|  */ |  * | ||||||
|  |  * 1. Redistributions of source code must retain the above copyright notice, | ||||||
|  |  *    this list of conditions and the following disclaimer. | ||||||
|  |  * | ||||||
|  |  * 2. Redistributions in binary form must reproduce the above copyright notice, | ||||||
|  |  *    this list of conditions and the following disclaimer in the documentation | ||||||
|  |  *    and/or other materials provided with the distribution. | ||||||
|  |  * | ||||||
|  |  * 3. Neither the name of the copyright holder nor the names of its contributors | ||||||
|  |  *    may be used to endorse or promote products derived from this software | ||||||
|  |  *    without specific prior written permission. | ||||||
|  |  * | ||||||
|  |  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" | ||||||
|  |  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||||||
|  |  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||||||
|  |  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE | ||||||
|  |  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR | ||||||
|  |  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF | ||||||
|  |  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS | ||||||
|  |  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN | ||||||
|  |  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | ||||||
|  |  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE | ||||||
|  |  * POSSIBILITY OF SUCH DAMAGE. | ||||||
|  |  * | ||||||
|  |  *******************************************************************************/ | ||||||
|  |  | ||||||
|  | #include "core_complex.h" | ||||||
|  | #include "iss_factory.h" | ||||||
|  | #include "sc_core_adapter.h" | ||||||
| #include <iss/factory.h> | #include <array> | ||||||
| #include <iss/arch/tgc_c.h> |  | ||||||
| #include <iss/arch/riscv_hart_m_p.h> | #include <iss/arch/riscv_hart_m_p.h> | ||||||
| #include <iss/arch/riscv_hart_mu_p.h> | #include <iss/arch/riscv_hart_mu_p.h> | ||||||
| #include "sc_core_adapter.h" | #include <iss/arch/tgc5c.h> | ||||||
| #include "core_complex.h" |  | ||||||
|  |  | ||||||
| namespace iss { | namespace iss { | ||||||
| namespace { | namespace interp { | ||||||
| volatile std::array<bool, 2> dummy = { | using namespace sysc; | ||||||
|         core_factory::instance().register_creator("tgc_c|m_p|interp", [](unsigned gdb_port, void* data) -> std::tuple<cpu_ptr, vm_ptr>{ | volatile std::array<bool, 2> tgc_init = { | ||||||
|             auto cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); |     iss_factory::instance().register_creator("tgc5c|m_p|interp", | ||||||
|             arch::tgc_c* lcpu = new sc_core_adapter<arch::riscv_hart_m_p<arch::tgc_c>>(cc); |                                              [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|             return {cpu_ptr{lcpu}, vm_ptr{interp::create(lcpu, gdb_port)}}; |                                                  auto cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|         }), |                                                  auto* cpu = new sc_core_adapter<arch::riscv_hart_m_p<arch::tgc5c>>(cc); | ||||||
|         core_factory::instance().register_creator("tgc_c|mu_p|interp", [](unsigned gdb_port, void* data) -> std::tuple<cpu_ptr, vm_ptr>{ |                                                  return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::tgc5c*>(cpu), gdb_port)}}; | ||||||
|             auto cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); |                                              }), | ||||||
|             arch::tgc_c* lcpu = new sc_core_adapter<arch::riscv_hart_mu_p<arch::tgc_c>>(cc); |     iss_factory::instance().register_creator("tgc5c|mu_p|interp", [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|             return {cpu_ptr{lcpu}, vm_ptr{interp::create(lcpu, gdb_port)}}; |         auto cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|         }) |         auto* cpu = new sc_core_adapter<arch::riscv_hart_mu_p<arch::tgc5c>>(cc); | ||||||
| }; |         return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::tgc5c*>(cpu), gdb_port)}}; | ||||||
| } |     })}; | ||||||
| } | } // namespace interp | ||||||
|  | #if defined(WITH_LLVM) | ||||||
|  | namespace llvm { | ||||||
|  | using namespace sysc; | ||||||
|  | volatile std::array<bool, 2> tgc_init = { | ||||||
|  |     iss_factory::instance().register_creator("tgc5c|m_p|llvm", | ||||||
|  |                                              [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|  |                                                  auto cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|  |                                                  auto* cpu = new sc_core_adapter<arch::riscv_hart_m_p<arch::tgc5c>>(cc); | ||||||
|  |                                                  return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::tgc5c*>(cpu), gdb_port)}}; | ||||||
|  |                                              }), | ||||||
|  |     iss_factory::instance().register_creator("tgc5c|mu_p|llvm", [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|  |         auto cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|  |         auto* cpu = new sc_core_adapter<arch::riscv_hart_mu_p<arch::tgc5c>>(cc); | ||||||
|  |         return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::tgc5c*>(cpu), gdb_port)}}; | ||||||
|  |     })}; | ||||||
|  | } // namespace llvm | ||||||
|  | #endif | ||||||
|  | #if defined(WITH_TCC) | ||||||
|  | namespace tcc { | ||||||
|  | using namespace sysc; | ||||||
|  | volatile std::array<bool, 2> tgc_init = { | ||||||
|  |     iss_factory::instance().register_creator("tgc5c|m_p|tcc", | ||||||
|  |                                              [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|  |                                                  auto cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|  |                                                  auto* cpu = new sc_core_adapter<arch::riscv_hart_m_p<arch::tgc5c>>(cc); | ||||||
|  |                                                  return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::tgc5c*>(cpu), gdb_port)}}; | ||||||
|  |                                              }), | ||||||
|  |     iss_factory::instance().register_creator("tgc5c|mu_p|tcc", [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|  |         auto cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|  |         auto* cpu = new sc_core_adapter<arch::riscv_hart_mu_p<arch::tgc5c>>(cc); | ||||||
|  |         return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::tgc5c*>(cpu), gdb_port)}}; | ||||||
|  |     })}; | ||||||
|  | } // namespace tcc | ||||||
|  | #endif | ||||||
|  | #if defined(WITH_ASMJIT) | ||||||
|  | namespace asmjit { | ||||||
|  | using namespace sysc; | ||||||
|  | volatile std::array<bool, 2> tgc_init = { | ||||||
|  |     iss_factory::instance().register_creator("tgc5c|m_p|asmjit", | ||||||
|  |                                              [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|  |                                                  auto cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|  |                                                  auto* cpu = new sc_core_adapter<arch::riscv_hart_m_p<arch::tgc5c>>(cc); | ||||||
|  |                                                  return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::tgc5c*>(cpu), gdb_port)}}; | ||||||
|  |                                              }), | ||||||
|  |     iss_factory::instance().register_creator("tgc5c|mu_p|asmjit", [](unsigned gdb_port, void* data) -> iss_factory::base_t { | ||||||
|  |         auto cc = reinterpret_cast<sysc::tgfs::core_complex*>(data); | ||||||
|  |         auto* cpu = new sc_core_adapter<arch::riscv_hart_mu_p<arch::tgc5c>>(cc); | ||||||
|  |         return {sysc::sc_cpu_ptr{cpu}, vm_ptr{create(static_cast<arch::tgc5c*>(cpu), gdb_port)}}; | ||||||
|  |     })}; | ||||||
|  | } // namespace asmjit | ||||||
|  | #endif | ||||||
|  | } // namespace iss | ||||||
|   | |||||||
| @@ -8,94 +8,130 @@ | |||||||
| #ifndef _SYSC_SC_CORE_ADAPTER_H_ | #ifndef _SYSC_SC_CORE_ADAPTER_H_ | ||||||
| #define _SYSC_SC_CORE_ADAPTER_H_ | #define _SYSC_SC_CORE_ADAPTER_H_ | ||||||
|  |  | ||||||
|  | #include "sc_core_adapter_if.h" | ||||||
| #include <scc/report.h> | #include <iostream> | ||||||
| #include <util/ities.h> |  | ||||||
| #include "core_complex.h" |  | ||||||
| #include <iss/iss.h> | #include <iss/iss.h> | ||||||
| #include <iss/vm_types.h> | #include <iss/vm_types.h> | ||||||
| #include <iostream> | #include <scc/report.h> | ||||||
|  | #include <util/ities.h> | ||||||
|  |  | ||||||
|  | namespace sysc { | ||||||
| template<typename PLAT> | template <typename PLAT> class sc_core_adapter : public PLAT, public sc_core_adapter_if { | ||||||
| class sc_core_adapter : public PLAT { |  | ||||||
| public: | public: | ||||||
|     using reg_t       = typename iss::arch::traits<typename PLAT::core>::reg_t; |     using reg_t = typename iss::arch::traits<typename PLAT::core>::reg_t; | ||||||
|     using phys_addr_t = typename iss::arch::traits<typename PLAT::core>::phys_addr_t; |     using phys_addr_t = typename iss::arch::traits<typename PLAT::core>::phys_addr_t; | ||||||
|     using heart_state_t = typename PLAT::hart_state_type; |     using heart_state_t = typename PLAT::hart_state_type; | ||||||
|     sc_core_adapter(sysc::tgfs::core_complex *owner) |     sc_core_adapter(sysc::tgfs::core_complex* owner) | ||||||
|     : owner(owner) { } |     : owner(owner) {} | ||||||
|  |  | ||||||
|     uint32_t get_mode() { return this->reg.PRIV; } |     iss::arch_if* get_arch_if() override { return this; } | ||||||
|  |  | ||||||
|     inline void set_interrupt_execution(bool v) { this->interrupt_sim = v?1:0; } |     void set_mhartid(unsigned id) override { PLAT::set_mhartid(id); } | ||||||
|  |  | ||||||
|     inline bool get_interrupt_execution() { return this->interrupt_sim; } |     uint32_t get_mode() override { return this->reg.PRIV; } | ||||||
|  |  | ||||||
|     heart_state_t &get_state() { return this->state; } |     void set_interrupt_execution(bool v) override { this->interrupt_sim = v ? 1 : 0; } | ||||||
|  |  | ||||||
|  |     bool get_interrupt_execution() override { return this->interrupt_sim; } | ||||||
|  |  | ||||||
|  |     uint64_t get_state() override { return this->state.mstatus.backing.val; } | ||||||
|  |  | ||||||
|     void notify_phase(iss::arch_if::exec_phase p) override { |     void notify_phase(iss::arch_if::exec_phase p) override { | ||||||
|         if (p == iss::arch_if::ISTART) |         if(p == iss::arch_if::ISTART && !first) { | ||||||
|  |             auto cycle_incr = owner->get_last_bus_cycles(); | ||||||
|  |             if(cycle_incr > 1) | ||||||
|  |                 this->instr_if.update_last_instr_cycles(cycle_incr); | ||||||
|             owner->sync(this->instr_if.get_total_cycles()); |             owner->sync(this->instr_if.get_total_cycles()); | ||||||
|  |         } | ||||||
|  |         first = false; | ||||||
|     } |     } | ||||||
|  |  | ||||||
|     iss::sync_type needed_sync() const override { return iss::PRE_SYNC; } |     iss::sync_type needed_sync() const override { return iss::PRE_SYNC; } | ||||||
|  |  | ||||||
|     void disass_output(uint64_t pc, const std::string instr) override { |     void disass_output(uint64_t pc, const std::string instr) override { | ||||||
|         static constexpr std::array<const char, 4> lvl = {{'U', 'S', 'H', 'M'}}; |         static constexpr std::array<const char, 4> lvl = {{'U', 'S', 'H', 'M'}}; | ||||||
|         if (!owner->disass_output(pc, instr)) { |         if(!owner->disass_output(pc, instr)) { | ||||||
|             std::stringstream s; |             std::stringstream s; | ||||||
|             s << "[p:" << lvl[this->reg.PRIV] << ";s:0x" << std::hex << std::setfill('0') |             s << "[p:" << lvl[this->reg.PRIV] << ";s:0x" << std::hex << std::setfill('0') << std::setw(sizeof(reg_t) * 2) | ||||||
|               << std::setw(sizeof(reg_t) * 2) << (reg_t)this->state.mstatus << std::dec << ";c:" |               << (reg_t)this->state.mstatus << std::dec << ";c:" << this->reg.icount + this->cycle_offset << "]"; | ||||||
|               << this->reg.icount + this->cycle_offset << "]"; |             SCCDEBUG(owner->name()) << "disass: " | ||||||
|             SCCDEBUG(owner->name())<<"disass: " |                                     << "0x" << std::setw(16) << std::right << std::setfill('0') << std::hex << pc << "\t\t" << std::setw(40) | ||||||
|                 << "0x" << std::setw(16) << std::right << std::setfill('0') << std::hex << pc << "\t\t" << std::setw(40) |                                     << std::setfill(' ') << std::left << instr << s.str(); | ||||||
|                 << std::setfill(' ') << std::left << instr << s.str(); |  | ||||||
|         } |         } | ||||||
|     }; |     }; | ||||||
|  |  | ||||||
|     iss::status read_mem(phys_addr_t addr, unsigned length, uint8_t *const data) override { |     iss::status read_mem(phys_addr_t addr, unsigned length, uint8_t* const data) override { | ||||||
|         if (addr.access && iss::access_type::DEBUG) |         if(addr.access && iss::access_type::DEBUG) | ||||||
|             return owner->read_mem_dbg(addr.val, length, data) ? iss::Ok : iss::Err; |             return owner->read_mem_dbg(addr.val, length, data) ? iss::Ok : iss::Err; | ||||||
|         else { |         else { | ||||||
|             return owner->read_mem(addr.val, length, data, is_fetch(addr.access)) ? iss::Ok : iss::Err; |             return owner->read_mem(addr.val, length, data, is_fetch(addr.access)) ? iss::Ok : iss::Err; | ||||||
|         } |         } | ||||||
|     } |     } | ||||||
|  |  | ||||||
|     iss::status write_mem(phys_addr_t addr, unsigned length, const uint8_t *const data) override { |     iss::status write_mem(phys_addr_t addr, unsigned length, const uint8_t* const data) override { | ||||||
|         if (addr.access && iss::access_type::DEBUG) |         if(addr.access && iss::access_type::DEBUG) | ||||||
|             return owner->write_mem_dbg(addr.val, length, data) ? iss::Ok : iss::Err; |             return owner->write_mem_dbg(addr.val, length, data) ? iss::Ok : iss::Err; | ||||||
|         else { |         else { | ||||||
|             auto res = owner->write_mem(addr.val, length, data) ? iss::Ok : iss::Err; |             auto tohost_upper = (sizeof(reg_t) == 4 && addr.val == (this->tohost + 4)) || (sizeof(reg_t) == 8 && addr.val == this->tohost); | ||||||
|             // clear MTIP on mtimecmp write |             auto tohost_lower = (sizeof(reg_t) == 4 && addr.val == this->tohost) || (sizeof(reg_t) == 64 && addr.val == this->tohost); | ||||||
|             if (addr.val == 0x2004000) { |             if(tohost_lower || tohost_upper) { | ||||||
|                 reg_t val; |                 if(tohost_upper || (tohost_lower && to_host_wr_cnt > 0)) { | ||||||
|                 this->read_csr(iss::arch::mip, val); |                     switch(hostvar >> 48) { | ||||||
|                 if (val & (1ULL << 7)) this->write_csr(iss::arch::mip, val & ~(1ULL << 7)); |                     case 0: | ||||||
|  |                         if(hostvar != 0x1) { | ||||||
|  |                             SCCINFO(owner->name()) | ||||||
|  |                                 << "tohost value is 0x" << std::hex << hostvar << std::dec << " (" << hostvar << "), stopping simulation"; | ||||||
|  |                         } else { | ||||||
|  |                             SCCINFO(owner->name()) | ||||||
|  |                                 << "tohost value is 0x" << std::hex << hostvar << std::dec << " (" << hostvar << "), stopping simulation"; | ||||||
|  |                         } | ||||||
|  |                         this->reg.trap_state = std::numeric_limits<uint32_t>::max(); | ||||||
|  |                         this->interrupt_sim = hostvar; | ||||||
|  | #ifndef WITH_TCC | ||||||
|  |                         throw(iss::simulation_stopped(hostvar)); | ||||||
|  | #endif | ||||||
|  |                         break; | ||||||
|  |                     default: | ||||||
|  |                         break; | ||||||
|  |                     } | ||||||
|  |                 } else if(tohost_lower) | ||||||
|  |                     to_host_wr_cnt++; | ||||||
|  |                 return iss::Ok; | ||||||
|  |             } else { | ||||||
|  |                 auto res = owner->write_mem(addr.val, length, data) ? iss::Ok : iss::Err; | ||||||
|  |                 // clear MTIP on mtimecmp write | ||||||
|  |                 if(addr.val == 0x2004000) { | ||||||
|  |                     reg_t val; | ||||||
|  |                     this->read_csr(iss::arch::mip, val); | ||||||
|  |                     if(val & (1ULL << 7)) | ||||||
|  |                         this->write_csr(iss::arch::mip, val & ~(1ULL << 7)); | ||||||
|  |                 } | ||||||
|  |                 return res; | ||||||
|             } |             } | ||||||
|             return res; |  | ||||||
|         } |         } | ||||||
|     } |     } | ||||||
|  |  | ||||||
|     iss::status read_csr(unsigned addr, reg_t &val) override { |     iss::status read_csr(unsigned addr, reg_t& val) override { | ||||||
| #ifndef CWR_SYSTEMC | #ifndef CWR_SYSTEMC | ||||||
|         if((addr==iss::arch::time || addr==iss::arch::timeh) && owner->mtime_o.get_interface(0)){ |         if((addr == iss::arch::time || addr == iss::arch::timeh) && owner->mtime_o.get_interface(0)) { | ||||||
|             uint64_t time_val; |             uint64_t time_val; | ||||||
|             bool ret = owner->mtime_o->nb_peek(time_val); |             bool ret = owner->mtime_o->nb_peek(time_val); | ||||||
|             if (addr == iss::arch::time) { |             if(addr == iss::arch::time) { | ||||||
|                 val = static_cast<reg_t>(time_val); |                 val = static_cast<reg_t>(time_val); | ||||||
|             } else if (addr == iss::arch::timeh) { |             } else if(addr == iss::arch::timeh) { | ||||||
|                 if (sizeof(reg_t) != 4) return iss::Err; |                 if(sizeof(reg_t) != 4) | ||||||
|  |                     return iss::Err; | ||||||
|                 val = static_cast<reg_t>(time_val >> 32); |                 val = static_cast<reg_t>(time_val >> 32); | ||||||
|             } |             } | ||||||
|             return ret?Ok:Err; |             return ret ? iss::Ok : iss::Err; | ||||||
| #else | #else | ||||||
|         if((addr==iss::arch::time || addr==iss::arch::timeh)){ |         if((addr == iss::arch::time || addr == iss::arch::timeh)) { | ||||||
|             uint64_t time_val = owner->mtime_i.read(); |             uint64_t time_val = owner->mtime_i.read(); | ||||||
|             if (addr == iss::arch::time) { |             if(addr == iss::arch::time) { | ||||||
|                 val = static_cast<reg_t>(time_val); |                 val = static_cast<reg_t>(time_val); | ||||||
|             } else if (addr == iss::arch::timeh) { |             } else if(addr == iss::arch::timeh) { | ||||||
|                 if (sizeof(reg_t) != 4) return iss::Err; |                 if(sizeof(reg_t) != 4) | ||||||
|  |                     return iss::Err; | ||||||
|                 val = static_cast<reg_t>(time_val >> 32); |                 val = static_cast<reg_t>(time_val >> 32); | ||||||
|             } |             } | ||||||
|             return iss::Ok; |             return iss::Ok; | ||||||
| @@ -113,9 +149,9 @@ public: | |||||||
|         PLAT::wait_until(flags); |         PLAT::wait_until(flags); | ||||||
|     } |     } | ||||||
|  |  | ||||||
|     void local_irq(short id, bool value) { |     void local_irq(short id, bool value) override { | ||||||
|         reg_t mask = 0; |         reg_t mask = 0; | ||||||
|         switch (id) { |         switch(id) { | ||||||
|         case 3: // SW |         case 3: // SW | ||||||
|             mask = 1 << 3; |             mask = 1 << 3; | ||||||
|             break; |             break; | ||||||
| @@ -126,10 +162,11 @@ public: | |||||||
|             mask = 1 << 11; |             mask = 1 << 11; | ||||||
|             break; |             break; | ||||||
|         default: |         default: | ||||||
|             if(id>15) mask = 1 << id; |             if(id > 15) | ||||||
|  |                 mask = 1 << id; | ||||||
|             break; |             break; | ||||||
|         } |         } | ||||||
|         if (value) { |         if(value) { | ||||||
|             this->csr[iss::arch::mip] |= mask; |             this->csr[iss::arch::mip] |= mask; | ||||||
|             wfi_evt.notify(); |             wfi_evt.notify(); | ||||||
|         } else |         } else | ||||||
| @@ -140,9 +177,11 @@ public: | |||||||
|     } |     } | ||||||
|  |  | ||||||
| private: | private: | ||||||
|     sysc::tgfs::core_complex *const owner; |     sysc::tgfs::core_complex* const owner; | ||||||
|     sc_event wfi_evt; |     sc_core::sc_event wfi_evt; | ||||||
|  |     uint64_t hostvar{std::numeric_limits<uint64_t>::max()}; | ||||||
|  |     unsigned to_host_wr_cnt = 0; | ||||||
|  |     bool first{true}; | ||||||
| }; | }; | ||||||
|  | } // namespace sysc | ||||||
|  |  | ||||||
| #endif /* _SYSC_SC_CORE_ADAPTER_H_ */ | #endif /* _SYSC_SC_CORE_ADAPTER_H_ */ | ||||||
|   | |||||||
							
								
								
									
										30
									
								
								src/sysc/sc_core_adapter_if.h
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										30
									
								
								src/sysc/sc_core_adapter_if.h
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,30 @@ | |||||||
|  | /* | ||||||
|  |  * sc_core_adapter.h | ||||||
|  |  * | ||||||
|  |  *  Created on: Jul 5, 2023 | ||||||
|  |  *      Author: eyck | ||||||
|  |  */ | ||||||
|  |  | ||||||
|  | #ifndef _SYSC_SC_CORE_ADAPTER_IF_H_ | ||||||
|  | #define _SYSC_SC_CORE_ADAPTER_IF_H_ | ||||||
|  |  | ||||||
|  | #include "core_complex.h" | ||||||
|  | #include <iostream> | ||||||
|  | #include <iss/iss.h> | ||||||
|  | #include <iss/vm_types.h> | ||||||
|  | #include <scc/report.h> | ||||||
|  | #include <util/ities.h> | ||||||
|  |  | ||||||
|  | namespace sysc { | ||||||
|  | struct sc_core_adapter_if { | ||||||
|  |     virtual iss::arch_if* get_arch_if() = 0; | ||||||
|  |     virtual void set_mhartid(unsigned) = 0; | ||||||
|  |     virtual uint32_t get_mode() = 0; | ||||||
|  |     virtual uint64_t get_state() = 0; | ||||||
|  |     virtual bool get_interrupt_execution() = 0; | ||||||
|  |     virtual void set_interrupt_execution(bool v) = 0; | ||||||
|  |     virtual void local_irq(short id, bool value) = 0; | ||||||
|  |     virtual ~sc_core_adapter_if() = default; | ||||||
|  | }; | ||||||
|  | } // namespace sysc | ||||||
|  | #endif /* _SYSC_SC_CORE_ADAPTER_IF_H_ */ | ||||||
							
								
								
									
										530
									
								
								src/vm/asmjit/helper_func.h
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										530
									
								
								src/vm/asmjit/helper_func.h
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,530 @@ | |||||||
|  |  | ||||||
|  |  | ||||||
|  | x86::Mem get_reg_ptr(jit_holder& jh, unsigned idx) { | ||||||
|  |  | ||||||
|  |     x86::Gp tmp_ptr = jh.cc.newUIntPtr("tmp_ptr"); | ||||||
|  |     jh.cc.mov(tmp_ptr, jh.regs_base_ptr); | ||||||
|  |     jh.cc.add(tmp_ptr, traits::reg_byte_offsets[idx]); | ||||||
|  |     switch(traits::reg_bit_widths[idx]) { | ||||||
|  |     case 8: | ||||||
|  |         return x86::ptr_8(tmp_ptr); | ||||||
|  |     case 16: | ||||||
|  |         return x86::ptr_16(tmp_ptr); | ||||||
|  |     case 32: | ||||||
|  |         return x86::ptr_32(tmp_ptr); | ||||||
|  |     case 64: | ||||||
|  |         return x86::ptr_64(tmp_ptr); | ||||||
|  |     default: | ||||||
|  |         throw std::runtime_error("Invalid reg size in get_reg_ptr"); | ||||||
|  |     } | ||||||
|  | } | ||||||
|  | x86::Gp get_reg_for(jit_holder& jh, unsigned idx) { | ||||||
|  |     // can check for regs in jh and return them instead of creating new ones | ||||||
|  |     switch(traits::reg_bit_widths[idx]) { | ||||||
|  |     case 8: | ||||||
|  |         return jh.cc.newInt8(); | ||||||
|  |     case 16: | ||||||
|  |         return jh.cc.newInt16(); | ||||||
|  |     case 32: | ||||||
|  |         return jh.cc.newInt32(); | ||||||
|  |     case 64: | ||||||
|  |         return jh.cc.newInt64(); | ||||||
|  |     default: | ||||||
|  |         throw std::runtime_error("Invalid reg size in get_reg_ptr"); | ||||||
|  |     } | ||||||
|  | } | ||||||
|  | x86::Gp get_reg_for(jit_holder& jh, unsigned size, bool is_signed) { | ||||||
|  |     if(is_signed) | ||||||
|  |         switch(size) { | ||||||
|  |         case 8: | ||||||
|  |             return jh.cc.newInt8(); | ||||||
|  |         case 16: | ||||||
|  |             return jh.cc.newInt16(); | ||||||
|  |         case 32: | ||||||
|  |             return jh.cc.newInt32(); | ||||||
|  |         case 64: | ||||||
|  |             return jh.cc.newInt64(); | ||||||
|  |         default: | ||||||
|  |             throw std::runtime_error("Invalid reg size in get_reg_ptr"); | ||||||
|  |         } | ||||||
|  |     else | ||||||
|  |         switch(size) { | ||||||
|  |         case 8: | ||||||
|  |             return jh.cc.newUInt8(); | ||||||
|  |         case 16: | ||||||
|  |             return jh.cc.newUInt16(); | ||||||
|  |         case 32: | ||||||
|  |             return jh.cc.newUInt32(); | ||||||
|  |         case 64: | ||||||
|  |             return jh.cc.newUInt64(); | ||||||
|  |         default: | ||||||
|  |             throw std::runtime_error("Invalid reg size in get_reg_ptr"); | ||||||
|  |         } | ||||||
|  | } | ||||||
|  | inline x86::Gp load_reg_from_mem(jit_holder& jh, unsigned idx) { | ||||||
|  |     auto ptr = get_reg_ptr(jh, idx); | ||||||
|  |     auto reg = get_reg_for(jh, idx); | ||||||
|  |     jh.cc.mov(reg, ptr); | ||||||
|  |     return reg; | ||||||
|  | } | ||||||
|  | inline void write_reg_to_mem(jit_holder& jh, x86::Gp reg, unsigned idx) { | ||||||
|  |     auto ptr = get_reg_ptr(jh, idx); | ||||||
|  |     jh.cc.mov(ptr, reg); | ||||||
|  | } | ||||||
|  |  | ||||||
|  | void gen_instr_prologue(jit_holder& jh, addr_t pc) { | ||||||
|  |     auto& cc = jh.cc; | ||||||
|  |  | ||||||
|  |     cc.comment("\n//(*icount)++;"); | ||||||
|  |     cc.inc(get_reg_ptr(jh, traits::ICOUNT)); | ||||||
|  |  | ||||||
|  |     cc.comment("\n//*pc=*next_pc;"); | ||||||
|  |     cc.mov(get_reg_ptr(jh, traits::PC), jh.next_pc); | ||||||
|  |  | ||||||
|  |     cc.comment("\n//*trap_state=*pending_trap;"); | ||||||
|  |     cc.mov(get_reg_ptr(jh, traits::PENDING_TRAP), jh.trap_state); | ||||||
|  |  | ||||||
|  |     cc.comment("\n//increment *next_pc"); | ||||||
|  |     cc.mov(jh.next_pc, pc); | ||||||
|  | } | ||||||
|  | void gen_instr_epilogue(jit_holder& jh) { | ||||||
|  |     auto& cc = jh.cc; | ||||||
|  |  | ||||||
|  |     cc.comment("\n//if(*trap_state!=0) goto trap_entry;"); | ||||||
|  |     cc.test(jh.trap_state, jh.trap_state); | ||||||
|  |     cc.jnz(jh.trap_entry); | ||||||
|  |  | ||||||
|  |     // Does this need to be done after every single instruction? | ||||||
|  |     cc.comment("\n//write back regs to mem"); | ||||||
|  |     write_reg_to_mem(jh, jh.pc, traits::PC); | ||||||
|  |     write_reg_to_mem(jh, jh.next_pc, traits::NEXT_PC); | ||||||
|  |     write_reg_to_mem(jh, jh.trap_state, traits::TRAP_STATE); | ||||||
|  | } | ||||||
|  | void gen_block_prologue(jit_holder& jh) override { | ||||||
|  |  | ||||||
|  |     jh.pc = load_reg_from_mem(jh, traits::PC); | ||||||
|  |     jh.next_pc = load_reg_from_mem(jh, traits::NEXT_PC); | ||||||
|  |     jh.trap_state = load_reg_from_mem(jh, traits::TRAP_STATE); | ||||||
|  | } | ||||||
|  | void gen_block_epilogue(jit_holder& jh) override { | ||||||
|  |     x86::Compiler& cc = jh.cc; | ||||||
|  |     cc.comment("\n//return *next_pc;"); | ||||||
|  |     cc.ret(jh.next_pc); | ||||||
|  |  | ||||||
|  |     cc.bind(jh.trap_entry); | ||||||
|  |     cc.comment("\n//enter_trap(core_ptr, *trap_state, *pc, 0);"); | ||||||
|  |  | ||||||
|  |     x86::Gp current_trap_state = get_reg_for(jh, traits::TRAP_STATE); | ||||||
|  |     cc.mov(current_trap_state, get_reg_ptr(jh, traits::TRAP_STATE)); | ||||||
|  |  | ||||||
|  |     x86::Gp current_pc = get_reg_for(jh, traits::PC); | ||||||
|  |     cc.mov(current_pc, get_reg_ptr(jh, traits::PC)); | ||||||
|  |  | ||||||
|  |     x86::Gp instr = cc.newInt32("instr"); | ||||||
|  |     cc.mov(instr, 0); | ||||||
|  |     InvokeNode* call_enter_trap; | ||||||
|  |     cc.invoke(&call_enter_trap, &enter_trap, FuncSignatureT<uint64_t, void*, uint64_t, uint64_t, uint64_t>()); | ||||||
|  |     call_enter_trap->setArg(0, jh.arch_if_ptr); | ||||||
|  |     call_enter_trap->setArg(1, current_trap_state); | ||||||
|  |     call_enter_trap->setArg(2, current_pc); | ||||||
|  |     call_enter_trap->setArg(3, instr); | ||||||
|  |     cc.comment("\n//*last_branch = std::numeric_limits<uint32_t>::max();"); | ||||||
|  |     cc.mov(get_reg_ptr(jh, traits::LAST_BRANCH), std::numeric_limits<uint32_t>::max()); | ||||||
|  |     cc.comment("\n//return *next_pc;"); | ||||||
|  |     cc.ret(jh.next_pc); | ||||||
|  | } | ||||||
|  | // TODO implement | ||||||
|  |  | ||||||
|  | void gen_raise(jit_holder& jh, uint16_t trap_id, uint16_t cause) { jh.cc.comment("//gen_raise"); } | ||||||
|  | void gen_wait(jit_holder& jh, unsigned type) { jh.cc.comment("//gen_wait"); } | ||||||
|  | void gen_leave(jit_holder& jh, unsigned lvl) { jh.cc.comment("//gen_leave"); } | ||||||
|  |  | ||||||
|  | enum operation { add, sub, band, bor, bxor, shl, sar, shr }; | ||||||
|  |  | ||||||
|  | template <typename T, typename = std::enable_if_t<std::is_integral<T>::value || std::is_same<T, x86::Gp>::value>> | ||||||
|  | x86::Gp gen_operation(jit_holder& jh, operation op, x86::Gp a, T b) { | ||||||
|  |     x86::Compiler& cc = jh.cc; | ||||||
|  |     switch(op) { | ||||||
|  |     case add: { | ||||||
|  |         cc.add(a, b); | ||||||
|  |         break; | ||||||
|  |     } | ||||||
|  |     case sub: { | ||||||
|  |         cc.sub(a, b); | ||||||
|  |         break; | ||||||
|  |     } | ||||||
|  |     case band: { | ||||||
|  |         cc.and_(a, b); | ||||||
|  |         break; | ||||||
|  |     } | ||||||
|  |     case bor: { | ||||||
|  |         cc.or_(a, b); | ||||||
|  |         break; | ||||||
|  |     } | ||||||
|  |     case bxor: { | ||||||
|  |         cc.xor_(a, b); | ||||||
|  |         break; | ||||||
|  |     } | ||||||
|  |     case shl: { | ||||||
|  |         cc.shl(a, b); | ||||||
|  |         break; | ||||||
|  |     } | ||||||
|  |     case sar: { | ||||||
|  |         cc.sar(a, b); | ||||||
|  |         break; | ||||||
|  |     } | ||||||
|  |     case shr: { | ||||||
|  |         cc.shr(a, b); | ||||||
|  |         break; | ||||||
|  |     } | ||||||
|  |     default: | ||||||
|  |         throw std::runtime_error(fmt::format("Current operation {} not supported in gen_operation (operation)", op)); | ||||||
|  |     } | ||||||
|  |     return a; | ||||||
|  | } | ||||||
|  |  | ||||||
|  | enum three_operand_operation { imul, mul, idiv, div, srem, urem }; | ||||||
|  |  | ||||||
|  | x86::Gp gen_operation(jit_holder& jh, three_operand_operation op, x86::Gp a, x86::Gp b) { | ||||||
|  |     x86::Compiler& cc = jh.cc; | ||||||
|  |     switch(op) { | ||||||
|  |     case imul: { | ||||||
|  |         x86::Gp dummy = cc.newInt64(); | ||||||
|  |         cc.imul(dummy, a.r64(), b.r64()); | ||||||
|  |         return a; | ||||||
|  |     } | ||||||
|  |     case mul: { | ||||||
|  |         x86::Gp dummy = cc.newInt64(); | ||||||
|  |         cc.mul(dummy, a.r64(), b.r64()); | ||||||
|  |         return a; | ||||||
|  |     } | ||||||
|  |     case idiv: { | ||||||
|  |         x86::Gp dummy = cc.newInt64(); | ||||||
|  |         cc.mov(dummy, 0); | ||||||
|  |         cc.idiv(dummy, a.r64(), b.r64()); | ||||||
|  |         return a; | ||||||
|  |     } | ||||||
|  |     case div: { | ||||||
|  |         x86::Gp dummy = cc.newInt64(); | ||||||
|  |         cc.mov(dummy, 0); | ||||||
|  |         cc.div(dummy, a.r64(), b.r64()); | ||||||
|  |         return a; | ||||||
|  |     } | ||||||
|  |     case srem: { | ||||||
|  |         x86::Gp rem = cc.newInt32(); | ||||||
|  |         cc.mov(rem, 0); | ||||||
|  |         auto a_reg = cc.newInt32(); | ||||||
|  |         cc.mov(a_reg, a.r32()); | ||||||
|  |         cc.idiv(rem, a_reg, b.r32()); | ||||||
|  |         return rem; | ||||||
|  |     } | ||||||
|  |     case urem: { | ||||||
|  |         x86::Gp rem = cc.newInt32(); | ||||||
|  |         cc.mov(rem, 0); | ||||||
|  |         auto a_reg = cc.newInt32(); | ||||||
|  |         cc.mov(a_reg, a.r32()); | ||||||
|  |         cc.div(rem, a_reg, b.r32()); | ||||||
|  |         return rem; | ||||||
|  |     } | ||||||
|  |  | ||||||
|  |     default: | ||||||
|  |         throw std::runtime_error(fmt::format("Current operation {} not supported in gen_operation (three_operand)", op)); | ||||||
|  |     } | ||||||
|  |     return a; | ||||||
|  | } | ||||||
|  | template <typename T, typename = std::enable_if_t<std::is_integral<T>::value>> | ||||||
|  | x86::Gp gen_operation(jit_holder& jh, three_operand_operation op, x86::Gp a, T b) { | ||||||
|  |     x86::Gp b_reg = jh.cc.newInt32(); | ||||||
|  |     /*     switch(a.size()){ | ||||||
|  |             case 1: b_reg = jh.cc.newInt8(); break; | ||||||
|  |             case 2: b_reg = jh.cc.newInt16(); break; | ||||||
|  |             case 4: b_reg = jh.cc.newInt32(); break; | ||||||
|  |             case 8: b_reg = jh.cc.newInt64(); break; | ||||||
|  |             default: throw std::runtime_error(fmt::format("Invalid size ({}) in gen operation", a.size())); | ||||||
|  |         } */ | ||||||
|  |     jh.cc.mov(b_reg, b); | ||||||
|  |     return gen_operation(jh, op, a, b_reg); | ||||||
|  | } | ||||||
|  | enum comparison_operation { land, lor, eq, ne, lt, ltu, gt, gtu, lte, lteu, gte, gteu }; | ||||||
|  |  | ||||||
|  | template <typename T, typename = std::enable_if_t<std::is_integral<T>::value || std::is_same<T, x86::Gp>::value>> | ||||||
|  | x86::Gp gen_operation(jit_holder& jh, comparison_operation op, x86::Gp a, T b) { | ||||||
|  |     x86::Compiler& cc = jh.cc; | ||||||
|  |     x86::Gp tmp = cc.newInt8(); | ||||||
|  |     cc.mov(tmp, 1); | ||||||
|  |     Label label_then = cc.newLabel(); | ||||||
|  |     cc.cmp(a, b); | ||||||
|  |     switch(op) { | ||||||
|  |     case eq: | ||||||
|  |         cc.je(label_then); | ||||||
|  |         break; | ||||||
|  |     case ne: | ||||||
|  |         cc.jne(label_then); | ||||||
|  |         break; | ||||||
|  |     case lt: | ||||||
|  |         cc.jl(label_then); | ||||||
|  |         break; | ||||||
|  |     case ltu: | ||||||
|  |         cc.jb(label_then); | ||||||
|  |         break; | ||||||
|  |     case gt: | ||||||
|  |         cc.jg(label_then); | ||||||
|  |         break; | ||||||
|  |     case gtu: | ||||||
|  |         cc.ja(label_then); | ||||||
|  |         break; | ||||||
|  |     case lte: | ||||||
|  |         cc.jle(label_then); | ||||||
|  |         break; | ||||||
|  |     case lteu: | ||||||
|  |         cc.jbe(label_then); | ||||||
|  |         break; | ||||||
|  |     case gte: | ||||||
|  |         cc.jge(label_then); | ||||||
|  |         break; | ||||||
|  |     case gteu: | ||||||
|  |         cc.jae(label_then); | ||||||
|  |         break; | ||||||
|  |     case land: { | ||||||
|  |         Label label_false = cc.newLabel(); | ||||||
|  |         cc.cmp(a, 0); | ||||||
|  |         cc.je(label_false); | ||||||
|  |         auto b_reg = cc.newInt8(); | ||||||
|  |         cc.mov(b_reg, b); | ||||||
|  |         cc.cmp(b_reg, 0); | ||||||
|  |         cc.je(label_false); | ||||||
|  |         cc.jmp(label_then); | ||||||
|  |         cc.bind(label_false); | ||||||
|  |         break; | ||||||
|  |     } | ||||||
|  |     case lor: { | ||||||
|  |         cc.cmp(a, 0); | ||||||
|  |         cc.jne(label_then); | ||||||
|  |         auto b_reg = cc.newInt8(); | ||||||
|  |         cc.mov(b_reg, b); | ||||||
|  |         cc.cmp(b_reg, 0); | ||||||
|  |         cc.jne(label_then); | ||||||
|  |         break; | ||||||
|  |     } | ||||||
|  |     default: | ||||||
|  |         throw std::runtime_error(fmt::format("Current operation {} not supported in gen_operation (comparison)", op)); | ||||||
|  |     } | ||||||
|  |     cc.mov(tmp, 0); | ||||||
|  |     cc.bind(label_then); | ||||||
|  |     return tmp; | ||||||
|  | } | ||||||
|  | enum binary_operation { lnot, inc, dec, bnot, neg }; | ||||||
|  |  | ||||||
|  | x86::Gp gen_operation(jit_holder& jh, binary_operation op, x86::Gp a) { | ||||||
|  |     x86::Compiler& cc = jh.cc; | ||||||
|  |     switch(op) { | ||||||
|  |     case lnot: | ||||||
|  |         throw std::runtime_error("Current operation not supported in gen_operation(lnot)"); | ||||||
|  |     case inc: { | ||||||
|  |         cc.inc(a); | ||||||
|  |         break; | ||||||
|  |     } | ||||||
|  |     case dec: { | ||||||
|  |         cc.dec(a); | ||||||
|  |         break; | ||||||
|  |     } | ||||||
|  |     case bnot: { | ||||||
|  |         cc.not_(a); | ||||||
|  |         break; | ||||||
|  |     } | ||||||
|  |     case neg: { | ||||||
|  |         cc.neg(a); | ||||||
|  |         break; | ||||||
|  |     } | ||||||
|  |     default: | ||||||
|  |         throw std::runtime_error(fmt::format("Current operation {} not supported in gen_operation (unary)", op)); | ||||||
|  |     } | ||||||
|  |     return a; | ||||||
|  | } | ||||||
|  |  | ||||||
|  | /* template <typename T> | ||||||
|  | inline typename std::enable_if_t<std::is_unsigned<T>::value, x86::Gp> gen_ext(jit_holder& jh, T val, unsigned size, bool | ||||||
|  | is_signed) const { auto val_reg = get_reg_for(jh, sizeof(val)*8); auto tmp = get_reg_for(jh, size); jh.cc.mov(val_reg, | ||||||
|  | val); if(is_signed) jh.cc.movsx(tmp, val_reg); else jh.cc.movzx(tmp,val_reg); return tmp; | ||||||
|  | } | ||||||
|  |  | ||||||
|  | template <typename T> | ||||||
|  | inline typename std::enable_if_t<std::is_signed<T>::value, x86::Gp> gen_ext(jit_holder& jh, T val, unsigned size, bool | ||||||
|  | is_signed) const { auto val_reg = get_reg_for(jh, sizeof(val)*8); auto tmp = get_reg_for(jh, size); jh.cc.mov(val_reg, | ||||||
|  | val); if(is_signed) jh.cc.movsx(tmp, val_reg); else jh.cc.movzx(tmp,val_reg); return tmp; | ||||||
|  | } */ | ||||||
|  | template <typename T, typename = std::enable_if_t<std::is_integral<T>::value>> | ||||||
|  | inline x86::Gp gen_ext(jit_holder& jh, T val, unsigned size, bool is_signed) { | ||||||
|  |     auto val_reg = get_reg_for(jh, sizeof(val) * 8); | ||||||
|  |     jh.cc.mov(val_reg, val); | ||||||
|  |     return gen_ext(jh, val_reg, size, is_signed); | ||||||
|  | } | ||||||
|  | // explicit Gp size cast | ||||||
|  | inline x86::Gp gen_ext(jit_holder& jh, x86::Gp val, unsigned size, bool is_signed) { | ||||||
|  |     auto& cc = jh.cc; | ||||||
|  |     if(is_signed) { | ||||||
|  |         switch(val.size()) { | ||||||
|  |         case 1: | ||||||
|  |             cc.cbw(val); | ||||||
|  |             break; | ||||||
|  |         case 2: | ||||||
|  |             cc.cwde(val); | ||||||
|  |             break; | ||||||
|  |         case 4: | ||||||
|  |             cc.cdqe(val); | ||||||
|  |             break; | ||||||
|  |         case 8: | ||||||
|  |             break; | ||||||
|  |         default: | ||||||
|  |             throw std::runtime_error("Invalid register size in gen_ext"); | ||||||
|  |         } | ||||||
|  |     } | ||||||
|  |     switch(size) { | ||||||
|  |     case 8: | ||||||
|  |         cc.and_(val, std::numeric_limits<uint8_t>::max()); | ||||||
|  |         return val.r8(); | ||||||
|  |     case 16: | ||||||
|  |         cc.and_(val, std::numeric_limits<uint16_t>::max()); | ||||||
|  |         return val.r16(); | ||||||
|  |     case 32: | ||||||
|  |         cc.and_(val, std::numeric_limits<uint32_t>::max()); | ||||||
|  |         return val.r32(); | ||||||
|  |     case 64: | ||||||
|  |         cc.and_(val, std::numeric_limits<uint64_t>::max()); | ||||||
|  |         return val.r64(); | ||||||
|  |     case 128: | ||||||
|  |         return val.r64(); | ||||||
|  |     default: | ||||||
|  |         throw std::runtime_error("Invalid size in gen_ext"); | ||||||
|  |     } | ||||||
|  | } | ||||||
|  |  | ||||||
|  | inline x86::Gp gen_read_mem(jit_holder& jh, mem_type_e type, x86::Gp addr, uint32_t length) { | ||||||
|  |     x86::Compiler& cc = jh.cc; | ||||||
|  |     auto ret_reg = cc.newInt32(); | ||||||
|  |  | ||||||
|  |     auto mem_type_reg = cc.newInt32(); | ||||||
|  |     cc.mov(mem_type_reg, type); | ||||||
|  |  | ||||||
|  |     auto space_reg = cc.newInt32(); | ||||||
|  |     cc.mov(space_reg, static_cast<uint16_t>(iss::address_type::VIRTUAL)); | ||||||
|  |  | ||||||
|  |     auto val_ptr = cc.newUIntPtr(); | ||||||
|  |     cc.mov(val_ptr, read_mem_buf); | ||||||
|  |  | ||||||
|  |     InvokeNode* invokeNode; | ||||||
|  |     uint64_t mask = 0; | ||||||
|  |     x86::Gp val_reg = cc.newInt64(); | ||||||
|  |  | ||||||
|  |     switch(length) { | ||||||
|  |     case 1: { | ||||||
|  |         cc.invoke(&invokeNode, &read_mem1, FuncSignatureT<uint32_t, uint64_t, uint32_t, uint32_t, uint64_t, uintptr_t>()); | ||||||
|  |         mask = std::numeric_limits<uint8_t>::max(); | ||||||
|  |         break; | ||||||
|  |     } | ||||||
|  |     case 2: { | ||||||
|  |         cc.invoke(&invokeNode, &read_mem2, FuncSignatureT<uint32_t, uint64_t, uint32_t, uint32_t, uint64_t, uintptr_t>()); | ||||||
|  |         mask = std::numeric_limits<uint16_t>::max(); | ||||||
|  |         break; | ||||||
|  |     } | ||||||
|  |     case 4: { | ||||||
|  |         cc.invoke(&invokeNode, &read_mem4, FuncSignatureT<uint32_t, uint64_t, uint32_t, uint32_t, uint64_t, uintptr_t>()); | ||||||
|  |         mask = std::numeric_limits<uint32_t>::max(); | ||||||
|  |         break; | ||||||
|  |     } | ||||||
|  |     case 8: { | ||||||
|  |         cc.invoke(&invokeNode, &read_mem8, FuncSignatureT<uint32_t, uint64_t, uint32_t, uint32_t, uint64_t, uintptr_t>()); | ||||||
|  |         mask = std::numeric_limits<uint64_t>::max(); | ||||||
|  |         break; | ||||||
|  |     } | ||||||
|  |     default: | ||||||
|  |         throw std::runtime_error(fmt::format("Invalid length ({}) in gen_read_mem", length)); | ||||||
|  |     } | ||||||
|  |  | ||||||
|  |     invokeNode->setRet(0, ret_reg); | ||||||
|  |     invokeNode->setArg(0, jh.arch_if_ptr); | ||||||
|  |     invokeNode->setArg(1, space_reg); | ||||||
|  |     invokeNode->setArg(2, mem_type_reg); | ||||||
|  |     invokeNode->setArg(3, addr); | ||||||
|  |     invokeNode->setArg(4, val_ptr); | ||||||
|  |  | ||||||
|  |     cc.mov(val_reg, x86::ptr_64(val_ptr)); | ||||||
|  |     cc.and_(val_reg, mask); | ||||||
|  |     cc.cmp(ret_reg, 0); | ||||||
|  |     cc.jne(jh.trap_entry); | ||||||
|  |     return val_reg; | ||||||
|  | } | ||||||
|  | inline x86::Gp gen_read_mem(jit_holder& jh, mem_type_e type, x86::Gp addr, x86::Gp length) { | ||||||
|  |     uint32_t length_val = 0; | ||||||
|  |     auto length_ptr = jh.cc.newIntPtr(); | ||||||
|  |     jh.cc.mov(length_ptr, &length_val); | ||||||
|  |     jh.cc.mov(x86::ptr_32(length_ptr), length); | ||||||
|  |  | ||||||
|  |     return gen_read_mem(jh, type, addr, length); | ||||||
|  | } | ||||||
|  | inline x86::Gp gen_read_mem(jit_holder& jh, mem_type_e type, uint64_t addr, x86::Gp length) { | ||||||
|  |     auto addr_reg = jh.cc.newInt64(); | ||||||
|  |     jh.cc.mov(addr_reg, addr); | ||||||
|  |  | ||||||
|  |     uint32_t length_val = 0; | ||||||
|  |     auto length_ptr = jh.cc.newIntPtr(); | ||||||
|  |     jh.cc.mov(length_ptr, &length_val); | ||||||
|  |     jh.cc.mov(x86::ptr_32(length_ptr), length); | ||||||
|  |  | ||||||
|  |     return gen_read_mem(jh, type, addr_reg, length_val); | ||||||
|  | } | ||||||
|  | inline x86::Gp gen_read_mem(jit_holder& jh, mem_type_e type, uint64_t addr, uint32_t length) { | ||||||
|  |     auto addr_reg = jh.cc.newInt64(); | ||||||
|  |     jh.cc.mov(addr_reg, addr); | ||||||
|  |  | ||||||
|  |     return gen_read_mem(jh, type, addr_reg, length); | ||||||
|  | } | ||||||
|  | inline void gen_write_mem(jit_holder& jh, mem_type_e type, x86::Gp addr, int64_t val) { | ||||||
|  |     auto val_reg = jh.cc.newInt64(); | ||||||
|  |     jh.cc.mov(val_reg, val); | ||||||
|  |     gen_write_mem(jh, type, addr, val_reg); | ||||||
|  | } | ||||||
|  | inline void gen_write_mem(jit_holder& jh, mem_type_e type, x86::Gp addr, x86::Gp val) { | ||||||
|  |     x86::Compiler& cc = jh.cc; | ||||||
|  |  | ||||||
|  |     auto mem_type_reg = cc.newInt32(); | ||||||
|  |     jh.cc.mov(mem_type_reg, type); | ||||||
|  |     auto space_reg = cc.newInt32(); | ||||||
|  |     jh.cc.mov(space_reg, static_cast<uint16_t>(iss::address_type::VIRTUAL)); | ||||||
|  |     auto ret_reg = cc.newInt32(); | ||||||
|  |     InvokeNode* invokeNode; | ||||||
|  |  | ||||||
|  |     if(val.isGpb()) { | ||||||
|  |         cc.invoke(&invokeNode, &write_mem1, FuncSignatureT<uint32_t, uint64_t, uint32_t, uint32_t, uint64_t, uint8_t>()); | ||||||
|  |     } else if(val.isGpw()) { | ||||||
|  |         cc.invoke(&invokeNode, &write_mem2, FuncSignatureT<uint32_t, uint64_t, uint32_t, uint32_t, uint64_t, uint16_t>()); | ||||||
|  |     } else if(val.isGpd()) { | ||||||
|  |         cc.invoke(&invokeNode, &write_mem4, FuncSignatureT<uint32_t, uint64_t, uint32_t, uint32_t, uint64_t, uint32_t>()); | ||||||
|  |     } else if(val.isGpq()) { | ||||||
|  |         cc.invoke(&invokeNode, &write_mem8, FuncSignatureT<uint32_t, uint64_t, uint32_t, uint32_t, uint64_t, uint64_t>()); | ||||||
|  |     } else | ||||||
|  |         throw std::runtime_error("Invalid register size in gen_write_mem"); | ||||||
|  |  | ||||||
|  |     invokeNode->setRet(0, ret_reg); | ||||||
|  |     invokeNode->setArg(0, jh.arch_if_ptr); | ||||||
|  |     invokeNode->setArg(1, space_reg); | ||||||
|  |     invokeNode->setArg(2, mem_type_reg); | ||||||
|  |     invokeNode->setArg(3, addr); | ||||||
|  |     invokeNode->setArg(4, val); | ||||||
|  |  | ||||||
|  |     cc.cmp(ret_reg, 0); | ||||||
|  |     cc.jne(jh.trap_entry); | ||||||
|  | } | ||||||
|  | inline void gen_write_mem(jit_holder& jh, mem_type_e type, uint64_t addr, x86::Gp val) { | ||||||
|  |     auto addr_reg = jh.cc.newInt64(); | ||||||
|  |     jh.cc.mov(addr_reg, addr); | ||||||
|  |     gen_write_mem(jh, type, addr_reg, val); | ||||||
|  | } | ||||||
|  | inline void gen_write_mem(jit_holder& jh, mem_type_e type, uint64_t addr, int64_t val) { | ||||||
|  |     auto val_reg = jh.cc.newInt64(); | ||||||
|  |     jh.cc.mov(val_reg, val); | ||||||
|  |  | ||||||
|  |     auto addr_reg = jh.cc.newInt64(); | ||||||
|  |     jh.cc.mov(addr_reg, addr); | ||||||
|  |     gen_write_mem(jh, type, addr_reg, val_reg); | ||||||
|  | } | ||||||
							
								
								
									
										3555
									
								
								src/vm/asmjit/vm_tgc5c.cpp
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										3555
									
								
								src/vm/asmjit/vm_tgc5c.cpp
									
									
									
									
									
										Normal file
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							| @@ -35,97 +35,90 @@ | |||||||
| #include "fp_functions.h" | #include "fp_functions.h" | ||||||
|  |  | ||||||
| extern "C" { | extern "C" { | ||||||
| #include <softfloat.h> |  | ||||||
| #include "internals.h" | #include "internals.h" | ||||||
| #include "specialize.h" | #include "specialize.h" | ||||||
|  | #include <softfloat.h> | ||||||
| } | } | ||||||
|  |  | ||||||
| #include <limits> | #include <limits> | ||||||
|  |  | ||||||
| using this_t = uint8_t *; | using this_t = uint8_t*; | ||||||
| const uint8_t rmm_map[] = { | const uint8_t rmm_map[] = { | ||||||
|         softfloat_round_near_even /*RNE*/, |     softfloat_round_near_even /*RNE*/,   softfloat_round_minMag /*RTZ*/, softfloat_round_min /*RDN*/, softfloat_round_max /*RUP?*/, | ||||||
|         softfloat_round_minMag/*RTZ*/, |     softfloat_round_near_maxMag /*RMM*/, softfloat_round_max /*RTZ*/,    softfloat_round_max /*RTZ*/, softfloat_round_max /*RTZ*/, | ||||||
|         softfloat_round_min/*RDN*/, |  | ||||||
|         softfloat_round_max/*RUP?*/, |  | ||||||
|         softfloat_round_near_maxMag /*RMM*/, |  | ||||||
|         softfloat_round_max/*RTZ*/, |  | ||||||
|         softfloat_round_max/*RTZ*/, |  | ||||||
|         softfloat_round_max/*RTZ*/, |  | ||||||
| }; | }; | ||||||
|  |  | ||||||
| const uint32_t quiet_nan32=0x7fC00000; | const uint32_t quiet_nan32 = 0x7fC00000; | ||||||
|  |  | ||||||
| extern "C" { | extern "C" { | ||||||
|  |  | ||||||
| uint32_t fget_flags(){ | uint32_t fget_flags() { return softfloat_exceptionFlags & 0x1f; } | ||||||
|     return softfloat_exceptionFlags&0x1f; |  | ||||||
| } |  | ||||||
|  |  | ||||||
| uint32_t fadd_s(uint32_t v1, uint32_t v2, uint8_t mode) { | uint32_t fadd_s(uint32_t v1, uint32_t v2, uint8_t mode) { | ||||||
|     float32_t v1f{v1},v2f{v2}; |     float32_t v1f{v1}, v2f{v2}; | ||||||
|     softfloat_roundingMode=rmm_map[mode&0x7]; |     softfloat_roundingMode = rmm_map[mode & 0x7]; | ||||||
|     softfloat_exceptionFlags=0; |     softfloat_exceptionFlags = 0; | ||||||
|     float32_t r =f32_add(v1f, v2f); |     float32_t r = f32_add(v1f, v2f); | ||||||
|     return r.v; |     return r.v; | ||||||
| } | } | ||||||
|  |  | ||||||
| uint32_t fsub_s(uint32_t v1, uint32_t v2, uint8_t mode) { | uint32_t fsub_s(uint32_t v1, uint32_t v2, uint8_t mode) { | ||||||
|     float32_t v1f{v1},v2f{v2}; |     float32_t v1f{v1}, v2f{v2}; | ||||||
|     softfloat_roundingMode=rmm_map[mode&0x7]; |     softfloat_roundingMode = rmm_map[mode & 0x7]; | ||||||
|     softfloat_exceptionFlags=0; |     softfloat_exceptionFlags = 0; | ||||||
|     float32_t r=f32_sub(v1f, v2f); |     float32_t r = f32_sub(v1f, v2f); | ||||||
|     return r.v; |     return r.v; | ||||||
| } | } | ||||||
|  |  | ||||||
| uint32_t fmul_s(uint32_t v1, uint32_t v2, uint8_t mode) { | uint32_t fmul_s(uint32_t v1, uint32_t v2, uint8_t mode) { | ||||||
|     float32_t v1f{v1},v2f{v2}; |     float32_t v1f{v1}, v2f{v2}; | ||||||
|     softfloat_roundingMode=rmm_map[mode&0x7]; |     softfloat_roundingMode = rmm_map[mode & 0x7]; | ||||||
|     softfloat_exceptionFlags=0; |     softfloat_exceptionFlags = 0; | ||||||
|     float32_t r=f32_mul(v1f, v2f); |     float32_t r = f32_mul(v1f, v2f); | ||||||
|     return r.v; |     return r.v; | ||||||
| } | } | ||||||
|  |  | ||||||
| uint32_t fdiv_s(uint32_t v1, uint32_t v2, uint8_t mode) { | uint32_t fdiv_s(uint32_t v1, uint32_t v2, uint8_t mode) { | ||||||
|     float32_t v1f{v1},v2f{v2}; |     float32_t v1f{v1}, v2f{v2}; | ||||||
|     softfloat_roundingMode=rmm_map[mode&0x7]; |     softfloat_roundingMode = rmm_map[mode & 0x7]; | ||||||
|     softfloat_exceptionFlags=0; |     softfloat_exceptionFlags = 0; | ||||||
|     float32_t r=f32_div(v1f, v2f); |     float32_t r = f32_div(v1f, v2f); | ||||||
|     return r.v; |     return r.v; | ||||||
| } | } | ||||||
|  |  | ||||||
| uint32_t fsqrt_s(uint32_t v1, uint8_t mode) { | uint32_t fsqrt_s(uint32_t v1, uint8_t mode) { | ||||||
|     float32_t v1f{v1}; |     float32_t v1f{v1}; | ||||||
|     softfloat_roundingMode=rmm_map[mode&0x7]; |     softfloat_roundingMode = rmm_map[mode & 0x7]; | ||||||
|     softfloat_exceptionFlags=0; |     softfloat_exceptionFlags = 0; | ||||||
|     float32_t r=f32_sqrt(v1f); |     float32_t r = f32_sqrt(v1f); | ||||||
|     return r.v; |     return r.v; | ||||||
| } | } | ||||||
|  |  | ||||||
| uint32_t fcmp_s(uint32_t v1, uint32_t v2, uint32_t op) { | uint32_t fcmp_s(uint32_t v1, uint32_t v2, uint32_t op) { | ||||||
|     float32_t v1f{v1},v2f{v2}; |     float32_t v1f{v1}, v2f{v2}; | ||||||
|     softfloat_exceptionFlags=0; |     softfloat_exceptionFlags = 0; | ||||||
|     bool nan = (v1&defaultNaNF32UI)==quiet_nan32 || (v2&defaultNaNF32UI)==quiet_nan32; |     bool nan = (v1 & defaultNaNF32UI) == quiet_nan32 || (v2 & defaultNaNF32UI) == quiet_nan32; | ||||||
|     bool snan = softfloat_isSigNaNF32UI(v1) || softfloat_isSigNaNF32UI(v2); |     bool snan = softfloat_isSigNaNF32UI(v1) || softfloat_isSigNaNF32UI(v2); | ||||||
|     switch(op){ |     switch(op) { | ||||||
|     case 0: |     case 0: | ||||||
|         if(nan | snan){ |         if(nan | snan) { | ||||||
|             if(snan) softfloat_raiseFlags(softfloat_flag_invalid); |             if(snan) | ||||||
|  |                 softfloat_raiseFlags(softfloat_flag_invalid); | ||||||
|             return 0; |             return 0; | ||||||
|         } else |         } else | ||||||
|             return f32_eq(v1f,v2f )?1:0; |             return f32_eq(v1f, v2f) ? 1 : 0; | ||||||
|     case 1: |     case 1: | ||||||
|         if(nan | snan){ |         if(nan | snan) { | ||||||
|             softfloat_raiseFlags(softfloat_flag_invalid); |             softfloat_raiseFlags(softfloat_flag_invalid); | ||||||
|             return 0; |             return 0; | ||||||
|         } else |         } else | ||||||
|             return f32_le(v1f,v2f )?1:0; |             return f32_le(v1f, v2f) ? 1 : 0; | ||||||
|     case 2: |     case 2: | ||||||
|         if(nan | snan){ |         if(nan | snan) { | ||||||
|             softfloat_raiseFlags(softfloat_flag_invalid); |             softfloat_raiseFlags(softfloat_flag_invalid); | ||||||
|             return 0; |             return 0; | ||||||
|         } else |         } else | ||||||
|             return f32_lt(v1f,v2f )?1:0; |             return f32_lt(v1f, v2f) ? 1 : 0; | ||||||
|     default: |     default: | ||||||
|         break; |         break; | ||||||
|     } |     } | ||||||
| @@ -134,22 +127,22 @@ uint32_t fcmp_s(uint32_t v1, uint32_t v2, uint32_t op) { | |||||||
|  |  | ||||||
| uint32_t fcvt_s(uint32_t v1, uint32_t op, uint8_t mode) { | uint32_t fcvt_s(uint32_t v1, uint32_t op, uint8_t mode) { | ||||||
|     float32_t v1f{v1}; |     float32_t v1f{v1}; | ||||||
|     softfloat_exceptionFlags=0; |     softfloat_exceptionFlags = 0; | ||||||
|     float32_t r; |     float32_t r; | ||||||
|     switch(op){ |     switch(op) { | ||||||
|     case 0:{ //w->s, fp to int32 |     case 0: { // w->s, fp to int32 | ||||||
|         uint_fast32_t res = f32_to_i32(v1f,rmm_map[mode&0x7],true); |         uint_fast32_t res = f32_to_i32(v1f, rmm_map[mode & 0x7], true); | ||||||
|         return (uint32_t)res; |         return (uint32_t)res; | ||||||
|     } |     } | ||||||
|     case 1:{ //wu->s |     case 1: { // wu->s | ||||||
|         uint_fast32_t res = f32_to_ui32(v1f,rmm_map[mode&0x7],true); |         uint_fast32_t res = f32_to_ui32(v1f, rmm_map[mode & 0x7], true); | ||||||
|         return (uint32_t)res; |         return (uint32_t)res; | ||||||
|     } |     } | ||||||
|     case 2: //s->w |     case 2: // s->w | ||||||
|         r=i32_to_f32(v1); |         r = i32_to_f32(v1); | ||||||
|         return r.v; |         return r.v; | ||||||
|     case 3: //s->wu |     case 3: // s->wu | ||||||
|         r=ui32_to_f32(v1); |         r = ui32_to_f32(v1); | ||||||
|         return r.v; |         return r.v; | ||||||
|     } |     } | ||||||
|     return 0; |     return 0; | ||||||
| @@ -157,10 +150,11 @@ uint32_t fcvt_s(uint32_t v1, uint32_t op, uint8_t mode) { | |||||||
|  |  | ||||||
| uint32_t fmadd_s(uint32_t v1, uint32_t v2, uint32_t v3, uint32_t op, uint8_t mode) { | uint32_t fmadd_s(uint32_t v1, uint32_t v2, uint32_t v3, uint32_t op, uint8_t mode) { | ||||||
|     // op should be {softfloat_mulAdd_subProd(2), softfloat_mulAdd_subC(1)} |     // op should be {softfloat_mulAdd_subProd(2), softfloat_mulAdd_subC(1)} | ||||||
|     softfloat_roundingMode=rmm_map[mode&0x7]; |     softfloat_roundingMode = rmm_map[mode & 0x7]; | ||||||
|     softfloat_exceptionFlags=0; |     softfloat_exceptionFlags = 0; | ||||||
|     float32_t res = softfloat_mulAddF32(v1, v2, v3, op&0x1); |     float32_t res = softfloat_mulAddF32(v1, v2, v3, op & 0x1); | ||||||
|     if(op>1) res.v ^= 1ULL<<31; |     if(op > 1) | ||||||
|  |         res.v ^= 1ULL << 31; | ||||||
|     return res.v; |     return res.v; | ||||||
| } | } | ||||||
|  |  | ||||||
| @@ -170,23 +164,23 @@ uint32_t fsel_s(uint32_t v1, uint32_t v2, uint32_t op) { | |||||||
|     bool v2_nan = (v2 & defaultNaNF32UI) == defaultNaNF32UI; |     bool v2_nan = (v2 & defaultNaNF32UI) == defaultNaNF32UI; | ||||||
|     bool v1_snan = softfloat_isSigNaNF32UI(v1); |     bool v1_snan = softfloat_isSigNaNF32UI(v1); | ||||||
|     bool v2_snan = softfloat_isSigNaNF32UI(v2); |     bool v2_snan = softfloat_isSigNaNF32UI(v2); | ||||||
|     if (v1_snan || v2_snan) softfloat_raiseFlags(softfloat_flag_invalid); |     if(v1_snan || v2_snan) | ||||||
|     if (v1_nan || v1_snan) |         softfloat_raiseFlags(softfloat_flag_invalid); | ||||||
|  |     if(v1_nan || v1_snan) | ||||||
|         return (v2_nan || v2_snan) ? defaultNaNF32UI : v2; |         return (v2_nan || v2_snan) ? defaultNaNF32UI : v2; | ||||||
|     else |     else if(v2_nan || v2_snan) | ||||||
|         if (v2_nan || v2_snan) |         return v1; | ||||||
|             return v1; |     else { | ||||||
|         else { |         if((v1 & 0x7fffffff) == 0 && (v2 & 0x7fffffff) == 0) { | ||||||
|             if ((v1 & 0x7fffffff) == 0 && (v2 & 0x7fffffff) == 0) { |             return op == 0 ? ((v1 & 0x80000000) ? v1 : v2) : ((v1 & 0x80000000) ? v2 : v1); | ||||||
|                 return op == 0 ? ((v1 & 0x80000000) ? v1 : v2) : ((v1 & 0x80000000) ? v2 : v1); |         } else { | ||||||
|             } else { |             float32_t v1f{v1}, v2f{v2}; | ||||||
|                 float32_t v1f{ v1 }, v2f{ v2 }; |             return op == 0 ? (f32_lt(v1f, v2f) ? v1 : v2) : (f32_lt(v1f, v2f) ? v2 : v1); | ||||||
|                 return op == 0 ? (f32_lt(v1f, v2f) ? v1 : v2) : (f32_lt(v1f, v2f) ? v2 : v1); |  | ||||||
|             } |  | ||||||
|         } |         } | ||||||
|  |     } | ||||||
| } | } | ||||||
|  |  | ||||||
| uint32_t fclass_s( uint32_t v1 ){ | uint32_t fclass_s(uint32_t v1) { | ||||||
|  |  | ||||||
|     float32_t a{v1}; |     float32_t a{v1}; | ||||||
|     union ui32_f32 uA; |     union ui32_f32 uA; | ||||||
| @@ -195,30 +189,23 @@ uint32_t fclass_s( uint32_t v1 ){ | |||||||
|     uA.f = a; |     uA.f = a; | ||||||
|     uiA = uA.ui; |     uiA = uA.ui; | ||||||
|  |  | ||||||
|     uint_fast16_t infOrNaN = expF32UI( uiA ) == 0xFF; |     uint_fast16_t infOrNaN = expF32UI(uiA) == 0xFF; | ||||||
|     uint_fast16_t subnormalOrZero = expF32UI( uiA ) == 0; |     uint_fast16_t subnormalOrZero = expF32UI(uiA) == 0; | ||||||
|     bool sign = signF32UI( uiA ); |     bool sign = signF32UI(uiA); | ||||||
|     bool fracZero = fracF32UI( uiA ) == 0; |     bool fracZero = fracF32UI(uiA) == 0; | ||||||
|     bool isNaN = isNaNF32UI( uiA ); |     bool isNaN = isNaNF32UI(uiA); | ||||||
|     bool isSNaN = softfloat_isSigNaNF32UI( uiA ); |     bool isSNaN = softfloat_isSigNaNF32UI(uiA); | ||||||
|  |  | ||||||
|     return |     return (sign && infOrNaN && fracZero) << 0 | (sign && !infOrNaN && !subnormalOrZero) << 1 | | ||||||
|         (  sign && infOrNaN && fracZero )          << 0 | |            (sign && subnormalOrZero && !fracZero) << 2 | (sign && subnormalOrZero && fracZero) << 3 | (!sign && infOrNaN && fracZero) << 7 | | ||||||
|         (  sign && !infOrNaN && !subnormalOrZero ) << 1 | |            (!sign && !infOrNaN && !subnormalOrZero) << 6 | (!sign && subnormalOrZero && !fracZero) << 5 | | ||||||
|         (  sign && subnormalOrZero && !fracZero )  << 2 | |            (!sign && subnormalOrZero && fracZero) << 4 | (isNaN && isSNaN) << 8 | (isNaN && !isSNaN) << 9; | ||||||
|         (  sign && subnormalOrZero && fracZero )   << 3 | |  | ||||||
|         ( !sign && infOrNaN && fracZero )          << 7 | |  | ||||||
|         ( !sign && !infOrNaN && !subnormalOrZero ) << 6 | |  | ||||||
|         ( !sign && subnormalOrZero && !fracZero )  << 5 | |  | ||||||
|         ( !sign && subnormalOrZero && fracZero )   << 4 | |  | ||||||
|         ( isNaN &&  isSNaN )                       << 8 | |  | ||||||
|         ( isNaN && !isSNaN )                       << 9; |  | ||||||
| } | } | ||||||
|  |  | ||||||
| uint32_t fconv_d2f(uint64_t v1, uint8_t mode){ | uint32_t fconv_d2f(uint64_t v1, uint8_t mode) { | ||||||
|     softfloat_roundingMode=rmm_map[mode&0x7]; |     softfloat_roundingMode = rmm_map[mode & 0x7]; | ||||||
|     bool nan = (v1 & defaultNaNF64UI)==defaultNaNF64UI; |     bool nan = (v1 & defaultNaNF64UI) == defaultNaNF64UI; | ||||||
|     if(nan){ |     if(nan) { | ||||||
|         return defaultNaNF32UI; |         return defaultNaNF32UI; | ||||||
|     } else { |     } else { | ||||||
|         float32_t res = f64_to_f32(float64_t{v1}); |         float32_t res = f64_to_f32(float64_t{v1}); | ||||||
| @@ -226,83 +213,84 @@ uint32_t fconv_d2f(uint64_t v1, uint8_t mode){ | |||||||
|     } |     } | ||||||
| } | } | ||||||
|  |  | ||||||
| uint64_t fconv_f2d(uint32_t v1, uint8_t mode){ | uint64_t fconv_f2d(uint32_t v1, uint8_t mode) { | ||||||
|     bool nan = (v1 & defaultNaNF32UI)==defaultNaNF32UI; |     bool nan = (v1 & defaultNaNF32UI) == defaultNaNF32UI; | ||||||
|     if(nan){ |     if(nan) { | ||||||
|         return defaultNaNF64UI; |         return defaultNaNF64UI; | ||||||
|     } else { |     } else { | ||||||
|         softfloat_roundingMode=rmm_map[mode&0x7]; |         softfloat_roundingMode = rmm_map[mode & 0x7]; | ||||||
|         float64_t res = f32_to_f64(float32_t{v1}); |         float64_t res = f32_to_f64(float32_t{v1}); | ||||||
|         return res.v; |         return res.v; | ||||||
|     } |     } | ||||||
| } | } | ||||||
|  |  | ||||||
| uint64_t fadd_d(uint64_t v1, uint64_t v2, uint8_t mode) { | uint64_t fadd_d(uint64_t v1, uint64_t v2, uint8_t mode) { | ||||||
|     bool nan = (v1&defaultNaNF32UI)==quiet_nan32; |     bool nan = (v1 & defaultNaNF32UI) == quiet_nan32; | ||||||
|     bool snan = softfloat_isSigNaNF32UI(v1); |     bool snan = softfloat_isSigNaNF32UI(v1); | ||||||
|    float64_t v1f{v1},v2f{v2}; |     float64_t v1f{v1}, v2f{v2}; | ||||||
|     softfloat_roundingMode=rmm_map[mode&0x7]; |     softfloat_roundingMode = rmm_map[mode & 0x7]; | ||||||
|     softfloat_exceptionFlags=0; |     softfloat_exceptionFlags = 0; | ||||||
|     float64_t r =f64_add(v1f, v2f); |     float64_t r = f64_add(v1f, v2f); | ||||||
|     return r.v; |     return r.v; | ||||||
| } | } | ||||||
|  |  | ||||||
| uint64_t fsub_d(uint64_t v1, uint64_t v2, uint8_t mode) { | uint64_t fsub_d(uint64_t v1, uint64_t v2, uint8_t mode) { | ||||||
|     float64_t v1f{v1},v2f{v2}; |     float64_t v1f{v1}, v2f{v2}; | ||||||
|     softfloat_roundingMode=rmm_map[mode&0x7]; |     softfloat_roundingMode = rmm_map[mode & 0x7]; | ||||||
|     softfloat_exceptionFlags=0; |     softfloat_exceptionFlags = 0; | ||||||
|     float64_t r=f64_sub(v1f, v2f); |     float64_t r = f64_sub(v1f, v2f); | ||||||
|     return r.v; |     return r.v; | ||||||
| } | } | ||||||
|  |  | ||||||
| uint64_t fmul_d(uint64_t v1, uint64_t v2, uint8_t mode) { | uint64_t fmul_d(uint64_t v1, uint64_t v2, uint8_t mode) { | ||||||
|     float64_t v1f{v1},v2f{v2}; |     float64_t v1f{v1}, v2f{v2}; | ||||||
|     softfloat_roundingMode=rmm_map[mode&0x7]; |     softfloat_roundingMode = rmm_map[mode & 0x7]; | ||||||
|     softfloat_exceptionFlags=0; |     softfloat_exceptionFlags = 0; | ||||||
|     float64_t r=f64_mul(v1f, v2f); |     float64_t r = f64_mul(v1f, v2f); | ||||||
|     return r.v; |     return r.v; | ||||||
| } | } | ||||||
|  |  | ||||||
| uint64_t fdiv_d(uint64_t v1, uint64_t v2, uint8_t mode) { | uint64_t fdiv_d(uint64_t v1, uint64_t v2, uint8_t mode) { | ||||||
|     float64_t v1f{v1},v2f{v2}; |     float64_t v1f{v1}, v2f{v2}; | ||||||
|     softfloat_roundingMode=rmm_map[mode&0x7]; |     softfloat_roundingMode = rmm_map[mode & 0x7]; | ||||||
|     softfloat_exceptionFlags=0; |     softfloat_exceptionFlags = 0; | ||||||
|     float64_t r=f64_div(v1f, v2f); |     float64_t r = f64_div(v1f, v2f); | ||||||
|     return r.v; |     return r.v; | ||||||
| } | } | ||||||
|  |  | ||||||
| uint64_t fsqrt_d(uint64_t v1, uint8_t mode) { | uint64_t fsqrt_d(uint64_t v1, uint8_t mode) { | ||||||
|     float64_t v1f{v1}; |     float64_t v1f{v1}; | ||||||
|     softfloat_roundingMode=rmm_map[mode&0x7]; |     softfloat_roundingMode = rmm_map[mode & 0x7]; | ||||||
|     softfloat_exceptionFlags=0; |     softfloat_exceptionFlags = 0; | ||||||
|     float64_t r=f64_sqrt(v1f); |     float64_t r = f64_sqrt(v1f); | ||||||
|     return r.v; |     return r.v; | ||||||
| } | } | ||||||
|  |  | ||||||
| uint64_t fcmp_d(uint64_t v1, uint64_t v2, uint32_t op) { | uint64_t fcmp_d(uint64_t v1, uint64_t v2, uint32_t op) { | ||||||
|     float64_t v1f{v1},v2f{v2}; |     float64_t v1f{v1}, v2f{v2}; | ||||||
|     softfloat_exceptionFlags=0; |     softfloat_exceptionFlags = 0; | ||||||
|     bool nan = (v1&defaultNaNF64UI)==quiet_nan32 || (v2&defaultNaNF64UI)==quiet_nan32; |     bool nan = (v1 & defaultNaNF64UI) == quiet_nan32 || (v2 & defaultNaNF64UI) == quiet_nan32; | ||||||
|     bool snan = softfloat_isSigNaNF64UI(v1) || softfloat_isSigNaNF64UI(v2); |     bool snan = softfloat_isSigNaNF64UI(v1) || softfloat_isSigNaNF64UI(v2); | ||||||
|     switch(op){ |     switch(op) { | ||||||
|     case 0: |     case 0: | ||||||
|         if(nan | snan){ |         if(nan | snan) { | ||||||
|             if(snan) softfloat_raiseFlags(softfloat_flag_invalid); |             if(snan) | ||||||
|  |                 softfloat_raiseFlags(softfloat_flag_invalid); | ||||||
|             return 0; |             return 0; | ||||||
|         } else |         } else | ||||||
|             return f64_eq(v1f,v2f )?1:0; |             return f64_eq(v1f, v2f) ? 1 : 0; | ||||||
|     case 1: |     case 1: | ||||||
|         if(nan | snan){ |         if(nan | snan) { | ||||||
|             softfloat_raiseFlags(softfloat_flag_invalid); |             softfloat_raiseFlags(softfloat_flag_invalid); | ||||||
|             return 0; |             return 0; | ||||||
|         } else |         } else | ||||||
|             return f64_le(v1f,v2f )?1:0; |             return f64_le(v1f, v2f) ? 1 : 0; | ||||||
|     case 2: |     case 2: | ||||||
|         if(nan | snan){ |         if(nan | snan) { | ||||||
|             softfloat_raiseFlags(softfloat_flag_invalid); |             softfloat_raiseFlags(softfloat_flag_invalid); | ||||||
|             return 0; |             return 0; | ||||||
|         } else |         } else | ||||||
|             return f64_lt(v1f,v2f )?1:0; |             return f64_lt(v1f, v2f) ? 1 : 0; | ||||||
|     default: |     default: | ||||||
|         break; |         break; | ||||||
|     } |     } | ||||||
| @@ -311,22 +299,22 @@ uint64_t fcmp_d(uint64_t v1, uint64_t v2, uint32_t op) { | |||||||
|  |  | ||||||
| uint64_t fcvt_d(uint64_t v1, uint32_t op, uint8_t mode) { | uint64_t fcvt_d(uint64_t v1, uint32_t op, uint8_t mode) { | ||||||
|     float64_t v1f{v1}; |     float64_t v1f{v1}; | ||||||
|     softfloat_exceptionFlags=0; |     softfloat_exceptionFlags = 0; | ||||||
|     float64_t r; |     float64_t r; | ||||||
|     switch(op){ |     switch(op) { | ||||||
|     case 0:{ //l->d, fp to int32 |     case 0: { // l->d, fp to int32 | ||||||
|         int64_t res = f64_to_i64(v1f,rmm_map[mode&0x7],true); |         int64_t res = f64_to_i64(v1f, rmm_map[mode & 0x7], true); | ||||||
|         return (uint64_t)res; |         return (uint64_t)res; | ||||||
|     } |     } | ||||||
|     case 1:{ //lu->s |     case 1: { // lu->s | ||||||
|         uint64_t res = f64_to_ui64(v1f,rmm_map[mode&0x7],true); |         uint64_t res = f64_to_ui64(v1f, rmm_map[mode & 0x7], true); | ||||||
|         return res; |         return res; | ||||||
|     } |     } | ||||||
|     case 2: //s->l |     case 2: // s->l | ||||||
|         r=i64_to_f64(v1); |         r = i64_to_f64(v1); | ||||||
|         return r.v; |         return r.v; | ||||||
|     case 3: //s->lu |     case 3: // s->lu | ||||||
|         r=ui64_to_f64(v1); |         r = ui64_to_f64(v1); | ||||||
|         return r.v; |         return r.v; | ||||||
|     } |     } | ||||||
|     return 0; |     return 0; | ||||||
| @@ -334,10 +322,11 @@ uint64_t fcvt_d(uint64_t v1, uint32_t op, uint8_t mode) { | |||||||
|  |  | ||||||
| uint64_t fmadd_d(uint64_t v1, uint64_t v2, uint64_t v3, uint32_t op, uint8_t mode) { | uint64_t fmadd_d(uint64_t v1, uint64_t v2, uint64_t v3, uint32_t op, uint8_t mode) { | ||||||
|     // op should be {softfloat_mulAdd_subProd(2), softfloat_mulAdd_subC(1)} |     // op should be {softfloat_mulAdd_subProd(2), softfloat_mulAdd_subC(1)} | ||||||
|     softfloat_roundingMode=rmm_map[mode&0x7]; |     softfloat_roundingMode = rmm_map[mode & 0x7]; | ||||||
|     softfloat_exceptionFlags=0; |     softfloat_exceptionFlags = 0; | ||||||
|     float64_t res = softfloat_mulAddF64(v1, v2, v3, op&0x1); |     float64_t res = softfloat_mulAddF64(v1, v2, v3, op & 0x1); | ||||||
|     if(op>1) res.v ^= 1ULL<<63; |     if(op > 1) | ||||||
|  |         res.v ^= 1ULL << 63; | ||||||
|     return res.v; |     return res.v; | ||||||
| } | } | ||||||
|  |  | ||||||
| @@ -347,27 +336,24 @@ uint64_t fsel_d(uint64_t v1, uint64_t v2, uint32_t op) { | |||||||
|     bool v2_nan = (v2 & defaultNaNF64UI) == defaultNaNF64UI; |     bool v2_nan = (v2 & defaultNaNF64UI) == defaultNaNF64UI; | ||||||
|     bool v1_snan = softfloat_isSigNaNF64UI(v1); |     bool v1_snan = softfloat_isSigNaNF64UI(v1); | ||||||
|     bool v2_snan = softfloat_isSigNaNF64UI(v2); |     bool v2_snan = softfloat_isSigNaNF64UI(v2); | ||||||
|     if (v1_snan || v2_snan) softfloat_raiseFlags(softfloat_flag_invalid); |     if(v1_snan || v2_snan) | ||||||
|     if (v1_nan || v1_snan) |         softfloat_raiseFlags(softfloat_flag_invalid); | ||||||
|  |     if(v1_nan || v1_snan) | ||||||
|         return (v2_nan || v2_snan) ? defaultNaNF64UI : v2; |         return (v2_nan || v2_snan) ? defaultNaNF64UI : v2; | ||||||
|     else |     else if(v2_nan || v2_snan) | ||||||
|         if (v2_nan || v2_snan) |         return v1; | ||||||
|             return v1; |     else { | ||||||
|         else { |         if((v1 & std::numeric_limits<int64_t>::max()) == 0 && (v2 & std::numeric_limits<int64_t>::max()) == 0) { | ||||||
|             if ((v1 & std::numeric_limits<int64_t>::max()) == 0 && (v2 & std::numeric_limits<int64_t>::max()) == 0) { |             return op == 0 ? ((v1 & std::numeric_limits<int64_t>::min()) ? v1 : v2) | ||||||
|                 return op == 0 ? |                            : ((v1 & std::numeric_limits<int64_t>::min()) ? v2 : v1); | ||||||
|                         ((v1 & std::numeric_limits<int64_t>::min()) ? v1 : v2) : |         } else { | ||||||
|                         ((v1 & std::numeric_limits<int64_t>::min()) ? v2 : v1); |             float64_t v1f{v1}, v2f{v2}; | ||||||
|             } else { |             return op == 0 ? (f64_lt(v1f, v2f) ? v1 : v2) : (f64_lt(v1f, v2f) ? v2 : v1); | ||||||
|                 float64_t v1f{ v1 }, v2f{ v2 }; |  | ||||||
|                 return op == 0 ? |  | ||||||
|                         (f64_lt(v1f, v2f) ? v1 : v2) : |  | ||||||
|                         (f64_lt(v1f, v2f) ? v2 : v1); |  | ||||||
|             } |  | ||||||
|         } |         } | ||||||
|  |     } | ||||||
| } | } | ||||||
|  |  | ||||||
| uint64_t fclass_d(uint64_t v1  ){ | uint64_t fclass_d(uint64_t v1) { | ||||||
|  |  | ||||||
|     float64_t a{v1}; |     float64_t a{v1}; | ||||||
|     union ui64_f64 uA; |     union ui64_f64 uA; | ||||||
| @@ -376,68 +362,61 @@ uint64_t fclass_d(uint64_t v1  ){ | |||||||
|     uA.f = a; |     uA.f = a; | ||||||
|     uiA = uA.ui; |     uiA = uA.ui; | ||||||
|  |  | ||||||
|     uint_fast16_t infOrNaN = expF64UI( uiA ) == 0x7FF; |     uint_fast16_t infOrNaN = expF64UI(uiA) == 0x7FF; | ||||||
|     uint_fast16_t subnormalOrZero = expF64UI( uiA ) == 0; |     uint_fast16_t subnormalOrZero = expF64UI(uiA) == 0; | ||||||
|     bool sign = signF64UI( uiA ); |     bool sign = signF64UI(uiA); | ||||||
|     bool fracZero = fracF64UI( uiA ) == 0; |     bool fracZero = fracF64UI(uiA) == 0; | ||||||
|     bool isNaN = isNaNF64UI( uiA ); |     bool isNaN = isNaNF64UI(uiA); | ||||||
|     bool isSNaN = softfloat_isSigNaNF64UI( uiA ); |     bool isSNaN = softfloat_isSigNaNF64UI(uiA); | ||||||
|  |  | ||||||
|     return |     return (sign && infOrNaN && fracZero) << 0 | (sign && !infOrNaN && !subnormalOrZero) << 1 | | ||||||
|         (  sign && infOrNaN && fracZero )          << 0 | |            (sign && subnormalOrZero && !fracZero) << 2 | (sign && subnormalOrZero && fracZero) << 3 | (!sign && infOrNaN && fracZero) << 7 | | ||||||
|         (  sign && !infOrNaN && !subnormalOrZero ) << 1 | |            (!sign && !infOrNaN && !subnormalOrZero) << 6 | (!sign && subnormalOrZero && !fracZero) << 5 | | ||||||
|         (  sign && subnormalOrZero && !fracZero )  << 2 | |            (!sign && subnormalOrZero && fracZero) << 4 | (isNaN && isSNaN) << 8 | (isNaN && !isSNaN) << 9; | ||||||
|         (  sign && subnormalOrZero && fracZero )   << 3 | |  | ||||||
|         ( !sign && infOrNaN && fracZero )          << 7 | |  | ||||||
|         ( !sign && !infOrNaN && !subnormalOrZero ) << 6 | |  | ||||||
|         ( !sign && subnormalOrZero && !fracZero )  << 5 | |  | ||||||
|         ( !sign && subnormalOrZero && fracZero )   << 4 | |  | ||||||
|         ( isNaN &&  isSNaN )                       << 8 | |  | ||||||
|         ( isNaN && !isSNaN )                       << 9; |  | ||||||
| } | } | ||||||
|  |  | ||||||
| uint64_t fcvt_32_64(uint32_t v1, uint32_t op, uint8_t mode) { | uint64_t fcvt_32_64(uint32_t v1, uint32_t op, uint8_t mode) { | ||||||
|     float32_t v1f{v1}; |     float32_t v1f{v1}; | ||||||
|     softfloat_exceptionFlags=0; |     softfloat_exceptionFlags = 0; | ||||||
|     float64_t r; |     float64_t r; | ||||||
|     switch(op){ |     switch(op) { | ||||||
|     case 0: //l->s, fp to int32 |     case 0: // l->s, fp to int32 | ||||||
|         return f32_to_i64(v1f,rmm_map[mode&0x7],true); |         return f32_to_i64(v1f, rmm_map[mode & 0x7], true); | ||||||
|     case 1: //wu->s |     case 1: // wu->s | ||||||
|         return f32_to_ui64(v1f,rmm_map[mode&0x7],true); |         return f32_to_ui64(v1f, rmm_map[mode & 0x7], true); | ||||||
|     case 2: //s->w |     case 2: // s->w | ||||||
|         r=i32_to_f64(v1); |         r = i32_to_f64(v1); | ||||||
|         return r.v; |         return r.v; | ||||||
|     case 3: //s->wu |     case 3: // s->wu | ||||||
|         r=ui32_to_f64(v1); |         r = ui32_to_f64(v1); | ||||||
|         return r.v; |         return r.v; | ||||||
|     } |     } | ||||||
|     return 0; |     return 0; | ||||||
| } | } | ||||||
|  |  | ||||||
| uint32_t fcvt_64_32(uint64_t v1, uint32_t op, uint8_t mode) { | uint32_t fcvt_64_32(uint64_t v1, uint32_t op, uint8_t mode) { | ||||||
|     softfloat_exceptionFlags=0; |     softfloat_exceptionFlags = 0; | ||||||
|     float32_t r; |     float32_t r; | ||||||
|     switch(op){ |     switch(op) { | ||||||
|     case 0:{ //wu->s |     case 0: { // wu->s | ||||||
|         int32_t r=f64_to_i32(float64_t{v1}, rmm_map[mode&0x7],true); |         int32_t r = f64_to_i32(float64_t{v1}, rmm_map[mode & 0x7], true); | ||||||
|         return r; |         return r; | ||||||
|     } |     } | ||||||
|     case 1:{ //wu->s |     case 1: { // wu->s | ||||||
|         uint32_t r=f64_to_ui32(float64_t{v1}, rmm_map[mode&0x7],true); |         uint32_t r = f64_to_ui32(float64_t{v1}, rmm_map[mode & 0x7], true); | ||||||
|         return r; |         return r; | ||||||
|     } |     } | ||||||
|     case 2: //l->s, fp to int32 |     case 2: // l->s, fp to int32 | ||||||
|         r=i64_to_f32(v1); |         r = i64_to_f32(v1); | ||||||
|         return r.v; |         return r.v; | ||||||
|     case 3: //wu->s |     case 3: // wu->s | ||||||
|         r=ui64_to_f32(v1); |         r = ui64_to_f32(v1); | ||||||
|         return r.v; |         return r.v; | ||||||
|     } |     } | ||||||
|     return 0; |     return 0; | ||||||
| } | } | ||||||
|  |  | ||||||
| uint32_t unbox_s(uint64_t v){ | uint32_t unbox_s(uint64_t v) { | ||||||
|     constexpr uint64_t mask = std::numeric_limits<uint64_t>::max() & ~((uint64_t)std::numeric_limits<uint32_t>::max()); |     constexpr uint64_t mask = std::numeric_limits<uint64_t>::max() & ~((uint64_t)std::numeric_limits<uint32_t>::max()); | ||||||
|     if((v & mask) != mask) |     if((v & mask) != mask) | ||||||
|         return 0x7fc00000; |         return 0x7fc00000; | ||||||
| @@ -445,4 +424,3 @@ uint32_t unbox_s(uint64_t v){ | |||||||
|         return v & std::numeric_limits<uint32_t>::max(); |         return v & std::numeric_limits<uint32_t>::max(); | ||||||
| } | } | ||||||
| } | } | ||||||
|  |  | ||||||
|   | |||||||
| @@ -44,11 +44,11 @@ uint32_t fsub_s(uint32_t v1, uint32_t v2, uint8_t mode); | |||||||
| uint32_t fmul_s(uint32_t v1, uint32_t v2, uint8_t mode); | uint32_t fmul_s(uint32_t v1, uint32_t v2, uint8_t mode); | ||||||
| uint32_t fdiv_s(uint32_t v1, uint32_t v2, uint8_t mode); | uint32_t fdiv_s(uint32_t v1, uint32_t v2, uint8_t mode); | ||||||
| uint32_t fsqrt_s(uint32_t v1, uint8_t mode); | uint32_t fsqrt_s(uint32_t v1, uint8_t mode); | ||||||
| uint32_t fcmp_s(uint32_t v1, uint32_t v2, uint32_t op) ; | uint32_t fcmp_s(uint32_t v1, uint32_t v2, uint32_t op); | ||||||
| uint32_t fcvt_s(uint32_t v1, uint32_t op, uint8_t mode); | uint32_t fcvt_s(uint32_t v1, uint32_t op, uint8_t mode); | ||||||
| uint32_t fmadd_s(uint32_t v1, uint32_t v2, uint32_t v3, uint32_t op, uint8_t mode); | uint32_t fmadd_s(uint32_t v1, uint32_t v2, uint32_t v3, uint32_t op, uint8_t mode); | ||||||
| uint32_t fsel_s(uint32_t v1, uint32_t v2, uint32_t op); | uint32_t fsel_s(uint32_t v1, uint32_t v2, uint32_t op); | ||||||
| uint32_t fclass_s( uint32_t v1 ); | uint32_t fclass_s(uint32_t v1); | ||||||
| uint32_t fconv_d2f(uint64_t v1, uint8_t mode); | uint32_t fconv_d2f(uint64_t v1, uint8_t mode); | ||||||
| uint64_t fconv_f2d(uint32_t v1, uint8_t mode); | uint64_t fconv_f2d(uint32_t v1, uint8_t mode); | ||||||
| uint64_t fadd_d(uint64_t v1, uint64_t v2, uint8_t mode); | uint64_t fadd_d(uint64_t v1, uint64_t v2, uint8_t mode); | ||||||
| @@ -59,8 +59,8 @@ uint64_t fsqrt_d(uint64_t v1, uint8_t mode); | |||||||
| uint64_t fcmp_d(uint64_t v1, uint64_t v2, uint32_t op); | uint64_t fcmp_d(uint64_t v1, uint64_t v2, uint32_t op); | ||||||
| uint64_t fcvt_d(uint64_t v1, uint32_t op, uint8_t mode); | uint64_t fcvt_d(uint64_t v1, uint32_t op, uint8_t mode); | ||||||
| uint64_t fmadd_d(uint64_t v1, uint64_t v2, uint64_t v3, uint32_t op, uint8_t mode); | uint64_t fmadd_d(uint64_t v1, uint64_t v2, uint64_t v3, uint32_t op, uint8_t mode); | ||||||
| uint64_t fsel_d(uint64_t v1, uint64_t v2, uint32_t op) ; | uint64_t fsel_d(uint64_t v1, uint64_t v2, uint32_t op); | ||||||
| uint64_t fclass_d(uint64_t v1  ); | uint64_t fclass_d(uint64_t v1); | ||||||
| uint64_t fcvt_32_64(uint32_t v1, uint32_t op, uint8_t mode); | uint64_t fcvt_32_64(uint32_t v1, uint32_t op, uint8_t mode); | ||||||
| uint32_t fcvt_64_32(uint64_t v1, uint32_t op, uint8_t mode); | uint32_t fcvt_64_32(uint64_t v1, uint32_t op, uint8_t mode); | ||||||
| uint32_t unbox_s(uint64_t v); | uint32_t unbox_s(uint64_t v); | ||||||
|   | |||||||
							
								
								
									
										2634
									
								
								src/vm/interp/vm_tgc5c.cpp
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										2634
									
								
								src/vm/interp/vm_tgc5c.cpp
									
									
									
									
									
										Normal file
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							| @@ -36,9 +36,9 @@ | |||||||
| #include <iss/llvm/vm_base.h> | #include <iss/llvm/vm_base.h> | ||||||
|  |  | ||||||
| extern "C" { | extern "C" { | ||||||
| #include <softfloat.h> |  | ||||||
| #include "internals.h" | #include "internals.h" | ||||||
| #include "specialize.h" | #include "specialize.h" | ||||||
|  | #include <softfloat.h> | ||||||
| } | } | ||||||
|  |  | ||||||
| #include <limits> | #include <limits> | ||||||
| @@ -50,60 +50,58 @@ namespace fp_impl { | |||||||
| using namespace std; | using namespace std; | ||||||
| using namespace ::llvm; | using namespace ::llvm; | ||||||
|  |  | ||||||
| #define INT_TYPE(L)   Type::getIntNTy(mod->getContext(), L) | #define INT_TYPE(L) Type::getIntNTy(mod->getContext(), L) | ||||||
| #define FLOAT_TYPE    Type::getFloatTy(mod->getContext()) | #define FLOAT_TYPE Type::getFloatTy(mod->getContext()) | ||||||
| #define DOUBLE_TYPE   Type::getDoubleTy(mod->getContext()) | #define DOUBLE_TYPE Type::getDoubleTy(mod->getContext()) | ||||||
| #define VOID_TYPE     Type::getVoidTy(mod->getContext()) | #define VOID_TYPE Type::getVoidTy(mod->getContext()) | ||||||
| #define THIS_PTR_TYPE Type::getIntNPtrTy(mod->getContext(), 8) | #define THIS_PTR_TYPE Type::getIntNPtrTy(mod->getContext(), 8) | ||||||
| #define FDECLL(NAME, RET, ...)                                                                                         \ | #define FDECLL(NAME, RET, ...)                                                                                                             \ | ||||||
|     Function *NAME##_func = CurrentModule->getFunction(#NAME);                                                         \ |     Function* NAME##_func = CurrentModule->getFunction(#NAME);                                                                             \ | ||||||
|     if (!NAME##_func) {                                                                                                \ |     if(!NAME##_func) {                                                                                                                     \ | ||||||
|         std::vector<Type *> NAME##_args{__VA_ARGS__};                                                                  \ |         std::vector<Type*> NAME##_args{__VA_ARGS__};                                                                                       \ | ||||||
|         FunctionType *NAME##_type = FunctionType::get(RET, NAME##_args, false);                                        \ |         FunctionType* NAME##_type = FunctionType::get(RET, NAME##_args, false);                                                            \ | ||||||
|         NAME##_func = Function::Create(NAME##_type, GlobalValue::ExternalLinkage, #NAME, CurrentModule);               \ |         NAME##_func = Function::Create(NAME##_type, GlobalValue::ExternalLinkage, #NAME, CurrentModule);                                   \ | ||||||
|         NAME##_func->setCallingConv(CallingConv::C);                                                                   \ |         NAME##_func->setCallingConv(CallingConv::C);                                                                                       \ | ||||||
|     } |     } | ||||||
|  |  | ||||||
| #define FDECL(NAME, RET, ...)                                                                                          \ | #define FDECL(NAME, RET, ...)                                                                                                              \ | ||||||
|     std::vector<Type *> NAME##_args{__VA_ARGS__};                                                                      \ |     std::vector<Type*> NAME##_args{__VA_ARGS__};                                                                                           \ | ||||||
|     FunctionType *NAME##_type = FunctionType::get(RET, NAME##_args, false);                                      \ |     FunctionType* NAME##_type = FunctionType::get(RET, NAME##_args, false);                                                                \ | ||||||
|     mod->getOrInsertFunction(#NAME, NAME##_type); |     mod->getOrInsertFunction(#NAME, NAME##_type); | ||||||
|  |  | ||||||
|  | void add_fp_functions_2_module(Module* mod, uint32_t flen, uint32_t xlen) { | ||||||
| void add_fp_functions_2_module(Module *mod, uint32_t flen, uint32_t xlen) { |     if(flen) { | ||||||
|     if(flen){ |  | ||||||
|         FDECL(fget_flags, INT_TYPE(32)); |         FDECL(fget_flags, INT_TYPE(32)); | ||||||
|         FDECL(fadd_s,     INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); |         FDECL(fadd_s, INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); | ||||||
|         FDECL(fsub_s,     INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); |         FDECL(fsub_s, INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); | ||||||
|         FDECL(fmul_s,     INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); |         FDECL(fmul_s, INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); | ||||||
|         FDECL(fdiv_s,     INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); |         FDECL(fdiv_s, INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); | ||||||
|         FDECL(fsqrt_s,    INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); |         FDECL(fsqrt_s, INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); | ||||||
|         FDECL(fcmp_s,     INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(32)); |         FDECL(fcmp_s, INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(32)); | ||||||
|         FDECL(fcvt_s,     INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); |         FDECL(fcvt_s, INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); | ||||||
|         FDECL(fmadd_s,    INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); |         FDECL(fmadd_s, INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); | ||||||
|         FDECL(fsel_s,     INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(32)); |         FDECL(fsel_s, INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(32)); | ||||||
|         FDECL(fclass_s,   INT_TYPE(32), INT_TYPE(32)); |         FDECL(fclass_s, INT_TYPE(32), INT_TYPE(32)); | ||||||
|         FDECL(fcvt_32_64,     INT_TYPE(64), INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); |         FDECL(fcvt_32_64, INT_TYPE(64), INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); | ||||||
|         FDECL(fcvt_64_32,     INT_TYPE(32), INT_TYPE(64), INT_TYPE(32), INT_TYPE(8)); |         FDECL(fcvt_64_32, INT_TYPE(32), INT_TYPE(64), INT_TYPE(32), INT_TYPE(8)); | ||||||
|         if(flen>32){ |         if(flen > 32) { | ||||||
|             FDECL(fconv_d2f,  INT_TYPE(32), INT_TYPE(64), INT_TYPE(8)); |             FDECL(fconv_d2f, INT_TYPE(32), INT_TYPE(64), INT_TYPE(8)); | ||||||
|             FDECL(fconv_f2d,  INT_TYPE(64), INT_TYPE(32), INT_TYPE(8)); |             FDECL(fconv_f2d, INT_TYPE(64), INT_TYPE(32), INT_TYPE(8)); | ||||||
|             FDECL(fadd_d,     INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(8)); |             FDECL(fadd_d, INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(8)); | ||||||
|             FDECL(fsub_d,     INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(8)); |             FDECL(fsub_d, INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(8)); | ||||||
|             FDECL(fmul_d,     INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(8)); |             FDECL(fmul_d, INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(8)); | ||||||
|             FDECL(fdiv_d,     INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(8)); |             FDECL(fdiv_d, INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(8)); | ||||||
|             FDECL(fsqrt_d,    INT_TYPE(64), INT_TYPE(64), INT_TYPE(8)); |             FDECL(fsqrt_d, INT_TYPE(64), INT_TYPE(64), INT_TYPE(8)); | ||||||
|             FDECL(fcmp_d,     INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(32)); |             FDECL(fcmp_d, INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(32)); | ||||||
|             FDECL(fcvt_d,     INT_TYPE(64), INT_TYPE(64), INT_TYPE(32), INT_TYPE(8)); |             FDECL(fcvt_d, INT_TYPE(64), INT_TYPE(64), INT_TYPE(32), INT_TYPE(8)); | ||||||
|             FDECL(fmadd_d,    INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(32), INT_TYPE(8)); |             FDECL(fmadd_d, INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(32), INT_TYPE(8)); | ||||||
|             FDECL(fsel_d,     INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(32)); |             FDECL(fsel_d, INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(32)); | ||||||
|             FDECL(fclass_d,   INT_TYPE(64), INT_TYPE(64)); |             FDECL(fclass_d, INT_TYPE(64), INT_TYPE(64)); | ||||||
|             FDECL(unbox_s,      INT_TYPE(32), INT_TYPE(64)); |             FDECL(unbox_s, INT_TYPE(32), INT_TYPE(64)); | ||||||
|  |  | ||||||
|         } |         } | ||||||
|     } |     } | ||||||
| } | } | ||||||
|  |  | ||||||
| } | } // namespace fp_impl | ||||||
| } | } // namespace llvm | ||||||
| } | } // namespace iss | ||||||
|   | |||||||
							
								
								
									
										4107
									
								
								src/vm/llvm/vm_tgc5c.cpp
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										4107
									
								
								src/vm/llvm/vm_tgc5c.cpp
									
									
									
									
									
										Normal file
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							
							
								
								
									
										3370
									
								
								src/vm/tcc/vm_tgc5c.cpp
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										3370
									
								
								src/vm/tcc/vm_tgc5c.cpp
									
									
									
									
									
										Normal file
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							
		Reference in New Issue
	
	Block a user