La manta en el baño del edificio de Sistemas

Como saben amigos del Tec de Morelia, mi edificio, el edificio de Sistemas se encuentra prácticamente en medio de la escuela. Todos pasan por ahí, ya sean los de industrial, mecánica, bioquímica etc. 

El problema aquí es que al ser una zona tan concurrida, cualquier persona puede entrar a nuestro baño. De hecho  es el más visitado, compartimos  un migitorio por cada 1000 habitantes de la institución, en promedio un wey desecha líquido cada 3 minutos. 

¿Que ocurre con esto? , pues es una zona insegura. Tanta concentración hace que sea peligrosa para cualquier persona. Hay técnicas de entrar sin respirar y mear en menos de un minuto.

Afortunadamente un graciosito puso una manta para advertir a cualquier persona ajena al problema.

9° Semestre… último semestre Tec Morelia

Pues ya me inscribí al que sera mi ultimo y al parecer el más fácil semestre de la carrera. Solo llevo dos materias.

Una que es Cult. Empresarial y otra Ing en Sw con ambientes Web(o algo así).  Como siempre, (y si sé que me veo bien culero) pero no hay profes buenos en el tec en esto de la web y el Internes.

En fin, que hueva pero pues tampoco puedo decir que me la voy a pasar haciéndome wey. De hecho viene un semestre interesante.

Mi horario

Un semestre y soy (pseudo) Ingeniero

Se me había olvidado comentar, que afortunadamente pase todas las materias. Fue un gran esfuerzo el que me hice, estudie como loco 2 semanas que fueron estresantes. Y definitivamente es el peor final de semestre.

Me di cuenta que mi cerebro no es tan malo como pensaba, por que precisamente siempre me he quejado de aprenderme 100 páginas de memoria. Pero bajo presión, parece que mi mente trabaja muy bien y soy capaz de hacer cualquier cosa.

En fin, me falta 1 semestre con dos materias. Ya falta poco para ser Ingeniero. Sin embargo mi motivación para salir no es tener un título si no dejar de perder el tiempo en el Tec.

La pagina del Tec de Morelia Hackeada(de nuevo)

Gracias a un amiga, me di cuenta que una persona(desconozco quien es) escribio un email, alertando y dando su opinión sobre que nuevamente hackearon al Tec de Morelia.

Como ya habíamos visto ayer(20 de Junio 2008), el servidor había sido hackeado por un Argentino, les dejo unos pantallazos:

Si ven al lado dice ‘Estás OWNED, QUE QUERES ARREGLAR?’,
Sí damos clic en el enlace se abréa la siguiente página.
Vamos el Argentino, no quiso hacer más, simplemente dejo su firma, imaginen donde él la hubiera inutilizado, vaya, ni pensarlo ¿cierto?. Ahora tenemos(21 de Junio 2008), esto :

Acaso la seguridad de los servidores del tec, ¿Es insuficiente?. ¿Así de seguros están nuestros datos personales(Nombres, Direcciones, Nombres de familiares, calificaciones, etc)? ¿Cómo es posible que esto pase dos días consecutivos?, En cualquier momento podrían robarnos la identidad, por el descuido, y el mal manejo de un webmaster. Si yo fuera él, ayer mismo hubiera presentado mi renuncia, vamos, no estamos jugando, los servidores deberían estar en perfecto estado, es una universidad FEDERAL, no la paginita de un tipo ‘X’, con fotitos y mamada y media. Repito, ¿Cómo es posible?.

Desde mi punto de vista, solo alguien que quiere alarmar a la comunidad estudiantil sin tener conocimiento real del suceso y su único objetivo es causar polémica, sin conocer realmente como funcionan las cosas en un servidor.

Queridos estudiantes del Tec de Morelia, toda la información de ustedes, calificaciones, cargas, datos no están en el servidor web donde se encuentra la página. Por que nadie concentraría toda la información en una sola maquina.

La única información importante ahí(quiero pensar) son sus calificaciones, nombres y números de control. Si bien, eso no justifica que el servidor no este protegido(que parece coladera) no hay razón para pensar que algo ahí comprometa nuestra privacidad.

