Visual Basic Foro
Programación => Visual Basic 6 => Mensaje iniciado por: Bazooka en Agosto 08, 2014, 09:16:54 am
-
Hola amigos tengo la necesidad de compilar 4 proyectos 20 veces cada uno lo que me acarrearía abrir cada proyecto 20 veces y compilarlos en total 80 compilaciones.
Cada compilacion de los 4 proyectos que trabajan en conjunto solo cambia uno valores en un modulo BAS .
Por lo que pensaba que si podria automatizarlo con un BAT que me haga los 4 proyectos, luego modifico en Bas guardo y hago lo mismo asi 20 veces..
SE PODRA ? o es muy alocado mi pedido ?
muchas gracias!!
-
Por que no le asignas los valores en un archivo plano, y le cambias la extensión de tal manera que solo hagas 4 Compilaciones..!
-
Por que no le asignas los valores en un archivo plano, y le cambias la extensión de tal manera que solo hagas 4 Compilaciones..!
Miguel no tengo la menor idea de lo que intentas decirme, discukpa
-
Hola amigos tengo la necesidad de compilar 4 proyectos 20 veces cada uno lo que me acarrearía abrir cada proyecto 20 veces y compilarlos en total 80 compilaciones.
Cada compilacion de los 4 proyectos que trabajan en conjunto solo cambia uno valores en un modulo BAS .
Por lo que pensaba que si podria automatizarlo con un BAT que me haga los 4 proyectos, luego modifico en Bas guardo y hago lo mismo asi 20 veces..
SE PODRA ? o es muy alocado mi pedido ?
muchas gracias!!
Si es un poco alocado estimado :-)
Solo deberias hacer una sola compilacion. El comportamiento de cada "version" debe ser parametrizable, o sea, como dijo Scam crea un archivo de texto con los valores pertinentes, desde tu aplicativo lee ese archivo de texto y lo almacenes en variables globales para que lo puedas usar en tu proyecto y dependiendo de esos valores tu software tendrá uno u otro comportamiento.
Si el archivo plano tuviera otros valores el soft tendrá otro comportamiento, vale decir que debes tener n archivos planos pero solo usas uno por cada vez. Me imagino que quieres dar una versión diferente a cada cliente, entonces tendras un archivo plano por cliente.
Si hasta aqui se entiende ya podemos pasar a ver el tema de la "seguridad" de estos archivos planos o usar otro metodo pero de funcionalidad similar.
Saludos
-
AH!!!!!
Ahora si Yvan entiendo !!
Sucede que un cliente me compro 20 licencias y necesito difrenciar cada una con el nùmero de dispositivo USB que sirve como llave de apertura !
Con el criterio que UD me dicen deberia colocar ese codigo en un texto plano lo que haria mas vulnerable la aplicacion ! Pero mas simple de realizar el proceso.
Podria entonces encriptar el archivo pero aun asi no me siento muy seguro.
-
pero no hay alguna forma de abrir el compilador con parametros ? o algo asi !
-
Estimado Bazooka
Respecto a tu pregunta la respuesta definitivamente SI es posible realzar una compilación, a demanda, sin necesidad de abrir el IDE de VB. La única duda que me queda es si dicha compilación quieres que se realice en la PC de tu cliente después de instalar tú aplicación (en ese caso deberás de distribuir los archivos C2.exe, Link.exe entre otros) o lo vas a realizar tú PC de forma automatizada. Ten en cuenta que esta es una idea básica, tendrás que refinarla un poco más para que no te crackeen fácilmente tu aplicación.
¿Que tipo de archivo es el que quieres compilar .EXE, .DLL, .OCX?
Otra alternativa para no tener que estar compilando es modificar a nivel binario un archivo (.EXE, .DLL, etc) o conjunto de archivos. Me explico, en tú archivo .EXE declara una constante del tipo String y asígnale un valor este valor será el número de dispositivo USB (encriptado y con longitud fija) luego con un editor binario identifica en que posición se ubica el valor y reemplaza o editas dichos bits con el valor que corresponda
Saludos, desde algún lugar de Lima-Perú
-
C:\Archivos de programa\Microsoft Visual Studio\VB98>vb6 /m "C:\proyecto\Proyecto.vbp"
Con eso compilas en la carpeta del proyecto. Puedes automatizarlo con algun bat o como quieras
-
Manya, siempre hay algo mas que aprender.
:-)
-
Estimado Bazooka
Respecto a tu pregunta la respuesta definitivamente SI es posible realzar una compilación, a demanda, sin necesidad de abrir el IDE de VB. La única duda que me queda es si dicha compilación quieres que se realice en la PC de tu cliente después de instalar tú aplicación (en ese caso deberás de distribuir los archivos C2.exe, Link.exe entre otros) o lo vas a realizar tú PC de forma automatizada. Ten en cuenta que esta es una idea básica, tendrás que refinarla un poco más para que no te crackeen fácilmente tu aplicación.
¿Que tipo de archivo es el que quieres compilar .EXE, .DLL, .OCX?
Otra alternativa para no tener que estar compilando es modificar a nivel binario un archivo (.EXE, .DLL, etc) o conjunto de archivos. Me explico, en tú archivo .EXE declara una constante del tipo String y asígnale un valor este valor será el número de dispositivo USB (encriptado y con longitud fija) luego con un editor binario identifica en que posición se ubica el valor y reemplaza o editas dichos bits con el valor que corresponda
LA COMPILACION SERIA PARA UN EXE Y EN MI PC !!! GRACIAS
Saludos, desde algún lugar de Lima-Perú
-
C:\Archivos de programa\Microsoft Visual Studio\VB98>vb6 /m "C:\proyecto\Proyecto.vbp"
Con eso compilas en la carpeta del proyecto. Puedes automatizarlo con algun bat o como quieras
Me imagine que se podia hacer esto!!!
Lo que no tengo idea es de como crear un BAT por que nunca lo he echo pero ya me pongo a ver eso!!
Gracias !!!
-
La idea de Raul no me funciono por que cree un BAt asi !
@echo off
C:\Archivos de programa\Microsoft Visual Studio\VB98>vb6 /m "c:\missofts\soft1\myProyecto.vbp"
Y cuando lo ejecuto me genera un archivo sin extension y sin ningun contenido llamado vb6
-
Estimado Bazooka
Invoca al ejecutable de VB6 de la siguiente manera y te mostrara todos los parámetro de ejecución desde línea de comandos
C:\Program Files (x86)\Microsoft Visual Studio\VB98\VB6.EXE /?
Este es un ejemplo que he separado en colores las distintas partes de la invocación, lo ejecutas como una única línea (modifica la ruta a tú proyecto como corresponda)
C:\Program Files (x86)\Microsoft Visual Studio\VB98\VB6.EXE /make "C:\Program Files (x86)\Microsoft Visual Studio\VB98\Ejemplos\1\Proyecto1.vbp"
Para ejecutarlo desde un archivo .BAT en la carpeta en la que se encuentra el Proyecto1.vbp crea un archivo con la extensión .bat con las siguientes líneas de código
@echo off
"C:\Program Files (x86)\Microsoft Visual Studio\VB98\VB6.EXE" /make Proyecto1.vbp
Saludos, desde algún lugar de Lima-Perú
-
La idea de Raul no me funciono por que cree un BAt asi !
@echo off
C:\Archivos de programa\Microsoft Visual Studio\VB98>vb6 /m "c:\missofts\soft1\myProyecto.vbp"
Y cuando lo ejecuto me genera un archivo sin extension y sin ningun contenido llamado vb6
Eso es porque lo ejecute en vivo desde la consola. En el bat deberia estar escrito así
start "C:\Archivos de programa\Microsoft Visual Studio\VB98\vb6.exe" /m "c:\missofts\soft1\myProyecto.vbp"
-
Alguna otra idea!!! nada de lo aportado me funciona parece trabjar bien pero no me genera nada
-
como lo estas probando? donde estas generando el bat ?
Prueba con el flag /outdir
queda así
@echo off
start "" "C:\Archivos de programa\Microsoft Visual Studio\VB98\vb6" /m "c:\missofts\soft1\myProyecto.vbp" /outdir "C:\Prueba\"
-
o bien poner un "cd C:\Prueba\" y recien ahi ejecutar.
PD raul, ponele comillas al path del VB6 ya que tiene espacios!
-
Muy interesante este post, se me habia pasado, no lo habia visto.
Bazooka como lo resolviste?
Muy buena la idea de Albertomi:
Me explico, en tú archivo .EXE declara una constante del tipo String y asígnale un valor este valor será el número de dispositivo USB (encriptado y con longitud fija) luego con un editor binario identifica en que posición se ubica el valor y reemplaza o editas dichos bits con el valor que corresponda
No sabia eso, quiere decir que si tengo una constante tipo string en mi exe, abro el exe y veo el string tal cual?
Si lo reemplazo, reemplazando exactamente los mismos bytes, al alterar el archivo Exe, no se corrompe el exe? se ejecutara sin problemas?
-
Estimado Waldo
El archivo no se corrompe, siempre y cuando no toques más bit de los que se debe.
Adjunto imagen en donde se observa el valor asignado a la constante en el IDE de VB y donde se ubica dentro del editor Hexadecimal.
Hay que tener presente que el valor de la constante se almacena como Unicode, por eso las H están separadas por un punto.
Imagen:
https://onedrive.live.com/redir?resid=28C2A6606AE1B6DF!340&authkey=!AKavGHsEXRZ8eCs&v=3&ithint=photo%2cpng
Otra técnica que se puede aplicar es la usada por los compresores de ejecutables, pero es un poco más compleja pues hay que recalcular los puntos de entra.
Saludos, desde algún lugar de Lima-Perú
-
Una pregunta Albertomi, para ofuscar la constante funcionaria bien si esta se le "parte", Digamos mi variable string se llama Clave y contiene "Mipassword23" y hago algo como esto:
R = "23"
codigo...
O = "pa"
codigo..
M = "wo"
codigo..
J = "rd"
codigo...
I = "pass"
codigo...
L = "Mi"
Y luego:
If L & I & M & J & R = Text1.Text Then Pasa Else NoPasa
Se que es un poco burdo pero siempre me dio esa inquietud, no lo se comprobar pero usando ese visor hexadecimal se puede saber que contiene la concatenación: L & I & M & J & R
?
Gracias
-
Estimado YAcosta
Veamos este sería tú código escrito de forma normal:
Dim strClave As String
strClave = "Mipassword23"
If strClave = Text1.Text Then Pasa Else NoPasa
Y examinandolo con el editor hexadecimal la variable strClave se ve así:
(http://imagizer.imageshack.us/v2/880x800q90/909/hqazSv.png)
Ahora una forma simple de ofuscar es haciendo uso de la funcion Chr como siguiente:
Dim strClave As String
strClave = Chr(77) & Chr(105) & Chr(112) & Chr(97) & Chr(115) & Chr(115) & Chr(119) & Chr(111) & Chr(114) & Chr(100) & Chr(50) & Chr(51)
If strClave = Text1.Text Then Pasa Else NoPasa
Y examinándolo con el editor hexadecimal la variable strClave ofuscada se ve así
(http://imagizer.imageshack.us/v2/880x800q90/902/MDf06C.png)
Saludos, desde algún lugar de Lima-Perú
-
Muchas gracias Alberto!
Viendo tus capturas de lo que le comentas a YAcosta, haber si entendi...
si yo guardo una variable como:
strClave = Chr(77) & Chr(105) & Chr(112) & Chr(97) & Chr(115) & Chr(115) & Chr(119) & Chr(111) & Chr(114) & Chr(100) & Chr(50) & Chr(51)
entonces no hay forma de que me puedan ver el valor del string con un editor
-
Albertomi:
mmm, no me quedo claro doc, cierto que ambos casos me dan lo mismo, o sea si lo ofusco o no igual vere M.i.p.a.s.w.o.r.d.2.3. que alguien con conocimiento puede deducir que si quita la constante de los puntos tiene la clave, pero ese ofuscamiento es usando Chr, y yo me refería a partirlo y ponerlo en diferentes variables no continuas en el código y que luego las concateno.
Presumo que me quieres decir que es lo mismo, que si concateno el resultado final es que igual se vera la clave pero no estoy del todo seguro porque estoy deduciendo la respuesta. En todo caso quise buscar en la carpeta de VB el programa editor para comprobar pero creo que no lo tengo, si pudieras proporcionarme un enlace para descargarlo te agradecería.
Saludos
EDITO: Mientras escriba, Waldo contesto y ahora me confundí mas jeje. Porque yo si veo que SI hay forma de que puedan ver el valor (en mi caso) de los strings con el editor y solo tendrian que obviar los puntos que aparecen, lo que no se es como llegan a esa parte de todo el codigo hex para inducir que ese es el valor del(los) string(s).
-
Esperemos al maestro Alberto a ver que nos dice :D
-
Estimados
Me parece que no lo deje muy claro, en el screenshot del lado izquierdo muestro el valor de la variable con el valor de la cadena asignada de forma normal (strClave = "Mipassword23") y del lado derecho la misma variable con la misma cadena pero "ofuscada" (existen otras formas) haciendo uso d la funcion Chr (strClave = Chr(77) & Chr(105) & Chr(112) & Chr(97) & Chr(115) & Chr(115) & Chr(119) & Chr(111) & Chr(114) & Chr(100) & Chr(50) & Chr(51))
(http://imagizer.imageshack.us/v2/880x800q90/902/MDf06C.png)
A simple vista se observa en el lado derecho que en no hay forma de ver el valor de la variable con un editor Hexadecimal.
YAcosta, tú idea de partir la clave en varias variables es valida, ya que va hacer un poco más difícil darse cuenta a simple vista con un editor hexadecimal cual es el valor y más si esa variables contienen un solo carácter. Pero, aun así, seria bueno que dichos valores los "ofusques" haciendo uso de la funcion Chr.
Entonces tú ejemplo "ofuscando" los valores asignado a las variables quedaría así:
R = CHR(50) & CHR(51)
código...
O = CHR(112) & CHR(97)
código..
M = CHR(119) & CHR(111)
código..
J = CHR(114) & CHR(100)
código...
I = CHR(112) & CHR(97) & CHR(115) & CHR(115)
código...
L = CHR(77) & CHR(105)
Saludos, desde algún lugar de Lima-Perú
-
Tal vez me exprese mal yo tambien, hice un EXE en MI PC y lo abri con un editor, en mi editor veo los nombres de las variables, no en la captura de Alberto.
Probé de hacer un pequeño exe, guardando una constante string, y una variable string, cargandola con los CHR y efectivamente es como decis.
Otra cosa que vi mirando el editor hex, es que aparecen los nombres de las variables, asi que no deberiamos llamar a una variable como UserPass, o algo similar.
Otra cosa, si declaro una variable, pero no la uso en el codigo, se ve que el compilador se da cuenta y directamente no la compila, porque no se ve dentro del exe.
Me dio intriga y abir el EXE con un VB Decompiler.
Es increible como puede leer la informacion del exe.
Por ej el proyecto:
VERSION 5.00
Begin VB.Form Form1
Caption = "Form1"
ScaleMode = 1
AutoRedraw = False
FontTransparent = True
'Icon = n/a
LinkTopic = "Form1"
ClientLeft = 120
ClientTop = 450
ClientWidth = 4560
ClientHeight = 3030
StartUpPosition = 3 'Windows Default
End
Attribute VB_Name = "Form1"
El Diseño del Form:
VERSION 5.00
Begin VB.Form Form1
Caption = "Form1"
ScaleMode = 1
AutoRedraw = False
FontTransparent = True
'Icon = n/a
LinkTopic = "Form1"
ClientLeft = 120
ClientTop = 450
ClientWidth = 4560
ClientHeight = 3030
StartUpPosition = 3 'Windows Default
End
Attribute VB_Name = "Form1"
Lo bueno es que el codigo no lo pudo restaurar, se ve en assembler
Private Sub Form_Load() '401A00
loc_00401A00: push ebp
loc_00401A01: mov ebp, esp
loc_00401A03: sub esp, 0000000Ch
loc_00401A06: push 004010B6h ; __vbaExceptHandler
loc_00401A0B: mov eax, fs:[00h]
loc_00401A11: push eax
loc_00401A12: mov fs:[00000000h], esp
loc_00401A19: sub esp, 00000134h
loc_00401A1F: push ebx
loc_00401A20: push esi
loc_00401A21: push edi
loc_00401A22: mov var_C, esp
loc_00401A25: mov var_8, 004010A0h
loc_00401A2C: mov eax, Me
loc_00401A2F: mov ecx, eax
loc_00401A31: and ecx, 00000001h
-
Creo que ya entendí lo que me confundió.
Citando y corrigiendo (para "mis adentros" jeje) al amigo Waldo: No es que no se pueda ver, si se puede ver, lo que no se puede es identificar como tal, o en todo caso esta un poco rejodido identificar que lo que está en 4D (no se que cosa es eso, creo que un apuntador de memoria no se) contiene un valor que pueda ser significante en el hackeo, tendrían que peinarse todo y hacer pruebas y de alli que es mejor usar los Chr que indica Albertomi.
Concuerdo que no es conveniente usar nombres de variables inductivos para los temas de seguridad o de restricción, es mas, en lo personal ni siquiera lo hago con las tablas y campos de mis BDs ya que uso una nemotecnia personal.
Y para seguir con la confusion, es que ya he visto la imagen capturada varias veces y no entiendo donde ves amigo Waldo el nombre de la variable. Te cito:
"...Otra cosa que vi mirando el editor hex, es que aparecen los nombres de las variables..."
En todo caso eso no se ve en la captura de Albertomi, cierto que se ve el nombre de los objetos (Form1, Proyecto1, etc) pero no el nombre de la variable (strClave), en todo caso voy a buscar ese soft Hex Editor para probar con lo mio.
s.e. u o.
Saludos
-
Edite mas arriba mi msg anterior
-
Si probe el VB Decompiler antes, y probando con un exe hecho con VB6 si se ve los nombres de los objetos pero no el codigo fuente a diferencia de un exe hecho con .Net, alli si el VB Decompiler te da las fuentes incluso hasta los comentarios, y eso es asi por el tema de que la plataforma .Net es libre (no el ide VS.Net ese si es de pago salvo los express con sus restricciones conocidas)
Luego la parte del código que muestras con el push, mov, etc ya esta fuera de mi alcance, para mi es chino mandarín y hasta allí no llego. :-)
-
Perdon, es verdad, dije una burrada al decir que se ven los nombres de las variables; para hacer unas pruebas estaba mostrando en un msgbox el nombre de la variable con su valor, y lo que yo veia era el string que mostraba en el msgbox, elimine eso y ya no se ve mas en el editor hex
-
Estimados
Solo quiero acotar que el código desarrollado para .NET, en algunos casos, es fácil de descompilar pues en la mayoría de los casos lo compilan a código intermedio y no a código nativo. Haciendo una analogía seria como compilar nuestra aplicación VB6 a P-Code y no a código nativo.
No olvidar que existen herramientas para ofuscamiento, a las cuales se pueden recurrir. O también pueden echar mano de UPX (Free), con lo que van a lograr reducir el tamaño del ejecutable y como colateral ofuscar el código.
Lo que se busca con esto, es que un usuario al OjO (sin mucho esfuerzo) no pueda burlar la seguridad de nuestra aplicación. Buscamos desanimarlo a burlarla o simplemente hacerlo lo más difícil que se pueda. Pero OjO que en ese intento de hacerlo más difícil podemos lograr que nuestra aplicación se vuelva más lenta. Pero todas estas medidas no impiden que alguien con el tiempo, las ganas y el conocimiento pueda desensamblar (push, mov, etc ) la aplicación y encontrar el punto donde se realiza la comparación If Variable = "YAcosta" Then Pasa Else NoPasa. Una vez encontrado ese punto lo que pueden hacer es desarrollar un KeyGen y ya esta pirateada vuestra aplicación.
Saludos, desde algún lugar de Lima-Perú
-
Comprendido estimado, muchas gracias por la aclaración.
-
Muy interesante este post, se me habia pasado, no lo habia visto.
Bazooka como lo resolviste?
Muy buena la idea de Albertomi:
Me explico, en tú archivo .EXE declara una constante del tipo String y asígnale un valor este valor será el número de dispositivo USB (encriptado y con longitud fija) luego con un editor binario identifica en que posición se ubica el valor y reemplaza o editas dichos bits con el valor que corresponda
No sabia eso, quiere decir que si tengo una constante tipo string en mi exe, abro el exe y veo el string tal cual?
Si lo reemplazo, reemplazando exactamente los mismos bytes, al alterar el archivo Exe, no se corrompe el exe? se ejecutara sin problemas?
La verdad es que la solucion no me llego en el tiempo adecuado asi que hice tantas compilaciones como tenia previsto no pude lograr hacerlo fuera del IDE.
AGRACDEZCO igual a todos los que colaboraron