IP6fullAddress ( Input )

This function will convert a properly abbreviated IP6 into its full address ( 8 sets of 16bit [hexadecimal] numbers ).

Average rating: 4.8 (23 votes) Log in to vote

Tim Griffith - Show more from this author

Sample input:

IP6fullAddress ( 2001::FF:A00:0 )

Sample output:

2001:0000:0000:0000:0000:00FF:0A00:0000

Function definition: (Copy & paste into FileMaker's Edit Custom Function window)

// IP6fullAddress ( Input )
// This function will convert a properly abbreviated IP6 into its full address ( 8 sets of 16bit [hexadecimal] numbers ).
// Properly abbreviated IP6 allows for only 1 grouping of zero sets (no matter how many sets in a row) to be represented by '::'.
// All other zero sets (separate from the grouping identified with '::') must either be :0: or :0000:.
// More than one occurance of '::' will produce an error.
// 2012, Tim Griffith
// TimGriffithSr@gmail.com


Let (
	[
		~hasLoopBack = Case ( PatternCount ( Input ; "::" ) ; PatternCount ( Input ; "::" ) ; 0 ) ;
		Input = Substitute ( Input ; "::" ; ":|:" ) ;
		Input = Substitute ( Input ; ":" ; "¶" ) ;
		~vlCnt = ValueCount ( Input ) ;
		~LoopBack = Case ( ~hasLoopBack = 1 ;
			Case ( 	8 - ~vlCnt = 0 ; "0000" ;
					8 - ~vlCnt = 1 ; "0000:0000" ;
					8 - ~vlCnt = 2 ; "0000:0000:0000" ;
					8 - ~vlCnt = 3 ; "0000:0000:0000:0000" ;
					8 - ~vlCnt = 4 ; "0000:0000:0000:0000:0000" ;
					8 - ~vlCnt = 5 ; "0000:0000:0000:0000:0000:0000" ;
					8 - ~vlCnt = 6 ; "0000:0000:0000:0000:0000:0000:0000" ; "" )
			; "" ) ;
		~Grp1 = Case ( GetValue ( Input ; 1 ) = "" or  GetValue ( Input ; 1 ) = "|" ; ~LoopBack ; Right ( "0000" & GetValue ( Input ; 1 ) ; 4 ) ) ;
		~Grp2 = Case ( GetValue ( Input ; 2 ) = "" or  GetValue ( Input ; 2 ) = "|" ; ~LoopBack ; Right ( "0000" & GetValue ( Input ; 2 ) ; 4 ) ) ;
		~Grp3 = Case ( GetValue ( Input ; 3 ) = "" or  GetValue ( Input ; 3 ) = "|" ; ~LoopBack ; Right ( "0000" & GetValue ( Input ; 3 ) ; 4 ) ) ;
		~Grp4 = Case ( GetValue ( Input ; 4 ) = "" or  GetValue ( Input ; 4 ) = "|" ; ~LoopBack ; Right ( "0000" & GetValue ( Input ; 4 ) ; 4 ) ) ;
		~Grp5 = Case ( GetValue ( Input ; 5 ) = "" or  GetValue ( Input ; 5 ) = "|" ; ~LoopBack ; Right ( "0000" & GetValue ( Input ; 5 ) ; 4 ) ) ;
		~Grp6 = Case ( GetValue ( Input ; 6 ) = "" or  GetValue ( Input ; 6 ) = "|" ; ~LoopBack ; Right ( "0000" & GetValue ( Input ; 6 ) ; 4 ) ) ;
		~Grp7 = Case ( GetValue ( Input ; 7 ) = "" or  GetValue ( Input ; 7 ) = "|" ; ~LoopBack ; Right ( "0000" & GetValue ( Input ; 7 ) ; 4 ) ) ;
		~Grp8 = Case ( GetValue ( Input ; 8 ) = "" or  GetValue ( Input ; 8 ) = "|" ; ~LoopBack ; Right ( "0000" & GetValue ( Input ; 8 ) ; 4 ) ) ] ;

Case ( ~hasLoopBack > 1 ; "Input Error: only 1 set of '::' allowed!" ;
Left ( ~Grp1 & ":" & ~Grp2 & ":" & ~Grp3 & ":" & ~Grp4 & ":" & ~Grp5 & ":" & ~Grp6 & ":" & ~Grp7 & ":" & ~Grp8 ; 39 )
)
)

This function will convert a properly abbreviated IP6 into its full address ( 8 sets of 16bit [hexadecimal] numbers ). Properly abbreviated IP6 allows for only 1 grouping of zero sets (no matter how many sets in a row) to be represented by '::'. All other zero sets (separate from the grouping identified with '::') must either be :0: or :0000:. More than one occurance of '::' will produce an error.

Comments

Note: these functions are not guaranteed or supported by BrianDunning.com. Please contact the individual developer with any questions or problems.

IP6fullAddress ( Input )

Comments

Support this website.

Support this website.