/mandos/trunk : revision 359

44

#include <stdint.h> /* uint16_t, uint32_t */

45

#include <stddef.h> /* NULL, size_t, ssize_t */

46

#include <stdlib.h> /* free(), EXIT_SUCCESS, EXIT_FAILURE,

47

srand(), strtof(), abort() */

47

srand(), strtof() */

48

#include <stdbool.h> /* bool, false, true */

49

#include <string.h> /* memset(), strcmp(), strlen(),

50

strerror(), asprintf(), strcpy() */

71

INET_ADDRSTRLEN, INET6_ADDRSTRLEN

72

*/

73

#include <unistd.h> /* close(), SEEK_SET, off_t, write(),

74

getuid(), getgid(), seteuid(),

75

setgid(), pause() */

74

getuid(), getgid(), setuid(),

75

setgid() */

76

#include <arpa/inet.h> /* inet_pton(), htons */

77

#include <iso646.h> /* not, or, and */

78

#include <argp.h> /* struct argp_option, error_t, struct

125

static const char mandos_protocol_version[] = "1";

126

const char *argp_program_version = "mandos-client " VERSION;

127

const char *argp_program_bug_address = "<mandos@fukt.bsnet.se>";

128

static const char sys_class_net[] = "/sys/class/net";

129

char *connect_to = NULL;

130

128

131

129

/* Used for passing in values through the Avahi callback functions */

132

130

typedef struct {

144

142

.dh_bits = 1024, .priority = "SECURE256"

145

143

":!CTYPE-X.509:+CTYPE-OPENPGP" };

146

144

147

sig_atomic_t quit_now = 0;

148

int signal_received = 0;

149

150

145

/*

151

146

* Make additional room in "buffer" for at least BUFFER_SIZE more

152

147

* bytes. "buffer_capacity" is how much is currently allocated,

169

164

*/

170

165

static bool init_gpgme(const char *seckey,

171

166

const char *pubkey, const char *tempdir){

167

int ret;

172

168

gpgme_error_t rc;

173

169

gpgme_engine_info_t engine_info;

174

170

177

173

* Helper function to insert pub and seckey to the engine keyring.

178

174

*/

179

175

bool import_key(const char *filename){

180

int ret;

181

176

int fd;

182

177

gpgme_data_t pgp_data;

183

178

479

474

static int init_gnutls_session(gnutls_session_t *session){

480

475

int ret;

481

476

/* GnuTLS session creation */

482

do {

483

ret = gnutls_init(session, GNUTLS_SERVER);

484

if(quit_now){

485

return -1;

486

}

487

} while(ret == GNUTLS_E_INTERRUPTED or ret == GNUTLS_E_AGAIN);

477

ret = gnutls_init(session, GNUTLS_SERVER);

488

478

if(ret != GNUTLS_E_SUCCESS){

489

479

fprintf(stderr, "Error in GnuTLS session initialization: %s\n",

490

480

safer_gnutls_strerror(ret));

492

482

493

483

{

494

484

const char *err;

495

do {

496

ret = gnutls_priority_set_direct(*session, mc.priority, &err);

497

if(quit_now){

498

gnutls_deinit(*session);

499

return -1;

500

}

501

} while(ret == GNUTLS_E_INTERRUPTED or ret == GNUTLS_E_AGAIN);

485

ret = gnutls_priority_set_direct(*session, mc.priority, &err);

502

486

if(ret != GNUTLS_E_SUCCESS){

503

487

fprintf(stderr, "Syntax error at: %s\n", err);

504

488

fprintf(stderr, "GnuTLS error: %s\n",

508

492

}

509

493

}

510

494

511

do {

512

ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,

513

mc.cred);

514

if(quit_now){

515

gnutls_deinit(*session);

516

return -1;

517

}

518

} while(ret == GNUTLS_E_INTERRUPTED or ret == GNUTLS_E_AGAIN);

495

ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,

496

mc.cred);

519

497

if(ret != GNUTLS_E_SUCCESS){

520

498

fprintf(stderr, "Error setting GnuTLS credentials: %s\n",

521

499

safer_gnutls_strerror(ret));

524

502

}

525

503

526

504

/* ignore client certificate if any. */

527

gnutls_certificate_server_set_request(*session, GNUTLS_CERT_IGNORE);

505

gnutls_certificate_server_set_request(*session,

506

GNUTLS_CERT_IGNORE);

528

507

529

508

gnutls_dh_set_prime_bits(*session, mc.dh_bits);

530

509

535

514

static void empty_log(__attribute__((unused)) AvahiLogLevel level,

536

515

__attribute__((unused)) const char *txt){}

537

516

517

sig_atomic_t quit_now = 0;

518

int signal_received = 0;

519

538

520

/* Called when a Mandos server is found */

539

521

static int start_mandos_communication(const char *ip, uint16_t port,

540

522

AvahiIfIndex if_index,

546

528

struct sockaddr_in6 in6;

547

529

} to;

548

530

char *buffer = NULL;

549

char *decrypted_buffer = NULL;

531

char *decrypted_buffer;

550

532

size_t buffer_length = 0;

551

533

size_t buffer_capacity = 0;

534

ssize_t decrypted_buffer_size;

552

535

size_t written;

553

int retval = -1;

536

int retval = 0;

554

537

gnutls_session_t session;

555

538

int pf; /* Protocol family */

556

539

583

566

tcp_sd = socket(pf, SOCK_STREAM, 0);

584

567

if(tcp_sd < 0){

585

568

perror("socket");

569

retval = -1;

586

570

goto mandos_end;

587

571

}

588

572

600

584

}

601

585

if(ret < 0 ){

602

586

perror("inet_pton");

587

retval = -1;

603

588

goto mandos_end;

604

589

}

605

590

if(ret == 0){

606

591

fprintf(stderr, "Bad address: %s\n", ip);

592

retval = -1;

607

593

goto mandos_end;

608

594

}

609

595

if(af == AF_INET6){

617

603

if(if_index == AVAHI_IF_UNSPEC){

618

604

fprintf(stderr, "An IPv6 link-local address is incomplete"

619

605

" without a network interface\n");

606

retval = -1;

620

607

goto mandos_end;

621

608

}

622

609

/* Set the network interface number as scope */

675

662

}

676

663

if(ret < 0){

677

664

perror("connect");

665

retval = -1;

678

666

goto mandos_end;

679

667

}

680

668

690

678

out_size - written));

