[comp.os.vms] Fortran Subroutine Mapper

charettep%v36b.DECnet@NUSC.ARPA ("V36B::CHARETTEP") (10/27/87)

	I have a Fortran program with upwards of 50 subroutines which call
each other in ugly ways.  A friend of mine said there is some sort of Public
Domain program which will analyze Fortran code, and produce some kind of
flowchart or subroutine calling diagram.  This would be invaluable to me,
as it will cause me to not impale myself on a pointed stick in dismay.
Does anyone know ANYTHING about such a beastie?  Any and all help is greatly
appreciated.

                                                      Adv*THANKS*ance,

                                                         Paul Charette
                                              <charettep%v36b.decnet@nusc.arpa>
------

charettep%v36b.DECnet@NUSC.ARPA.UUCP (11/11/87)

Greetings and Permutations,

	About two weeks ago, I requested information about a program which
would analyze FORTRAN code and generate flow charts.  Thanks to responses
by many of you, I traced down INDEX, a DECUS program which is touted as
a "FORTRAN Cross Referencer and Flow Chart Generator".  (embed disclaimer)
I haven't had time to test it out, so I can't speak for it's usefulness or
reliablilty, but it looks quite useful.  I'd like to make it available to
the interested members of info-vax, but ...
             
	The problem is, it is huge - 23 source files totaling ~3000 blocks,
with the largest file being 881 blocks.  I've also packed it into 4 VMS_SHAR
files of sizes 751, 766, 897, and 1028 blocks.

	I don't know what happens to people who post 3000 blocks to the net,
but I'm not sure I want to find out the hard way.  I'm not too sure about
mailing it individually either.  I've never sent anything nearly this large
over the net.  Is this large enough to draw unwanted attention?

	The logical alternative would be FTP, but my host doesn't allow
anonymous FTP access.  If anyone knows of a host which would be willing
to let me put this beast somewhere in their FTP'able directories, I'd
appreciate the help.

	If you have a solution to this, or wish to be added to my list of
prospective recipients of INDEX, please mail me.

     	By the way, I've appended the INDEX Abstract to the end of this
note.

								Paul

      "Supreme autocratic power derives from a mandate from the masses,
       not some farcical aquatic ceremony"

          +--------------------------------------------------------+
          |                     Paul Charette                      |
          |            Naval Underwater Systems Centre             |
          |                      Newport, RI                       |
          |                                                        |
          |           <charettep%v36b.decnet@nusc.ARPA>            |
          |                            or                          |
          |                <charettep@nusc-wpn.ARPA>               |
          +--------------------------------------------------------+

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

                 INDEX-FORTRAN CROSS REFERENCE AND FLOW CHART

                                   ABSTRACT




          INDEX is a FORTRAN source cross-referenceing  and  flow  charting
     utility  that  allows  the  user  to  look  at individual source files
     (optionally saving the data for an overall SUPER INDEX) and  determine
     what  variables  are  used  on  what  lines  and  how  they  are used.
     Furthermore the user can select for display/save for SUPER INDEX  only
     those  variables  or COMMON blocks with the characteristics that he is
     interested  in-global/local,  assigned   value/not   assigned   value,
     used/unused,   imported/exported,   etc   in  any  combination.   Also
     available is the optional ability to show up to four additional  items
     of information for display during the regular and SUPER INDEX:

          The variable storage location information (local, in COMMON,
          passed by argument, etc).

          The variable type (REAL F_Floating, structured etc)

          Usage in FUNCTION/SUBROUTINE  calls  (routine  used  in  and
          argument number).

          A user selected tag of up to 31 characters.

     The data saved for a SUPER INDEX listing (consisting of 6  data  items
     as  outlined  above) can be displayed with a great deal of flexibility
     as to the data item selection, order and format (or saved in  an  ISAM
     data  file for the user to work on directly).  A special option of the
     SUPER INDEX allows the output of a list of module entry  points  which
     pass  data  in and out by argument, the name of each argument and it's
     type , the name of any module which call that entry point  along  with
     the  the  name  of  each variable passed in the corresponding argument
     position and it's type.  The resulting information supplied allows the
     user to follow the flow of data throughout a program or find the usage
     of any selected data variable as required.

          If selected, the user may at the same time generate a flow  chart
     of the source file currently being cross-referenced.

          If wanted, the user can generate in place of the SUPER INDEX,  an
     entry  point  cross  reference  listing  showing  who calls who and is
     called by who (with optional graphical tree output).

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
------

tencati@VLSI.JPL.NASA.GOV (Ron Tencati) (11/13/87)

Sorry for posting this to everyone, but a direct reply did not work.

I would like a copy of the sources to the INDEX program you described in an
earlier message.

Thanks,

Ron Tencati
TENCATI@JPL-VLSI.ARPA
Jet Propulsion Laboratory
Pasadena, Ca. 

STREIFF@HARTFORD.BITNET (11/17/87)

Hi,


        SORRY TO SEND THIS TO THE NET but.........

Im having problems reaching the person who offered to distribute the file
INDEX. I would like to get a copy of this program. I also have a possible
solution to your distribution problems. If you could send me a message
with your network address (and what network your on) i might be able to
convince my mailer that you do exist. Thanks.


                                                sds

 +------------------------------+----------------------------------------+
 |       S. David Streiff       |  BitNet  : STREIFF@HARTFORD.BITNET     |
 |          CE-CIM-EE           |  SlowNet : Box 2590 200 Bloomfield Ave |
 |    Combustion Engineering    |            West Hartford, CT. 06117    |
 |         Windsor CT.          |  MaBell  : (203) 726-9117              |
 +------------------------------+----------------------------------------+
 DisClaimer : My employer is not responsible for anything that i say.
              They will even deny my existance if given a chance.