Skip to Content

modeling.emfcompare

About this document

This document is a R notebook, dynamically created from the numbers extracted on the project. It lists all datasets published for the project, providing basic numbers, figures and a quick summary, and serves as a test case to make sure that all the required data is present and roughly consistent with requirements. All plots and tables are computed from the actual data as provided in the downloads.

To re-execute the document, simply start a R session, load rmarkdown and render the page with the project ID as a parameter:

require('rmarkdown')
render("datasets_report.Rmarkdown", params = list(project_id = "modeling.emfcompare"), output_format="html_document")

This website uses the blogdown R package, which provides a different output_format for the hugo framework.

This report was generated on 2022-08-14.

Downloads

All data is retrieved from Alambic, an open-source framework for development data extraction and processing.

This project’s analysis page can be found on the Alambic instance for the Eclipse forge, at https://eclipse.alambic.io/projects/modeling.emfcompare.

Downloads are composed of gzip’d CSV and JSON files. CSV files always have a header to name the fields, which makes it easy to import in analysis software like R:

data <- read.csv(file='myfile.csv', header=T)
names(data)

List of datasets generated for the project:

  • Git
    • Git Commits (CSV) – Full list of commits with id, message, time, author, committer, and added, deleted and modifed lines.
    • Git Commits Evol (CSV) – Evolution of number of commits and authors by day.
    • Git Log (TXT) – the raw export of git log.
  • Bugzilla
  • Eclipse Forums
    • Forums Posts (CSV) – list of all forum posts for this project.
    • Forums threads (CSV) – list of all forum threads for this project.
  • Jenkins CI
  • Eclipse PMI
    • PMI Checks (CSV) – list of all checks applied to the Project Management Infrastructure entries for the project.
  • ScanCode

Git

Git commits

Download: git_commits_evol.csv.gz

data <- read.csv(file=file_git_commits_evol, header=T)

File is git_commits_evol.csv, and has 3 columns for 1308 entries.

data$commits_sum <- cumsum(data$commits)
data.xts <- xts(x = data[,c('commits_sum', 'commits', 'authors')], order.by=as.POSIXct(as.character(data[,c('date')]), format="%Y-%m-%d"))

time.min <- index(data.xts[1,])
time.max <- index(data.xts[nrow(data.xts)])
all.dates <- seq(time.min, time.max, by="days")
empty <- xts(order.by = all.dates)

merged.data <- merge(empty, data.xts, all=T)
merged.data[is.na(merged.data) == T] <- 0

p <-dygraph(merged.data[,c('commits')],
        main = paste('Daily commits for ', project_id, sep=''),
        width = 800, height = 250 ) %>%
      dyRangeSelector()
p


Git log

Download: git_log.txt.gz

File is git_log.txt, and full log has 39944 lines.


Bugzilla

Bugzilla issues

Download: bugzilla_issues.csv.gz

data <- read.csv(file=file_bz_issues, header=T)

File is bugzilla_issues.csv, and has 17 columns for 1303 issues.

Bugzilla open issues

Download: bugzilla_issues_open.csv.gz

data <- read.csv(file=file_bz_issues_open, header=T)

File is bugzilla_issues_open.csv, and has 17 columns for 169 issues (all open).

Bugzilla evolution

Download: bugzilla_evol.csv.gz

data <- read.csv(file=file_bz_evol, header=T)

File is bugzilla_evol.csv, and has 3 columns for 854 weeks.

Let’s try to plot the monthly number of submissions for the project:

Versions

Download: bugzilla_versions.csv.gz

data <- read.csv(file=file_bz_versions, header=T)

File is bugzilla_versions.csv, and has 2 columns for 19 weeks.

Components

Download: bugzilla_components.csv.gz

data <- read.csv(file=file_bz_components, header=T)

File is bugzilla_components.csv, and has 2 columns for 5 weeks.

data.sorted <- data[order(data$Bugs, decreasing = T),]

g <- gvisColumnChart(data.sorted, options=list(title='List of product components', legend="{position: 'none'}", width="automatic", height="300px"))
plot(g)

Eclipse Forums

Forums posts

Download: eclipse_forums_posts.csv.gz

data <- read.csv(file=file_forums_posts, header=T)

File is eclipse_forums_posts.csv, and has 6 columns for 1133 posts. The evolution of posts

data$created.date <- as.POSIXct(data$created_date, origin="1970-01-01")
posts.xts <- xts(data, order.by = data$created.date)

time.min <- index(posts.xts[1,])
time.max <- index(posts.xts[nrow(posts.xts)])
all.dates <- seq(time.min, time.max, by="weeks")
empty <- xts(order.by = all.dates)

merged.data <- merge(empty, posts.xts$id, all=T)
merged.data[is.na(merged.data) == T] <- 0

