those forks do look a little long, someone's idea of a mild custom years back no doubt...
Anyway if those forks seem in decent shape apart from being too long, you could always call around to a few local machine shops and check what it'd cost to have them shortened to stock length. It's not unheard of to chuck a fork tube in a large enough lathe, cut it to the correct length and then rethread the tops for the caps.
Another option would be what you've already thought of, bolt on forks from another bike.
Free is nice, but you want your brakes and wheel to bolt on too.
CB500/550 forks will do the trick, CB750 forks are similar enough...but still too long.
As I understand it, the forks from a CB450 (twin) will u the trick.
My Buddy Jason has a CB450 front end on his 500, have a look:
http://forums.sohc4.net/index.php?topic=58847.0And good luck, if you were closer I'd be interested in a few CM400 parts.
-Alan