Years ago Microsoft used to do stuff like this, notably releasing .NET Framework under its Reference Source License (you're allowed to look at the code, but that's about it).
It’s still happening. Bad companies are swapping between using ‘open source’ inaccurately (to get grants and funding) and saying ‘source available’ (when people call them on their bullshit) now.