Recuperare le informazioni di mapping delle entità in Linq2SQL

In questo piccolo post vorrei mostrarvi un modo per recuperare, dato il tipo di un oggetto generato con il designer di Lnq2SQL, la tabella di mapping e le eventuali colonne di mapping delle singole proprietà.

Quando generiamo il modello dei dati in Linq2SQL, l’ambiente di sviluppo crea per noi il codice VB.NET per la definizione delle classi che mappano le nostre tabelle e il DataContext per accedere alla banca dati.

Supponiamo di avere una tabella di clienti:

e di generare il modello Linq2SQL. In questo caso Visual Studio genera per noi una classe Clienti:

1. <Table(Name:="dbo.Clienti")> _
2. Partial Public Class Clienti
3.     Implements System.ComponentModel.INotifyPropertyChanging,  _
4.                 System.ComponentModel.INotifyPropertyChanged
5.  
6.     .
7.     .
8.  
9.     <Column(Storage:="_IDCliente", AutoSync:=AutoSync.OnInsert, DbType:="Int NOT NULL IDENTITY", IsPrimaryKey:=True, IsDbGenerated:=True)> _
10.     Public Property IDCliente() As Integer
11.         .
12.         .
13.     End Property
14.  
15.     <Column(Storage:="_CodiceCliente", DbType:="Char(10) NOT NULL", CanBeNull:=False)> _
16.     Public Property CodiceCliente() As String
17.         .
18.         .
19.     End Property
20.  
21.     <Column(Storage:="_DescrizioneCliente", DbType:="NVarChar(100) NOT NULL", CanBeNull:=False)> _
22.     Public Property DescrizioneCliente() As String
23.         .
24.         .
25.     End Property
26.  
27.     .
28.     .
29.  
30. End Class

Come possiamo osservare, la classe e le proprietà della stessa, vengono decorate con appositi attributi che mappano la classe e i suoi membri sulla tabella e sui campi della banca dati.

In particolare TableAttribute (Table nel precedente codice) associa la classe alla tabella (“dbo.Clienti” nell’esempio precedente) mentre ColumnAttribute (Column nel precedente codice) associa una proprietà ad un campo della banca dati.

Per recuperare, quindi, a runtime i parametri di mapping delle classi con la banca dati, possiamo recuperare gli attributi di cui sopra.

Per fare questo possiamo utilizzare i due seguenti metodi di estensione:

1. Imports System.Runtime.CompilerServices
2. Imports System.Data.Linq.Mapping
3.  
4. Public Module Linq2SqlModule
5.     <Extension()> _
6.     Public Function GetLinq2SqlTable(ByVal objectType As Type) As String
7.         Dim retval As String = Nothing
8.         Try
9.             Dim attrib = CType(objectType.GetCustomAttributes(GetType(TableAttribute), _
10.                                                               True).FirstOrDefault(),  _
11.                                                               TableAttribute)
12.             If attrib IsNot Nothing Then
13.                 retval = attrib.Name
14.             End If
15.         Catch ex As Exception
16.             retval = Nothing
17.         End Try
18.         Return retval
19.     End Function
20.  
21.     <Extension()> _
22.     Public Function GetLinq2SqlField(ByVal objectType As Type, _
23.                                      ByVal propertyName As String) As String
24.         Dim retval As String = Nothing
25.         Try
26.             Dim entityProp = (From p In objectType.GetProperties() _
27.                              Where String.Compare(p.Name, propertyName, True) = 0 _
28.                              Select p).FirstOrDefault()
29.             If entityProp IsNot Nothing Then
30.                 Dim attrib = CType(entityProp.GetCustomAttributes(GetType(ColumnAttribute), _
31.                                                                   True).FirstOrDefault(),  _
32.                                                                   ColumnAttribute)
33.                 If attrib IsNot Nothing Then
34.                     retval = attrib.Storage.Replace("_", "")
35.                 End If
36.             End If
37.         Catch ex As Exception
38.             retval = Nothing
39.         End Try
40.         Return retval
41.     End Function
42. End Module

 

Technorati Tag: linq2sql,extension methods,table mapping