summaryrefslogtreecommitdiff
path: root/accel-pptpd/ppp/ppp_ipcp.c
diff options
context:
space:
mode:
Diffstat (limited to 'accel-pptpd/ppp/ppp_ipcp.c')
-rw-r--r--accel-pptpd/ppp/ppp_ipcp.c665
1 files changed, 0 insertions, 665 deletions
diff --git a/accel-pptpd/ppp/ppp_ipcp.c b/accel-pptpd/ppp/ppp_ipcp.c
deleted file mode 100644
index 7cdcdbc..0000000
--- a/accel-pptpd/ppp/ppp_ipcp.c
+++ /dev/null
@@ -1,665 +0,0 @@
-#include <stdlib.h>
-#include <string.h>
-#include <sys/socket.h>
-#include <arpa/inet.h>
-#include "linux_ppp.h"
-
-#include "triton.h"
-
-#include "log.h"
-
-#include "ppp.h"
-#include "ppp_ipcp.h"
-
-#include "memdebug.h"
-
-struct recv_opt_t
-{
- struct list_head entry;
- struct ipcp_opt_hdr_t *hdr;
- int len;
- int state;
- struct ipcp_option_t *lopt;
-};
-
-static LIST_HEAD(option_handlers);
-
-static void ipcp_layer_up(struct ppp_fsm_t*);
-static void ipcp_layer_down(struct ppp_fsm_t*);
-static int send_conf_req(struct ppp_fsm_t*);
-static void send_conf_ack(struct ppp_fsm_t*);
-static void send_conf_nak(struct ppp_fsm_t*);
-static void send_conf_rej(struct ppp_fsm_t*);
-static void ipcp_recv(struct ppp_handler_t*);
-static void send_term_req(struct ppp_fsm_t *fsm);
-static void send_term_ack(struct ppp_fsm_t *fsm);
-
-static void ipcp_options_init(struct ppp_ipcp_t *ipcp)
-{
- struct ipcp_option_t *lopt;
- struct ipcp_option_handler_t *h;
-
- ipcp->conf_req_len = sizeof(struct ipcp_hdr_t);
-
- list_for_each_entry(h,&option_handlers,entry) {
- lopt = h->init(ipcp);
- if (lopt) {
- lopt->h = h;
- list_add_tail(&lopt->entry, &ipcp->options);
- ipcp->conf_req_len += lopt->len;
- }
- }
-}
-
-static void ipcp_options_free(struct ppp_ipcp_t *ipcp)
-{
- struct ipcp_option_t *lopt;
-
- while (!list_empty(&ipcp->options)) {
- lopt = list_entry(ipcp->options.next, typeof(*lopt), entry);
- list_del(&lopt->entry);
- lopt->h->free(ipcp, lopt);
- }
-}
-
-static struct ppp_layer_data_t *ipcp_layer_init(struct ppp_t *ppp)
-{
- struct ppp_ipcp_t *ipcp = _malloc(sizeof(*ipcp));
- memset(ipcp, 0, sizeof(*ipcp));
-
- log_ppp_debug("ipcp_layer_init\n");
-
- ipcp->ppp = ppp;
- ipcp->fsm.ppp = ppp;
-
- ipcp->hnd.proto = PPP_IPCP;
- ipcp->hnd.recv = ipcp_recv;
-
- ppp_register_unit_handler(ppp, &ipcp->hnd);
-
- ipcp->fsm.proto = PPP_IPCP;
- ppp_fsm_init(&ipcp->fsm);
-
- ipcp->fsm.layer_up = ipcp_layer_up;
- ipcp->fsm.layer_finished = ipcp_layer_down;
- ipcp->fsm.send_conf_req = send_conf_req;
- ipcp->fsm.send_conf_ack = send_conf_ack;
- ipcp->fsm.send_conf_nak = send_conf_nak;
- ipcp->fsm.send_conf_rej = send_conf_rej;
- ipcp->fsm.send_term_req = send_term_req;
- ipcp->fsm.send_term_ack = send_term_ack;
-
- INIT_LIST_HEAD(&ipcp->options);
- INIT_LIST_HEAD(&ipcp->ropt_list);
-
- return &ipcp->ld;
-}
-
-int ipcp_layer_start(struct ppp_layer_data_t *ld)
-{
- struct ppp_ipcp_t *ipcp = container_of(ld, typeof(*ipcp), ld);
-
- log_ppp_debug("ipcp_layer_start\n");
-
- ipcp_options_init(ipcp);
- ppp_fsm_lower_up(&ipcp->fsm);
- if (ppp_fsm_open(&ipcp->fsm))
- return -1;
-
- return 0;
-}
-
-void ipcp_layer_finish(struct ppp_layer_data_t *ld)
-{
- struct ppp_ipcp_t *ipcp = container_of(ld, typeof(*ipcp), ld);
-
- log_ppp_debug("ipcp_layer_finish\n");
-
- ipcp->fsm.fsm_state = FSM_Closed;
-
- log_ppp_debug("ipcp_layer_finished\n");
- ppp_layer_finished(ipcp->ppp, &ipcp->ld);
-}
-
-void ipcp_layer_free(struct ppp_layer_data_t *ld)
-{
- struct ppp_ipcp_t *ipcp = container_of(ld, typeof(*ipcp), ld);
-
- log_ppp_debug("ipcp_layer_free\n");
-
- ppp_unregister_handler(ipcp->ppp, &ipcp->hnd);
- ipcp_options_free(ipcp);
- ppp_fsm_free(&ipcp->fsm);
-
- _free(ipcp);
-}
-
-static void ipcp_layer_up(struct ppp_fsm_t *fsm)
-{
- struct ppp_ipcp_t *ipcp = container_of(fsm, typeof(*ipcp), fsm);
-
- log_ppp_debug("ipcp_layer_started\n");
-
- if (!ipcp->started) {
- ipcp->started = 1;
- ppp_layer_started(ipcp->ppp, &ipcp->ld);
- }
-}
-
-static void ipcp_layer_down(struct ppp_fsm_t *fsm)
-{
- struct ppp_ipcp_t *ipcp = container_of(fsm, typeof(*ipcp), fsm);
-
- log_ppp_debug("ipcp_layer_finished\n");
-
- if (ipcp->started) {
- ipcp->started = 0;
- ppp_layer_finished(ipcp->ppp, &ipcp->ld);
- } else
- ppp_terminate(ipcp->ppp, TERM_NAS_ERROR, 0);
-}
-
-static void print_ropt(struct recv_opt_t *ropt)
-{
- int i;
- uint8_t *ptr = (uint8_t*)ropt->hdr;
-
- log_ppp_info2("<");
- for (i = 0; i < ropt->len; i++) {
- log_ppp_info2(" %x", ptr[i]);
- }
- log_ppp_info2(" >");
-}
-
-static int send_conf_req(struct ppp_fsm_t *fsm)
-{
- struct ppp_ipcp_t *ipcp = container_of(fsm, typeof(*ipcp), fsm);
- uint8_t *buf = _malloc(ipcp->conf_req_len), *ptr = buf;
- struct ipcp_hdr_t *ipcp_hdr = (struct ipcp_hdr_t*)ptr;
- struct ipcp_option_t *lopt;
- int n;
-
- ipcp_hdr->proto = htons(PPP_IPCP);
- ipcp_hdr->code = CONFREQ;
- ipcp_hdr->id = ++ipcp->fsm.id;
- ipcp_hdr->len = 0;
-
- ptr += sizeof(*ipcp_hdr);
-
- list_for_each_entry(lopt, &ipcp->options, entry) {
- n = lopt->h->send_conf_req(ipcp, lopt, ptr);
- if (n < 0)
- return -1;
- if (n) {
- ptr += n;
- lopt->print = 1;
- } else
- lopt->print = 0;
- }
-
- if (conf_ppp_verbose) {
- log_ppp_info2("send [IPCP ConfReq id=%x", ipcp_hdr->id);
- list_for_each_entry(lopt,&ipcp->options,entry) {
- if (lopt->print) {
- log_ppp_info2(" ");
- lopt->h->print(log_ppp_info2, lopt, NULL);
- }
- }
- log_ppp_info2("]\n");
- }
-
- ipcp_hdr->len = htons(ptr - buf - 2);
- ppp_unit_send(ipcp->ppp, ipcp_hdr, ptr - buf);
-
- _free(buf);
-
- return 0;
-}
-
-static void send_conf_ack(struct ppp_fsm_t *fsm)
-{
- struct ppp_ipcp_t *ipcp = container_of(fsm, typeof(*ipcp), fsm);
- struct ipcp_hdr_t *hdr = (struct ipcp_hdr_t*)ipcp->ppp->unit_buf;
-
- hdr->code = CONFACK;
-
- if (conf_ppp_verbose)
- log_ppp_info2("send [IPCP ConfAck id=%x]\n", ipcp->fsm.recv_id);
-
- ppp_unit_send(ipcp->ppp, hdr, ntohs(hdr->len) + 2);
-}
-
-static void send_conf_nak(struct ppp_fsm_t *fsm)
-{
- struct ppp_ipcp_t *ipcp = container_of(fsm, typeof(*ipcp), fsm);
- uint8_t *buf = _malloc(ipcp->conf_req_len), *ptr = buf;
- struct ipcp_hdr_t *ipcp_hdr = (struct ipcp_hdr_t*)ptr;
- struct recv_opt_t *ropt;
-
- if (conf_ppp_verbose)
- log_ppp_info2("send [IPCP ConfNak id=%x", ipcp->fsm.recv_id);
-
- ipcp_hdr->proto = htons(PPP_IPCP);
- ipcp_hdr->code = CONFNAK;
- ipcp_hdr->id = ipcp->fsm.recv_id;
- ipcp_hdr->len = 0;
-
- ptr += sizeof(*ipcp_hdr);
-
- list_for_each_entry(ropt, &ipcp->ropt_list, entry) {
- if (ropt->state == IPCP_OPT_NAK) {
- if (conf_ppp_verbose) {
- log_ppp_info2(" ");
- ropt->lopt->h->print(log_ppp_info2, ropt->lopt, NULL);
- }
- ptr += ropt->lopt->h->send_conf_nak(ipcp, ropt->lopt, ptr);
- }
- }
-
- if (conf_ppp_verbose)
- log_ppp_info2("]\n");
-
- ipcp_hdr->len = htons(ptr-buf-2);
- ppp_unit_send(ipcp->ppp, ipcp_hdr, ptr - buf);
-
- _free(buf);
-}
-
-static void send_conf_rej(struct ppp_fsm_t *fsm)
-{
- struct ppp_ipcp_t *ipcp = container_of(fsm, typeof(*ipcp), fsm);
- uint8_t *buf = _malloc(ipcp->ropt_len + sizeof(struct ipcp_hdr_t)), *ptr = buf;
- struct ipcp_hdr_t *ipcp_hdr = (struct ipcp_hdr_t*)ptr;
- struct recv_opt_t *ropt;
-
- if (conf_ppp_verbose)
- log_ppp_info2("send [IPCP ConfRej id=%x", ipcp->fsm.recv_id);
-
- ipcp_hdr->proto = htons(PPP_IPCP);
- ipcp_hdr->code = CONFREJ;
- ipcp_hdr->id = ipcp->fsm.recv_id;
- ipcp_hdr->len = 0;
-
- ptr += sizeof(*ipcp_hdr);
-
- list_for_each_entry(ropt, &ipcp->ropt_list, entry) {
- if (ropt->state == IPCP_OPT_REJ) {
- if (conf_ppp_verbose) {
- log_ppp_info2(" ");
- if (ropt->lopt)
- ropt->lopt->h->print(log_ppp_info2, ropt->lopt, (uint8_t*)ropt->hdr);
- else
- print_ropt(ropt);
- }
- memcpy(ptr, ropt->hdr, ropt->len);
- ptr += ropt->len;
- }
- }
-
- if (conf_ppp_verbose)
- log_ppp_info2("]\n");
-
- ipcp_hdr->len = htons(ptr - buf - 2);
- ppp_unit_send(ipcp->ppp, ipcp_hdr, ptr-buf);
-
- _free(buf);
-}
-
-static int ipcp_recv_conf_req(struct ppp_ipcp_t *ipcp, uint8_t *data, int size)
-{
- struct ipcp_opt_hdr_t *hdr;
- struct recv_opt_t *ropt;
- struct ipcp_option_t *lopt;
- int r,ret = 1;
-
- ipcp->ropt_len = size;
-
- while (size > 0) {
- hdr = (struct ipcp_opt_hdr_t *)data;
-
- ropt = _malloc(sizeof(*ropt));
- memset(ropt, 0, sizeof(*ropt));
-
- if (hdr->len > size)
- ropt->len = size;
- else
- ropt->len = hdr->len;
- ropt->hdr = hdr;
- ropt->state = IPCP_OPT_NONE;
- list_add_tail(&ropt->entry, &ipcp->ropt_list);
-
- data += ropt->len;
- size -= ropt->len;
- }
-
- list_for_each_entry(lopt, &ipcp->options, entry)
- lopt->state=IPCP_OPT_NONE;
-
- if (conf_ppp_verbose) {
- log_ppp_info2("recv [IPCP ConfReq id=%x", ipcp->fsm.recv_id);
-
- list_for_each_entry(ropt, &ipcp->ropt_list, entry) {
- list_for_each_entry(lopt, &ipcp->options, entry) {
- if (lopt->id == ropt->hdr->id) {
- ropt->lopt = lopt;
- log_ppp_info2(" ");
- lopt->h->print(log_ppp_info2, lopt, (uint8_t*)ropt->hdr);
- break;
- }
- }
- if (!ropt->lopt) {
- log_ppp_info2(" ");
- print_ropt(ropt);
- }
- }
- log_ppp_info2("]\n");
- }
-
- list_for_each_entry(ropt, &ipcp->ropt_list, entry) {
- list_for_each_entry(lopt, &ipcp->options, entry) {
- if (lopt->id == ropt->hdr->id) {
- r = lopt->h->recv_conf_req(ipcp, lopt, (uint8_t*)ropt->hdr);
- if (ipcp->ppp->stop_time)
- return -1;
- lopt->state = r;
- ropt->state = r;
- ropt->lopt = lopt;
- if (r < ret)
- ret = r;
- break;
- }
- }
- if (!ropt->lopt) {
- ropt->state = IPCP_OPT_REJ;
- ret = IPCP_OPT_REJ;
- }
- }
-
-
- /*list_for_each_entry(lopt,&ipcp->options,entry)
- {
- if (lopt->state==IPCP_OPT_NONE)
- {
- r=lopt->h->recv_conf_req(ipcp,lopt,NULL);
- lopt->state=r;
- if (r<ret) ret=r;
- }
- }*/
-
- return ret;
-}
-
-static void ipcp_free_conf_req(struct ppp_ipcp_t *ipcp)
-{
- struct recv_opt_t *ropt;
-
- while (!list_empty(&ipcp->ropt_list)) {
- ropt = list_entry(ipcp->ropt_list.next, typeof(*ropt), entry);
- list_del(&ropt->entry);
- _free(ropt);
- }
-}
-
-static int ipcp_recv_conf_rej(struct ppp_ipcp_t *ipcp, uint8_t *data, int size)
-{
- struct ipcp_opt_hdr_t *hdr;
- struct ipcp_option_t *lopt;
- int res = 0;
-
- if (conf_ppp_verbose)
- log_ppp_info2("recv [IPCP ConfRej id=%x", ipcp->fsm.recv_id);
-
- if (ipcp->fsm.recv_id != ipcp->fsm.id) {
- if (conf_ppp_verbose)
- log_ppp_info2(": id mismatch ]\n");
- return 0;
- }
-
- while (size > 0) {
- hdr = (struct ipcp_opt_hdr_t *)data;
-
- list_for_each_entry(lopt, &ipcp->options, entry) {
- if (lopt->id == hdr->id) {
- if (!lopt->h->recv_conf_rej)
- res = -1;
- else if (lopt->h->recv_conf_rej(ipcp, lopt, data))
- res = -1;
- break;
- }
- }
-
- data += hdr->len;
- size -= hdr->len;
- }
-
- if (conf_ppp_verbose)
- log_ppp_info2("]\n");
-
- return res;
-}
-
-static int ipcp_recv_conf_nak(struct ppp_ipcp_t *ipcp, uint8_t *data, int size)
-{
- struct ipcp_opt_hdr_t *hdr;
- struct ipcp_option_t *lopt;
- int res = 0;
-
- if (conf_ppp_verbose)
- log_ppp_info2("recv [IPCP ConfNak id=%x", ipcp->fsm.recv_id);
-
- if (ipcp->fsm.recv_id != ipcp->fsm.id) {
- if (conf_ppp_verbose)
- log_ppp_info2(": id mismatch ]\n");
- return 0;
- }
-
- while (size > 0) {
- hdr = (struct ipcp_opt_hdr_t *)data;
-
- list_for_each_entry(lopt, &ipcp->options, entry) {
- if (lopt->id == hdr->id) {
- if (conf_ppp_verbose) {
- log_ppp_info2(" ");
- lopt->h->print(log_ppp_info2,lopt,data);
- }
- if (lopt->h->recv_conf_nak && lopt->h->recv_conf_nak(ipcp, lopt, data))
- res =- 1;
- break;
- }
- }
-
- data += hdr->len;
- size -= hdr->len;
- }
-
- if (conf_ppp_verbose)
- log_ppp_info2("]\n");
-
- return res;
-}
-
-static int ipcp_recv_conf_ack(struct ppp_ipcp_t *ipcp, uint8_t *data, int size)
-{
- struct ipcp_opt_hdr_t *hdr;
- struct ipcp_option_t *lopt;
- int res = 0;
-
- if (conf_ppp_verbose)
- log_ppp_info2("recv [IPCP ConfAck id=%x", ipcp->fsm.recv_id);
-
- if (ipcp->fsm.recv_id != ipcp->fsm.id) {
- if (conf_ppp_verbose)
- log_ppp_info2(": id mismatch ]\n");
- return 0;
- }
-
- while (size > 0) {
- hdr = (struct ipcp_opt_hdr_t *)data;
-
- list_for_each_entry(lopt, &ipcp->options, entry) {
- if (lopt->id == hdr->id) {
- if (conf_ppp_verbose) {
- log_ppp_info2(" ");
- lopt->h->print(log_ppp_info2, lopt, data);
- }
- if (!lopt->h->recv_conf_ack)
- break;
- if (lopt->h->recv_conf_ack(ipcp, lopt, data))
- res = -1;
- break;
- }
- }
-
- data += hdr->len;
- size -= hdr->len;
- }
-
- if (conf_ppp_verbose)
- log_ppp_info2("]\n");
-
- return res;
-}
-
-static void send_term_req(struct ppp_fsm_t *fsm)
-{
- struct ppp_ipcp_t *ipcp = container_of(fsm, typeof(*ipcp), fsm);
- struct ipcp_hdr_t hdr = {
- .proto = htons(PPP_IPCP),
- .code = TERMREQ,
- .id = ++ipcp->fsm.id,
- .len = htons(4),
- };
-
- if (conf_ppp_verbose)
- log_ppp_info2("send [IPCP TermReq id=%i]\n", hdr.id);
-
- ppp_unit_send(ipcp->ppp, &hdr, 6);
-}
-
-static void send_term_ack(struct ppp_fsm_t *fsm)
-{
- struct ppp_ipcp_t *ipcp = container_of(fsm, typeof(*ipcp), fsm);
- struct ipcp_hdr_t hdr = {
- .proto = htons(PPP_IPCP),
- .code = TERMACK,
- .id = ipcp->fsm.recv_id,
- .len = htons(4),
- };
-
- if (conf_ppp_verbose)
- log_ppp_info2("send [IPCP TermAck id=%i]\n", hdr.id);
-
- ppp_unit_send(ipcp->ppp, &hdr, 6);
-}
-
-static void ipcp_recv(struct ppp_handler_t*h)
-{
- struct ipcp_hdr_t *hdr;
- struct ppp_ipcp_t *ipcp = container_of(h, typeof(*ipcp), hnd);
- int r;
-
- if (ipcp->fsm.fsm_state == FSM_Initial || ipcp->fsm.fsm_state == FSM_Closed || ipcp->ppp->terminating) {
- if (conf_ppp_verbose)
- log_ppp_warn("IPCP: discarding packet\n");
- return;
- }
-
- if (ipcp->ppp->unit_buf_size < PPP_HEADERLEN + 2) {
- log_ppp_warn("IPCP: short packet received\n");
- return;
- }
-
- hdr = (struct ipcp_hdr_t *)ipcp->ppp->unit_buf;
- if (ntohs(hdr->len) < PPP_HEADERLEN) {
- log_ppp_warn("IPCP: short packet received\n");
- return;
- }
-
- ipcp->fsm.recv_id = hdr->id;
- switch(hdr->code) {
- case CONFREQ:
- r = ipcp_recv_conf_req(ipcp,(uint8_t*)(hdr + 1), ntohs(hdr->len) - PPP_HDRLEN);
- if (ipcp->ppp->stop_time) {
- ipcp_free_conf_req(ipcp);
- return;
- }
- switch(r) {
- case IPCP_OPT_ACK:
- ppp_fsm_recv_conf_req_ack(&ipcp->fsm);
- break;
- case IPCP_OPT_NAK:
- ppp_fsm_recv_conf_req_nak(&ipcp->fsm);
- break;
- case IPCP_OPT_REJ:
- ppp_fsm_recv_conf_req_rej(&ipcp->fsm);
- break;
- }
- ipcp_free_conf_req(ipcp);
- if (r == IPCP_OPT_FAIL)
- ppp_terminate(ipcp->ppp, TERM_USER_ERROR, 0);
- break;
- case CONFACK:
- if (ipcp_recv_conf_ack(ipcp,(uint8_t*)(hdr + 1), ntohs(hdr->len) - PPP_HDRLEN))
- ppp_terminate(ipcp->ppp, TERM_USER_ERROR, 0);
- else
- ppp_fsm_recv_conf_ack(&ipcp->fsm);
- break;
- case CONFNAK:
- ipcp_recv_conf_nak(ipcp,(uint8_t*)(hdr + 1), ntohs(hdr->len) - PPP_HDRLEN);
- ppp_fsm_recv_conf_rej(&ipcp->fsm);
- break;
- case CONFREJ:
- if (ipcp_recv_conf_rej(ipcp, (uint8_t*)(hdr + 1), ntohs(hdr->len) - PPP_HDRLEN))
- ppp_terminate(ipcp->ppp, TERM_USER_ERROR, 0);
- else
- ppp_fsm_recv_conf_rej(&ipcp->fsm);
- break;
- case TERMREQ:
- if (conf_ppp_verbose)
- log_ppp_info2("recv [IPCP TermReq id=%x]\n", hdr->id);
- ppp_fsm_recv_term_req(&ipcp->fsm);
- ppp_terminate(ipcp->ppp, TERM_USER_REQUEST, 0);
- break;
- case TERMACK:
- if (conf_ppp_verbose)
- log_ppp_info2("recv [IPCP TermAck id=%x]\n", hdr->id);
- //ppp_fsm_recv_term_ack(&ipcp->fsm);
- //ppp_terminate(ipcp->ppp, 0);
- break;
- case CODEREJ:
- if (conf_ppp_verbose)
- log_ppp_info2("recv [IPCP CodeRej id=%x]\n", hdr->id);
- ppp_fsm_recv_code_rej_bad(&ipcp->fsm);
- break;
- default:
- ppp_fsm_recv_unk(&ipcp->fsm);
- break;
- }
-}
-
-int ipcp_option_register(struct ipcp_option_handler_t *h)
-{
- /*struct ipcp_option_drv_t *p;
-
- list_for_each_entry(p,option_drv_list,entry)
- if (p->id==h->id)
- return -1;*/
-
- list_add_tail(&h->entry, &option_handlers);
-
- return 0;
-}
-
-static struct ppp_layer_t ipcp_layer =
-{
- .init = ipcp_layer_init,
- .start = ipcp_layer_start,
- .finish = ipcp_layer_finish,
- .free = ipcp_layer_free,
-};
-
-static void __init ipcp_init(void)
-{
- ppp_register_layer("ipcp", &ipcp_layer);
-}
-