El cas es que em va costar força fer-ho anar, tot i que realment no és gaire difícil.

Dir que en principi es documenta que amb DB2 Connect es pot accedir al AS400, però bé, jo no vaig trobar la manera d'aconseguir-ho, tot i que tampoc importa molt ja que el que volia era que el meu programa, en C++, pogués accedir directament a les dades del AS400.

Concretament volia instal·lar-ho a un servidor Debian Lenny, on tinc un servidor que és el que connecta amb el AS400, i efectua les operacions que li demanen els clients sobre la BD en funció de la seva autorització (així es controla que només el servidor hi tingui accés directe, i a més ens estalviem instal·lar a tot arreu el ODBC).

Per tant al servidor hem d'instal·lar-hi el unixODBC (disponible a totes les distribucions) i el driver d'ibm per al ODBC. Aquest driver s'ha de descarregar d'IBM i el podeu trobar en aquesta plana.

Altrament també necessitarem instal·lar el software isql per a comprovar que tot a funcionat correctament.

Instal·lem el software:

aptitude install unixODBC isql

Llavors instal·lem el driver d'ibm, si en descomprimim el paquet ja veurem que té un fitxer anomenat libdb2.so que el trobem dintre del directori /lib del arxiu que hem descomprimit.

Ara afegirem la ubicació del driver a l'arxiu /etc/odbcinst.ini (si instal·leu el driver amb l'instal·lador d'ibm, aquesta entrada s'hauria d'afegir sola):

[iSeries Access ODBC Driver]
Description             = iSeries Access for Linux ODBC Driver
Driver          = /opt/ibm/iSeriesAccess/lib/libcwbodbc.so
Setup           = /opt/ibm/iSeriesAccess/lib/libcwbodbcs.so
NOTE1           = If using unixODBC 2.2.11 or later and you want the 32 and 64-bit ODBC drivers to share DSN's,
NOTE2           = the following Driver64/Setup64 keywords will provide that support.
Driver64                = /opt/ibm/iSeriesAccess/lib64/libcwbodbc.so
Setup64         = /opt/ibm/iSeriesAccess/lib64/libcwbodbcs.so
Threading               = 2
DontDLClose             = 1
UsageCount              = 1

Finalment afegirem la ubicació i dades del nostre servidor a /etc/odbc.ini:

[Server_AS_400]
Driver          = iSeries Access ODBC Driver
Description     = Production AS/400 Database
Server          = 172.26.0.2
System          = 172.26.0.2

Per a comprovar si connectem correctament al AS400 farem ús de l'eina isql:

isql Server_AS_400 <usuari> <clau>

Un document més complet de com fer-ho el podeu trobar en aquesta entrada de blog, que és d'on en vaig extreure la informació.

sqlite3 fitxer.sql

Ara, dintre del programa executem les comandes:

.output aux.sql
.dump
.quit

Ara ja tenim un fitxer SQL, però l'hem de netejar una mica per a que el mysql el vulgui. Primer treiem les línies superior i inferior del fitxer, doncs són de la sortida del dump, no codi SQL.

BEGIN TRANSACTION;

i

COMMIT;

Ara també ens farà falta desfer-nos de totes les cometes dobles, doncs a mysql no l'hi agraden, amb vim es fa amb:

:%s/"//g

Guardem i ja podem injectar el codi a una base de dades mysql

El cas és que necessitava accedir a una base de dades externa o senzillament una altre base de dades al mateix servidor, sí, m'agrada complicar-me la vida....

El tema models va igual que amb les taules internes, és a dir:

class Phpbb_sessions < ActiveRecord::Base
self.pluralize_table_names=true;
end

Una classe normal. El self.pluralize_table_names és un atribut que fixa si ha de pluralitzar o no el nom de la taula (si programes en català com jo pot ser útil això XD).

Això ens crearà una clase Phpbb_session. Ara falta el que volem, connectar-nos a la base de dades externa, que ho farem al controlador on volguem obtenir les dades (en aquest cas a application.rb, doncs la sessió la volem verificar a tot arreu):

Phpbb_sessions.establish_connection(:adapter=>'mysql', :host=>'localhost', :username=>'nom', :password=>'clau', :database=>'basededades');

I ara ja podem fer un Phpbb_session.find o el que volguem amb la taula. Si feu una consulta vigileu d'emprar find, que retorna un objecte, molt més manejable, find_by_sql retornarà un array i.. ufff XD