691

679

if(ret == -1){

692

680

perror("write");

681

retval = -1;

693

682

goto mandos_end;

694

683

}

695

684

written += (size_t)ret;

723

712

goto mandos_end;

724

713

}

725

714

726

do {

715

do{

727

716

ret = gnutls_handshake(session);

728

717

if(quit_now){

729

718

goto mandos_end;

735

724

fprintf(stderr, "*** GnuTLS Handshake failed ***\n");

736

725

gnutls_perror(ret);

737

726

}

727

retval = -1;

738

728

goto mandos_end;

739

729

}

740

730

755

745

buffer_capacity);

756

746

if(buffer_capacity == 0){

757

747

perror("incbuffer");

748

retval = -1;

758

749

goto mandos_end;

759

750

}

760

751

773

764

case GNUTLS_E_AGAIN:

774

765

break;

775

766

case GNUTLS_E_REHANDSHAKE:

776

do {

767

do{

777

768

ret = gnutls_handshake(session);

778

769

779

770

if(quit_now){

783

774

if(ret < 0){

784

775

fprintf(stderr, "*** GnuTLS Re-handshake failed ***\n");

785

776

gnutls_perror(ret);

777

retval = -1;

786

778

goto mandos_end;

787

779

}

788

780

break;

789

781

default:

790

782

fprintf(stderr, "Unknown error while reading data from"

791

783

" encrypted session with Mandos server\n");

784

retval = -1;

792

785

gnutls_bye(session, GNUTLS_SHUT_RDWR);

793

786

goto mandos_end;

794

787

}

805

798

goto mandos_end;

806

799

}

807

800

808

do {

809

ret = gnutls_bye(session, GNUTLS_SHUT_RDWR);

810

if(quit_now){

811

goto mandos_end;

812

}

813

} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);

801

gnutls_bye(session, GNUTLS_SHUT_RDWR);

802

803

if(quit_now){

804

goto mandos_end;

805

}

814

806

815

807

