From 70805f541ca6bf57e7af75604c490d172bc66899 Mon Sep 17 00:00:00 2001
From: Oliver Gorwits <oliver@cpan.org>
Date: Fri, 26 Nov 2021 14:46:52 +0000
Subject: [PATCH] add code to regenerate the oui.sql file in upstream-sources

---
 bin/netdisco-deploy | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/bin/netdisco-deploy b/bin/netdisco-deploy
index 2d8562ee..c124f1bc 100755
--- a/bin/netdisco-deploy
+++ b/bin/netdisco-deploy
@@ -257,6 +257,17 @@ sub deploy_oui {
                               } keys %data
             ]);
           });
+
+          if (scalar @ARGV > 1) {
+              my @sql_lines = ('COPY oui (oui, company, abbrev) FROM stdin;');
+              foreach my $oui (sort {$a cmp $b} keys %data) {
+                  push @sql_lines, sprintf "%s\t%s\t%s",
+                    $oui,
+                    Encode::decode('UTF-8', $data{$oui}{'company'}),
+                    Encode::decode('UTF-8', $data{$oui}{'abbrev'});
+              }
+              File::Slurper::write_text($ARGV[1], join "\n", @sql_lines, "\\.\n\n");
+          }
       }
 
       print color 'bold blue';