Yo ofrecí mi ayuda, y nunca me contactaron. No soy experto en seguridad ni altruista, pero al menos les puedo decir por donde están fallando. Así como mejorar el inefable sistema de inscripciones y autoevaluación, que las validaciones te las saltas en 3 segundos y no hace perder el tiempo respondiendo 30 preguntas evaluando a los profesores. Me pregunto quien lo haria…

MIT Graffiti

¿Cual es el mejor Instituto Tecnológico del Mundo?, donde los alumnos tienen una personalidad en común, pero donde difícilmente hay personalidades normales. Donde la clase elitista, tiende a discriminare por tu IQ y no por si estas a la moda, eres deportista o “nice”.

Pues claro.. el Instituto Tecnológico de Massachusetts.

Ahora…¿Qué pasa cuando tienes una escuela llena de cerebritos?, candidatos a futuros premios noveles. Todo el entorno gira alrededor de la ciencia. Sin embargo, aunque se esta a un nivel muy por arriba de la gente común(ellosdirían mortales), los instintos, costumbres y reflejos de nuestros ancestros tienden a salir siempre a flote. Lo digo por que como humanos siempre tendemos a pintar en las paredes, antes eran cuevas ahora son construcciones.

Les muestra algunas imágenes de graffitis en el MIT, claro…..muy diferentes a las que veríamos en una universidad común y corriente.

Mas imagenes: MIT Graffiti

Lisp: Código que encuentra la solución al juego de puzzle

Ahí va otro código que desarrolle en IA. Busca la solución por el algoritmo Búsqueda profundidad del juego puzzle. El código esta hecho para Windows, y para ejecutarlo necesitas NewLisp y Mulisp que lo puedes descargar al final del post.