if(buffer_length > 0){

816

ssize_t decrypted_buffer_size;

817

808

decrypted_buffer_size = pgp_packet_decrypt(buffer,

818

809

buffer_length,

819

810

&decrypted_buffer);

820

811

if(decrypted_buffer_size >= 0){

821

822

812

written = 0;

823

813

while(written < (size_t) decrypted_buffer_size){

824

814

if(quit_now){

833

823

fprintf(stderr, "Error writing encrypted data: %s\n",

834

824

strerror(errno));

835

825

}

836

goto mandos_end;

826

retval = -1;

827

break;

837

828

}

838

829

written += (size_t)ret;

839

830

}

840

retval = 0;

831

free(decrypted_buffer);

832

} else {

833

retval = -1;

841

834

}

835

} else {

836

retval = -1;

842

837

}

843

838

844

839

/* Shutdown procedure */

845

840

846

841

mandos_end:

847

free(decrypted_buffer);

848

842

free(buffer);

849

843

if(tcp_sd >= 0){

850

844

ret = (int)TEMP_FAILURE_RETRY(close(tcp_sd));

976

970

errno = old_errno;

977

971

}

978

972

979

/*

980

* This function determines if a directory entry in /sys/class/net

981

* corresponds to an acceptable network device.

982

* (This function is passed to scandir(3) as a filter function.)

983

*/

984

int good_interface(const struct dirent *if_entry){

985

ssize_t ssret;

986

char *flagname = NULL;

987

int ret = asprintf(&flagname, "%s/%s/flags", sys_class_net,

988

if_entry->d_name);

989

if(ret < 0){

990

perror("asprintf");

991

return 0;

992

}

993

if(if_entry->d_name[0] == '.'){

994

return 0;

995

}

996

int flags_fd = (int)TEMP_FAILURE_RETRY(open(flagname, O_RDONLY));

997

if(flags_fd == -1){

998

perror("open");

999

return 0;

1000

}

1001

typedef short ifreq_flags; /* ifreq.ifr_flags in netdevice(7) */

1002

/* read line from flags_fd */

1003

ssize_t to_read = (sizeof(ifreq_flags)*2)+3; /* "0x1003\n" */

1004

char *flagstring = malloc((size_t)to_read+1); /* +1 for final \0 */

1005

flagstring[(size_t)to_read] = '\0';

1006

if(flagstring == NULL){

1007

perror("malloc");

1008

close(flags_fd);

1009

return 0;

1010

}

1011

while(to_read > 0){

1012

ssret = (ssize_t)TEMP_FAILURE_RETRY(read(flags_fd, flagstring,

1013

(size_t)to_read));

1014

if(ssret == -1){

1015

perror("read");

1016

free(flagstring);

1017

close(flags_fd);

1018

return 0;

1019

}

1020

to_read -= ssret;

1021

if(ssret == 0){

1022

break;

1023

}

1024

}

1025

close(flags_fd);

1026

intmax_t tmpmax;

1027

char *tmp;

1028

errno = 0;

1029

tmpmax = strtoimax(flagstring, &tmp, 0);

1030

if(errno != 0 or tmp == flagstring or (*tmp != '\0'

1031

and not (isspace(*tmp)))

1032

or tmpmax != (ifreq_flags)tmpmax){

1033

if(debug){

1034

fprintf(stderr, "Invalid flags \"%s\" for interface \"%s\"\n",

1035

flagstring, if_entry->d_name);

1036

}

1037

free(flagstring);

1038

return 0;

1039

}

1040

free(flagstring);

1041

ifreq_flags flags = (ifreq_flags)tmpmax;

1042

/* Reject the loopback device */

1043

if(flags & IFF_LOOPBACK){

1044

if(debug){

1045

fprintf(stderr, "Rejecting loopback interface \"%s\"\n",

1046

if_entry->d_name);

1047

}

1048

return 0;

1049

}

1050

/* Accept point-to-point devices only if connect_to is specified */

1051

if(connect_to != NULL and (flags & IFF_POINTOPOINT)){

1052

if(debug){

1053

fprintf(stderr, "Accepting point-to-point interface \"%s\"\n",

1054

if_entry->d_name);

1055

}

1056

return 1;

1057

}

1058

/* Otherwise, reject non-broadcast-capable devices */

1059

if(not (flags & IFF_BROADCAST)){

1060

if(debug){

1061

fprintf(stderr, "Rejecting non-broadcast interface \"%s\"\n",

1062

if_entry->d_name);

1063

}

1064

return 0;

1065

}

1066

/* Accept this device */

1067

if(debug){

1068

fprintf(stderr, "Interface \"%s\" is acceptable\n",

1069

if_entry->d_name);

1070

}

1071

return 1;

1072

}