posts.weekly <- apply.weekly(x=merged.data, FUN = nrow)
names(posts.weekly) <- c("posts")

p <- dygraph(
  data = posts.weekly[-1,],
  main = paste('Weekly forum posts for ', project_id, sep=''),
  width = 800, height = 250 ) %>%
  dyAxis("x", drawGrid = FALSE) %>%
  dySeries("posts", label = "Weekly posts") %>%
  dyOptions(stepPlot = TRUE) %>%
  dyRangeSelector()
p

The list of the 10 last active posts on the forums:

data$created.date <- as.POSIXct(data$created_date, origin="1970-01-01")
posts.table <- head(data[,c('id', 'subject', 'created.date', 'author_id')], 10)
posts.table$subject <- paste('<a href="', posts.table$html_url, '">', posts.table$subject, '</a>', sep='')
posts.table$created.date <- as.character(posts.table$created.date)
names(posts.table) <- c('ID', 'Subject', 'Post date', 'Post author')

print(
    xtable(head(posts.table, 10),
        caption = paste('10 most recent posts on', project_id, 'forum.', sep=" "),
        digits=0, align="lllll"), type="html",
    html.table.attributes='class="table table-striped"',
    caption.placement='bottom',
    include.rownames=FALSE,
    sanitize.text.function=function(x) { x }
)
10 most recent posts on modeling.emfcompare forum.
ID Subject Post date Post author
1853977 Re: Resolving Proxies 2022-07-26 15:31:55 164662
1853939 Re: Resolving Proxies 2022-07-25 07:12:35 38891
1853903 Resolving Proxies 2022-07-21 19:24:31 164662
1853692 Re: EMF Compare Diff unexpected behavior 2022-07-13 17:59:02 234715
1853639 Re: EMF Compare Diff unexpected behavior 2022-07-12 07:23:50 38891
1853632 EMF Compare Diff unexpected behavior 2022-07-11 20:50:24 234715
1853471 Re: EMF Compare dialog in standalone RCP application e4 2022-07-04 06:48:16 38891
1853308 Re: EMF Compare dialog in standalone RCP application e4 2022-06-27 13:00:18 234653
1850928 Re: Custom content merge viewer 2022-03-22 15:00:43 164662
1850680 Re: Custom content merge viewer 2022-03-14 08:10:00 38891


Forums threads

Download: eclipse_forums_threads.csv.gz

data <- read.csv(file=file_forums_threads, header=T)

File is eclipse_forums_threads.csv, and has 8 columns for 319 threads. A wordcloud with the main words used in threads is presented below.

The list of the 10 last active threads on the forums:

data$last.post.date <- as.POSIXct(data$last_post_date, origin="1970-01-01")
threads.table <- head(data[,c('id', 'subject', 'last.post.date', 'last_post_id', 'replies', 'views')], 10)
threads.table$subject <- paste('<a href="', threads.table$html_url, '">', threads.table$subject, '</a>', sep='')
threads.table$last.post.date <- as.character(threads.table$last.post.date)
names(threads.table) <- c('ID', 'Subject', 'Last post date', 'Last post author', 'Replies', 'Views')

print(
    xtable(threads.table,
        caption = paste('10 last active threads on', project_id, 'forum.', sep=" "),
        digits=0, align="lllllll"), type="html",
    html.table.attributes='class="table table-striped"',
    caption.placement='bottom',
    include.rownames=FALSE,
    sanitize.text.function=function(x) { x }
)
10 last active threads on modeling.emfcompare forum.
ID Subject Last post date Last post author Replies Views
1111273 Resolving Proxies 2022-07-26 15:31:55 1853977 2 1679
1111175 EMF Compare Diff unexpected behavior 2022-07-13 17:59:02 1853692 2 1992
1110240 Custom content merge viewer 2022-03-22 15:00:43 1850928 2 5947
1109697 git logicalmerge 2022-01-03 09:09:49 1849086 1 3331
1108157 loader constraint violation when launching an EMF compare comparison 2021-06-16 13:05:16 1842322 3 2800
1106908 Overriding the Model Resolver: impossible? 2021-02-09 00:22:04 1837864 0 14282
1106454 AbstractChangeFactory.fillRequiredDifferences() may cause circular dependencies 2020-12-29 02:41:11 1836325 0 1510
1106277 Load resources from revision control 2021-01-05 08:14:56 1836469 1 2263
1105870 Crossover operation by EMF Compare 2020-11-23 08:25:34 1834990 3 1591
1105864 equalityHelperExtensionProvider extension point ignored 2020-11-16 16:05:53 1834707 2 1477

Jenkins

Builds

Download: jenkins_builds.csv.gz

data <- read.csv(file=file_jenkins_builds, header=T)

File is jenkins_builds.csv, and has 7 columns for 308 commits.

