PoshCode Archive  Hex Artifact Content

Artifact 92fc3e71c60e6d68f11e400bac5d2ecbf93dc3f6b91ca033ea6de7ba9c29e9eb:

  • File TypeAlias-amp-Accelerators.ps1 — part of check-in [dea9c45290] at 2018-06-10 13:45:24 on branch trunk — New-TypeAlias, Get-TypeAlias functions for adding and querying type accelerators. Compatible with powershell 3.0, 4.0 (user: Oisin Grehan size: 2525)

0000: 23 20 65 6e 63 6f 64 69 6e 67 3a 20 61 73 63 69  # encoding: asci
0010: 69 0d 0a 23 20 61 70 69 3a 20 70 6f 77 65 72 73  i..# api: powers
0020: 68 65 6c 6c 0d 0a 23 20 74 69 74 6c 65 3a 20 54  hell..# title: T
0030: 79 70 65 41 6c 69 61 73 20 26 61 6d 70 3b 20 41  ypeAlias & A
0040: 63 63 65 6c 65 72 61 74 6f 72 73 0d 0a 23 20 64  ccelerators..# d
0050: 65 73 63 72 69 70 74 69 6f 6e 3a 20 4e 65 77 2d  escription: New-
0060: 54 79 70 65 41 6c 69 61 73 2c 20 47 65 74 2d 54  TypeAlias, Get-T
0070: 79 70 65 41 6c 69 61 73 20 66 75 6e 63 74 69 6f  ypeAlias functio
0080: 6e 73 20 66 6f 72 20 61 64 64 69 6e 67 20 61 6e  ns for adding an
0090: 64 20 71 75 65 72 79 69 6e 67 20 74 79 70 65 20  d querying type 
00a0: 61 63 63 65 6c 65 72 61 74 6f 72 73 2e 20 43 6f  accelerators. Co
00b0: 6d 70 61 74 69 62 6c 65 20 77 69 74 68 20 70 6f  mpatible with po
00c0: 77 65 72 73 68 65 6c 6c 20 33 2e 30 2c 20 34 2e  wershell 3.0, 4.
00d0: 30 0d 0a 23 20 76 65 72 73 69 6f 6e 3a 20 30 2e  0..# version: 0.
00e0: 31 0d 0a 23 20 74 79 70 65 3a 20 66 75 6e 63 74  1..# type: funct
00f0: 69 6f 6e 0d 0a 23 20 61 75 74 68 6f 72 3a 20 4f  ion..# author: O
0100: 69 73 69 6e 20 47 72 65 68 61 6e 0d 0a 23 20 6c  isin Grehan..# l
0110: 69 63 65 6e 73 65 3a 20 43 43 30 0d 0a 23 20 66  icense: CC0..# f
0120: 75 6e 63 74 69 6f 6e 3a 20 4e 65 77 2d 54 79 70  unction: New-Typ
0130: 65 41 6c 69 61 73 0d 0a 23 20 78 2d 70 6f 73 68  eAlias..# x-posh
0140: 63 6f 64 65 2d 69 64 3a 20 34 37 35 37 0d 0a 23  code-id: 4757..#
0150: 20 78 2d 61 72 63 68 69 76 65 64 3a 20 32 30 31   x-archived: 201
0160: 36 2d 30 33 2d 31 37 54 30 34 3a 34 36 3a 33 35  6-03-17T04:46:35
0170: 0d 0a 23 20 78 2d 70 75 62 6c 69 73 68 65 64 3a  ..# x-published:
0180: 20 32 30 31 36 2d 30 31 2d 30 32 54 30 34 3a 31   2016-01-02T04:1
0190: 34 3a 30 30 0d 0a 23 0d 0a 23 0d 0a 23 72 65 71  4:00..#..#..#req
01a0: 75 69 72 65 73 20 2d 76 65 72 73 69 6f 6e 20 33  uires -version 3
01b0: 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 4e 65 77  ....function New
01c0: 2d 54 79 70 65 41 6c 69 61 73 20 7b 0d 0a 3c 23  -TypeAlias {..<#
01d0: 0d 0a 20 20 20 20 2e 73 79 6e 6f 70 73 69 73 0d  ..    .synopsis.
01e0: 0a 20 20 20 20 20 20 20 20 41 64 64 20 61 20 6e  .        Add a n
01f0: 65 77 20 74 79 70 65 20 61 6c 69 61 73 20 28 61  ew type alias (a
0200: 63 63 65 6c 65 72 61 74 6f 72 29 0d 0a 20 20 20  ccelerator)..   
0210: 20 2e 64 65 73 63 72 69 70 74 69 6f 6e 0d 0a 20   .description.. 
0220: 20 20 20 20 20 20 20 41 64 64 20 61 20 6e 65 77         Add a new
0230: 20 74 79 70 65 20 61 63 63 65 6c 65 72 61 74 6f   type accelerato
0240: 72 20 74 6f 20 74 68 65 20 62 75 69 6c 74 2d 69  r to the built-i
0250: 6e 20 6c 69 73 74 20 6f 66 20 61 63 63 65 6c 65  n list of accele
0260: 72 61 74 6f 72 73 0d 0a 20 20 20 20 20 20 20 20  rators..        
0270: 6c 69 6b 65 20 5b 69 6e 74 5d 2c 20 5b 72 75 6e  like [int], [run
0280: 73 70 61 63 65 5d 2c 20 5b 70 73 6f 62 6a 65 63  space], [psobjec
0290: 74 5d 20 65 74 63 2e 0d 0a 20 20 20 20 2e 70 61  t] etc...    .pa
02a0: 72 61 6d 65 74 65 72 20 54 79 70 65 0d 0a 20 20  rameter Type..  
02b0: 20 20 20 20 20 20 54 68 65 20 74 61 72 67 65 74        The target
02c0: 20 74 79 70 65 20 74 6f 20 61 6c 69 61 73 20 28   type to alias (
02d0: 63 61 6e 20 62 65 20 61 6e 20 61 74 74 72 69 62  can be an attrib
02e0: 75 74 65 20 74 79 70 65 2e 29 0d 0a 20 20 20 20  ute type.)..    
02f0: 2e 70 61 72 61 6d 65 74 65 72 20 4e 61 6d 65 0d  .parameter Name.
0300: 0a 20 20 20 20 20 20 20 20 54 68 65 20 61 6c 69  .        The ali
0310: 61 73 20 74 6f 20 75 73 65 20 66 6f 72 20 74 68  as to use for th
0320: 65 20 74 61 72 67 65 74 20 74 79 70 65 2e 0d 0a  e target type...
0330: 20 20 20 20 2e 69 6e 70 75 74 73 0d 0a 20 20 20      .inputs..   
0340: 20 20 20 20 20 4e 6f 6e 65 2e 20 54 68 69 73 20       None. This 
0350: 63 6f 6d 6d 61 6e 64 20 64 6f 65 73 20 6e 6f 74  command does not
0360: 20 61 63 63 65 70 74 20 70 69 70 65 6c 69 6e 65   accept pipeline
0370: 20 69 6e 70 75 74 2e 0d 0a 20 20 20 20 2e 6f 75   input...    .ou
0380: 74 70 75 74 73 0d 0a 20 20 20 20 20 20 20 20 4e  tputs..        N
0390: 6f 6e 65 2e 0d 0a 0d 0a 23 3e 0d 0a 20 20 20 20  one.....#>..    
03a0: 70 61 72 61 6d 28 0d 0a 20 20 20 20 20 20 20 20  param(..        
03b0: 5b 70 61 72 61 6d 65 74 65 72 28 6d 61 6e 64 61  [parameter(manda
03c0: 74 6f 72 79 2c 20 70 6f 73 69 74 69 6f 6e 3d 30  tory, position=0
03d0: 29 5d 0d 0a 20 20 20 20 20 20 20 20 5b 76 61 6c  )]..        [val
03e0: 69 64 61 74 65 6e 6f 74 6e 75 6c 6c 28 29 5d 0d  idatenotnull()].
03f0: 0a 20 20 20 20 20 20 20 20 5b 74 79 70 65 5d 24  .        [type]$
0400: 54 79 70 65 2c 0d 0a 0d 0a 20 20 20 20 20 20 20  Type,....       
0410: 20 5b 70 61 72 61 6d 65 74 65 72 28 6d 61 6e 64   [parameter(mand
0420: 61 74 6f 72 79 2c 20 70 6f 73 69 74 69 6f 6e 3d  atory, position=
0430: 31 29 5d 0d 0a 20 20 20 20 20 20 20 20 5b 76 61  1)]..        [va
0440: 6c 69 64 61 74 65 6e 6f 74 6e 75 6c 6c 6f 72 65  lidatenotnullore
0450: 6d 70 74 79 28 29 5d 0d 0a 20 20 20 20 20 20 20  mpty()]..       
0460: 20 5b 73 74 72 69 6e 67 5d 24 4e 61 6d 65 0d 0a   [string]$Name..
0470: 20 20 20 20 29 0d 0a 0d 0a 20 20 20 20 24 61 63      )....    $ac
0480: 63 65 6c 20 3d 20 5b 70 73 6f 62 6a 65 63 74 5d  cel = [psobject]
0490: 2e 41 73 73 65 6d 62 6c 79 2e 47 65 74 54 79 70  .Assembly.GetTyp
04a0: 65 28 22 53 79 73 74 65 6d 2e 4d 61 6e 61 67 65  e("System.Manage
04b0: 6d 65 6e 74 2e 41 75 74 6f 6d 61 74 69 6f 6e 2e  ment.Automation.
04c0: 54 79 70 65 41 63 63 65 6c 65 72 61 74 6f 72 73  TypeAccelerators
04d0: 22 29 0d 0a 20 20 20 20 24 61 63 63 65 6c 3a 3a  ")..    $accel::
04e0: 61 64 64 28 24 4e 61 6d 65 2c 20 24 54 79 70 65  add($Name, $Type
04f0: 29 0d 0a 0d 0a 20 20 20 20 23 20 72 65 73 65 74  )....    # reset
0500: 20 63 61 63 68 65 0d 0a 20 20 20 20 24 61 63 63   cache..    $acc
0510: 65 6c 2e 67 65 74 66 69 65 6c 64 28 22 61 6c 6c  el.getfield("all
0520: 54 79 70 65 41 63 63 65 6c 65 72 61 74 6f 72 73  TypeAccelerators
0530: 22 2c 20 5b 72 65 66 6c 65 63 74 69 6f 6e 2e 62  ", [reflection.b
0540: 69 6e 64 69 6e 67 66 6c 61 67 73 5d 22 6e 6f 6e  indingflags]"non
0550: 70 75 62 6c 69 63 2c 73 74 61 74 69 63 22 29 2e  public,static").
0560: 73 65 74 76 61 6c 75 65 28 24 61 63 63 65 6c 2c  setvalue($accel,
0570: 20 24 6e 75 6c 6c 29 0d 0a 7d 0d 0a 0d 0a 66 75   $null)..}....fu
0580: 6e 63 74 69 6f 6e 20 47 65 74 2d 54 79 70 65 41  nction Get-TypeA
0590: 6c 69 61 73 20 7b 0d 0a 3c 23 0d 0a 20 20 20 20  lias {..<#..    
05a0: 2e 73 79 6e 6f 70 73 69 73 0d 0a 20 20 20 20 20  .synopsis..     
05b0: 20 20 20 47 65 74 73 20 61 6c 6c 20 6f 72 20 61     Gets all or a
05c0: 20 6d 61 74 63 68 69 6e 67 20 73 75 62 73 65 74   matching subset
05d0: 20 6f 66 20 74 79 70 65 20 61 6c 69 61 73 65 73   of type aliases
05e0: 20 28 61 63 63 65 6c 65 72 61 74 6f 72 73 29 0d   (accelerators).
05f0: 0a 20 20 20 20 2e 64 65 73 63 72 69 70 74 69 6f  .    .descriptio
0600: 6e 0d 0a 20 20 20 20 20 20 20 20 47 65 74 73 20  n..        Gets 
0610: 61 6c 6c 20 6f 72 20 61 20 6d 61 74 63 68 69 6e  all or a matchin
0620: 67 20 73 75 62 73 65 74 20 6f 66 20 75 73 65 72  g subset of user
0630: 2d 64 65 66 69 6e 65 64 20 61 6e 64 20 62 75 69  -defined and bui
0640: 6c 74 2d 69 6e 20 74 79 70 65 0d 0a 20 20 20 20  lt-in type..    
0650: 20 20 20 20 61 6c 69 61 73 65 73 20 28 61 63 63      aliases (acc
0660: 65 6c 65 72 61 74 6f 72 73 29 2e 0d 0a 0d 0a 20  elerators)..... 
0670: 20 20 20 20 20 20 20 59 6f 75 20 6d 61 79 20 75         You may u
0680: 73 65 20 77 69 6c 64 63 61 72 64 73 20 74 6f 20  se wildcards to 
0690: 6d 61 74 63 68 20 74 68 65 20 61 6c 69 61 73 20  match the alias 
06a0: 6e 61 6d 65 28 73 29 2e 0d 0a 20 20 20 20 2e 70  name(s)...    .p
06b0: 61 72 61 6d 65 74 65 72 20 4e 61 6d 65 0d 0a 20  arameter Name.. 
06c0: 20 20 20 20 20 20 20 54 68 65 20 61 6c 69 61 73         The alias
06d0: 20 6e 61 6d 65 20 74 6f 20 66 69 6e 64 20 28 6f   name to find (o
06e0: 70 74 69 6f 6e 61 6c 2c 20 6d 61 79 20 63 6f 6e  ptional, may con
06f0: 74 61 69 6e 20 77 69 6c 64 63 61 72 64 73 2e 29  tain wildcards.)
0700: 0d 0a 20 20 20 20 2e 69 6e 70 75 74 73 0d 0a 20  ..    .inputs.. 
0710: 20 20 20 20 20 20 20 4e 6f 6e 65 2e 20 54 68 69         None. Thi
0720: 73 20 63 6f 6d 6d 61 6e 64 20 64 6f 65 73 20 6e  s command does n
0730: 6f 74 20 61 63 63 65 70 74 20 70 69 70 65 6c 69  ot accept pipeli
0740: 6e 65 20 69 6e 70 75 74 2e 0d 0a 20 20 20 20 2e  ne input...    .
0750: 6f 75 74 70 75 74 73 0d 0a 20 20 20 20 20 20 20  outputs..       
0760: 20 5a 65 72 6f 20 6f 72 20 6d 6f 72 65 20 64 69   Zero or more di
0770: 63 74 69 6f 6e 61 72 79 20 65 6e 74 72 69 65 73  ctionary entries
0780: 20 72 65 70 72 65 73 65 6e 74 69 6e 67 20 61 20   representing a 
0790: 74 79 70 65 20 61 6c 69 61 73 20 26 20 74 79 70  type alias & typ
07a0: 65 20 6c 69 74 65 72 61 6c 20 70 61 69 72 69 6e  e literal pairin
07b0: 67 2e 0d 0a 23 3e 0d 0a 20 20 20 20 70 61 72 61  g...#>..    para
07c0: 6d 28 0d 0a 20 20 20 20 20 20 20 20 5b 70 61 72  m(..        [par
07d0: 61 6d 65 74 65 72 28 70 6f 73 69 74 69 6f 6e 3d  ameter(position=
07e0: 30 29 5d 0d 0a 20 20 20 20 20 20 20 20 5b 76 61  0)]..        [va
07f0: 6c 69 64 61 74 65 6e 6f 74 6e 75 6c 6c 6f 72 65  lidatenotnullore
0800: 6d 70 74 79 28 29 5d 0d 0a 20 20 20 20 20 20 20  mpty()]..       
0810: 20 5b 73 74 72 69 6e 67 5d 24 4e 61 6d 65 20 3d   [string]$Name =
0820: 20 22 2a 22 0d 0a 20 20 20 20 29 0d 0a 20 20 20   "*"..    )..   
0830: 20 0d 0a 20 20 20 20 24 64 69 63 74 20 3d 20 5b   ..    $dict = [
0840: 70 73 6f 62 6a 65 63 74 5d 2e 41 73 73 65 6d 62  psobject].Assemb
0850: 6c 79 2e 47 65 74 54 79 70 65 28 22 53 79 73 74  ly.GetType("Syst
0860: 65 6d 2e 4d 61 6e 61 67 65 6d 65 6e 74 2e 41 75  em.Management.Au
0870: 74 6f 6d 61 74 69 6f 6e 2e 54 79 70 65 41 63 63  tomation.TypeAcc
0880: 65 6c 65 72 61 74 6f 72 73 22 29 3a 3a 67 65 74  elerators")::get
0890: 0d 0a 20 20 20 20 24 6d 61 74 63 68 65 73 20 3d  ..    $matches =
08a0: 20 24 64 69 63 74 2e 4b 65 79 73 20 7c 20 3f 20   $dict.Keys | ? 
08b0: 7b 20 24 5f 20 2d 69 6c 69 6b 65 20 24 4e 61 6d  { $_ -ilike $Nam
08c0: 65 20 7d 0d 0a 0d 0a 20 20 20 20 69 66 20 28 24  e }....    if ($
08d0: 6d 61 74 63 68 65 73 29 20 7b 0d 0a 20 20 20 20  matches) {..    
08e0: 20 20 20 20 24 64 69 63 74 2e 47 65 74 45 6e 75      $dict.GetEnu
08f0: 6d 65 72 61 74 6f 72 28 29 20 7c 20 77 68 65 72  merator() | wher
0900: 65 20 6b 65 79 20 2d 69 6e 20 24 6d 61 74 63 68  e key -in $match
0910: 65 73 0d 0a 20 20 20 20 7d 20 65 6c 73 65 69 66  es..    } elseif
0920: 20 28 0d 0a 20 20 20 20 20 20 20 20 2d 6e 6f 74   (..        -not
0930: 20 5b 53 79 73 74 65 6d 2e 4d 61 6e 61 67 65 6d   [System.Managem
0940: 65 6e 74 2e 41 75 74 6f 6d 61 74 69 6f 6e 2e 57  ent.Automation.W
0950: 69 6c 64 63 61 72 64 50 61 74 74 65 72 6e 5d 3a  ildcardPattern]:
0960: 3a 43 6f 6e 74 61 69 6e 73 57 69 6c 64 63 61 72  :ContainsWildcar
0970: 64 43 68 61 72 61 63 74 65 72 73 28 24 4e 61 6d  dCharacters($Nam
0980: 65 29 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 20 20  e))..    {..    
0990: 20 20 20 20 77 72 69 74 65 2d 65 72 72 6f 72 20      write-error 
09a0: 2d 4d 65 73 73 61 67 65 20 22 4e 6f 20 65 78 61  -Message "No exa
09b0: 63 74 20 6d 61 74 63 68 20 66 6f 75 6e 64 20 66  ct match found f
09c0: 6f 72 20 61 6c 69 61 73 20 27 24 4e 61 6d 65 27  or alias '$Name'
09d0: 22 0d 0a 20 20 20 20 7d 0d 0a 7d 0d 0a           "..    }..}..