1073

1074

973

int main(int argc, char *argv[]){

1075

974

AvahiSServiceBrowser *sb = NULL;

1076

975

int error;

1078

977

intmax_t tmpmax;

1079

978

char *tmp;

1080

979

int exitcode = EXIT_SUCCESS;

1081

const char *interface = "";

980

const char *interface = "eth0";

1082

981

struct ifreq network;

1083

982

int sd = -1;

1084

983

bool take_down_interface = false;

1085

984

uid_t uid;

1086

985

gid_t gid;

986

char *connect_to = NULL;

1087

987

char tempdir[] = "/tmp/mandosXXXXXX";

1088

988

bool tempdir_created = false;

1089

989

AvahiIfIndex if_index = AVAHI_IF_UNSPEC;

1094

994

bool gpgme_initialized = false;

1095

995

float delay = 2.5f;

1096

996

1097

struct sigaction old_sigterm_action = { .sa_handler = SIG_DFL };

997

struct sigaction old_sigterm_action;

1098

998

struct sigaction sigterm_action = { .sa_handler = handle_sigterm };

1099

999

1100

uid = getuid();

1101

gid = getgid();

1102

1103

/* Lower any group privileges we might have, just to be safe */

1104

errno = 0;

1105

ret = setgid(gid);

1106

if(ret == -1){

1107

perror("setgid");

1108

}

1109

1110

/* Lower user privileges (temporarily) */

1111

errno = 0;

1112

ret = seteuid(uid);

1113

if(ret == -1){

1114

perror("seteuid");

1115

}

1116

1117

if(quit_now){

1118

goto end;

1119

}

1120

1121

1000

{

1122

1001

struct argp_option options[] = {

1123

1002

{ .name = "debug", .key = 128,

1219

1098

if(not debug){

1220

1099

avahi_set_log_function(empty_log);

1221

1100

}

1222

1223

if(interface[0] == '\0'){

1224

struct dirent **direntries;

1225

ret = scandir(sys_class_net, &direntries, good_interface,

1226

alphasort);

1227

if(ret >= 1){

1228

/* Pick the first good interface */

1229

interface = strdup(direntries[0]->d_name);

1230

if(debug){

1231

fprintf(stderr, "Using interface \"%s\"\n", interface);

1232

}

1233

if(interface == NULL){

1234

perror("malloc");

1235

free(direntries);

1236

exitcode = EXIT_FAILURE;

1237

goto end;

1238

}

1239

free(direntries);

1240

} else {

1241

free(direntries);

1242

fprintf(stderr, "Could not find a network interface\n");

1243

exitcode = EXIT_FAILURE;

1244

goto end;

1245

}

1246

}

1247

1101

1248

1102

/* Initialize Avahi early so avahi_simple_poll_quit() can be called

1249

1103

from the signal handler */

1320

1174

}

1321

1175

1322

1176

/* If the interface is down, bring it up */

1323

if(strcmp(interface, "none") != 0){

1177

if(interface[0] != '\0'){

1324

1178

if_index = (AvahiIfIndex) if_nametoindex(interface);

1325

1179

if(if_index == 0){

1326

1180

fprintf(stderr, "No such interface: \"%s\"\n", interface);

1332

1186

goto end;

1333

1187

}

1334

1188

1335

/* Re-raise priviliges */

1336

errno = 0;

1337

ret = seteuid(0);

1338

if(ret == -1){

1339

perror("seteuid");

1340

}

1341

1342

1189

#ifdef __linux__

1343

1190

/* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO

1344

1191

messages to mess up the prompt */

1362

1209

}

1363

1210

}

1364

1211

#endif /* __linux__ */

1365

/* Lower privileges */

1366

errno = 0;

1367

ret = seteuid(uid);

1368

if(ret == -1){

1369

perror("seteuid");

1370

}

1371

1212

goto end;

1372

1213

}

1373

1214

strcpy(network.ifr_name, interface);

1383

1224

}

1384

1225

#endif /* __linux__ */

1385

1226

exitcode = EXIT_FAILURE;

1386

/* Lower privileges */

1387

errno = 0;

1388

ret = seteuid(uid);

1389

if(ret == -1){

1390

perror("seteuid");

1391

}

1392

1227

goto end;

1393

1228

}

1394

1229

