From 28d36cff37f033ccefb70181d7ab59dee6009a12292c188af92f6667fde62589 Mon Sep 17 00:00:00 2001 From: Petr Gajdos Date: Thu, 22 Aug 2013 14:44:51 +0000 Subject: [PATCH] - updated to newer (not newest) version of IANA assignments [bnc#831522], [bnc#731391] (both internal) OBS-URL: https://build.opensuse.org/package/show/Base:System/netcfg?expand=0&rev=14 --- netcfg.changes | 6 + services-compare.pl | 111 ++++++++++++++++++ services-compare.sh | 4 + services-create.pl | 173 ++++++++++++++++++++++++++++ services-suse.diff | 271 +++++++++++++++++++++++++------------------- services.bz2 | 4 +- services_UPDATING | 10 ++ 7 files changed, 462 insertions(+), 117 deletions(-) create mode 100644 services-compare.pl create mode 100644 services-compare.sh create mode 100644 services-create.pl create mode 100644 services_UPDATING diff --git a/netcfg.changes b/netcfg.changes index 0d47358..6ea3467 100644 --- a/netcfg.changes +++ b/netcfg.changes @@ -1,3 +1,9 @@ +------------------------------------------------------------------- +Thu Aug 22 14:42:10 UTC 2013 - pgajdos@suse.com + +- updated to newer (not newest) version of IANA assignments + [bnc#831522], [bnc#731391] (both internal) + ------------------------------------------------------------------- Wed Jun 5 11:21:06 UTC 2013 - pgajdos@suse.com diff --git a/services-compare.pl b/services-compare.pl new file mode 100644 index 0000000..d924708 --- /dev/null +++ b/services-compare.pl @@ -0,0 +1,111 @@ +#!/usr/bin/perl -w + +use strict; + +my $sfile = 'services'; +my $snewfile = 'services.new'; + +my %s; +my %snew; + +parse_services_file($sfile, \%s); +parse_services_file($snewfile, \%snew); + +my @preserved_pairs; +my @services_changing_port; +my @services_renamed; +my @removed_pairs; +my @new_pairs; + +BEGINLOOP: foreach my $port (keys %s) +{ + if (exists($snew{$port}) and $snew{$port} eq $s{$port}) + { + # service port pair preserved + push(@preserved_pairs, "$snew{$port} $port"); + next BEGINLOOP; + } + + foreach my $portnew (keys %snew) + { + if ($snew{$portnew} eq $s{$port} and protocol($portnew) eq protocol($port)) + { + push(@services_changing_port, "$snew{$portnew} $port -> $portnew"); + next BEGINLOOP; + } + } + + if (exists($snew{$port})) # and $snew{$port} ne $s{$port} and service don't use another port + { + push(@services_renamed, "$s{$port} -> $snew{$port} ($port)"); + } + else + { + push(@removed_pairs, "$s{$port} $port"); + } +} + +my $string_scp = join(" ", @services_changing_port); + +foreach my $portnew (keys %snew) +{ + if (not exists($s{$portnew})) + { + if (index($string_scp, $snew{$portnew}) == -1) + { + push(@new_pairs, "$snew{$portnew} $portnew"); + } + } +} + +print_pairs("Removed pairs", sort (@removed_pairs)); +print_pairs("Renamed or replaced services", sort (@services_renamed)); +print_pairs("Services, that changed port", sort (@services_changing_port)); +print_pairs("New pairs", sort (@new_pairs)); +print_pairs("Preserved pairs", sort (@preserved_pairs)); + +sub print_pairs +{ + my $heading = shift; + my @pairs = @_; + print "\n"; + print "$heading\n"; + my $underline = ('-' x length($heading)); + print $underline, "\n"; + foreach my $pair (@pairs) + { print $pair,"\n"; } +} + +sub protocol +{ + my $port = shift; + $port =~ s/.*\///; + return $port; +} + +sub parse_services_file +{ + my $filename = shift; + my $hashref = shift; + + open(FILE, $filename) or die "cannot read $filename\n"; + while () + { + chomp; + $_ =~ s/#.*//; + if ($_) + { + # my ($service, $port) = split(/[ \t]+/, $_); is not sufficient because of errors in xml like + # Apple Remote Desktop (Net Assistant) 3283/tcp # Net Assistant (updated 2011-11-09) [Michael_Stein] + my $service = my $port = $_; + $service =~ s:[ \t]+[0-9]+/[a-z]+.*$::; + $port =~ s:^.*[ \t]+([0-9]+/[a-z]+).*$:$1:; + $hashref->{$port} = $service; +# printf "[%s] [%s]\n", ($service, $port); + } + } + + close(FILE); +} + + diff --git a/services-compare.sh b/services-compare.sh new file mode 100644 index 0000000..89e23fd --- /dev/null +++ b/services-compare.sh @@ -0,0 +1,4 @@ +cat services | egrep -v "^#" | sed "s:#.*::" | sed "s:^\([^ \t]\+\)[ \t]\+\([^ \t]\+\)[ \t]*$:\1 \2:g" | sort > services.stripped +cat services.new | egrep -v "^#" | sed "s:#.*::" | sed "s:^\([^ \t]\+\)[ \t]\+\([^ \t]\+\)[ \y]*$:\1 \2:g" | sort > services.new.stripped +diff -u services.stripped services.new.stripped | egrep "^[+-]" +rm services.stripped services.new.stripped diff --git a/services-create.pl b/services-create.pl new file mode 100644 index 0000000..7375610 --- /dev/null +++ b/services-create.pl @@ -0,0 +1,173 @@ +#!/usr/bin/perl -w + +use strict; + +use XML::LibXML::Reader; + +my $portsurl = 'http://www.iana.org/assignments/service-names-port-numbers/service-names-port-numbers.xml'; +my $servicesfile = 'services.new'; +my $reader = XML::LibXML::Reader->new(location => $portsurl) + or die "cannot read $portsurl\n"; +open(SERVICESNEW, ">$servicesfile") or die "cannot write $servicesfile\n"; + +while ($reader->read) { + processNode($reader); +} + +sub processNode +{ + my $reader = shift; + + if ($reader->name eq 'title' and $reader->nodeType == 1) + { + $reader->read; + my $title = $reader->value; + $title =~ tr/a-z/A-Z/; + print SERVICESNEW "#\n", + "# ", $title, "\n", + "#\n"; + } + elsif ($reader->name eq 'updated' and $reader->nodeType == 1 and $reader->depth == 1) + { + $reader->read; + print SERVICESNEW "# (last updated on ", $reader->value, ")\n", + "#\n", + "# "; + } + elsif ($reader->name eq 'note' and $reader->nodeType == 1) + { + $reader->read; + while ($reader->depth != 1) + { + if ($reader->name eq '#text') + { + my $text = $reader->value; + $text =~ s/\n/\n# /g; + print SERVICESNEW $text; + } + elsif ($reader->name eq 'xref') + { + my $xref = $reader->getAttribute('data'); + $xref =~ tr/a-z/A-Z/; + printf SERVICESNEW "[%s]", $xref; + } + $reader->read; + } + print SERVICESNEW "\n"; + print SERVICESNEW "#\n"; + printf SERVICESNEW "# %-18s %-12s %s\n", ('Service Name', 'Port/Proto', 'Description, Update Date, References'); + printf SERVICESNEW "# %-18s %-12s %s\n", ('------------', '----------', '------------------------------------'); + print SERVICESNEW "#\n"; + } + elsif ($reader->name eq 'record') + { + my $name = ""; + my $number = ""; + my $protocol = ""; + my $description = ""; + my $updated = $reader->getAttribute('updated'); + my $xrefs = ""; + $reader->read; + + if (defined $updated) + { $updated = "(updated $updated)"; } + else + { $updated = ""; } + + + while ($reader->depth != 1) + { + my $property = $reader->name; + if ($property eq 'name' and $reader->nodeType == 1) # not take ending tag into account + { $reader->read; $name = $reader->value; } + elsif ($property eq 'number' and $reader->nodeType == 1) + { $reader->read; $number = $reader->value; } + elsif ($property eq 'protocol' and $reader->nodeType == 1) + { $reader->read; $protocol = $reader->value; } + elsif ($property eq 'description' and $reader->nodeType == 1) + { + if (not $reader->isEmptyElement) # sometimes happen + { + $reader->read; + while ($reader->depth == 3) # sometimes happen .*

.*;
--> ';' + { + if ($reader->name eq '#text') + { $description = $description.$reader->value." "; } + elsif ($reader->name eq 'br') + { $description = $description.";"; } + $reader->read; + } + } + } + elsif ($property eq 'xref' and $reader->nodeType == 1) + { + my $xref = $reader->getAttribute('data'); + if (defined $xref) + { + my $xreftype = $reader->getAttribute('type'); + if ($xreftype eq 'rfc') + { $xref =~ tr/a-z/A-Z/; } + + $xrefs = "$xrefs [$xref]"; + } + } + $reader->read + } + + my $comment = $description.$updated.$xrefs; + if ($name eq "") + { $name = "#"; } + elsif ($comment) + { + $comment =~ s/\n/ /g; + $comment = "# $comment"; + } + + my $numproto; + if ($number and $protocol) + { + my ($from, $to) = split('-', $number); # handle intervals + if (not $to) + { $to = $from; } + for (my $i = $from; $i <= $to; $i++) + { + $numproto = "$i/$protocol"; # to print with %-12s + printf SERVICESNEW "%-18s %-12s %s\n", ($name, $numproto, $comment); + } + } + } + elsif ($reader->name eq 'people' and $reader->nodeType == 1) + { + print SERVICESNEW "#\n"; + print SERVICESNEW "# PEOPLE\n"; + print SERVICESNEW "#\n"; + printf SERVICESNEW "# %-25s%-25s%-25s%s\n", ('ID', 'Name', 'Organization', 'Contact'); + printf SERVICESNEW "# %-25s%-25s%-25s%s\n", ('--', '----', '------------', '-------'); + print SERVICESNEW "#\n"; + } + elsif ($reader->name eq 'person') + { + my $xref = $reader->getAttribute('id'); + my $name = ""; + my $org = ""; + my $uri = ""; + + $reader->read; + while ($reader->depth != 2) + { + if ($reader->name eq 'name' and $reader->nodeType == 1) + { $reader->read; $name = $reader->value; } + if ($reader->name eq 'org' and $reader->nodeType == 1) + { $reader->read; $org = $reader->value; } + if ($reader->name eq 'uri' and $reader->nodeType == 1) + { $reader->read; $uri = $reader->value; } + + $reader->read; + } + + printf SERVICESNEW "# %-25s%-25s%-25s%s\n", ($xref, $name, $org, $uri); + } +} + +close(SERVICESNEW); + diff --git a/services-suse.diff b/services-suse.diff index 9c8d308..547952a 100644 --- a/services-suse.diff +++ b/services-suse.diff @@ -1,7 +1,7 @@ ---- services.orig 2013-06-05 13:19:34.927684739 +0200 -+++ services 2013-06-05 13:19:45.331733989 +0200 -@@ -1,3 +1,13 @@ -+# +--- services.orig 2011-12-05 09:46:23.098105498 +0100 ++++ services 2011-12-05 09:51:10.178127048 +0100 +@@ -1,4 +1,16 @@ + # +# Network services, Internet style +# +# Note that it is presently the policy of IANA to assign a single well-known @@ -9,123 +9,164 @@ +# even if the protocol doesn't support UDP operations. +# +# This list could be found on: -+# http://www.iana.org/assignments/port-numbers ++# http://www.iana.org/assignments/service-names-port-numbers/service-names-port-numbers.xml +# - # See also: services(5), http://www.sethwklein.net/projects/iana-etc/ ++# See also: services(5) ++# ++# + # SERVICE NAME AND TRANSPORT PROTOCOL PORT NUMBER REGISTRY # - # PORT NUMBERS -@@ -70,8 +80,8 @@ - # 0/tcp Reserved - # 0/udp Reserved - # Jon Postel --spr-itunes 0/tcp # Shirt Pocket netTunes --spl-itunes 0/tcp # Shirt Pocket launchTunes -+#spr-itunes 0/tcp # Shirt Pocket netTunes -+#spl-itunes 0/tcp # Shirt Pocket launchTunes - # David Nanian 28 September 2007 - tcpmux 1/tcp # TCP Port Service Multiplexer - tcpmux 1/udp # TCP Port Service Multiplexer -@@ -404,8 +414,8 @@ - pop3 110/tcp # Post Office Protocol - Version 3 - pop3 110/udp # Post Office Protocol - Version 3 - # Marshall Rose --sunrpc 111/tcp # SUN Remote Procedure Call --sunrpc 111/udp # SUN Remote Procedure Call -+sunrpc 111/tcp rpcbind # SUN Remote Procedure Call -+sunrpc 111/udp rpcbind # SUN Remote Procedure Call - # Chuck McManis - mcidas 112/tcp # McIDAS Data Transmission Protocol - mcidas 112/udp # McIDAS Data Transmission Protocol -@@ -2102,6 +2112,7 @@ - omginitialrefs 900/tcp # OMG Initial Refs - omginitialrefs 900/udp # OMG Initial Refs - # Christian Callsen -+swat 901/tcp # CONFLICT, not official assigned! - smpnameres 901/tcp # SMPNAMERES - smpnameres 901/udp # SMPNAMERES - # Leif Ekblad -@@ -5081,8 +5092,8 @@ - dls-monitor 2048/tcp - dls-monitor 2048/udp - # <== NOTE Conflict on 2049 ! --shilp 2049/tcp --shilp 2049/udp -+#shilp 2049/tcp -+#shilp 2049/udp - nfs 2049/tcp # Network File System - Sun Microsystems - nfs 2049/udp # Network File System - Sun Microsystems - # Brent Callaghan -@@ -11064,7 +11075,10 @@ - universe_suite 4184/tcp # UNIVERSE SUITE MESSAGE SERVICE - universe_suite 4184/udp # UNIVERSE SUITE MESSAGE SERVICE - # Gary ANDREWS 07 January 2008 --# 4185-4198 Unassigned -+# 4185-4189 Unassigned -+sieve 4190/tcp # ManageSieve Protocol -+# 4190/udp Reserved -+# 4191-1298 Unassigned - eims-admin 4199/tcp # EIMS ADMIN - eims-admin 4199/udp # EIMS ADMIN - # Glenn Anderson -@@ -12184,6 +12198,7 @@ - netops-broker 5465/udp # NETOPS-BROKER - # John R. Deuel - # 5466-5499 Unassigned -+axnet 5492/tcp # OFFICIAL NOT ASSIGNED - fcp-addr-srvr1 5500/tcp # fcp-addr-srvr1 - fcp-addr-srvr1 5500/udp # fcp-addr-srvr1 - fcp-addr-srvr2 5501/tcp # fcp-addr-srvr2 -@@ -12206,6 +12221,7 @@ - sgi-esphttp 5554/udp # SGI ESP HTTP - # Vladimir Legalov - ############Port 5555 also used by HP Omniback##################### -+rplay 5555/udp # and by rplay :-( - personal-agent 5555/tcp # Personal Agent - personal-agent 5555/udp # Personal Agent - # Jackie Wu -@@ -14558,6 +14574,12 @@ - hydap 15000/udp # Hypack Data Aquisition - # Mircea Neacsu - # 15001-15344 Unassigned + # (last updated on 2011-11-23) +@@ -137,8 +149,8 @@ + name 42/udp # Host Name Server + nameserver 42/tcp # Host Name Server + nameserver 42/udp # Host Name Server +-nicname 43/tcp # Who Is +-nicname 43/udp # Who Is ++nicname 43/tcp whois # Who Is ++nicname 43/udp whois # Who Is + mpm-flags 44/tcp # MPM FLAGS Protocol + mpm-flags 44/udp # MPM FLAGS Protocol + mpm 45/tcp # Message Processing Module [recv] +@@ -281,8 +293,8 @@ + pop2 109/udp # Post Office Protocol - Version 2 [Joyce_K_Reynolds] + pop3 110/tcp # Post Office Protocol - Version 3 [Marshall_Rose] + pop3 110/udp # Post Office Protocol - Version 3 [Marshall_Rose] +-sunrpc 111/tcp # SUN Remote Procedure Call [Chuck_McManis] +-sunrpc 111/udp # SUN Remote Procedure Call [Chuck_McManis] ++sunrpc 111/tcp rpcbind # SUN Remote Procedure Call [Chuck_McManis] ++sunrpc 111/udp rpcbind # SUN Remote Procedure Call [Chuck_McManis] + mcidas 112/tcp # McIDAS Data Transmission Protocol [Glenn_Davis] + mcidas 112/udp # McIDAS Data Transmission Protocol [Glenn_Davis] + ident 113/tcp +@@ -1472,6 +1484,7 @@ + cddbp 888/tcp # CD Database Protocol [Steve_Scherf] + omginitialrefs 900/tcp # OMG Initial Refs [Christian_Callsen] + omginitialrefs 900/udp # OMG Initial Refs [Christian_Callsen] ++swat 901/tcp # CONFLICT, not official assigned! + smpnameres 901/tcp # SMPNAMERES [Leif_Ekblad] + smpnameres 901/udp # SMPNAMERES [Leif_Ekblad] + ideafarm-door 902/tcp # self documenting Telnet Door +@@ -3504,6 +3517,9 @@ + x25-svc-port 1998/udp # cisco X.25 service (XOT) + tcp-id-port 1999/tcp # cisco identification port + tcp-id-port 1999/udp # cisco identification port ++# Port 2000 is illegal used by sieve ++sieve 2000/tcp # Cyrus SIEVE ++sieve 2000/udp # Cyrus SIEVE + cisco-sccp 2000/tcp # Cisco SCCP [Dan_Wing] + cisco-sccp 2000/udp # Cisco SCCp [Dan_Wing] + dc 2001/tcp +@@ -3603,8 +3619,8 @@ + dls 2047/udp + dls-monitor 2048/tcp + dls-monitor 2048/udp +-shilp 2049/tcp +-shilp 2049/udp ++#shilp 2049/tcp <== NOTE Conflict on 2049 ! ++#shilp 2049/udp + nfs 2049/tcp # Network File System - Sun Microsystems [Brent_Callaghan] + nfs 2049/udp # Network File System - Sun Microsystems [Brent_Callaghan] + nfs 2049/sctp # Network File System [RFC5665] +@@ -6088,8 +6104,8 @@ + sysopt 3281/udp # SYSOPT [Tony_Hoffman] + datusorb 3282/tcp # Datusorb [Thomas_Martin] + datusorb 3282/udp # Datusorb [Thomas_Martin] +-Apple Remote Desktop (Net Assistant) 3283/tcp # Net Assistant (updated 2011-11-09) [Michael_Stein] +-Apple Remote Desktop (Net Assistant) 3283/udp # Net Assistant (updated 2011-11-09) [Michael_Stein] ++net-assistant 3283/tcp # Net Assistant (updated 2011-11-09) [Michael_Stein] ++net-assistant 3283/udp # Net Assistant (updated 2011-11-09) [Michael_Stein] + 4talk 3284/tcp # 4Talk [Tony_Bushnell] + 4talk 3284/udp # 4Talk [Tony_Bushnell] + plato 3285/tcp # Plato [Jim_Battin] +@@ -6857,8 +6873,8 @@ + roverlog 3677/udp # RoverLog IPC [Tom_Mayo] + ipr-dglt 3678/tcp # DataGuardianLT [Bruce_Carlson] + ipr-dglt 3678/udp # DataGuardianLT [Bruce_Carlson] +-Escale (Newton Dock) 3679/tcp # Newton Dock (updated 2011-11-09) [Paul_Guyot] +-Escale (Newton Dock) 3679/udp # Newton Dock (updated 2011-11-09) [Paul_Guyot] ++newton-dock 3679/tcp # Newton Dock (updated 2011-11-09) [Paul_Guyot] ++newton-dock 3679/udp # Newton Dock (updated 2011-11-09) [Paul_Guyot] + npds-tracker 3680/tcp # NPDS Tracker [Paul_Guyot] + npds-tracker 3680/udp # NPDS Tracker [Paul_Guyot] + bts-x73 3681/tcp # BTS X73 Port [Todd_Cooper] +@@ -8961,6 +8977,7 @@ + quailnet 5464/udp # Quail Networks Object Broker [Craig_N_Bissell] + netops-broker 5465/tcp # NETOPS-BROKER [John_R_Deuel] + netops-broker 5465/udp # NETOPS-BROKER [John_R_Deuel] ++axnet 5492/tcp # OFFICIAL NOT ASSIGNED + fcp-addr-srvr1 5500/tcp # fcp-addr-srvr1 [Ken_Wittmer] + fcp-addr-srvr1 5500/udp # fcp-addr-srvr1 [Ken_Wittmer] + fcp-addr-srvr2 5501/tcp # fcp-addr-srvr2 [Ken_Wittmer] +@@ -8979,6 +8996,7 @@ + sgi-eventmond 5553/udp # SGI Eventmond Port [Andrei_Vilkotski] + sgi-esphttp 5554/tcp # SGI ESP HTTP [Vladimir_Legalov] + sgi-esphttp 5554/udp # SGI ESP HTTP [Vladimir_Legalov] ++rplay 5555/udp # and by rplay :-( + personal-agent 5555/tcp # Personal Agent [Jackie_Wu] + personal-agent 5555/udp # Personal Agent [Jackie_Wu] + freeciv 5556/tcp # Freeciv gameplay [Reinier_Post_and_Pau] +@@ -9053,6 +9071,7 @@ + # 5637/udp Reserved + vfmobile 5646/tcp # Ventureforth Mobile [Ventureforth_Inc] [Blakely_Snyder] + # 5646/udp Reserved ++nrpe 5666/tcp # nagios nrpe + amqps 5671/tcp # amqp protocol over TLS/SSL [Ted_Ross_2] + amqps 5671/udp # amqp protocol over TLS/SSL [Ted_Ross_2] + amqp 5672/tcp # AMQP [Pieter_Hintjens] +@@ -9192,8 +9211,8 @@ + ppsuitemsg 5863/tcp # PlanetPress Suite Messeng [Yannick_Fortin] + ppsuitemsg 5863/udp # PlanetPress Suite Messeng [Yannick_Fortin] + jute 5883/tcp # Javascript Unit Test Environment [Mark_Ethan_Trostler] +-rfb 5900/tcp # Remote Framebuffer [Tristan_Richardson] [RFC6143] +-rfb 5900/udp # Remote Framebuffer [Tristan_Richardson] [RFC6143] ++rfb 5900/tcp vnc-server # Remote Framebuffer [Tristan_Richardson] [RFC6143] ++rfb 5900/udp vnc-server # Remote Framebuffer [Tristan_Richardson] [RFC6143] + cm 5910/tcp # Context Management [Eivan_Cerasi] + cm 5910/udp # Context Management [Eivan_Cerasi] + cm 5910/sctp # Context Management [Justin_Yu] +@@ -11111,6 +11130,12 @@ + hde-lcesrvr-2 14937/udp # hde-lcesrvr-2 [Horizon_Digital_Ente] + hydap 15000/tcp # Hypack Data Aquisition (updated 2011-10-27) [HYPACK_Inc] [Mircea_Neacsu] + hydap 15000/udp # Hypack Data Aquisition (updated 2011-10-27) [HYPACK_Inc] [Mircea_Neacsu] +# The following entries are invalid, but needed -+pbs 15001/tcp # pbs server (pbs_server) -+pbs_mom 15002/tcp # mom to/from server -+pbs_resmom 15003/tcp # mom resource management requests -+pbs_resmom 15003/udp # mom resource management requests -+pbs_sched 15004/tcp # scheduler - xpilot 15345/tcp # XPilot Contact Port - xpilot 15345/udp # XPilot Contact Port - # Bert Gijsbers -@@ -14818,6 +14840,13 @@ - optohost004 22005/udp # Opto Host Port 5 - # Doug Leany September 2006 - # 22006-22272 Unassigned ++pbs 15001/tcp # pbs server (pbs_server) ++pbs_mom 15002/tcp # mom to/from server ++pbs_resmom 15003/tcp # mom resource management requests ++pbs_resmom 15003/udp # mom resource management requests ++pbs_sched 15004/tcp # scheduler + # 15118/tcp Reserved + v2g-secc 15118/udp # v2g Supply Equipment Communication Controller Discovery Protocol [Holger_Lochner] + xpilot 15345/tcp # XPilot Contact Port [Bert_Gijsbers] +@@ -11344,6 +11369,13 @@ + # 22125/udp Reserved + gsidcap 22128/tcp # GSI dCache Access Protocol [Christoph_Anton_Mitt] + # 22128/udp Reserved +# wnn4_* are used illegal and are not OFFICIAL ASSIGNED! -+wnn4_Cn 22289/tcp -+wnn4_Cn 22289/udp -+wnn4_Kr 22305/tcp -+wnn4_Kr 22305/udp -+wnn4_Tw 22321/tcp -+wnn4_Tw 22321/udp - wnn6 22273/tcp # wnn6 - wnn6 22273/udp # wnn6 - # Yasunari Gon Yamasita -@@ -15323,6 +15352,18 @@ - # - # The Dynamic and/or Private Ports are those from 49152 through 65535 - # -+# ++wnn4_Cn 22289/tcp ++wnn4_Cn 22289/udp ++wnn4_Kr 22305/tcp ++wnn4_Kr 22305/udp ++wnn4_Tw 22321/tcp ++wnn4_Tw 22321/udp + wnn6 22273/tcp # wnn6 [Yasunari_Gon_Yamasit] + wnn6 22273/udp # wnn6 [Yasunari_Gon_Yamasit] + cis 22305/tcp # CompactIS Tunnel [Justin_Paupore] +@@ -11738,6 +11770,17 @@ + matahari 49000/tcp # Matahari Broker [Matahari_Project] [Zane_Bitter] + # 49000/udp Reserved + # +# The mrt entry is temporary until a official number is registerd -+mrt 50000/tcp # telnet interface of mrt programs -+mrt 50000/udp # telnet interface of mrt programs ++mrt 50000/tcp # telnet interface of mrt programs ++mrt 50000/udp # telnet interface of mrt programs +# +# make apple talk more friendly +# -+rtmp 1/ddp # Routing Table Maintenance Protocol -+nbp 2/ddp # Name Binding Protocol -+echo 4/ddp # AppleTalk Echo Protocol -+zip 6/ddp # Zone Information Protocol ++rtmp 1/ddp # Routing Table Maintenance Protocol ++nbp 2/ddp # Name Binding Protocol ++echo 4/ddp # AppleTalk Echo Protocol ++zip 6/ddp # Zone Information Protocol +# - # - # REFERENCES - # ---------- + # PEOPLE + # + # ID Name Organization Contact diff --git a/services.bz2 b/services.bz2 index 1b29db5..7598ba8 100644 --- a/services.bz2 +++ b/services.bz2 @@ -1,3 +1,3 @@ version https://git-lfs.github.com/spec/v1 -oid sha256:34e49e4f5a92daea6c764f4238e0bd0153e59d35d3cb75a992da0e6f1796d9ee -size 187894 +oid sha256:f1d3a0a3822b94adb28a7b0bac03b006e19a977ed8586709c78a745d210d764f +size 257476 diff --git a/services_UPDATING b/services_UPDATING new file mode 100644 index 0000000..8985816 --- /dev/null +++ b/services_UPDATING @@ -0,0 +1,10 @@ +bunzip2 services.bz2 +perl services-create.pl # creates services.new +perl services-compare.pl > services.report # changes (more reader friendly) +bash services-compare.sh > services.diff # differences (more precise) +... review services.diff and/or services.report +rm services.report services.diff +mv services.new services +... adjust services-suse.diff +bzip2 services +