13807399403

Committed 12 Mar 2025 08:58AM UTC coverage: 66.731% (+0.2%) from 66.508%

Build # 13807399403

Build Type

Pull #145

github

Committed by

web-flow

Commit Message

Merge 41a250ee3 into 2c2d8c5e1

Pull Request Pull Request #145: Code addition merge rerquest project metric

Run Details

6833 of 8097 new or added lines in 90 files covered. (84.39%)

1 existing line in 1 file now uncovered.

11746 of 17602 relevant lines covered (66.73%)

0.67 hits per line

Source File
Press 'n' to go to next uncovered line, 'b' for previous

0.0

/src/GitLabHealth-Model-Analysis/DelayUntilFirstChurnMetric.class.st

Class {
        #name : #DelayUntilFirstChurnMetric,
        #superclass : #UserCommitsMetric,
        #instVars : [
                'maxCommitWindow'
        ],
        #category : #'GitLabHealth-Model-Analysis'
}

{ #category : #calculating }
DelayUntilFirstChurnMetric >> calculate [

        | commits groupedByDate res average |
        userCommits ifNil: [ self load ].
        groupedByDate := self setupGroupedDate.
        commits := self
                           foundSuccessorOf: userCommits
                           andCompleteImportForMax: maxCommitWindow.


        "class commit by dates, filter none user commits"
        commits do: [ :commit |
                commit commitCreator = user ifTrue: [
                        | overDate |
                        overDate := self transformDate: commit created_at to: over.

                        groupedByDate
                                at: overDate printString
                                ifPresent: [ :arrayOfCommits | arrayOfCommits add: commit ]
 ] ].



        res := groupedByDate collect: [ :commits4Date |
                       | durationFromA2B |
                       commits4Date collect: [ :commitA |
                               | commitB |
                               commitB := GitAnalyzer new
                                                  fromCommit: commitA;
                                                  maxChildCommit: maxCommitWindow;
                                                  analyseDelayUntilFirstChurn.

                               durationFromA2B := commitB
                                                          ifNil: [ 0 ]
                                                          ifNotNil: [
                                                          commitB created_at - commitA created_at ].
                               durationFromA2B ] ].



        res := res collect: [ :durationsByDate |
                       | filtered |
                       filtered := durationsByDate reject: [ :value | value = 0 ].
                       filtered isEmpty
                               ifTrue: [ nil ]
                               ifFalse: [
                               (filtered sum: [ :v | v asDuration asSeconds ])
                               / filtered size ] ].

        res := res reject: #isNil.

        average := res
                           ifEmpty: [ nil ]
                           ifNotEmpty: [ res values average asFloat ].

        ^ average
]

{ #category : #accessing }
DelayUntilFirstChurnMetric >> description [

        ^ 'delay Until First Churn (W=' , maxCommitWindow printString
                           , ')'
]

{ #category : #initialization }
DelayUntilFirstChurnMetric >> initialize [
        super initialize.
        maxCommitWindow := 3
]

1	Class {
2	#name : #DelayUntilFirstChurnMetric,
3	#superclass : #UserCommitsMetric,
4	#instVars : [
5	'maxCommitWindow'
6	],
7	#category : #'GitLabHealth-Model-Analysis'
8	}
9
10	{ #category : #calculating }
NEW 11	DelayUntilFirstChurnMetric >> calculate [	×
NEW 12		×
NEW 13	\| commits groupedByDate res average \|	×
NEW 14	userCommits ifNil: [ self load ].	×
NEW 15	groupedByDate := self setupGroupedDate.	×
NEW 16	commits := self	×
NEW 17	foundSuccessorOf: userCommits	×
NEW 18	andCompleteImportForMax: maxCommitWindow.	×
NEW 19		×
NEW 20		×
NEW 21	"class commit by dates, filter none user commits"	×
NEW 22	commits do: [ :commit \|	×
NEW 23	commit commitCreator = user ifTrue: [	×
NEW 24	\| overDate \|	×
NEW 25	overDate := self transformDate: commit created_at to: over.	×
NEW 26		×
NEW 27	groupedByDate	×
NEW 28	at: overDate printString	×
NEW 29	ifPresent: [ :arrayOfCommits \| arrayOfCommits add: commit ]	×
NEW 30	] ].	×
NEW 31		×
NEW 32		×
NEW 33		×
NEW 34	res := groupedByDate collect: [ :commits4Date \|	×
NEW 35	\| durationFromA2B \|	×
NEW 36	commits4Date collect: [ :commitA \|	×
NEW 37	\| commitB \|	×
NEW 38	commitB := GitAnalyzer new	×
NEW 39	fromCommit: commitA;	×
NEW 40	maxChildCommit: maxCommitWindow;	×
NEW 41	analyseDelayUntilFirstChurn.	×
NEW 42		×
NEW 43	durationFromA2B := commitB	×
NEW 44	ifNil: [ 0 ]	×
NEW 45	ifNotNil: [	×
NEW 46	commitB created_at - commitA created_at ].	×
NEW 47	durationFromA2B ] ].	×
NEW 48		×
NEW 49		×
NEW 50		×
NEW 51	res := res collect: [ :durationsByDate \|	×
NEW 52	\| filtered \|	×
NEW 53	filtered := durationsByDate reject: [ :value \| value = 0 ].	×
NEW 54	filtered isEmpty	×
NEW 55	ifTrue: [ nil ]	×
NEW 56	ifFalse: [	×
NEW 57	(filtered sum: [ :v \| v asDuration asSeconds ])	×
NEW 58	/ filtered size ] ].	×
NEW 59		×
NEW 60	res := res reject: #isNil.	×
NEW 61		×
NEW 62	average := res	×
NEW 63	ifEmpty: [ nil ]	×
NEW 64	ifNotEmpty: [ res values average asFloat ].	×
NEW 65		×
NEW 66	^ average	×
NEW 67	]	×
68
69	{ #category : #accessing }
NEW 70	DelayUntilFirstChurnMetric >> description [	×
NEW 71		×
NEW 72	^ 'delay Until First Churn (W=' , maxCommitWindow printString	×
NEW 73	, ')'	×
NEW 74	]	×
75
76	{ #category : #initialization }
NEW 77	DelayUntilFirstChurnMetric >> initialize [	×
NEW 78	super initialize.	×
NEW 79	maxCommitWindow := 3	×
NEW 80	]	×

moosetechnology / GitProjectHealth / 13807399403

Source File Press 'n' to go to next uncovered line, 'b' for previous

Source File
Press 'n' to go to next uncovered line, 'b' for previous