ID Name Time Result
920 clean-nightly \#920 1.609903e+12 SUCCESS
919 clean-nightly \#919 1.606229e+12 SUCCESS
918 clean-nightly \#918 1.605877e+12 SUCCESS
917 clean-nightly \#917 1.604110e+12 SUCCESS
916 clean-nightly \#916 1.601814e+12 SUCCESS
915 clean-nightly \#915 1.598880e+12 SUCCESS
914 clean-nightly \#914 1.595439e+12 SUCCESS
913 clean-nightly \#913 1.593656e+12 SUCCESS
912 clean-nightly \#912 1.593224e+12 SUCCESS
911 clean-nightly \#911 1.593138e+12 SUCCESS


Jobs

Download: jenkins_jobs.csv.gz

data <- read.csv(file=file_jenkins_jobs, header=T)

File is jenkins_jobs.csv, and has 15 columns for 33 commits.

Name Colour Last build time Health report
clean-nightly blue 1.609903e+12 100
cli-master-gerrit blue 1.432289e+12 100
cli-master-nightly disabled 1.432440e+12 100
collaborative.modeling.luna-master-nightly disabled 1.477505e+12 100
collaborative.modeling.mars-master-nightly disabled 1.550995e+12 0
collaborative.modeling.neon-master-nightly disabled 1.550992e+12 0
egit.logical-master-nightly disabled 1.489637e+12 100
jgit.hooks-master-nighly disabled 1.467097e+12 100
maintenance-1.1 disabled 0.000000e+00 0
maintenance-1.2 disabled 0.000000e+00 0


PMI

PMI Checks

Download: eclipse_pmi_checks.csv.gz

data <- read.csv(file=file_pmi_checks, header=T)

File is eclipse_pmi_checks.csv, and has 3 columns for 17 commits.

checks.table <- head(data[,c('Description', 'Value', 'Results')], 10)

print(
    xtable(checks.table,
        caption = paste('Extract of the 10 first PMI checks for ', 
                        project_id, '.', sep=" "),
        digits=0, align="llll"), type="html",
    html.table.attributes='class="table table-striped"',
    caption.placement='bottom',
    include.rownames=FALSE,
    sanitize.text.function=function(x) { x }
)
Extract of the 10 first PMI checks for modeling.emfcompare .
Description Value Results
Checks if the URL can be fetched using a simple get query. https://bugs.eclipse.org/bugs/enter\_bug.cgi?product=EMFCompare OK: Create URL could be successfully fetched.
Checks if the URL can be fetched using a simple get query. https://bugs.eclipse.org/bugs/buglist.cgi?product=EMFCompare&component=Core OK: Query URL could be successfully fetched.
Sends a get request to the given CI URL and looks at the headers in the response (200 404..). Also checks if the URL is really a Hudson instance (through a call to its API). https://ci.eclipse.org/emfcompare/job/master-nightly/ OK. Fetched CI URL.\\Failed: CI URL is not the root of a Hudson instance.
Checks if the Dev ML URL can be fetched using a simple get query. https://dev.eclipse.org/mailman/listinfo/emf-dev OK: Dev ML URL could be successfully fetched.
Checks if the URL can be fetched using a simple get query. http://wiki.eclipse.org/EMF\_Compare OK: Documentation URL could be successfully fetched.
Checks if the URL can be fetched using a simple get query. https://www.eclipse.org/emf/compare/download.html OK: Download URL could be successfully fetched.
Checks if the Forums URL can be fetched using a simple get query. http://www.eclipse.org/forums/eclipse.tools.emf OK. Forum \[EMF Compare forum / newsgroup\] correctly defined.\\OK: Forum \[EMF Compare forum / newsgroup\] URL could be successfully fetched.\\OK. Forum \[EMF forum / newsgroup\] correctly defined.\\OK: Forum \[EMF forum / newsgroup\] URL could be successfully fetched.
Checks if the URL can be fetched using a simple get query. http://wiki.eclipse.org/EMF\_Compare/User\_Guide OK: Documentation URL could be successfully fetched.
Checks if the Mailing lists URL can be fetched using a simple get query. Failed: no mailing list defined.
Checks if the URL can be fetched using a simple get query. http://www.eclipse.org/emf/compare/project-info/plan-kepler.xml OK: Plan URL could be successfully fetched.

ScanCode

Authors

Download: scancode_authors.csv.gz

data <- read.csv(file=file_sc_authors, header=T)

File is scancode_authors.csv, and has 2 columns for 21 commits.

Author Count
unknown 13583
Philip Langer 55
Martin Fleck 30
Stefan Dirix 30
Michael Borkowski 13
Alexandra Buzila 6
Alexandra Buzila 3
Laurent Goubet 3
<a href mailto:ZL7E0BRiGuOpyMC5@MLG/PpthT0q/GMIE’> Ibm Corporation 2
Christian W. Damus 2
suppressPackageStartupMessages(library(googleVis))
options(gvis.plot.tag='chart')