(define (Abajo E)
  (set 'b (find 0 E))
  (cond 
   ((< (+ b 3) 9) (push (nth b E) E (+ b 3)) (pop E b) 
   (push 
   (pop E (+ b 3)) E b)
	(Actualiza E)))
 
  (print E))
 
  (define (Izquierda E)
  (set 'b (find 0 E))
  (cond 
   ((= (= b 0) (= b 3) (= b 6) false) (push (nth b E) E (- b 
      1)) 
    (pop E (+ b 1))
	(Actualiza E) 
 
	))
  (print E))
 
 
 
(define (Arriba E)
  (set 'b (find 0 E))
  (cond 
   ((> (- b 3) 0) (push (nth b E) E (- b 3)) (pop E (+ b 1)) 
    (push (pop E (- b 2)) E b)
			(Actualiza E) 
	))
  (print E))
 
  (define (Derecha E)
  (set 'b (find 0 E))
  (cond 
   ((= (= b 2) (= b 5) (= b 8) false) (push (nth b E) E (+ b 
      2)) 
    (pop E b)
	(Actualiza E) 
	))
  (print E))
 
(define (Busca EI EM | Res)
  (set 'EdosTrat '())
  (set 'Res (BusAProf 1 EI EM Operadores))
  (if (not (empty? Res)) 
   (print Res) 
   (print "\nNo hay solucion\n")))
 
   (define (BusAProf Nivel EA EM Ops | ROps OpActual Encontrado NE)
  (set 'ROps Ops)
  (set 'Encontrado '())
  (setq EdosTrat (cons EA EdosTrat))
  (while (and (not Encontrado) (not (empty? Ops))) 
   (setq OpActual (first Ops)) 
   (setq Ops (rest Ops)) 
   (if (setq NE (eval (list OpActual (quote EA)))) 
    (cond 
     ((= NE EM) (set 'Encontrado (list OpActual))) 
     ((and (not (member NE EdosTrat)) (set 'Encontrado (BusAProf 
         (+ Nivel 1) NE EM ROps))) 
      (set 'Encontrado (cons OpActual Encontrado))))))Encontrado)
 
(set 'Operadores '(Arriba Izquierda Abajo Derecha))
 
(define (Solucion )
    (set 'E0 '())
  (set 'EF '())
	  (prop-color 'I1  254 254 254)
	  (prop-color 'I2  254 254 254)
	  (prop-color 'I3  254 254 254)
	  (prop-color 'I4  254 254 254)
	  (prop-color 'I5  254 254 254)
	  (prop-color 'I6  254 254 254)
	  (prop-color 'I7  254 254 254)
	  (prop-color 'I8  254 254 254)
	  (prop-color 'I9  254 254 254)
  (set 'E0 (append E0 (list 
	(integer (prop-text 'I1)) 
     (integer (prop-text 'I2)) 
     (integer (prop-text 'I3)) 
     (integer (prop-text 'I4)) 
     (integer (prop-text 'I5)) 
     (integer (prop-text 'I6)) 
     (integer (prop-text 'I7)) 
     (integer (prop-text 'I8)) 
     (integer (prop-text 'I9)))))
		(set 'cero (+ (find 0 E0) 1))
		(eval-string (string (concat "(prop-color 'I" (string cero) " 200 200 200)")))
  (set 'EF (append EF (list 
	(integer  (prop-text 'F1)) 
	 (integer (prop-text 'F2)) 
     (integer (prop-text 'F3)) 
     (integer (prop-text 'F4)) 
     (integer (prop-text 'F5)) 
     (integer (prop-text 'F6)) 
     (integer (prop-text 'F7)) 
     (integer (prop-text 'F8)) 
     (integer (prop-text 'F9)))))
  (prop-text 'S (string (Busca E0 EF))))
(define (Actualiza E)
  (set 'cero (+ (find 0 E) 1))
  (sleep 900)
	(prop-text 'I1 (string (nth 0 E))) 
   (prop-text 'I2 (string (nth 1 E))) 
   (prop-text 'I3 (string (nth 2 E))) 
   (prop-text 'I4 (string (nth 3 E))) 
   (prop-text 'I5 (string (nth 4 E))) 
   (prop-text 'I6 (string (nth 5 E))) 
   (prop-text 'I7 (string (nth 6 E))) 
   (prop-text 'I8 (string (nth 7 E))) 
   (prop-text 'I9 (string (nth 8 E)))
   (eval-string (string (concat "(prop-color 'I" (string cero) " 200 200 200)")))
)
 
(define (inicio )
  (text-font "Arial" -14 0)
  (win-dialog 'Dialogo 'console 150 150 520 300 "Tarea 2 ::: Puzzle")
  (win-label 'Texto1 'Dialogo 50 20 150 22 "ESTADO INICIAL")
  (win-label 'Texto2 'Dialogo 240 20 150 22 "ESTADO FINAL")
  (win-editline 'I1 'Dialogo 60 50 20 20 "1")
  (win-editline 'I2 'Dialogo 95 50 20 20 "1")
  (win-editline 'I3 'Dialogo 130 50 20 20 "1")
  (win-editline 'I4 'Dialogo 60 80 20 20 "1")
  (win-editline 'I5 'Dialogo 95 80 20 20 "1")
  (win-editline 'I6 'Dialogo 130 80 20 20 "1")
  (win-editline 'I7 'Dialogo 60 110 20 20 "1")
  (win-editline 'I8 'Dialogo 95 110 20 20 "1")
  (win-editline 'I9 'Dialogo 130 110 20 20 "0")
  (win-editline 'F1 'Dialogo 240 50 20 20 "1")
  (win-editline 'F2 'Dialogo 275 50 20 20 "1")
  (win-editline 'F3 'Dialogo 310 50 20 20 "1")
  (win-editline 'F4 'Dialogo 240 80 20 20 "1")
  (win-editline 'F5 'Dialogo 275 80 20 20 "0")
  (win-editline 'F6 'Dialogo 310 80 20 20 "1")
  (win-editline 'F7 'Dialogo 240 110 20 20 "1")
  (win-editline 'F8 'Dialogo 275 110 20 20 "1")
  (win-editline 'F9 'Dialogo 310 110 20 20 "1")
  (win-editline 'S 'Dialogo 40 170 400 22 "")
  (win-label 'Texto3 'Dialogo 40 150 150 22 "SOLUCION:")
  (win-pushbutton 'Solucion 'Dialogo 370 50 70 22 "Solución" 
   'Solucion)
  (prop-enabled 'Aplicar 0))
 
(define-macro (local var-list)
  ((append '(lambda ) (list var-list) (rest (args local)))))
 
(define (opsys )
  (cond 
   ((primitive? clear-console) 'windows) 
   ((primitive? int86) 
    (if (primitive? comm-read) 
     'dos 'extender)) 
   ((primitive? registry-read) 'win32) 
   (true 'unix)))
 
(define-macro (setq p1 p2)
  (set p1 (eval p2)))

Aquí es cuando te das cuenta de que la Inteligencia es de buscar… no de pensar(¿O buscar es pensar?).
Descargar newlisp.zip
Ver código en pastebin.com.

Memorias de un estudiante en el Tec de Morelia

Pregunta de un examen de programación web.

¿Quien ejecuta Javascript?
a) El cliente b) El servidor c) EL runtime de java

Como es lógico el estudiante elige la opción EL CLIENTE, pero el profe se la pone mal… buscando una aclaración el profe le menciona… “javascript lo ejecuta el runtime de java lógicamente por que es java”.

Ustedes creen que con ese tipo de respuestas….. ¿Le dan ganas a uno de echarle ganas a la escuela o intentar ser el mejor alumno?

Tengo un examen mañana

Concretamente esto(92 diapositivas de memoria):

¿Qué hago? ¿A qué dios me encomiendo? ¿Mejor repruebo?.

Lo mejor de todo es que aun aprendiéndome todo de ME-MO-RI-A, es posible que no pase el examen. Tendré que pensar como la maestra, no pensar como yo creo que es(y eso es lo mas difícil de la materia).

Desfile de aniversario del Tecnologico de Morelia 2008

Este año como en todos, siempre hay desfile, desmadre, huevos, harina, y muchas cosas más. El detalle de este año, fue que los polis nos corrieron cuando íbamos llegando al pípila, después nos rodearon y derrotados nos regresamos a la institución.

No sé realmente por que las autoridades no lo permitieron, si alguien sabe la razón espero que la comparta dejando su comentario. No podía dejar este post, sin un video.

El año pasado, nos peleamos con unos manifestantes, el antepasado dejamos las calles bien puercas… y este no supe ni que paso.

Sin embargo y ya que es obvia la razón creo que lo mejor es que el desfile se deje de realizar, mientras sigamos siendo una bola de salvajes, carentes de sentido común y caracterizados por la deficiencia de inteligencia que nos caracteriza como seres humanos.

La culpa la tienen los profes, nos hacen encabronar y nos estresan tanto, que una vez al año nos desquitamos.

ACTUALIZACIÓN: Me acaban de comentar que el desfile se suspendio por que a una chava le rompieron la nariz con un huevo, y segun el mismo director pidio ayuda a los policias para mandarnos de regreso al tec.

ACTUALIZACIÓN 2: 4 de abril a las 7:25 de la noche Gracias a los comentarios ya tenemos la primera nota de prensa en la Voz de Michoacan
http://www.vozdemichoacan.com.mx/secciones/seguridad/seg000606.html
(more…)

www.itmorelia.edu.mx owned!

Hoy en la mañana me aviso un amigo que algo raro le sucedía al sitio del Tecnológico de Morelia. Pues al parecer alguien la vulnero y puso una página con links a descargas de archivos tipo .rar y en el final de la pagina la leyenda “MADE IN CHINA”. Es obvio que es lo que paso aquí, sin embargo no profundizare hasta que la institución solucione este ataque.

Free From MaGnUm-X WTF?

En fin, aquí unas capturas.

Lisp: Código parar convertir expresión infija a prefija

Pues como prometí postear todo código que programara en IA, les dejo el primero. Sirve para convertir de inorden a preorden.

)


Lisp es un lenguaje muy loco, cuesta un poco agarrarle la onda. Ya que uno piensa en un problema y ya sabe como resolverlo de manera estructurada, pero con Lisp es otro paradigma.

El mejor profesor de física

Walter Lewin es el mejor profesor de física que existe. Tan solo vean el siguiente vídeo.

Es obvio, sus clases son divertidas y sobre todo el tiene amor a la ciencia y a enseñar a sus alumnos. Yo no puedo decir lo mismo en el tecnológico.

Entonces, creo que la fórmula para ser el mejor profesor y que tus alumnos te quieran es… amar tu profesión y amar lo que enseñas…. ahí esta la pasión y es donde fallan la mayoría de nuestros profesores.