Written by

Question Anna Golitsyna · Aug 19, 2020

Class properties from class name

#Caché #Databases

Hi,

I'd like to compare classes in two namespaces, whether the corresponding .cls code exist in both namespaces or not, and if it does exist in both namespaces, whether the CLS code is identical. If there is such a routine out there the better, I'd like to see it. If not, I know how to get a list of classes in each namespace and I can check currClss.TimeChanged. What I cannot find is the following:

Programmatic access to cls routine code lines given the class name
cls routine code size in bites as a crude approximation of cls files in two namespaces being different
Can I compare classes or routines on two different servers?

I has no problem extracting size and code lines info for regular routines via %Routine including .INT routines compiled from classes but I'd rather compare original classes as opposed to their compiled representation. %Routine apparently does not process .cls files. The oddDEF solution is ugly, too low-level, and partially binary. I also know I can always export all classes and then diff them in WinMerge or something but I am looking for a differently formatted output.

Thanks in advance,
Anna

Discussion (8)1

Add reply

Comments

Dmitry Maslennikov · Aug 19, 2020

First of all, classes code stored completely differently with plain routines. So, the best way to compare two namespaces is to export all the code in UDL format, which in fact the same as in Studio, usually it was just XML.

From my side I would recommend using VSCode for this task, there you can export any kind of source from InterSystems products with any version since 2016.2. How this process would look there.

open any empty folder in VSCode
Configure it to desired server and namespace
export source code from InterSystems Explorer view
do, git init, and commit all exported files
delete all sources
switch to another namespace, in the same explorer view, by just opening another namespace.
export all sources again.

git will show the differences.

As I'm a developer of VSCode extension for InterSystems, you can contact me directly, or through public issues

0 0

Anna Golitsyna Aug 19, 2020 to Dmitry Maslennikov

Thanks, Dmitriy! Yes, I saw already that classes are stored differently. Our namespaces are huge and different enough though so looking through all their differences line by line is not necessarily practical.
P.S. I am looking forward to your VSCode add-on progress BTW :-). Tried it some time ago already.

0 0

Eduard Lebedyuk · Aug 19, 2020

I think this is a task better suited for Version Control System, such as git.

Export all relevant code from the first namespace
Commit
Export all relevant code from the second namespace
Diff

And for CD/CI systems such as Jenkins, GitHub or GitLab.

That said you can use this SQL to compare class hashes (if hashes are identical than classes are identical)

SELECT
  Name,
  Hash,
  TimeChanged,
  TimeCreated
FROM %Dictionary.CompiledClass

After that you can use this SQL to compare hashes of the individual methods (if classes do not match):

SELECT
  parent,
  Name,
  RuntimeHash
FROM %Dictionary.CompiledMethod

0 0

Anna Golitsyna Aug 19, 2020 to Eduard Lebedyuk

Thanks, Eduard! Queries look promising. Will they compare INT's or CLS's, given it's about CompiledClass?

0 0

Eduard Lebedyuk Aug 19, 2020 to Anna Golitsyna

Will they compare INT's or CLS's, given it's about CompiledClass?

No idea. Do you think someone might have edited generated int code directly?

0 0

Anna Golitsyna Aug 19, 2020 to Eduard Lebedyuk

Unlikely but could be. I'll look it up.

0 0

Anna Golitsyna Aug 19, 2020 to Eduard Lebedyuk

It looks like code below would give me what I am looking for. Just need to figure out (or take an advice!) how to exclude, say, system classes outright.

s rs=##class(%ResultSet).%New("%Dictionary.ClassDefinitionQuery:ClassIndex")
s x=rs.Execute()
f {
s x=rs.Next() q:'x
s TimeChanged=rs.GetDataByName("TimeChanged")
s ClassName=rs.GetDataByName("ClassName")
s Hash1=rs.GetDataByName("Hash1")
s Hash2=rs.GetDataByName("Hash2")
s System=rs.GetDataByName("System")
s ClassType=rs.GetDataByName("ClassType")
s Size=rs.GetDataByName("Size")
}
P.S. Found the answer to my last question: https://cedocs.intersystems.com/latest/csp/documatic/%25CSP.Documatic.cls?PAGE=CLASS&LIBRARY=%25SYS&CLASSNAME=%25Library.RemoteResultSet

0 0

Eduard Lebedyuk Aug 20, 2020 to Anna Golitsyna

Just need to figure out (or take an advice!) how to exclude, say, system classes outright.

Something like this should work:

WHERE 1=1
      AND NOT name %STARTSWITH '%'
      AND NOT name %STARTSWITH 'CSP'
      AND NOT name %STARTSWITH 'Ens'
      AND NOT name %STARTSWITH 'INFORMATION.SCHEMA'

0 0