WLAN-modul som accesspunkt

[petterMAN]

Hejsan, jag är för tillfället i prototyp/inköpsstadiet av ett nytt projekt men har stött på patrull. Är i behov av en WLAN modul som kan agera accesspunkt utan några direkta krav på hastighet (extremt lite data skall flyttas).

Tanken är att man med hjälp av en smartphone skall kunna ansluta till accesspunkten via en app, endast några få kB kommer att skickas. Intelligensen i systemet kommer att vara uppbyggt kring en större AVR (AT90CAN). Optimalt vore en WLAN modul som man kan kommunicera mot med hjälp av USART/SPI/I2C eller något annat standardprotokoll.
Är det någon som har erfarenhet av detta problem? Förslag på moduler?
Storleken på modulen är av viss betydelse då slutprodukten kommer att vara handhållen. Är medveten om att Bluetooth troligen hade varit en bättre lösning, men nu är WLAN ett krav från beställaren.

Tacksam för alla reflektioner och förslag!

//Petter

[petterMAN]

Är det verkligen ingen som ställts inför samma problem som mig?

[Lennart Aspenryd]

Det är extremt lite data som förflyttas så här dags!
Så det tar tid.

[Micke_s]

http://www.wiznet.co.kr/sub_modules/en/ ... 0&pid=1020
kanske.
Om den ska köra AP mode så lär du vilja ha en DHCP server i den också..

Edit: den kör uart för kommunikation.

[petterMAN]

Lasp:

Micke_s: Tack så hemskt mycket, ser ut att väldigt bra lämpad för mina ändamål!
Har du några personliga erfarenheter av att använda den som AP?

// Petter

[xraid]

Hur många . vid ett mindre antal, prototyp, kanske använda någon av dessa . vid större antal bygg ...

http://www.embeddedworks.net/pdetail.ph ... od=wlan343 31 USD

http://www.semiconductorstore.com/cart/ ... -_-RN-131G 39 USD

http://www.sparkfun.com/products/10004 50 USD

EDIT : kanske nåt sånt här ...
http://www.harbaum.org/till/spi2cf/index.shtml

[Micke_s]

En viktig sak tycker jag är inbyggd dhcp server.
Har inte haft tillfälle att använda dom själv, väldigt sugen däremot.

[xraid]

Arduino :

http://www.musically.me.uk/DHCP_Web_Server_12.pde

// DHCP Web Server 12

#include <avr/pgmspace.h>

#include <Ethernet.h>
#include <SPI.h>
#include <Udp.h>

//#define DEBUG

#define zap(x) if(x){free(x); x=0;}

#define refreshTIME 200
#define dhcpSIZE 240
#define bufferSIZE 128

#define serverName "My DHCP Server"
#define myDomainName "MYPLACE"

/* UDP port numbers for DHCP */
#define DHCP_SERVER_PORT 67 /* from server to client */
#define DHCP_CLIENT_PORT 68 /* from client to server */

/* DHCP message OP code */
#define DHCP_BOOTREQUEST 1
#define DHCP_BOOTREPLY 2

/* DHCP message type */
#define DHCP_DISCOVER 1
#define DHCP_OFFER 2
#define DHCP_REQUEST 3
#define DHCP_DECLINE 4
#define DHCP_ACK 5
#define DHCP_NAK 6
#define DHCP_RELEASE 7
#define DHCP_INFORM 8

/**
* @brief DHCP option and value (cf. RFC1533)
*/

enum{
padOption = 0,
subnetMask = 1,
timerOffset = 2,
routersOnSubnet = 3,
timeServer = 4,
nameServer = 5,
dns = 6,
logServer = 7,
cookieServer = 8,
lprServer = 9,
impressServer = 10,
resourceLocationServer = 11,
hostName = 12,
bootFileSize = 13,
meritDumpFile = 14,
domainName = 15,
swapServer = 16,
rootPath = 17,
extentionsPath = 18,
IPforwarding = 19,
nonLocalSourceRouting = 20,
policyFilter = 21,
maxDgramReasmSize = 22,
defaultIPTTL = 23,
pathMTUagingTimeout = 24,
pathMTUplateauTable = 25,
ifMTU = 26,
allSubnetsLocal = 27,
broadcastAddr = 28,
performMaskDiscovery = 29,
maskSupplier = 30,
performRouterDiscovery = 31,
routerSolicitationAddr = 32,
staticRoute = 33,
trailerEncapsulation = 34,
arpCacheTimeout = 35,
ethernetEncapsulation = 36,
tcpDefaultTTL = 37,
tcpKeepaliveInterval = 38,
tcpKeepaliveGarbage = 39,
nisDomainName = 40,
nisServers = 41,
ntpServers = 42,
vendorSpecificInfo = 43,
netBIOSnameServer = 44,
netBIOSdgramDistServer = 45,
netBIOSnodeType = 46,
netBIOSscope = 47,
xFontServer = 48,
xDisplayManager = 49,
dhcpRequestedIPaddr = 50,
dhcpIPaddrLeaseTime = 51,
dhcpOptionOverload = 52,
dhcpMessageType = 53,
dhcpServerIdentifier = 54,
dhcpParamRequest = 55,
dhcpMsg = 56,
dhcpMaxMsgSize = 57,
dhcpT1value = 58,
dhcpT2value = 59,
dhcpClassIdentifier = 60,
dhcpClientIdentifier = 61,
endOption = 255
};

