TRegistryValue Enumerator not returning emptyvalues?

[evilkitten]

It's not easy to describe, but when multiple uses of the

TRegistryValue = EachIn MyKey.Values()

on subsequent keys will not update with a new value when it is empty string. Instead, it returns the same as whatever previous value was returned.

Sorry if this doesn't make sense. It's hard to describe but very obvious when you see it.

I have posted some code snippets on
https://www.syntaxboom.net/forum/blitzmax-ng/1840-bah-registry-weirdness
to showcase situation where the issue can be seen under the right circumstances (obviously depends on user's registry )

[woollybah]

You talk about Null and empty entries.

For a key that does not exist...

Local AKey:TRegistryKey  = RegOpenKey(HKEY_CURRENT_USER,"AppEvents\Schemes\Apps\.Default\MailBeep\DoesNotExist")
If Not AKey Then
    Throw "Key not found"
End If

When you create a new key and don't give the default a value (value not set), there is no entry. It doesn't exist.
The following would return no entries:

Local AKey:TRegistryKey  = RegOpenKey(HKEY_CURRENT_USER,"AppEvents\Schemes\Apps\.Default\MailBeep\KeyWithDefaultValueNotSet")
For Local v:TRegistryValue = EachIn AKey.Values()
    Print "value : " + v.vString
Next

If you edit and enter nothing and save, now there is an empty default entry. This exists with no value.

Local AKey:TRegistryKey  = RegOpenKey(HKEY_CURRENT_USER,"AppEvents\Schemes\Apps\.Default\MailBeep\KeyWithDefaultValue")
For Local v:TRegistryValue = EachIn AKey.Values()
    Print "value : " + v.vString
Next

would produce:

value :

The following entry:

would produce :

value : Hello
value : World

Note that the first entry doesn't actually exist.

Whereas this:

would produce:

value : 
value : Hello
value : World

You are not seeing this?

[woollybah]

This is what I get when I run "attempt 2"

".Default" scheme was skipped
".None" scheme was skipped
"" scheme was skipped

It doesn't get as far as reading the paths mentioned in the post above because they are in ".Default"

[evilkitten]

Hi Brucey, Thanks for the super quick response

I am so sorry for the very poor description and confusing nature of this issue. It's totally my fault for not explaining it clearly, and due to the nature of individual users' Windows Registry, it's difficult to give a good example.

These are not newly created keys, but already existing ones. The issue seems to be with how the TRegistryKey.Values() are iterated when the specific value's data is null/empty. Instead of updating with null, it seems to be not-yet-.garbage-collected previous memeory?

Your screenshots confuse the issue a little more with the presence of Brucey AND Fred schemes, so I have here some screenshots and code which hopefully highlight the issue more directly when there is only a single custom scheme)

In this case, the scheme is "PJ's" we are looking at events under Application ".Default" (i.e. non-specific windows events) and in particular:
"MailBeep" for which the value is poplated with "Windows Notify Email.wav"
and
"Maximize" for which the value is empty/null

---

Here's the code

Import bah.registry

Local KEY1:TRegistryKey = RegOpenKey(HKEY_CURRENT_USER,"AppEvents\Schemes\Apps\.Default\MailBeep\PJ's")

For Local V1:TRegistryValue=EachIn KEY1.Values()
	If (V1.Name="")
		'Only need first Valuie, and "(Default)" is returned as ""
		DebugLog("OUTPUT1: "+V1.ToString())
		Exit
	End If	
Next

Local KEY2:TRegistryKey = RegOpenKey(HKEY_CURRENT_USER,"AppEvents\Schemes\Apps\.Default\Maximize\PJ's")

For Local V2:TRegistryValue=EachIn KEY2.Values()
	If (V2.Name="")
		'Only need first Value, and "(Default)" is returned as ""
		DebugLog("OUTPUT2: "+V2.ToString())
		Exit
	End If	
Next

And it outputs to the BMax debuglog

DebugLog:OUTPUT1: C:\Windows\media\Windows Notify Email.wav
DebugLog:OUTPUT2: C:\Windows\media\Windows Notify Email.wav

This is unexcpected as the OUTPUT2 should be updated to ""

According to the ACTUAL registry content::

---

[woollybah]

This is what I get, after setting my registry to the same as yours,

OUTPUT1: C:\Windows\media\Windows Notify Email.wav
OUTPUT2:

What version of BlitzMax are you using?

[evilkitten]

Interesting!
I am using BMax-NG - Last updated in February this year v1.56

I will try the latest weeekly build...

---

If it matters::

My version of the registry.bmx file contains the
{nomangle}
parameter, as described in

#101

[evilkitten]

I was not ble to get the very latest version ( 1.62 ) to build without errors, so the latest update I have now installed is bcc version 1.54 with BMK version 3.58

I still get the same (incorrect) output::

DebugLog:OUTPUT1: C:\Windows\media\Windows Notify Email.wav
DebugLog:OUTPUT2: C:\Windows\media\Windows Notify Email.wav

---

Incidentally, I also tried going direct to the main registry hive
HKEY_USERS \ S-1-5-21-blahblahblah
and still got the same result - not sure if this is in any way helpful!!!

---

In conclusion, since it seems to be working fine for you, it's more likely something weird on my end - luckily I have a workaround so I am able to keep moving forwards.

Sorry for wasting time :D I'l mark this as "can't repro"