HELP: split up source file into segments automatically....

This is not really language specific but more of a source code parsing.

I have a large ASP source file that I like to split up, resulting in separate ASP files, each containing one function and the filename named after that function.

Does anyone know of a tool/script which does this?

PS: I am too lazy to learn Perl/AWK/Python to do this, hence why I believe someone has already written a tool/script to do this. Possibly in C++/etc.

C or C++ isn't really the right tool for this purpose.

My other question is "why?". Splitting tiny functions into their own separate .C file isn't a particularly useful idea. If you have LARGE functions, yes, split the code into separate functions, and name them something appropriate.

How large is your project?

Even if you manage to quickly split your sources into a function per file, you still have the problem of manually inserting the right header includes into each file (unless of course you have one ginormous "include everything" mega-include at for ALL files). Likewise for any global variables that may be in the project.

This is going to be much more of an issue, and it will be real tricky to teach some tool to do that - it would have to parse the entire file, with includes and all [and the right #defines to know which variant it may be]. Quite hard, I would say.

--
Mats

Do you have a couple of examples of such functions?
Can you paste them and indicate where the split is supposed to take place?

If they're reasonably well structured, then this should be just a few lines of perl, which won't take more than a few mins to lash together.

Was hoping a C/C++ tool could split up a VBScript/ASP code file, for example:

Function one(a, b, c)

End Function

Sub two(d, e, f)

End Sub

-------

would create two new files, first one containing Function one, second file containing Sub two.

I like to compare them using diff tools, because I got lots of drawing functions which follow a similar pattern.

Aha - that was a part I didn't get - it's written in VB, rather than C/C++!

Seems like you could just scan for "function" or "sub" at the beginning of a line, and then the corresponding end function/end sub.

--
Mats

How about

Code:

---

#!/bin/perl -w
use strict;
my $fName;
while ( <> ) {
    chomp;s/\r//;
    if ( /^(Function|Sub)\s+(\w+)/ ) {
        $fName = $2;
        open FH,">$fName.vb" or die "oops";
    }
    if ( /^(Function|Sub)\s+$fName/ .. /^End\s+(Function|Sub)/ ) {
        print FH "$_\n";
    }
}

$ cat foo.vb
Function one(a, b, c)

End Function

Sub two(d, e, f)

End Sub

$ perl foo.pl foo.vb
$ cat one.vb
Function one(a, b, c)

End Function
$ cat two.vb
Sub two(d, e, f)

End Sub
$

---