// Read Only strings
prog_char line_00[] PROGMEM = "HTTP/1.1 200 OK" ;
prog_char line_01[] PROGMEM = "Content-Type: text/html\n\n" ;
prog_char line_02[] PROGMEM = "<html><head>" ;
prog_char line_03[] PROGMEM = "<script type='text/javascript'>\n" ;
prog_char line_04[] PROGMEM = "var xD;" ;
prog_char line_05[] PROGMEM = "var dB=new Array();\n" ;
prog_char line_06[] PROGMEM = "function fetch(I){" ;
prog_char line_07[] PROGMEM = "xD=getXdO();\n" ;
prog_char line_08[] PROGMEM = "if(xD==null){" ;
prog_char line_09[] PROGMEM = "alert('No AJAX');" ;
prog_char line_10[] PROGMEM = "return}\n" ;
prog_char line_11[] PROGMEM = "xD.onreadystatechange=stateChanged;" ;
prog_char line_12[] PROGMEM = "xD.open('post',I,true);" ;
prog_char line_13[] PROGMEM = "xD.send(null)}\n" ;
prog_char line_14[] PROGMEM = "function stateChanged(){\n" ;
prog_char line_15[] PROGMEM = "if(xD.readyState==4){" ;
prog_char line_16[] PROGMEM = "dB = xD.responseText.split(',');\n" ;

prog_char line_17[] PROGMEM = "if(dB[" ;
prog_char line_18[] PROGMEM = "]){document.getElementById('D" ;
prog_char line_19[] PROGMEM = "').innerHTML=dB[" ;

prog_char line_20[] PROGMEM = "]}\n" ;
prog_char line_21[] PROGMEM ="}}\n" ;
prog_char line_22[] PROGMEM = "function getXdO(){var xD=null;\n" ;
prog_char line_23[] PROGMEM = "try{" ;
prog_char line_24[] PROGMEM = "xD=new XMLHttpRequest()}\n" ;
prog_char line_25[] PROGMEM = "catch (e){\n" ;
prog_char line_26[] PROGMEM = "try{" ;
prog_char line_27[] PROGMEM = "xD=new ActiveXObject(\"Msxml2.XMLHTTP\")}\n" ;
prog_char line_28[] PROGMEM = "catch (e){" ;
prog_char line_29[] PROGMEM = "xD=new ActiveXObject(\"Microsoft.XMLHTTP\")}}" ;
prog_char line_30[] PROGMEM = "return xD}\n" ;
prog_char line_31[] PROGMEM = "function A(){" ;
prog_char line_32[] PROGMEM = "setTimeout('A()'," ;

prog_char line_33[] PROGMEM = ");" ;
prog_char line_34[] PROGMEM = "fetch('@')}\n" ;
prog_char line_35[] PROGMEM = "</script></head>" ;

prog_char line_36[] PROGMEM = "<body onload='A()'>\n" ;
prog_char line_37[] PROGMEM = "<input type='button' value='Send One' onClick=\"fetch('1')\"><br>\n" ;
prog_char line_38[] PROGMEM = "<input type='button' value='Send Two' onClick=\"fetch('2')\"><br>\n" ;

prog_char line_39[] PROGMEM = "Analog " ;
prog_char line_40[] PROGMEM = " <span id='D" ;
prog_char line_41[] PROGMEM = "'></span><br>\n" ;

prog_char line_42[] PROGMEM = "</body></html>\n" ;

PROGMEM const char *string_table[] = {
line_00,
line_01,
line_02,
line_03,
line_04,
line_05,
line_06,
line_07,
line_08,
line_09,
line_10,
line_11,
line_12,
line_13,
line_14,
line_15,
line_16,
line_17,
line_18,
line_19,
line_20,
line_21,
line_22,
line_23,
line_24,
line_25,
line_26,
line_27,
line_28,
line_29,
line_30,
line_31,
line_32,
line_33,
line_34,
line_35,
line_36,
line_37,
line_38,
line_39,
line_40,
line_41,
line_42
};


//Constants
byte mac[] = { 0x12, 0x34, 0x56, 0x78, 0x9A, 0xBC };
byte servIP[] = { 192, 168, 0, 129 };

