Error "HttpException (0x80004005): Se excedió la longitud de solicitud máxima"

Si, una página que tiene una gridview (ASP .NET C#) con gran (gran gran gran gran) cantidad  de datos de repente, así como así, empieza a tirar el siguiente error:

"HttpException (0x80004005): Se excedió la longitud de solicitud máxima"
ó
"Maximum request length exceeded."

Bueno, la solución resultó bastante fácel, era un problema de configuración del maxRequestLength (el nombre lo dice todo)... entonces le puse:


<configuration>
...
...
...
    <system.web>
...
...
...
       <httpRuntime maxRequestLength="8000" />

...
...
    </system.web>
...
...
  </configuration>

OHH!!! El error Could not load file or assembly Microsoft.CodeDom.Providers.DotNetCompilerPlatform bla bla bla

Tengo mi aplicación ASP.NET MVC funcionando en mi servidor local, desarrollada en VS 2015, pero cuando lo subo al servidor me da este error:

Server Error in '/test' Application.

---

Could not load file or assembly 'Microsoft.CodeDom.Providers.DotNetCompilerPlatform, Version=1.0.0.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35' or one of its dependencies. Access is denied.

Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code.

Exception Details: System.IO.FileLoadException: Could not load file or assembly 'Microsoft.CodeDom.Providers.DotNetCompilerPlatform, Version=1.0.0.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35' or one of its dependencies. Access is denied.

Source Error:

An unhandled exception was generated during the execution of the current web request. Information regarding the origin and location of the exception can be identified using the exception stack trace below.

...Después de dar vueltas por todos lados encuentro que el problema me lo está generando el paquete Roslyn, el problema es que el servidor donde estoy publicando todavía no tiene el soporte necesario para Roslyn C#6 todavía, por eso la solución puede ser deshabilitar esta funcionalidad, aunque esto nos va a impedir utilizar las más modernas características de C#6, pero al menos tendremos nuestra aplicación funcionando.
Para deshabilitar corremos estas dos líneas en la consola de administración de paquetes

uninstall-package Microsoft.CodeDom.Providers.DotNetCompilerPlatform
uninstall-package Microsoft.Net.Compilers

Luego de esto pide reiniciar el VS2015 y hay que recompilar. En mi caso funcionó sin tener que hacer ninguna otra modificación.
Más información en este blog http://blog.gldraphael.com/removing-roslyn-from-asp-net-4-5-2-project-template/

Como saber si windows 10 se está iniciando en safe mode

Acá unas cositas útiles si tenemos que descubrir (por alguna extraña razón, y si llegaste a este post buscando esta información es porque alguna terrible maldición ha caído en tu destino, recemos, Jesús, Alá, Buda, los amo a todos!!!) si windows 10 se está ejecutando en modo a prueba de fallos (modo seguro, safe mode, o como corno quieran llamarlo) o no...

Bueno, la primer forma, es solo si sos muy groso y tenés el poder, abrí una Concha Poderosa y metele dedos sin miedo... (powershell y tipear)

gwmi win32_computersystem | select BootupState

Yo lo hice... :)

Bueno... eso da como resultado algo asi:

Normal boot
Fail-safe boot
Fail-safe with network boot

se entiende no??

Bueno, la otra forma, es si la maldición es más fuerte todavía y no tenes el powershell, en ese caso escribo "..." varias veces para que puedas maldecir tu destino tranquilamente antes de continuar con el post

...
...
......
...
......
...
...no es suficiente todavía???
...
......
...
...bueno, continuando, no todo está perdido... la otra forma es usando la línea de comandos (escribí cmd en ejecutar desde el inicio de windows) y después escribir:

wmic COMPUTERSYSTEM GET BootupState

bueno... y eso es todo.

Como bajar en un csv todos mis grupos de facebook