if((network.ifr_flags & IFF_UP) == 0){

1397

1232

ret = ioctl(sd, SIOCSIFFLAGS, &network);

1398

1233

if(ret == -1){

1399

1234

take_down_interface = false;

1400

perror("ioctl SIOCSIFFLAGS +IFF_UP");

1235

perror("ioctl SIOCSIFFLAGS");

1401

1236

exitcode = EXIT_FAILURE;

1402

1237

#ifdef __linux__

1403

1238

if(restore_loglevel){

1407

1242

}

1408

1243

}

1409

1244

#endif /* __linux__ */

1410

/* Lower privileges */

1411

errno = 0;

1412

ret = seteuid(uid);

1413

if(ret == -1){

1414

perror("seteuid");

1415

}

1416

1245

goto end;

1417

1246

}

1418

1247

}

1446

1275

}

1447

1276

}

1448

1277

#endif /* __linux__ */

1449

/* Lower privileges */

1450

errno = 0;

1451

if(take_down_interface){

1452

/* Lower privileges */

1453

ret = seteuid(uid);

1454

if(ret == -1){

1455

perror("seteuid");

1456

}

1457

} else {

1458

/* Lower privileges permanently */

1459

ret = setuid(uid);

1460

if(ret == -1){

1461

perror("setuid");

1462

}

1463

}

1278

}

1279

1280

if(quit_now){

1281

goto end;

1282

}

1283

1284

uid = getuid();

1285

gid = getgid();

1286

1287

errno = 0;

1288

setgid(gid);

1289

if(ret == -1){

1290

perror("setgid");

1291

}

1292

1293

ret = setuid(uid);

1294

if(ret == -1){

1295

perror("setuid");

1464

1296

}

1465

1297

1466

1298

if(quit_now){

1640

1472

1641

1473

/* Take down the network interface */

1642

1474

if(take_down_interface){

1643

/* Re-raise priviliges */

1644

errno = 0;

1645

ret = seteuid(0);

1475

ret = ioctl(sd, SIOCGIFFLAGS, &network);

1646

1476

if(ret == -1){

1647

perror("seteuid");

1477

perror("ioctl SIOCGIFFLAGS");

1478

} else if(network.ifr_flags & IFF_UP) {

1479

network.ifr_flags &= ~IFF_UP; /* clear flag */

1480

ret = ioctl(sd, SIOCSIFFLAGS, &network);

1481

if(ret == -1){

1482

perror("ioctl SIOCSIFFLAGS");

1483

}

1648

1484

}

1649

if(geteuid() == 0){

1650

ret = ioctl(sd, SIOCGIFFLAGS, &network);

1651

if(ret == -1){

1652

perror("ioctl SIOCGIFFLAGS");

1653

} else if(network.ifr_flags & IFF_UP) {

1654

network.ifr_flags &= ~IFF_UP; /* clear flag */

1655

ret = ioctl(sd, SIOCSIFFLAGS, &network);

1656

if(ret == -1){

1657

perror("ioctl SIOCSIFFLAGS -IFF_UP");

1658

}

1659

}

1660

ret = (int)TEMP_FAILURE_RETRY(close(sd));

1661

if(ret == -1){

1662

perror("close");

1663

}

1664

/* Lower privileges permanently */

1665

errno = 0;

1666

ret = setuid(uid);

1667

if(ret == -1){

1668

perror("setuid");

1669

}

1485

ret = (int)TEMP_FAILURE_RETRY(close(sd));

1486

if(ret == -1){

1487

perror("close");

1670

1488

}

1671

1489

}

1672

1490

1717

1535

if(quit_now){

1718

1536

sigemptyset(&old_sigterm_action.sa_mask);

1719

1537

old_sigterm_action.sa_handler = SIG_DFL;

1720

ret = (int)TEMP_FAILURE_RETRY(sigaction(signal_received,

1721

&old_sigterm_action,

1722

NULL));

1538

ret = sigaction(signal_received, &old_sigterm_action, NULL);

1723

1539

if(ret == -1){

1724

1540

perror("sigaction");

1725

1541

}

1726

do {

1727

ret = raise(signal_received);

1728

} while(ret != 0 and errno == EINTR);

1729

if(ret != 0){

1730

perror("raise");

1731

abort();

1732

}

1733

TEMP_FAILURE_RETRY(pause());

1542

raise(signal_received);

1734

1543

}

1735

1544

1736

1545

return exitcode;