// TODO: Dynamic IP configuration
byte targetIP[] = { 192, 168, 0, 130 };

byte highIP[] = { 255, 255, 255, 255 };
byte zeroIP[] = { 0, 0, 0, 0 };
byte broadcastIP[] = { 255, 255, 255, 255 };
byte subnet[] = { 255, 255, 255, 0 };
//byte gateway[] = { 192, 168, 1, 1 };

byte leaseTime[] = { 0, 0, 2, 88 }; // 10 minutes
byte leaseRenew[] = { 0, 0, 1, 44 };
byte leaseRebind[] = { 0, 0, 1, 194 };

Server server(80);

/**
* @brief for the DHCP message
*/

typedef struct RIP_MSG{
byte op;
byte htype;
byte hlen;
byte hops;
unsigned long xid;
unsigned int secs;
unsigned int flags;
byte ciaddr[4];
byte yiaddr[4];
byte siaddr[4];
byte giaddr[4];
byte chaddr[16];
byte sname[64];
byte file[128];
byte magic[4];
byte OPT[];
};

// #########

void setup(){
Serial.begin(9600);

Ethernet.begin(mac,servIP);
Udp.begin(DHCP_SERVER_PORT);
server.begin();

#ifdef DEBUG
Serial.println("All started");
#endif

}

// #########

void dhcpServ(){

// Get packet size and allocate memory
int packetSize = Udp.available()-8; // why is there a -8 ?
RIP_MSG *packet = (RIP_MSG *)malloc(packetSize * sizeof(byte *));
Udp.readPacket((byte *)packet,packetSize);

// Find real size and make copy of incoming options
// Attempt to handle missing 'endOption' - corrupted line?
int optLoc = 0;
while(packet->OPT[optLoc] != endOption && optLoc < packetSize-dhcpSIZE){
optLoc = 2+optLoc+packet->OPT[optLoc+1];
}
int optSize = optLoc;
byte *options = (byte *)malloc(optSize * sizeof(byte *));
memcpy( options , packet->OPT , optSize);

#ifdef DEBUG
Serial.print("Packet size ");
Serial.println(packetSize, DEC);
Serial.print("Options size ");
Serial.println(optSize, DEC);
Serial.println("Fetched");
for(int i = 0;i < (optSize);i++){
Serial.print(options, DEC);
Serial.print(" ");
}
Serial.println();
#endif

packet->op = DHCP_BOOTREPLY;
strcpy((char *)packet->sname, serverName);
memcpy(packet->siaddr, servIP, 4);
memcpy(packet->yiaddr, targetIP, 4);

optLoc = 0;
int currLoc = 0;
int messLoc = 0;
byte optType = options[optLoc];
while(optLoc < optSize){

#ifdef DEBUG
Serial.println();
Serial.print(optType);
#endif

switch(optType){
case dhcpMessageType:
currLoc+=2;
messLoc = currLoc;
if(options[optLoc+2] == DHCP_DISCOVER){

#ifdef DEBUG
Serial.print(" Discover");
#endif
packet->OPT[currLoc++] = DHCP_OFFER;
}
else if(options[optLoc+2] == DHCP_REQUEST){

#ifdef DEBUG
Serial.print(" Request");
#endif
packet->OPT[currLoc++] = DHCP_ACK;
}
else{

#ifdef DEBUG
Serial.print(" Other");
#endif

packet->OPT[currLoc++] = DHCP_NAK;
}
break;
case dhcpRequestedIPaddr:
// maybe use this to decline a duplicate IP request
// when dynamic IPs done?
case hostName:
// dunno?
break;
case dhcpServerIdentifier:
packet->OPT[currLoc++] = optType;
packet->OPT[currLoc++] = 4;
memcpy(packet->OPT+currLoc, servIP, 4);
currLoc += 4;
break;
case dhcpParamRequest:
for(int i = 0;i < options[optLoc+1];i++){
switch (options[optLoc+i+2]){
case subnetMask:
packet->OPT[currLoc++] = subnetMask;
packet->OPT[currLoc++] = 4;
memcpy(packet->OPT+currLoc,subnet,4);
currLoc += 4;
break;
case routersOnSubnet:
packet->OPT[currLoc++] = routersOnSubnet;
packet->OPT[currLoc++] = 4;
memcpy(packet->OPT+currLoc,servIP,4);
currLoc += 4;
break;
case dns: // would like to follow up on this
packet->OPT[currLoc++] = dns;
packet->OPT[currLoc++] = 4;
memcpy(packet->OPT+currLoc,servIP,4);
currLoc += 4;
break;
case logServer:
packet->OPT[currLoc++] = optType;
packet->OPT[currLoc++] = 4;
memcpy(packet->OPT+currLoc,zeroIP,4);
currLoc += 4;
break;
case domainName:
packet->OPT[currLoc++] = optType;
packet->OPT[currLoc++] = sizeof(myDomainName);
memcpy(packet->OPT+currLoc, myDomainName, sizeof(myDomainName));
currLoc += sizeof(myDomainName);
break;
}
}
break;
}
optLoc = 2+optLoc+options[optLoc+1];
optType = options[optLoc];
}

packet->OPT[currLoc++] = dhcpIPaddrLeaseTime;
packet->OPT[currLoc++] = 4;
memcpy(packet->OPT+currLoc,leaseTime,4);
currLoc += 4;

packet->OPT[currLoc++] = dhcpT1value;
packet->OPT[currLoc++] = 4;
memcpy(packet->OPT+currLoc,leaseRenew,4);
currLoc += 4;

packet->OPT[currLoc++] = dhcpT2value;
packet->OPT[currLoc++] = 4;
memcpy(packet->OPT+currLoc,leaseRebind,4);
currLoc += 4;

packet->OPT[currLoc++] = endOption;


#ifdef DEBUG
Serial.println();
Serial.println();
Serial.println("Sent");
for(int i = 0;i<(currLoc);i++){
Serial.print(packet->OPT, DEC);
Serial.print(" ");
}
Serial.println();
#endif

// Send Packet
Udp.sendPacket((byte *)packet,dhcpSIZE+currLoc,broadcastIP,DHCP_CLIENT_PORT);

// Disposal code
zap(options);
zap(packet);
}