Bueno, algo de automatización... Hace unos días quería sacar una lista de todos mis grupos de facebook y esto me llevo a descubrir una linda herramienta que permite sacar información y automatizar actividades repetitivas que hacemos por internet.
La herramienta de la que hablo es iMacros (http://imacros.net/) que tiene un lindo plugin para firefox.
Se instala el plugin en firefox y despues de loguearme en mi face corro el siguiente iMacro me deja un listado de todas urls de mis grupos en un archivo csv

VERSION BUILD=8940826 RECORDER=FX
TAB T=1

URL GOTO=https://www.facebook.com/PanchoGuevara/groups

TAG POS={{!LOOP}} TYPE=A ATTR=HREF:*/groups/* EXTRACT=HREF

SAVEAS TYPE=EXTRACT FOLDER=* FILE=misGrupos.csv

El eclipse instala Pydev pero no lo muestra...

Un problema bastante común al instalar el Pydev en Eclipse (lo instale entrando por Help->Install new software y agregando "PyDev - http://pydev.org/updates"), aparentemente se había instalado todo bien, pero sin embargo después de reiniciado el Eclipse no se veía el Pydev...
Luego de romperme la cabeza buscando por internet veo que el problema es porque Pydev necesita tener java en version 7 para funcionar. 
Verifico mi Debian Wheezy y por defecto trae java 6, por suerte se puede instalar java 7 desde el gestor Synaptic, buscamos algo como java-7-openjdk-amd64 o algo y lo instalamos) después hacemos desde una terminal con root:

update-alternatives --config java

y ahí aparece un menú que permite elegir la versión de java por defecto y seteamos la 7.

Reiniciamos Eclipse y ¡eureca! apareció el pydev. 

Cambiar timeout en php

Un programa en php que tiene que hacer muchas operaciones con la base de datos (lo cual tarda un tiempo considerable ya que hace un merge de una base grande casi completa) me tiraba el error...

Fatal error: Maximum execution time of 30 seconds exceeded in xxxx

Para arreglar el problema desde PHP le defino mas time_limit al script usando la función

set_time_limit(600);


... que limita el tiempo máximo de ejecución del script... acá más info: http://php.net/manual/es/function.set-time-limit.php

Cómo setear variables globales en MySQL

Desde línea de comandos (consola linux)...

#>mysql -uroot -e "show variables like '%timeout';" -p

+----------------------------+-------+
| Variable_name              | Value |
+----------------------------+-------+
| connect_timeout            | 10    |
| delayed_insert_timeout     | 300   |
| innodb_lock_wait_timeout   | 50    |
| innodb_rollback_on_timeout | OFF   |
| interactive_timeout        | 28800 |
| net_read_timeout           | 30    |
| net_write_timeout          | 60    |
| slave_net_timeout          | 3600  |
| table_lock_wait_timeout    | 50    |
| wait_timeout               | 28800 |
+----------------------------+-------+ 

10 rows in set (0.00 sec)

#>mysql -uroot -e "SET GLOBAL net_read_timeout=600;" -p 

#>mysql -uroot -e "show variables like '%timeout';" -p

+----------------------------+-------+
| Variable_name              | Value |
+----------------------------+-------+
| connect_timeout            | 10    |
| delayed_insert_timeout     | 300   |
| innodb_lock_wait_timeout   | 50    |
| innodb_rollback_on_timeout | OFF   |
| interactive_timeout        | 28800 |
| net_read_timeout           | 600   |
| net_write_timeout          | 60    |
| slave_net_timeout          | 3600  |
| table_lock_wait_timeout    | 50    |
| wait_timeout               | 28800 |
+----------------------------+-------+ 
10 rows in set (0.00 sec)

Listo!
:-P

Yo elijo...

Mi manual de Mojolicious en español

Mayormente una traducción de http://mojolicio.us/perldoc

 (MUY EN CONSTRUCCIÓN)

Introducción
Ruteado

Borrar muchos registros en CouchDB

Bueno, acá les dejo un script en Perl para borrar todos los registros obtenidos de una vista de CouchDB.

use strict;
use Store::CouchDB;

# database
my $couch_db = Store::CouchDB->new({ user => '<mi_user>', pass => '<mi_clave>' });
$couch_db->config({db => '<nombre_de_la_base>'});


my $mis_docs = $couch_db->get_view({  view => '<documento_de_diseño>/<nombre_de_la_vista>' });


while ( my ($key, $value) = each($mis_docs) ) {
    print "borrando registro id: $key\n";
    $couch_db->del_doc({id => $key}) or warn "err\n";
}

Espero que les sea útil.

CouchDB - Manejo de usuarios

Bueno, acá como crear usuarios, darles permisos y roles, etc...
Primeros, para el administrador, ni bien entramos deberíamos ponerle clave al administrador, eso de hace desde el futon (por defecto en http://localhost:5984/_utils/) y haciendo click en la parte inferior derecha, donde dice  " Welcome to Admin Party! Everyone is admin. Fix this" (en el Fix this :-). Y ahí nos pedirá Usuario y Clave.

Después deberíamos entrar en las bases de datos que tengamos y setearle miembros y administradores, ya que las bases que no tienen ningún miembro son públicas.
También si queremos deshabilitar el acceso anónimo a la base debemos entrar en Tools->Configuration (en la parte derecha del futon) y setear en true la variable require_valid_user.

Tipos de usuarios

En CouchDB se pueden setear tres tipos de usuario:

• Adminsitradores: como vimos arriba, los usuarios admin del servidor tienen todos los privilegios.
• Administradores de la base de datos: tienen todos los privilegios dentro de la base de datos de la que son administrador, pero no pueden acceder a otras bases ni crear o borrar otras bases ni la propia.
• Y por último los miembros de la base de datos: pueden ver, crear y editar documentos en la base, excepto los de diseño.

Los Server Admin ya vimos como se setean. Los Database Administrators se setean en el objeto de seguridad de la base de datos, que se configura desde futon, entrando en la base y luego, en el botón "Security", en la parte superior, ahí me deja  ingresar los admins y los members de la base.
Hay que tener en cuenta que para que no permita acceso a cualquier usuario hay que ingresar al menos un valor en estos campos, ya que si dejamos por ejemplo los Roles vacíos va a dejar entrar a cualquiera, porque la base no tiene ningún rol asignado (lo mismo para miembros); entonces cualquiera podrá modificar documentos, aunque los documentos de diseño solo podrán ser modificados por administradores del servidor.

Usuarios

Para crear usuarios en nuestra base es muy facil, se crean como documentos en la base _users (si quisiéramos usar otro nombre se setea en la propiedad authentication_db de configuración). Con lo cual para crear el usuario pepe haríamos:

{
   "_id": "org.couchdb.user:pepe",
   "name": "pepe",
   "password": "password_de_pepe",
   "roles": ["DataEntry"
   ],
   "type": "user"
}

Para los usuarios, el _id debe comenzar con "org.couchdb.user:nombre de usuario" y nombre de usuario debe coincidir con name. En "roles" ponemos los roles a los que el usuario pertenece.

Roles

En nuestro servidor de base de datos podemos crear diferentes roles para los usuario. Como vimos en la creación de usuarios, le podemos dar al mismo usuario uno o más roles. Bueno, ahora entrando en nuestra base y yendo a "Security" (en el menú superior de Futon) podemos darle a esos roles permisos de administrador o miembro de la base; lo que hace que todos los usuarios que tengan el rol adquieran sobre nuestra base los permisos que le demos al rol.

Vistas en CouchDB

Para utilizar los datos de nuestra base CouchDB se utilizan vistas (views), que se escriben en JavaScript, las hay de dos tipos:

• Las "vistas temporales" (temporary views) usadas mayormente en desarrollo ya que son muy lentas.
• Las "vitas permanentes" que son documentos "especiales" de la base que se almacenan con el prefijo "_design"

Funciones de mapeo (Map Functions)

Cómo crear la vista en JavaScript... para explicar un ejemplo. Supongamos que tenemos documentos correspondientes a

{
   "_id": "320c8f17caa2698efdc307d7e6000b73",
   "type": "persona",
   "nombre": "Juan",
   "apellido": "Perez",
   "documento": 45678913
}

A los documentos les ponemos un type (o tipo) para identificarlos nosotros, bueno, si queremos una vista para ver las "personas" tenemos:

{
   "_id": "_design/personas",
   "_rev": "1-4530f2212bd4df41abeb18285a1ec450",
   "language": "javascript",
   "views": {
       "personas": {
           "map": "function(doc) {\n  if (doc.type == 'persona'){\n    emit(doc.documento, doc);\n  }\n}"
       }
   }
}

Analizando lo último, vemos que cree un documento con el id especial "_design/personas" (que lo identifica como documento de diseño), y que tiene una vista también llamada "personas" que tiene a su vez una función de mapeo.
Las funciones de mapeo se ejecutan para crear los índices de la base^*1, se corren para todos los elementos de la misma. La función recibe doc, que es el documento de que se trate (se ejecuta una vez por cada documento), por eso lo primero que hacemos es ver si se trata de un documento de "persona", si es así corresponde emitir un resultado para le índice, que debe ser un par clave/valor, en este caso ponemos dni (doc.dni será la clave) y el documento mismo.^*2

---

*1 La primera vez que usa una vista puede tardar en responder (dependiendo de la cantidad de datos que involucre) ya que es el momento en que se crea el índice mapeado (no cuando se graba la vista, sino la primera vez que se la invoca).
*2 Siempre debemos llamar a la función emit para envíe el par clave/valor para el índice.

Fuente: http://wiki.apache.org/couchdb/Introduction_to_CouchDB_views

CouchDB desde perl, primeros pasos

CouchDB es una base de datos NOSQL de apache. Según leemo en Wikipedia "Se trata de una base de datos NoSQL que emplea JSON para almacenar los datos, JavaScript como lenguaje de consulta por medio de MapReduce y HTTP como API.¹ Una de sus características más peculiares es la facilidad con la que permite hacer replicaciones.". ¡FANTÁSTICO!

Bueno, veamos como hacer desde perl para conectar a esta base y hacer algunas operaciones (simple ABM)...

# Para empezar usamos estos modulitos perl que baje de cpan
# Mas info dobre Store::CopuchDB en http://search.cpan.org/~norbu/Store-CouchDB-2.8/lib/Store/CouchDB.pm

use strict;
use Store::CouchDB;
use JSON;
# database
my $couch_db = Store::CouchDB->new();

# si tenemos la base con usuario y pass hacemos

# my $couch_db = Store::CouchDB->new( { user => '<mi user>', pass => 'mi pass', host => 'localhost o lo que sea' } );

 #creo una base de datos llamada 'pancho'
$couch_db->create_db('pancho');
print "base creada\n";

print "enter para seguir...";
<STDIN>;
#le configuro que use la base pancho
$couch_db->config({db => 'pancho'});
print "base seteada\n";

#Agrego un documento a mi base couchDB
my $doc = decode_json (' 
{
    "type":"persona",
    "nombre":"Felipe",
    "apodo":"Pipe",
    "telefonos":[
        {"tipo":"casa","numero":"123456789"}
        ]
}');
$couch_db->put_doc({doc => $doc});

print "Pipe agregado\nenter para seguir...";
<STDIN>;

$doc = decode_json (' 
{
    "type":"persona",
    "nombre":"Alberto",
    "apodo":"Beto",
    "telefonos":[
        ]
}');

my $inserted_doc = $couch_db->put_doc({doc => $doc});
print "Id del documento insertado (_id): $inserted_doc\n";
print "Beto agregado\nenter para seguir...";
<STDIN>;

$doc = decode_json (' 
{
    "type":"persona",
    "nombre":"Francisco",
    "apodo":"Pancho",
    "telefonos":[
        {"tipo":"casa","numero":"123456789"},
        {"tipo":"trabajo","numero":"987654321"},
        {"tipo":"celular","numero":"963258741" }
        ]
}');
$couch_db->put_doc({doc => $doc});

print "Pancho agregado\nenter para seguir...";
<STDIN>;
#leo un documento por su id
my $mi_doc = $couch_db->get_doc({id => $inserted_doc});
print "\n\nJSON:" . encode_json($mi_doc) . "\n\n";
print "Apodo de documento traido: " . $mi_doc->{apodo} . "*******\n";

$mi_doc->{apodo} = 'kuki';

#cambio el apodo
print "Apodo nuevo: " . $mi_doc->{apodo}  . "\n";
#actualizo el documento
$couch_db->put_doc({doc => $mi_doc});


#borro el documento
$couch_db->del_doc({id => $inserted_doc});

#borro la base

print "Registro modificado\nenter para seguir...";
<STDIN>;


print "\n";
1;

---

La instalación de CouchDB en windows es trivial, corre el instalador que se baja de http://couchdb.apache.org/ y listo.
yo para laburar perl desde windows uso DWIM Perl,l una genial distribución que tiene un perl basado en strawberry perl, muchos módulos de cpan preinstalados y el IDE Padre para programar en perl, que está muy copado.
Con estas herramientas instaladas para hacer el ejemplo de arriba solo debemos hacer
cpan -i JSON
cpan -i Store::CouchDB

---

Agregado 4/2014:
Luego de usar durante algún tiempo esta versión de Store::CouchDB de CPAN descubro que tengo un problema con los valores false y true, el problema viene de que perl no tiene false y true propiamente dichos (0 es false, etc) por lo que si quiero poner un valor false en CouchDB lo guarda como el string "false" (lo mismo con true).
Este problema se soluciona usando
Types::Serialiser::false
o
Types::Serialiser::true

También estoy usando una versión más reciente de Store::CouchDB, al momento la 3.6 que extrañamente no se encuentra en CPAN pero sí en github, podemos bajarla desde https://github.com/norbu09/Store-CouchDB.

Usar funciones de PHP desde Perl fácil

A veces se hace necesario llamar a funciones de php desde un programa en perl. Eso es posible haciendo lo siguiente.

Creamos el archivo test.php con:

<?php

function testPHP($value){
    echo "Pruyeba111 de PHP:" . $value;
}

?>

Luego creamos el archivo perl que usara la función de php y nos queda así:

#!/usr/bin/perl

my $res = `php -r '
 

include_once "test.php";

testPHP ("\n\nTEEST2\n\n");

'
`;

print "\n\nResultado: $res";

Observar que la comilla en la línea de my $res= es una comilla simple que se usa en perl para ejecutar instrucciones de "afuera" del perl, es similar a escribir por consola o una llamada a la función "system(xxx)" de perl.

Subir archivos al servidor GLPI con FusionInventory manualmente

Para agregar archivos (files) al servidor, cuando creamos un paquete (package), en .
Los archivos deben ser agregados en la carpeta
   <server root>/files/_plugins/fusinvdeploy/upload
Todos los archivos que ponga en esa carpeta los verá en la creación del package de Fusion Inventory yendo por Plugins->Package Management y seleccionando o creando un paquete, cuando hace click en "Add file" en Files to copy on computer.

Imprimir en impresora de etiquetas SATO desde PowerShell

Aquí les dejo un pequeño programa que me habilita la impresión desde PowerShell en impresoras de etiquetas SATO. (parte del código salio de http://social.msdn.microsoft.com/Forums/en-US/94967169-a9ee-45db-9c8a-acd6f173680d/rawprinthelper-for-bold-font)...

El archivo PrinterHelper.ps1 es

clear

$src = @'
using System;
using System.IO;
using System.Runtime.InteropServices;

public class RawPrinterHelper
{
 // Structure and API declarions:
 [StructLayout(LayoutKind.Sequential, CharSet = CharSet.Ansi)]
 public class DOCINFOA
 {
  [MarshalAs(UnmanagedType.LPStr)]
  public string pDocName;
  [MarshalAs(UnmanagedType.LPStr)]
  public string pOutputFile;
  [MarshalAs(UnmanagedType.LPStr)]
  public string pDataType;
 }

 #region "Imports"
  [DllImport("winspool.Drv", EntryPoint = "OpenPrinterA", SetLastError = true, CharSet = CharSet.Ansi, ExactSpelling = true, CallingConvention = CallingConvention.StdCall)]
  public static extern bool OpenPrinter([MarshalAs(UnmanagedType.LPStr)] string szPrinter, out IntPtr hPrinter, IntPtr pd);

  [DllImport("winspool.Drv", EntryPoint = "ClosePrinter", SetLastError = true, ExactSpelling = true, CallingConvention = CallingConvention.StdCall)]
  public static extern bool ClosePrinter(IntPtr hPrinter);

  [DllImport("winspool.Drv", EntryPoint = "StartDocPrinterA", SetLastError = true, CharSet = CharSet.Ansi, ExactSpelling = true, CallingConvention = CallingConvention.StdCall)]
  public static extern bool StartDocPrinter(IntPtr hPrinter, Int32 level, [In, MarshalAs(UnmanagedType.LPStruct)] DOCINFOA di);

  [DllImport("winspool.Drv", EntryPoint = "EndDocPrinter", SetLastError = true, ExactSpelling = true, CallingConvention = CallingConvention.StdCall)]
  public static extern bool EndDocPrinter(IntPtr hPrinter);

  [DllImport("winspool.Drv", EntryPoint = "StartPagePrinter", SetLastError = true, ExactSpelling = true, CallingConvention = CallingConvention.StdCall)]
  public static extern bool StartPagePrinter(IntPtr hPrinter);

  [DllImport("winspool.Drv", EntryPoint = "EndPagePrinter", SetLastError = true, ExactSpelling = true, CallingConvention = CallingConvention.StdCall)]
  public static extern bool EndPagePrinter(IntPtr hPrinter);

  [DllImport("winspool.Drv", EntryPoint = "WritePrinter", SetLastError = true, ExactSpelling = true, CallingConvention = CallingConvention.StdCall)]
  public static extern bool WritePrinter(IntPtr hPrinter, IntPtr pBytes, Int32 dwCount, out Int32 dwWritten);
 #endregion


 public  RawPrinterHelper(){}

 // SendBytesToPrinter()
 // When the function is given a printer name and an unmanaged array
 // of bytes, the function sends those bytes to the print queue.
 // Returns true on success, false on failure.
 public  bool SendBytesToPrinter(string szPrinterName, IntPtr pBytes, Int32 dwCount)
 {
  Int32 dwError = 0, dwWritten = 0;
  IntPtr hPrinter = new IntPtr(0);
  DOCINFOA di = new DOCINFOA();
  bool bSuccess = false; // Assume failure unless you specifically succeed.

  di.pDocName = "My document";
  di.pDataType = "RAW";

  try
  {
   // Open the printer.
   if (OpenPrinter(szPrinterName.Normalize(), out hPrinter, IntPtr.Zero))
   {
    // Start a document.
    if (StartDocPrinter(hPrinter, 1, di))
    {
     // Start a page.
     if (StartPagePrinter(hPrinter))
     {
      // Write your bytes.
      bSuccess = WritePrinter(hPrinter, pBytes, dwCount, out dwWritten);
      EndPagePrinter(hPrinter);
     }
     EndDocPrinter(hPrinter);
    }
    ClosePrinter(hPrinter);
   }
  }
  catch (Exception ex)
  {
   throw (ex);
  }
  // If you did not succeed, GetLastError may give more information
  // about why not.
  if (bSuccess == false)
  {
   dwError = Marshal.GetLastWin32Error();
  }
  return bSuccess;
 }

 public  bool SendStringToPrinter(string szPrinterName, string szString)
 {
  IntPtr pBytes;
  Int32 dwCount;
  szString = reemplazarCaracteres(szString);
  // How many characters are in the string?
  dwCount = szString.Length;
  // Assume that the printer is expecting ANSI text, and then convert
  // the string to ANSI text.
  pBytes = Marshal.StringToCoTaskMemAnsi(szString);
  // Send the converted ANSI string to the printer.
  SendBytesToPrinter(szPrinterName, pBytes, dwCount);
  Marshal.FreeCoTaskMem(pBytes);
  return true;
 }

 private string reemplazarCaracteres(string PrintCommand)
 {
  PrintCommand = PrintCommand.Replace("<STX>", ((char)02).ToString());
  PrintCommand = PrintCommand.Replace("<ETX>", ((char)03).ToString());
  PrintCommand = PrintCommand.Replace("<ESC>", ((char)27).ToString());
  return PrintCommand;
 }
}

'@


Add-Type -TypeDefinition $src -Language CSharpVersion3


$PrinterHelper = new-object RawPrinterHelper



 

Su uso es simple, por ejemplo desde otro archivo ps1 hacemos

. .\PrinterHelper.ps1

$PrinterHelper.SendStringToPrinter('\\PROG03\sato cg408', '<STX><ESC>A1002400880<ESC>A<ESC>H0030<ESC>V0030<ESC>BT101030100<ESC>BW03100*555*<ESC>H0030<ESC>V0133<ESC>WB0555<ESC>Q1<ESC>Z<ETX>') 

Con lo que estaríamos imprimiendo una etiqueta con el valor 555 en code39, imprimiendo el número 555 debajo.
Esta misma clase se puede usar para imprimir desde .Net (con c#)

Imprimir etiquetas con impresora SATO GC408TT

La impresión en este modelo de impresora se hace utilizando el lenguaje SBPL. En caso de este modelo de impresora tiene una definición de 8 puntos por milímetro y las medidas se indican en puntos, por lo cual deberemos multiplicar por 8 para tener el tamaño de un mm.

Las impresiones empiezan con <STX> y terminan con <ETX>.
<ESC>A1: para establecer el tamaño de la etiqueta (vendría a ser como el tamaño del papel), el formato es <ESC>A1aaaaabbbb // a = Label Length b = Label Width
Luego en <ESC>H0025<ESC>V0425 indica el desplazamiento en x e y (horizontal y vertical) respectivamente de lo que se va a imprimir.
<ESC>BT101030103 indica el tipo de código
BTabbccddee Bar Codes. Variable Ratio. provides the ability to print a bar code with a
ratio other than those specified through the standard bar code commands
(B, BD, and D).
a = Bar code option:
0: Codabar
1: Code 39
2: Interleaved 2 of 5
5: Industrial 2 of 5
6: Matrix 2 of 5
bb = Narrow space in dots (01-99)
cc = Wide space in dots (01-99)
dd = Narrow bar in dots (01-99)
ee = Wide bar in dots (01-99)
luego de eso sigue:
<ESC>BWaabbb
aa = Expansion factor by which the2width of all bars and spaces will be
increased (01 to 12)
bbb = Bar height by dot (004 to 999 dots)
Place immediately following the <ESC>BT command and preceding data to be
encoded.
EXAMPLE <ESC>A
<ESC>H0050<ESC>V0050<ESC>BT101030103
<ESC>BW04100*1234*
<ESC>Q1
<ESC>Z



Ejemplo:
<STX>
<ESC>A1002400880
<ESC>A
<ESC>H0030<ESC>V0030<ESC>BT101030100<ESC>BW03100*4445*
<ESC>H0030<ESC>V0133<ESC>WB04445
<ESC>Q1
<ESC>Z
<ETX>

Instalando Symfony

Lo bajo de http://symfony.com/download (el archivo actual es Symfony_Standard_Vendors_2.3.1.tgz) y lo dejo en /var/www/. Luego le hago
tar xzvf Symfony_Standard_Vendors_2.3.1.tgz
con ésto se me descomprimió y queda en la carpeta /var/www/Symfony a la cual entro con
cd Symfony
y una vez ahí corremos
php app/check.php
que nos va a verificar que nuestro sistema tenga los requisitos necesarios para que funcione bien la aplicación. En mi caso me tiro algunos errores en el archivo php.ini que tuve que resolver. Observar que en la primer parte de la respuesta que nos da check.php está indicado cuál archivo php.ini está usando Symfony (en nuestro sistema puede haber más de un php.ini).
Casi todos los errores fueron de fácil resolución, pero tuve uno warning "WARNING  short_open_tag should be disabled in php.ini          Set short_open_tag to off in php.ini*." que me costó un poco más y fue porque no me tomaba el valor del short_open_tag = Off aunque yo lo puse y esto era porque el "short_open_tag" estaba dos veces en el php.ini, con lo cual, el problema se soluciona, comentando una de las líneas sobrantes.

Powershell y passwords

EnPower Shell a veces tenemos la necesidad de manejar claves, para lo que tenemos que por ejemplo para leer una clave y que aparezcan los típicos asteriscos, cada vez que pulsamos una tecla hacemos:

$psw = Read-Host "Ingrese la clave" -AsSecureString

Donde, con  "-AsSecureString" le indicamos que guarde lo ingresado en un string seguro. Bueno, ahora si ponemos

Write-Host $psw

vemos que la respuesta es

System.Security.SecureString

Lo cual nos deja un poco perplejos, para ver el valor ingresado debemos hacer

$BSTR = [System.Runtime.InteropServices.Marshal]::SecureStringToBSTR($psw)

Write-Host [System.Runtime.InteropServices.Marshal]::PtrToStringAuto($BSTR)

...lo que nos mostrará la clave ingresada por el usuario.

PowerShell: Búsqueda Binaria en arrays de objetos personalizados

El problema del IComparer

Siguiendo con el tema de la búsqueda rápida (haciendo búsqueda binaria), en éste artículo ya había encontrado cómo hacer una búsqueda binaria sobre un ArrayList desde Power Shell, pero al complicar un poco el tema, usando arreglos de objetos propios encontré un problema...
El problema es que al ser objetos propios debemos indicarle sobre qué campo hacer la búsqueda y cómo se ordenan los objetos... El mismo problema tenemos al ordenar (hacer un sort) sobre un Array o ArrayList.
Veamos a un ejemplo, tenemos un ArrayList de objetos Empleado, con atributos Nombre, Apellido, Legajo... por ej uso esta funcion para crearlos:

function Nuevo-Empleado(){
    param ($Nombre, $Apellido, $Codigo)
   
    $empleado= New-Object PSObject
   
    $empleado| Add-Member -type NoteProperty -Name Nombre -Value $Nombre
    $empleado| Add-Member -type NoteProperty -Name Apellido -Value $Apellido
    $empleado| Add-Member -type NoteProperty -Name Legajo -Value $Codigo

    return $empleado
}

Y supongamos que los cargamos de un archivo csv desordenado y queremos buscar por nro de legajo...

[System.Collections.ArrayList] $listaEmpleados = New-Object System.Collections.ArrayList
$listaEmpleados =  Import-Csv  -h Nombre, Apellido, Codigo

$listaEmpleados = $listaEmpleados | sort Codigo # ordeno por codigo

Ahora el tema es.. cómo hace para ordenar por  código... bueno, supongamos que código es string... luego, para poder hacer el BinarySearch...

La función de comparación

$src = @'

using System;
using System.Collections;
using System.Management.Automation;

   public sealed class ScriptBlockComparer : IComparer
   {
      ScriptBlock _Comparer;
      
      public ScriptBlockComparer(ScriptBlock Comparer) { ComparerScript = Comparer; }
      
      public ScriptBlock ComparerScript
      {
         get { return _Comparer; }
         set { _Comparer = value; }
      }
      
      public int Compare(object x, object y)
      {
         try {
            return (int)ComparerScript.Invoke(x, y)[0].BaseObject;
         } catch(Exception ex) {
            throw new InvalidOperationException("Comparer Script failed to return an integer!", ex);
         }
      }
      
   }
   
'@

Add-Type -TypeDefinition $src -Language CSharpVersion3

$cmp = New-Object ScriptBlockComparer {
    Param($primero, $segundo)
    $pos = $primero.Codigo.CompareTo($segundo)
   
    return $pos
}



.......
..........
mas codigo
...........
... y...

$pos = $list.BinarySearch($codigoABuscar, $cmp)

Y nos devuelve en pos la posición del elemento buscado en el array (empezando desde 0) y un nro <0 si no se encontró. Espero les sirva de ayuda!

Nota: si les tira error con la version de .Net  pueden intentar cambiar

Add-Type -TypeDefinition $src -Language CSharpVersion3

Por:

Add-Type -TypeDefinition $src -Language CSharp

Ya que espera tener instalado el Framework .Net versión 3.5