Re: [cobalt-developers] R3/R4 Bug DNS GUI

[Barry Titmarsh <barry@xxxxxxxxxxxxxx>]

At 11:29 07/09/01 +0200, you wrote:
> Hi Barry,
>
> Thank you for your bug report.
>
> > I have reported this bug some time ago yet its still not fixed.
> I am very sorry for this.
>
> > Goto your dns gui to add a domain
> > and then add any record to any domain with a <number in the first char>
> >
> > like  4car.co.uk
> >
> > the /etc/named/records file shows
> >
> > secondary - 4car.co.uk 195.52.73.20 -
> >
> > and the dns would work if this was submitted. but in the GUI
> > you cant see this domain  as its listed as  .../-
> > and the scripts fail in a way that you cant edit it delete it or do
> > anything with it.
> >
> > the only way to remove it is to edit the files in /etc/named using vi
> >
> > anyone have a fix ?  Please
>
> I was able to successfully reproduce your problem.
> I have researched and have come up with a very simple solution which I have
> forwarded to the person responsible for maintaining this part of the UI.
>
> If you are experienced enough to use vi, you can do the change yourself by
> editting /usr/admserv/cgi-bin/.cobalt/dns/index.cgi
>
> Then search for the line containing "type eq 'seco"
>
> In this line, please change $domain =~ /^[\d\.]+/ to $domain =~ /^[\d\.\/]+$/'
>
> I've urged engineering to release a patch to correct this issue asap, so 
> if you
> don't have this problem, please do not modify this and wait until the 
> patch is
> released.


Here is a diff so that others can patch if needed.
and this does correct the problem

***************
*** 568,574 ****
                }
            next;
            }
!       elsif (($type eq 'secondary') && ($domain =~ /^([\d\.]+)/))
            {
            my( $deduced_net ) = net_get_network($domain, 
net_convert_netmask($nbits)) .'/'. $nbits;
            $networks{$deduced_net} = $nbits;
--- 568,574 ----
                }
            next;
            }
!       elsif (($type eq 'secondary') && ($domain =~ /^([\d\.V]+$)/))
            {
            my( $deduced_net ) = net_get_network($domain, 
net_convert_netmask($nbits)) .'/'. $nbits;
            $networks{$deduced_net} = $nbits;


> With regards,
>
> Taco Scargo
>
> Professional Services Manager, EMEA
>
> Sun Microsystems                Tel. +31 (71) 565 7021
> Sun Cobalt Server Appliances    taco.scargo@xxxxxxx
>
> _______________________________________________
> cobalt-developers mailing list
> cobalt-developers@xxxxxxxxxxxxxxx
> http://list.cobalt.com/mailman/listinfo/cobalt-developers