2019-02-25.md

Utilización de técnicas de programación segura:

• Prácticas de programación segura.
• Criptografía de clave pública y clave privada.
• Principales aplicaciones de la criptografía.
• Protocolos criptográficos.
• Política de seguridad.
• Programación de mecanismos de control de acceso.
• Encriptación de información.
• Protocolos seguros de comunicaciones.
• Programación de aplicaciones con comunicaciones seguras.

Descrifrar

• https://github.com/jesusninoc/ClasesPSP/blob/master/2019-02-21.md#descrifrar-el-siguiente-texto

$global=0
Get-Content C:\Users\administrador\Desktop\java\Original.DIC | %{
    Split-ByLength $_ -Split 20 | %{
        #$_.length
        $_
        $global+=1
        if($global -eq 8)
        {
            $global=0
        }
        for($letra=0;$letra -lt $_.length; $letra+=1)
        {
            #$_[$letra]
            #$nuevacadena+=[char]([int]$_[$letra] - ($letra))
            $nuevacadena2+=[char]([int]$_[$letra] - ($letra+$global+1))
        }
        #$nuevacadena
        #$nuevacadena=''
        $nuevacadena2
        $nuevacadena2=''
        #Pause
    }
}

function Split-ByLength{
    <#
    .SYNOPSIS
    Splits string up by Split length.

    .DESCRIPTION
    Convert a string with a varying length of characters to an array formatted to a specific number of characters per item.

    .EXAMPLE
    Split-ByLength '012345678901234567890123456789123' -Split 10

    0123456789
    0123456789
    0123456789
    123

    .LINK
    http://stackoverflow.com/questions/17171531/powershell-string-to-array/17173367#17173367
    #>

    [cmdletbinding()]
    param(
        [Parameter(ValueFromPipeline=$true)]
        [string[]]$InputObject,

        [int]$Split=10
    )
    begin{}
    process{
        foreach($string in $InputObject){
            $len = $string.Length

            $repeat=[Math]::Floor($len/$Split)

            for($i=0;$i-lt$repeat;$i++){
                #Write-Output ($string[($i*$Split)..($i*$Split+$Split-1)])
                Write-Output $string.Substring($i*$Split,$Split)
            }
            if($remainder=$len%$split){
                #Write-Output ($string[($len-$remainder)..($len-1)])
                Write-Output $string.Substring($len-$remainder)
            }
        }        
    }
    end{}
}