data.sorted <- data[order(data$count, decreasing = T),]

p <- gvisPieChart(data.sorted,
              options = list(
                title=paste("Authors for project `r project_id` ", sep=""),
                sliceVisibilityThreshold=0, height=280,
                pieHole= 0.4))

print(p, 'chart')


Copyrights

Download: scancode_copyrights.csv.gz

data <- read.csv(file=file_sc_copyrights, header=T)

File is scancode_copyrights.csv, and has 2 columns for 30 commits.

Copyrights Count
unknown 11997
Copyright (c) Obeo 1250
Copyright (c) Obeo and others 297
Copyright (c) EclipseSource Muenchen GmbH and others 84
Copyright (c) EclipseSource Services GmbH and others 77
Copyright (c) IBM Corporation and others 66
Copyright Twitter, Inc 26
Copyright (c) EclipseSource GmbH. 9
Copyright (c) Obeo, France 9
  1. Copyright Obeo and others
6
suppressPackageStartupMessages(library(googleVis))
options(gvis.plot.tag='chart')

data.sorted <- data[order(data$count, decreasing = T),]

p <- gvisPieChart(data.sorted,
              options = list(
                title=paste("Copyrights for project `r project_id` ", sep=""),
                sliceVisibilityThreshold=0, height=280,
                pieHole= 0.4))

print(p, 'chart')


Holders

Download: scancode_holders.csv.gz

data <- read.csv(file=file_sc_holders, header=T)

File is scancode_holders.csv, and has 2 columns for 28 commits.

Holders Count
unknown 11997
Obeo 1252
Obeo and others 303
EclipseSource Muenchen GmbH and others 84
EclipseSource Services GmbH and others 77
IBM Corporation and others 66
Twitter, Inc 26
EclipseSource GmbH. 9
Obeo, France 9
EclipseSource Munich and others 6
suppressPackageStartupMessages(library(googleVis))
options(gvis.plot.tag='chart')

data.sorted <- data[order(data$count, decreasing = T),]

p <- gvisPieChart(data.sorted,
              options = list(
                title=paste("Holders for project `r project_id` ", sep=""),
                sliceVisibilityThreshold=0, height=280,
                pieHole= 0.4))

print(p, 'chart')


Licences

Download: scancode_licences.csv.gz

data <- read.csv(file=file_sc_licences, header=T)

File is scancode_licences.csv, and has 2 columns for 15 commits.

Licence Count
unknown 11925
epl-1.0 1890
apache-2.0 94
cpl-1.0 67
eclipse-sua-2010 67
mpl-1.1 67
epl-2.0 OR apache-2.0 5
cpl-1.0 AND other-permissive 3
bsd-new 2
epl-2.0 2
suppressPackageStartupMessages(library(googleVis))
options(gvis.plot.tag='chart')

p <- gvisPieChart(data,
              options = list(
                title=paste("Licences for project `r project_id` ", sep=""),
                sliceVisibilityThreshold=0, height=280,
                pieHole= 0.4))

print(p, 'chart')


Programming Languages

Download: scancode_programming_languages.csv.gz

data <- read.csv(file=file_sc_pl, header=T)

File is scancode_licences.csv, and has 2 columns for 10 commits.

Programming Language Count
unknown 12010
Java 1575
HTML 73
Objective-C 50
Bash 7
PHP 6
CSS 4
JavaScript 3
Python 3
VB.net 1
suppressPackageStartupMessages(library(googleVis))
options(gvis.plot.tag='chart')

p <- gvisPieChart(data,
              options = list(
                title=paste("Programming languages for project `r project_id` ", sep=""),
                sliceVisibilityThreshold=0, height=280,
                pieHole= 0.4))

print(p, 'chart')


Special files

Download: scancode_special_files.csv.gz

data <- read.csv(file=file_sc_sf, header=T)

File is scancode_special_files.csv, and has 2 columns for 129 commits.

Holders Type
README.textile readme
org.eclipse.emf.compare-parent/pom.xml manifest
org.eclipse.emf.compare-parent/bundle-parent/pom.xml manifest
org.eclipse.emf.compare-parent/feature-parent/pom.xml manifest
org.eclipse.emf.compare-parent/targetPlatforms/fragments/licence.tpd legal
org.eclipse.emf.compare-parent/test-parent/pom.xml manifest
packaging/org.eclipse.emf.compare-feature/copyright.txt legal
packaging/org.eclipse.emf.compare-feature/pom.xml manifest
packaging/org.eclipse.emf.compare-feature/sourceTemplateFeature/copyright.txt legal
packaging/org.eclipse.emf.compare.diagram.ecoretools-feature/copyright.txt legal