ttcn3
/
osmo-ttcn3-hacks
mirror of https://gerrit.osmocom.org/osmo-ttcn3-hacks
10
0
Fork 1
Code Issues Releases Wiki Activity

Move f_strstr_count() Osmocom_VTY_Functions.ttcn -> Misc_Helpers.ttcn 

This is quite a generic string handling function which fits better
in a generic utility file like Misc_Helpers.ttcn.

Change-Id: I105844d2bcab6c24624be1224c1ba78b69d4b44c
This commit is contained in:
Pau Espin 2024-04-17 19:13:22 +02:00
parent 487c332851
commit e8a6b87560
2 changed files with 17 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
library/Misc_Helpers.ttcn
View File

@ -61,4 +61,21 @@ function f_addrstr2addr(charstring addr) return octetstring {
}
}
/* Return a count of how many times sub_str occurs in str. */
function f_strstr_count(in charstring str, in charstring sub_str) return integer
{
var integer count := 0;
var integer pos := 0;
while (true) {
var integer at := f_strstr(str, sub_str, pos);
if (at < 0) {
break;
}
count := count + 1;
pos := at + 1;
}
return count;
}
}

17
library/Osmocom_VTY_Functions.ttcn
View File

@ -228,23 +228,6 @@ function f_vty_transceive_match_regexp_retry(TELNETasp_PT pt, charstring cmd, ch
return "";
}
/* Return a count of how many times sub_str occurs in str. */
function f_strstr_count(in charstring str, in charstring sub_str) return integer
{
var integer count := 0;
var integer pos := 0;
while (true) {
var integer at := f_strstr(str, sub_str, pos);
if (at < 0) {
break;
}
count := count + 1;
pos := at + 1;
}
return count;
}
private type record of charstring StrList;
/* Perform a 'show talloc-context' to get a count of the given object_strs that are still allocated.