From a60bd7930009420f4aa9df7e926653b540dac3ff Mon Sep 17 00:00:00 2001
From: Victor Seva <vseva@sipwise.com>
Date: Tue, 19 May 2020 14:15:29 +0200
Subject: [PATCH] TT#81700 generate_test_tt2.pl: replace common headers

* From/To tag
* CSeq number
* WWW-Authenticate nonce
* Server Sipwise major version
* Content-Length >0

Change-Id: Ife7f3f6f791eb6b18b6538c99a9e612d9cb0cfa8
---
 bin/generate_test_tt2.pl | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)

diff --git a/bin/generate_test_tt2.pl b/bin/generate_test_tt2.pl
index ff7e5ffd..58286e00 100755
--- a/bin/generate_test_tt2.pl
+++ b/bin/generate_test_tt2.pl
@@ -79,6 +79,24 @@ sub subst_uuids
   }
   return $line;
 }
+
+sub subst_common
+{
+  my $line = shift;
+  if(($line =~ /^From: /i) || ($line =~ /^To: /i)) {
+    $line =~ s/;tag=(.+)/;tag=[\\w-]+/;
+  } elsif($line =~ /^CSeq: /i) {
+    $line =~ s/:[ ]+\d+[ ]+/: \\d+ /;
+  } elsif($line =~ /^WWW-Authenticate: /i) {
+    $line =~ s/nonce=".+"/nonce=".+"/;
+  } elsif($line =~ /^Server: Sipwise/i) {
+    $line =~ s/^: Sipwise .+/: Sipwise NGCP Proxy/;
+  } elsif($line =~ /^Content-Length: [1-9]/i) {
+    $line =~ s/: \d+/: \\d+/;
+  }
+  return $line;
+}
+
 sub print_header
 {
   my $_type = shift;
@@ -88,6 +106,7 @@ sub print_header
   if($uuids) {
     $line = subst_uuids($_l);
   }
+  $line = subst_common($line);
   if($_type eq 'sip_in') {
     print "  - '$line'\n";
   } else {