<p>laforge <strong>submitted</strong> this change.</p><p><a href="https://gerrit.osmocom.org/c/osmo-ttcn3-hacks/+/17063">View Change</a></p><div style="white-space:pre-wrap">Approvals:
  laforge: Looks good to me, approved
  Jenkins Builder: Verified

</div><pre style="font-family: monospace,monospace; white-space: pre-wrap;">library/DNS_Helpers: add f_enc_IPv4<br><br>Used by upcoming D-GSM test, to pass the IP of the emulated GSUP server.<br>The code is based on f_enc_dns_hostname() in the same file.<br><br>Related: OS#4380<br>Change-Id: I8a5450988711680c93cfd657a34db759a56bc41e<br>---<br>M library/DNS_Helpers.ttcn<br>1 file changed, 23 insertions(+), 0 deletions(-)<br><br></pre><pre style="font-family: monospace,monospace; white-space: pre-wrap;"><span>diff --git a/library/DNS_Helpers.ttcn b/library/DNS_Helpers.ttcn</span><br><span>index 122adff..85040fc 100644</span><br><span>--- a/library/DNS_Helpers.ttcn</span><br><span>+++ b/library/DNS_Helpers.ttcn</span><br><span>@@ -70,4 +70,27 @@</span><br><span> }</span><br><span> </span><br><span> </span><br><span style="color: hsl(120, 100%, 40%);">+function f_enc_IPv4(charstring str) return octetstring {</span><br><span style="color: hsl(120, 100%, 40%);">+   var octetstring ret := ''O;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ while (lengthof(str) > 0) {</span><br><span style="color: hsl(120, 100%, 40%);">+                var integer dot_idx;</span><br><span style="color: hsl(120, 100%, 40%);">+          var charstring num;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+         dot_idx := f_strchr(str, ".");</span><br><span style="color: hsl(120, 100%, 40%);">+              if (dot_idx >= 0) {</span><br><span style="color: hsl(120, 100%, 40%);">+                        /* there is another dot */</span><br><span style="color: hsl(120, 100%, 40%);">+                    num := substr(str, 0, dot_idx);</span><br><span style="color: hsl(120, 100%, 40%);">+                       str := substr(str, dot_idx+1, lengthof(str)-dot_idx-1);</span><br><span style="color: hsl(120, 100%, 40%);">+               } else {</span><br><span style="color: hsl(120, 100%, 40%);">+                      /* no more dot */</span><br><span style="color: hsl(120, 100%, 40%);">+                     num := str;</span><br><span style="color: hsl(120, 100%, 40%);">+                   str := "";</span><br><span style="color: hsl(120, 100%, 40%);">+          }</span><br><span style="color: hsl(120, 100%, 40%);">+             ret := ret & int2oct(str2int(num), 1);</span><br><span style="color: hsl(120, 100%, 40%);">+    }</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+   return ret;</span><br><span style="color: hsl(120, 100%, 40%);">+}</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span> }</span><br><span></span><br></pre><p>To view, visit <a href="https://gerrit.osmocom.org/c/osmo-ttcn3-hacks/+/17063">change 17063</a>. To unsubscribe, or for help writing mail filters, visit <a href="https://gerrit.osmocom.org/settings">settings</a>.</p><div itemscope itemtype="http://schema.org/EmailMessage"><div itemscope itemprop="action" itemtype="http://schema.org/ViewAction"><link itemprop="url" href="https://gerrit.osmocom.org/c/osmo-ttcn3-hacks/+/17063"/><meta itemprop="name" content="View Change"/></div></div>

<div style="display:none"> Gerrit-Project: osmo-ttcn3-hacks </div>
<div style="display:none"> Gerrit-Branch: master </div>
<div style="display:none"> Gerrit-Change-Id: I8a5450988711680c93cfd657a34db759a56bc41e </div>
<div style="display:none"> Gerrit-Change-Number: 17063 </div>
<div style="display:none"> Gerrit-PatchSet: 3 </div>
<div style="display:none"> Gerrit-Owner: osmith <osmith@sysmocom.de> </div>
<div style="display:none"> Gerrit-Reviewer: Jenkins Builder </div>
<div style="display:none"> Gerrit-Reviewer: laforge <laforge@osmocom.org> </div>
<div style="display:none"> Gerrit-MessageType: merged </div>