// #########

int getline(Client client, char *buffer){
int i = 0;
char c;
buffer[i++] = client.read();
buffer[i++] = client.read();
while (buffer[i-2] != '\r' && buffer[i-1] != '\n' && client.available()) {
c = client.read();
if (i < bufferSIZE){
buffer = c;
i ++;
}
}
return i;
}

// #########

// send a web page complete with javascript
void makepage(Client client, char *buffer){

for (int i = 0; i < 17; i++){
strcpy_P(buffer, (char*)pgm_read_word(&(string_table)));
client.print(buffer);
}

for (int i = 0 ; i < 6 ; i ++){
strcpy_P(buffer, (char*)pgm_read_word(&(string_table[17])));
client.print(buffer);
client.print(i);
strcpy_P(buffer, (char*)pgm_read_word(&(string_table[18])));
client.print(buffer);
client.print(i);
strcpy_P(buffer, (char*)pgm_read_word(&(string_table[19])));
client.print(buffer);
client.print(i);
strcpy_P(buffer, (char*)pgm_read_word(&(string_table[20])));
client.print(buffer);
}

for (int i = 21; i < 33; i++){
strcpy_P(buffer, (char*)pgm_read_word(&(string_table)));
client.print(buffer);
}

client.print(refreshTIME);

for (int i = 33; i < 39; i++){
strcpy_P(buffer, (char*)pgm_read_word(&(string_table)));
client.print(buffer);
}

for (int i = 0 ; i < 6 ; i ++){
strcpy_P(buffer, (char*)pgm_read_word(&(string_table[39])));
client.print(buffer);
client.print(i);
strcpy_P(buffer, (char*)pgm_read_word(&(string_table[40])));
client.print(buffer);
client.print(i);
strcpy_P(buffer, (char*)pgm_read_word(&(string_table[41])));
client.print(buffer);
}

strcpy_P(buffer, (char*)pgm_read_word(&(string_table[42])));
client.print(buffer);
}

// #########

void webServ(Client client){
char *buffer = (char *)malloc(bufferSIZE * sizeof(char *));
while (client.connected()) {
if (client.available()) {
int len = getline(client, buffer);

#ifdef DEBUG
Serial.print(">>");
int i = 0;
while (buffer >= 32){
Serial.print(buffer);
i++;
}
Serial.println();
#endif

if (len > 2) {
if (!memcmp(buffer,"GET / HTTP",10)){
makepage(client, buffer);
}
else if (!memcmp(buffer,"POST /",6)){

// look for returned values - crude but it works!
switch(buffer[6]){
case '1':
Serial.println("Got number 1");
break;
case '2':
Serial.println("2nd button pressed");
break;

// send the value of each analog input pin - comma separated
case '@':
client.print(analogRead(0));
for (int i = 1 ; i < 6 ; i ++){
client.print(',');
client.print(analogRead(i));
}
break;
}
}
break;
}
}
}

// give the web browser time to receive the data
delay(1);
client.stop();
zap(buffer);
}

// #########

// put everything in functions to make the loop clearer
void loop(){
if(Udp.available()){
dhcpServ();
}
Client client = server.available();
if (client) {
webServ(client);
}
}


*****

YMMV

++

http://www.aether-hemera.com/blog/default.asp?PostId=30

[Glenn]

Codetaggar plzkthx

Kod: Markera allt

Snälla?